Subversion Repositories wimsdev

Rev

Rev 5252 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5252 Rev 8142
Line 8... Line 8...
8 
  !distribute items $wims_read_parm into r_,parm_hour,parm_min
 8 
  !distribute items $wims_read_parm into r_,parm_hour,parm_min
9 
  !goto $r_
 9 
  !goto $r_
10 
!endif
 10 
!endif
11 
 
 11 
 
12 
!distribute items $wims_read_parm into r_,parm_day,parm_month,parm_year
 12 
!distribute items $wims_read_parm into r_,parm_day,parm_month,parm_year
- 
 
 13 
!let $parm_day=$[$($parm_day)]
- 
 
 14 
!let $parm_month=$[$($parm_month)]
- 
 
 15 
!let $parm_year=$[$($parm_year)]
13 
 
 16 
 
14 
!goto $r_
 17 
!goto $r_
15 
:1
 18 
:1
16 
!formselect $parm_day from 1 to 31
 19 
!formselect $parm_day from 1 to 31
17 
!formselect $parm_month from 1 to 12 prompt $months
 20 
!formselect $parm_month from 1 to 12 prompt $months