Hi!
I'd like to read the first record of a sequential file under MVS and write the values of the field each into a variable. I tried it with -READ. Yet I get the FOC339 error which says that WebFocus connot locate the file.
Here is my code:
[tt]
DYNAM ALLOC FILE STANDDAT -
DATASET XYZ.AG3300.PROD.STANDDAT -
SHR REUSE
-READ STANDAT &JAHR.A4.&MONAT.A2.
[/tt]
The allocation of the file is fine when I say
[tt]
TABLE FILE STANDDAT
PRINT *
END
[/tt]
after the DYNAM ALLOC statement.
But why does the -READ command not find the file?
If it is of any help, here's the master file description for STANDDAT:
[tt]
FILENAME=STANDDAT,SUFFIX=FIX
SEGNAME=STANDDAT,SEGTYPE=S0,$
FIELDNAME=JAHR ,ALIAS=JAHR ,
USAGE=A004 ,ACTUAL=A004 ,
DESC='JAHR STAND DATEN ',$
FIELDNAME=MONAT ,ALIAS=MONAT ,
USAGE=A002 ,ACTUAL=A002 ,
DESC='MONAT STAND DATEN ',$
[/tt]
Greetings,
Eva
I'd like to read the first record of a sequential file under MVS and write the values of the field each into a variable. I tried it with -READ. Yet I get the FOC339 error which says that WebFocus connot locate the file.
Here is my code:
[tt]
DYNAM ALLOC FILE STANDDAT -
DATASET XYZ.AG3300.PROD.STANDDAT -
SHR REUSE
-READ STANDAT &JAHR.A4.&MONAT.A2.
[/tt]
The allocation of the file is fine when I say
[tt]
TABLE FILE STANDDAT
PRINT *
END
[/tt]
after the DYNAM ALLOC statement.
But why does the -READ command not find the file?
If it is of any help, here's the master file description for STANDDAT:
[tt]
FILENAME=STANDDAT,SUFFIX=FIX
SEGNAME=STANDDAT,SEGTYPE=S0,$
FIELDNAME=JAHR ,ALIAS=JAHR ,
USAGE=A004 ,ACTUAL=A004 ,
DESC='JAHR STAND DATEN ',$
FIELDNAME=MONAT ,ALIAS=MONAT ,
USAGE=A002 ,ACTUAL=A002 ,
DESC='MONAT STAND DATEN ',$
[/tt]
Greetings,
Eva