Subversion Repositories wimsdev

Rev

Rev 10101 | Rev 10617 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 10101 Rev 10288
Line 39... Line 39...
39 
class_ref_button_color=$wims_ref_button_color
 39 
class_ref_button_color=$wims_ref_button_color
40 
class_ref_button_help_bgcolor=$wims_ref_button_help_bgcolor
 40 
class_ref_button_help_bgcolor=$wims_ref_button_help_bgcolor
41 
class_ref_button_help_color=$wims_ref_button_help_color
 41 
class_ref_button_help_color=$wims_ref_button_help_color
42 
today=!char 1 to 8 of $wims_now
 42 
today=!char 1 to 8 of $wims_now
43 
!defread wimshome/log/classes/$wims_class/.def
 43 
!defread wimshome/log/classes/$wims_class/.def
- 
 
 44 
du=!record 0 of wimshome/log/classes/$wims_class/.du
- 
 
 45 
du=!word 1 of $du
- 
 
 46 
du1=!char -3 to -1 of $du
- 
 
 47 
du2=!char 1 to -4 of $du
- 
 
 48 
du=$du2.$du1
44 
!read tabletheme
 49 
!read tabletheme
45 
 
 50 
 
46 
!if $nonew=$empty
 51 
!if $nonew=$empty
47 
 creation=$class_creation
 52 
 creation=$class_creation
48 
 !bound creation between integer 20010101 and $today default 20010101
 53 
 !bound creation between integer 20010101 and $today default 20010101