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* |