Ok, here is an asm list of a READ macro and expansion with corresponding BDAM 
options

         READ  PDA_DECB0,         - DECB for read                     
               DI,123,234,'S',    - Read options                      
               MF=L               - Read l form                       
         DS    0F                                                     
PDA_DECB0 DC   A(0)                          EVENT CONTROL BLOCK  
         DC    BL1'00000000'                 TYPE FIELD           
         DC    BL1'01001000'                 TYPE FIELD       (X'48')        
         DC    AL2(0)                        LENGTH               
         DC    A(123)                        DCB ADDRESS          
         DC    A(234)                        AREA ADDRESS         
         DC    A(0)                          IOB ADDRESS          
         DC    A(0)                          KEY ADDRESS          
         DC    A(0)                          BLKREF ADDRESS       

The option DI means block addressing is being used, as can be discovered by 
reading DFSMS Macro Instructions for Datasets. It's not an SVC of course, MF=E 
does the usual BALR to the I/O routine in the DCB.

(Don't have the original posting to reply to).


-----Ursprüngliche Nachricht-----
Von: IBM Mainframe Discussion List [mailto:[email protected]] Im Auftrag 
von Tony Harminc
Gesendet: Samstag, 21. Juli 2012 00:23
An: [email protected]
Betreff: Re: BDAM READ with BLKREF of X'0'

On 19 July 2012 11:00, Thomas David Rivers <[email protected]> wrote:
> Thomas David Rivers wrote:

> The parms passed to the READ SVC (addressed by R1) are
>
> 0    X'00000000'
> 4    X'0048' 6    X'0000'  (zero length, use the blksize from the DCB?)
> 8    X'0000BFF8'     (address of the DCB)
> 12  X'00016000'      (AREA ADDRESS)
> 16  X'00000000'      (IOB ADDRESS)
> 20  X'00000000'      (KEY ADDRESS)
> 24  X'0000c40c'      (BLKREF ADDRESS)

What is this "READ SVC"?

Tony H.

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

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

Reply via email to