Is there an example of how to refresh the LLA in an Endevor Shipment scenario?
Release : All supported versions of Endevor
Use the Endevor package skeleton - C1SB3000, to kick off a job to the reader.
Security access to run the command is usually the most difficult part.
Here's a sample REXX. It assumes there is a CSVLLAxx member in SYS1.PARMLIB listing the specific loadlibs to be refreshed.
The 'xx' / last 2-characters of the CSVLLAxx member replace the 'UPDATE=xx' example below.
/* Rexx --------------------------------------------------------- */
/* DESCRIPTION: Issues LLA Update using SYS1.PARMLIB(CSVLLAxx) */
/* -------------------------------------------------------------- */
ADDRESS 'TSO' /* TSO ENVIRONMENT */
X = OUTTRAP('VAR.')
"OPSCMD C(F LLA,UPDATE=xx) OUT WAIT(60)"
X = OUTTRAP('OFF')
CODE = 999
DO I = 1 TO VAR.0
SAY VAR.I
IF POS('CSV210I',VAR.I) > 0,
& POS('UPDATED',VAR.I) > 0 THEN CODE = 0
END
EXIT CODE