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 | Global Variables Directly Accessed | Label References | Naked Globals | Local Variables | All

Print Page as PDF

Routine: APCLOSP1

Package: Patient Care Component Reports

Routine: APCLOSP1

Information

APCLOSP1 ; IHS/CMI/LAB - CONTINUATION OF APCLOSP1 ; 01 Nov 2010 11:33 AM

Source Information

Source file <APCLOSP1.m>

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Patient Care Component Reports	2	HEAD^APCLOSP CALC^APCLOSUT
DRG Grouper	1	$$ICDDX^ICDEX

Entry Points

External References

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"DIRECT INPATIENT" Line Location: INPT+2
Function Call: WRITE	Prompt: !?10,"[ NO DIRECT INPATIENT DATA TO REPORT ]",! Line Location: INPT+3
Function Call: WRITE	Prompt: !!,"There were ",X," discharges (",Z,") during this period, accounting for" Line Location: INPT+5
Function Call: WRITE	Prompt: !,X," patient days (",Z,"). The average length of stay was " Line Location: INPT+7
Function Call: WRITE	Prompt: X," days compared",!,"to an ALOS of ",Y," during this period last year." Line Location: INPT+9
Function Call: WRITE	Prompt: !!,"In addition, there ",$S(APCLNBC("APCLOS")>1:"were",1:"was")," ",APCLNBC("APCLOS")," newborn discharge",$S(APCLNBC("APCLOS")>1:"s",1:"")," accounting",!,"for ",APCLNBDY("APCLOS")," days." Line Location: INPT+12
Function Call: WRITE	Prompt: !!,"The Five leading primary diagnoses for hospitalizations were:",! Line Location: INPT+13
Function Call: WRITE	Prompt: !!,"The Top Ten admitting diagnoses for hospitalizations were:",! Line Location: INPT+16
Function Call: WRITE	Prompt: !?5,APCLC,"). ",?10,$E($P($$ICDDX^ICDEX(APCLD),U,4),1,32),?45,X,?52,"(",Z,")" Line Location: INPT2+7
Function Call: WRITE	Prompt: !?5,APCLC,"). ",?10,$E($P($$ICDDX^ICDEX(APCLD),U,4),1,32),?45,X,?52,"(",Z,")" Line Location: ADMDX2+7
Function Call: WRITE	Prompt: !!,"PHARMACY" Line Location: RX+2
Function Call: WRITE	Prompt: !?10,"[ NO PHARMACY DATA TO REPORT ]",! Line Location: RX+3
Function Call: WRITE	Prompt: !!,"There were ",X," new prescriptions (",Z,") and " Line Location: RX+5
Function Call: WRITE	Prompt: X," refills (",Z,")",!,"during this period." Line Location: RX+7
Function Call: WRITE	Prompt: !!,"CONTRACT HEALTH SERVICES" Line Location: CHS+2
Function Call: WRITE	Prompt: !?10,"[ NO CHS DATA TO REPORT ]",! Line Location: CHS+3
Function Call: WRITE	Prompt: !!,"Total CHS expenditures (obligations adjusted by payments) for this period were",!,X," (",Z,"). The number and dollar amount of authorizations by type were:",! Line Location: CHS+5
Function Call: WRITE	Prompt: !?5,APCLTYPE,?40,^XTMP("APCLOS",APCLJOB,APCLBTH,"CHSCOUNT",APCLN,APCLTYPE),?50,^XTMP("APCLOS",APCLJOB,APCLBTH,"CHS",APCLN,APCLTYPE) Line Location: CHS2+2

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Info | Source | Call Graph | Entry Points | External References | Interaction Calls | Global Variables Directly Accessed | Label References | Naked Globals | Local Variables | All