EC2P24PT ;ALB/JAM - PATCH EC*2.0*24 Post-Init Rtn ; 04/19/00
Source file <EC2P24PT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
POST | ; entry point
|
|
F725SRH | ; Locate invalid CPT codes in file 725 and correct them
|
|
F721SRH | ; Locate invalid CPT code in file 721 and corrects it
|
|
MSGTXT | ; Message intro
|
|
BKGPRC | ;* print entrie with invalid CPT codes
|
|
PROCESS | ;* background job entry point
|
|
LINE(TEXT) | ; Add line to message global
|
|
; Send message
|
||
FIX721(ECFN,EC) | ;Fix bad CPT code entry in file #721
; Input: ECFN - Event Capture file #721 IEN ; EC - Zero (0) and "P" nodes in file #721 |
FileNo | Call Tags |
---|---|
^EC(725 - [#725] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | PROCESS+14 |
^EC(725 - [#725] | F725SRH+6, F725SRH+7, FIX721+8 |
^ECD - [#724] | FIX721+9 |
^ECH - [#721] | F721SRH+6, F721SRH+8, F721SRH+12*, PROCESS+13 |
^ECH("AC" | F721SRH+4, F721SRH+5 |
^ICPT - [#81] | F725SRH+8, F721SRH+7, F721SRH+11 |
^ICPT("B" | F725SRH+9, F725SRH+10, F721SRH+10 |
^TMP( | POST+2!, F725SRH+11*, F725SRH+16*, F721SRH+14*, PROCESS+10, PROCESS+11, PROCESS+18, PROCESS+22, PROCESS+31, PROCESS+32 , PROCESS+35, PROCESS+40!, PROCESS+42!, LINE+1* |
Name | Line Occurrences |
---|---|
$$FIX721 | F721SRH+13 |
BKGPRC | POST+4 |
F721SRH | PROCESS+2 |
F725SRH | POST+3 |
LINE | PROCESS+4, PROCESS+5, PROCESS+6, PROCESS+7, PROCESS+8, PROCESS+17, PROCESS+19, PROCESS+20, PROCESS+21, PROCESS+23 , PROCESS+24, PROCESS+25, PROCESS+26, PROCESS+27, PROCESS+28, PROCESS+29, PROCESS+30, PROCESS+34, PROCESS+36, PROCESS+37 , PROCESS+38, PROCESS+39 |
PROCESS+41 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | F721SRH+3, FIX721+11 |
>> %DT | F721SRH+2* |
BL | PROCESS+1~, PROCESS+3*, PROCESS+15, PROCESS+16, PROCESS+33 |
COUNT | PROCESS+1~, PROCESS+3*, LINE+1* |
CPT | F725SRH+1~, F725SRH+7*, F725SRH+8, F725SRH+9, F725SRH+10, F725SRH+11, F725SRH+16 |
CPTIEN | F725SRH+1~, F725SRH+10*, F725SRH+11, F725SRH+12, F725SRH+15, F721SRH+1~, F721SRH+10*, F721SRH+11, F721SRH+12 |
DA | F725SRH+1~, F725SRH+12*, F721SRH+15! |
DIE | F725SRH+1~, F725SRH+12!*, F721SRH+15! |
DR | F725SRH+1~, F725SRH+12!*, F721SRH+15! |
DUZ | MAIL+2 |
EC | F721SRH+1~, F721SRH+6*, F721SRH+13, FIX721~, FIX721+7 |
EC(0 | F721SRH+8*, F721SRH+14, FIX721+7, FIX721+9 |
EC4 | FIX721+6~, FIX721+7* |
ECCPT | FIX721+6~, FIX721+8* |
ECD | F721SRH+1~, F721SRH+2*, F721SRH+4*, F721SRH+5, FIX721+6~, FIX721+9* |
ECDA | F721SRH+1~, F721SRH+4*, F721SRH+5*, F721SRH+6, F721SRH+8, F721SRH+12, F721SRH+13, F721SRH+14 |
ECDT | PROCESS+1~, PROCESS+14*, PROCESS+15, FIX721+6~, FIX721+11* |
ECDX | FIX721+6~, FIX721+7* |
ECED | F721SRH+1~, F721SRH+3*, F721SRH+4 |
ECFN | FIX721~ |
ECINP | FIX721+6~, FIX721+9* |
ECJ | POST+2*, F725SRH+11, F725SRH+16, F721SRH+14, PROCESS+10, PROCESS+11, PROCESS+18, PROCESS+22, PROCESS+31, PROCESS+32 , PROCESS+35, PROCESS+40, PROCESS+42!, LINE+1 |
ECP | FIX721+6~, FIX721+7*, FIX721+8 |
ECPCE | FIX721+6~, FIX721+10* |
ECPT | F721SRH+1~, F721SRH+6*, F721SRH+7, F721SRH+10, F721SRH+14, PROCESS+1~, PROCESS+13*, PROCESS+16 |
ECSD | F721SRH+1~, F721SRH+2* |
ECX | F725SRH+1~, F725SRH+7*, F725SRH+11, F725SRH+14, F725SRH+16, PROCESS+11*, PROCESS+13, PROCESS+14, PROCESS+15, PROCESS+32* , PROCESS+33 |
ECY | PROCESS+1~, PROCESS+15*, PROCESS+16*, PROCESS+17, PROCESS+33*, PROCESS+34 |
ERR | F721SRH+1~, F721SRH+6*, F721SRH+10*, F721SRH+11*, F721SRH+14 |
FLG | F721SRH+1~, F721SRH+13* |
I | PROCESS+1~, PROCESS+4* |
IEN | F725SRH+1~, F725SRH+2*, F725SRH+6*, F725SRH+7, F725SRH+11, F725SRH+12, F725SRH+14, F725SRH+16, PROCESS+1~, PROCESS+9* , PROCESS+10*, PROCESS+11, PROCESS+13, PROCESS+15, PROCESS+31*, PROCESS+32, PROCESS+33 |
NODE | FIX721+6~, FIX721+9*, FIX721+10 |
STA | PROCESS+1~, PROCESS+11*, PROCESS+12*, PROCESS+13, PROCESS+16 |
TEXT | LINE~, LINE+1 |
TXTVAR | PROCESS+1~, PROCESS+4* |
U | F725SRH+7, F725SRH+11, F725SRH+14, F725SRH+16, F721SRH+6, F721SRH+12, F721SRH+14, PROCESS+11, PROCESS+13, PROCESS+14 , PROCESS+15, PROCESS+33 |
X | F721SRH+1~, F721SRH+2* |
XMDUZ | MAIL+1~, MAIL+2* |
XMSUB | MAIL+1~, MAIL+3* |
XMTEXT | MAIL+1~, MAIL+4* |
XMY | MAIL+1~ |
XMY( | MAIL+2* |
Y | F721SRH+1~, F721SRH+2, PROCESS+14* |
>> ZTDESC | BKGPRC+3* |
>> ZTDTH | BKGPRC+4* |
>> ZTIO | BKGPRC+4* |
>> ZTREQ | BKGPRC+4* |
>> ZTRTN | BKGPRC+3* |
>> ZTSAVE("ECJ" | BKGPRC+4* |
>> ZTSAVE("ZTREQ" | BKGPRC+4* |
Name | Field # of Occurrence |
---|---|
$T(MSGTXT+I | PROCESS+4 |