Pathway/iTS SCUP Reference Manual

Using SCUP
HP NonStop Pathway/iTS SCUP Reference Manual520269-002
3-2
The DELETE command deletes all versions except the latest version of program
FUNC-PROG in object file $MKT.OLDSV.SCOB.
?delete $mkt.oldsv.scob (func-prog(+))
$MKT.OLDSV.SCOB
DELETED FUNC-PROG (1)
DELETED FUNC-PROG (2)
The ALTER command sets to OFF the access to version 2 of program TEST-
PROG in object file $DATA.OLDSV.POBJ. The OFF setting makes the version
unavailable to the TCP for execution in the PATHWAY system.
?alter (test-prog(2)), access off
$DATA.OLDSV.POBJ
ACCESS OFF
TEST-PROG (2)
The COPY command copies the latest version of program MAIN-PROG and all
versions of program TEST-PROG in object file $DATA.OLDSV.POBJ to object file
$DATA.NEWSV.POBJ. The copy creates the destination file because the
destination file did not exist. The copy updates the program version numbers to
show the latest versions created in the destination object file.
?copy (main-prog, test-prog(*)), newsv.pobj
$DATA.OLDSV.POBJ COPY TO $DATA.NEWSV.POBJ
EXTENTS: DIR(00016,00032) COD(00032,00064) SYM(00032,000128)
MAIN-PROG (1) MAIN-PROG (1)
TEST-PROG (1) TEST-PROG (1)
TEST-PROG (2) TEST-PROG (2)
TEST-PROG (3) TEST-PROG (3)
The FILE command sets the default object file name to $MKT.OLDSV.SCOB,
making the files SCOBCOD and SCOBDIR the default SCREEN COBOL object
files.
?file $mkt.oldsv.scob
FILE IS $MKT.OLDSV.SCOB
The COPY command copies the latest version of program FUNC-PROG in object
file $MKT.OLDSV.SCOB to object file $DATA.NEWSV.POBJ. The copy updates
the program version number to show the latest version created in the destination
object file.
?copy (func-prog), $data.newsv.pobj
$MKT.OLDSV.SCOB COPY TO $DATA.NEWSV.POBJ
EXTENTS: DIR(00016,00032) COD(00032,00064) SYM(00032,000128)
FUNC-PROG (4) FUNC-PROG (1)
The COMPRESS command compresses object file $MKT.OLDSV.SCOB to reclaim
the disk space used by deleted programs in the object file. The operation also
renumbers the program versions so that each of the earliest versions is version 1.
?compress $mkt.oldsv.scob
COMPRESS $MKT.OLDSV.SCOB
EXTENTS: DIR(00016,00032) COD(00032,00064) SYM(00032,000128)