Routine: SD53103A

Package	Total	Call Graph
PCE Patient Care Encounter	3	($$DATA2PCE,DISPVSIT)^PXAPI ^VSIT $$GETVID^VSITVID
Scheduling	3	PROC^SCDXUTL0 ($$INIT,$$MODE,$$OK,$$RANGE,HDR,OE,RESULTS)^SD53103B $$INP^SDAM2
Kernel	2	(,$$S)^%ZTLOAD $$FMTE^XLFDT
VA Fileman	2	^DIC ^DIE

Entry Points

Name	Comments	DBIA/ICR reference
RESYNCQ
VSIT(SDOE)	; -- get/find visit
SET(SDOE,ARRAY,FILE)	;Set-up Array for Outpatient Encounter ; Input -- SDOE Outpatient Encounter IEN ; Output -- ARRAY Provider or dx Array Subscripted by a ien
MSGQ
DATA2PCE(SDOE)	; -- send data to pce
SCAN	; -- entry point to scan encounter file for -1's to either ; 'count only' or 'count and fix'
SCREEN(SDOE0)	; -- process screen for -1's and null ID's
MSG(SDOE,STATUS)	; -- build display text
BUILDQ
ONE	; -- entry point to select a single -1 encounter and resync
QUEUE	; queue job
ONEQ
BUILD(SDPROV,SDDX,SDCLASS,SDCPT,SDATA)	; -- build pce data array
SETQ
DATAQ
VSITQ
OESET(SDOE,SDVST)	; -- set oe visit field
RESYNC(SDOE)	; -- resync sd and pce data
SCANQ
DOT	; -- write '.' if ok to talk
DQ	; -- dequeue point...collect results and generate message.

External References

Name	Field # of Occurrence
^%ZTLOAD	QUEUE+5
$$S^%ZTLOAD	DQ+4
^DIC	ONE+6
^DIE	OESET+11
$$DATA2PCE^PXAPI	DATA2PCE+28
DISPVSIT^PXAPI	VSIT+41, VSIT+44
PROC^SCDXUTL0	DATA2PCE+15
$$INIT^SD53103B	ONE+2, SCAN+5
$$MODE^SD53103B	SCAN+12
$$OK^SD53103B	ONE+10, SCAN+15
$$RANGE^SD53103B	SCAN+9
HDR^SD53103B	ONE+4, SCAN+6
OE^SD53103B	ONE+9, ONE+15
RESULTS^SD53103B	DQ+14
$$INP^SDAM2	VSIT+20, VSIT+29
^VSIT	VSIT+56
$$GETVID^VSITVID	OESET+6
$$FMTE^XLFDT	MSG+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ONE+4
Function Call: WRITE	Prompt: "Re-Linked successfully:" Line Location: ONE+14
Function Call: WRITE	Prompt: $C(7),"Error has occurred.",!,"Please make a note of the following: ",!?10,SDX,! Line Location: ONE+17
Function Call: WRITE	Prompt: ! Line Location: QUEUE+2
Function Call: WRITE	Prompt: !!,"Task queued: #",ZTSK Line Location: QUEUE+6
Function Call: WRITE	Prompt: "." Line Location: DOT+2
Routine Call	DIE Line Location: OESET+11
Routine Call	DIC Line Location: ONE+6

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^SCE - [#409.68]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVCPT("AD"	DATA2PCE+9
^AUPNVPOV("AD"	DATA2PCE+9
^AUPNVPRV("AD"	DATA2PCE+9
^AUPNVSIT - [#9000010]	OESET+4, OESET+8*
^AUPNVSIT("VID"	OESET+7!, OESET+9*
^DG(40.8 - [#40.8]	VSIT+21
^DPT - [#2]	MSG+6, VSIT+22
^PX(815 - [#815]	VSIT+41, VSIT+55
^SC - [#44]	MSG+8
^SCE - [#409.68]	DQ+7, MSG+2, RESYNC+3, VSIT+3, VSIT+12, VSIT+24, VSIT+47, VSIT+51, VSIT+55, DATA2PCE+5
^SCE("APAR"	RESYNC+20, VSIT+50, DATA2PCE+19
^SCE("B"	DQ+4, DQ+6
^SDD(	SET+6, SET+7
^TMP("SDVISIT FIX"	DQ+3

Label References

Name	Line Occurrences
$$DATA2PCE	RESYNC+23
$$MSG	ONE+12, DQ+11, DQ+12
$$RESYNC	ONE+12, DQ+12
$$SCREEN	DQ+9
$$VSIT	RESYNC+7
BUILD	DATA2PCE+25
DATAQ	DATA2PCE+5, DATA2PCE+6, DATA2PCE+9
DOT	RESYNC+9, OESET+12, DATA2PCE+12, DATA2PCE+13, DATA2PCE+14, DATA2PCE+15, DATA2PCE+20, DATA2PCE+21, DATA2PCE+22
MSGQ	MSG+3
OESET	RESYNC+12, RESYNC+20
ONEQ	ONE+2, ONE+5
QUEUE	SCAN+17
RESYNCQ	RESYNC+4, RESYNC+8, RESYNC+15
SCANQ	SCAN+5, SCAN+9, SCAN+12, SCAN+15
SET	DATA2PCE+12, DATA2PCE+13, DATA2PCE+14, DATA2PCE+20, DATA2PCE+21, DATA2PCE+22
VSITQ	VSIT+4, VSIT+7, VSIT+11, VSIT+34

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARRAY	SET~, SET+8
DA	OESET+1~, OESET+11*, VSIT+1~
DFN	VSIT+1~, VSIT+17*, VSIT+20, VSIT+22, VSIT+29, VSIT+34
DIC	ONE+1~, ONE+6*, VSIT+1~
DIC("S"	ONE+6*
DIC(0	ONE+6*
DIE	OESET+1~, OESET+11*, VSIT+1~
DR	OESET+1~, OESET+11*, VSIT+1~
FILE	SET~, SET+6, SET+7
I	QUEUE+1~, QUEUE+4*
ID	OESET+5~, OESET+6*, OESET+8, OESET+9
SDATA	BUILD~, BUILD+4, BUILD+12, BUILD+20, BUILD+21, BUILD+37, BUILD+38
SDBEG	SCAN+2~, SCAN+9, DQ+3, DQ+14
SDCLASS	BUILD~, BUILD+2, BUILD+3
SDCLS	DATA2PCE+1~
SDCNT	DQ+1~, DQ+3, DQ+10, DQ+11, DQ+12, DQ+14, RESYNC+1~, BUILD+1~, BUILD+8, BUILD+11 , BUILD+12, BUILD+16, BUILD+19, BUILD+20, BUILD+21, BUILD+27, BUILD+33, BUILD+36*, BUILD+37, BUILD+38
SDCPT	BUILD~, BUILD+24, BUILD+28, BUILD+29
SDDT	DQ+1~, DQ+3, DQ+4, DQ+6
SDDX	BUILD~, BUILD+15, BUILD+17, BUILD+18
SDEND	SCAN+2~, SCAN+9, DQ+4, DQ+14
SDEXIT	ONE+1~, ONE+3, ONE+5, ONE+7
SDI	BUILD+1~, BUILD+2*, BUILD+3
SDIAG	DATA2PCE+1~
SDIEN	BUILD+1~, BUILD+8, BUILD+9, BUILD+10, BUILD+16, BUILD+17, BUILD+18, BUILD+27, BUILD+28, BUILD+29 , BUILD+33, BUILD+34, BUILD+35, BUILD+37, SET+4~, SET+5, SET+6, SET+7, SET+8
SDMODE	SCAN+2~, SCAN+12*, DQ+11, DQ+12, DQ+14
SDMSG	MSG+1~, MSG+3, MSG+4, MSG+5, MSG+6, MSG+7, MSG+8, MSGQ
SDOE	ONE+1~, ONE+9, ONE+12, ONE+15, DQ+1~, DQ+5, DQ+6*, DQ+7, DQ+11, DQ+12 , MSG~, MSG+2, MSG+3, MSG+5, RESYNC~, RESYNC+3, RESYNC+7, RESYNC+12, RESYNC+20, RESYNC+23 , OESET~, OESET+11, VSIT~, VSIT+3, VSIT+47, VSIT+50, DATA2PCE~, DATA2PCE+5, DATA2PCE+12, DATA2PCE+13 , DATA2PCE+14, DATA2PCE+15, DATA2PCE+19, SET~, SET+6
SDOE0	DQ+1~, DQ+7, DQ+9, SCREEN~, SCREEN+3, SCREEN+5, SCREEN+7, SCREEN+9, MSG+1~, MSG+2 , MSG+3, MSG+5, MSG+6, MSG+7, MSG+8, RESYNC+1~, RESYNC+3, RESYNC+4, RESYNC+15, VSIT+1~ , VSIT+3, VSIT+4, VSIT+7, VSIT+10, VSIT+16, VSIT+17, VSIT+19, VSIT+21, VSIT+22, VSIT+23 , VSIT+24, VSIT+25, VSIT+28, VSIT+39, VSIT+41, VSIT+53, VSIT+55, DATA2PCE+1~, DATA2PCE+5*, DATA2PCE+6
SDOEC	RESYNC+1~, RESYNC+19, RESYNC+20, VSIT+49~, VSIT+50, VSIT+51, DATA2PCE+1~, DATA2PCE+18, DATA2PCE+19, DATA2PCE+20 , DATA2PCE+21, DATA2PCE+22
SDOEP	VSIT+1~, VSIT+10*, VSIT+11, VSIT+12
SDOK	SCREEN+1~, RESYNC+1~, RESYNC+2, RESYNC+16, RESYNC+23, RESYNCQ, DATA2PCE+1~, DATA2PCE+2, DATA2PCE+9, DATA2PCE+29 , DATAQ
SDPCE	DATA2PCE+1~
SDPKG	ONE+1~, SCAN+2~, DATA2PCE+28
SDPROC	DATA2PCE+1~
SDPROV	BUILD~, BUILD+7, BUILD+9, BUILD+10
SDPRV	DATA2PCE+1~
SDRT	DQ+1~, DQ+3*, DQ+11, DQ+12, DQ+14, DQ+15
SDTALK	ONE+1~, ONE+3*, SCAN+2~, VSIT+43, DOT+1
SDVST	RESYNC+1~, RESYNC+7, RESYNC+8, RESYNC+12, RESYNC+20, OESET~, OESET+4, OESET+7, OESET+8, OESET+9 , OESET+11, VSIT+1~, VSIT+2, VSIT+7, VSIT+11, VSIT+12, VSIT+58, VSITQ, DATA2PCE+1~, DATA2PCE+6 , DATA2PCE+9, DATA2PCE+28
SDX	ONE+11~, ONE+12*, ONE+13, ONE+17, BUILD+26~
SDX(	BUILD+30*, BUILD+34, BUILD+35
STATUS	MSG~, MSG+4
U	ONE+13, SCREEN+5, SCREEN+7, SCREEN+9, MSG+3, MSG+5, MSG+6, MSG+7, MSG+8, RESYNC+15 , OESET+4, OESET+8, VSIT+7, VSIT+10, VSIT+12, VSIT+17, VSIT+19, VSIT+21, VSIT+22, VSIT+23 , VSIT+24, VSIT+25, VSIT+28, VSIT+39, VSIT+41, VSIT+47, VSIT+51, VSIT+53, VSIT+55, DATA2PCE+6 , BUILD+4, BUILD+21
VSIT	VSIT+1~, VSIT+16, VSIT+20, VSIT+24, VSIT+29, VSIT+34
VSIT("CLN"	VSIT+19*, VSIT+34
VSIT("ELG"	VSIT+22*, VSIT+34
VSIT("IEN"	VSIT+46, VSIT+58
VSIT("INS"	VSIT+21*, VSIT+34
VSIT("LNK"	VSIT+24*
VSIT("LOC"	VSIT+23*, VSIT+46, VSIT+47, VSIT+51
VSIT("PRI"	VSIT+26, VSIT+29, VSIT+31*
VSIT("SVC"	VSIT+20, VSIT+29
VSIT(0	VSIT+15*
VSITPKG	VSIT+1~, VSIT+18*
X	VSIT+1~, VSIT+24, DATA2PCE+1~, BUILD+1~, BUILD+3, BUILD+4, BUILD+10, BUILD+12, BUILD+18, BUILD+20 , BUILD+21, BUILD+29, BUILD+30, BUILD+35, BUILD+38, SET+7*, SET+8
Y	ONE+1~, ONE+7, ONE+9
ZTDESC	QUEUE+1~, QUEUE+3*
ZTIO	QUEUE+1~, QUEUE+3*
ZTRTN	QUEUE+1~, QUEUE+3*
ZTSAVE	QUEUE+1~
ZTSAVE(	QUEUE+4*
ZTSK	QUEUE+1~, QUEUE+6

Customize PDF page

Package: Scheduling

Routine: SD53103A

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: