& topexstartdate2,
integer topexstartdate2
topexstartdate2 = 0
& topexstartdate1, topexstartdate2,
& call CAL_FULLDATE( topexstartdate1, topexstartdate2,