Access Local Data Area in AS400 1

[Uvaiz]

Hello Everyone,

Would someone please help me how I could access the local data Area or any data area in COBOL or from select SQL within COBOL program.

Thanking you in anticipation.

Thanks
Tony

 

[fredericofonseca]

Option 1 - Create a CL program to do that for you, and then call it from the COBOL program.
Option 2 - Call an API for that
Option 3 - If it is a Local Data Area (LDA) in COBOL you can use the I-O-FEEDBACK and a accept/display statement.

Search your COBOL manuals for I-O-FEEDBACK and Local Data Area and you will find information on this.
(SPECIAL-NAMES. LOCAL-DATA IS LOCAL-DATA-AREA. is an example of how it would be defined)

These manuals are freely available with Infocenter and at

http://publib.boulder.ibm.com/iseries/v5r2/ic2924/index.htm

Regards

Frederico Fonseca
SysSoft Integrated Ltd

http://www.syssoft-int.com

 

[Uvaiz]

Thanks Frederico,

Calling a CL within COBOL resolved the problem.

Appreciate your continued valuable feedback.

Regards,
Tony