Routine: EHMAPPT1

Package	Total	Call Graph
VA FileMan	7	^%DT C^%DTC ^DIC DT^DICRW ^DIE $$GET1^DIQ ^DIR
Electronic Health Modernization	4	($$ADDAPPT,$$CENTER,$$CONTINUE,$$DASHES,$$ENCTRSTS,$$FMTDTTM,$$MPTYNCTR)^EHM13UTIL (CNVSELCT,CNVTDAPT)^EHMAPPT (POSTLIVE,POSTSLCT)^EHMAPPT0 $$APPDEL^EHMSDEC8
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$FMTE^XLFDT
Registration	2	$$CRNRSITE^VAFCCRNR $$SITE^VASITE
Scheduling	2	DOW^SDM0 SDEC^SDNACT

Name	Comments	DBIA/ICR reference
CNVTDCLN	;
SELCTAPPT(ADDFLAG)	;
MARKCNVTD	;
MARKCANC	;
CANCAPPT	;
INACTLIST	;
INACTLS1	; TaskMan start point
APPTCNT(SCIEN)	; ; ; Returns number of active current and future appointments for a clinic.
INACTHDR(TITLE)	;
INACTVAT	;
SDNACT(SC,SDDATE)	;ALB/TMP - INACTIVATE A CLINIC ;Mar 25, 2021@15:05:56
D	;
OVR
CHECK	;
DEL	;
CHG1	;;wtc ;K SDN S X1=SDDATE,X2=6 D C^%DTC S SDNL=X,X=SDDATE D DOW^SDM0 S SDN(Y)=X
A1
A
GOT
END	;
CONTINUE()	;

Name	Field # of Occurrence
^%DT	INACTVAT+12
C^%DTC	D+5, CHG1+1, CHG1+2, CHG1+3
^%ZIS	INACTLIST+8
^%ZISC	INACTLS1+36
^%ZTLOAD	INACTLIST+17
^DIC	SELCTAPPT+8, SELCTAPPT+9
DT^DICRW	SDNACT+14
^DIE	OVR+3
$$GET1^DIQ	SELCTAPPT+20, APPTCNT+7, INACTVAT+22, INACTVAT+29, INACTVAT+30
^DIR	SELCTAPPT+10, SELCTAPPT+22, INACTLIST+6, CONTINUE+5
$$ADDAPPT^EHM13UTIL	CNVTDCLN+31, SELCTAPPT+30, CANCAPPT+32
$$CENTER^EHM13UTIL	MARKCNVTD+7, MARKCANC+7, INACTHDR+2
$$CONTINUE^EHM13UTIL	INACTLS1+14
$$DASHES^EHM13UTIL	SELCTAPPT+12, INACTHDR+3, INACTVAT+34
$$ENCTRSTS^EHM13UTIL	CNVTDCLN+36, SELCTAPPT+16, CANCAPPT+37
$$FMTDTTM^EHM13UTIL	CNVTDCLN+32, CNVTDCLN+37, CNVTDCLN+42, CANCAPPT+33, CANCAPPT+38, CANCAPPT+43
$$MPTYNCTR^EHM13UTIL	CNVTDCLN+36, SELCTAPPT+16, CANCAPPT+37
CNVSELCT^EHMAPPT	CNVTDCLN+11
CNVTDAPT^EHMAPPT	CNVTDCLN+13
POSTLIVE^EHMAPPT0	CANCAPPT+12
POSTSLCT^EHMAPPT0	CANCAPPT+11
$$APPDEL^EHMSDEC8	CNVTDCLN+41, MARKCNVTD+9, MARKCANC+9, CANCAPPT+42
DOW^SDM0	D+5, CHG1+1, CHG1+3
SDEC^SDNACT	OVR+4
$$CRNRSITE^VAFCCRNR	CNVTDCLN+4, MARKCNVTD+4, MARKCANC+4, CANCAPPT+4, INACTVAT+4
$$SITE^VASITE	CNVTDCLN+4, MARKCNVTD+4, MARKCANC+4, CANCAPPT+4, INACTVAT+4
$$FMTE^XLFDT	SELCTAPPT+17, SELCTAPPT+18, SELCTAPPT+20

Interaction Calls

Name	Line Occurrences
Function Call: READ	Formatting: ! Prompt: "Pre [RETURN] to continue" Variable: X Timeout: $G(DTIME,300) Line Location: CNVTDCLN+4
Function Call: WRITE	Prompt: !!,"* CAN BE RUN ON CONVERTED SITES ONLY *",! Line Location: CNVTDCLN+4
Function Call: WRITE	Prompt: !!,"* This option marks all selected appointments CONVERTED and cancels associated downstream file entries. *",! Line Location: CNVTDCLN+8
Function Call: WRITE	Prompt: !,$$FMTDTTM^EHM13UTIL(APPTDTTM),?16,$P(SORT2,U,1),?48,$P(SORT3,U,1)," cannot be automatically converted. Database entry - file #409.84 - not defined.",! Line Location: CNVTDCLN+32
Function Call: WRITE	Prompt: !,$$FMTDTTM^EHM13UTIL(APPTDTTM),?16,$P(SORT2,U,1),?48,$P(SORT3,U,1)," cannot be automatically converted. Appointment has ACTION REQUIRED encounter.",! Line Location: CNVTDCLN+37
Function Call: WRITE	Prompt: $$FMTDTTM^EHM13UTIL(APPTDTTM),?16,$P(SORT2,U,1),"...",$S(RSLT:"OK",1:$P(RSLT,U,2)),! Line Location: CNVTDCLN+42
Function Call: WRITE	Prompt: !!?5,"Appointment Date/Time",?30,"Encounter Status",!,?5,$$DASHES^EHM13UTIL(21),?30,$$DASHES^EHM13UTIL(30),! Line Location: SELCTAPPT+12
Function Call: WRITE	Prompt: $J(COUNT,2),".",?5,$$FMTE^XLFDT(APPTDTTM),?30,ENCTRSTS,! Line Location: SELCTAPPT+17
Function Call: WRITE	Prompt: ?5,$$FMTE^XLFDT(APPTDTTM),?30,ENCTRSTS,! Line Location: SELCTAPPT+18
Function Call: WRITE	Prompt: !,"No eligible appointments on file on ",$$FMTE^XLFDT(APPTDATE)," for ",$$GET1^DIQ(2,DFN,.01),!,"in the ",$$GET1^DIQ(44,SCIEN,.01)," clinic." Line Location: SELCTAPPT+20
Function Call: WRITE	Prompt: !,"Add appointment for file #409.84 failed" Line Location: SELCTAPPT+30
Function Call: READ	Formatting: ! Prompt: "Press [RETURN] to continue" Variable: X Timeout: $G(DTIME,300) Line Location: MARKCNVTD+4
Function Call: WRITE	Prompt: !!,"* CAN BE RUN ON CONVERTED SITES ONLY *",! Line Location: MARKCNVTD+4
Function Call: WRITE	Prompt: @IOF,$$CENTER^EHM13UTIL("Mark appointment converted",IOM),! Line Location: MARKCNVTD+7
Function Call: WRITE	Prompt: !,"MARKED CONVERTED",! Line Location: MARKCNVTD+10
Function Call: WRITE	Prompt: "FAILED. ERROR MESSAGE: ",$P(RSLT,U,2),! Line Location: MARKCNVTD+11
Function Call: READ	Formatting: ! Prompt: "Press [RETURN] to continue" Variable: X Timeout: $G(DTIME,300) Line Location: MARKCANC+4
Function Call: WRITE	Prompt: !!,"* CAN BE RUN ON CONVERTED SITES ONLY *",! Line Location: MARKCANC+4
Function Call: WRITE	Prompt: @IOF,$$CENTER^EHM13UTIL("Mark appointment cancelled - duplicate",IOM),! Line Location: MARKCANC+7
Function Call: WRITE	Prompt: !,"MARKED CANCELLED",! Line Location: MARKCANC+10
Function Call: WRITE	Prompt: "FAILED. ERROR MESSAGE: ",$P(RSLT,U,2),! Line Location: MARKCANC+11
Function Call: READ	Formatting: ! Prompt: "Press [RETURN] to continue" Variable: X Timeout: $G(DTIME,300) Line Location: CANCAPPT+4
Function Call: WRITE	Prompt: !!,"* CAN BE RUN ON CONVERTED SITES ONLY *",! Line Location: CANCAPPT+4
Function Call: WRITE	Prompt: !!,"* This option CANCELS all of the selected appointments and associated downstream file entries. *",! Line Location: CANCAPPT+6
Function Call: WRITE	Prompt: !,$$FMTDTTM^EHM13UTIL(APPTDTTM),?16,$P(SORT2,U,1),?48,$P(SORT3,U,1)," cannot be automatically cancelled. Database entry - file #409.84 - not defined.",! Line Location: CANCAPPT+33
Function Call: WRITE	Prompt: !,$$FMTDTTM^EHM13UTIL(APPTDTTM),?16,$P(SORT2,U,1),?48,$P(SORT3,U,1)," cannot be automatically cancelled. Appointment has ACTION REQUIRED encounter.",! Line Location: CANCAPPT+38
Function Call: WRITE	Prompt: $$FMTDTTM^EHM13UTIL(APPTDTTM),?16,$P(SORT2,U,1),"...",$S(RSLT:"OK",1:$P(RSLT,U,2)),! Line Location: CANCAPPT+43
Function Call: WRITE	Prompt: $S($D(ZTSK):"...Task queued",1:"...Task cancelled"),! Line Location: INACTLIST+17
Function Call: WRITE	Prompt: CLINIC,?32,"ACTIVE POST GO-LIVE",! Line Location: INACTLS1+21
Function Call: WRITE	Prompt: CLINIC,?32,"INACTIVE",! Line Location: INACTLS1+22
Function Call: WRITE	Prompt: CLINIC,?32,"CANNOT BE INACTIVATED. ",APPTCNT," APPOINTMENT",$S(APPTCNT>1:"S",1:"")," PRESENT.",! Line Location: INACTLS1+25
Function Call: WRITE	Prompt: CLINIC,?32,"ELIGIBLE FOR INACTIVATION",! Line Location: INACTLS1+26
Function Call: WRITE	Prompt: ! Line Location: INACTLS1+28
Function Call: WRITE	Prompt: "Clinics eligible for inactivation: ",COUNT("ELIGIBLE"),! Line Location: INACTLS1+29
Function Call: WRITE	Prompt: "Clinics with active appointments: ",COUNT("APPOINTMENTS"),! Line Location: INACTLS1+30
Function Call: WRITE	Prompt: "Inactive clinics: ",COUNT("INACTIVE"),! Line Location: INACTLS1+31
Function Call: WRITE	Prompt: "Clinics active post go-live: ",COUNT("ACTIVE POST"),! Line Location: INACTLS1+32
Function Call: READ	Formatting: ! Prompt: "Press [RETURN] to continue" Variable: X Timeout: $G(DTIME,300) Line Location: INACTLS1+34
Function Call: WRITE	Prompt: @IOF,$$CENTER^EHM13UTIL(TITLE,IOM),! Line Location: INACTHDR+2
Function Call: WRITE	Prompt: !,"CLINIC",?32,"STATUS",!,$$DASHES^EHM13UTIL(30),?32,$$DASHES^EHM13UTIL(45),! Line Location: INACTHDR+3
Function Call: READ	Formatting: ! Prompt: "Press [RETURN] to continue" Variable: X Timeout: $G(DTIME,300) Line Location: INACTVAT+4
Function Call: WRITE	Prompt: !!,"* CAN BE RUN ON CONVERTED SITES ONLY *",! Line Location: INACTVAT+4
Function Call: WRITE	Prompt: !!,"* This option INACTIVATES all eligible clinics. *",! Line Location: INACTVAT+14
Function Call: WRITE	Prompt: !,"Inactivating clinics..." Line Location: INACTVAT+21
Function Call: WRITE	Prompt: !!,"CLINIC",?32,"STATUS",?46,"REASON",! Line Location: INACTVAT+33
Function Call: WRITE	Prompt: $$DASHES^EHM13UTIL(30),?32,$$DASHES^EHM13UTIL(11),?46,$$DASHES^EHM13UTIL(30),! Line Location: INACTVAT+34
Function Call: WRITE	Prompt: CLINNAME,?32,"INACTIVATED",! Line Location: INACTVAT+37
Function Call: WRITE	Prompt: CLINNAME,?32,"FAILED",?46,$P(X,": ",2),! Line Location: INACTVAT+38
Function Call: WRITE	Prompt: ! Line Location: INACTVAT+40
Function Call: WRITE	Prompt: "CLINICS INACTIVATED: ",COUNT("INACTIVATED"),! Line Location: INACTVAT+41
Function Call: WRITE	Prompt: "INACTIVATION FAILED: ",COUNT("FAILED"),! Line Location: INACTVAT+42
Function Call: WRITE	Prompt: ?5,"Future appointments: ",COUNT("FAILED","Future appointments"),! Line Location: INACTVAT+43
Routine Call	DIC Line Location: SELCTAPPT+8 SELCTAPPT+9
Routine Call	DIE Line Location: OVR+3
Routine Call	DIR Line Location: SELCTAPPT+10 SELCTAPPT+22 INACTLIST+6 CONTINUE+5
Routine Call	%ZIS Line Location: INACTLIST+8

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^SC - [#44]	Classic Fileman Calls, GET1^DIQ
44.003	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	SELCTAPPT+15
^EHRM(1610 - [#1610]	CANCAPPT+21, INACTLS1+21, INACTVAT+24
^SC - [#44]	SELCTAPPT+13, SELCTAPPT+14, INACTLS1+8, INACTLS1+22, APPTCNT+6, APPTCNT+7, INACTVAT+22, INACTVAT+26, D+5, D+6 , OVR, OVR+1, OVR+2, CHG1+3, CHG1+4!, A1!, A, A+1!, GOT, GOT+1! , GOT+2*
^SC("B"	INACTLS1+7, INACTLS1+8
^SDEC(409.84 - [#409.84]	SELCTAPPT+27
^TMP($J	CNVTDCLN+17, CNVTDCLN+18, CNVTDCLN+19, CNVTDCLN+22, CNVTDCLN+23, CNVTDCLN+24, CNVTDCLN+44!, SELCTAPPT+12!, SELCTAPPT+17, SELCTAPPT+20! , SELCTAPPT+24, SELCTAPPT+25!, CANCAPPT+16, CANCAPPT+17, CANCAPPT+18, CANCAPPT+23, CANCAPPT+24, CANCAPPT+25, CANCAPPT+45!, INACTVAT+8! , INACTVAT+29, INACTVAT+30*, INACTVAT+35, INACTVAT+45!

Name	Line Occurrences
$$APPTCNT	INACTLS1+24, D+2
$$CONTINUE	CNVTDCLN+9, CANCAPPT+7, INACTVAT+15
$$SDNACT	INACTVAT+28
$$SELCTAPPT	MARKCNVTD+8, MARKCANC+8
A	CHG1+3
A1	CHG1+3
CHG1	D+4
END	D+3, OVR+5
GOT	D+6
INACTHDR	INACTLS1+3, INACTLS1+14, INACTLS1+18
OVR	D+4

Name	Field # of Occurrence
^(	SELCTAPPT+14, SELCTAPPT+24, APPTCNT+7, INACTVAT+35, OVR!, OVR+1!, OVR+2!
^("I"	INACTLS1+22, INACTVAT+26
^(0	SELCTAPPT+27, CHG1+3, A1, A, GOT+1, GOT+2*
^(1	CHG1+3, A1*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	INACTLIST+4~, INACTVAT+6~, INACTVAT+12!*
%DT("A"	INACTVAT+12*
%ZIS	INACTLIST+4~, INACTLIST+8*
A	SDNACT+9~
ADDFLAG	SELCTAPPT~, SELCTAPPT+29
APPTCNT	INACTLIST+4~, INACTLS1+24, INACTLS1+25, APPTCNT+4~, APPTCNT+6, APPTCNT+7*, APPTCNT+9
APPTDATE	SELCTAPPT+6~, SELCTAPPT+10*, SELCTAPPT+12, SELCTAPPT+13, SELCTAPPT+20
APPTDTTM	CNVTDCLN+6~, CNVTDCLN+20, CNVTDCLN+31, CNVTDCLN+32, CNVTDCLN+37, CNVTDCLN+42, SELCTAPPT+6~, SELCTAPPT+12, SELCTAPPT+13, SELCTAPPT+14 , SELCTAPPT+15, SELCTAPPT+17, SELCTAPPT+18, SELCTAPPT+24, SELCTAPPT+27, SELCTAPPT+30, CANCAPPT+9~, CANCAPPT+19, CANCAPPT+32, CANCAPPT+33 , CANCAPPT+38, CANCAPPT+43, INACTLIST+4~, APPTCNT+4~, APPTCNT+6, APPTCNT+7
CLINFLTR	CNVTDCLN+6~, CNVTDCLN+11, CNVTDCLN+13, CANCAPPT+9~, CANCAPPT+11, CANCAPPT+12
CLINIC	CNVTDCLN+6~, CNVTDCLN+20, CNVTDCLN+31, CANCAPPT+9~, CANCAPPT+19, CANCAPPT+21, CANCAPPT+32, INACTLIST+4~, INACTLS1+6, INACTLS1+7 , INACTLS1+8, INACTLS1+21, INACTLS1+22, INACTLS1+25, INACTLS1+26
CLINICS	CNVTDCLN+6~, CNVTDCLN+11, CNVTDCLN+13, CANCAPPT+9~, CANCAPPT+11, CANCAPPT+12
CLINNAME	INACTVAT+6~, INACTVAT+35*, INACTVAT+37, INACTVAT+38
CNT	SDNACT+9~
CONVDATE	CNVTDCLN+6~, CNVTDCLN+11, CNVTDCLN+13, CANCAPPT+9~, CANCAPPT+11, CANCAPPT+12, INACTLIST+4~, INACTVAT+6~, INACTVAT+12*, INACTVAT+28
COUNT	SELCTAPPT+6~, SELCTAPPT+12, SELCTAPPT+17, SELCTAPPT+20, SELCTAPPT+22, INACTLIST+4~, INACTVAT+6~
COUNT("ACTIVE	POST" , INACTLS1+6, INACTLS1+21, INACTLS1+32
COUNT("APPOINTMENTS"	INACTLS1+6, INACTLS1+25, INACTLS1+30
COUNT("ELIGIBLE"	INACTLS1+6, INACTLS1+26, INACTLS1+29
COUNT("FAILED"	INACTVAT+19, INACTVAT+31, INACTVAT+42, INACTVAT+43
COUNT("INACTIVATED"	INACTVAT+19, INACTVAT+29, INACTVAT+41
COUNT("INACTIVE"	INACTLS1+6, INACTLS1+22, INACTLS1+31
D0	SDNACT+9~
DA	SDNACT+9~, OVR+3*
DFN	CNVTDCLN+6~, CNVTDCLN+20, CNVTDCLN+31, SELCTAPPT+6~, SELCTAPPT+9, SELCTAPPT+14, SELCTAPPT+15, SELCTAPPT+17, SELCTAPPT+20, SELCTAPPT+24* , SELCTAPPT+27, SELCTAPPT+30, CANCAPPT+9~, CANCAPPT+19*, CANCAPPT+32
DH	SDNACT+9~
DIC	SELCTAPPT+6~, SELCTAPPT+8!, SELCTAPPT+9!, SDNACT+9~
DIC("S"	SELCTAPPT+8*
DIC(0	SELCTAPPT+8, SELCTAPPT+9
DIE	SDNACT+9~, OVR+3*
DIQUIET	INACTVAT+6~, INACTVAT+8*
DIR	SELCTAPPT+6~, SELCTAPPT+10!, SELCTAPPT+22!, INACTLIST+4~, CONTINUE+4~
DIR("A"	SELCTAPPT+10, SELCTAPPT+22, INACTLIST+6, CONTINUE+5
DIR("B"	INACTLIST+6, CONTINUE+5
DIR(0	SELCTAPPT+10, SELCTAPPT+22, INACTLIST+6, CONTINUE+5
DIRUT	SELCTAPPT+6~, SELCTAPPT+10, SELCTAPPT+22, CANCAPPT+9~, INACTLIST+4~, INACTLIST+6, CONTINUE+4~, CONTINUE+6
DO	SDNACT+9~
DOW	SDNACT+9~
DR	SDNACT+9~, OVR+3*
DT	INACTLS1+22, APPTCNT+6, INACTVAT+26
DTIME	CNVTDCLN+4, MARKCNVTD+4, MARKCANC+4, CANCAPPT+4, INACTLS1+34, INACTVAT+4
ENCNTR	CNVTDCLN+6~, CNVTDCLN+23, CNVTDCLN+36, SELCTAPPT+6~, SELCTAPPT+15, SELCTAPPT+16, SELCTAPPT+17, CANCAPPT+9~, CANCAPPT+24*, CANCAPPT+37
ENCTRSTS	SELCTAPPT+6~, SELCTAPPT+15, SELCTAPPT+16, SELCTAPPT+17, SELCTAPPT+18
ERRMSG	SDNACT+9~, SDNACT+11, D+3, END+1, END+2
I	INACTVAT+6~, INACTVAT+22, SDNACT+9~, D+5, D+6, OVR, OVR+1, OVR+2, CHG1+1, CHG1+3 , CHG1+4*, GOT, GOT+1, GOT+2
I1	SDNACT+9~
IEN2	CNVTDCLN+6~, CNVTDCLN+30, CNVTDCLN+31, SELCTAPPT+6~, SELCTAPPT+14, SELCTAPPT+17, SELCTAPPT+24, SELCTAPPT+30, CANCAPPT+31, CANCAPPT+32 , INACTLIST+4~, APPTCNT+4~, APPTCNT+7*
IO	INACTLS1+3, INACTLS1+14, INACTLS1+18, INACTLS1+20, INACTLS1+34
IO("Q"	INACTLIST+13
IOF	MARKCNVTD+7, MARKCANC+7, INACTHDR+2
IOM	MARKCNVTD+7, MARKCANC+7, INACTHDR+2
IOSL	INACTLS1+14, INACTLS1+18
J	SDNACT+9~, D+6, CHG1+4, GOT+1
J1	SDNACT+9~, GOT+1*
LINES	INACTLIST+4~, INACTLS1+4, INACTLS1+14, INACTLS1+18, INACTLS1+21, INACTLS1+22, INACTLS1+25, INACTLS1+26*
N	SELCTAPPT+6~, SELCTAPPT+22*, SELCTAPPT+24
NONCOUNT	CNVTDCLN+6~, CNVTDCLN+11, CNVTDCLN+13, CANCAPPT+9~, CANCAPPT+11, CANCAPPT+12
POP	INACTLIST+4~, INACTLIST+8, SDNACT+9~, D+2*, D+3
PTAPPT	CNVTDCLN+6~, CNVTDCLN+23, CANCAPPT+9~, CANCAPPT+24
QUEUED	INACTLIST+4~, INACTLIST+12, INACTLIST+13, INACTLS1+12, INACTLS1+34
QUIT	INACTLIST+4~, INACTLS1+4, INACTLS1+7, INACTLS1+8, INACTLS1+12, INACTLS1+14
RPTFLTR	INACTLIST+4~, INACTLIST+6*, INACTLS1+2, INACTLS1+21, INACTLS1+22, INACTLS1+25, INACTLS1+26, INACTLS1+29, INACTLS1+30, INACTLS1+31 , INACTLS1+32
RSLT	CNVTDCLN+6~, CNVTDCLN+41, CNVTDCLN+42, MARKCNVTD+6~, MARKCNVTD+9, MARKCNVTD+10, MARKCNVTD+11, MARKCANC+6~, MARKCANC+9, MARKCANC+10 , MARKCANC+11, CANCAPPT+9~, CANCAPPT+42, CANCAPPT+43
RTNCODE	INACTVAT+6~, INACTVAT+28*, INACTVAT+29, INACTVAT+30, INACTVAT+31
SC	SDNACT~, D+2, D+5, D+6, OVR, OVR+1, OVR+2, OVR+3, OVR+4, CHG1+3 , CHG1+4, A1, A, A+1, GOT, GOT+1, GOT+2
SCAPPT	CNVTDCLN+6~, CNVTDCLN+24, CNVTDCLN+30, CANCAPPT+9~, CANCAPPT+25, CANCAPPT+31
SCIEN	SELCTAPPT+6~, SELCTAPPT+8, SELCTAPPT+13, SELCTAPPT+14, SELCTAPPT+17, SELCTAPPT+20, SELCTAPPT+30, INACTLIST+4~, INACTLS1+8, INACTLS1+21 , INACTLS1+22, INACTLS1+24, APPTCNT~, APPTCNT+6, APPTCNT+7, INACTVAT+6~, INACTVAT+22, INACTVAT+24, INACTVAT+26, INACTVAT+28 , INACTVAT+29, INACTVAT+30, INACTVAT+35
SD	SDNACT+9~, A, A+2!, GOT, GOT+1
SD0	SDNACT+9~
SDAY	SDNACT+9~, SDNACT+13*
SDDATE	INACTLIST+4~, SDNACT~, D+5, OVR, OVR+1, OVR+2, OVR+4, CHG1+4, A+1
SDECAPPT	CNVTDCLN+6~, CNVTDCLN+22, CANCAPPT+9~, CANCAPPT+23
SDECIEN	CNVTDCLN+6~, CNVTDCLN+22, CNVTDCLN+28, CNVTDCLN+31, CNVTDCLN+32, CNVTDCLN+41, SELCTAPPT+6~, SELCTAPPT+12, SELCTAPPT+27, SELCTAPPT+29 , SELCTAPPT+30, SELCTAPPT+32, MARKCNVTD+6~, MARKCNVTD+8, MARKCNVTD+9, MARKCANC+6~, MARKCANC+8, MARKCANC+9, CANCAPPT+9~, CANCAPPT+23 , CANCAPPT+29, CANCAPPT+32*, CANCAPPT+33, CANCAPPT+42
SDEL	SDNACT+9~
SDFSW	SDNACT+9~
SDN	SDNACT+9~, D+5!
SDN(	D+5, D+6, CHG1+1, CHG1+3, A1, A, GOT+1
SDNL	SDNACT+9~, CHG1+4
SDOL	SDNACT+9~, CHG1+2*, CHG1+3
SDREACT	SDNACT+9~
SDX	SDNACT+9~, SDNACT+16*, D+4, CHG1+2, CHG1+4, A+1
SDX1	SDNACT+9~, SDNACT+16*, OVR, OVR+1, OVR+2, A+1
SDZQ	SDNACT+9~, SDNACT+13*
SI	SDNACT+9~
SL	SDNACT+9~
SORT1	CNVTDCLN+6~, CNVTDCLN+17, CNVTDCLN+18, CNVTDCLN+19, CNVTDCLN+20, CNVTDCLN+22, CNVTDCLN+23, CNVTDCLN+24, CANCAPPT+9~, CANCAPPT+16 , CANCAPPT+17, CANCAPPT+18, CANCAPPT+19, CANCAPPT+23, CANCAPPT+24, CANCAPPT+25
SORT2	CNVTDCLN+6~, CNVTDCLN+18, CNVTDCLN+19, CNVTDCLN+20, CNVTDCLN+22, CNVTDCLN+23, CNVTDCLN+24, CNVTDCLN+32, CNVTDCLN+37, CNVTDCLN+42 , CANCAPPT+9~, CANCAPPT+17, CANCAPPT+18, CANCAPPT+19, CANCAPPT+23, CANCAPPT+24, CANCAPPT+25, CANCAPPT+33, CANCAPPT+38, CANCAPPT+43
SORT3	CNVTDCLN+6~, CNVTDCLN+19, CNVTDCLN+20, CNVTDCLN+22, CNVTDCLN+23, CNVTDCLN+24, CNVTDCLN+32, CNVTDCLN+37, CANCAPPT+9~, CANCAPPT+18 , CANCAPPT+19, CANCAPPT+23, CANCAPPT+24, CANCAPPT+25, CANCAPPT+33, CANCAPPT+38
STARTDAY	SDNACT+9~
TITLE	INACTLS1+2*, INACTLS1+3, INACTLS1+14, INACTLS1+18, INACTHDR~, INACTHDR+2
U	CNVTDCLN+4, CNVTDCLN+20, CNVTDCLN+22, CNVTDCLN+23, CNVTDCLN+30, CNVTDCLN+32, CNVTDCLN+37, CNVTDCLN+42, SELCTAPPT+14, SELCTAPPT+15 , SELCTAPPT+17, SELCTAPPT+24, SELCTAPPT+27, MARKCNVTD+4, MARKCNVTD+11, MARKCANC+4, MARKCANC+11, CANCAPPT+4, CANCAPPT+19, CANCAPPT+23 , CANCAPPT+24, CANCAPPT+31, CANCAPPT+33, CANCAPPT+38, CANCAPPT+43, INACTLS1+2, INACTLS1+8, INACTVAT+4, INACTVAT+30, INACTVAT+31 , END+2
X	CNVTDCLN+4~, SELCTAPPT+6~, SELCTAPPT+14, MARKCNVTD+4~, MARKCANC+4~, CANCAPPT+4~, INACTLS1+34, INACTVAT+4~, INACTVAT+35, INACTVAT+37 , INACTVAT+38, SDNACT+9~, D+5*, CHG1+1, CHG1+2, CHG1+3, A1
X1	SDNACT+9~, D+5, CHG1+1, CHG1+2, CHG1+3
X2	SDNACT+9~, D+5, CHG1+1, CHG1+2, CHG1+3
Y	SELCTAPPT+6~, SELCTAPPT+8, SELCTAPPT+9, SELCTAPPT+10, SELCTAPPT+22, INACTLIST+4~, INACTLIST+6, INACTVAT+6~, INACTVAT+12, SDNACT+9~ , D+5, CHG1+1, CHG1+3, A1, A, CONTINUE+4~, CONTINUE+7
Z	SDNACT+9~, A+1*, A+2!
ZTDESC	INACTLIST+14~, INACTLIST+15*
ZTRTN	INACTLIST+14~, INACTLIST+15*
ZTSAVE	INACTLIST+14~
ZTSAVE("*"	INACTLIST+16*
ZTSK	INACTLIST+14~, INACTLIST+17

Customize PDF page

Package: Electronic Health Modernization

Routine: EHMAPPT1

Information

Source Information

Call Graph

Call Graph Total: 19

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: