Rev 12476 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
23 | reyssat | 1 | !if $n<=0 |
12476 | bpr | 2 | !exit |
23 | reyssat | 3 | !endif |
4 | |||
16089 | guerimand | 5 | max_sheets=!defof MAX_SHEETS in wimshome/public_html/bases/sys/define.conf |
6 | snum=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets |
||
7 | !if $snum>=$max_sheets |
||
8 | error=bad_maxsheet |
||
9 | !exit |
||
10 | !endif |
||
11 | |||
23 | reyssat | 12 | !readdef wimshome/log/classes/$wims_class/.def |
13 | !if $wims_superclass!=$empty |
||
12476 | bpr | 14 | class_expiration=!defof class_expiration in wimshome/log/classes/$wims_superclass/.def |
23 | reyssat | 15 | !endif |
16 | |||
17 | !appendfile wimshome/log/classes/$wims_class/sheets/.sheets \ |
||
18 | :0\ |
||
19 | $class_expiration\ |
||
20 | $sheet_title\ |
||
21 | $sheet_desc |
||
22 | |||
16089 | guerimand | 23 | !increase snum |
23 | reyssat | 24 | Data=!replace internal ../wimshome/ by $wims_home/ in ../$data |
25 | !sh cp $Data $wims_home/log/classes/$wims_class/sheets/.sheet$snum |
||
26 | |||
27 | !restart module=adm/class/sheet&sheet=$snum |