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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ABMRVTPB

Package: Third Party Billing

Routine: ABMRVTPB


Information

ABMRVTPB ; IHS/SD/SDR - VISIT W/THIRD PARTY BILLED REPORT ;

Source Information

Source file <ABMRVTPB.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Third Party Billing 3 ^ABMDRDBQ  (,WHD)^ABMDRHD  PAZ^ABMDRUTL  
VA Fileman 2 $$GET1^DIQ  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
ALL ;ALL STATUS
COMPUTE ;EP - Entry Point for Setting up Data
SUB
SLOOP
START
XIT ;EXIT POINT
HDB
PRINT ;EP for printing data
END
SEL
DATA ;
HD

External References

Name Field # of Occurrence
^ABMDRDBQ END+13
^ABMDRHD END+8
WHD^ABMDRHD HDB
PAZ^ABMDRUTL HD
$$GET1^DIQ DATA+1, DATA+2, DATA+3, DATA+4, DATA+5, PRINT+21
^DIR START+3, END+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," ============ Entry of VISIT Range =============",!
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !
  • Line Location: START+7
Function Call: WRITE
  • Prompt: !!,*7,"INPUT ERROR: Start Date is Greater than than the End Date, TRY AGAIN!",!!
  • Line Location: END+5
Function Call: WRITE
  • Prompt: " (cont)"
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !?3,"Visit Location: ",$P(ABM("TXT"),U,2)
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !?2,"Patient",?18,"HRN",?25,"Clinic",?37,"Visit Date/Time",?57,"Third Party Billed"
  • Line Location: HDB+1
Function Call: WRITE
  • Prompt: !,"-------------------------------------------------------------------------------"
  • Line Location: HDB+2
Function Call: WRITE
  • Prompt: !?27,"------"
  • Line Location: SUB+1
Function Call: WRITE
  • Prompt: !?19,"Count:",?27,ABM("CNT1")
  • Line Location: SUB+2
Routine Call
  • DIR
  • Line Location:
    • START+3
    • END+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNVSIT - [#9000010] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] PRINT+17, PRINT+18
^AUPNVSIT("B" SLOOP+1, SLOOP+3
^DPT - [#2] PRINT+16
^TMP("ABM-VTPB" COMPUTE+1!, DATA+6*

Label References

Name Line Occurrences
DATA SLOOP+3
HD PRINT+6
HDB PRINT+1
START END+3, END+5
SUB PRINT+8, PRINT+25
XIT PRINT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM ABMRVTPB+3!, PRINT+4*, PRINT+5*, PRINT+7
ABM("CLIN" PRINT+14*, PRINT+20
ABM("CNT" PRINT+2*, PRINT+23*
ABM("CNT1" PRINT+2*, PRINT+23*, SUB, SUB+2, SUB+3*
ABM("CNT2" PRINT+2*, PRINT+23*, SUB+3*
ABM("HD" END+7*
ABM("HRN" PRINT+17*, PRINT+18*, PRINT+19
ABM("I" HDB*, SUB+3*
ABM("NODX" SEL+2*
ABM("PDFN" PRINT+13*, PRINT+16, PRINT+17, PRINT+18
ABM("PG" COMPUTE+1*, PRINT+1*, HDB*
ABM("SCAT" PRINT+11*
ABM("STA" SEL*, END+7, COMPUTE+1
ABM("SUBR" COMPUTE+1*
ABM("T" PRINT+7*, PRINT+23, PRINT+24
ABM("TOT" PRINT+2*, PRINT+23*
ABM("TOT1" PRINT+2*, PRINT+24*, SUB+3*
ABM("TOT2" PRINT+2*, PRINT+24*, SUB+3*
ABM("TPB" PRINT+10*, PRINT+22
ABM("TXT" SEL+1*, PRINT+7*, PRINT+8, PRINT+9, PRINT+10, PRINT+11, PRINT+12, PRINT+13, PRINT+14
ABM("VDFN" PRINT+12*, PRINT+21
ABM("VLOC" PRINT+3*, PRINT+8, PRINT+9*, PRINT+17
ABM("Z" PRINT+4*, PRINT+5
>> ABMP("CLIN" DATA+4*, DATA+6
>> ABMP("PDFN" DATA+5*, DATA+6
>> ABMP("SCAT" DATA+3*, DATA+6
>> ABMP("TPB" DATA+1*, DATA+6
>> ABMP("VLOC" DATA+2*, DATA+6
>> ABMQ("NS" END+11*
>> ABMQ("RC" END+9*
>> ABMQ("RP" END+12*
>> ABMQ("RX" END+10*
>> ABMV SLOOP*, SLOOP+1*, SLOOP+3
>> ABMVIEN SLOOP+2*, SLOOP+3*, DATA+1, DATA+2, DATA+3, DATA+4, DATA+5, DATA+6
ABMY ABMRVTPB+3!
ABMY("DT" SEL+3*, START+6*, END+4*, END+5, SLOOP, SLOOP+1
DIR END+2!
DIR("A" START+1*, END*
DIR(0 START+2*
>> DIROUT START+5, END+6, PRINT+5, PRINT+6, HD
>> DIRUT START+5, END+3
>> DTOUT START+5, END+6, PRINT+5, PRINT+6, HD
>> DUOUT START+5, END+6, PRINT+5, PRINT+6, HD
DUZ(2 PRINT+18
IOSL PRINT+6
U DATA+6, PRINT+7, PRINT+8, PRINT+9, PRINT+10, PRINT+11, PRINT+12, PRINT+13, PRINT+14, PRINT+16
, PRINT+17, PRINT+18
>> Y START+6, END+4
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All