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 |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PXRRWLPF

Package: PCE Patient Care Encounter

Routine: PXRRWLPF


Information

PXRRWLPF ;ISL/PKR - Printing functions for the encounter summary report. ;8/26/97

Source Information

Source file <PXRRWLPF.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
PCE Patient Care Encounter 2 (HDR,PAGE)^PXRRGPRT  $$STRREP^PXRRUTIL  
VA Fileman 2 HELP^DIE  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
PCE Patient Care Encounter 1 PXRRWLPR  

Entry Points

Name Comments DBIA/ICR reference
WDIVIDER(START) ;Write the header divider.
WFACTOT ;Write the facility totals.
RETSOC(FILE,FIELD,SOC) ;Return the set of codes for field FIELD of
HEAD(NEWPAGE) ;If necessary, write the header.
NP
GTOTAL ;Add the facility totals to the grand totals.
PAGE ;form feed to new page
WGTOTAL ;Write the grand totals.

External References

Name Field # of Occurrence
HELP^DIE RETSOC+3
^DIR PAGE+4
HDR^PXRRGPRT PAGE+8
PAGE^PXRRGPRT HEAD+6
$$STRREP^PXRRUTIL RETSOC+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Facility: ",FACPNAME
  • Line Location: HEAD+8
Function Call: WRITE
  • Prompt: !,?C1HS,BY
  • Line Location: HEAD+9
Function Call: WRITE
  • Prompt: !,?C3HS," E&M CATEGORIES NON NO TOT TOT UNIQ IN OUT"
  • Line Location: HEAD+10
Function Call: WRITE
  • Prompt: !,?C2HS,"PCE:",?C3HS," NEW EST CON OTH E&M CPT ENC VIS SSN PAT PAT"
  • Line Location: HEAD+11
Function Call: WRITE
  • Prompt: !,?C2HS,"SCH:",?C3HS," C&P 10-10 SCH UNS"
  • Line Location: HEAD+13
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+14
Function Call: WRITE
  • Prompt: "="
  • Line Location: HEAD+14
Function Call: WRITE
  • Prompt: !
  • Line Location: PAGE+3
Function Call: WRITE
  • Prompt: !,?START
  • Line Location: WDIVIDER+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: WDIVIDER+2
Function Call: WRITE
  • Prompt: !!,?C1HS,FACPNAME," (totals)"
  • Line Location: WFACTOT+2
Function Call: WRITE
  • Prompt: !,?C2HS,"PCE:"
  • Line Location: WFACTOT+3
Function Call: WRITE
  • Prompt: ?C3S
  • Line Location: WFACTOT+4
Function Call: WRITE
  • Prompt: $J(FTNEW,6)
  • Line Location: WFACTOT+5
Function Call: WRITE
  • Prompt: $J(FTEST,6)
  • Line Location: WFACTOT+6
Function Call: WRITE
  • Prompt: $J(FTCON,6)
  • Line Location: WFACTOT+7
Function Call: WRITE
  • Prompt: $J(FTOTH,6)
  • Line Location: WFACTOT+8
Function Call: WRITE
  • Prompt: $J(FTNOEM,6)
  • Line Location: WFACTOT+9
Function Call: WRITE
  • Prompt: $J(FTNOCPT,6)
  • Line Location: WFACTOT+10
Function Call: WRITE
  • Prompt: $J(FTTENC,7)
  • Line Location: WFACTOT+11
Function Call: WRITE
  • Prompt: $J(FTTVIS,6)
  • Line Location: WFACTOT+12
Function Call: WRITE
  • Prompt: $J(FTSSN,6)
  • Line Location: WFACTOT+13
Function Call: WRITE
  • Prompt: $J(FTINP,6)
  • Line Location: WFACTOT+14
Function Call: WRITE
  • Prompt: $J(FTOP,6)
  • Line Location: WFACTOT+15
Function Call: WRITE
  • Prompt: !,?C2HS,"SCH:"
  • Line Location: WFACTOT+19
Function Call: WRITE
  • Prompt: ?C3HS,$J(FTCP,6)
  • Line Location: WFACTOT+20
Function Call: WRITE
  • Prompt: $J(FTTEN,6)
  • Line Location: WFACTOT+21
Function Call: WRITE
  • Prompt: $J(FTSCH,6)
  • Line Location: WFACTOT+22
Function Call: WRITE
  • Prompt: $J(FTUNS,6)
  • Line Location: WFACTOT+23
Function Call: WRITE
  • Prompt: !!,?C1HS,"GRAND TOTALS"
  • Line Location: WGTOTAL+2
Function Call: WRITE
  • Prompt: !,?C2HS,"PCE:"
  • Line Location: WGTOTAL+3
Function Call: WRITE
  • Prompt: ?C3S
  • Line Location: WGTOTAL+4
Function Call: WRITE
  • Prompt: $J(GTNEW,6)
  • Line Location: WGTOTAL+5
Function Call: WRITE
  • Prompt: $J(GTEST,6)
  • Line Location: WGTOTAL+6
Function Call: WRITE
  • Prompt: $J(GTCON,6)
  • Line Location: WGTOTAL+7
Function Call: WRITE
  • Prompt: $J(GTOTH,6)
  • Line Location: WGTOTAL+8
Function Call: WRITE
  • Prompt: $J(GTNOEM,6)
  • Line Location: WGTOTAL+9
Function Call: WRITE
  • Prompt: $J(GTNOCPT,6)
  • Line Location: WGTOTAL+10
Function Call: WRITE
  • Prompt: $J(GTTENC,7)
  • Line Location: WGTOTAL+11
Function Call: WRITE
  • Prompt: $J(GTTVIS,6)
  • Line Location: WGTOTAL+12
Function Call: WRITE
  • Prompt: $J(GTSSN,6)
  • Line Location: WGTOTAL+13
Function Call: WRITE
  • Prompt: $J(GTINP,6)
  • Line Location: WGTOTAL+14
Function Call: WRITE
  • Prompt: $J(GTOP,6)
  • Line Location: WGTOTAL+15
Function Call: WRITE
  • Prompt: !,?C2HS,"SCH:"
  • Line Location: WGTOTAL+19
Function Call: WRITE
  • Prompt: ?C3HS,$J(GTCP,6)
  • Line Location: WGTOTAL+20
Function Call: WRITE
  • Prompt: $J(GTTEN,6)
  • Line Location: WGTOTAL+21
Function Call: WRITE
  • Prompt: $J(GTSCH,6)
  • Line Location: WGTOTAL+22
Function Call: WRITE
  • Prompt: $J(GTUNS,6)
  • Line Location: WGTOTAL+23
Routine Call
  • DIE
  • Line Location:
    • RETSOC+3
Routine Call
  • DIR
  • Line Location:
    • PAGE+4

Label References

Name Line Occurrences
HEAD WFACTOT+1, WGTOTAL+1
NP HEAD+7
PAGE HEAD+1, HEAD+2
WDIVIDER HEAD+12, WFACTOT+18, WGTOTAL+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BMARG HEAD+2, HEAD+6, WFACTOT+1, WGTOTAL+1
>> BY HEAD+9
>> C1HS HEAD+9, WFACTOT+2, WGTOTAL+2
>> C2HS HEAD+11, HEAD+12, HEAD+13, WFACTOT+3, WFACTOT+18, WFACTOT+19, WGTOTAL+3, WGTOTAL+18, WGTOTAL+19
>> C3HS HEAD+10, HEAD+11, HEAD+13, WFACTOT+20, WGTOTAL+20
>> C3S WFACTOT+4, WGTOTAL+4
CODE RETSOC+2~, RETSOC+8*, RETSOC+9, RETSOC+11
DIR PAGE+4!
DIR(0 PAGE+2*
>> DIROUT PAGE+5
>> DONE HEAD+3, HEAD+7, PAGE+5*
>> DTOUT PAGE+5
>> DUOUT PAGE+5
>> FACPNAME HEAD+8, WFACTOT+2
FIELD RETSOC~, RETSOC+3
FILE RETSOC~, RETSOC+3
>> FTCON GTOTAL+1, WFACTOT+7
>> FTCP GTOTAL+12, WFACTOT+20
>> FTEST GTOTAL+2, WFACTOT+6
>> FTINP GTOTAL+3, WFACTOT+14
>> FTNEW GTOTAL+4, WFACTOT+5
>> FTNOCPT GTOTAL+6, WFACTOT+10
>> FTNOEM GTOTAL+5, WFACTOT+9
>> FTOP GTOTAL+7, WFACTOT+15
>> FTOTH GTOTAL+8, WFACTOT+8
>> FTSCH GTOTAL+13, WFACTOT+22
>> FTSSN GTOTAL+9, WFACTOT+13
>> FTTEN GTOTAL+14, WFACTOT+21
>> FTTENC GTOTAL+10, WFACTOT+11
>> FTTVIS GTOTAL+11, WFACTOT+12
>> FTUNS GTOTAL+15, WFACTOT+23
>> GTCON GTOTAL+1*, WGTOTAL+7
>> GTCP GTOTAL+12*, WGTOTAL+20
>> GTEST GTOTAL+2*, WGTOTAL+6
>> GTINP GTOTAL+3*, WGTOTAL+14
>> GTNEW GTOTAL+4*, WGTOTAL+5
>> GTNOCPT GTOTAL+6*, WGTOTAL+10
>> GTNOEM GTOTAL+5*, WGTOTAL+9
>> GTOP GTOTAL+7*, WGTOTAL+15
>> GTOTH GTOTAL+8*, WGTOTAL+8
>> GTSCH GTOTAL+13*, WGTOTAL+22
>> GTSSN GTOTAL+9*, WGTOTAL+13
>> GTTEN GTOTAL+14*, WGTOTAL+21
>> GTTENC GTOTAL+10*, WGTOTAL+11
>> GTTVIS GTOTAL+11*, WGTOTAL+12
>> GTUNS GTOTAL+15*, WGTOTAL+23
>> HEAD HEAD+4, NP*, PAGE+9*
IC HEAD+5~, HEAD+14*, RETSOC+2~, RETSOC+6*, RETSOC+7, WDIVIDER+1~, WDIVIDER+2*
IO PAGE+1
IO(0 PAGE+1
IOF PAGE+6
IOSL HEAD+2, HEAD+6, WFACTOT+1, WGTOTAL+1
IOST PAGE+1
NEWPAGE HEAD~, HEAD+1
>> PAGE PAGE+7*, PAGE+8
SOC RETSOC~
SOC( RETSOC+11*
START WDIVIDER~, WDIVIDER+2
TEMP RETSOC+2~, RETSOC+7*, RETSOC+8, RETSOC+9*, RETSOC+10*, RETSOC+11
TSOC RETSOC+2~
TSOC("DIHELP" RETSOC+6, RETSOC+7
U RETSOC+9, RETSOC+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All