Routine: GMTSAMIE

Information

GMTSAMIE ; SLC/KER - Comp and Pension Exams ; 02/27/2002

Source file <GMTSAMIE.m>

Package	Total	Call Graph
Health Summary	2	REGDT4^GMTSU CKP^GMTSUP
VA FileMan	2	^DIWP ^DIWW
Automated Medical Information Exchange	1	HSCP^DVBCHS0

Name	Comments	DBIA/ICR reference
MAIN	; Control branching
WRT	; Writes exam data

Name	Line Occurrences
Function Call: WRITE	Prompt: EXAMDATE,?15,$P(NODE,U,3),! Line Location: WRT+5
Function Call: WRITE	Prompt: ?3,"Priority of Exam: ",$E($P(NODE,U,5),1,20),! Line Location: WRT+6
Function Call: WRITE	Prompt: ?1,"Examining provider: ",$P(NODE,U,4),! Line Location: WRT+7
Function Call: WRITE	Prompt: ?8,"Approved By: ",$P(NODE,U,2)," on ",X,! Line Location: WRT+11
Function Call: WRITE	Prompt: "Examination results: ",! Line Location: WRT+13
Function Call: WRITE	Prompt: ! Line Location: WRT+18

Name	Line Occurrences (* Changed, ! Killed)
^TMP("DVBC"	MAIN+2!, MAIN+3, MAIN+5, MAIN+7, MAIN+8!, WRT+3, WRT+8, WRT+15, WRT+17
^UTILITY($J	WRT+12!

Name	Line Occurrences
WRT	MAIN+7

Name	Field # of Occurrence
^(	WRT+15

Name	Field # of Occurrence
>> DFN	MAIN+3
DIWF	MAIN+1~, MAIN+2*
DIWL	MAIN+1~, MAIN+2*
DIWR	MAIN+1~, MAIN+2*
EXAM	WRT+2~
EXAMDATE	WRT+2~, WRT+4*, WRT+5
GMCNT	MAIN+1~, MAIN+4, MAIN+5, MAIN+7, WRT+1
GMDATE	MAIN+1~, MAIN+4, MAIN+5, MAIN+7, WRT+3, WRT+8, WRT+15, WRT+17
GMEXAM	MAIN+1~, MAIN+6, MAIN+7, WRT+3, WRT+8, WRT+15, WRT+17
>> GMTS1	MAIN+3
>> GMTS2	MAIN+3
>> GMTSNDM	MAIN+4
>> GMTSQIT	WRT+5, WRT+6, WRT+7, WRT+10, WRT+13, WRT+15, WRT+16, WRT+18
GMTSREC	MAIN+1~
LINE	MAIN+1~, WRT+14, WRT+15
MAX	MAIN+1~, MAIN+4*, MAIN+5, MAIN+7
NODE	MAIN+1~, WRT+3, WRT+4, WRT+5, WRT+6, WRT+7, WRT+8, WRT+9, WRT+11
PHY	WRT+2~
PRI	WRT+2~
U	WRT+4, WRT+5, WRT+6, WRT+7, WRT+9, WRT+11
X	WRT+2~, WRT+4, WRT+9, WRT+11, WRT+15*