Rev 2290 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
!bound l_order within 1,2 default 1
!if $mlist>0
tot=!recordcnt $forumdir/$mlist/.msglist
!if $tot>0
lyear=!char 1 to 4 of $mlist
lmon=!char 5,6 of $mlist
!exit
!endif
!endif
mlist=.newlist
mnew=!record 0 of $forumdir/$mlist
tot=!linecnt $mnew