& xx_aqhstartdate1, xx_aqhstartdate2, xx_aqhperiod,
& , xx_aqhstartdate2
integer xx_aqhstartdate2
call CAL_FULLDATE( xx_aqhstartdate1, xx_aqhstartdate2,
xx_aqhstartdate2 = 0