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
 

 

Wrapper Application

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
parsesource

New User


Joined: 06 Feb 2006
Posts: 97

PostPosted: Sun Sep 11, 2011 12:38 am    Post subject: Wrapper Application
Reply with quote

Is there a way to achieve the following

Instead of executing a program the usual way with JCL

a) EXEC PGM=XYZ,PARM=parmstring

execute it in a 100% transparent way using a wrapper

b) EXEC PGM=WRAPPER,PARM=parmstring

WRAPPER gives control to XYZ in some way.
100% transparent means the STEP return code or Abend code of a) and b) should be equal (except WRAPPER fails)
XYZ may be anything (IDCAMS, IEBCOPY, otherpgm, APF or no APF ...)

I think if WRAPPER is written in a HLL like PLI at least some parts must be asm to XCTL to XYZ.

What i try to achieve: WRAPPER should e.g. create/ change a control card etc. before calling XYZ
Usually it´s possible to do this in a two step process using rexx, but i prefer a single step solution.

Are such apps available somewhere (cbttape? - difficult to search there...)

thanks
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7236

PostPosted: Sun Sep 11, 2011 2:45 am    Post subject:
Reply with quote

How is your "wrapper" to know what program to invoke?

Write a little program in whatever lanaguage you feel happy with.

Takes the parm (in whatever way for that language). Messes about with it.
"Calls" the program you want to invoke passing on the new parm. Then return (in whatever way) to the operating system when you regain control.

I've done it with application programs. I'm not aware that it would not work with any program you wish to invoke. I don't think the operating system does anything different with PGM=utility-of-some-type and PGM=application-program.

I'd suggest you go ahead and try it, and let us know the results.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10203
Location: italy

PostPosted: Sun Sep 11, 2011 4:20 am    Post subject: Reply to: Wrapper Application
Reply with quote

Quote:
difficult to search there...

why ?
cbtf1 has a very good description of the tape content !
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: Sun Sep 11, 2011 9:21 am    Post subject:
Reply with quote

Hello,

Quote:
I think if WRAPPER is written in a HLL like PLI at least some parts must be asm to XCTL to XYZ.
There is no reason to use pl/i or asm. Unless i misunderstand what you want, you can do what you want with COBOL. . .

Your experience with CALL must be rather limited. . .
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1715
Location: UK

PostPosted: Sun Sep 11, 2011 9:53 am    Post subject:
Reply with quote

We used to run 90% of our programs under one of 2 'wrappers'. These 'wrappers' maintained control records to allow automatic restart via a retrun code from a prolog step, automatic deletion of datasets and maintenance of control totals. Also allowed a bit of dependency checking. They may have been written in PL/1 as that was the language of choice at the company.
Back to top
View user's profile Send private message
parsesource

New User


Joined: 06 Feb 2006
Posts: 97

PostPosted: Sun Sep 11, 2011 3:14 pm    Post subject:
Reply with quote

Bill Woodger wrote:
How is your "wrapper" to know what program to invoke?

I'd suggest you go ahead and try it, and let us know the results.


Either the program to invoke is hardcoded somewhere or are the first eight char of PARM or sg. equivalent.
i´ve already written such an app, but with rexx within tso-batch environment. it works, but it´s not transparent and entries in IKJTSOxx are neccessary etc.

basically the wrapper app should circumvent the 100 char parm limit in jcl and allow use system symbols in instream-data. one of my approach is to use (misuse) the PATH Statement for this. i have made no tests so far.
Back to top
View user's profile Send private message
parsesource

New User


Joined: 06 Feb 2006
Posts: 97

PostPosted: Sun Sep 11, 2011 3:15 pm    Post subject:
Reply with quote

dick scherrer wrote:
Hello,

Quote:
I think if WRAPPER is written in a HLL like PLI at least some parts must be asm to XCTL to XYZ.
There is no reason to use pl/i or asm. Unless i misunderstand what you want, you can do what you want with COBOL. . .

Your experience with CALL must be rather limited. . .


experience in cobol is rather limited. only little cobol here in europe :-)
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Sun Sep 11, 2011 5:19 pm    Post subject:
Reply with quote

I think DFSRRC00 is a nice example of a "wrapper".
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7236

PostPosted: Sun Sep 11, 2011 5:52 pm    Post subject:
Reply with quote

Define "it works" please.

If any utility accepts more than 100 characters of parm:

  1. I'd be surprised
  2. Don't count on it working with any sort of update to the utility

If your wrapper allows more than 100 character of a parm to be passed to an application program that uses the data, then the program can not be run without the wrapper. I'd hardly call that "transparent" - with the wrapper it works, without the wrapper it doesn't.

You want to parameterise instream data inside the step that is using the instream data? How do you think you are going to go about that?

What is the purpose of all this?
Back to top
View user's profile Send private message
parsesource

New User


Joined: 06 Feb 2006
Posts: 97

PostPosted: Mon Sep 12, 2011 3:46 am    Post subject:
Reply with quote

My description was not precise enough.

example
A rexx skript or Tso Command can be executed in batch either with PARM=.. or in DD SYSTSIN.
PARM is limited to 100char, jcl-symbol-use is possible.

In SYSTSIN there is no length-limit. But JCL Symbols cannot be used there.
Eg. using the xmitip mail package parm-length in systsin can be much longer than 100char.

So there is no single step Solution to provide more than about 90 char to a rexx app from jcl symbols.

The rexx app I have some sort of file-tailoring before calling the pgm. it does not extend the char limit yet.

in a non-tso batch environment the problems are similar.

So the wrapper should allow to transfer >100chars from jcl-symbols to the application. Usually within a control-card.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10203
Location: italy

PostPosted: Mon Sep 12, 2011 4:03 am    Post subject: Reply to: Wrapper Application
Reply with quote

if the issue is so stringent evaluate the installation and use of the CCSS
Control card subsystem CBT file 364 ( at al. )

easy to install, very easy to use , provides parametrization of the program input
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 -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Clone Application ID in TWS Smita.t2 IBM Tools 9 Fri Oct 30, 2015 2:25 pm
No new posts WebSphere Application Server for z/OS yogesh suryawanshi All Other Mainframe Topics 3 Fri Mar 27, 2015 9:37 pm
No new posts How to trigger a Application(AD- bunc... DEEPAK GARG COBOL Programming 1 Wed Feb 11, 2015 2:43 pm
No new posts Different methods to hit CICS applica... Midhun Mohandas CICS 1 Mon Jan 12, 2015 9:35 am
This topic is locked: you cannot edit posts or make replies. Application Developer - mainframes - hemant_borse2003 Mainframe Jobs 0 Fri Jul 04, 2014 5:15 pm


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