IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

IMS DC- Clarification needed GU call


IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic
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
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
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
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: 1104
Location: The Netherlands at Hole 19

PostPosted: Tue Jun 26, 2007 5:14 pm
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
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: 1104
Location: The Netherlands at Hole 19

PostPosted: Tue Jun 26, 2007 6:06 pm
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
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: 1104
Location: The Netherlands at Hole 19

PostPosted: Wed Jun 27, 2007 2:15 am
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> IMS DB/DC

 


Similar Topics
Topic Forum Replies
No new posts Error while running web tool kit REXX... CLIST & REXX 5
No new posts Mainframe Programmer with CICS Skill... Mainframe Jobs 0
No new posts Call program, directly from panel CLIST & REXX 9
No new posts Batch call online program, EXCI task ... CICS 3
No new posts Help needed to assemble IMS sample co... ABENDS & Debugging 4
Search our Forums:

Back to Top