Routine: APCLWL1P

Information

APCLWL1P ; IHS/CMI/LAB - CLINIC HOURLY WORKLOAD REPORT ;

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
VA Fileman	3	DD^%DT (DW,NOW)^%DTC ^DIR
IHS VA Utilities	1	$$VAL^XBDIQ1
Patient Care Component Reports	1	DONE^APCLOSUT

Entry Points

Name	Comments	DBIA/ICR reference
SORT	;
HEAD
HEAD1	;
DOC	;This routine is the "printing" part of the Clinic Hourly Workload
START	;Start of routine
DONE	;

External References

Name	Field # of Occurrence
DD^%DT	START+2, START+3
DW^%DTC	SORT+2
NOW^%DTC	START+2
DONE^APCLOSUT	DONE+1
^DIR	HEAD+1
$$VAL^XBDIQ1	HEAD1+12

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?2,"Totals: " Line Location: START+9
Function Call: WRITE	Prompt: ! Line Location: START+12
Function Call: WRITE	Prompt: !,$E(APCLDATE,4,5),"/",$E(APCLDATE,6,7),?7,APCLDOW Line Location: SORT+3
Function Call: WRITE	Prompt: ?APCLTAB,$J(^XTMP("APCLWL1",APCLJOB,APCLBT,"DATE",APCLDATE,APCLTIME),3) Line Location: SORT+5
Function Call: WRITE	Prompt: ?APCLTAB," ." Line Location: SORT+6
Function Call: WRITE	Prompt: ! Line Location: HEAD+1
Function Call: WRITE	Prompt: ?52,"CLINIC HOURLY WORKLOAD REPORT",?100,APCLDT,?123,"Page ",APCLPG,! Line Location: HEAD1+2
Function Call: WRITE	Prompt: ?((132-APCLLENG)/2),"LOCATION OF VISITS: ",APCLLOCT,! Line Location: HEAD1+5
Function Call: WRITE	Prompt: ?((132-APCLLENG)/2),"CLINIC: ",APCLCLNT,! Line Location: HEAD1+8
Function Call: WRITE	Prompt: ?45,"VISIT DATES: ",APCLBDD," TO ",APCLEDD,! Line Location: HEAD1+9
Function Call: WRITE	Prompt: ?45,"AGE RANGE: ",APCLAGET,! Line Location: HEAD1+10
Function Call: WRITE	Prompt: ?55,"PROVIDER: "_$$VAL^XBDIQ1(APCLFILE,APCLPROV,.01) Line Location: HEAD1+12
Function Call: WRITE	Prompt: ?59,"PROVIDER: ALL" Line Location: HEAD1+13
Function Call: WRITE	Prompt: !?1,"DATE",?7,"DOW",?12,"12AM",?17,"1AM",?22,"2AM",?27,"3AM",?32,"4AM",?37,"5AM",?42,"6AM",?47,"7AM",?52,"8AM",?57,"9AM",?62,"10AM",?67,"11AM" Line Location: HEAD1+14
Function Call: WRITE	Prompt: ?72,"12PM",?77,"1PM",?82,"2PM",?87,"3PM",?92,"4PM",?97,"5PM",?102,"6PM",?107,"7PM",?112,"8PM",?117,"9PM",?122,"10PM",?127,"11PM",! Line Location: HEAD1+15
Function Call: WRITE	Prompt: APCL132S Line Location: HEAD1+16
Routine Call	DIR Line Location: HEAD+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(9000010.06	HEAD1+11
^DIC(4 - [#4]	HEAD1+3
^DIC(40.7 - [#40.7]	HEAD1+6
^XTMP("APCLWL1"	START+6, START+11, DONE+2!, SORT+5

Label References

Name	Line Occurrences
DONE	START+7, START+8
HEAD	START+4, START+8, SORT+1
HEAD1	HEAD
SORT	START+6

Naked Globals

Name	Field # of Occurrence
^(	START+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCL132S	START+1*, HEAD1+16
>> APCLAGET	HEAD1+10
>> APCLBD	START+3
>> APCLBDD	START+3*, HEAD1+9
>> APCLBT	START+6, START+11, DONE+2, SORT+5
>> APCLCLN	HEAD1+6
>> APCLCLNT	HEAD1+6*, HEAD1+7, HEAD1+8
>> APCLDATE	START+4, START+6, SORT+2, SORT+3, SORT+5
>> APCLDOW	SORT+2*, SORT+3
>> APCLDT	START+2*, HEAD1+2
>> APCLED	START+3
>> APCLEDD	START+3*, HEAD1+9
>> APCLFILE	HEAD1+11*, HEAD1+12
>> APCLJOB	START+6, START+11, DONE+2, SORT+5
>> APCLLENG	HEAD1+4, HEAD1+5, HEAD1+7, HEAD1+8
>> APCLLOC	HEAD1+3
>> APCLLOCT	HEAD1+3*, HEAD1+4, HEAD1+5
>> APCLPG	START+4, HEAD, HEAD1+1, HEAD1+2
>> APCLPROV	HEAD1+12, HEAD1+13
APCLQUIT	START+5!, START+6, START+7, START+8, START+10, SORT+1, SORT+4, HEAD+1*
>> APCLTAB	START+10, START+11, SORT+4, SORT+5, SORT+6, SORT+7
>> APCLTIME	START+10, START+11, SORT+4, SORT+5
DIR	HEAD+1!
DIR(0	HEAD+1*
>> DTOUT	HEAD+1
IO	HEAD+1
IO(0	HEAD+1
IOF	HEAD1+1
IOSL	START+8, SORT+1
IOST	HEAD+1
U	HEAD1+3, HEAD1+6, HEAD1+11
>> X	START+2, SORT+2*
>> Y	START+2, START+3, HEAD+1

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLWL1P

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: