File S231PFA DDS and CRTPF instruction
*************** Beginning of data ************************************************* 00005A UNIQUE(*INCNULL) 00010A R S231PFA 00030A S_231AN1 010A TEXT('Null capable text') 00040A COLHDG('Null capable' 'text') 00050A ALWNULL 00050A S_231AN2 8P 0 TEXT('Null capable number') 00060A COLHDG('Null capable' 'num') 00070A ALWNULL 00080A 00090A 00030A S_231AN3 006B TEXT('Null capable binary') 00040A COLHDG('Null capable' 'binary') 00050A ALWNULL 00080A K S_231AN1 ****************** End of data **************************************************** Create Physical File (CRTPF) Type choices, press Enter. File . . . . . . . . . . . . . . > S231PFA Name Library . . . . . . . . . . . > XXXLIB Name, *CURLIB Source file . . . . . . . . . . > SETCLSRC Name Library . . . . . . . . . . . > XXXLIB Name, *LIBL, *CURLIB Source member . . . . . . . . . *FILE 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' . . . . . . . *SRCMBRTXT