=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Command: DECLARE_DATAFILE logicalFileName*n Description: Include the .FD for the named file and define any related symbols, e.g., FILE.FILE_NUMBER Parameter logicalFileName Base name of the .FD file, e.g., for PERSON.FD, it would be PERSON. =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
#IF (!0>0)
#IFDEF !1.RECNUM
#IFDEF !1.FILE_NUMBER
#ELSE
#SET Q$ !1.RECNUM
#REPLACE !1.FILE_NUMBER |CI!q
#ENDIF
#ELSE
#INCLUDE !1.FD
#SET Q$ !1.RECNUM
#REPLACE !1.FILE_NUMBER |CI!q
#ENDIF
DECLARE_DATAFILE !2 !3 !4 !5 !6 !7 !8 !9
#ENDIF