File S231PFB DDS and CRTPF instruction

LANSA

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