Make your own free website on Tripod.com
SAS-kode som genererer Html-tabellene
/*** Oppretter Libname ***/

libname wc 'u:\jgm\homepage\vestmarka';

/*** Oppretter Tabell ***/

data wc.score;

input Runde $ JanErik Petter Halvor Terje Maans PI Anton JohnG Cato ;

format Runde $2. JanErik commax3. Petter commax3. Halvor commax3. Terje commax3. Maans commax3. PI commax3. Anton commax3. Cato commax3. JohnG commax3. ;

label janerik='Jan Erik' maans ='Måns' JohnG ='John Gunnar' ; JanErik = left(JanErik); Petter = left(Petter ); Halvor = left(Halvor ); Terje = left(Terje ); Maans = left(Maans ); PI = left(PI ); Anton = left(Anton ); JohnG = left(JohnG ); Cato = left(Cato );

cards;

           1 5 0 0 0 3 0 2 1 0

           2 4 0 0 0 2 0 1 0 0 ;

run;

/*** Oppretter Tabell for totaler ***/

proc summary data=wc.score nway missing;

class ;

var JANERIK PETTER HALVOR TERJE MAANS PI ANTON JOHNG CATO;

output out=wc.total(drop=_freq_ _type_) sum=;

run;

/*** Legger på label  ***/

data wc.total;

set wc.total;

tot='';

label tot='Totalt';

run;

title ' ';

/*** Oppretter Html tabell for totaler ***/

%let utfil='u:\jgm\homepage\vestmarka\resultater_tabell.htm';

%let tittel1=Totalt ;

%ds2htm(data=wc.total,caption=&tittel1, chalign=center, csize=2,ccolor=black, cface=Arial, iface=Arial, vface=Arial, clface=Arial, labels=Y, formats=Y, clbgcolr=#aaaaaa, clsize=2.0, isize=2.0, vsize=1.0, bgtype=color,id=tot, bg=#C0C0C0, tbbgcolr=#BCBCBC, ctext=black, vtag=strong, itag=strong, cltag=strong, ctag=strong, ibgcolr=#aaaaaa, icolor=blue, clcolor=blue, htmlfile=&utfil,runmode=s, septype=NONE , openmode=replace);

/*** Oppretter Html tabell med score for alle runder ***/

%let utfil='u:\jgm\homepage\vestmarka\resultater_tabell.htm'; %let tittel2=Etter 2 Runder ; %ds2htm(data=wc.score, caption=&tittel2 , chalign=center, csize=2,ccolor=black, cface=Arial, iface=Arial, vface=Arial, clface=Arial, labels=Y, formats=Y, clbgcolr=#aaaaaa, clsize=2.0, isize=2.0, vsize=1.0, bgtype=color,id=runde, bg=#C0C0C0, tbbgcolr=#BCBCBC, ctext=black, vtag=strong, itag=strong, cltag=strong, ctag=strong, ibgcolr=#aaaaaa, icolor=blue, clcolor=blue, htmlfile=&utfil,runmode=s, septype=NONE , openmode=append);