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
 
Where I can see the status code returned

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
udaysinghsolanki

New User


Joined: 17 Aug 2006
Posts: 2

PostPosted: Sat Aug 19, 2006 4:06 pm    Post subject: Where I can see the status code returned
Reply with quote

hi guys,
could anybody tell me where i can see the status code returned,when a CBLTdlI call is made to retrieve a particular segment.
Back to top
View user's profile Send private message

phetu

New User


Joined: 19 Aug 2006
Posts: 13
Location: Canada

PostPosted: Sat Aug 19, 2006 4:38 pm    Post subject:
Reply with quote

The status code is returned in the PCB's copybook that you supply with the CBLTDLI call.

Patrick
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1187
Location: Bangalore,India

PostPosted: Wed Aug 23, 2006 10:02 am    Post subject:
Reply with quote

Hi Udai,

Code:
CALL 'CBLTDLI' USING GU-FUNC                   
                     RENEWALS-PCB             
                     POLICY-TRANSACTION-SEGMENT
                     SSA-PTRANSEG-QUAL.

EVALUATE STATUS-CODE OF RENEWALS-PCB                         
    WHEN SPACES                                             
         Continue
    WHEN OTHER                                               
         Raise an error
END-EVALUATE.
We are making a GU call to policy transaction segment using renewal- pcb as pcb-mask so we are checking the status code of renewal pcb to check whether call is successful or not.
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 -> IMS DB/DC 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. how to code for GDG in Rexx cvnlynn CLIST & REXX 13 Wed Aug 09, 2017 9:13 pm
This topic is locked: you cannot edit posts or make replies. rexx code to create a ps file Bharath Vikraman CLIST & REXX 4 Mon Aug 07, 2017 10:30 am
No new posts I want to retire TRX and use only Rex... Abhinav Sharma CLIST & REXX 6 Sat Jul 29, 2017 2:53 am
No new posts UNIT=AFF for Easytrieve code gandikk JCL & VSAM 7 Wed Jul 12, 2017 11:42 pm
No new posts DB2 Program abending without giving a... rahulgarg14 DB2 7 Mon May 29, 2017 8:10 pm

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