Routine: GMTSPXSK

Information

GMTSPXSK ; SLC/SBW,KER - PCE Skin Test comp ; 05/04/2009

Name	Line Occurrences
Function Call: WRITE	Prompt: ?36," - Date - ",! Line Location: HDR+1
Function Call: WRITE	Prompt: "Skin Test",?12,"Reading",?21,"Results",?33,"Admin.",?45,"Reading",?57,"Facility",!! Line Location: HDR+2
Function Call: WRITE	Prompt: ?15,GMRDG,?24,GMRES,?35,GMTSDAT,?47,GMRDT,?62,$E(GMSITE,1,17),! Line Location: SKINDSP+11
Function Call: WRITE	Prompt: ?12,GMRDG,?21,GMRES,?33,GMTSDAT,?45,GMRDT,?57,$S($L(GMSITE)>16:$E(GMSITE,1,16)_"*",1:GMSITE),! Line Location: SKINDSP+14
Function Call: WRITE	Prompt: ?5,^UTILITY($J,"W",DIWL,GMTSLN,0),! Line Location: LINE+1

Name	Line Occurrences (* Changed, ! Killed)
^TMP("PXS"	SKIN+1!, SKIN+5, SKIN+7, SKIN+9, SKIN+10!, SKINDSP+1, SKINDSP+2, SKINDSP+15
^UTILITY($J	SKINDSP+16, SKINDSP+17, FORMAT+1!, LINE+1

Name	Field # of Occurrence
COMMENT	SKIN+4~, SKINDSP+15*, SKINDSP+16, FORMAT+2
>> DFN	SKIN+1
DIWF	FORMAT+1~
>> DIWL	SKINDSP+17, FORMAT+1*, LINE+1
DIWR	FORMAT+1~*
GMDT	SKIN+3~, SKIN+6, SKIN+7, SKIN+9, SKINDSP+1, SKINDSP+2, SKINDSP+15
GMICL	SKIN+4~, SKINDSP+16*, FORMAT+1
GMIFN	SKIN+3~, SKIN+8, SKIN+9, SKINDSP+1, SKINDSP+2, SKINDSP+15
GMN0	SKIN+3~, SKINDSP+1*, SKINDSP+5, SKINDSP+6, SKINDSP+7, SKINDSP+9
GMN1	SKIN+3~, SKINDSP+2*, SKINDSP+3
GMRDG	SKIN+3~, SKINDSP+6, SKINDSP+8, SKINDSP+10, SKINDSP+14
GMRDT	SKIN+4~, SKINDSP+7*, SKINDSP+14
GMRES	SKIN+3~, SKINDSP+9, SKINDSP+10, SKINDSP+14
GMSITE	SKIN+3~, SKINDSP+3*, SKINDSP+14
GMSK	SKIN+3~, SKIN+4, SKIN+5, SKIN+7, SKIN+9, SKINDSP+1, SKINDSP+2, SKINDSP+15
GMSKIN	SKIN+3~, SKINDSP+6*, SKINDSP+13
GMTAB	SKIN+4~, SKINDSP+16*, FORMAT+1
GMTSDAT	SKIN+3~, SKINDSP+5*, SKINDSP+14
GMTSLN	SKIN+4~, SKINDSP+17*, LINE+1
>> GMTSNPG	SKINDSP+12, SKINDSP+13
>> GMTSQIT	SKIN+2, SKIN+5, SKIN+7, SKIN+9, SKINDSP+12, SKINDSP+17, LINE+1
GMW	SKIN+3~, SKIN+6, SKINDSP+13, SKINDSP+18
U	SKINDSP+3, SKINDSP+5, SKINDSP+6, SKINDSP+7, SKINDSP+9, SKINDSP+15
X	SKIN+3~, SKINDSP+5, SKINDSP+7, FORMAT+1~, FORMAT+2*