From memory: I think that type was used as a "script" to be
"played interactively" . . . never used by me so that is all I know.
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
Sent: Wednesday, April 30, 2014 8:57 AM
To: Midrange Systems Technical Discussion
Subject: Re: CLP or CL - script for hypers
Wasn't there a weird member type of CL? Not CLP, or CLLE, but just CL?
And how was that used?
IBM Certified System Administrator - IBM i 6.1 Group Dekko Dept 1600 Mail to: 2505 Dekko Drive
Garrett, IN 46738
Ship to: Dock 108
Kendallville, IN 46755
From: "Steinmetz, Paul" <PSteinmetz@xxxxxxxxxx>
To: "'Midrange Systems Technical Discussion'"
Date: 04/30/2014 10:35 AM
Subject: CLP or CL - script for hypers
Sent by: "MIDRANGE-L" <midrange-l-bounces@xxxxxxxxxxxx>
I need to apply a large amount of hypers to a 3rd party application.
The fixes are sent to us via word doc.
These will applied on test system, multiple times.
We delete/restore the entire test system, (when data gets old), reapply
the upgrades, then apply the hypers.
Normally, this list is small, and I copy/paste, run the commands one at a
However, this set of fixes is quite large, below is a small sample of the
The IC8270PGMS library name in the example below will need to change.
I was thinking of either a CLP, or maybe a CL , (no need to compile), or
AJS job, or possibly some other method.
Pros/Cons of different methods,
1) need to see a good job log,
2) probably should stop if an error occurs, take
3) Possible restart capabilities
Any thoughts from the group.
d. Install Interface Type Parm Dsc, Interface Type Parm A
and Interface Type Parm V chnages
i. RUNSQL REQUEST('DELETE FROM IC8270PGMS/CBF4REP where
F4IFTY = ''GENPRV'' AND F4SSFB = ''V'' AND F4NRD1= 42')
ii. QSYS/CPYF FROMFILE(IC8270B02S/CBF4REP)
TOFILE(IC8270PGMS/CBF4REP) MBROPT(*ADD) FMTOPT(*MAP *DROP)
iii. QSYS/CPYF FROMFILE(IC8270B02S/CMQHREP)
TOFILE(IC8270PGMS/CMQHREP) MBROPT(*ADD) FMTOPT(*MAP *DROP)
iv. RUNSQL REQUEST('DELETE FROM IC8270PGMS/CMQIREP where
QIIFTY = ''GENPRV'' AND QINRD1 = 42')
v. QSYS/CPYF FROMFILE(IC8270B02S/CMQIREP)
TOFILE(IC8270PGMS/CMQIREP) MBROPT(*ADD) FMTOPT(*MAP *DROP)
IBM i Systems Administrator
Pencor Services, Inc.
462 Delaware Ave
Palmerton Pa 18071