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

Batch CICS/DB2 Program Parameters


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Roy Ware

New User


Joined: 19 Sep 2013
Posts: 14
Location: USA

PostPosted: Wed Jun 03, 2015 10:33 pm
Reply with quote

I got assigned the job of creating a program that reads a CICS queue (MQ series) and writes the messages to DB2.

The program has to be flexible to access the proper queue for each environment. The problem is, the parms aren't passing. Here's what I've tried:

Code:
 DSN SYSTEM(DSNT)                     
 RUN PROGRAM(BOM00150) PLAN(BOMDBAT) -
 PARMS('ABCDEFGHIJKLMNOPQRSTUVWXYZ') 
END                                   


and
Code:
//BOM00150 EXEC PGM=IKJEFT1B,PARM=('ABCDEFGHIJKLMNOPQRSTUVWXYZ')


Neither work. I've accomplished this before with just a DB2 program, but working with the queue has set me back considerably.

What I get for both attempts is hex zeroes (low values).
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7311
Location: Inside the Matrix

PostPosted: Wed Jun 03, 2015 10:44 pm
Reply with quote

With the first, unless told otherwise, Language Environment is eating your parameter.

With the second, TSO-in-batch is eating your parameter.

You need to use the first and have a "/" preceding your parameter, or to tell LE that its parameters are second (after the "/").
Back to top
View user's profile Send private message
Roy Ware

New User


Joined: 19 Sep 2013
Posts: 14
Location: USA

PostPosted: Fri Jun 12, 2015 5:44 pm
Reply with quote

That did the trick, Bill. Thanks!
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 -> CICS

 


Similar Topics
Topic Forum Replies
No new posts File-aid batch how to repeat a line... Compuware & Other Tools 2
This topic is locked: you cannot edit posts or make replies. Passing a field name to COBOL program COBOL Programming 10
No new posts How to get RBA value from CICS EVENT CICS 5
This topic is locked: you cannot edit posts or make replies. Sample CICS Webservices Program CICS 1
No new posts How to pass arguments in a ISPSTART c... CLIST & REXX 6
Search our Forums:

Back to Top