Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

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

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
Info |  Source |  Entry Points |  Interaction Calls