Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DGPMVBUR

Package: Registration

Routine: DGPMVBUR


Information

DGPMVBUR ;ALB/MIR - UR ADMISSION BULLETIN FOR MCCR ; 9/16/03 2:24pm

Source Information

Source file <DGPMVBUR.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Integrated Billing 1 $$INSUR^IBBAPI  
MailMan 1 ^XMD  
Registration 1 PID^VADPT6  
VA FileMan 1 C^%DTC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DGPMV321  DGPMVBUL  

Entry Points

Name Comments DBIA/ICR reference
UR ;UR bulletin
URQ
INS ;get insurance effective at time of admission, start at DGPMBLN=10
ACT ;is insurance active? If so, set in DGPMBLN array
DIS ;rated disabilities
V72HR ; GET INFORMATION FROM VISITS FOR THE LAST 72 HOURS
GVTIME ; LOOP THROUGH "B" INDEX OF ^AUPNVSIT FILE
GVID ; CHECK FOR CORRECT PATIENT
SETLN ;--set line in xmtext array

External References

Name Field # of Occurrence
C^%DTC V72HR+3
$$INSUR^IBBAPI INS+5
PID^VADPT6 UR+6
^XMD UR+16

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] GVID+3, GVID+4, GVID+7
^AUPNVSIT("B" GVTIME+1, GVID+1
^DD("DD" UR+7, GVID+9
^DG(391 - [#391] DIS+2
^DG(405.1 - [#405.1] UR+8
^DG(405.4 - [#405.4] UR+11
^DIC(31 - [#31] DIS+4
^DIC(42 - [#42] UR+10
^DPT - [#2] UR+6, DIS+1, DIS+2, DIS+4
^SC - [#44] GVID+6
^XMB(3.8 - [#3.8] UR+3

Label References

Name Line Occurrences
ACT INS+7
DIS UR+15
GVID GVID+3, GVID+12
GVTIME GVID+2
INS UR+2
SETLN UR+6, UR+7, UR+8, UR+9, UR+10, UR+11, UR+12, UR+13, ACT+5, ACT+9
ACT+10, ACT+11, ACT+12, ACT+13, DIS+4, GVID+11
URQ UR+2, UR+3
V72HR UR+14

Naked Globals

Name Field # of Occurrence
^( DIS+1, DIS+4
^("TYPE" DIS+2
^("VET" DIS+2
^(0 UR+8, UR+10, UR+11, DIS+2, DIS+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% URQ+1!
%Y URQ+1!
>> DFN UR+6, INS+5, DIS+1, DIS+2, DIS+4, GVID+3
DGDATA INS+3~, INS+5
DGIB INS+3~, INS+5*
DGIBINS URQ+1!, INS+2!, INS+6*
DGIBINS( INS+7, ACT+1, ACT+2, ACT+3, ACT+5, ACT+6, ACT+7, ACT+10, ACT+11, ACT+12
>> DGIBNS( ACT+7
>> DGPMA UR+7, UR+8, UR+10, UR+11, UR+12, ACT+1, ACT+2, V72HR+2, GVTIME+3
DGPMBL UR+6*, UR+7*, UR+8*, UR+9*, UR+10*, UR+11*, UR+12*, UR+13*, URQ!, ACT+5*
ACT+9*, ACT+10*, ACT+11*, ACT+12*, ACT+13*, DIS+4*, GVID+10*, SETLN+2
DGPMBLN UR+4*, UR+14*, URQ!, INS+1*, INS+9, SETLN+1*, SETLN+2
DGPMLAST UR+14, URQ!, INS+9*
DGPMOB URQ+1!
DGPMOW URQ+1!
DGPMUR UR+1!, URQ!
DGPMUR( SETLN+2*
DGPMUR(10 UR+2, INS+9
DGPMX UR+3*!, URQ+1!
DGTMP URQ!, ACT+6*, ACT+7*, ACT+8*, ACT+9
DGX INS+3~, INS+6*
HSPN V72HR+1~, GVID+6*, GVID+7*, GVID+10
I URQ+1!, INS+7*, ACT+1, ACT+2, ACT+3, ACT+5, ACT+6, ACT+7, ACT+10, ACT+11
ACT+12, DIS+4*
ID V72HR+1~
IDEN V72HR+1~, GVTIME+4*, GVID+1*, GVID+2, GVID+3, GVID+4, GVID+7
LOCN V72HR+1~, GVID+4*, GVID+6
U ACT+6
>> VA("PID" UR+6
X URQ+1!, DIS+4*, V72HR+1~, V72HR+4*, GVTIME+1*, GVTIME+2, GVTIME+3, GVID+1, GVID+9
X1 URQ+1!, DIS+4*, V72HR+1~, V72HR+2*
X2 URQ+1!, V72HR+1~, V72HR+2*
XMSUB UR+4*, URQ!
XMTEXT UR+4*, URQ!
XMY URQ!
XMY("G.DGPM U R ADMISSION" , UR+5*
Y UR+7*, URQ+1!, GVID+9*, GVID+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All