Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Not able to use rowset in REXX-DB2.....

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DB2
View previous topic :: :: View next topic  
Author Message
avaneendra_linga

New User


Joined: 13 Dec 2006
Posts: 73
Location: Hyderabad

PostPosted: Fri May 11, 2007 12:48 pm    Post subject: Not able to use rowset in REXX-DB2.....
Reply with quote

Hi am writing DB2 in rexx,

from a result table i have to fetch rows starting from 2 nd row ,for this i am trying to use WITH ROWSET POSITIONING OPTION,for this i am getting following error at prepare statement.....

SQLERRD =0,0,0,-1,39,0'
65 *-* SAY "SQLERRP ="SQLERRP
>L> "SQLERRP ="
>V> "DSNHSM1A"
>O> "SQLERRP =DSNHSM1A"
SQLERRP =DSNHSM1A
66 *-* SAY "SQLERRM ="SQLERRM
>L> "SQLERRM ="
>L> "SQLERRM"
>O> "SQLERRM =SQLERRM"
SQLERRM =SQLERRM
67 *-* SAY "SQLERRMC ="SQLERRMC
>L> "SQLERRMC ="
>V> "ROWSET?RR, CS, RS, UR"
>O> "SQLERRMC =ROWSET?RR, CS, RS, UR"
SQLERRMC =ROWSET?RR, CS, RS, UR

can anybody help on this?

code:

C1ATTR ='SENSITIVE STATIC SCROLL WITH ROWSET POSITIONING'
"EXECSQL DECLARE C1 CURSOR FOR S1"
IF SQLCODE < 0 THEN CALL SQLCA
SQLSTMT=,
"SELECT ALT_CNSM_ID FROM F6435DBP.ML_CNSM_XREF",
"WHERE LGCY_SRC_ID ='07040770022762254300001' AND ",
"CNSM_ID = 43943975 AND PARTN_NBR = 15 AND SRC_CD = 'CS' "

"EXECSQL PREPARE S1 INTO :OUTSQLDA ATTRIBUTES :C1ATTR FROM :SQ
IF SQLCODE < 0 THEN CALL SQLCA
'EXECSQL OPEN C1 '
IF SQLCODE < 0 THEN CALL SQLCA
DROP UNIQUE.
BB=1
DO UNTIL(SQLCODE > 0)
'EXECSQL FETCH ROWSET STARTING AT ABSOLUTE 2 FROM C1',
'USING DESCRIPTOR :OUTSQLDA'
-
-
-
end
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Fri May 11, 2007 12:57 pm    Post subject:
Reply with quote

Looks more like a DB2 question than a REXX question.
Topic moved.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DB2 All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Need help on If condition continuatio... ashok_uddaraju CLIST & REXX 4 Fri May 19, 2017 8:55 am
No new posts Running an REXX EXEC implicitly sho7hills CLIST & REXX 3 Thu Apr 20, 2017 8:14 am
No new posts Need help in REXX CALL program Raje1002 CLIST & REXX 5 Wed Apr 19, 2017 11:18 pm
No new posts REXX cdoe to purge a JOB from spool a... Sulabh Agrawal CLIST & REXX 11 Thu Mar 09, 2017 11:36 am
No new posts Overriding PS data in rexx Shaheen Shaik CLIST & REXX 8 Fri Mar 03, 2017 5:08 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us