Routine: SCRPI01

Package	Total	Call Graph
Scheduling	4	$$ASKDT^SCENI01 PRINT^SCRPI01A $$DIV^SCRPIUT1 $$OPENC^SCUTIE1
Kernel	2	HOME^%ZIS EN^XUTMDEVQ
Registration	1	(CLINIC,FIRST,PATIENT)^VAUTOMA
VA Fileman	1	^DIR

Package	Total	Caller Graph
Scheduling	1	SCRPI01A

Entry Points

Name	Comments	DBIA/ICR reference
CLN	; Clinic selection o/m/a
EN	; Main entry point for report of incomplete encounters report ; Variables ; SDTXT - String array for initial message display ; SDDT - date Range, Begin^End ; SDSEL1,2 - Selection methods Line Tag ; SDOK - Flag, 1 - Ok to continu, 0 - Quit
PAT	; Patient selection o/m/a
RPT	; Build report, then call print
ERR	; Error selection o/m/a
SELCT(S1,SCT)	; Set selection criteria ; Input ; S1 - Previous selection method ; SCT - first or second selection method
MSG2	;
DSS	; Clinic Stop code selection o/m/a
HLP	; '??' help for the selection criteria.
ENQ
MSG	;
EXIT	;
BLD1(SDE,SDX)	; If error passes checks, add to sorted TMP global ; Input ; SDE - Pointer to #409.75 ; SDX - Pointer to #409.73
SELMTHD(SEL)	; Returns 'external' version of selection method
BLD	; Search for incomplete encounters and build TMP global ; Variables ; SDEND - End date of date range ; SDOE - Encounter IEN ; SDOEDT - Encounter date ; SDCNT - Entry count
OPTIONS	; Selection methods

External References

Name	Field # of Occurrence
HOME^%ZIS	EN+29
^DIR	EN+13, SELCT+23
$$ASKDT^SCENI01	EN+19
PRINT^SCRPI01A	RPT+3
$$DIV^SCRPIUT1	EN+15
$$OPENC^SCUTIE1	BLD1+19
CLINIC^VAUTOMA	CLN+3
FIRST^VAUTOMA	ERR+3, DSS+3
PATIENT^VAUTOMA	PAT+3
EN^XUTMDEVQ	EN+28

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$C(7) Line Location: EN+9
Function Call: WRITE	Prompt: !,SDTXT Line Location: EN+11
Function Call: WRITE	Prompt: !! Line Location: EN+12
Function Call: WRITE	Prompt: !!,"This report requires 132 columns and could take some time.",!,"Remember to QUEUE the report.",! Line Location: EN+27
Function Call: WRITE	Prompt: !!,"Clinic Selection" Line Location: CLN+1
Function Call: WRITE	Prompt: ! Line Location: CLN+4
Function Call: WRITE	Prompt: !!,"Patient Selection" Line Location: PAT+1
Function Call: WRITE	Prompt: ! Line Location: PAT+4
Function Call: WRITE	Prompt: !!,"Transmission Error Selection" Line Location: ERR+1
Function Call: WRITE	Prompt: ! Line Location: ERR+4
Function Call: WRITE	Prompt: !!,"Clinic Stop Code Selection" Line Location: DSS+1
Function Call: WRITE	Prompt: ! Line Location: DSS+4
Function Call: WRITE	Prompt: !?2,"You may select any two of the following selection criteria, one at a time, for" Line Location: HLP+2
Function Call: WRITE	Prompt: !?2,"your report. You will be asked for one/many/all selections for each criteria" Line Location: HLP+3
Function Call: WRITE	Prompt: !?2,"selected." Line Location: HLP+4
Function Call: WRITE	Prompt: ! Line Location: HLP+5
Function Call: WRITE	Prompt: !?2,"Selection criteria are not sort criteria. The sort criteria are Division," Line Location: HLP+6
Function Call: WRITE	Prompt: !?2,"Clinic, Patient, and Encounter. Selection criteria limit what will be" Line Location: HLP+7
Function Call: WRITE	Prompt: !?2,"printed in the report." Line Location: HLP+8
Function Call: WRITE	Prompt: !!! Line Location: MSG2+1
Function Call: WRITE	Prompt: "The following are selection criteria which are used to specify a group of or" Line Location: MSG2+2
Function Call: WRITE	Prompt: !,"particular clinic, patient, error code or clinic stop code to be printed." Line Location: MSG2+3
Function Call: WRITE	Prompt: !,"You are asked to pick two, one at a time. Type '??' for more details." Line Location: MSG2+4
Routine Call	%ZIS Line Location: EN+29
Routine Call	DIR Line Location: EN+13 SELCT+23

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(40.7 - [#40.7]	Classic Fileman Calls
^SD(409.76 - [#409.76]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	BLD1+42
^DPT - [#2]	BLD1+42
^SC - [#44]	BLD1+42
^SCE - [#409.68]	BLD1+27, BLD1+28
^SD(409.74 - [#409.74]	BLD1+24, BLD1+25
^SD(409.75 - [#409.75]	BLD+10, BLD+11, BLD+12, BLD1+34, BLD1+39
^TMP("SCRPI ERR"	RPT+1!, EXIT+1!, BLD1+42*

Label References

Name	Line Occurrences
$$SELCT	EN+17, EN+18
@(	EN+21, EN+22
BLD	RPT+2
BLD1	BLD+12
ENQ	EN+15, EN+17, EN+18, EN+19
MSG2	EN+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CNT	SELCT+14~, SELCT+16*
>> DIC	ERR+2, DSS+2
DIR	EN+13!, SELCT+23!
DIR("?"	SELCT+21*
DIR("??"	SELCT+22*
DIR("A"	SELCT+20*
DIR(0	EN+13, SELCT+20
>> IOP	EN+26*
NDX	EN+7~, EN+10*
S1	SELCT~, SELCT+17
SCEN	BLD1+15~
SCEN("CLINIC"	BLD1+32, BLD1+37, BLD1+42
SCEN("DELIEN"	BLD1+24, BLD1+25
SCEN("DFN"	BLD1+33, BLD1+38, BLD1+42
SCEN("ENCOUNTER"	BLD1+42
SCEN("SDOIEN"	BLD1+27, BLD1+28
SCT	SELCT~, SELCT+20
SCTEXT	SELCT+14~, SELCT+16*, SELCT+17, SELCT+18
SDCDE	BLD1+15~, BLD1+25, BLD1+28, BLD1+35, BLD1+40
SDCNT	BLD+7~, BLD+9, BLD1+17
SDDEL	BLD1+15~, BLD1+21*, BLD1+42
SDDT	EN+7~, EN+19, BLD+9
SDE	BLD1~, BLD1+34, BLD1+39, BLD1+42
SDEND	BLD+7~, BLD+9*, BLD+10
SDIV	BLD1+15~, BLD1+24, BLD1+27, BLD1+30, BLD1+42
SDOE	BLD+7~
SDOEDT	BLD+7~, BLD+9, BLD+10, BLD+11, BLD+12
SDOK	EN+7~, EN+21, EN+22, CLN+5, PAT+5, ERR+5, DSS+5
SDRSLT	BLD1+15~, BLD1+19*, BLD1+20, BLD1+21, BLD1+23
SDSEL1	EN+7~, EN+17*, EN+18, EN+21, BLD1+32, BLD1+33, BLD1+34, BLD1+35
SDSEL2	EN+7~, EN+18*, EN+22, BLD1+37, BLD1+38, BLD1+39, BLD1+40
SDTXT	EN+7~, EN+10*, EN+11
SDX	BLD1~, BLD1+42
>> SDXER	BLD+12*
>> SDXMT	BLD+11*, BLD+12, BLD1+19
SEL	SELMTHD~, SELMTHD+1
U	BLD+9, BLD1+24, BLD1+25, BLD1+27, BLD1+28, BLD1+34, BLD1+39, BLD1+42
VAUDS	EN+7~, BLD1+35, BLD1+40
VAUDS(	BLD1+35, BLD1+40
VAUER	EN+7~, BLD1+34, BLD1+39
VAUER(	BLD1+34, BLD1+39
VAUTC	EN+7~, BLD1+32, BLD1+37
VAUTC(	BLD1+32, BLD1+37
VAUTD	EN+7~, BLD1+30
VAUTD(	BLD1+30
VAUTN	EN+7~, BLD1+33, BLD1+38
VAUTN(	BLD1+33, BLD1+38
VAUTNI	EN+7~, CLN+2, PAT+2, ERR+2, DSS+2
VAUTSTR	EN+7~, ERR+2, DSS+2
VAUTVB	EN+7~, ERR+2, DSS+2
X	EN+24, EN+25, SELCT+14~, SELCT+15, SELCT+18*, SELCT+20
>> Y	EN+13, SELCT+24, CLN+5, PAT+5, ERR+5
>> ZTQUEUED	BLD1+17
ZTSAVE	EN+7~, EN+28
ZTSAVE(	EN+25*

Customize PDF page

Package: Scheduling

Routine: SCRPI01

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(MSG+NDX	EN+10
$T(OPTIONS+CNT	SELCT+16