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
 
Edit macro inserting invalid characters

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
mmt_bit

New User


Joined: 15 Jan 2009
Posts: 14
Location: Bangalore

PostPosted: Thu Feb 12, 2009 11:19 am    Post subject: Edit macro inserting invalid characters
Reply with quote

Hi,

I have a utility that converts my production JCLs to test versions.

It calls edit macros which contain the change commands that are run on the production JCL.

After conversion, when I compare with the test with production version, I can find that many control charcaters are inserted as a result of conversion.

Could anyone let me know how this can be prevented.

Regards,
Rajiv
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Feb 12, 2009 11:37 am    Post subject:
Reply with quote

Hello and welcome to the forum,

It will help if you post the input jcl, the "bad" output jcl, and the code.

Please use copy/paste and the "Code" tag to post this info. Do not post screenshots.
Back to top
View user's profile Send private message
mmt_bit

New User


Joined: 15 Jan 2009
Posts: 14
Location: Bangalore

PostPosted: Thu Feb 12, 2009 12:02 pm    Post subject:
Reply with quote

Job card of Bad test JCL after conversion:

I - F &ý//DMMJCPR1 JOB x(SWP,,'ACROSS SYSTEMS - IPO',IS,0284,,), a // n'JCL MANAGEMENT 10.8', a// «MSGCLASS=V, a// gCLASS=3, a// iREGION=0M, a// iUSER=ISCU7

i/p Production JCL:

//DMLJCPR1 JOB (SWP,,'ACROSS SYSTEMS - IPO',IS,0284,,),
// 'JCL MANAGEMENT 10.8',
// MSGCLASS=S,
// CLASS=C,
// REGION=0M,
// USER=PDML01


The REXX invoked using TSO command copies JCL from Prod to Test Library and runs edit macro:

Code:
ADDRESS ISPEXEC                           
 "LMINIT DATAID(INDD) DATASET('"PRODLIB"')"
ADDRESS ISPEXEC                                           
"LMINIT DATAID(OUTDD) DATASET('"TESTLIB"')"               
ADDRESS ISPEXEC                                           
"LMCOPY FROMID("INDD") TODATAID("OUTDD") FROMMEM("MEMBER")
TOMEM("NEWMEM") REPLACE PACK"                             

PATH = TESTLIB || "(" || NEWMEM  || ")"

ADDRESS ISPEXEC "VPUT DEST"         
ADDRESS ISPEXEC                     
"EDIT DATASET('"PATH"') MACRO(CONVERT)" 



The macro 'CONVERT' has change commands to perform conversion like:


Code:
ADDRESS ISPEXEC "VGET DEST"
ADDRESS "ISREDIT"         
"MACRO"                   
"HI AUTO"                 
C ALL 'CLASS=C'     'CLASS=3'     
C ALL 'CLASS=E'     'CLASS=3'     
C ALL 'MSGCLASS=S'  'MSGCLASS=V'   
C ALL 'USER=PDML01' 'USER=ISCU7'   
Back to top
View user's profile Send private message
enrico-sorichetti

Senior Member


Joined: 14 Mar 2007
Posts: 10478
Location: italy

PostPosted: Thu Feb 12, 2009 12:12 pm    Post subject: Reply to: Rexx edit macro inserting invalid characters
Reply with quote

try taking away the pack from the lmcopy

even if edit and browse should not show any difference
pack affects processing only when outside of ispf
Back to top
View user's profile Send private message
mmt_bit

New User


Joined: 15 Jan 2009
Posts: 14
Location: Bangalore

PostPosted: Thu Feb 12, 2009 2:20 pm    Post subject:
Reply with quote

Thanks enrico. It worked
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Run time proc edit Niki JCL & VSAM 7 Fri Jun 08, 2018 5:42 pm
No new posts IBM Pcomm macro startmacro command do... JGregoire IBM Tools 0 Wed May 09, 2018 12:16 pm
No new posts LE Modules in Link Edit John Poulakos COBOL Programming 1 Sat Apr 28, 2018 12:14 am
No new posts INVALID RECFM FOR DDNAME SYSLIN AND C... sandeep kumar302 All Other Mainframe Topics 7 Fri Apr 27, 2018 6:07 pm
No new posts Invalid XML character while producing... nikhil.bhole IBM Tools 4 Tue Mar 20, 2018 1:24 am

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