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
 

 

IMS DC- Clarification needed GU call

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

New User


Joined: 22 Dec 2006
Posts: 21
Location: chennai

PostPosted: Tue Jun 26, 2007 3:23 pm    Post subject: IMS DC- Clarification needed GU call
Reply with quote

Hi,

While i am doing (CBLTDLI) GU call some of my fields are getting initialized but my IO-PCB is still populated with spaces( for successful execution) . Please clarify my doubt
Back to top
View user's profile Send private message

kondakonda

New User


Joined: 20 Mar 2006
Posts: 34

PostPosted: Tue Jun 26, 2007 3:29 pm    Post subject: Re: IMS DC- Clarification needed GU call
Reply with quote

Can you please provide the fields that are being initialized.
Back to top
View user's profile Send private message
cgk_106

New User


Joined: 22 Dec 2006
Posts: 21
Location: chennai

PostPosted: Tue Jun 26, 2007 4:58 pm    Post subject:
Reply with quote

Hi,

Please assume this as my layout
01 ws-area.
05 ws-ll s9(3) comp value zeros.
05 ws-zz s9(3) comp value zeros.
05 ws-a-attr x(2) value spaces.
05 ws-a x(3) value spaces.

call ws-cbltdli using ws-lit-gu.
ws-area.
ws-io-pcb.
after gu call value of ws-a is initialized with zeroes.Please clarify.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Tue Jun 26, 2007 5:14 pm    Post subject:
Reply with quote

Is this really the DLI-call you intend to perform? Each DLI-call starts with the PCB (in PL/I the first parameter is the # of parameters). Please refer to the IMS manuals linked in the top line. You may also follow the sticky or the first link in my signature and learn after searching for io-pcb.
Back to top
View user's profile Send private message
cgk_106

New User


Joined: 22 Dec 2006
Posts: 21
Location: chennai

PostPosted: Tue Jun 26, 2007 5:33 pm    Post subject:
Reply with quote

Hi,

Thanks for correcting it .My io-pcb is also come as a first parameter after ws-lit-gu.Kindly clarify my doubt
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Tue Jun 26, 2007 6:06 pm    Post subject:
Reply with quote

Just reread your question and if you're really referring to the I/O PCB yuo'd better have a look at the declaration of an I/O PCB
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Tue Jun 26, 2007 10:16 pm    Post subject:
Reply with quote

Code:
01 ws-area.
05 ws-ll s9(3) comp value zeros.
05 ws-zz s9(3) comp value zeros.
05 ws-a-attr x(2) value spaces.
05 ws-a x(3) value spaces.

call ws-cbltdli using ws-lit-gu.
ws-area.
ws-io-pcb.


This is not DB call. Do you have online MFS for this program?
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Wed Jun 27, 2007 2:15 am    Post subject:
Reply with quote

cgk_106 wrote:
Hi,

Thanks for correcting it .My io-pcb is also come as a first parameter after ws-lit-gu.Kindly clarify my doubt


@Devzee: he corrected his code (was a typo)......but seems to have no clue about I/O-PCB's that's why I posted the link to the fine documentation icon_wink.gif
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. SORT trick needed bshkris SYNCSORT 6 Tue May 02, 2017 4:35 am
No new posts Need help in REXX CALL program Raje1002 CLIST & REXX 5 Wed Apr 19, 2017 11:18 pm
No new posts Need help in triggering a PL1 module ... Varungv99 IMS DB/DC 0 Fri Apr 07, 2017 10:01 am
No new posts Cobol EZASOKET call to SETSOCKOPT fails Andi1982 COBOL Programming 6 Thu Oct 06, 2016 7:12 pm
No new posts Strange EXEC function call in z/VM Willy Jensen CLIST & REXX 3 Wed Oct 05, 2016 2:07 pm


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