On Mon, May 01, 2023 at 08:26:42AM -0500, Pierre Fichaud wrote:
> I have provided the DCB in source and dumped it just before the OPEN.

> 1st data set in the concatenation :

>           The JCL has just the DSN and DISP.
>                                              .
> 
>                     .  000183 INFILE   DCB   DDNAME=INFILE,                   
>                        *00164000 .
>                      .  000184                DSORG=PS,                       
>                         *00165000 .
>                      .  000185                EODAD=0,                        
>                         *00166000 .
>                      .  000186                MACRF=GL                        
>                          00167000 .

>  DCB before open
>  000224D8 00000000 00000000 00000000 00000000
            00000000 00000001 00004000 00000001
            *....................... .. .... *
>  000224F8 00010580 50000000 C6C9D3C5 C1404040
            0A004800 00000001 00018240 000003E8 <-- 03E8
            *.   &...FILEA    . .... . b .. Y*
>  00022518 00000000 00000001 00000001 00000001
    00C8 -> 000000C8 00000001 00000000 00000001
            *....... ... ... ...H... ....... *

Which has BLKSIZE 1000 (x'03E8') and LRECL 200 (x'00C8') already set.

If they aren't set at assembly time who's setting them before open?

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

Reply via email to