EC2P5PST ;ALB/GTS - PATCH EC*2.0*5 Post-Init Rtn ; 8/13/97
Source file <EC2P5PST.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TEXT | ; Install desc.
|
|
| MSGINTR | ; Mail message intro
|
|
| POST | ; Set Checkpoint
|
|
| ENTPOST | ; Entry point
|
|
| ENTCNV | ; Convert DSS Unit, Associated DSS ID
|
|
| START | ; Start proc
|
|
| KVARS | ||
| NOPCE | ; Process Units NOT sent to PCE
|
|
| SENDPCE | ; Process units sent to PCE
|
|
| CONVRT | ; Convert DSS ID to pointer
; Required variables (defined) ; ECIDVAR - Result of SCCHK ; ECDUDA - IEN of DSS Unit processing ; DSSIDSTF - Must be NEW'ed prior to calling |
|
| NULLID | ; Nullify BAD DSS IDs
; Required variables (defined) ; ECDUDA - IEN of DSS Unit processing |
|
| SCCHK(ECDSSID) | ; Check 40.7 for DSS ID
; Input: ; ECDSSID - The DSS ID to check |
|
| DUPCHK(ECID,ECIDD1) | ; Look for 2nd Stop Code entry
; Input: ; ECID - The DSS ID to check ; ECIDD1 - The IEN for the 1st entry found |
|
| ; Send message
|
||
| LINE(TEXT) |
| Name | Field # of Occurrence |
|---|---|
| DD^%DT | NOPCE+21, NOPCE+32 |
| $$GET1^DID | ENTPOST+5, ENTPOST+11, ENTPOST+14, ENTPOST+21 |
| ^DIE | CONVRT+8, NULLID+5 |
| PRD^DILFD | START+21 |
| RNDEX^EC2P5P1 | ENTPOST+11 |
| CRESPEC^EC725P | ENTPOST+2 |
| ^XMD | MAIL+5 |
| $$NEWCP^XPDUTL | POST+2 |
| $$PARCP^XPDUTL | START+13 |
| $$UPCP^XPDUTL | CONVRT+10, NULLID+7 |
| MES^XPDUTL | ENTPOST+6, ENTPOST+7, ENTPOST+8, ENTPOST+15, ENTPOST+16, ENTPOST+17, ENTPOST+18, ENTCNV+2, ENTCNV+5, START+3 , START+4 |
| FileNo | Call Tags |
|---|---|
| ^ECH - [#721] | GET1^DID |
| ^ECD - [#724] | Classic Fileman Calls, GET1^DID, PRD^DILFD |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(40.7 - [#40.7] | NOPCE+34, SCCHK+16, SCCHK+17, SCCHK+19, SCCHK+20, SCCHK+27, DUPCHK+14, DUPCHK+15, DUPCHK+17 |
| ^ECD - [#724] | START+14, START+15, START+16 |
| ^TMP("EC V2.0 P5 INSTALL MSG" | MAIL+7!, LINE+1* |
| Name | Line Occurrences |
|---|---|
| $$DUPCHK | SCCHK+21 |
| $$SCCHK | NOPCE+11, SENDPCE+5 |
| CONVRT | NOPCE+27, NOPCE+40, SENDPCE+21 |
| ENTCNV | ENTPOST+21 |
| KVARS | ENTCNV+7 |
| LINE | START+9, START+12, NOPCE+6, NOPCE+7, NOPCE+8, NOPCE+14, NOPCE+15, NOPCE+16, NOPCE+24, NOPCE+25 , NOPCE+26, NOPCE+36, NOPCE+37, NOPCE+38, NOPCE+39, NOPCE+44, NOPCE+45, NOPCE+46, SENDPCE+10, SENDPCE+11 , SENDPCE+12, SENDPCE+13, SENDPCE+14, SENDPCE+18, SENDPCE+19, SENDPCE+20 |
| START+22 | |
| NOPCE | START+19 |
| NULLID | NOPCE+17, NOPCE+47, SENDPCE+15 |
| SENDPCE | START+20 |
| START | ENTCNV+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | POST+1~, POST+2*, CONVRT+9~, CONVRT+10*, NULLID+6~, NULLID+7* |
| ACTIVCT | DUPCHK+12~, DUPCHK+13*, DUPCHK+20*, DUPCHK+21, DUPCHK+22 |
| CONTINUE | SCCHK+13~, SCCHK+14*, SCCHK+16, SCCHK+18*, SCCHK+19, SCCHK+22, SCCHK+23, SCCHK+30*, SCCHK+31, SCCHK+34* , SCCHK+35, SCCHK+40* |
| COUNT | START+1*, KVARS!, LINE+1* |
| DA | CONVRT+7*, CONVRT+11!, NULLID+4*, NULLID+8! |
| DIE | CONVRT+7*, CONVRT+11!, NULLID+4*, NULLID+8! |
| DIFROM | MAIL+1~ |
| DR | CONVRT+7*, CONVRT+11!, NULLID+4*, NULLID+8! |
| DSSIDSTF | START+8~, CONVRT+6* |
| DT | SCCHK+23, SCCHK+35, DUPCHK+18 |
| DUPIDCT | DUPCHK+12~, DUPCHK+13*, DUPCHK+16*, DUPCHK+21 |
| DUPRSLT | SCCHK+13~, SCCHK+21*, SCCHK+24, SCCHK+26, SCCHK+27, SCCHK+28, SCCHK+32, SCCHK+33, SCCHK+38, SCCHK+39 |
| DUZ | MAIL+2 |
| ECDNODE | START+7~, START+16*, START+17, NOPCE+1, NOPCE+2, SENDPCE+1, SENDPCE+2 |
| ECDSSID | START+7~, NOPCE+1*, NOPCE+4, NOPCE+10, NOPCE+11, NOPCE+34, NOPCE+42, SENDPCE+1*, SENDPCE+4, SENDPCE+5 , SENDPCE+9, SENDPCE+17, SCCHK~, SCCHK+16, SCCHK+17, SCCHK+21 |
| ECDSUNME | START+7~, NOPCE+2*, NOPCE+5, NOPCE+13, NOPCE+22, NOPCE+33, NOPCE+42, SENDPCE+2*, SENDPCE+7, SENDPCE+9 , SENDPCE+17 |
| ECDUDA | START+7~, START+13*, START+14*, START+15, START+16, CONVRT+7, CONVRT+10, NULLID+4, NULLID+7 |
| ECID | DUPCHK~, DUPCHK+14 |
| ECIDD1 | DUPCHK~, DUPCHK+14*, DUPCHK+15, DUPCHK+17, DUPCHK+19 |
| ECIDDA | SCCHK+13~, SCCHK+17*, SCCHK+18, SCCHK+19, SCCHK+20, SCCHK+21, SCCHK+25, SCCHK+32, SCCHK+38 |
| ECIDVAR | START+7~, NOPCE+11*, NOPCE+12, NOPCE+19, NOPCE+20, NOPCE+29, NOPCE+30, NOPCE+31, NOPCE+34, NOPCE+41 , SENDPCE+5*, SENDPCE+6, SENDPCE+16, CONVRT+6 |
| ECPCE | START+7~, START+17*, START+19, START+20 |
| ECRESULT | SCCHK+13~, SCCHK+15*, SCCHK+25*, SCCHK+27*, SCCHK+29*, SCCHK+32*, SCCHK+33*, SCCHK+38*, SCCHK+39*, SCCHK+41 |
| ECSCNODE | SCCHK+13~, SCCHK+20*, SCCHK+22, SCCHK+23, SCCHK+25, SCCHK+31, SCCHK+35, SCCHK+38 |
| I | ENTCNV+3*, START+10*, KVARS! |
| MSGTXT | START+7~, NOPCE+5*, NOPCE+7, NOPCE+13*, NOPCE+15, NOPCE+22*, NOPCE+25, NOPCE+33*, NOPCE+37, NOPCE+42* , NOPCE+45, SENDPCE+7*, SENDPCE+11, SENDPCE+17*, SENDPCE+19 |
| MSGTXT1 | START+7~, NOPCE+23*, NOPCE+26, NOPCE+34*, NOPCE+38, NOPCE+43*, NOPCE+46, SENDPCE+8*, SENDPCE+12 |
| MSGTXT2 | START+7~, NOPCE+35*, NOPCE+39, SENDPCE+9*, SENDPCE+13 |
| NODE0 | DUPCHK+12~, DUPCHK+17*, DUPCHK+18 |
| RSLT | DUPCHK+12~, DUPCHK+13*, DUPCHK+19*, DUPCHK+21*, DUPCHK+22*, DUPCHK+23 |
| TEXT | LINE~, LINE+1 |
| TXTVAR | ENTCNV+1~, ENTCNV+3*, ENTCNV+4*, ENTCNV+5, START+10*, START+11*, START+12 |
| XMDUZ | MAIL+2*, MAIL+6! |
| XMSUB | MAIL+3*, MAIL+6! |
| XMTEXT | MAIL+4*, MAIL+6! |
| XMY | MAIL+6! |
| XMY( | MAIL+2* |
| Y | KVARS!, NOPCE+20*, NOPCE+23, NOPCE+31*, NOPCE+35 |
