IBJDI11 ;ALB/CPM - PERCENTAGE OF COMPLETED REGISTRATIONS (CONT'D) ;16-DEC-96
Source file <IBJDI11.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 2 | $$INPT^IBAMTS1 $$DAT1^IBOUTL |
Registration | 2 | (ELIG,REG)^VADPT $$PRIM^VASITE |
Master Patient Index VistA | 1 | $$GETICN^MPIF001 |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 1 | IBJDI1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; - Entry point from IBJDI1.
|
|
EN1 | ||
ENQ | ||
NOTR(DFN,IBBDT,IBEDT,Z) | ; - Check for patient's 'no treatment' dispositions.
; Input: DFN = Patient IEN ; IBBDT = Start date for search ; IBEDT = Ending date for search ; Z = 1-Look for 'no treatment' dispositions only ; 0-Also look for C&P/emply/collat/non-ct clinic visits ; Output: 0 = Patient had no 'no treatment' dispositions or patient ; had treatment within selected date range ; 1 = Patient had at least one 'no treatment' disposition or ; C&P exam/employee/collateral/non-count clinic visit |
|
NTQ | ||
INC(DFN,X) | ; - Find a patient's registration inconsistencies.
; Input: DFN = Pointer to the patient in file #2 ; Output: X = Passed by reference - the patient's ; registration inconsistencies in the form |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGIN(38.5 - [#38.5] | INC+9 |
^DGPM("APTT3" | EN+24 |
^DGS(41.1 - [#41.1] | EN1+8, EN1+9 |
^DPT - [#2] | EN+3, EN+17, EN+18, EN1+16, NOTR+15 |
^SC - [#44] | NOTR+19 |
^SCE - [#409.68] | NOTR+16 |
^TMP("IBDFN" | EN1+7* |
^TMP("IBJDI1" | EN1+16* |
^VA(200 - [#200] | EN1+16 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | EN+3, EN+17, EN+18, EN+23, EN+24, EN+27, EN+31, EN1+7, EN1+8, EN1+16 , NOTR~, NOTR+15, INC~, INC+9 |
DT | EN1+10 |
I | INC+8~, INC+9* |
>> IB( | EN+11*, EN+18*, EN+27*, EN+28*, EN+34*, EN+35*, EN+36*, EN+38*, EN+39*, EN+40* |
IBBDT | EN+24, EN+27, NOTR~, NOTR+12 |
IBDIS | NOTR+11~ |
IBDIS( | NOTR+14, NOTR+15, NOTR+17 |
IBDIS(0 | NOTR+13 |
>> IBDIV | EN+6*, EN+7*, EN+8, EN+11, EN+18, EN+27, EN+28, EN+34, EN+35, EN+36 , EN+38, EN+39, EN+40, EN1+16 |
>> IBDN | EN1+16 |
>> IBDOD | EN+18*, EN+19*, EN1+16 |
IBEDT | EN+23, EN+24, EN+27, NOTR~, NOTR+12 |
>> IBIN | EN+31, EN+32, EN+34*, EN1, EN1+16 |
>> IBINPT | EN+22*, EN+23*, EN+24*, EN1+16 |
>> IBNEXT | EN1+6*, EN1+13*, EN1+16 |
>> IBNOTR | EN+27*, EN+28*, EN+32, EN+37, EN1+16 |
>> IBNVET | EN+14*, EN+33, EN+39, EN1+16 |
>> IBREG | EN+3*, EN+7, EN+34, EN1+3, EN1+16 |
>> IBRPT | EN1 |
>> IBSORT | EN+6, EN+8 |
>> IBTOC | EN1+3*, EN1+16 |
>> IBX | EN+24* |
U | EN+7, EN+34, EN1+3, EN1+9, EN1+11, EN1+12, EN1+16, NOTR+15, NOTR+17, NOTR+18 , NOTR+19 |
VA | ENQ! |
VAEL | ENQ! |
VAEL(4 | EN+14 |
VAERR | ENQ! |
VAROOT | NOTR+11~, NOTR+12* |
VARP | NOTR+11~ |
VARP("F" | NOTR+12* |
VARP("T" | NOTR+12* |
>> VAUTD | EN+8 |
>> VAUTD( | EN+8 |
X | EN1+3*, EN1+8*, EN1+9, NOTR+11~, NOTR+14*, NOTR+15, NOTR+17, INC~, INC+8*, INC+9* , INC+10* |
X1 | EN1+9*, EN1+11, EN1+12, NOTR+11~, NOTR+14*, NOTR+20* |
X2 | EN1+9*, EN1+10, EN1+13, NOTR+11~, NOTR+15*, NOTR+16*, NOTR+17, NOTR+18, NOTR+19 |
Y | NOTR+11~, NOTR+13*, NOTR+14*, NTQ |
Z | NOTR~, NOTR+18, NOTR+19 |