STANDARD DATA DICTIONARY #9000010.12 -- V SKIN TEST FILE 3/24/25 PAGE 1 STORED IN ^AUPNVSK( *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 1.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file has been designed for joint use by the Indian Health Service and the Department of Veteran Affairs. There will be one record for each type of skin test given to a patient on a given visit. Data must exist for a patient and a visit before data can be entered here. The record is normally created when a skin test is given, and the results, if available, are entered later and matched to the original record. If results are entered and a skin test given does not exist, a new record is created. In the VA, if a skin test is entered into PCE that has a related CPT or ICD code, then a CPT or ICD entry will automatically be entered into the V CPT or V POV file. This supports getting workload credit from clinical activities. The CODING SYSTEM multiple of the SKIN TEST file (#9999999.28) defines the relationships between Skin Tests and CPT and ICD codes. DD ACCESS: RD ACCESS: WR ACCESS: DEL ACCESS: LAYGO ACCESS: AUDIT ACCESS: IDENTIFIED BY: PATIENT NAME (#.02)[R], VISIT (#.03)[R] POINTED TO BY: PLACEMENT SKIN TEST field (#1208) of the V SKIN TEST File (#9000010.12) CROSS REFERENCED BY: VISIT(AA), SKIN TEST(AATOO), PATIENT NAME(AATOO2), VISIT(AD), READING(AE), PLACEMENT SKIN TEST(APT), VISIT(AV10), SKIN TEST(B), PATIENT NAME(C) INDEXED BY: SKIN TEST & PATIENT NAME & VISIT & EVENT DATE AND TIME & DATE READ (ACR), DATE READ & EVENT DATE AND TIME & HOURS READ POST-PLACEMENT (AH) LAST MODIFIED: OCT 5,2022@14:55:07 9000010.12,.01SKIN TEST 0;1 POINTER TO SKIN TEST FILE (#9999999.28) (Required) (audited) INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,3)'=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: NOV 20, 2018 HELP-PROMPT: Enter the skin test that was given to the patient. DESCRIPTION: This is the type of skin test that was given to the patient at the encounter. TECHNICAL DESCR: Only active skin test entries in the Skin Test file, #9999999.28 are selectable. SCREEN: S DIC("S")="I $P(^(0),U,3)'=1" EXPLANATION: Allow only active Skin Test types to be selected. AUDIT: YES, ALWAYS CROSS-REFERENCE: 9000010.12^B 1)= S ^AUPNVSK("B",$E(X,1,30),DA)="" 2)= K ^AUPNVSK("B",$E(X,1,30),DA) CROSS-REFERENCE: 9000010.12^AATOO^MUMPS 1)= I $P(^AUPNVSK(DA,0),U,2)]"",$P(^(0),U,3)]"" S ^AUPNVSK("AA",$P(^AUPNVSK(DA,0),U,2),X,(9999999-$ P(+^AUPNVSIT($P(^AUPNVSK(DA,0),U,3),0),".",1)),DA)="" 2)= I $P(^AUPNVSK(DA,0),U,2)]"",$P(^(0),U,3)]"" K ^AUPNVSK("AA",$P(^AUPNVSK(DA,0),U,2),X,(9999999-$ P(+^AUPNVSIT($P(^AUPNVSK(DA,0),U,3),0),".",1)),DA) This cross-reference is used for searches in sequence by patient, Skin Test pointer, inverted Visit date, and internal entry number. "AA",PATIENT,SKIN TEST,VISIT,DA RECORD INDEXES: ACR (#1686) 9000010.12,.02PATIENT NAME 0;2 POINTER TO PATIENT/IHS FILE (#9000001) (Required) (audited) LAST EDITED: NOV 20, 2018 HELP-PROMPT: Enter the patient who was given the skin test. DESCRIPTION: This is the patient who received the skin test. TECHNICAL DESCR: This is a pointer to the Patient/IHS file, #9000001 which is DINUMED to the Patient file, #2. This field is always stuffed by the application. No editing is allowed. AUDIT: YES, ALWAYS UNEDITABLE CROSS-REFERENCE: 9000010.12^AATOO2^MUMPS 1)= I $P(^AUPNVSK(DA,0),U,3)]"" S ^AUPNVSK("AA",X,+^AUPNVSK(DA,0),(9999999-$P(+^AUPNVSIT($P(^AUPNVS K(DA,0),U,3),0),".",1)),DA)="" 2)= I $P(^AUPNVSK(DA,0),U,3)]"" K ^AUPNVSK("AA",X,+^AUPNVSK(DA,0),(9999999-$P(+^AUPNVSIT($P(^AUPNVS K(DA,0),U,3),0),".",1)),DA) This cross-reference is used to search in sequence by patient, skin test pointer, inverted visit date, and internal entry number. "AA",PATIENT,SKIN TEST,VISIT,DA CROSS-REFERENCE: 9000010.12^C 1)= S ^AUPNVSK("C",$E(X,1,30),DA)="" 2)= K ^AUPNVSK("C",$E(X,1,30),DA) This cross-reference allows look-up by patient name. RECORD INDEXES: ACR (#1686) 9000010.12,.03VISIT 0;3 POINTER TO VISIT FILE (#9000010) (Required) (audited) INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,5)=$P(^AUPNVSK(DA,0),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: NOV 20, 2018 HELP-PROMPT: Enter the visit date/time for the encounter where the skin test was done. DESCRIPTION: This is the encounter defined in the Visit file that represents when and where the skin test was done. TECHNICAL DESCR: This is a pointer to the Visit file, #9000010. This field is stuffed by the applications. No editing is allowed. SCREEN: S DIC("S")="I $P(^(0),U,5)=$P(^AUPNVSK(DA,0),U,2)" EXPLANATION: VISIT MUST BE FOR CURRENT PATIENT AUDIT: YES, ALWAYS UNEDITABLE CROSS-REFERENCE: 9000010.12^AD 1)= S ^AUPNVSK("AD",$E(X,1,30),DA)="" 2)= K ^AUPNVSK("AD",$E(X,1,30),DA) This cross-reference allows look-up of entries by patient name. CROSS-REFERENCE: 9000010.12^AA^MUMPS 1)= Q:$P(^AUPNVSK(DA,0),U,2)="" S ^AUPNVSK("AA",$P(^AUPNVSK(DA,0),U,2),+^AUPNVSK(DA,0),(9999999-$P (+^AUPNVSIT(X,0),".",1)),DA)="" 2)= Q:$P(^AUPNVSK(DA,0),U,2)="" K ^AUPNVSK("AA",$P(^AUPNVSK(DA,0),U,2),+^AUPNVSK(DA,0),(9999999-$P (+^AUPNVSIT(X,0),".",1)),DA) This cross-reference is used for searches in sequence by patient, skin test pointer, inverted visit date, and internal entry number. "AA",PATIENT,SKIN TEST,VISIT,DA CROSS-REFERENCE: 9000010.12^AV10^MUMPS 1)= D ADD^AUPNVSIT 2)= D SUB^AUPNVSIT This cross-reference is for adding and subtracting from the dependent entry count in the VISIT file. RECORD INDEXES: ACR (#1686) 9000010.12,.04RESULTS 0;4 SET (audited) Test Interpretation 'P' FOR POSITIVE; 'N' FOR NEGATIVE; 'D' FOR DOUBTFUL; 'O' FOR NO TAKE; INPUT TRANSFORM: I X="N",$P(^AUPNVSK(DA,0),U,5)]"",$P(^AUPNVSK(DA,0),U,5)>10 K X LAST EDITED: FEB 13, 2015 HELP-PROMPT: Enter whether the results were positive, negative, doubtful or no take, if known. DESCRIPTION: This is the interpretation of skin test results. AUDIT: YES, ALWAYS SOURCE OF DATA: 082/SKREST NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 9000010.12,.05READING 0;5 NUMBER (audited) Reading in Millimeters (mm) INPUT TRANSFORM: K:+X'=X!(X>40)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: FEB 13, 2015 HELP-PROMPT: Enter a whole number between 0 and 40. DESCRIPTION: This is the induration in millimeters (mm). AUDIT: YES, ALWAYS SOURCE OF DATA: 082/SKREAD NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 9000010.12^AE 1)= S ^AUPNVSK("AE",$E(X,1,30),DA)="" 2)= K ^AUPNVSK("AE",$E(X,1,30),DA) This cross-reference searches on the results of skin tests across all patients. "AE",READING,DA 9000010.12,.06DATE READ 0;6 DATE (audited) Reading Date/Time INPUT TRANSFORM: S %DT="ET" D ^%DT S X=Y K:Y<1!$$TIME^PXVUTL X LAST EDITED: AUG 20, 2015 HELP-PROMPT: Enter the date and (optional) time the skin test was read. DESCRIPTION: This is the date and time of the reading of the skin test. Time entry is optional and imprecise date is allowed for historical skin tests. AUDIT: YES, ALWAYS NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: ^^TRIGGER^9000010.12^1220 1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUPNVSK(D0,12)):^(12),1:"") S X=$P(Y(1),U,20),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(9000010.12,.06,1,1,1.4) 1.4)= S DIH=$G(^AUPNVSK(DIV(0),12)),DIV=X S $P(^(12),U,20)=DIV,DIH=9000010.12,DIG=1220 D ^DICR 2)= Q CREATE VALUE)= NOW DELETE VALUE)= NO EFFECT FIELD)= SKIN TEST READING RECORDED This trigger sets the SKIN TEST READING RECORDED field (#1220) when the DATE READ is entered. RECORD INDEXES: ACR (#1686), AH (#1687) 9000010.12,.07READER 0;7 POINTER TO NEW PERSON FILE (#200) (audited) LAST EDITED: FEB 13, 2015 HELP-PROMPT: Enter the name of the person who read the skin test. DESCRIPTION: This is the name of the person who read and interpreted the results of the skin test. AUDIT: YES, ALWAYS 9000010.12,801PRIMARY DIAGNOSIS 80;1 POINTER TO ICD DIAGNOSIS FILE (#80) (audited) Primary Diagnosis INPUT TRANSFORM: S DIC("S")="D ^AUPNSICD" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JUL 30, 2015 HELP-PROMPT: Enter the primary diagnosis code associated with this skin test. DESCRIPTION: This is the diagnosis from the ICD Diagnosis file associated with the skin test performed. SCREEN: S DIC("S")="D ^AUPNSICD" EXPLANATION: Diagnosis cannot be an inactive code and it must be appropriate. AUDIT: YES, ALWAYS 9000010.12,802DIAGNOSIS 2 80;2 POINTER TO ICD DIAGNOSIS FILE (#80) (audited) Diagnosis 2 INPUT TRANSFORM: S DIC("S")="D ^AUPNSICD" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JUL 29, 2015 HELP-PROMPT: Enter the ICD Diagnosis related to the skin test performed. DESCRIPTION: This is the diagnosis from the ICD Diagnosis file associated with the skin test performed. SCREEN: S DIC("S")="D ^AUPNSICD" EXPLANATION: Diagnosis cannot be an inactive code and it must be appropriate. AUDIT: YES, ALWAYS 9000010.12,803DIAGNOSIS 3 80;3 POINTER TO ICD DIAGNOSIS FILE (#80) (audited) Diagnosis 3 INPUT TRANSFORM: S DIC("S")="D ^AUPNSICD" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JUL 29, 2015 HELP-PROMPT: Enter the ICD Diagnosis related to the skin test performed. DESCRIPTION: This is the diagnosis from the ICD Diagnosis file associated with the skin test performed. SCREEN: S DIC("S")="D ^AUPNSICD" EXPLANATION: Diagnosis cannot be an inactive code and it must be appropriate. AUDIT: YES, ALWAYS 9000010.12,804DIAGNOSIS 4 80;4 POINTER TO ICD DIAGNOSIS FILE (#80) (audited) Diagnosis 4 INPUT TRANSFORM: S DIC("S")="D ^AUPNSICD" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JUL 29, 2015 HELP-PROMPT: Enter the ICD Diagnosis related to the skin test performed. DESCRIPTION: This is the diagnosis from the ICD Diagnosis file associated with the skin test performed. SCREEN: S DIC("S")="D ^AUPNSICD" EXPLANATION: Diagnosis cannot be an inactive code and it must be appropriate. AUDIT: YES, ALWAYS 9000010.12,805DIAGNOSIS 5 80;5 POINTER TO ICD DIAGNOSIS FILE (#80) (audited) Diagnosis 5 INPUT TRANSFORM: S DIC("S")="D ^AUPNSICD" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JUL 29, 2015 HELP-PROMPT: Enter the ICD Diagnosis related to the skin test performed. DESCRIPTION: This is the diagnosis from the ICD Diagnosis file associated with the skin test performed. SCREEN: S DIC("S")="D ^AUPNSICD" EXPLANATION: Diagnosis cannot be an inactive code and it must be appropriate. AUDIT: YES, ALWAYS 9000010.12,806DIAGNOSIS 6 80;6 POINTER TO ICD DIAGNOSIS FILE (#80) (audited) Diagnosis 6 INPUT TRANSFORM: S DIC("S")="D ^AUPNSICD" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JUL 29, 2015 HELP-PROMPT: Enter the ICD Diagnosis related to the skin test performed. DESCRIPTION: This is the diagnosis from the ICD Diagnosis file associated with the skin test performed. SCREEN: S DIC("S")="D ^AUPNSICD" EXPLANATION: Diagnosis cannot be an inactive code and it must be appropriate. AUDIT: YES, ALWAYS 9000010.12,807DIAGNOSIS 7 80;7 POINTER TO ICD DIAGNOSIS FILE (#80) (audited) Diagnosis 7 INPUT TRANSFORM: S DIC("S")="D ^AUPNSICD" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JUL 29, 2015 HELP-PROMPT: Enter the ICD Diagnosis related to the skin test performed. DESCRIPTION: This is the diagnosis from the ICD Diagnosis file associated with the skin test performed. SCREEN: S DIC("S")="D ^AUPNSICD" EXPLANATION: Diagnosis cannot be an inactive code and it must be appropriate. AUDIT: YES, ALWAYS 9000010.12,808DIAGNOSIS 8 80;8 POINTER TO ICD DIAGNOSIS FILE (#80) (audited) Diagnosis 8 INPUT TRANSFORM: S DIC("S")="D ^AUPNSICD" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JUL 29, 2015 HELP-PROMPT: Enter the ICD Diagnosis related to the skin test performed. DESCRIPTION: This is the diagnosis from the ICD Diagnosis file associated with the skin test performed. SCREEN: S DIC("S")="D ^AUPNSICD" EXPLANATION: Diagnosis cannot be an inactive code and it must be appropriate. AUDIT: YES, ALWAYS 9000010.12,1201EVENT DATE AND TIME 12;1 DATE (audited) Placement Date and Time INPUT TRANSFORM: S %DT="ET" D ^%DT S X=Y K:Y<1!$$TIME^PXVUTL X LAST EDITED: NOV 21, 2018 HELP-PROMPT: Enter the date and (optional) time the skin test was placed. DESCRIPTION: This is the date and time the skin test was placed. This date and time may be different from the visit date and time. For example, for clinic appointment visits, the visit date and time is the date and time of the appointment, not the time the provider performed the clinical event. The date may be an imprecise date such as for an historical skin test. Date and time may be before or after the visit date, with the restriction the date cannot be a future date. TECHNICAL DESCR: The PCE User Interface, which allows manual entry of data, will be the primary source of the event date and time. The event date prompt defaults to the visit date and the time is entered to reflect the actual time the skin test was done. The event date does not have to be the visit date, but it can be before or after the visit, and not be a future date. If a user wants to enter an historical skin test, the user should use the Historical Encounter entry action to document the historical skin test. Historical entries will not be eligible for workload credit. PCE data sources for automatic (scanning) data capture will be blank unless the event date and time are passed to PCE for filing. AUDIT: YES, ALWAYS NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: ^^TRIGGER^9000010.12^1211 1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUPNVSK(D0,12)):^(12),1:"") S X=$P(Y(1),U,11),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(9000010.12,1201,1,1,1.4) 1.4)= S DIH=$G(^AUPNVSK(DIV(0),12)),DIV=X S $P(^(12),U,11)=DIV,DIH=9000010.12,DIG=1211 D ^DICR 2)= Q CREATE VALUE)= NOW DELETE VALUE)= NO EFFECT FIELD)= SKIN TEST PLACEMENT RECORDED The Skin Test Placement Recorded field, #1211, will be triggered whenever the Event Date and Time field, #1201, is entered or updated. The triggered value will be NOW. RECORD INDEXES: ACR (#1686), AH (#1687) 9000010.12,1202ORDERING PROVIDER 12;2 POINTER TO NEW PERSON FILE (#200) (audited) LAST EDITED: FEB 13, 2015 HELP-PROMPT: Enter the provider who ordered this skin test. DESCRIPTION: This field can be used to document the provider who ordered the skin test. AUDIT: YES, ALWAYS 9000010.12,1204ENCOUNTER PROVIDER 12;4 POINTER TO NEW PERSON FILE (#200) (audited) Provider Placing Skin Test LAST EDITED: FEB 13, 2015 HELP-PROMPT: Enter the provider who placed the skin test. DESCRIPTION: This is the provider who placed the skin test. TECHNICAL DESCR: This person can be any person in the new person file. AUDIT: YES, ALWAYS 9000010.12,1208PLACEMENT SKIN TEST 12;8 POINTER TO V SKIN TEST FILE (#9000010.12) LAST EDITED: AUG 02, 2018 HELP-PROMPT: Enter the placement skin test that is associated with this skin test reading. DESCRIPTION: This is the placement skin test associated with this skin test reading. CROSS-REFERENCE: 9000010.12^APT 1)= S ^AUPNVSK("APT",$E(X,1,30),DA)="" 2)= K ^AUPNVSK("APT",$E(X,1,30),DA) This is a regular cross reference on the PLACEMENT SKIN TEST field. It allows easy lookup to see if a reading entry is associated with this placement entry. 9000010.12,1211SKIN TEST PLACEMENT RECORDED 12;11 DATE (audited) Date/Time Skin Test Placement Recorded INPUT TRANSFORM: S %DT="ETXR" D ^%DT S X=Y K:Y<1 X LAST EDITED: FEB 13, 2015 HELP-PROMPT: Enter the date and time of documentation of the placement of the skin test. DESCRIPTION: This timestamp field is the date and time of documentation of placement of the skin test. This field is set automatically when the EVENT DATE AND TIME is entered. AUDIT: YES, ALWAYS NOTES: TRIGGERED by the EVENT DATE AND TIME field of the V SKIN TEST File 9000010.12,1212ANATOMIC LOCATION OF PLACEMENT 12;12 POINTER TO IMM ADMINISTRATION SITE (BODY) FILE (#920.3) (audited) Anatomic Location of Skin Test Placement INPUT TRANSFORM: S DIC("S")="I '$$SCREEN^XTID(920.3,,Y_"","")" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X LAST EDITED: NOV 20, 2018 HELP-PROMPT: Select the anatomic location of skin test placement. DESCRIPTION: This is the area of the patient's body where the skin test was placed. TECHNICAL DESCR: This is the area of the patient's body where the skin test was placed. It is selected from a list of entries in the IMM ADMINISTRATION SITE (BODY) file, #920.3. SCREEN: S DIC("S")="I '$$SCREEN^XTID(920.3,,Y_"","")" EXPLANATION: Only active IMM ADMINISTRATION SITE (BODY) entries may be selected. AUDIT: YES, ALWAYS 9000010.12,1214HOURS READ POST-PLACEMENT 12;14 NUMBER (audited) Hours Between Placement and Reading INPUT TRANSFORM: K:+X'=X!(X>100)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: NOV 20, 2018 HELP-PROMPT: Type a number between 0 and 100, 0 decimal digits. DESCRIPTION: This is the number of hours between the placement of the skin test and the reading of the skin test. TECHNICAL DESCR: This field is set by cross-references on the Event Date and Time field, #1201 and the Date Read field, #.06. AUDIT: YES, ALWAYS UNEDITABLE RECORD INDEXES: AH (#1687) 9000010.12,1220SKIN TEST READING RECORDED 12;20 DATE (audited) Date/Time Skin Test Reading Recorded INPUT TRANSFORM: S %DT="ETXR" D ^%DT S X=Y K:Y<1 X LAST EDITED: NOV 20, 2018 HELP-PROMPT: Enter the date and time of documentation of the reading of the skin test. DESCRIPTION: This timestamp field is the date and time of documentation of reading of the skin test. This field is set automatically when the Date Read is entered. TECHNICAL DESCR: AUDIT: YES, ALWAYS NOTES: TRIGGERED by the DATE READ field of the V SKIN TEST File 9000010.12,1301READING COMMENTS 13;1 FREE TEXT (audited) Reading Comments INPUT TRANSFORM: K:$L(X)>245!($L(X)<1) X LAST EDITED: FEB 13, 2015 HELP-PROMPT: Enter a reading comment 1-245 characters in length. DESCRIPTION: This is a comment related to the reading of the patient's skin test. The provider may enter this manually via the PCE User Interface. AUDIT: YES, ALWAYS 9000010.12,80101EDITED FLAG 801;1 SET (audited) '1' FOR EDITED; LAST EDITED: NOV 20, 2018 HELP-PROMPT: Enter 1 if the original skin test data is being edited. DESCRIPTION: This field is automatically set to 1 if PCE detects that any original skin test data is being edited. TECHNICAL DESCR: PCE filing logic automatically compares the before and after pictures of the record to determine if the edited flag should be set to "1". AUDIT: YES, ALWAYS 9000010.12,80102AUDIT TRAIL 801;2 FREE TEXT (audited) INPUT TRANSFORM: K:$L(X)>85!($L(X)<2) X LAST EDITED: NOV 20, 2018 HELP-PROMPT: Answer must be 2 to 85 characters. DESCRIPTION: This field is populated automatically be the PCE filing logic. The format of the field is as follows: Pointer to PCE data source file_"-"_A for Add or E for Edit_" "_DUZ of the person who entered the data_";"... TECHNICAL DESCR: The PCE filing logic requires a pointer to the PCE data source file. If this is not passed, then PCE filing logic will not process the data. If the record is a new record, then an "A" is used to specify the source that added the data. If the record existed previously, PCE filing logic compares the old and new records of information. An "E" will be automatically used if the filing logic finds the data has been edited. If "E" is used, then the Edited Flag field is automatically set to 1. The DUZ is stored in its internal format to represent the user who performed the adding or editing of data for this record. Iterations of editing will be concatenated to the previous data source value, up to 85 characters. AUDIT: YES, ALWAYS 9000010.12,81101PLACEMENT COMMENTS 811;1 FREE TEXT (audited) Placement Comments INPUT TRANSFORM: K:$L(X)>245!($L(X)<1) X LAST EDITED: NOV 21, 2018 HELP-PROMPT: Enter a placement comment 1-245 characters in length. DESCRIPTION: This is a comment related to the placement of the patient's skin test. The provider may enter this manually via the PCE User Interface. TECHNICAL DESCR: AUDIT: YES, ALWAYS 9000010.12,81201VERIFIED 812;1 SET (audited) '1' FOR ELECTRONICALLY SIGNED; '2' FOR VERIFIED BY PACKAGE; LAST EDITED: NOV 20, 2018 HELP-PROMPT: Enter 1 if verified by electronic signature or 2 if verified by package. DESCRIPTION: This is used to note how the event was verified and is automatically entered by the software. TECHNICAL DESCR: This is automatically entered by the software and is uneditable for users. AUDIT: YES, ALWAYS UNEDITABLE 9000010.12,81202PACKAGE 812;2 POINTER TO PACKAGE FILE (#9.4) (audited) Package LAST EDITED: AUG 13, 2015 HELP-PROMPT: Enter the VistA package from which this record originated. DESCRIPTION: This is the VistA package from which this skin test record originated through PCE. This is automatically entered by the software and uneditable by users. AUDIT: YES, ALWAYS UNEDITABLE 9000010.12,81203DATA SOURCE 812;3 POINTER TO PCE DATA SOURCE FILE (#839.7) (audited) LAST EDITED: NOV 26, 2018 HELP-PROMPT: Select the data source for this skin test entry through PCE. DESCRIPTION: This is the data source for this skin test, automatically entered through the PCE software and uneditable by users. AUDIT: YES, ALWAYS UNEDITABLE FILES POINTED TO FIELDS ICD DIAGNOSIS (#80) PRIMARY DIAGNOSIS (#801) DIAGNOSIS 2 (#802) DIAGNOSIS 3 (#803) DIAGNOSIS 4 (#804) DIAGNOSIS 5 (#805) DIAGNOSIS 6 (#806) DIAGNOSIS 7 (#807) DIAGNOSIS 8 (#808) IMM ADMINISTRATION SITE (BODY) (#920.3) ANATOMIC LOCATION OF PLACEMENT (#1212) NEW PERSON (#200) READER (#.07) ORDERING PROVIDER (#1202) ENCOUNTER PROVIDER (#1204) PACKAGE (#9.4) PACKAGE (#81202) PATIENT/IHS (#9000001) PATIENT NAME (#.02) PCE DATA SOURCE (#839.7) DATA SOURCE (#81203) SKIN TEST (#9999999.28) SKIN TEST (#.01) V SKIN TEST (#9000010.12) PLACEMENT SKIN TEST (#1208) VISIT (#9000010) VISIT (#.03) File #9000010.12 Record Indexes: ACR (#1686) RECORD MUMPS IR ACTION Short Descr: Clinical Reminders index. Description: This cross-reference builds two indexes, one for finding all patients with a particular skin test and one for finding all the skin tests a patient has. The indexes are stored in the Clinical Reminders index global as: ^PXRMINDX(9000010.12,"IP",SKIN TEST,DFN,DATE,DAS) and ^PXRMINDX(9000010.12,"PI",DFN,SKIN TEST,DATE,DAS) respectively. Where SKIN TEST is a pointer to file #9999999.28. DFN is a pointer to file #2. DATE is EVENT DATE AND TIME, if it exists. If it does not, then it is VISIT/ADMIT DATE&TIME. DAS is the internal entry number of the entry in file #9000010.12. For all the details, see the Clinical Reminders Index Technical Guide/Programmer's Manual. Set Logic: D SVFILE^PXPXRM(9000010.12,.X,.DA) Kill Logic: D KVFILE^PXPXRM(9000010.12,.X,.DA) Whole Kill: K ^PXRMINDX(9000010.12) X(1): SKIN TEST (9000010.12,.01) (Subscr 1) (forwards) X(2): PATIENT NAME (9000010.12,.02) (Subscr 2) (forwards) X(3): VISIT (9000010.12,.03) (Subscr 3) (forwards) X(4): EVENT DATE AND TIME (9000010.12,1201) (forwards) X(5): DATE READ (9000010.12,.06) (forwards) AH (#1687) RECORD MUMPS IR ACTION Short Descr: Hours between placement and reading Description: This cross reference calculates the number of hours between the EVENT DATE AND TIME field (#1201) and the DATE READ field (#.06) and stores that value in the HOURS READ POST-PLACEMENT field (#1214). Set Logic: D HR^PXVUTL Q Kill Logic: D HR^PXVUTL Q Whole Kill: Q X(1): DATE READ (9000010.12,.06) (forwards) X(2): EVENT DATE AND TIME (9000010.12,1201) (forwards) X(3): HOURS READ POST-PLACEMENT (9000010.12,1214) (forwards) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):