Routine: GMTSORPD

Information

GMTSORPD ; ISP/LMT - CPRS PDMP component ;Apr 02, 2020@08:27:12

Source file <GMTSORPD.m>

Package	Total	Call Graph
Health Summary	2	REGDTM^GMTSU CKP^GMTSUP
Kernel	1	$$NAME^XUSER
Order Entry Results Reporting	1	EN^ORPDMPHS

Name	Comments	DBIA/ICR reference
PDMPAODX	; PDMP Accounting of disclosure report when no note was created
PDMPAODA	; All PDMP Accounting of disclosure report, including when note was created manually or automatically
PDMPAOD(GMTSSCREEN)	; ; GMTSSCREEN = A: All; X: Exception Cases
HDR1	;
HDR	;
CKP	;

Name	Line Occurrences
Function Call: WRITE	Prompt: GMTSQDT,?16,$E(GMTSUSER,1,25),?43,GMTSDISCTO,! Line Location: PDMPAOD+38
Function Call: WRITE	Prompt: !,"Info Disclosed: Patient Demographics" Line Location: HDR1+1
Function Call: WRITE	Prompt: !,"Purpose: Accessing Prescription Drug Monitoring Program (PDMP) databases for" Line Location: HDR1+2
Function Call: WRITE	Prompt: !," review of controlled substances prescribed outside of the VA, and any" Line Location: HDR1+3
Function Call: WRITE	Prompt: !," additional information that may become available, as an important" Line Location: HDR1+4
Function Call: WRITE	Prompt: !," component of standard clinical care and in accordance with VHA policy." Line Location: HDR1+5
Function Call: WRITE	Prompt: !! Line Location: HDR1+6
Function Call: WRITE	Prompt: "Date/Time User/Author Disclosed To" Line Location: HDR+1
Function Call: WRITE	Prompt: !! Line Location: HDR+2

Name	Line Occurrences (* Changed, ! Killed)
^TMP("ORPDMPHS"	PDMPAOD+12!, PDMPAOD+15, PDMPAOD+23, PDMPAOD+25, PDMPAOD+26, PDMPAOD+40!

Name	Field # of Occurrence
>> DFN	PDMPAOD+13
>> GMTSBEG	PDMPAOD+10
GMTSDISCTO	PDMPAOD+4~, PDMPAOD+34*, PDMPAOD+38
>> GMTSEND	PDMPAOD+10
GMTSFILTER	PDMPAOD+4~, PDMPAOD+13
GMTSFILTER("DATES"	PDMPAOD+10*
GMTSFILTER("SHARED"	PDMPAOD+11*
GMTSFILTER("STATUS"	PDMPAOD+8, PDMPAOD+9
GMTSI	PDMPAOD+4~, PDMPAOD+22, PDMPAOD+23, PDMPAOD+25, PDMPAOD+26
GMTSJ	PDMPAOD+4~, PDMPAOD+24, PDMPAOD+25, PDMPAOD+26
GMTSNODE	PDMPAOD+4~, PDMPAOD+26*, PDMPAOD+28, PDMPAOD+32, PDMPAOD+34
>> GMTSNPG	CKP+7
GMTSPG1	PDMPAOD+4~, PDMPAOD+17, PDMPAOD+20, CKP+6
GMTSQDT	PDMPAOD+4~, PDMPAOD+30*, PDMPAOD+38
>> GMTSQIT	PDMPAOD+19, PDMPAOD+23, PDMPAOD+25, PDMPAOD+37, CKP+5
GMTSRSLTS	PDMPAOD+4~, PDMPAOD+13
GMTSSCREEN	PDMPAOD~, PDMPAOD+6*, PDMPAOD+9
GMTSUSER	PDMPAOD+4~, PDMPAOD+32, PDMPAOD+33, PDMPAOD+38
U	PDMPAOD+28, PDMPAOD+32, PDMPAOD+34
X	PDMPAOD+4~, PDMPAOD+28*, PDMPAOD+30