Replicating the BASE24™ Classic “CAF Full Refresh” Procedure in a Business Continuity Environment Using HPE Shadowbase Software and AutoTMF
The following procedure assumes that you already have a valid AutoTMF and HPE Shadowbase product environment in place and will outline the ATMFFILESET syntax and Shadowbase DBS syntax to replicate a BASE24 Classic Full Refresh for a CAF (or PBF) file.
AutoTMF Preparation (if not already installed)
Install the newest version of AutoTMF to the NonStop system. (You need at least SPR ^ABH of AutoTMF.) Once AutoTMF has been installed, issue a run command to enter the AutoTMF prompt.
$QA DJBCAF 361> RUN $SAS3.AUTOTMF.AUTOTMF
HPE Nonstop(tm) AutoTMF(tm) Command Interpreter(T0581L01) - System \VIV1
(C)2017 Hewlett Packard Enterprise Development Company, L.P.
(C)1996-2017 Carr Scott Software Incorporated
AutoTMF 1?
AutoTMF 1? prepare $qa.sbtools.uniud;
AutoTMF 2?
AutoTMF 7? ADD ATMFFILESET $QA.DJBDATA.CAF, GENERATIONS 3;
AutoTMF 8? ADD ATMFFILESET $QA.DJBDATA.CAF0*, REPLICATERENAME;;
$QA DJBDATA 113> fi *caf*
$QA.DJBDATA
CODE EOF LAST MODIFIED OWNER RWEP PExt SExt
CAF 0 0 11APR2018 9:33 255,5 NCNC 1000 1000
CAFTST 0 0 04APR2018 13:13 255,5 NCNC 1000 1000
$QA DJBDATA 114>
$QA DJBDATA 42> fi caftst
$QA.DJBDATA
CODE EOF LAST MODIFIED OWNER RWEP PExt SExt
CAFTST 0 0 03APR2018 16:49 255,5 NCNC 1000 1000
$QA DJBDATA 43>
SB_ADD DBS CAFDBS \VIV1.$QA.DJBDATA.CAF0* $AJBC2 \GRAVIC1.$QA.DJBDATA.CAF0* - -
AUDCOM - T1122 - V6410L06 - (31MAR18), COPYRIGHT GRAVIC, INC.
1995-2018. PORTIONS COPYRIGHTED BY AND LICENSED FROM THIRD PARTIES. SEE
README FILE. USAGE SUBJECT TO THE TERMS OF A WRITTEN LICENSE AGREEMENT.
PATENTS: SEE WWW.GRAVIC.COM/GRAVICLABS/PATENTS/PRODUCTS.
SHADOWBASE - T1122 - V6410L06 - (31MAR18)
AUD STATUS AT 2018-04-11:09:34:35 :
AUDMON \VIV1.$AJBMN - STATE = RUNNING
CPUS 0:1
OWNER 255,5
CONTROL OPENED \VIV1.$QA.QAUNDR.SRMNCCC [ERROR = 0]
LOG CLOSED
EMS OPENED $0 [ERROR = 0]
TRACE CLOSED
HISTORY ON \VIV1.$QA.QAUNDR.AUDHST [SQLCODE = 0]
COLLECTOR/QMGR/CONSUMER/SOLVMGR STATES:
NAME PROCESS TYPE STATE STATE CHANGE TIME
---------------- ---------------- ---- --------- -------------------
COLL-AJBCL \VIV1.$AJBCL COLL RUNNING 2018-04-11:09:34:35
LTS (LAST EVENT): 2018-04-11:09:34:35
QMGR-TGT-AJBQ1 \GRAVIC1.$AJBQ1 QMGR RUNNING 2018-04-11:09:34:35
CONS-DIR-AJBCN \GRAVIC1.$AJBCN CONS STARTED 2018-04-11:09:34:22
LTS (LAST EVENT): NONE RECEIVED
$QA DJBDATA 63>
$QA DJBDATA 113> FUPDB RENAME CAF,OLDCAF
$QA DJBDATA 114> fi *caf*
$QA DJBDATA 114..
$QA.DJBDATA
CODE EOF LAST MODIFIED OWNER RWEP PExt SExt
CAFTST 0 0 04APR2018 13:13 255,5 NCNC 1000 1000
OLDCAF 0 0 11APR2018 9:33 255,5 NCNC 1000 1000
$QA DJBDATA 115>
$QA DJBDATA 116> FUPDB DUP CAFTST, NEWCAF
$QA DJBDATA 117> fi *caf*
CODE EOF LAST MODIFIED OWNER RWEP PExt SExt
CAFTST 0 0 04APR2018 13:13 255,5 NCNC 1000 1000
NEWCAF 0 0 11APR2018 9:37 255,5 NCNC 1000 1000
OLDCAF 0 0 11APR2018 9:33 255,5 NCNC 1000 1000
$QA DJBDATA 116>
$QA DJBDATA 118> FUPDB RENAME NEWCAF, CAF
$QA DJBDATA 119> fi *caf*
CODE EOF LAST MODIFIED OWNER RWEP PExt SExt
CAF001 0A 0 11APR2018 9:38 255,5 NCNC 1000 1000
CAFTST 0 0 04APR2018 13:13 255,5 NCNC 1000 1000
OLDCAF 0 0 11APR2018 9:33 255,5 NCNC 1000 1000
$QA DJBDATA 120>
$QA DJBDATA 121> $QA.SBTOOLS.UNIUD I CAF 1 1 3
Note: The prepared data generator (UNIUD) performs I/O against CAF, yet AutoTMF manages the CAF generation files (CAF001, CAF002…) by applying these changes to the appropriate generation.
$QA DJBDATA 122> fi *caf*
CODE EOF LAST MODIFIED OWNER RWEP PExt SExt
CAF001 0A 20480 11APR2018 9:41 255,5 NCNC 1000 1000
CAFTST 0 0 04APR2018 13:13 255,5 NCNC 1000 1000
$QA DJBDATA 123>
$QA DJBDATA 123> FUPDB DUP CAFTST, NEWCAF
$QA DJBDATA 124> fi *caf*
CODE EOF LAST MODIFIED OWNER RWEP PExt SExt
CAF001 0A 20480 11APR2018 9:41 255,5 NCNC 1000 1000
CAFTST 0 0 04APR2018 13:13 255,5 NCNC 1000 1000
NEWCAF 0 0 11APR2018 9:43 255,5 NCNC 1000 1000
OLDCAF 0 0 11APR2018 9:33 255,5 NCNC 1000 1000
$QA DJBDATA 125>
$QA DJBDATA 126> FUPDB RENAME NEWCAF, CAF
$QA DJBDATA 120> fi *caf*
$QA.DJBDATA
CODE EOF LAST MODIFIED OWNER RWEP PExt SExt
CAF001 0A 20480 11APR2018 9:41 255,5 NCNC 1000 1000
CAF002 0A 0 11APR2018 9:44 255,5 NCNC 1000 1000
CAFTST 0 0 04APR2018 13:13 255,5 NCNC 1000 1000
OLDCAF 0 0 11APR2018 9:33 255,5 NCNC 1000 1000
$QA DJBDATA 121>
As always, if you foresee needing to exercise this activity in the near future, and you have a question, or any other question related to Shadowbase Support, then feel free to contact us.
Please reference our Newsletter Disclaimer.