GBLOCKCOPY Batch Configuration - Where is it stored?
I need to copy a bunch of globals from some crufty old databases to spanking clean brand new ones. GBLOCKCOPY has this cool feature that lets you create a batch of global names to copy and save the list in a batch. You can then execute the batch and go take a nap.
I like naps.
I need to do this for a number of old-new database pairs, but it's the same global names every time. Is there a way to export the batch configuration created the first time and import it to another environment/namespace? These databases will be spread across multiple hosts.
Thanks!
the popular use of is INTERACTIVE.
But there is a BATCH option:
SAMPLES>zn "%SYS" %SYS>d BATCH^GBLOCKCOPY 1) Manage Batches 2) Run a Batch 3) Restart a Batch 4) Add Processes to a running Batch 5) Stop a Running batch 6) Monitor Running Batch 7) Batch Report 8) Exit Option? 1 1) Create a Batch 2) Edit a Batch 3) List Batches 4) Delete a Batch 5) Exit Option?I never used it myself.
it seems to me you should find it in ^%SYS("GBLOCKCOPY")
But the source code is open in %SYS and easy to read:
w !
w !,"1) Manage Batches"
w !,"2) Run a Batch"
w !,"3) Restart a Batch"
w !,"4) Add Processes to a running Batch"
w !,"5) Stop a Running batch"
w !,"6) Monitor Running Batch"
w !,"7) Batch Report"
w !,"8) Exit"
w !
s Option=$$OPTION("Option? ",8,8)
i Option=1 d BATCHMANAGE g BATCH
i Option=2 d BATCHRUN g BATCH
i Option=3 d BATCHRESTART g BATCH
i Option=4 d BATCHADDPROCESSES g BATCH
i Option=5 d BATCHSTOP g BATCH
i Option=6 d BATCHMONITOR g BATCH
i Option=7 d BATCHREPORT g BATCH
q
BATCHMANAGE
w !
w !,"1) Create a Batch"
w !,"2) Edit a Batch"
w !,"3) List Batches"
w !,"4) Delete a Batch"
w !,"5) Exit"
w !
s Option=$$OPTION("Option? ",5,5)
i Option=1 d BATCHCREATE g BATCHMANAGE
i Option=2 d BATCHEDIT g BATCHMANAGE
i Option=3 d BATCHLIST g BATCHMANAGE
i Option=4 d BATCHDELETE g BATCHMANAGE
q
BATCHCREATE s $zt="BATCHE"
s Name=$$GETNAME("Batch name to create? ",0,0) q:POP
f w !!,"Adding to batch: "_Name d BATCHSETUP q:POP
g BATCHCREATE
BATCHEDIT s $zt="BATCHE"
s Name=$$GETNAME("Batch name to edit? ",1,0) q:POP
s Status=$$GETSTATUS(Name,1)
i $p(Status,"~",4)'="Queue" w !,"Batch "_Name_" has been run, please re-enter" g BATCHEDIT
i $$YN("Do you want to add to the batch","Y")="Y" f w !!,"Adding to batch: "_Name d BATCHSETUP q:POP
i $$YN("Do you want to delete entries from batch "_Name,"N")="N" g BATCHEDIT
BATCHEDIT1
d SUMMARYREPORT(Name,0)
s Option=$$OPTION("Delete which entry? ",0,+$o(^|"^^"_$zu(12)|%SYS("GBLOCKCOPY",Name,""),-1))
i Option=0 g BATCHEDIT
HTH,
Absolutely correct ... thanks Robert!