IBTRED ;ALB/AAS - EXPAND/EDIT CLAIMS TRACKING ENTRY ; 01-JUL-1993
Source file <IBTRED.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 7 | $$ENCL^IBAMTS2 SET^IBCNSP $$DAT1^IBOUTL ($$EXPAND,EN)^IBTRE ^IBTRED0 (,4)^IBTRED01 PROT^IBTRPR |
Registration | 4 | (INP,PID)^VADPT EN^VALM FULL^VALM1 (CLEAN,KILL,SET)^VALM10 |
VA Fileman | 2 | DT^DICRW D^DIQ |
Kernel | 1 | DISP^XQORM1 |
Outpatient Pharmacy | 1 | EN^PSOCPVW |
Name | Comments | DBIA/ICR reference |
---|---|---|
ENCLQ | ||
EN | ; -- main entry point for IBT EXPAND/EDIT TRACKING
|
|
HDR | ; -- header code
|
|
ETYPQ | ||
VISIT | ; -- Visit info Region
|
|
3 | ; -- visit region for rx refill
|
|
1 | ; -- visit region for admission or scheduled admission
|
|
ENCL(IBOE) | ; -- output format of classifications
|
|
INIT | ; -- init variables and list array
|
|
2 | ; -- visit region for outpatient care
|
|
EXIT | ; -- exit code
|
|
4 | ; -- Visit region for prosthetics
|
|
BLD | ; -- list builder
|
|
BLANK(LINE) | ; -- Build blank line
|
|
ETYP(IBTRN) | ; -- Expand type of epidose and date
|
|
HELP | ; -- help code
|
Name | Field # of Occurrence |
---|---|
DT^DICRW | EN+1 |
D^DIQ | 1+3 |
$$ENCL^IBAMTS2 | ENCL+3 |
SET^IBCNSP | VISIT+3, VISIT+4, 1+4, 1+5, 1+6, 2+2, 2+4, 2+5, 2+6, 2+7 , 2+8, 3+4, 3+5, 3+6, 3+7, 3+8, 3+9, 3+10 |
$$DAT1^IBOUTL | 2+2, ETYP+5 |
$$EXPAND^IBTRE | HDR+2, 2+6, 2+7 |
EN^IBTRE | EN+3 |
^IBTRED0 | BLD+10 |
^IBTRED01 | BLD+10 |
4^IBTRED01 | 4+1 |
PROT^IBTRPR | BLD+5 |
EN^PSOCPVW | 3+3 |
INP^VADPT | 1+2 |
PID^VADPT | HDR+1 |
EN^VALM | EN+4 |
FULL^VALM1 | EXIT+2 |
CLEAN^VALM10 | EXIT+2 |
KILL^VALM10 | BLD+6 |
SET^VALM10 | BLANK+1 |
DISP^XQORM1 | HELP+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPM - [#405] | 1+1 |
^DPT - [#2] | HDR+2 |
^IBE(356.6 - [#356.6] | BLD+8, VISIT+5, ETYP+3 |
^IBT(356 - [#356] | HDR+2, BLD+7, ETYP+2 |
^PSDRUG - [#50] | 3+9 |
^PSRX - [#52] | 3+9 |
^SC - [#44] | 2+5 |
^SCE - [#409.68] | 2+5, 2+6, 2+7 |
^TMP("IBTRED" | BLD+2! |
Name | Line Occurrences |
---|---|
$$ENCL | 2+8 |
$$ETYP | HDR+3 |
@( | VISIT+6 |
BLANK | BLD+3 |
BLD | INIT+3 |
ENCLQ | ENCL+2 |
ETYPQ | ETYP+2, ETYP+4 |
HDR | INIT+3 |
VISIT | BLD+10 |
Name | Field # of Occurrence |
---|---|
^(0 | HDR+2 |
^(1 | BLD+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | EN+2!, HDR+2 |
DT | EN+1 |
I | BLD+3*, ENCL+1~, ENCL+4* |
IBCL | ENCL+1~*, ENCL+4*, ENCLQ |
IBCL1 | ENCL+1~, ENCL+3*, ENCL+4 |
IBETYP | BLD+1~, BLD+8*, VISIT+4, VISIT+5~*, VISIT+6 |
>> IBETYPD | ETYP+3*, ETYP+4, ETYP+5 |
IBFASTXT | EN+5! |
IBOE | VISIT+1~, 2+1*, 2+3, 2+5, 2+6, 2+7, 2+8, ENCL~, ENCL+2, ENCL+3 |
IBTRC | EN+2! |
IBTRD | EN+2! |
IBTRN | EN+2!, EN+3, HDR+2, HDR+3, BLD+7, EXIT+1!, ETYP~, ETYP+2 |
IBTRND | BLD+1~, BLD+7*, BLD+8, VISIT+5, 1+1, 1+3, 2+1, 2+2, 3+3, 3+4 , 3+5, 3+6, 3+7, 3+8, 3+9, 3+10, ETYP+2*, ETYP+3, ETYP+5 |
IBTRND1 | BLD+1~, BLD+7* |
IBTRND2 | BLD+1~ |
>> IBTRPRF | BLD+4*, BLD+5 |
IBTRV | EN+2! |
IBY | ETYP+1~*, ETYP+5*, ETYPQ |
>> IORVOFF | VISIT+3 |
>> IORVON | VISIT+3 |
LINE | BLANK~, BLANK+1 |
OFFSET | VISIT+1~, VISIT+2*, VISIT+3, VISIT+4, 1+4, 1+5, 1+6, 2+2, 2+4, 2+5 , 2+6, 2+7, 2+8, 3+4, 3+5, 3+6, 3+7, 3+8, 3+9, 3+10 |
PSONTALK | 3+1~, 3+2* |
PSOTMP | 3+1~ |
PSOTMP( | 3+5 |
PSOTMP(52 | 3+4, 3+6, 3+7, 3+8, 3+10 |
START | VISIT+1~, VISIT+2*, VISIT+3, VISIT+4, 1+4, 1+5, 1+6, 2+2, 2+4, 2+5 , 2+6, 2+7, 2+8, 3+4, 3+5, 3+6, 3+7, 3+8, 3+9, 3+10 |
>> VA("BID" | HDR+2 |
>> VA200 | 1+2* |
>> VAIN | 1+2 |
>> VAIN(3 | 1+6 |
>> VAIN(4 | 1+5 |
>> VAIN(7 | 1+3*, 1+4 |
>> VAINDT | 1+1* |
>> VALMBG | INIT+2* |
>> VALMCNT | INIT+2*, BLD+9* |
VALMEVL | EN+2! |
>> VALMHDR(1 | HDR+2* |
>> VALMHDR(2 | HDR+3* |
VALMQUIT | INIT+1!, EXIT+1! |
X | BLD+5*, VISIT+6*, 3+3*, HELP+1*, ENCL+1~, ENCL+4* |
XQORS | EN+2! |
>> Y | 1+3* |