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) |
| FileNo | Call Tags |
|---|---|
| ^ECH - [#721] | GET1^DID |
| ^ECD - [#724] | Classic Fileman Calls, GET1^DID, PRD^DILFD |
