Routine: SCRPI01A

Package	Total	Call Graph
Kernel	2	$$S^%ZTLOAD ($$DT,$$FMTE)^XLFDT
Registration	2	PID^VADPT6 $$FDATE^VALM1
Scheduling	2	$$SELMTHD^SCRPI01 (CTR,PARSE)^SCRPIUT1
VA Fileman	1	^DIR

Package	Total	Caller Graph
Scheduling	1	SCRPI01

Entry Points

Name	Comments	DBIA/ICR reference
HDR(SDIV,SDCLN)	; Print report header, if abort flag is set, then quit ; Input ; SDIV - Division Name ; SDCLN - Clinic Name
HDR1	; Report header for no data found. Prints modified header.
LINE(SDTMP)	; Print formatted line of the report. Check if task has been stopped by user. ; Set abort flag to quit if stopped. ; Input ; SDTMP - formatted line to print
NEXTLEV(SRT)	; Print out any sublevels of the user selection parameters
SELPAGE	; Print on last page the user parameters used for the report.
PRINT	; Begin printing report ; Variables ; PAGE - Page Number ; SDIV - Division Name ; SDCLN - Clinic Name ; SDNAME - Patient Name ; SDT - Encounter Date ; SCABORT - Abort report flag

External References

Name	Field # of Occurrence
$$S^%ZTLOAD	LINE+15
^DIR	HDR+12, SELPAGE+5
$$SELMTHD^SCRPI01	HDR+32, HDR1+6
CTR^SCRPIUT1	HDR+21, HDR+25, HDR+29, HDR+33, HDR+40, HDR1+4, HDR1+7, SELPAGE+13, SELPAGE+15
PARSE^SCRPIUT1	LINE+39
PID^VADPT6	LINE+27
$$FDATE^VALM1	HDR+18, HDR1+2, SELPAGE+11
$$DT^XLFDT	HDR+18, HDR1+2, SELPAGE+11
$$FMTE^XLFDT	LINE+30, HDR+28, HDR1+3, SELPAGE+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Report stopped by user" Line Location: LINE+17
Function Call: WRITE	Prompt: !,$S('NONAME:$E(SDNAME,1,25),1:" "),?27,$S('NONAME:VA("BID"),1:" ") Line Location: LINE+28
Function Call: WRITE	Prompt: ?33,$S($P(SDTMP,U,3)]"":$P(SDTMP,U,3),1:" ")," " Line Location: LINE+29
Function Call: WRITE	Prompt: $$FMTE^XLFDT(SDT,"2FP"),?55,$S($P(SCERR,U,2)="V":"VISTA",$P(SCERR,U,2)="N":"NPCD ",1:"UNK "),?62,$P(SCERR,U) Line Location: LINE+30
Function Call: WRITE	Prompt: ?68,X Line Location: LINE+36
Function Call: WRITE	Prompt: ?68,X1,!?68,X2 Line Location: LINE+40
Function Call: WRITE	Prompt: @IOF Line Location: HDR+10
Function Call: WRITE	Prompt: @IOF Line Location: HDR+13
Function Call: WRITE	Prompt: @IOF Line Location: HDR+15
Function Call: WRITE	Prompt: !?2,"Date: ",$$FDATE^VALM1($$DT^XLFDT),?((IOM/2)-22),"Incomplete Encounter Management Error Listing",?(IOM-13),"Page: ",PAGE Line Location: HDR+18
Function Call: WRITE	Prompt: !,X Line Location: HDR+22
Function Call: WRITE	Prompt: !,X Line Location: HDR+26
Function Call: WRITE	Prompt: !,X Line Location: HDR+30
Function Call: WRITE	Prompt: !,X Line Location: HDR+34
Function Call: WRITE	Prompt: !!!,?35,"Encounter",?54,"Error",?62,"Error" Line Location: HDR+36
Function Call: WRITE	Prompt: !,"Patient Name",?27,"SSN",?35,"Date/Time",?54,"Srce",?62,"Code",?68,"Description" Line Location: HDR+37
Function Call: WRITE	Prompt: !,DBLDASH Line Location: HDR+38
Function Call: WRITE	Prompt: !,X,! Line Location: HDR+41
Function Call: WRITE	Prompt: !?2,"Date: ",$$FDATE^VALM1($$DT^XLFDT),?((IOM/2)-22),"Incomplete Encounter Management Error Listing" Line Location: HDR1+2
Function Call: WRITE	Prompt: !,X Line Location: HDR1+5
Function Call: WRITE	Prompt: !,X,!! Line Location: HDR1+8
Function Call: WRITE	Prompt: !?5,"No errors found" Line Location: HDR1+9
Function Call: WRITE	Prompt: @IOF Line Location: SELPAGE+3
Function Call: WRITE	Prompt: @IOF Line Location: SELPAGE+6
Function Call: WRITE	Prompt: @IOF Line Location: SELPAGE+8
Function Call: WRITE	Prompt: !?2,"Date: ",$$FDATE^VALM1($$DT^XLFDT),?((IOM/2)-22),"Incomplete Encounter Management Error Listing",?(IOM-13),"Page: ",PAGE Line Location: SELPAGE+11
Function Call: WRITE	Prompt: !!?10,"Divisions: ",$S(VAUTD:"All",1:"") Line Location: SELPAGE+17
Function Call: WRITE	Prompt: !?15,VAUTD(SDIV) Line Location: SELPAGE+18
Function Call: WRITE	Prompt: !!?10,"Clinics: ",$S(VAUTC:"All",1:"") Line Location: NEXTLEV+4
Function Call: WRITE	Prompt: !?15,VAUTC(SDITEM) Line Location: NEXTLEV+5
Function Call: WRITE	Prompt: !!?10,"Patients: ",$S(VAUTN:"All",1:"") Line Location: NEXTLEV+8
Function Call: WRITE	Prompt: !?15,VAUTN(SDITEM) Line Location: NEXTLEV+9
Function Call: WRITE	Prompt: !!?10,"Error Codes: ",$S(VAUER:"All",1:"") Line Location: NEXTLEV+12
Function Call: WRITE	Prompt: !?15,VAUER(SDITEM)," ",$E($P(^SD(409.76,SDITEM,1),U),1,60) Line Location: NEXTLEV+13
Function Call: WRITE	Prompt: !!?10,"Clinic Stop Codes: ",$S(VAUDS:"All",1:"") Line Location: NEXTLEV+16
Function Call: WRITE	Prompt: !?15,VAUDS(SDITEM) Line Location: NEXTLEV+17
Routine Call	DIR Line Location: HDR+12 SELPAGE+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SD(409.75 - [#409.75]	LINE+22, LINE+23, LINE+24
^SD(409.76 - [#409.76]	LINE+23, LINE+24, NEXTLEV+13
^TMP("SCRPI ERR"	PRINT+14, PRINT+16, PRINT+18, PRINT+22, PRINT+24, PRINT+26

Label References

Name	Line Occurrences
HDR	PRINT+19, LINE+19
HDR1	PRINT+14
LINE	PRINT+26
NEXTLEV	HDR1+10, HDR1+11, SELPAGE+20, SELPAGE+21
SELPAGE	PRINT+28

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DASH	PRINT+9~, PRINT+11*
DBLDASH	PRINT+9~, PRINT+11*, HDR+38
DFN	LINE+12~, LINE+26*
DIR	HDR+12!, SELPAGE+5!
DIR(0	HDR+12, SELPAGE+5
IOF	HDR+10, HDR+13, HDR+15, SELPAGE+3, SELPAGE+6, SELPAGE+8
IOM	PRINT+11, HDR+18, HDR+21, HDR+25, HDR+29, HDR+33, HDR+40, HDR1+2, HDR1+4, HDR1+7 , SELPAGE+11, SELPAGE+13, SELPAGE+15
IOSL	LINE+19
IOST	HDR+10, HDR+11, SELPAGE+3, SELPAGE+4
NONAME	PRINT+9~, PRINT+23, LINE+28, LINE+41
PAGE	PRINT+9~, PRINT+12, HDR+10, HDR+11, HDR+15, HDR+17, HDR+18, SELPAGE+3, SELPAGE+4, SELPAGE+8 , SELPAGE+10*, SELPAGE+11
SCABORT	PRINT+9~, PRINT+16, PRINT+18, PRINT+20, PRINT+22, PRINT+24, PRINT+26, LINE+16, HDR+11, HDR+12 , SELPAGE+4, SELPAGE+5*
SCERR	LINE+12~, LINE+23*, LINE+30
SCERR1	LINE+12~, LINE+24*, LINE+34
SDCLN	PRINT+9~, PRINT+17, PRINT+18, PRINT+19, PRINT+22, PRINT+24, PRINT+26, LINE+19, HDR~, HDR+24 , SELPAGE+1~
SDDSS	SELPAGE+1~
>> SDDT	HDR+28, HDR1+3, SELPAGE+14
>> SDER	PRINT+25, PRINT+26, LINE+22, LINE+23, LINE+24
SDERR	SELPAGE+1~
SDITEM	NEXTLEV+1~, NEXTLEV+5, NEXTLEV+9, NEXTLEV+13, NEXTLEV+17
SDIV	PRINT+9~, PRINT+12, PRINT+16, PRINT+18, PRINT+19, PRINT+22, PRINT+24, PRINT+26, LINE+19, HDR~ , HDR+20, SELPAGE+1~, SELPAGE+18*
SDL	HDR+8~
SDNAME	PRINT+9~, PRINT+21, PRINT+22, PRINT+24, PRINT+26, LINE+28
SDPAT	SELPAGE+1~
>> SDSEL1	HDR+32, HDR1+6, HDR1+10, SELPAGE+20
>> SDSEL2	HDR+32, HDR1+6, HDR1+11, SELPAGE+21
SDT	PRINT+9~, PRINT+23, PRINT+24, PRINT+26, LINE+30
SDTMP	LINE~, LINE+26, LINE+29
SRT	NEXTLEV~, NEXTLEV+3, NEXTLEV+7, NEXTLEV+11, NEXTLEV+15
U	LINE+23, LINE+24, LINE+26, LINE+29, LINE+30, LINE+34, HDR+28, HDR1+3, SELPAGE+14, NEXTLEV+13
VA	LINE+42!
VA("BID"	LINE+28
>> VAUDS	NEXTLEV+16, NEXTLEV+17
>> VAUDS(	NEXTLEV+17
>> VAUER	NEXTLEV+12, NEXTLEV+13
>> VAUER(	NEXTLEV+13
>> VAUTC	NEXTLEV+4, NEXTLEV+5
>> VAUTC(	NEXTLEV+5
>> VAUTD	SELPAGE+17, SELPAGE+18
>> VAUTD(	SELPAGE+18
>> VAUTN	NEXTLEV+8, NEXTLEV+9
>> VAUTN(	NEXTLEV+9
X	LINE+12~, LINE+34, LINE+35, LINE+36, LINE+39, HDR+8~, HDR+20, HDR+21, HDR+22, HDR+24* , HDR+25, HDR+26, HDR+28, HDR+29, HDR+30, HDR+32, HDR+33, HDR+34, HDR+39, HDR+40 , HDR+41, HDR1+3, HDR1+4, HDR1+5, HDR1+6, HDR1+7, HDR1+8, SELPAGE+12, SELPAGE+13, SELPAGE+14* , SELPAGE+15
X1	LINE+12~, LINE+38!, LINE+39, LINE+40
X2	LINE+12~, LINE+38!, LINE+39, LINE+40
>> Y	HDR+12, SELPAGE+5

Customize PDF page

Package: Scheduling

Routine: SCRPI01A

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: