>select ... ThisForm.yGetAging(vin_duedate) as vin_aging ... > >* The method >lparameters tdDueDate >do case >case tdDueDate >= .ydDate > ... >>
>> select vin_ref, thisform.yGetAging()as vin_aging >> from scvndino >> >>*yGetAging Method* >>with thisform >> do case >> case vin_duedate >= .ydDate >> return 'Current' >> case between(vin_duedate,.ydDate-10,.ydDate - 1) >> return '1 - 10' >> case between(vin_duedate,.ydDate-20,.ydDate - 11) >> return '11 - 20' >> case between(vin_duedate,.ydDate-30,.ydDate - 21) >> return '21 - 30' >> case between(vin_duedate,.ydDate-60,.ydDate - 31) >> return '31 - 60' >> case between(vin_duedate,.ydDate-90,.ydDate - 61) >> return '61 - 90' >> case between(vin_duedate,.ydDate-120,.ydDate - 91) >> return '91- 120' >> otherwise >> return '121+' >> endcase >>endwith >> >>>>