S220PFL DDS and CRTPF instructions
DDS is in member S220PFL in SETCLSRC
*************** Beginning of data ***************************************************
00010A R S220PFL
00020A S_220ID1 005P 0 TEXT('Numeric identifier')
00040A COLHDG('Numeric' 'Id')
00050A S_220TXR 253A VARLEN
00060A TEXT('Variable length text - Real')
00070A COLHDG('Variable' 'len text' 'Real')
00080A K S_220ID1
****************** End of data ******************************************************
The file was created with a CRTPF as follows:
Create Physical File (CRTPF)
Type choices, press Enter.
File . . . . . . . . . . . . . . S220PFL Name
Library . . . . . . . . . . . XXXLIB Name, *CURLIB
Source file . . . . . . . . . . SETCLSRC Name
Library . . . . . . . . . . . XXXLIB Name, *LIBL, *CURLIB
Source member . . . . . . . . . S220PFL Name, *FILE
Record length, if no DDS . . . . Number
Generation severity level . . . 20 0-30
Flagging severity level . . . . 0 0-30
File type . . . . . . . . . . . *DATA *DATA, *SRC
Member, if desired . . . . . . . *FILE Name, *FILE, *NONE
Text 'description' . . . . . . . File with a variable length field