Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Add support for reading Adabas data #138

Open
neilbeesley opened this issue Jul 3, 2024 · 2 comments
Open

Add support for reading Adabas data #138

neilbeesley opened this issue Jul 3, 2024 · 2 comments

Comments

@neilbeesley
Copy link

neilbeesley commented Jul 3, 2024

The GenevaERS IO module for Adabas, i.e. GVBMRAD works fine but requires the XML to be edited specifying Adabas access and the PF to contain certain Adabas information needed to read the database. For example:

DBID and file number
Returned record length
Adabas search and value buffers (i.e. selection criteria)
Adabas format buffer (i.e. description of fields, formats and lengths returned to the LR).
Optionally (multi-fetch) blocking factor, if not the default 32K / LRECL

Notes:
The returned record length should match the LR -- provided the Adabas format buffer is correctly defined
The Adabas value buffer may be a mute point as we normally start at the beginning of a file -- but this does allow to start at a particular value with Adabas
The Adabas format buffer is the fields and optionally the formats and lengths used to populate the contents of the returned records.

@neilbeesley
Copy link
Author

Adabas parameters have been (manually) implemented using an edited PF.
These are parsed by the Adabas I/O module similar to SQL.
They are echoed in the trace, for example:
DBID=300|FNR=47|SB=AA.|FB=AA,AB,AC,AD,AE,AF,AG.|LREC=96

@neilbeesley
Copy link
Author

For MR91 there would also need to be a change to put the access method into the VDP0200_ACCESS_METHOD_ID field, as done currently for the existing types:

SEQFILE EQU 01 SEQUENTIAL FILE
VSAMFILE EQU 02 VSAM "CI" FILE
KSDSFILE EQU 03 VSAM KSDS FILE
IMSFASTP EQU 05 IMS FAST PATH FILE
DB2SQL EQU 06 DB2 - SQL FILE
DB2VSAM EQU 07 DB2 - VSAM FILE
EXCPFILE EQU 08 EXEC CHAN PGM FILE
ORACLE EQU 10 ORACLE RDBMS FILE
SYBASE EQU 11 SYBASE RDBMS FILE
MSGQUEUE EQU 15 WEBSPHERE "MQ" QUEUE

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

1 participant