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 | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | POST+6, REVERT+5 |
| $$S^%ZTLOAD | REQ2STOP+7, REQ2STOP+10 |
| $$FIND1^DIC | SEARCH+25 |
| EN^DIQ1 | SEARCH+20 |
| $$FMADD^XLFDT | POST+3, SEARCH+47, REVERT+2 |
| $$FMTE^XLFDT | SEARCH+31, RVRTJOB+27 |
| $$NOW^XLFDT | POST+3, REVERT+2 |
| BMES^XPDUTL | POST+2, POST+8, POST+10, CNVRT+5, CNVRT+6, RVRTJOB+34, RVRTJOB+37, RVRTJOB+38 |
| MES^XPDUTL | CNVRT+7, CNVRT+9, SEARCH+5, SEARCH+6, SEARCH+30, SEARCH+31, SEARCH+32, SEARCH+33, SEARCH+34, SEARCH+40 , SEARCH+41, RVRTJOB+2, RVRTJOB+3, RVRTJOB+6, RVRTJOB+7, RVRTJOB+26, RVRTJOB+27, RVRTJOB+28, RVRTJOB+29, RVRTJOB+30 , RVRTJOB+32, RVRTJOB+35 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | Classic Fileman Calls, FIND1^DIC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(4 - [#4] | SEARCH+32, SEARCH+33, RVRTJOB+28, RVRTJOB+29 |
| ^TIUP(8928 - [#8928] | SEARCH+12, SEARCH+14, SEARCH+16, SEARCH+27*, SEARCH+31, RVRTJOB+17, RVRTJOB+18, RVRTJOB+19, RVRTJOB+23*, RVRTJOB+27 |
| ^XTMP("TIUP336 - Post-Init" | SEARCH+47*, SEARCH+51*, RVRTJOB+9, RVRTJOB+10, RVRTJOB+12, RVRTJOB+13, RVRTJOB+36! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %H | SEARCH+43~ |
| CNT | SEARCH+1~, SEARCH+2*, SEARCH+28, SEARCH+35*, SEARCH+40, SEARCH+47, RVRTJOB+1~, RVRTJOB+8*, RVRTJOB+24*, RVRTJOB+32 , RVRTJOB+35 |
| CNT1 | SEARCH+1~, SEARCH+7*, SEARCH+15*, SEARCH+38, RVRTJOB+1~, RVRTJOB+8*, RVRTJOB+31 |
| DA | SEARCH+1~, SEARCH+19*, SEARCH+21 |
| DIC | SEARCH+1~, SEARCH+8* |
| DIQ | SEARCH+1~, SEARCH+10* |
| DIQ(0 | SEARCH+11* |
| DIV | SEARCH+1~, SEARCH+7*, SEARCH+16*, SEARCH+17, SEARCH+19, SEARCH+24, SEARCH+25, SEARCH+32, SEARCH+36, SEARCH+37 , SEARCH+42, SEARCH+48*, SEARCH+49*, SEARCH+50, SEARCH+51, RVRTJOB+1~, RVRTJOB+11*, RVRTJOB+12*, RVRTJOB+13, RVRTJOB+15 , RVRTJOB+21*, RVRTJOB+22, RVRTJOB+23, RVRTJOB+29 |
| DIV1 | SEARCH+1~, SEARCH+25*, SEARCH+26, SEARCH+27, SEARCH+33, SEARCH+37, SEARCH+50*, SEARCH+51, RVRTJOB+1~, RVRTJOB+13* , RVRTJOB+14, RVRTJOB+15, RVRTJOB+19*, RVRTJOB+20, RVRTJOB+21, RVRTJOB+28 |
| DR | SEARCH+1~, SEARCH+9* |
| DT | SEARCH+47 |
| PREVCNT | RVRTJOB+1~, RVRTJOB+10*, RVRTJOB+34 |
| RSLT | SEARCH+1~, SEARCH+18! |
| RSLT(4 | SEARCH+21 |
| STATUS | REQ2STOP+4~, REQ2STOP+5*, REQ2STOP+9*, REQ2STOP+12 |
| STN | SEARCH+1~, SEARCH+21*, SEARCH+22, SEARCH+23, SEARCH+24 |
| STOP | SEARCH+1~, SEARCH+7*, SEARCH+14, SEARCH+38*, RVRTJOB+1~, RVRTJOB+8*, RVRTJOB+18, RVRTJOB+31*, RVRTJOB+36, RVRTJOB+37 , RVRTJOB+38 |
| TIUIEN | SEARCH+1~, SEARCH+12*, SEARCH+13, SEARCH+14*, SEARCH+16, SEARCH+27, SEARCH+28, SEARCH+30, SEARCH+31, RVRTJOB+1~ , RVRTJOB+9*, RVRTJOB+17*, RVRTJOB+18*, RVRTJOB+19, RVRTJOB+23, RVRTJOB+26, RVRTJOB+27 |
| TMP | SEARCH+1~, SEARCH+28*, SEARCH+47, RVRTJOB+1~, RVRTJOB+16 |
| TMP( | SEARCH+36, SEARCH+37*, SEARCH+42, SEARCH+49, SEARCH+50, RVRTJOB+15*, RVRTJOB+20, RVRTJOB+21 |
| TST | CNVRT~, CNVRT+3*, CNVRT+4*, CNVRT+5, CNVRT+8, SEARCH~, SEARCH+3*, SEARCH+4, SEARCH+27, SEARCH+29 , SEARCH+39, RVRTJOB~, RVRTJOB+4*, RVRTJOB+5, RVRTJOB+23, RVRTJOB+25, RVRTJOB+33, RVRTJOB+36 |
| U | SEARCH+12, SEARCH+16, SEARCH+27, SEARCH+31, SEARCH+32, SEARCH+33, SEARCH+47, RVRTJOB+10, RVRTJOB+17, RVRTJOB+19 , RVRTJOB+23, RVRTJOB+27, RVRTJOB+28, RVRTJOB+29 |
| X | SEARCH+43~, REQ2STOP+4~, REQ2STOP+7*, REQ2STOP+8, REQ2STOP+10* |
| X1 | SEARCH+43~ |
| X2 | SEARCH+43~ |
| ZTDESC | POST+1~, POST+4*, REVERT+1~, REVERT+3* |
| ZTDTH | POST+1~, POST+3*, REVERT+1~, REVERT+2* |
| ZTIO | POST+1~, POST+5*, REVERT+1~, REVERT+4* |
| >> ZTQUEUED | REQ2STOP+6 |
| ZTRTN | POST+1~, POST+4*, REVERT+1~, REVERT+3* |
| ZTSK | POST+1~, POST+7, POST+10, REVERT+1~, REVERT+6, REVERT+9 |