AGTXCONF ;IHS/ASDS/EFG - CONFIGURE AGTX FOR BEFORE or AFTER P14 ;
Source file <AGTXCONF.m>
Package | Total | Call Graph |
---|---|---|
IHS VA Utilities | 2 | $$DIR^XBDIR HELP^XBHELP |
IHS Patient Registration | 1 | $$INSTALLD^AG6P16 |
Kernel | 1 | (BMES,MES)^XPDUTL |
Package | Total | Caller Graph |
---|---|---|
IHS Patient Registration | 4 | AG6P14 AG6P15 AG6P16 AG7ENV |
Name | Comments | DBIA/ICR reference |
---|---|---|
BEFSAV | ;EP - From P14 install. Save the before p14 routines.
|
|
AFTSAV | ;EP - From P14 install. Save the after p14 routines.
|
|
BEFLOD | ;Restore the before p14 routines.
|
|
DELAFT | ;EP - Delete routine(s) to make room for "just installed" routines.
|
|
AFTLOD | ;Restore the after p14 routines.
|
|
BEF | ;These are the "before p14" routines.
|
|
INTRO | ;
|
|
CONFIG() | ;
|
|
KT | ||
AFT | ; These are the "after p14" routines.
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("DEL" | DELAFT+2 |
^%ZOSF("LOAD" | BEFLOD+2, AFTLOD+2, BEFSAV+6, AFTSAV+6 |
^%ZOSF("SAVE" | BEFLOD+2, AFTLOD+2, BEFSAV+10, AFTSAV+10 |
^%ZOSF("TEST" | BEFSAV+8, AFTSAV+8 |
^TMP("AGTXCONF" | KT! |
Name | Line Occurrences |
---|---|
$$CONFIG | INTRO+15 |
@( | INTRO+20 |
KT | BEFLOD+2, BEFLOD+3, AFTLOD+2, AFTLOD+3, BEFSAV+3, BEFSAV+13, AFTSAV+3, AFTSAV+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AG | BEFLOD+1~, BEFLOD+2*, AFTLOD+1~, AFTLOD+2*, CONFIG+3*, BEFSAV+1~, BEFSAV+2*, AFTSAV+1~, AFTSAV+2*, DELAFT+1~ , DELAFT+2* |
AGCONFIG | INTRO+14~, INTRO+15*, INTRO+16, INTRO+17, INTRO+18, INTRO+19, INTRO+20 |
AGM | BEFSAV+1~, BEFSAV+5*, BEFSAV+9, BEFSAV+11, AFTSAV+1~, AFTSAV+5*, AFTSAV+9, AFTSAV+11 |
AGP | CONFIG+1~, CONFIG+3* |
DIE | BEFLOD+1~, BEFLOD+2*, AFTLOD+1~, AFTLOD+2*, BEFSAV+1~, BEFSAV+4*, AFTSAV+1~, AFTSAV+4* |
DIF | BEFLOD+1~, BEFLOD+2*, AFTLOD+1~, AFTLOD+2*, BEFSAV+1~, BEFSAV+4*, AFTSAV+1~, AFTSAV+4* |
X | BEFLOD+2*, AFTLOD+2*, CONFIG+3*, BEFSAV+4*, BEFSAV+5, BEFSAV+7*, BEFSAV+9, BEFSAV+11, AFTSAV+4*, AFTSAV+5 , AFTSAV+7*, AFTSAV+9, AFTSAV+11, DELAFT+1~, DELAFT+2* |
XCN | BEFLOD+1~, BEFLOD+2*, AFTLOD+1~, AFTLOD+2*, BEFSAV+1~, BEFSAV+4*, AFTSAV+1~, AFTSAV+4* |
XCNP | BEFLOD+1~, BEFLOD+2*, AFTLOD+1~, AFTLOD+2*, BEFSAV+1~, BEFSAV+4*, AFTSAV+1~, AFTSAV+4* |
Y | CONFIG+1~, CONFIG+2*, CONFIG+3*, CONFIG+4 |
>> ZTQUEUED | DELAFT+2 |
Name | Field # of Occurrence |
---|---|
$T( | CONFIG+3 |
$T(AFT+AG | AFTLOD+2, AFTSAV+4, AFTSAV+7, DELAFT+2 |
$T(BEF+AG | BEFLOD+2, CONFIG+3, BEFSAV+4, BEFSAV+7 |