& argosstartdate1,
integer argosstartdate1
& argosstartdate1, argosstartdate2, argosfile,
argosstartdate1 = 0
& call CAL_FULLDATE( argosstartdate1, argotstartdate2,