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