Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | Found Entries | External References | Global Variables Directly Accessed | Local Variables | All

Print Page as PDF

Global: ^AUTTSK

Package: PCE Patient Care Encounter

Global: ^AUTTSK

Information

FileMan FileNo	FileMan Filename	Package
9999999.28	SKIN TEST	PCE Patient Care Encounter

Description

Per VHA Directive, this file has been "locked down" by Data Standardization (DS). The file definition (i.e. data dictionary) shall not be modified. All additions, changes and deletions to entries in the file shall be done by Enterprise Reference Terminology (ERT) using the Master File Server (MFS), provided by the Common Services (CS). Creating and/or editing locally defined fields in the file are not permitted. Use of locally defined fields that were created prior to the VHA Directive shall not be supported. This file contains Skin Tests. It consists of a full descriptive name, a Ten Character Abbreviated Name for the Health Summary and other reports where spaces are limited, plus a Two Digit Code (IHS only). This file was developed by IHS, and adopted by the VA for the source file representing Skin Tests.

Directly Accessed By Routines, Total: 20

Package	Total	Routines
PCE Patient Care Encounter	15	CODE CODING SYSTEM EFFECTIVE DATE/TIME PXAISK PXAISKV PXAPIIB PXCASK PXCESK PXMCICHK PXPXRM PXPXRMI2 PXRHS04 PXVP206 PXVRPC8 PXVUTL
Automated Information Collection System	1	IBDFN14
Clinical Reminders	1	PXRMSKIN
Order Entry Results Reporting	1	ORWPCE2
Scheduling	1	SCRPW25

Accessed By FileMan Db Calls, Total: 2

Package	Total	Routines
PCE Patient Care Encounter	2	PXVP206 PXVRPC8

Pointed To By FileMan Files, Total: 8

Package	Total	FileMan Files
Clinical Reminders	5	REMINDER DEFINITION(#811.9)[#811.902(.01)] REMINDER DIALOG(#801.41)[15, #801.4118(.01)] REMINDER FINDING ITEM PARAMETER(#801.43)[.02] REMINDER TERM(#811.5)[#811.52(.01)] REMINDER EXTRACT SUMMARY(#810.3)[#810.31(.04), #810.32(.01)]
PCE Patient Care Encounter	3	V SKIN TEST(#9000010.12)[.01] SKIN TEST(#9999999.28)[99.97] PCE CODE MAPPING(#811.1)[.01, .02]

Pointer To FileMan Files, Total: 2

Package	Total	FileMan Files
CPT HCPCS Codes	1	CPT(#81)[.11]
PCE Patient Care Encounter	1	SKIN TEST(#9999999.28)[99.97]

Fields, Total: 12

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X` LAST EDITED: `MAR 03, 2015` HELP-PROMPT: `Answer with Skin Test name (3-30 characters).` DESCRIPTION: `This is the name of the skin test (e.g Cocci,PPD). The NAME must be at least 3 characters and no more than 30 characters.` AUDIT: `YES, ALWAYS` PRE-LOOKUP: `I $G(DIC(0))["L",'$D(XUMF) K X D EN^DDIOL("Entries must be edited via the Master File Server (MFS).","","!?5")` DELETE TEST: `.01,0)= I 0` `1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be inactivated via the Master File Server(MFS).","","!?5") I '$D(XUMF)` LAYGO TEST: `1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be added via the Master File Server(MFS).","","!?5") I $D(XUMF)` `WRITE AUTHORITY: ^` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9999999.28^B` `1)= S ^AUTTSK("B",$E(X,1,30),DA)=""` `2)= K ^AUTTSK("B",$E(X,1,30),DA)`
.02	CODE	0;2	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>2!($L(X)<2)!'(X?2N) X I $D(X),$D(^AUTTSK("C",X)),'$D(^AUTTSK("C",X,DA)) K X D:'$D(ZTQUEUED) EN^DDIOL(" Already used! ")` LAST EDITED: `NOV 24, 2014` HELP-PROMPT: `Answer must be 2 digits in length.` DESCRIPTION: `This field is a two digit code representing this skin test.` TECHNICAL DESCR: `This field is not used by the Department of Veterans Affairs. It is included for backward compatibility with the Indian Health Service version of the file.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9999999.28^C` `1)= S ^AUTTSK("C",$E(X,1,30),DA)=""` `2)= K ^AUTTSK("C",$E(X,1,30),DA)` `3)= Also used to avoid duplicates.` `Used to keep the same code from being used by more than one entry. The check is made in the input transform.`
.03	INACTIVE FLAG	0;3	SET	'1' FOR INACTIVE; LAST EDITED: `MAR 04, 2015` HELP-PROMPT: `Enter 1 to make the skin test type inactive.` DESCRIPTION: `This field is used to inactivate a skin test type. If this field contains a "1" then the skin test is inactive. Inactive skin tests cannot be selected in the manual data entry process. Skin test entries should be made` `inactive when they are no longer used. Do not delete the entry or change the meaning of the skin test entry.` `To make an inactive skin test active, enter the "@" symbol to delete the "1" from the field.` TECHNICAL DESCR: `This field was added for use by PCE in the VA.` `This inactive flag should be used, rather than deleting entries in the skin test file, since there may be other files pointing at the skin test entry.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^`
.11	CPT CODE	0;11	POINTER TO CPT FILE (#81)	CPT(#81) LAST EDITED: `NOV 24, 2014` DESCRIPTION: `This is a CPT code associated with this skin test.` TECHNICAL DESCR: `This field is not used by the Department of Veterans Affairs. It is included for backward compatibility with the Indian Health Service version of the file.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` `UNEDITABLE`
3	CODING SYSTEM	3;0	Multiple #9999999.283	9999999.283 DESCRIPTION: `This multiple stores the coding system(s) associated with the codes identifying this skin test.` `WRITE AUTHORITY: ^`
99.97	REPLACED BY VHA STANDARD TERM	VUID;3	POINTER TO SKIN TEST FILE (#9999999.28)	SKIN TEST(#9999999.28) LAST EDITED: `MAR 27, 2015` HELP-PROMPT: `Enter the Term/Concept that replaces this entry.` DESCRIPTION: `This field is populated when one Term/Concept replaces another Term/Concept. This field is controlled by standardization and should only be changed by standardization processes. This field contains a pointer to a VHA` `standard term that replaces this entry.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` `UNEDITABLE` CROSS-REFERENCE: `9999999.28^AREPLACETERM` `1)= S ^AUTTSK("AREPLACETERM",$E(X,1,30),DA)=""` `2)= K ^AUTTSK("AREPLACETERM",$E(X,1,30),DA)` `This cross-reference can be used to identify the replacement entries associated with a Term/Concept.`
99.98	MASTER ENTRY FOR VUID	VUID;2	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; LAST EDITED: `MAR 27, 2015` HELP-PROMPT: `Enter YES if this is the Master entry.` DESCRIPTION: `This field identifies the Master entry for a VUID associated with a Term/Concept.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` `UNEDITABLE` RECORD INDEXES: `AMASTERVUID (#1315)`
99.99	VUID	VUID;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S X=+X K:$L(X)>20!($L(X)<1)!'(X?1.20N) X` LAST EDITED: `NOV 24, 2014` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: `VHA Unique ID (VUID). A unique meaningless integer assigned to reference terms VHA wide.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9999999.28^AVUID` `1)= S ^AUTTSK("AVUID",$E(X,1,30),DA)=""` `2)= K ^AUTTSK("AVUID",$E(X,1,30),DA)` `3)= XXX--CAN'T BE ALTERED EXCEPT PROGRAMMER` `This cross-reference is by VUID.` RECORD INDEXES: `AMASTERVUID (#1315)`
99.991	EFFECTIVE DATE/TIME	TERMSTATUS;0	DATE Multiple #9999999.2899	9999999.2899 DESCRIPTION: `Describes the pair Status and Effective Date/Time for each reference term.` `WRITE AUTHORITY: ^`
100	CLASS	100;1	SET	'N' FOR NATIONAL; 'V' FOR VISN; 'L' FOR LOCAL; LAST EDITED: `JAN 05, 2015` HELP-PROMPT: `Enter the CLASS.` DESCRIPTION: `This is the CLASS of this Skin Test.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^`
1201	PRINT NAME	12;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<3) X` LAST EDITED: `FEB 11, 2015` HELP-PROMPT: `Answer must be 3-15 characters in length.` DESCRIPTION: `This is the name of this skin test that can be used in various reports and displays where space is not available to use the full name of the skin test. This print/display name is limited to 15 characters.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^`
8801	MNEMONIC	88;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>2!($L(X)<1) X` LAST EDITED: `MAR 27, 2015` HELP-PROMPT: `ANSWER MUST BE 1-2 CHARACTERS IN LENGTH` DESCRIPTION: `(Optional) This is a 1-2 character mnemonic for the skin test.` `Enter a 1-2 character mnemonic.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` CROSS-REFERENCE: `9999999.28^B^MNEMONIC` `1)= S ^AUTTSK("B",$E(X,1,30),DA)=1` `2)= K ^AUTTSK("B",$E(X,1,30),DA)`

Found Entries, Total: 9

NAME: TINE	NAME: PPD TUBERCULIN	NAME: COCCIDIOIDOMYCOSIS	NAME: SCHICK DIPHTHERIA	NAME: MONO-VACC TUBERCULIN	NAME: HISTOPLASMIN	NAME: CANDIDA	NAME: TETANUS SKIN TEST
NAME: TRICHOPHYTON

External References

Name	Field # of Occurrence
EN^DDIOL	.01TPL+1, .01DEL1+1, .01LAYGO1+1, .02+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTSK("AMASTERVUID"	IXAMASTERVUIDSL+1*, IXAMASTERVUIDKL+1!, IXAMASTERVUIDKEIC+1!
^AUTTSK("AREPLACETERM"	99.97(XREF 1S), 99.97(XREF 1K)
^AUTTSK("AVUID"	99.99(XREF 1S), 99.99(XREF 1K)
^AUTTSK("B"	.01(XREF 1S), .01(XREF 1K), 8801(XREF 1S), 8801(XREF 1K)
^AUTTSK("C"	.02+1, .02(XREF 1S), .02(XREF 1K)

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1, .01(XREF 1S), .01(XREF 1K), .02+1, .02(XREF 1S), .02(XREF 1K), 99.97(XREF 1S), 99.97(XREF 1K), 99.99(XREF 1S) , 99.99(XREF 1K), 8801(XREF 1S), 8801(XREF 1K)
>> DIC(0	.01TPL+1
X	.01+1!, .01TPL+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .02(XREF 1S), .02(XREF 1K), 99.97(XREF 1S), 99.97(XREF 1K), 99.99+1*! , 99.99(XREF 1S), 99.99(XREF 1K), 1201+1!, 8801+1!, 8801(XREF 1S), 8801(XREF 1K)
X(1	IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1
X(2	IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1
>> XUMF	.01TPL+1, .01DEL1+1, .01LAYGO1+1
>> ZTQUEUED	.02+1

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | Found Entries | External References | Global Variables Directly Accessed | Local Variables | All