Subversion Repositories wimsdev

!if $job=print

!if $job=print

 !changeto print.phtml

 !changeto print.phtml

!endif

!endif

<hr/>

<hr/>

<pre>

<pre>

 !sh awk 'BEGIN {a=0};\

 !sh awk 'BEGIN {a=0};\

        /^:/ {a=1};\

        /^:/ {a=1};\

        a==1 {print}' bases/sheet/$sh.def

        a==1 {print}' bases/sheet/$sh.def

!set wims_menu_items=!append line participantview,1,cmd=resume&job=read \

!set wims_menu_items=!append line participantview,1,cmd=resume&job=read \

to $wims_menu_items

to $wims_menu_items

 !tail

 !tail

 !exit

 !exit

!set intro=!record 0 of $data

!set intro=!record 0 of $data

!set dur=!words2items $(intro[3;])

!set dur=!words2items $(intro[3;])

!distribute items $dur into duration,year

!distribute items $dur into duration,year

!if ? notin $duration

!if ? notin $duration

 !endif

 !endif

!endif

!endif

!set wims_menu_items=!append line printable,1,cmd=reply&job=print\

!set wims_menu_items=!append line printable,1,cmd=reply&job=print\

to $wims_menu_items

to $wims_menu_items

!tail

!tail