Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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: 8657
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. GDG gen check using REXX raghuraman123 CLIST & REXX 6 Wed Apr 18, 2018 9:18 pm
No new posts How to control Panel Attributes throu... rsshanmugam CLIST & REXX 3 Mon Feb 26, 2018 9:51 pm
No new posts Find a string in PS file opened in br... mukkas CLIST & REXX 3 Sat Feb 24, 2018 2:15 pm
This topic is locked: you cannot edit posts or make replies. how to get Job information from IOF u... rsshanmugam CLIST & REXX 13 Mon Feb 05, 2018 4:22 pm
No new posts attchmvs from rexx subroutine that re... harisukumaran CLIST & REXX 1 Fri Jan 19, 2018 5:29 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us