Rev 14946 | Rev 17319 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 14946 | Rev 17315 | ||
---|---|---|---|
Line 32... | Line 32... | ||
32 | tdon=!line $p of $data |
32 | tdon=!line $p of $data |
33 | !for v=1 to 10 |
33 | !for v=1 to 10 |
34 | !default up_$(listvar[$v])$i=$(tdon[$v+1]) |
34 | !default up_$(listvar[$v])$i=$(tdon[$v+1]) |
35 | !next v |
35 | !next v |
36 | !endif |
36 | !endif |
37 | !if |
37 | !if $(up_bdate$i)!=$empty |
38 | up_byear$i=!char 1 to 4 of $(up_bdate$i) |
38 | up_byear$i=!char 1 to 4 of $(up_bdate$i) |
39 | up_bmonth$i=!char |
39 | up_bmonth$i=!char 6 to 7 of $(up_bdate$i) |
40 | up_bday$i=!char |
40 | up_bday$i=!char 9 to 10 of $(up_bdate$i) |
41 | !endif |
41 | !endif |
42 | !for var in $listvar |
42 | !for var in $listvar |
43 | $(var)$i=$(up_$(var)$i) |
43 | $(var)$i=$(up_$(var)$i) |
44 | !next var |
44 | !next var |
45 | !next i |
45 | !next i |