Other way to make a new copy for CICS programs

Venkatreach · New User Joined: 29 Apr 2005 Posts: 2 Location: Chennai

Hi,

We have to set the new copy for CICS programs with the CEMT SET PRO(pgm name) NEW command.

Is there is any other way to set the new copy? Is yes pl let me know the details.

Thanks in advance.

Ram_k · New User Joined: 28 Apr 2005 Posts: 5 Location: Chennai

Hi,

I dont know why do you want an other way to set new copy..but if you got struck bcoz you are unable to put a newcopy (error encountered during newcopy) try to use CEMT S PROG(PROGNAME) PHASEIN ..

Hope this helps you..

Venkatreach · New User Joined: 29 Apr 2005 Posts: 2 Location: Chennai

Hi Thanks for the reply,

It was an interview Q from IBM.

I am not sure an other way is there or not. Will go thru the details of this command.

Ram_k · New User Joined: 28 Apr 2005 Posts: 5 Location: Chennai

The command which i mentioned above can be used as an other way to set newcopy if ur new copy fails

notonly4u · New User Joined: 26 Apr 2005 Posts: 87 Location: Hyderabad

I think in IBM some people will give CNTL new;prog progname

Please check with that. Iam not sure whether prog will come or not.

Amar

maverick05 · New User Joined: 14 Apr 2005 Posts: 54 Location: Earth

Hi Ram,

What is the use of the PHASEIN command apart from refreshing a program??My shop doesn't have this type of command.

Thanks
Venkat

subhi_dhanbad · Posted: Thu May 19, 2005 6:42 pm

Hi Ram,

add the following lines in ur compile job

//NEWCOPY EXEC PGM=AFCP2016,PARM='ATDCIG0L,CEMT,S PROG(pgmname) PH',
// COND=(8,LE)

## here PARM= The cics region where u want to do newcopy. It is installation dependent.

Thanks,
Subhi.

kanak · Moderator Joined: 12 Mar 2005 Posts: 252 Location: India

u can directly use cntl=new,prog=<prog-name>.This will take the new copy in cics. My shop alows me to take in this way and i prefer this way only.

vidyasaraswathi · New User Joined: 10 May 2005 Posts: 72

Ya, I agree with Kanak.
If the load module and the symbolic file dates are matching, then
CNTL=NEW,PROG=progname this command works. If they are not matching, the discrepancy message will be displayed on the screen. But the newcopy will be made.

Thanks and Regards,
Vidya Bhat

MGIndaco · Posted: Fri May 20, 2005 6:17 pm

What's "AFCP2016"?

subhi_dhanbad · Posted: Sat May 21, 2005 2:09 pm

Hi MGIndaco,

Not sure but it may be some system program for doing new copy.

Thanks,
Subhi

senthilkumar selvaraju · New User Joined: 30 May 2005 Posts: 16

hi,

i think following command is very simple for put newcopy

newc programname

dsbhati · New User Joined: 13 Jun 2005 Posts: 10 Location: india

Hi

I think we can initiate a transaction also using AFCP2016. But i would like to know the parametre it can take ??

To Initiate a tarnsaction

//JS040 EXEC PGM=AFCP2016,PARM='SYSIN',COND=(0,NE)
//STEPLIB DD DSN=ACSNS.CAFC.QCPTEST.LOADLIB,DISP=SHR
//CAFCTRAC DD SYSOUT=*
//CAFCWTOS DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN DD *
CICSQCPV,TRAN,O909
**************************** Bottom of Data *************

So can we triger two programe based on some condition???

UmeySan · Posted: Wed Nov 08, 2006 8:54 pm

Hi !

As Bitneuker answered already in an other question:

//STEP1 EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT2 DD SYSOUT=(*,INTRDR),DCB=I
//SYSUT1 DD DATA,DLM=$$
/*$VS,'F NTCIC0E,CEMT SET PROG(UTIL5610) NEW'

...with the MVS-Modify command !!!

Regards, UmeySan