File: teacherlist.proc

package info (click to toggle)
wims 2%3A4.29a%2Bdfsg1-3
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 185,704 kB
  • sloc: xml: 366,687; javascript: 120,570; ansic: 62,341; java: 62,170; sh: 7,744; perl: 3,937; yacc: 3,217; cpp: 1,915; lex: 1,805; makefile: 1,084; lisp: 914; pascal: 601; python: 520; php: 318; asm: 7
file content (17 lines) | stat: -rw-r--r-- 417 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
tt=!defof user_lastname, user_firstname in $classdir1/supervisor
tlist1=$wims_name_supervisor
!if $moduclass_lang=cn
  tsplit=
!else
  tsplit=, $
!endif
tlist2=$wims_name_supervisor

Tlist=!record 0 of $classdir1/.teacherlist
n=!linecnt $Tlist
n=$[min($n,500)]
!for i=1 to $n
  l=!line $i of $Tlist
  tlist1=!append item $(l[3]) to $tlist1
  tlist2=!append item $(l[1])$tsplit$(l[2]) ($(l[3])) to $tlist2
!next i