CHARACTER*32 FD CALL FDATE(FD)
gdzie FD jest łańcuchem tekstowym o długości 32 znaków, w którym jest zapamiętana bieżąca data i godzina.