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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: APCLPYR5

Package: Patient Care Component Reports

Routine: APCLPYR5


Information

APCLPYR5 ; IHS/CMI/LAB - Patients by Payer (Insurer) - Railroad ;

Source Information

Source file <APCLPYR5.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
IHS Patient 1 $$HRN^AUPNPAT  
IHS Patient Registration 1 $$GETRRE^AGUTL  
IHS VA Utilities 1 ^XBCLS  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Care Component Reports 1 APCLPYR  

Entry Points

Name Comments DBIA/ICR reference
WRT ;
RRDLOOP ;EP
RRALOOP ;EP
HEADING ;
STORE ;
RRBLOOP ;EP

External References

Name Field # of Occurrence
$$GETRRE^AGUTL RRALOOP+47, RRBLOOP+46, RRDLOOP+46
$$HRN^AUPNPAT RRALOOP+11, RRBLOOP+11, RRDLOOP+11, WRT+2
^DIR RRALOOP+66, RRBLOOP+65, RRDLOOP+65
^XBCLS HEADING+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Please be patient. This may take a few minutes.",!!
  • Line Location: RRALOOP+1
Function Call: WRITE
  • Prompt: !!,"Total: ",APCLCTR
  • Line Location: RRALOOP+68
Function Call: WRITE
  • Prompt: !!,"Please be patient. This may take a few minutes.",!!
  • Line Location: RRBLOOP+1
Function Call: WRITE
  • Prompt: !!,"Total: ",APCLCTR
  • Line Location: RRBLOOP+67
Function Call: WRITE
  • Prompt: !!,"Please be patient. This may take a few minutes.",!!
  • Line Location: RRDLOOP+1
Function Call: WRITE
  • Prompt: !!,"Total: ",APCLCTR
  • Line Location: RRDLOOP+67
Function Call: WRITE
  • Prompt: $P(^DPT(APCLDFN,0),U)
  • Line Location: WRT+1
Function Call: WRITE
  • Prompt: ?32,$J($$HRN^AUPNPAT(APCLDFN,APCLFAC),6)
  • Line Location: WRT+2
Function Call: WRITE
  • Prompt: ?41,APCLRRPR
  • Line Location: WRT+3
Function Call: WRITE
  • Prompt: ?45,APCLRRNO
  • Line Location: WRT+4
Function Call: WRITE
  • Prompt: ?67,$E(APCLEND,4,5),"/",$E(APCLEND,6,7),"/",$E(APCLEND,2,3)
  • Line Location: WRT+7
Function Call: WRITE
  • Prompt: ?67,$E(APCLEND,4,5),"/",$E(APCLEND,6,7),"/",$E(APCLEND,2,3)
  • Line Location: WRT+18
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADING+2
Function Call: WRITE
  • Prompt: $E(X,4,5),"/",$E(X,6,7),"/",$E(X,2,3)
  • Line Location: HEADING+4
Function Call: WRITE
  • Prompt: ?((IOM-$L(X))/2),X
  • Line Location: HEADING+6
Function Call: WRITE
  • Prompt: ?70,"Page ",APCLPAGE
  • Line Location: HEADING+8
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADING+9
Function Call: WRITE
  • Prompt: ?((IOM-$L(X))/2),X,!
  • Line Location: HEADING+12
Function Call: WRITE
  • Prompt: ?((IOM-$L(X))/2),X,!
  • Line Location: HEADING+16
Function Call: WRITE
  • Prompt: ?((IOM-$L(X))/2),X,!
  • Line Location: HEADING+26
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADING+28
Function Call: WRITE
  • Prompt: "Patient Name",?33,"HRNO",?40,"PRE",?47,"RR #",?59,"Begin",?69,"End"
  • Line Location: HEADING+30
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADING+31
Function Call: WRITE
  • Prompt: "------------",?32,"------",?40,"---",?45,"---------",?57,"--------",?67,"--------"
  • Line Location: HEADING+33
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADING+34
Routine Call
  • DIR
  • Line Location:
    • RRALOOP+66
    • RRBLOOP+65
    • RRDLOOP+65

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNMCD("B" RRALOOP+22, RRBLOOP+22, RRDLOOP+22
^AUPNMCR("B" RRALOOP+21, RRBLOOP+21, RRDLOOP+21
^AUPNPRVT("B" RRALOOP+25, RRBLOOP+25, RRDLOOP+25
^AUPNRRE - [#9000005] RRALOOP+9, RRALOOP+31, RRALOOP+33, RRALOOP+35, RRALOOP+36, RRALOOP+49, RRBLOOP+9, RRBLOOP+30, RRBLOOP+32, RRBLOOP+34
, RRBLOOP+35, RRBLOOP+48, RRDLOOP+9, RRDLOOP+30, RRDLOOP+32, RRDLOOP+34, RRDLOOP+35, RRDLOOP+48, WRT+10, WRT+11
, WRT+13, WRT+14, WRT+15, WRT+16
^AUPNRRE("B" RRALOOP+23, RRBLOOP+23, RRDLOOP+23
^AUTTRRP - [#9999999.33] RRALOOP+50, RRBLOOP+49, RRDLOOP+49
^DIC(4 - [#4] HEADING+5
^DPT - [#2] RRALOOP+15, RRBLOOP+15, RRDLOOP+15, WRT+1
^TMP($J RRALOOP+3!, RRALOOP+56, RRALOOP+57, RRBLOOP+3!, RRBLOOP+55, RRBLOOP+56, RRDLOOP+3!, RRDLOOP+55, RRDLOOP+56, STORE+1*

Label References

Name Line Occurrences
HEADING RRALOOP+6, RRALOOP+65, RRBLOOP+6, RRBLOOP+64, RRDLOOP+6, RRDLOOP+64
STORE RRALOOP+51, RRALOOP+52, RRBLOOP+50, RRBLOOP+51, RRDLOOP+50, RRDLOOP+51
WRT RRALOOP+63, RRBLOOP+62, RRDLOOP+62

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCLACT RRALOOP+38, RRALOOP+40, RRALOOP+42, RRALOOP+44, RRBLOOP+37, RRBLOOP+39, RRBLOOP+41, RRBLOOP+43, RRDLOOP+37, RRDLOOP+39
, RRDLOOP+41, RRDLOOP+43, WRT+12, HEADING+19, HEADING+20
>> APCLALL WRT+5
>> APCLBDAT RRALOOP+40, RRALOOP+44, RRBLOOP+39, RRBLOOP+43, RRDLOOP+39, RRDLOOP+43, WRT+12, HEADING+22
>> APCLBEG RRALOOP+35*, RRALOOP+38, RRALOOP+40, RRALOOP+42, RRALOOP+59*, RRBLOOP+34*, RRBLOOP+37, RRBLOOP+39, RRBLOOP+41, RRBLOOP+58*
, RRDLOOP+34*, RRDLOOP+37, RRDLOOP+39, RRDLOOP+41, RRDLOOP+58*, STORE+1, WRT+6, WRT+11*, WRT+12, WRT+17
>> APCLCTR RRALOOP+28*, RRALOOP+32*, RRALOOP+51, RRALOOP+54*, RRALOOP+64*, RRALOOP+68, RRBLOOP+27*, RRBLOOP+31*, RRBLOOP+50, RRBLOOP+53*
, RRBLOOP+63*, RRBLOOP+67, RRDLOOP+27*, RRDLOOP+31*, RRDLOOP+50, RRDLOOP+53*, RRDLOOP+63*, RRDLOOP+67
>> APCLDFN RRALOOP+8*, RRALOOP+9*, RRALOOP+11, RRALOOP+15, RRALOOP+21, RRALOOP+22, RRALOOP+23, RRALOOP+25, RRALOOP+31, RRALOOP+33
, RRALOOP+35, RRALOOP+36, RRALOOP+47, RRALOOP+49, RRALOOP+58*, RRBLOOP+8*, RRBLOOP+9*, RRBLOOP+11, RRBLOOP+15, RRBLOOP+21
, RRBLOOP+22, RRBLOOP+23, RRBLOOP+25, RRBLOOP+30, RRBLOOP+32, RRBLOOP+34, RRBLOOP+35, RRBLOOP+46, RRBLOOP+48, RRBLOOP+57*
, RRDLOOP+8*, RRDLOOP+9*, RRDLOOP+11, RRDLOOP+15, RRDLOOP+21, RRDLOOP+22, RRDLOOP+23, RRDLOOP+25, RRDLOOP+30, RRDLOOP+32
, RRDLOOP+34, RRDLOOP+35, RRDLOOP+46, RRDLOOP+48, RRDLOOP+57*, STORE+1, WRT+1, WRT+2, WRT+10, WRT+11
, WRT+13, WRT+14, WRT+15, WRT+16
>> APCLEDAT RRALOOP+42, RRBLOOP+41, RRDLOOP+41, HEADING+23, HEADING+25
>> APCLEND RRALOOP+36*, RRALOOP+44, RRALOOP+60*, RRBLOOP+35*, RRBLOOP+43, RRBLOOP+59*, RRDLOOP+35*, RRDLOOP+43, RRDLOOP+59*, STORE+1
, WRT+7, WRT+13*, WRT+18
>> APCLFAC RRALOOP+11, RRBLOOP+11, RRDLOOP+11, WRT+2, HEADING+5
>> APCLFLAG RRALOOP+30*, RRALOOP+34*, RRALOOP+38*, RRALOOP+40*, RRALOOP+42*, RRALOOP+44*, RRALOOP+45, RRBLOOP+29*, RRBLOOP+33*, RRBLOOP+37*
, RRBLOOP+39*, RRBLOOP+41*, RRBLOOP+43*, RRBLOOP+44, RRDLOOP+29*, RRDLOOP+33*, RRDLOOP+37*, RRDLOOP+39*, RRDLOOP+41*, RRDLOOP+43*
, RRDLOOP+44
>> APCLICTR RRALOOP+19, RRALOOP+20*, RRALOOP+21*, RRALOOP+22*, RRALOOP+23*, RRALOOP+25*, RRBLOOP+19, RRBLOOP+20*, RRBLOOP+21*, RRBLOOP+22*
, RRBLOOP+23*, RRBLOOP+25*, RRDLOOP+19, RRDLOOP+20*, RRDLOOP+21*, RRDLOOP+22*, RRDLOOP+23*, RRDLOOP+25*
>> APCLIEN RRALOOP+29*, RRALOOP+31*, RRALOOP+33, RRALOOP+34, RRALOOP+35, RRALOOP+36, RRBLOOP+28*, RRBLOOP+30*, RRBLOOP+32, RRBLOOP+33
, RRBLOOP+34, RRBLOOP+35, RRDLOOP+28*, RRDLOOP+30*, RRDLOOP+32, RRDLOOP+33, RRDLOOP+34, RRDLOOP+35, WRT+9*, WRT+10*
, WRT+11, WRT+13, WRT+14, WRT+15, WRT+16
>> APCLINAM RRALOOP+2*, RRBLOOP+2*, RRDLOOP+2*, HEADING+11
>> APCLOTH RRALOOP+19, RRALOOP+51, RRALOOP+52, RRBLOOP+19, RRBLOOP+50, RRBLOOP+51, RRDLOOP+19, RRDLOOP+50, RRDLOOP+51, HEADING+15
>> APCLPAGE RRALOOP+4*, RRBLOOP+4*, RRDLOOP+4*, HEADING+7*, HEADING+8
>> APCLRRNO RRALOOP+47*, RRALOOP+62*, RRBLOOP+46*, RRBLOOP+61*, RRDLOOP+46*, RRDLOOP+61*, STORE+1, WRT+4
>> APCLRRPR RRALOOP+48*, RRALOOP+50*, RRALOOP+61*, RRBLOOP+47*, RRBLOOP+49*, RRBLOOP+60*, RRDLOOP+47*, RRDLOOP+49*, RRDLOOP+60*, STORE+1
, WRT+3
>> APCLSORT RRALOOP+15, RRALOOP+16, RRBLOOP+15, RRBLOOP+16, RRDLOOP+15, RRDLOOP+16
>> APCLSRT RRALOOP+15*, RRALOOP+16*, RRALOOP+55*, RRALOOP+56*, RRALOOP+57, RRBLOOP+15*, RRBLOOP+16*, RRBLOOP+54*, RRBLOOP+55*, RRBLOOP+56
, RRDLOOP+15*, RRDLOOP+16*, RRDLOOP+54*, RRDLOOP+55*, RRDLOOP+56, STORE+1
>> APCLTYP WRT+14, WRT+15, WRT+16
DIR RRALOOP+66!, RRBLOOP+65!, RRDLOOP+65!
DIR(0 RRALOOP+66*, RRBLOOP+65*, RRDLOOP+65*
DT HEADING+3
>> DUOUT RRALOOP+9, RRALOOP+56, RRALOOP+65, RRALOOP+68, RRBLOOP+9, RRBLOOP+55, RRBLOOP+67, RRDLOOP+9, RRDLOOP+55, RRDLOOP+67
IOM HEADING+6, HEADING+12, HEADING+16, HEADING+26
IOSL RRALOOP+65, RRBLOOP+64, RRDLOOP+64
IOST RRALOOP+1, RRALOOP+66, RRBLOOP+1, RRBLOOP+65, RRDLOOP+1, RRDLOOP+65
U RRALOOP+15, RRALOOP+33, RRALOOP+35, RRALOOP+36, RRALOOP+49, RRALOOP+58, RRALOOP+59, RRALOOP+60, RRALOOP+61, RRALOOP+62
, RRBLOOP+15, RRBLOOP+32, RRBLOOP+34, RRBLOOP+35, RRBLOOP+48, RRBLOOP+57, RRBLOOP+58, RRBLOOP+59, RRBLOOP+60, RRBLOOP+61
, RRDLOOP+15, RRDLOOP+32, RRDLOOP+34, RRDLOOP+35, RRDLOOP+48, RRDLOOP+57, RRDLOOP+58, RRDLOOP+59, RRDLOOP+60, RRDLOOP+61
, STORE+1, WRT+1, WRT+11, WRT+13, WRT+14, WRT+15, WRT+16, HEADING+5
>> X RRALOOP+24*, RRALOOP+25*, RRALOOP+49*, RRALOOP+50, RRALOOP+57*, RRALOOP+58, RRALOOP+59, RRALOOP+60, RRALOOP+61, RRALOOP+62
, RRBLOOP+24*, RRBLOOP+25*, RRBLOOP+48*, RRBLOOP+49, RRBLOOP+56*, RRBLOOP+57, RRBLOOP+58, RRBLOOP+59, RRBLOOP+60, RRBLOOP+61
, RRDLOOP+24*, RRDLOOP+25*, RRDLOOP+48*, RRDLOOP+49, RRDLOOP+56*, RRDLOOP+57, RRDLOOP+58, RRDLOOP+59, RRDLOOP+60, RRDLOOP+61
, HEADING+3*, HEADING+4, HEADING+5*, HEADING+6, HEADING+11*, HEADING+12, HEADING+14*, HEADING+15*, HEADING+16, HEADING+18*
, HEADING+19*, HEADING+21*, HEADING+22*, HEADING+24*, HEADING+25*, HEADING+26
>> Y RRALOOP+11*, RRALOOP+12, RRALOOP+13, RRALOOP+16, RRALOOP+27, RRBLOOP+11*, RRBLOOP+12, RRBLOOP+13, RRBLOOP+16, RRDLOOP+11*
, RRDLOOP+12, RRDLOOP+13, RRDLOOP+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All