Hi Shieh,
I was wrong earlier.
You can create an egl Cobol project to work with VSAM files the same way as for z/OS. I could generated them simply enough.
When you generate the Cobol program for iSeries, *.dds file will be created for you corresponding to the filenames, In your case you will get ARQVSIX0.dds
which is the form for creating the corresponding file on iSeries.
As to using EGL debug, you will have a problem since the remote vsam access does not exist for iSeries. However, since you are porting apps from zos to iSeries, the apps
are probably already debugged, and the vsam tested using the remote debugger on z/OS.
Hope this helps. Let us know how the port to iseries is working.
------------------------------
Dev Banerjee
RBD Development
------------------------------
Original Message:
Sent: Tue October 15, 2024 11:42 AM
From: Dev Banerjee
Subject: EGL Debug to access remote VSAM file on iSeries
Hi Hsieh,
I am assuming you are trying to generate for iseries Cobol.
Note that VSAM is not supported natively on iseries.
I have never worked on this scenario before, but I think that for the VSAM file you will need to have a corresponding db2 table (db2 is built into the iseries file system).
I think the systemname should match the corresponding file name.
I am working to set up a scenario to verify my idea and I will let you know. Once I look at the generated Cobol I will have a better idea.
Meanwhile, can you describe what you are trying to do overall?
------------------------------
Dev Banerjee
RBD Development
Original Message:
Sent: Sat October 12, 2024 02:12 PM
From: Hsieh YUAN
Subject: EGL Debug to access remote VSAM file on iSeries
Hi Folks,
It's my first experience to work remote VSAM file on iSeries. I'd worked with zOS CICs and work fine.
Well !
I have a sample EGL Programa with record definition below:
record POCTUI3-RECD-IDX type IndexedRecord{fileName = "ARQVSIX0", keyItem = CHAVE}
3 CHAVE num(5);
3 TEXTO char(75);
end
I have resource associate options:
<ResourceAssociations name="RecursosVSAM">
<association fileName="ARQVSIX0">
<iseriesc>
<vsam systemName="?"/>
</iseriesc>
</association>
</ResourceAssociations>
but I don't know what value should be entered in the systemName property?
When I try to do EGL Debug i got it message error:
"EGL0751E The runtime property vgj.ra.fileName.fileType cannot be found for the ARQVSIX0 file.
EGL0002I The error occurred in POCTUI3 processing the POCTUI3-FUNC-IDX function."
I didn't find any tips in the EGL documentation.
Does anyone have any ideas?
Thanks !
Hsieh
------------------------------
Hsieh YUAN
------------------------------