Hi,
I need to access(read,insert and update) the DB2 Region using the rexx exec.
I have no idea about how to do that. i searched in google also but i didnt get any clear idea.
Can you guys help me how to do that. Just the overview is enough i will try and get back to you.
Thanks in advance.
Access DB2 region using rexx
Moderators: Veera, Moderator Group
-
- Active Member
- Posts: 52
- Joined: Wed Mar 25, 2009 11:56 pm
- Location: Banglore
http://publib.boulder.ibm.com/infocente ... erface.htm
Sample Program:
Sample Program:
Code: Select all
"SUBCOM DSNREXX"
IF RC=0 THEN
SAY 'DSNREXX IS AVAILABLE'
ELSE
DO
SAY 'DSNREXX IS NOT AVAILABLE'
SAY 'SUBCOM RC :' RC
END
IF RC THEN
DO
S_RC = RXSUBCOM('ADD','DSNREXX','DSNREXX')
SAY 'ADDING DSNREXX....................'
PULL X
END
SQLSTMT = "SELECT COUNT(*) FROM DB0*****.****** "
ADDRESS DSNREXX
"CONNECT DB2E"
"EXECSQL DECLARE C1 CURSOR FOR S1"
"EXECSQL PREPARE S1 INTO :OUTSQLDA FROM :SQLSTMT"
"EXECSQL OPEN C1"
"EXECSQL FETCH C1 USING DESCRIPTOR :OUTSQLDA"
DO I = 1 TO OUTSQLDA.SQLD
LINE = OUTSQLDA.I.SQLDATA
END
SAY LINE
"EXECSQL EXECUTE S1 USING DESCRIPTOR :OUTSQLDA"
Thanks
MaheshVamsi
MaheshVamsi
FREE TUTORIALS
Tutorials
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts. - Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3. - DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. - SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples - CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page