TIUP336 ;SLC/TDP - Copy/Paste Clean-up of Division ;Jul 29, 2020@10:24:36
Source file <TIUP336.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PRE | ;pre-init
|
|
POST | ;post-init
|
|
CNVRT(TST) | ;Convert Station Numbers stored as Institution IEN pointers
; If TST = 1, then print data for conversion but don't actually convert ; If TST = 2, |
|
SRCH | ;Entry point for Post-Init
|
|
SEARCH(TST) | ;Search for Copy/Paste data stored with wrong division
|
|
REVERT | ;Task off the Reversion process
|
|
RVRTJB | ;Reversion Tasked Job entry
|
|
RVRTJOB(TST) | ;Revert changed data back to original value
|
|
REQ2STOP() | ;
; Check for task stop request ; Returns 1 if stop request made. ; If process was queued/tasked, then ZTQUEUED variable exists |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | Classic Fileman Calls, FIND1^DIC |