0
ADD
60
XXXXXXXXXXXXXXXXXXX
&uf('+7W1#365')
XXXXXXXXXXXXXXXXXXX
ADD
60
XXXXXXXXXXXXXXXXXXX
&uf('+7W2#',&uf('+30'),'0101')
XXXXXXXXXXXXXXXXXXX
REPEAT
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
NEWMFN
'*'
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
ADD
60
XXXXXXXXXXXXXXXXXXX
&uf('+7W#',,f(val(G1)-1,0,0))
XXXXXXXXXXXXXXXXXXX
ADD
60
XXXXXXXXXXXXXXXXXXX
'20130101'
XXXXXXXXXXXXXXXXXXX
UNTIL
if val(G1)>1 then '1' fi
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
END
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX