Previous Topic: E.4.6.1 Unknown Data Set Name

Next Topic: E.4.6.3 Sample Select Product Changes Panel for APPLY

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.