Appendix E. PSP ONLINE PANEL FLOW AND DIALOG › E.4 Option 2 - Apply Product Changes › E.4.6 Apply Product Changes Menu › E.4.6.2 Edit APPLY Job for Production Libraries
E.4.6.2 Edit APPLY Job for Production Libraries
________________________________________________________________________________
EDIT - USER1.MICS.USER.TEMP1.CNTL ----------------------- Columns 001 072
Command ===> _ Scroll ===> PAGE
Enter END command to SUBMIT JOB TO APPLY CHANGES TO THE CA MICS LIBRARIES
Enter CANCEL command to EXIT WITHOUT APPLYING CHANGES
****** ***************************** TOP OF DATA ******************************
000001 //jobname JOB (ACCTCODE),'CA MICS PSP JOB',
000002 // NOTIFY=&sysuid,MSGCLASS=A
000003 //*
000004 //*
000005 //*
000006 //* APPLY PSP PRODUCT CHANGE - yy/mm/dd hh:mm
000007 //*
000008 //ACT4111 EXEC PGM=IEBUPDTE
000009 //SYSPRINT DD SYSOUT=*
000010 //SYSUT1 DD DSN=SHRPRF.MICS.SOURCE,DISP=OLD
000011 //SYSUT2 DD DSN=SHRPRF.MICS.SOURCE,DISP=OLD
000012 //SYSIN DD DATA,DLM='++'
000013 ./ CHANGE NAME=GNACTRAT
000014 /* ACT4111| 2073 |1185|WRONG USE OF APU FIELD */
000015 ACCTMETH = 'R';
000016 ++
000017 //AUDIT EXEC PGM=MAAUDIT,REGION=64K,COND=(4,LT),PARM=(ACT4111)
000018 //STEPLIB DD DISP=SHR,DSN=SHRPFX.MICS.LOAD
000019 //SYSUT1 DD DISP=OLD,DSN=SHRPFX.MICS.PSP.CNTL
_______________________________________________________________________________
Edit panel (PSPOEDIT)
Processing Notes:
1) The generated job stream contains the product change code for each
selected product change. A job card, defined by the PSP Options -
Batch Job Definitions process, is added and all pseudo CA MICS data
set name references are replaced with the true library name.
2) When the EDIT session is ENDed, PSP Online submits the job stream
and records the selected product changes as APPLYING. They are
marked with an A on the Select Product Change panels until the
APPLY job completes.
3) An additional step is added behind each product change for program
MAAUDIT. This step will create an empty member with ISPF
standard directory status information (i.e., DATE, TIME, USERID) in
sharedprefix.MICS.PSP.CNTL if the change ends with a valid return
code. PSP Online looks for this special member to record the date
and time that a change was applied and then deletes the member.