Hi

It would appear that open does complete the DCBBLKSI field, or it does on
z/OS 1.13 when the following code is executed.

         LA    R10,TESTFILE            MAKE DCB                     
         USING IHADCB,R10                       ADDRESSABLE         
         OPEN  (CAPLIST,OUTPUT,TESTFILE,INPUT)                      
         LH    R15,DCBBLKSI                                         
         CVD   R15,DWORD                             
         UNPK  PBLKSI,DWORD+5(3)       PRINT                        
         OI    PBLKSI+4,X'F0'                BLKSIZE                
         PUT   CAPLIST,CAPLINE                                      
         CLOSE (CAPLIST,,TESTFILE)      CLOSE BOTH FILES.           

Kind Regards - Terry
 
Director
KMS-IT Limited
228 Abbeydale Road South
Dore
Sheffield
S17 3LA
UK
 
Reg : 3767263
 
Outgoing e-mails have been scanned, but it is the recipients responsibility
to ensure their anti-virus software is up to date.
 
 


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to