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 |