File S231PFB DDS and CRTPF instruction
*************** Beginning of data ***************************************************
00005A UNIQUE(*INCNULL)
00010A R S231PFB
00020A S_231BKY 010A TEXT('Text field - Not null capabl')
00030A S_231BV1 010A TEXT('Null capable text')
00040A COLHDG('Null capable' 'text')
00050A ALWNULL
00050A S_231BV2 8P 0 TEXT('Null capable number')
00060A COLHDG('Null capable' 'num')
00070A ALWNULL
00080A
00090A
00030A S_231BV3 006B TEXT('Null capable binary')
00040A COLHDG('Null capable' 'binary')
00050A ALWNULL
00080A K S_231BKY
****************** End of data ******************************************************
Create Physical File (CRTPF)
Type choices, press Enter.
File . . . . . . . . . . . . . . > S231PFB 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