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
 

 

Replacing values even in N command code.

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

New User


Joined: 05 Dec 2005
Posts: 79

PostPosted: Wed May 28, 2008 1:02 pm    Post subject: Replacing values even in N command code.
Reply with quote

Hi,

I used N command code in GHU call, but still its repalcing.

Pls see my code(PL/1). Pls help.



S467AA20.CCODE='*DN';
S467AA20.SSAKEY = '12599TM076';
S467AA20.ROP = '= ';
S467AT01.SSAKEY = 'YQH6999999';
S467AT01.ROP = '= ';
S467AT01.CCODE='*DN';
DCL
1 S467ASUQ,
2 BEGIN CHAR(8) INIT('F467AS'),
2 CCODE CHAR(4) INIT('*DN ');


CALL XN151(' ',
GHU,
F467P_PTR,
ADDR(F467AA_SEG),
ADDR(S467AA20),
ADDR(S467ASUQ),
ADDR(S467AT01));

F467AS36 = 0.0;
F467AT04 = '2';

PUT SKIP LIST('VALUE 4 ',F467AT03);

CALL XN151(' ',
REPL,
F467P_PTR,
ADDR(F467AA_SEG));
Back to top
View user's profile Send private message

Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Thu May 29, 2008 5:02 am    Post subject:
Reply with quote

What is your status code between your retrieval and your replace?
Back to top
View user's profile Send private message
Prabha
Warnings : 2

New User


Joined: 05 Dec 2005
Posts: 79

PostPosted: Thu May 29, 2008 2:53 pm    Post subject: Reply to: Replacing values even in N command code.
Reply with quote

Status code is spaces.
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
No new posts MAX-RC 88 and Return code 606 in DFH0... lind sh CICS 1 Tue Jan 24, 2017 1:23 pm
No new posts Fail to change physical VSAM filename... jacobdng CICS 7 Fri Jan 20, 2017 12:36 pm
No new posts How to Capture the Max return code of... anilkumar922 All Other Mainframe Topics 0 Thu Jan 12, 2017 12:02 pm
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts SQL query to run through list of valu... Ni3-db2 DB2 14 Wed Dec 14, 2016 9:52 am


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