Rev 12057 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
!if $wims_supertype=2
ltclassname=!sh cat $wims_home/log/classes/$wims_superclass/.subclasses | awk -F: '{print $$2}' | awk -F, '{print $$1","$$4}'
!endif
!if $wims_supertype=4
ltclassname=!record 0 of wimshome/s2/$wims_session/ltclassname
!if $ltclassname!=$empty
test=!sh stat -c%Y $wims_home/log/classes/$wims_superclass/classes $wims_home/log/classes/$wims_superclass/levels $wims_home/log/classes/$wims_superclass/courses $wims_home/log/classes/$wims_superclass/programs $wims_home/log/classes/$wims_superclass/icourses | sort
dtfile=!sh stat -c%Y $wims_home/s2/$wims_session/ltclassname
dtsc=!line -1 of $test
!if $dtfile > $dtsc
!exit
!endif
!endif
ltclassname=$empty
list=classes,class\
levels,level\
courses,course\
programs,program\
icourses,icourse
!for k=1 to 5
tmp=!record 0 of wimshome/log/classes/$wims_superclass/$(list[$k;1])
tmp=!linecnt $tmp
!if $tmp>0
tmp=!sh cat $wims_home/log/classes/$wims_superclass/$(list[$k;1]) | awk -F, '{print "$wims_superclass/"$$1","$$3",$(list[$k;2])"}'
ltclassname=!append line $tmp to $ltclassname
!endif
!next k
!writefile wimshome/s2/$wims_session/ltclassname $ltclassname
!endif
Generated by GNU Enscript 1.6.5.90.