Global: ^AUPNVIMM

FileMan FileNo	FileMan Filename	Package
9000010.11	V IMMUNIZATION	PCE Patient Care Encounter

Package	Total	Routines
PCE Patient Care Encounter	31	DISCLOSED TO LOINC CODES OTHER DIAGNOSIS PXAIIMM PXAPIIM PXCEAE1 PXCEVIMM PXCEVIS PXKENCOUNTER PXKFIMM1 PXKIMM PXPXRM PXPXRM1 PXPXRMI1 PXQUTL3B PXRHS03 PXRPC1 PXVDIS PXVP210 PXVPST01 PXVRPC4A PXVRPC7 PXVRPC7A PXVRPC9 PXVUTIL PXVUTL0 PXVWPXML PXVXR SNOMED CT ^AUPNVIMM VIS OFFERED/GIVEN TO PATIENT
VA FileMan	2	^DDE YEAR
Clinical Procedures	1	MDKRPC1
Enterprise Health Management Platform	1	HMPWBIM1
Pharmacy Benefits Management	1	PSUVIT1
Scheduling	1	SCRPW25

Package	Total	Routines
PCE Patient Care Encounter	12	PXAPIIM PXCEVIMM PXCEVIS PXKIMM PXKMAIN PXPXRM1 PXPXRMI1 PXRPC PXVP216 PXVPST01 PXVRPC4 PXVRPC7A
Virtual Patient Record	3	VPRDJ09 VPRDPXIM VPRP20
Clinical Case Registries	2	RORHL18 RORUTL21
Automated Information Collection System	1	IBDFRPC6
Clinical Reminders	1	PXRMIMM
Enterprise Health Management Platform	1	HMPDJ09
National Health Information Network	1	NHINVIMM
Order Entry Results Reporting	1	ORFIMM1

Package	Total	FileMan Files
PCE Patient Care Encounter	2	V IMMUNIZATION DELETED(#9000080.11)[1208] V IMMUNIZATION(#9000010.11)[1208]

Package	Total	FileMan Files
PCE Patient Care Encounter	11	PATIENT/IHS(#9000001)[.02] V IMMUNIZATION(#9000010.11)[1208] VISIT(#9000010)[.03] IMMUNIZATION LOT(#9999999.41)[.05, 1207] IMMUNIZATION(#9999999.14)[.01] VACCINE INFORMATION STATEMENT(#920)[#9000010.112(.01)] PCE DATA SOURCE(#839.7)[81203] IMMUNIZATION INFO SOURCE(#920.1)[1301] IMM ADMINISTRATION ROUTE(#920.2)[1302] IMM ADMINISTRATION SITE (BODY)(#920.3)[1303] IMM EXTERNAL AGENCY(#920.71)[#9000010.1182(.01)]
Kernel	2	PACKAGE(#9.4)[81202] NEW PERSON(#200)[1202, 1204, 1206, 1214, 1217, 1219, 1404]
Scheduling	2	CLINIC STOP(#40.7)[1203] HOSPITAL LOCATION(#44)[1215]
DRG Grouper	1	ICD DIAGNOSIS(#80)[1213, 1304, #9000010.113(.01)]
Lexicon Utility	1	UCUM CODES(#757.5)[1313]

Fields, Total: 63

Field #	Name	Loc	Type	Details
.01	IMMUNIZATION	0;1	POINTER TO IMMUNIZATION FILE (#9999999.14)	**********************REQUIRED FIELD********************** IMMUNIZATION(#9999999.14) LAST EDITED: `NOV 14, 2018` HELP-PROMPT: `Enter the name of the immunization given to the patient.` DESCRIPTION: `This is the type of immunization that was given to the patient at the encounter.` AUDIT: `YES, ALWAYS` CROSS-REFERENCE: `9000010.11^B` `1)= S ^AUPNVIMM("B",$E(X,1,30),DA)=""` `2)= K ^AUPNVIMM("B",$E(X,1,30),DA)` CROSS-REFERENCE: `^^TRIGGER^9000010.11^1206` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUPNVIMM(D0,12)):^(12),1:"") S X=$P(Y(1),U,6),X=X S DIU=X K Y S X=DIV S X=$G(DUZ) S DIH=$G(^AUPNVIMM(DIV(0),12)),DIV=X S $P(^(12),U,6)=DIV,DIH=9000010.11,DIG=1206 D ^DICR` `2)= Q` `CREATE VALUE)= S X=$G(DUZ)` `DELETE VALUE)= NO EFFECT` `FIELD)= IMMUNIZATION DOCUMENTER` `The Immunization Documenter field, #1206, will be triggered whenever the Immunization field, #.01, is entered or updated. The triggered value will be the DUZ of the user.` CROSS-REFERENCE: `9000010.11^AATOO^MUMPS` `1)= I $P(^AUPNVIMM(DA,0),U,2)]"",$P(^(0),U,3)]"" S ^AUPNVIMM("AA",$P(^AUPNVIMM(DA,0),U,2),X,(9999999-$P(+^AUPNVSIT($P(^AUPNVIMM(DA,0),U,3),0),".",1)),DA)=""` `2)= I $P(^AUPNVIMM(DA,0),U,2)]"",$P(^(0),U,3)]"" K ^AUPNVIMM("AA",$P(^AUPNVIMM(DA,0),U,2),X,(9999999-$P(+^AUPNVSIT($P(^AUPNVIMM(DA,0),U,3),0),".",1)),DA)` `This cross-reference is used for searches in sequence by patient, immunization pointer, inverted visit date, and internal entry number.` `"AA",PATIENT,IMMUNIZATION,VISIT,DA` CROSS-REFERENCE: `^^TRIGGER^9000010.11^1205` `1)= X ^DD(9000010.11,.01,1,4,1.3) I X S X=DIV S Y(1)=$S($D(^AUPNVIMM(D0,12)):^(12),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(9000010.11,.01,1,4,1.4)` `1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^AUPNVIMM(D0,12)):^(12),1:"") S X=$P(Y(1),U,5)=""` `1.4)= S DIH=$G(^AUPNVIMM(DIV(0),12)),DIV=X S $P(^(12),U,5)=DIV,DIH=9000010.11,DIG=1205 D ^DICR` `2)= Q` `3)= Do not delete.` `CREATE CONDITION)= DATE/TIME RECORDED=""` `CREATE VALUE)= NOW` `DELETE VALUE)= NO EFFECT` `FIELD)= DATE/TIME RECORDED` `The Date/Time Recorded field, #1205, will be triggered when the record is created. The triggered value will be NOW.` RECORD INDEXES: `ACR (#841)`
.02	PATIENT NAME	0;2	POINTER TO PATIENT/IHS FILE (#9000001)	**********************REQUIRED FIELD********************** PATIENT/IHS(#9000001) LAST EDITED: `NOV 14, 2018` HELP-PROMPT: `Enter the patient who was given the immunization.` DESCRIPTION: `This is the patient who was given the immunization.` TECHNICAL DESCR: `This is a pointer 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.11^AATOO2^MUMPS` `1)= I $P(^AUPNVIMM(DA,0),U,3)]"" S ^AUPNVIMM("AA",X,+^AUPNVIMM(DA,0),(9999999-$P(+^AUPNVSIT($P(^AUPNVIMM(DA,0),U,3),0),".",1)),DA)=""` `2)= I $P(^AUPNVIMM(DA,0),U,3)]"" K ^AUPNVIMM("AA",X,+^AUPNVIMM(DA,0),(9999999-$P(+^AUPNVSIT($P(^AUPNVIMM(DA,0),U,3),0),".",1)),DA)` `This is a Health Summary cross-reference. "AA",PATIENT,IMMUNIZATION,VISIT,DA` CROSS-REFERENCE: `9000010.11^C` `1)= S ^AUPNVIMM("C",$E(X,1,30),DA)=""` `2)= K ^AUPNVIMM("C",$E(X,1,30),DA)` `This cross-reference provides a look-up of immunizations by patient name.` RECORD INDEXES: `ACR (#841)`
.03	VISIT	0;3	POINTER TO VISIT FILE (#9000010)	**********************REQUIRED FIELD********************** VISIT(#9000010) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,5)=$P(^AUPNVIMM(DA,0),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `NOV 14, 2018` HELP-PROMPT: `Enter the Visit Date/Time for the encounter where the immunization was recorded.` DESCRIPTION: `This is the encounter defined in the VISIT file that represents when and where the immunization was given.` 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(^AUPNVIMM(DA,0),U,2)"` EXPLANATION: `VISIT MUST BE FOR CURRENT PATIENT` AUDIT: `YES, ALWAYS` `UNEDITABLE` CROSS-REFERENCE: `9000010.11^AD` `1)= S ^AUPNVIMM("AD",$E(X,1,30),DA)=""` `2)= K ^AUPNVIMM("AD",$E(X,1,30),DA)` `This cross-reference is used for searches by the visit pointer and internal entry number.` `"AD",VISIT pointer, DA` CROSS-REFERENCE: `9000010.11^AA^MUMPS` `1)= Q:$P(^AUPNVIMM(DA,0),U,2)="" S ^AUPNVIMM("AA",$P(^AUPNVIMM(DA,0),U,2),+^AUPNVIMM(DA,0),(9999999-$P(+^AUPNVSIT(X,0),".",1)),DA)=""` `2)= Q:$P(^AUPNVIMM(DA,0),U,2)="" K ^AUPNVIMM("AA",$P(^AUPNVIMM(DA,0),U,2),+^AUPNVIMM(DA,0),(9999999-$P(+^AUPNVSIT(X,0),".",1)),DA)` `This cross-reference is used for searches in sequence by patient, immunization pointer, inverted visit date, and internal entry number.` `"AA",PATIENT,IMMUNIZATION,VISIT,DA` CROSS-REFERENCE: `9000010.11^AV10^MUMPS` `1)= D ADD^AUPNVSIT` `2)= D SUB^AUPNVSIT` `This cross-reference adds and subtracts from the dependent entry count in the VISIT file.` RECORD INDEXES: `ACR (#841)`
.04	SERIES	0;4	SET	'P' FOR PARTIALLY COMPLETE; 'C' FOR COMPLETE; 'B' FOR BOOSTER; '1' FOR SERIES 1; '2' FOR SERIES 2; '3' FOR SERIES 3; '4' FOR SERIES 4; '5' FOR SERIES 5; '6' FOR SERIES 6; '7' FOR SERIES 7; '8' FOR SERIES 8; LAST EDITED: `FEB 11, 2015` HELP-PROMPT: `Enter the series number, booster, partial or complete.` DESCRIPTION: `This field allows the provider to specify which series of immunization type was given to the patient.` SCREEN: `S DIC("S")="I Y'>$$SERIES^PXVUTL0"` EXPLANATION: `Screen prevents selection of inappropriate series of immunization type.` AUDIT: `YES, ALWAYS`
.05	LOT	0;5	POINTER TO IMMUNIZATION LOT FILE (#9999999.41)	IMMUNIZATION LOT(#9999999.41) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,3)=0,$D(^AUTTIML(""C"",$P(^AUPNVIMM(DA,0),U,1),Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Select the lot of the immunization being administered.` DESCRIPTION: `This Indian Health Service field indicates the lot number associated with this immunization.` 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.` `APCDALVR Variable = APCDALVR("APCDTLOT")` SCREEN: `S DIC("S")="I $P(^(0),U,3)=0,$D(^AUTTIML(""C"",$P(^AUPNVIMM(DA,0),U,1),Y))"` EXPLANATION: `LOT MUST BE AVAILABLE AND MUST BE A VALID LOT FOR THE IMMUNIZATION BEING ENTERED.` AUDIT: `YES, ALWAYS`
.06	REACTION	0;6	SET	'1' FOR FEVER; '2' FOR IRRITABILITY; '3' FOR LOCAL REACTION OR SWELLING; '4' FOR VOMITING; '5' FOR RASH OR ITCHING; '6' FOR LETHARGY; '7' FOR CONVULSIONS; '8' FOR ARTHRITIS OR ARTHRALGIAS; '9' FOR ANAPHYLAXIS OR COLLAPSE; '10' FOR RESPIRATORY DISTRESS; '11' FOR OTHER; '0' FOR NONE; LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Enter the number representing the patients reaction to the immunization.` DESCRIPTION: `This is the reaction caused by the immunization that was observed by the provider.` AUDIT: `YES, ALWAYS`
.07	CONTRAINDICATED	0;7	SET	'1' FOR YES (DO NOT REPEAT THIS VACCINE).; '0' FOR NO (OK TO USE IN THE FUTURE); LAST EDITED: `NOV 14, 2018` HELP-PROMPT: `Enter 1 if this immunization should not be given to the patient in the future.` DESCRIPTION: `This field allows the immunization to be recorded as contraindicated.` AUDIT: `YES, ALWAYS`
.08	DOSE OVERRIDE	0;8	SET	'0' FOR @; '1' FOR INVALID--BAD STORAGE; '2' FOR INVALID--DEFECTIVE; '3' FOR INVALID--EXPIRED; '4' FOR INVALID--ADMIN ERROR; '9' FOR FORCED VALID; LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Select the reason for this dose override.` DESCRIPTION: `This Indian Health Service field indicates the dose override status of this immunization.` 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`
.09	INJECTION SITE	0;9	SET	'LTI' FOR Left Thigh IM; 'LTS' FOR Left Thigh SQ; 'RTI' FOR Right Thigh IM; 'RTS' FOR Right Thigh SQ; 'BTI' FOR Both Thighs IM; 'LDI' FOR Left Delt IM; 'LAS' FOR Left Arm SQ; 'RDI' FOR Right Delt IM; 'RAS' FOR Right Arm SQ; 'O' FOR Oral; 'IN' FOR Nasal; 'LID' FOR Left Arm Intradermal; 'RID' FOR Right Arm Intradermal; LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Enter the body site where the injection was given.` DESCRIPTION: `This Indian Health Service field identifies the body site where the immunization was administered.` 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`
.11	VOLUME	0;11	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>5)!(X<0)!(X?.E1"."3N.N) X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Type a Number between 0 and 5, 2 Decimal Digits` DESCRIPTION: `This Indian Health Service field indicates the volume of vaccine administered for this immunization.` 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`
.12	DATE OF VAC INFO STATEMENT	0;12	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Enter the date the vaccine information statement for this vaccine was offered to the patient.` DESCRIPTION: `This Indian Health Service field indicates the date the vaccine information statement associated with this immunization was offered/given to the patient.` 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`
.13	CREATED BY V CPT ENTRY	0;13	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Enter the IEN of the V CPT entry that created this V Immunization.` DESCRIPTION: `This Indian Health Service field identifies the V CPT entry, if any, that created this V Immunization entry.` 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`
.14	VAC ELIGIBILITY	0;14	POINTER *** TO AN UNDEFINED FILE (#9002084.83), STORED IN ^BIELIG *****	LAST EDITED: `NOV 14, 2018` HELP-PROMPT: `Enter the patient's VFC Eligibility on this visit.` DESCRIPTION: `This Indian Health Service field indicates the Vaccine for Children (VFC) Program eligibility for this patient on this visit.` 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.` `This field points to Indian Health Service's BI TABLE ELIGIBILITY CODES file, #9002084.83, which is not used by the Department of Veterans Affairs.` AUDIT: `YES, ALWAYS`
.15	IMPORT FROM OUTSIDE REGISTRY	0;15	SET	'1' FOR IMPORTED; '0' FOR NOT IMPORTED; '2' FOR EDITED AFTER IMPORT; LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Enter 1 if this immunization was imported from an outside registry.` DESCRIPTION: `This Indian Health Service field indicated the import status of this immunization from an outside registry.` 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`
.16	NDC	0;16	POINTER *** TO AN UNDEFINED FILE (#9002084.95), STORED IN ^BINDC *****	LAST EDITED: `NOV 14, 2018` HELP-PROMPT: `Select the NDC Code for this immunization.` DESCRIPTION: `This Indian Health Service field identifies the National Drug Code (NDC) for this vaccine.` 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.` `This field points to Indian Health Service's BI TABLE NDC CODES file, #9002084.95, which is not used by the Department of Veterans Affairs.` AUDIT: `YES, ALWAYS`
1	ADMINISTRATIVE NOTES	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>160!($L(X)<1) X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Answer must be 1-160 characters in length.` DESCRIPTION: `This Indian Health Service field is a free text field used to document administrative information about this immunization.` 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`
2	VIS OFFERED/GIVEN TO PATIENT	2;0	POINTER Multiple #9000010.112	9000010.112 DESCRIPTION: `This is the Vaccine Information Statement (VIS) that was offered to the patient prior to the administration of the immunization, along with the date/time it was offered.`
3	OTHER DIAGNOSIS	3;0	POINTER Multiple #9000010.113	9000010.113 DESCRIPTION: `This is a list of diagnoses for this immunization event, in addition to the Primary Diagnosis selected for this event.` TECHNICAL DESCR: `This is a multiple of diagnoses for this immunization event. They are in addition to the Primary Diagnosis. They are selected from the ICD DIAGNOSIS file, #80.`
820	DISCLOSED TO	820;0	POINTER Multiple #9000010.1182	9000010.1182 DESCRIPTION: `A list of agencies this record has been disclosed to.`
1101	REMARKS	11;0	WORD-PROCESSING #9000010.1111 (AUDITED)	DESCRIPTION: `This is additional comments or remarks related to the immunization given to the patient.` LAST EDITED: `AUG 24, 2016` HELP-PROMPT: `Enter comments related to the immunization encounter with the patient.` DESCRIPTION: `This field can be used to enter comments related to the immunization encounter with the patient.` AUDIT: `YES, ALWAYS`
1201	EVENT DATE AND TIME	12;1	DATE	INPUT TRANSFORM: `S %DT="ET" D ^%DT S X=Y K:Y<1!$$TIME^PXVUTL X` LAST EDITED: `NOV 14, 2018` HELP-PROMPT: `Enter the date and (optional) time the immunization was given.` DESCRIPTION: `This is the date and time the immunization was given. 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 for an historical immunization.` `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 immunization date and time. The immunization date prompt defaults to the visit date and the time is entered to reflect the actual` `time the immunization was given. The immunization 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 the user wants to enter an historical immunization, the user should use the Historical Encounter entry action to document the historical immunization. Historical entries will not be eligible for credit.` `PCE data sources for automatic (scanning) data capture will be blank unless the immunization date and time are passed to PCE for filing.` AUDIT: `YES, ALWAYS` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` RECORD INDEXES: `ACR (#841), AH (#844)`
1202	ORDERING PROVIDER	12;2	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `FEB 13, 2015` HELP-PROMPT: `Enter the provider who ordered this immunization.` DESCRIPTION: `The field can be used to document the provider who ordered the immunization.` AUDIT: `YES, ALWAYS`
1203	CLINIC	12;3	POINTER TO CLINIC STOP FILE (#40.7)	CLINIC STOP(#40.7) LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Select a clinic stop for this Immunization event.` DESCRIPTION: `This Indian Health Service field indicates the clinic stop associated with this visit.` 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.` `APCDALVR Variable = APCDALVR("APCDTCLN")` AUDIT: `YES, ALWAYS`
1204	ENCOUNTER PROVIDER	12;4	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `FEB 13, 2015` HELP-PROMPT: `Enter the provider who gave this immunization.` DESCRIPTION: `This is the provider who gave this immunization.` TECHNICAL DESCR: `This person can be any person in the new person file.` AUDIT: `YES, ALWAYS`
1205	DATE/TIME RECORDED	12;5	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Enter the date and time of documentation of the administration of the immunization.` DESCRIPTION: `This timestamp field is the date and time of documentation of administration of the immunization. This field is set automatically when the immunization is entered.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` NOTES: `TRIGGERED by the IMMUNIZATION field of the V IMMUNIZATION File`
1206	IMMUNIZATION DOCUMENTER	12;6	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `FEB 13, 2015` HELP-PROMPT: `Enter the person who documented this immunization in the system.` DESCRIPTION: `This is the person/provider who documented this immunization by entering the data into the system by whatever means.` AUDIT: `YES, ALWAYS` NOTES: `TRIGGERED by the IMMUNIZATION field of the V IMMUNIZATION File`
1207	LOT NUMBER	12;7	POINTER TO IMMUNIZATION LOT FILE (#9999999.41)	IMMUNIZATION LOT(#9999999.41) INPUT TRANSFORM: `S DIC("S")="I $$ACT^PXVXR(Y)" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X` LAST EDITED: `APR 26, 2021` HELP-PROMPT: `Enter the lot number for this immunization.` DESCRIPTION: `This is the lot number of the immunization entered for this event. If historical event, enter lot number (if known) in Comments.` SCREEN: `S DIC("S")="I $$ACT^PXVXR"` EXPLANATION: `Screen requires selection of active lot for selected immunization.` AUDIT: `YES, ALWAYS` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9000010.11^LN` `1)= S ^AUPNVIMM("LN",$E(X,1,30),DA)=""` `2)= K ^AUPNVIMM("LN",$E(X,1,30),DA)` `3)= Used for look-up and to determine if a Lot Number entry is being used.` `This cross-reference is used to determine if an entry in the IMMUNIZATION LOT file is being used by an entry in the V IMMUNIZATION file. Can also be used for V IMMUNIZATION look-ups.` CROSS-REFERENCE: `9000010.11^AF^MUMPS` `1)= D DECR^PXVXR Q` `2)= D INCR^PXVXR Q` `NOREINDEX)= 1` `This MUMPS type cross-reference maintains the number of doses remaining for this lot number.`
1208	PARENT	12;8	POINTER TO V IMMUNIZATION FILE (#9000010.11)	V IMMUNIZATION(#9000010.11) LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Select the parent event to this one.` DESCRIPTION: `This Indian Health Service field indicates the parent immunization, if any, associated with this immunization, such as for immunizations given in series.` 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.` `APCDALVR Variable = APCDALVR("APCDTPNT")` AUDIT: `YES, ALWAYS`
1209	EXTERNAL KEY	12;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: `This Indian Health Service free text field identifies the external key associated with this immunization.` 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.` `APCDALVR Variable = APCDALVR("APCDTEXK")` AUDIT: `YES, ALWAYS`
1210	OUTSIDE PROVIDER NAME	12;10	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: `This Indian Health Service field contains the name of the outside provider associated with this immunization.` 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.` `APCDALVR Variable = APCDALVR("APCDTOPR")` AUDIT: `YES, ALWAYS`
1213	ANCILLARY POV	12;13	POINTER TO ICD DIAGNOSIS FILE (#80)	ICD DIAGNOSIS(#80) LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Select an ancillary diagnosis for this event.` DESCRIPTION: `This Indian Health Service field indicated the ancillary diagnosis related to this immunization.` 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`
1214	USER LAST UPDATE	12;14	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Enter the user who last updated this immunization event.` DESCRIPTION: `This Indian Health Service field indicates the user who last updated information for this immunization.` 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`
1215	ORDERING LOCATION	12;15	POINTER TO HOSPITAL LOCATION FILE (#44)	HOSPITAL LOCATION(#44) LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Select the location within this medical center where this immunization was ordered.` DESCRIPTION: `This Indian Health Service field indicated the hospital location ordering this immunization.` 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`
1216	DATE/TIME ENTERED	12;16	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Enter the date and time this event was entered here.` DESCRIPTION: `This Indian Health Service field indicates the date and time that this immunization information was entered into this record.` 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` CROSS-REFERENCE: `^^TRIGGER^9000010.11^1217` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUPNVIMM(D0,12)):^(12),1:"") S X=$P(Y(1),U,17),X=X S DIU=X K Y S X=DIV I '$G(APCDVMUX) S X=DUZ X ^DD(9000010.11,1216,1,1,1.4)` `1.4)= S DIH=$G(^AUPNVIMM(DIV(0),12)),DIV=X S $P(^(12),U,17)=DIV,DIH=9000010.11,DIG=1217 D ^DICR` `2)= Q` `CREATE VALUE)= I '$G(APCDVMUX) S X=DUZ` `DELETE VALUE)= NO EFFECT` `FIELD)= #1217` CROSS-REFERENCE: `^^TRIGGER^9000010.11^1218` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUPNVIMM(D0,12)):^(12),1:"") S X=$P(Y(1),U,18),X=X S DIU=X K Y S X=DIV I '$G(APCDVMUX) S X=$$NOW^XLFDT X ^DD(9000010.11,1216,1,2,1.4)` `1.4)= S DIH=$G(^AUPNVIMM(DIV(0),12)),DIV=X S $P(^(12),U,18)=DIV,DIH=9000010.11,DIG=1218 D ^DICR` `2)= Q` `CREATE VALUE)= I '$G(APCDVMUX) S X=$$NOW^XLFDT` `DELETE VALUE)= NO EFFECT` `FIELD)= #1218`
1217	ENTERED BY	12;17	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Select the user who first entered this event.` DESCRIPTION: `This Indian Health Service field indicates the user who entered this immunization record.` 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` NOTES: `TRIGGERED by the DATE/TIME ENTERED field of the V IMMUNIZATION File`
1218	DATE/TIME LAST MODIFIED	12;18	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Enter the date and time this event was last modified.` DESCRIPTION: `This Indian Health Service field indicates the date and time this immunization record was last modified.` 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` NOTES: `TRIGGERED by the DATE/TIME ENTERED field of the V IMMUNIZATION File` CROSS-REFERENCE: `^^TRIGGER^9000010.11^1219` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUPNVIMM(D0,12)):^(12),1:"") S X=$P(Y(1),U,19),X=X S DIU=X K Y S X=DIV I '$G(APCDVMUX) S X=DUZ X ^DD(9000010.11,1218,1,1,1.4)` `1.4)= S DIH=$G(^AUPNVIMM(DIV(0),12)),DIV=X S $P(^(12),U,19)=DIV,DIH=9000010.11,DIG=1219 D ^DICR` `2)= Q` `CREATE VALUE)= I '$G(APCDVMUX) S X=DUZ` `DELETE VALUE)= NO EFFECT` `FIELD)= #1219`
1219	LAST MODIFIED BY	12;19	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Select the user who last modified this event.` DESCRIPTION: `This Indian Health Service field indicates the user who last modified this immunization record.` 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` NOTES: `TRIGGERED by the DATE/TIME LAST MODIFIED field of the V IMMUNIZATION File`
1220	WARNING ACKNOWLEDGED	12;20	SET	'1' FOR YES; LAST EDITED: `DEC 07, 2015` HELP-PROMPT: `Enter YES to acknowledge a warning of contraindication/refusal events associated with this immunization.` DESCRIPTION: `This field indicates acknowledgement of a contraindication/refusal events warning for this immunization with the decision to proceed with administration.` AUDIT: `YES, ALWAYS`
1221	TIMESTAMP	12;21	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:X<1 X` LAST EDITED: `JUN 21, 2016` HELP-PROMPT: `Enter the date/time the record was added or edited.` DESCRIPTION: `Indicates the date/time the record was added or edited.` AUDIT: `YES, ALWAYS` CROSS-REFERENCE: `9000010.11^AT` `1)= S ^AUPNVIMM("AT",$E(X,1,30),DA)=""` `2)= K ^AUPNVIMM("AT",$E(X,1,30),DA)` `3)= Do not delete.` `This cross-reference is used to search for records that have been last added or edited within a certain time-frame.`
1222	ORDERED BY POLICY	12;22	SET (BOOLEAN Data Type)	This field indicates if this immunization was ordered by policy or not. LAST EDITED: `JAN 10, 2022` HELP-PROMPT: `Enter if this immunization was ordered by policy.` DESCRIPTION: `This field indicates if this immunization was ordered by policy or not.` AUDIT: `YES, ALWAYS`
1301	EVENT INFORMATION SOURCE	13;1	POINTER TO IMMUNIZATION INFO SOURCE FILE (#920.1)	**********************REQUIRED FIELD********************** IMMUNIZATION INFO SOURCE(#920.1) INPUT TRANSFORM: `S DIC("S")="I '$P(^(0),U,3)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `JUN 22, 2016` HELP-PROMPT: `Select the source of this event's information.` DESCRIPTION: `This is the source of the information obtained for this immunization event.` TECHNICAL DESCR: `This field is used to note the source of this immunization event. The options available for this field come from the IMMUNIZATION INFO SOURCE file.` SCREEN: `S DIC("S")="I '$P(^(0),U,3)"` EXPLANATION: `SOURCE selected must have a STATUS of ACTIVE` AUDIT: `YES, ALWAYS`
1302	ROUTE OF ADMINISTRATION	13;2	POINTER TO IMM ADMINISTRATION ROUTE FILE (#920.2)	IMM ADMINISTRATION ROUTE(#920.2) INPUT TRANSFORM: `S DIC("S")="I '$$SCREEN^XTID(920.2,,Y_"","")" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Select the route of administration for this event.` DESCRIPTION: `This is the method this vaccine was administered. Select from the list provided.` TECHNICAL DESCR: `This is the method by which the vaccine was administered. This is selected from a set of values in the IMM ROUTE OF ADMINISTRATION file, #920.2.` SCREEN: `S DIC("S")="I '$$SCREEN^XTID(920.2,,Y_"","")"` EXPLANATION: `Only active IMM ADMINISTRATION ROUTE entries may be selected.` AUDIT: `YES, ALWAYS`
1303	SITE OF ADMINISTRATION (BODY)	13;3	POINTER TO IMM ADMINISTRATION SITE (BODY) FILE (#920.3)	IMM ADMINISTRATION SITE (BODY)(#920.3) 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 01, 2018` HELP-PROMPT: `Select the site the vaccine was administered.` DESCRIPTION: `This is the area of the patient's body through which the vaccine was administered.` TECHNICAL DESCR: `This is the area of the patient's body through which the vaccine was administered. It is selected from a list provided by 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`
1304	PRIMARY DIAGNOSIS	13;4	POINTER TO ICD DIAGNOSIS FILE (#80)	ICD DIAGNOSIS(#80) INPUT TRANSFORM: `S DIC("S")="D ^AUPNSICD" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X I $D(X),$D(D0),$$DUPDX^PXVUTIL(D0,X) K X` LAST EDITED: `NOV 15, 2018` HELP-PROMPT: `Select the primary (or initial) diagnosis for this immunization.` DESCRIPTION: `This is the primary (or initial) diagnosis for this immunization event.` TECHNICAL DESCR: `This is the primary diagnosis for this immunization. This field is a pointer to the ICD DIAGNOSIS file, #80. Selection is screened to make sure it's appropriate and active. An immunization event can have more than one` `diagnosis - see the Other Diagnosis field, #2.` SCREEN: `S DIC("S")="D ^AUPNSICD"` EXPLANATION: `Diagnosis must be appropriate and active.` AUDIT: `YES, ALWAYS` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
1312	DOSE	13;12	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<0)!(X?.E1"."3N.N) X` OUTPUT TRANSFORM: `S:Y Y=$FN(Y,",")` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Type a number between 0 and 999, 2 fractional digits.` DESCRIPTION: `This is the amount of vaccine product administered for this immunization. The units are stored in the Dose Units field, #1313.` TECHNICAL DESCR: AUDIT: `YES, ALWAYS`
1312.5	DOSAGE		COMPUTED	MUMPS CODE: `S X=$$DOSAGE^PXVUTIL(D0)` ALGORITHM: `S X=$$DOSAGE^PXVUTIL(D0)` LAST EDITED: `NOV 15, 2018` DESCRIPTION: `A computed field that concatenates the Dose, field #1312 and Dose Units, field #1313. The resulting output will look something like this: ".5 mL".` TECHNICAL DESCR:
1313	DOSE UNITS	13;13	POINTER TO UCUM CODES FILE (#757.5)	UCUM CODES(#757.5) OUTPUT TRANSFORM: `S:Y Y=$P($$UCUMCODE^LEXMUCUM(Y),"^")` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Enter the unit associated with the quantity of the vaccine administered.` DESCRIPTION: `This is the unit associated with the quantity of the vaccine administered.` TECHNICAL DESCR: AUDIT: `YES, ALWAYS`
1401	RESULTS	14;1	SET	'T' FOR TAKE; 'N' FOR NO TAKE; 'I' FOR INDETERMINATE; LAST EDITED: `MAY 22, 2015` HELP-PROMPT: `Enter whether the results were Take, No Take or Indeterminate.` DESCRIPTION: `This is the interpretation of the inoculation result.` AUDIT: `YES, ALWAYS`
1402	READING	14;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>40)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 27, 2015` HELP-PROMPT: `Enter a whole number between 0 and 40.` DESCRIPTION: `This is the objective, measurable reading following the inoculation.` AUDIT: `YES, ALWAYS` CROSS-REFERENCE: `9000010.11^AE` `1)= S ^AUPNVIMM("AE",$E(X,1,30),DA)=""` `2)= K ^AUPNVIMM("AE",$E(X,1,30),DA)` `This cross-reference indexes the reading results across all patients.`
1403	DATE/TIME READ	14;3	DATE	INPUT TRANSFORM: `S %DT="ET" D ^%DT S X=Y K:Y<1!$$TIME^PXVUTL X` LAST EDITED: `NOV 15, 2018` HELP-PROMPT: `Enter the date and (optional) time the immunization was read.` DESCRIPTION: `This is the date and time of the reading of the immunization results. Time entry is optional and an imprecise date is allowed for historical immunizations.` TECHNICAL DESCR: AUDIT: `YES, ALWAYS` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `^^TRIGGER^9000010.11^1405` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^AUPNVIMM(D0,14)):^(14),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(9000010.11,1403,1,1,1.4)` `1.4)= S DIH=$G(^AUPNVIMM(DIV(0),14)),DIV=X S $P(^(14),U,5)=DIV,DIH=9000010.11,DIG=1405 D ^DICR` `2)= Q` `CREATE VALUE)= NOW` `DELETE VALUE)= NO EFFECT` `FIELD)= READING RECORDED` RECORD INDEXES: `AH (#844)`
1404	READER	14;4	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `JAN 27, 2015` HELP-PROMPT: `Enter the name of the person who read the inoculation results.` DESCRIPTION: `This is the name of the person who read and interpreted the results of the inoculation.` AUDIT: `YES, ALWAYS`
1405	READING RECORDED	14;5	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JAN 27, 2015` HELP-PROMPT: `Enter the date and time of the reading of the inoculation results.` DESCRIPTION: `This timestamp field is the date and time of documentation of reading of the inoculation results. This field is set automatically when the DATE/TIME READ is entered.` AUDIT: `YES, ALWAYS` `WRITE AUTHORITY: ^` NOTES: `TRIGGERED by the DATE/TIME READ field of the V IMMUNIZATION File`
1406	HOURS READ POST-INOCULATION	14;6	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>100)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `AUG 18, 2015` HELP-PROMPT: `Type a number between 0 and 100, 0 decimal digits.` DESCRIPTION: `This is the number of hours between the inoculation and the reading of the results.` AUDIT: `YES, ALWAYS` RECORD INDEXES: `AH (#844)`
1501	READING COMMENT	15;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` LAST EDITED: `JAN 28, 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 inoculation. The provider may enter this manually via the PCE User Interface.` AUDIT: `YES, ALWAYS`
1601	WARNING OVERRIDE REASON	16;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<3) X` LAST EDITED: `FEB 01, 2016` HELP-PROMPT: `Answer must be 3-245 characters in length.` DESCRIPTION: `This is the reason for overriding the warning of existing contraindication and/or refusal reasons.` AUDIT: `YES, ALWAYS`
2601	SNOMED CT	26;0	Multiple #9000010.1126	9000010.1126 DESCRIPTION: `This Indian Health Service field indicates the SNOMED Clinical Terms (CT) that describe this immunization and their preferred terms.` 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.`
2701	LOINC CODES	27;0	Multiple #9000010.1127	9000010.1127 DESCRIPTION: `This Indian Health Service field is the LOINC codes that identify the immunization, along with their descriptions.` 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.`
80101	EDITED FLAG	801;1	SET	'1' FOR EDITED; LAST EDITED: `FEB 13, 2015` HELP-PROMPT: `Enter 1 if the original immunization data is being edited.` DESCRIPTION: `This field is automatically set to 1 if PCE detects that any original immunization 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`
80102	AUDIT TRAIL	801;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>85!($L(X)<2) X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Answer must be 2 to 85 characters.` DESCRIPTION: `This field is populated automatically by 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, the 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`
81101	COMMENTS	811;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Enter a comment 1-245 characters in length.` DESCRIPTION: `This is a comment related to the patient's immunization. The provider may enter this manually via the PCE User Interface.` TECHNICAL DESCR: AUDIT: `YES, ALWAYS`
81201	VERIFIED	812;1	SET	'1' FOR ELECTRONICALLY SIGNED; '2' FOR VERIFIED BY PACKAGE; LAST EDITED: `FEB 13, 2015` 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`
81202	PACKAGE	812;2	POINTER TO PACKAGE FILE (#9.4)	PACKAGE(#9.4) 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 immunization record originated through PCE.` `This is automatically entered by the software and uneditable by users.` AUDIT: `YES, ALWAYS` `UNEDITABLE`
81203	DATA SOURCE	812;3	POINTER TO PCE DATA SOURCE FILE (#839.7)	PCE DATA SOURCE(#839.7) LAST EDITED: `NOV 01, 2018` HELP-PROMPT: `Select the data source for this immunization entry.` DESCRIPTION: `This is the data source for this immunization, automatically entered through the PCE software and uneditable by users.` AUDIT: `YES, ALWAYS` `UNEDITABLE`

Name	Field # of Occurrence
^%DT	.12+1, 1201+1, 1205+1, 1216+1, 1218+1, 1221+1, 1403+1, 1405+1
NOW^%DTC	.01(XREF 4S), 1403(XREF 1S)
ADD^AUPNVSIT	.03(XREF 3S)
SUB^AUPNVSIT	.03(XREF 3K)
^DIC	.03+1, .05+1, 1207+1, 1301+1, 1302+1, 1303+1, 1304+1
^DICR	.01(XREF 2S), .01(XREF 4n1.4), 1216(XREF 1n1.4), 1216(XREF 2n1.4), 1218(XREF 1n1.4), 1403(XREF 1n1.4)
$$UCUMCODE^LEXMUCUM	1313OT+1
KVFILE^PXPXRM	IXACRKL+1
SVFILE^PXPXRM	IXACRSL+1
$$DOSAGE^PXVUTIL	1312.5+1
$$DUPDX^PXVUTIL	1304+1
HRS^PXVUTIL	IXAHSL+1, IXAHKL+1
$$TIME^PXVUTL	1201+1, 1403+1
DECR^PXVXR	1207(XREF 2S)
INCR^PXVXR	1207(XREF 2K)
$$NOW^XLFDT	1216(XREF 2S)

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVIMM - [#9000010.11]	IXADPP2CC+1, .01(XREF 2S), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4n1.3), .01(XREF 4n1.4), .02(XREF 2S), .02(XREF 2K), .03(XREF 2S) , .03(XREF 2K), 1216(XREF 1S), 1216(XREF 1n1.4), 1216(XREF 2S), 1216(XREF 2n1.4), 1218(XREF 1S), 1218(XREF 1n1.4), 1403(XREF 1S), 1403(XREF 1n1.4)
^AUPNVIMM("AA"	.01(XREF 3S), .01(XREF 3K), .02(XREF 2S), .02(XREF 2K), .03(XREF 2S), .03(XREF 2K)
^AUPNVIMM("AD"	.03(XREF 1S), .03(XREF 1K)
^AUPNVIMM("ADA"	IXADASL+1*, IXADAKL+1!, IXADAKEIC+1!
^AUPNVIMM("ADP"	IXADPSL+1*, IXADPKL+1!, IXADPKEIC+1!
^AUPNVIMM("AE"	1402(XREF 1S), 1402(XREF 1K)
^AUPNVIMM("AT"	1221(XREF 1S), 1221(XREF 1K)
^AUPNVIMM("B"	.01(XREF 1S), .01(XREF 1K)
^AUPNVIMM("C"	.02(XREF 3S), .02(XREF 3K)
^AUPNVIMM("LN"	1207(XREF 1S), 1207(XREF 1K)
^AUPNVSIT - [#9000010]	ID.03+1, .01(XREF 3S), .01(XREF 3K), .02(XREF 2S), .02(XREF 2K), .03(XREF 2S), .03(XREF 2K)
^DD("DD"	ID.03+1
^DD(9000010.11	.01(XREF 4S), 1216(XREF 1S), 1216(XREF 2S), 1218(XREF 1S), 1403(XREF 1S)
^DPT - [#2]	ID.02+1
^PXRMINDX(9000010.11	IXACRKEIC+1!

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	.01(XREF 4S), 1403(XREF 1S)
>> %DT	.12+1, 1201+1, 1205+1, 1216+1, 1218+1, 1221+1, 1403+1, 1405+1
%H	.01(XREF 4S), 1403(XREF 1S)
%I	.01(XREF 4S), 1403(XREF 1S)
AIHSY	ID.03+1*!
>> APCDVMUX	1216(XREF 1S), 1216(XREF 2S), 1218(XREF 1S)
>> D0	.01(XREF 2S), .01(XREF 4S), .01(XREF 4n1.3), 1216(XREF 1S), 1216(XREF 2S), 1218(XREF 1S), 1304+1, 1312.5+1, 1403(XREF 1S)
>> DA	IXACRSL+1, IXACRKL+1, IXADASL+1, IXADAKL+1, IXADPSL+1, IXADPKL+1, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 3S) , .01(XREF 3K), .01(XREF 4n1.3), .02(XREF 2S), .02(XREF 2K), .02(XREF 3S), .02(XREF 3K), .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K) , 1207(XREF 1S), 1207(XREF 1K), 1216(XREF 1S), 1216(XREF 2S), 1218(XREF 1S), 1221(XREF 1S), 1221(XREF 1K), 1402(XREF 1S), 1402(XREF 1K), 1403(XREF 1S)
>> DA(1	IXADASL+1, IXADAKL+1, IXADPSL+1, IXADPKL+1, IXADPP2CC+1
DIC	ID.02+1, ID.03+1, .03+1!, .05+1!, 1207+1!, 1301+1!, 1302+1!, 1303+1!, 1304+1!*
DIC("S"	.03+1, .03SCR+1, .04SCR+1, .05+1, .05SCR+1, 1207+1, 1207SCR+1, 1301+1, 1301SCR+1, 1302+1 , 1302SCR+1, 1303+1, 1303SCR+1, 1304+1, 1304SCR+1*
>> DIE	.03+1, .05+1, 1207+1, 1301+1, 1302+1, 1303+1, 1304+1
>> DIG	.01(XREF 2S), .01(XREF 4n1.4), 1216(XREF 1n1.4), 1216(XREF 2n1.4), 1218(XREF 1n1.4), 1403(XREF 1n1.4)
>> DIH	.01(XREF 2S), .01(XREF 4n1.4), 1216(XREF 1n1.4), 1216(XREF 2n1.4), 1218(XREF 1n1.4), 1403(XREF 1n1.4)
>> DIU	.01(XREF 2S), .01(XREF 4S), 1216(XREF 1S), 1216(XREF 2S), 1218(XREF 1S), 1403(XREF 1S)
DIV	.01(XREF 2S), .01(XREF 4S), .01(XREF 4n1.3), .01(XREF 4n1.4), 1216(XREF 1S), 1216(XREF 1n1.4), 1216(XREF 2S), 1216(XREF 2n1.4), 1218(XREF 1S), 1218(XREF 1n1.4) , 1403(XREF 1S), 1403(XREF 1n1.4)
DIV(0	.01(XREF 2S), .01(XREF 4n1.3), .01(XREF 4n1.4), 1216(XREF 1S), 1216(XREF 1n1.4), 1216(XREF 2S), 1216(XREF 2n1.4), 1218(XREF 1S), 1218(XREF 1n1.4), 1403(XREF 1S) , 1403(XREF 1n1.4)
DUZ	.01(XREF 2S), 1216(XREF 1S), 1218(XREF 1S)
U	ID.02+1, ID.03+1, IXADPP2CC+1, .01(XREF 2S), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4n1.3), .01(XREF 4n1.4), .02(XREF 2S) , .02(XREF 2K), .03(XREF 2S), .03(XREF 2K), 1216(XREF 1S), 1216(XREF 1n1.4), 1216(XREF 2S), 1216(XREF 2n1.4), 1218(XREF 1S), 1218(XREF 1n1.4), 1403(XREF 1S) , 1403(XREF 1n1.4)
X	IXACRSL+1, IXACRKL+1, IXADPP2CC+1, IXAHSCC+1, IXAHKCC+1, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 3S), .01(XREF 3K) , .01(XREF 4S), .01(XREF 4n1.3), .01(XREF 4n1.4), .02(XREF 2S), .02(XREF 2K), .02(XREF 3S), .02(XREF 3K), .03+1!, .03(XREF 1S), .03(XREF 1K) , .03(XREF 2S), .03(XREF 2K), .05+1!, .11+1!, .12+1!, .13+1!, 1+1!, 1201+1!, 1205+1!, 1207+1! , 1207(XREF 1S), 1207(XREF 1K), 1209+1!, 1210+1!, 1216+1!, 1216(XREF 1S), 1216(XREF 1n1.4), 1216(XREF 2S), 1216(XREF 2n1.4), 1218+1! , 1218(XREF 1S), 1218(XREF 1n1.4), 1221+1!, 1221(XREF 1S), 1221(XREF 1K), 1301+1!, 1302+1!, 1303+1!, 1304+1!, 1312+1! , 1312.5+1, 1402+1!, 1402(XREF 1S), 1402(XREF 1K), 1403+1!, 1403(XREF 1S), 1403(XREF 1n1.4), 1405+1*!, 1406+1!, 1501+1! , 1601+1!, 80102+1!, 81101+1!
X(1	IXADASL+1, IXADAKL+1, IXADPSL+1, IXADPKL+1, IXAHSCC+1, IXAHKCC+1
X(2	IXADASL+1, IXADAKL+1, IXADPSL+1, IXADPKL+1
Y	ID.03+1, .01(XREF 2S), .01(XREF 4S), .03+1, .05+1, .12+1, 1201+1, 1205+1, 1207+1, 1216+1 , 1216(XREF 1S), 1216(XREF 2S), 1218+1, 1218(XREF 1S), 1221+1, 1301+1, 1302+1, 1303+1, 1304+1, 1312OT+1 , 1313OT+1*, 1403+1, 1403(XREF 1S), 1405+1
Y(0	.01(XREF 4n1.3), 1312OT+1, 1313OT+1
Y(1	.01(XREF 2S), .01(XREF 4S), .01(XREF 4n1.3), 1216(XREF 1S), 1216(XREF 2S), 1218(XREF 1S), 1403(XREF 1S)

Customize PDF page

Package: PCE Patient Care Encounter

Global: ^AUPNVIMM

Information

Description

Directly Accessed By Routines, Total: 38

Accessed By FileMan Db Calls, Total: 22

Pointed To By FileMan Files, Total: 2

Pointer To FileMan Files, Total: 17

Fields, Total: 63

ICR, Total: 1

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend:

Name	Field # of Occurrence
^(0	ID.02+1, ID.03+1, .01(XREF 3S), .01(XREF 3K)
^(12	.01(XREF 2S), .01(XREF 4S), .01(XREF 4n1.3), .01(XREF 4n1.4), 1216(XREF 1S), 1216(XREF 1n1.4), 1216(XREF 2S), 1216(XREF 2n1.4), 1218(XREF 1S), 1218(XREF 1n1.4)
^(14	1403(XREF 1S), 1403(XREF 1n1.4)