Routine: APCLOSP5

Information

APCLOSP5 ; IHS/CMI/LAB - PRINT INHOSP. SECTION ;

Package	Total	Call Graph
Patient Care Component Reports	3	HEAD^APCLOSP ^APCLOSP6 CALC^APCLOSUT

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"IN-HOSPITAL VISITS" Line Location: INHOSP+2
Function Call: WRITE	Prompt: !?10,"[ NO IN-HOSPITAL VISITS TO REPORT ]",! Line Location: INHOSP+3
Function Call: WRITE	Prompt: !!,"There were a total of ",X," In-Hospital visits (",Z,") during the period for",!,"all visit types, including CHS.",! Line Location: INHOSP+5
Function Call: WRITE	Prompt: !,"They are broken down below by Type, Location, Service Category, Clinic,",!,"Provider Discipline and leading Diagnoses. ",! Line Location: INHOSP+6
Function Call: WRITE	Prompt: !!?10,APCLT Line Location: PROC+3
Function Call: WRITE	Prompt: !?10,APCLT Line Location: PRNT+1
Function Call: WRITE	Prompt: " (cont.)" Condition for execution: APCLWC>0 Line Location: PRNT+1
Function Call: WRITE	Prompt: !?13,APCLD,?45,$J(X,7),?55,"(",Z,")" Line Location: PRNT+4
Function Call: WRITE	Prompt: !?13,$P(@G@(0),U,APCLPIEC),?45,$J(X,7),?55,"(",Z,")" Line Location: PRNTPTR+2
Function Call: WRITE	Prompt: !?15,"TOTAL:",?45,$J(APCLTOTC,8),?55,"(",Z,")" Line Location: TOTAL+2

Name	Line Occurrences (* Changed, ! Killed)
^XTMP("APCLOS"	INHOSP+3, INHOSP+4, GETLINE+1, PROC+4, PROC1+1, PRNT+2
^XTMP("APCLOSP"	INHOSP+3, INHOSP+4, GETLINE+2, PRNT+2

Name	Field # of Occurrence
^(	PRNT+2
^("INHOSPVCOUNT"	INHOSP+4

Name	Field # of Occurrence
APCL1	TYPE+1, LOC+1, OLOC+1, PROV+1, EOJ+1!, GETLINE+1, GETLINE+2, PRNT+2
APCL2	TYPE+1, LOC+1, OLOC+1, PROV+1, EOJ+1!, PROC+4, PROC1+1, PRNT+2
APCL3	EOJ+1!
>> APCLBTH	INHOSP+3, INHOSP+4, GETLINE+1, GETLINE+2, PROC+4, PROC1+1, PRNT+2
>> APCLD	PROC1+1*, PRNT+2, PRNT+4, PRNTPTR+1
>> APCLGLOB	LOC+1*, PRNTPTR+1
>> APCLJOB	INHOSP+3, INHOSP+4, GETLINE+1, GETLINE+2, PROC+4, PROC1+1, PRNT+2
APCLLC	EOJ+1!, GETLINE+1*
>> APCLLWC	OLOC+1*
>> APCLN	PROC+4*, PROC1+1, PRNT+2
>> APCLPIEC	LOC+1*, PRNTPTR+2
>> APCLPTR	TYPE+1, LOC+1, OLOC+1, PROV+1, PRNT+3
>> APCLQUIT	INHOSP+1, TYPE+2, LOC+2, OLOC+2, PROV+2, PROC+2, PROC+4, PRNT+1
APCLT	TYPE+1, LOC+1, OLOC+1, PROV+1, EOJ+1!, PROC+3, PRNT+1
>> APCLTOT	TYPE+1, LOC+1, OLOC+1, PROV+1, PROC+5
APCLTOTC	EOJ+1!, GETLINE+1*, TOTAL+1, TOTAL+2
APCLTOTO	EOJ+1!, GETLINE+1, GETLINE+2, TOTAL+1
>> APCLWC	TYPE+1, LOC+1, PROV+1, PRNT+1, PRNT+4, PRNTPTR+2*
APCLX	EOJ+1!, GETLINE+1, GETLINE+2
>> G	PRNTPTR+1*, PRNTPTR+2
IOSL	INHOSP+1, PROC+2, PRNT+1
U	PRNTPTR+2
>> X	INHOSP+4, INHOSP+5, PRNT+2, PRNT+4, PRNTPTR+2, TOTAL+1*
>> Y	INHOSP+4, PRNT+2, TOTAL+1*
>> Z	INHOSP+5, PRNT+4, PRNTPTR+2, TOTAL+2