If memory serves, OPEN  (HPPCTL,UPDAT) should be coded as OPEN
(HPPCTL,'UPDAT') - with quotes around UPDAT (or INPUT or OUTPUT).

On 08/04/2017 00:28, Sam Siegel wrote:
> OPEN for UPDAT might require the GET LOCATE instead of GET MOVE.
> 
> Try OPEN for INPUT and see if work area is populated.
> 
> On Fri, Apr 7, 2017 at 4:09 PM, Tony Thigpen <t...@vse2pdf.com> wrote:
>> I am helping on an assembler program that is accessing a sequential file in
>> move mode, yet the move is not happening. R1 points to valid data after the
>> GET, but the record area specified was not filled in. This application is
>> being ported from VSE to z/OS.
>>
>> Code snippets:
>>
>>          OPEN  (HPPCTL,UPDAT)
>>          GET   HPPCTL,PPCT
>> HPPCTL   DCB   DSORG=PS,RECFM=F,LRECL=100,DDNAME=HPPCTL,
>>                BLKSIZE=(100),
>>                MACRF=(GM),EODAD=PPCTLOUT
>>
>> in program storage:
>> PPCT     DS    0CL100              CONTROL RECORD
>> PPID     DS    CL5                 RECORD IDENT
>> ... and more
>>
>>
>> Thoughts?
>>
>> (My expertise is in VSE, not z/OS application programming.)
>>
>> --
>> Tony Thigpen
>>
>> ----------------------------------------------------------------------
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> .
> 

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to