Subversion Repositories wimsdev

Rev

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

Rev 2413 Rev 4016
Line 1... Line 1...
1 
!distribute items $wims_read_parm into record,_year,_month,_day
 1 
!distribute items $wims_read_parm into record,_year,_month,_day
2 
!bound record within date,months default $
 2 
!bound record within date,months default $
3 
!set months=Jan,Feb,Mar,Apr,May,Jun,Jul,Aug,Sept,Oct,Nov,Dec
 3 
!set months=¤@¤ë,¤G¤ë,¤T¤ë,¥|¤ë,¤­¤ë,¤»¤ë,¤C¤ë,¤K¤ë,¤E¤ë,¤Q¤ë,¤Q¤@¤ë,¤Q¤G¤ë
4 
!if $record=$empty
 4 
!if $record=$empty
5 
  !exit
 5 
  !exit
6 
!endif
 6 
!endif
7 
 
 7 
 
8 
!goto $record
 8 
!goto $record