Global: ^ECX(727.81

FileMan FileNo	FileMan Filename	Package
727.81	PRESCRIPTION EXTRACT	DSS Extracts

Package	Total	Routines
DSS Extracts	5	^ECX(727.81 ECX8101 ECX8102 ECXSARXS ^ECX(729

Package	Total	Routines
DSS Extracts	1	ECXPHVE

Package	Total	FileMan Files
Registration	4	ENROLLMENT STATUS(#27.15)[57] PATIENT MOVEMENT(#405)[19] POW PERIOD(#22)[44] PATIENT(#2)[4]
DSS Extracts	1	DSS EXTRACT LOG(#727)[2]
Integrated Billing	1	INSURANCE COMPANY(#36)[48]
Outpatient Pharmacy	1	OUTPATIENT SITE(#59)[9]
Scheduling	1	TEAM(#404.51)[30]

Fields, Total: 113

Field #	Name	Loc	Type	Details
.01	SEQUENCE NUMBER	0;1	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X` LAST EDITED: `AUG 12, 1998` HELP-PROMPT: `Enter a number between 1 and 999999999, 0 decimal digits.` DESCRIPTION: `The record number for this extract entry.` TECHNICAL DESCR: `The internal entry number (IEN) for this record. This entry is DINUMed.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
1	YEAR MONTH	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<6)!'(X?6N) X` OUTPUT TRANSFORM: `S Y=$$ECXYMX^ECXUTL(Y)` LAST EDITED: `SEP 24, 1997` HELP-PROMPT: `Answer must be 6 characters in length.` DESCRIPTION: `A six character string representing the year and the month for which this extract was performed.` TECHNICAL DESCR: `YEAR MONTH is derived by parsing the fileman format end date of the extract. The month is determined by taking the 4th and 5th characters of the end date, the year by taking the 2nd and 3rd characters, and the century is` `then calculated by taking the 1st character of the end date, and adding 17 to it. The Century is then concatenated with the year and month, giving the results in YYYYMM format.`
2	EXTRACT NUMBER	0;3	POINTER TO DSS EXTRACT LOG FILE (#727)	DSS EXTRACT LOG(#727) LAST EDITED: `SEP 18, 1996` HELP-PROMPT: `Enter the extract number for this extract.` DESCRIPTION: `The corresponding entry in the DSS EXTRACT LOG file (#727) for this extract.` TECHNICAL DESCR: `A pointer to the DSS EXTRACT LOG file (#727). The primary purpose is to pick up the header for the mail message.` CROSS-REFERENCE: `727.81^AC` `1)= S ^ECX(727.81,"AC",$E(X,1,30),DA)=""` `2)= K ^ECX(727.81,"AC",$E(X,1,30),DA)` `3)= DO NOT DELETE.` `This cross reference is essential for managing and purging data in this file.`
3	FACILITY	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<1) X` LAST EDITED: `OCT 15, 1996` HELP-PROMPT: `Enter the station number where this extract was performed.` DESCRIPTION: `This is the facility/division where the extract was performed.` TECHNICAL DESCR: `An indicator of the division where this event happened. Using the NAME field (#.01) pointer from the DSS EXTRACTS file (#728), FACILITY is derived from the STATION NUMBER field (#99) for that pointer number in the` `INSTITUTION file (#4).`
4	PATIENT NO. - DFN	0;5	POINTER TO PATIENT FILE (#2)	PATIENT(#2) LAST EDITED: `OCT 15, 1996` HELP-PROMPT: `Enter the name of the patient for this extract record.` DESCRIPTION: `An identifying number for the patient at the local site.` TECHNICAL DESCR: `Derived from the PATIENT field (2) in the PRESCRIPTION file (#52). PATIENT NO. - DFN is a pointer to the NAME field (.01) of the PATIENT file (#2). This data represents the patient DFN.`
5	SSN	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<9)!'(X?9N!X?9N1"P") X` LAST EDITED: `SEP 18, 1996` HELP-PROMPT: `Your answer must be 9 to 10 characters in length.` DESCRIPTION: `The patient's social security number.` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (#4) in the PRESCRIPTION EXTRACT file (#727.81), SSN data is derived from the SOCIAL SECURITY NUMBER field (#.09) in the PATIENT file (#2).` `"Test" patient status is determined in PAT^ECXUTL3. Any patient with an SSN beginning with "00000" will not be included in the extract.`
6	NAME	0;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>4!($L(X)<4) X` LAST EDITED: `SEP 18, 1996` HELP-PROMPT: `Your answer must be 4 characters in length.` DESCRIPTION: `The first four characters of the patient's last name.` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (#4) in the PRESCRIPTION EXTRACT file (#727.81), NAME data is derived from the NAME field (#.01) in the PATIENT file (#2). The first four characters of` `the first "," piece are used, padded with trailing spaces if necessary.` `The name value is returned by the supported call DEM^VADPT.`
7	IN OUT PATIENT INDICATOR	0;8	SET	'I' FOR INPATIENT; 'O' FOR OUTPATIENT; 'A' FOR ASIH (OTHER FACILITY); LAST EDITED: `JUN 29, 2018` HELP-PROMPT: `Enter the patient's status for this extract entry.` DESCRIPTION: `Indicates the patient's status for this extract entry.` TECHNICAL DESCR: `To determine the value of this field a call is made to $$PATDEM^ECXUTL2. Within this call, $$INP^ECXUTL2 is called to determine patient status. If the patient is an outpatient, processing stops and the field is set to O.` `If the patient is an inpatient then $$INOUTP^ECXUTL4 is called to look at the treating specialty. If the patient's treating specialty exists in the DSS TREATING SPECIALTY TRANSLATION file (#727.831) then the value of the` `INPAT/OUTPAT CODE field (#5) of the DSS TREATING SPECIALTY TRANSLATION file (#727.831) is used. If the treating specialty is not found in the DSS TREATING SPECIALTY TRANSLATION file (#727.831) then the indicator is set to` `I.` `If the patient is ASIH to another facility at the date/time in question then the indicator is set to A.` `During the Prescription Extract, if the prescription indicates that the medication is to be mailed to the patient, the IN/OUT PATIENT INDICATOR is returned with an "O" OUTPATIENT value.`
8	DAY	0;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<8) X` OUTPUT TRANSFORM: `S Y=$$ECXDATEX^ECXUTL(Y)` LAST EDITED: `SEP 24, 1997` HELP-PROMPT: `Answer must be 8 characters in length.` DESCRIPTION: `This 8-character string represents the date on which the Prescription fill/refill was released.` TECHNICAL DESCR: `If the version of Outpatient Pharmacy is prior to V. 6.0, DAY is derived from $E(DATE,6,7) where date is the FILL DATE field (22) of the PRESCRIPTION file (#52).` `Data source for Outpatient Pharmacy v6.0 and later:` `PRESCRIPTION file (#52); REFILL sub-file (#52.1);` `RELEASED DATE/TIME field (#17)` `or` `PRESCRIPTION file (#52); PARTIAL DATE sub-file (#52.2);` `RELEASED DATE/TIME field (#8)` `This field is always exactly 8 numeric characters in length. The format is YYYYMMDD; for example, 19970923. If the date cannot be determined, then a default is used. The default date value is the value of the YEAR MONTH` `field (#1) concatenated with "01" for the day (DD) portion. Year 2000 compliant per vendor.`
9	DIVISION	0;10	POINTER TO OUTPATIENT SITE FILE (#59)	OUTPATIENT SITE(#59) LAST EDITED: `SEP 18, 1996` HELP-PROMPT: `Enter the outpatient pharmacy site.` DESCRIPTION: `The outpatient pharmacy site for this extract entry.` TECHNICAL DESCR: `For new prescriptions, DIVISION is derived from the DIVISION field (#20) of the PRESCRIPTION file (#52). For refill prescriptions, DIVISION is derived from the DIVISION field (#8) within the REFILL multiple (#52) of the` `PRESCRIPTION file (#52). For partial prescriptions, DIVISION is derived from the DIVISION field (#.09) within the PARTIAL DATE multiple (#60) of the PRESCRIPTION file (#52). DIVISION is a pointer to the OUTPATIENT SITE` `file (#59)`
10	PROVIDER	0;11	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>11!($L(X)<1) X` LAST EDITED: `OCT 15, 1996` HELP-PROMPT: `Enter provider for this record.` DESCRIPTION: `The provider who wrote the new, refill, or partial refill prescription for this patient.` TECHNICAL DESCR: `Derived from the PROVIDER field (#4) in the PRESCRIPTION file (#52) for new prescriptions, or from the PROVIDER field (#15) within the REFILL multiple (#52) in the PRESCRIPTION file (#52) for refill prescriptions, or from` `the PROVIDER field (#6) within the PARTIAL DATE multiple (#60) in the PRESCRIPTION file (#52) for partial prescriptions.` `PROVIDER is the value of a "2" prefixed to the pointer value from the NEW PERSON file (#200) to indicate that the source file is "200". For example, if the IEN of the provider in file #200 is 98765, the value that will be` `stored is 298765.`
11	VA DRUG CLASSIFICATION	0;12	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>5!($L(X)<5) X` LAST EDITED: `SEP 18, 1996` HELP-PROMPT: `Your answer must be 5 characters in length.` DESCRIPTION: `The VA Drug Classification for the drug/supply item in this prescription.` TECHNICAL DESCR: `Derived from the VA CLASSIFICATION field (#2) in the DRUG file (#50) for the drug identified by the DRUG field (#6) in the PRESCRIPTION file (#52).`
12	MAIL	0;13	SET	'1' FOR MAIL; '2' FOR CMOP; LAST EDITED: `JUN 04, 2012` HELP-PROMPT: `Enter prescription mailing method.` DESCRIPTION: `Identifies if prescription was mailed.` TECHNICAL DESCR: `Derived from the MAIL/WINDOW field (#11) in the PRESCRIPTION file (#52) for new prescriptions, or from the MAIL/WINDOW field (#2) within the REFILL multiple (#52) in the PRESCRIPTION file (#52) for refill prescriptions, or` `from the MAIL/WINDOW field (#.02) within the PARTIAL DATE multiple (#60) in the PRESCRIPTION file (#52) for partial prescriptions.` `MAIL will then be determined to be picked up at window (NULL) or mailed to patient (1 = by mail, 2 = by CMOP).`
13	PROVIDER PERSON CLASS	0;14	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<7) X` LAST EDITED: `MAY 05, 1999` HELP-PROMPT: `Answer must be 7 characters in length.` DESCRIPTION: `The VA code associate with the active Person Class of the provider.` TECHNICAL DESCR: `A call to $$GET^XUA4A72(PERS,DATE) will be made using the IEN in the PROVIDER and the date in the DAY field. The VA Code is always of the form "V"_six numeric digits; exactly 7 characters in length.`
14	NEW	0;15	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `SEP 18, 1996` HELP-PROMPT: `Your answer must be 1 character in length.` DESCRIPTION: `Data will be 1 if this is a new prescription.` TECHNICAL DESCR: `If the version of Outpatient Pharmacy is prior to V. 6.0, examine the "AD" cross reference on the FILL DATE field (#22) of the PRESCRIPTION file (#52) for new prescriptions or the REFILL DATE field (#.01) within the REFILL` `multiple (#52) of the PRESCRIPTION file (#52) for refill prescriptions. Cross reference is ^PSRX("AD",DATE,D0,REFILL# or 0 for new RX).` `If the version of Outpatient Pharmacy is V. 6.0 or greater: 1. Examine the "AL" cross reference on the RELEASED DATE/TIME field (#31) of the PRESCRIPTION file (#52) for new prescriptions or the RELEASED DATE/TIME field` `(#17) within the REFILL multiple (#52) of the PRESCRIPTION file (#52) for refill prescriptions. Cross reference is ^PSRX("AL",DATE,D0,REFILL# or 0 for new RX). 2. Examine the "AM" cross reference on the RELEASED` `DATE/TIME field (#8) within the PARTIAL DATE multiple (#60) of the PRESCRIPTION file (#52) for partial prescriptions. Cross reference is ^PSRX("AM",DATE,D0,PARTIAL_REFILL#).`
15	SHAD STATUS	0;16	SET	'Y' FOR YES; 'N' FOR NO; 'U' FOR UNKNOWN; LAST EDITED: `FEB 12, 2010` HELP-PROMPT: `Enter SHAD Status.` DESCRIPTION: `Indicates whether patient meets requirements for Shipboard Hazard and Defense (SHAD).` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (#4) in the PRESCRIPTION EXTRACT file (#727.81), Shipboard Hazard and Defense data is derived from using DBIA #4462 GETSHAD^DGUTL3(DFN).`
16	QUANTITY	0;17	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."3N.N) X` LAST EDITED: `JUN 27, 2012` HELP-PROMPT: `Type a number between 0 and 99999999, 2 decimal digits.` DESCRIPTION: `Drug quantity dispensed in the unit of issue for that drug. Unit of issue may vary from product to product and site to site.` TECHNICAL DESCR: `Derived from the QTY field (#7) in the PRESCRIPTION file (#52) for new prescriptions, or from the QTY field (#1) within the REFILL multiple (#52) in the PRESCRIPTION file (#52) for refill prescriptions, or from the QTY` `field (#.04) within the PARTIAL DATE multiple (#60) in the PRESCRIPTION file (#52) for partial prescriptions.` AUDIT: `EDITED OR DELETED`
17	COST	0;18	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>10000)!(X<0) X` LAST EDITED: `SEP 18, 1996` HELP-PROMPT: `Enter a dollar amount between 0 and 10000, 2 decimal digits.` DESCRIPTION: `VA pharmacy supply cost of drug dispensed.` TECHNICAL DESCR: `Cost is calculated as quantity * (multiplied by) price.` `Quantity is derived from the QTY field (#7) in the PRESCRIPTION file (#52) for new prescriptions, or from the QTY field (#1) within the REFILL multiple (#52) in the PRESCRIPTION file (#52) for refill prescriptions, or from` `the QTY field (#.04) within the PARTIAL DATE multiple (#60) in the PRESCRIPTION file (#52) for partial prescriptions.` `Price is derived from the UNIT PRICE OF DRUG field (#17) in the PRESCRIPTION file (#52) for new prescriptions, or from the CURRENT UNIT PRICE OF DRUG field (#1.2) within the REFILL multiple (#52) in the PRESCRIPTION file` `(#52) for refill prescriptions, or from the CURRENT UNIT PRICE OF DRUG field (#.042) within the PARTIAL DATE multiple (#60) in the PRESCRIPTION file (#52) for partial prescriptions.`
18	PLACEHOLD ENCOUNTER SHAD	0;19	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Enter 'YES' if the prescription is related to treatment for the PROJ 112/SHAD condition.` DESCRIPTION: `This field, previously known as ENCOUNTER SHAD, is no longer needed. The name has been changed to PLACEHOLD ENCOUNTER SHAD and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
19	MOVEMENT FILE #	0;20	POINTER TO PATIENT MOVEMENT FILE (#405)	PATIENT MOVEMENT(#405) LAST EDITED: `SEP 18, 1996` HELP-PROMPT: `Enter the patient movement number associated with this extract record.` DESCRIPTION: `Current patient movement record associated with this extract record.` TECHNICAL DESCR: `A call to IN5^VADPT (using the patient IEN and the event date) returns a patient movement number (indicating inpatient status). This field is set to the value of VAIP(1), which is a pointer to the PATIENT MOVEMENT file` `(#405).`
20	TREATING SPECIALTY	0;21	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>2!($L(X)<1) X` LAST EDITED: `JUN 04, 2012` HELP-PROMPT: `Answer must be 1-2 characters in length.` DESCRIPTION: `The treating specialty PTF CODE assigned to this patient when the prescription was issued, if the patient was an inpatient at that time.` TECHNICAL DESCR: `This field is initialized to a null, indicating an outpatient status. If a call to IN5^VADPT (using the patient IEN and the event date) returns a patient movement number (indicating inpatient status), then the value of` `VAIP(8), which is the pointer to the FACILITY TREATING SPECIALTY file (#45.7), is used to get the SPECIALTY field (#1) which points to the SPECIALTY file (#42.4). Then, the PTF Code field (#7) of the SPECIALTY file` `(#42.4) is obtained and stored.`
21	PLACEHOLDER4	0;22	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `OCT 15, 1996` HELP-PROMPT: `Your answer must be 1 character in length.` DESCRIPTION: `This field marked as a placeholder for future use.` TECHNICAL DESCR: `This field marked as a placeholder for future use.`
22	UNIT OF ISSUE	0;23	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `OCT 15, 1996` HELP-PROMPT: `Answer must be 1-10 characters in length.` DESCRIPTION: `This units in which this item was dispensed.` TECHNICAL DESCR: `Derived from the DISPENSE UNIT field (14.5) in the DRUG file (#50) for the drug identified by the DRUG field (6) in the PRESCRIPTION file (#52).`
23	DATE OF BIRTH	0;24	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<8) X` OUTPUT TRANSFORM: `S Y=$$ECXDATEX^ECXUTL(Y)` LAST EDITED: `SEP 24, 1997` HELP-PROMPT: `Answer must be 8 characters in length.` DESCRIPTION: `Patient's date of birth.` TECHNICAL DESCR: `Data source:` `PRESCRIPTION file (#52); PATIENT field (#2) then to PATIENT file (#2); DATE OF BIRTH field (#.03)` `Date of Birth is returned through the supported call DEM^VADPT. It is then represented by an 8-character numeric string in the YYYYMMDD format.`
24	ELIGIBILITY	0;25	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>3!($L(X)<1) X` LAST EDITED: `MAY 04, 1999` HELP-PROMPT: `Answer must be 1-3 characters in length.` DESCRIPTION: `Appropriate eligibility code based on veteran or non-veteran status.` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (4) in the PRESCRIPTION EXTRACT file (#727.81), ELIGIBILITY data is derived from the PRIMARY ELIGIBILITY CODE field (.361) in the PATIENT file (#2).` `PRIMARY ELIGIBILITY CODE is a pointer to the ELIGIBILITY CODE file (#8). The data is derived from the MAS ELIGIBILITY CODE field (8) in the ELIGIBILITY CODE file (#8) which in turn is a pointer to the MAS ELIGIBILITY CODE` `file (#8.1).` `The pointer value to file #8.1 is converted by ELIG^ECXUTL3 to the corresponding eligibility code used by NPCD. This code is composed of two or three numeric characters.`
25	VETERAN	0;26	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `SEP 18, 1996` HELP-PROMPT: `Select the appropriate veteran status for this patient.` DESCRIPTION: `Patient's Veteran status.` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (#4) in the PRESCRIPTION EXTRACT file (#727.81), VETERAN data is derived from the VETERAN (Y/N)? field (#1901) in the PATIENT file (#2).`
26	COPAY	0;27	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; LAST EDITED: `SEP 18, 1996` HELP-PROMPT: `Enter 1 if this prescription was billed for copay.` DESCRIPTION: `This field indicates whether this prescription was billed for copay.` TECHNICAL DESCR: `Derived from the existence of the IB NUMBER field (106) in the PRESCRIPTION file (#52) for new prescriptions or from the IB NUMBER field (9) within the REFILL multiple (52) in the PRESCRIPTION file (#52) for refill` `prescriptions. If that field is not null, the prescription was billed for copay and this field is set to 1.`
27	FEEDER KEY	0;28	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>17!($L(X)<17) X` LAST EDITED: `JUN 04, 2012` HELP-PROMPT: `Answer must be 17 characters in length.` DESCRIPTION: `Code that uniquely identifies a DSS drug/supply product.` TECHNICAL DESCR: `FEEDER KEY is derived for the drug identified by the DRUG field (#6) in the PRESCRIPTION file (#52), which is a pointer to the DRUG file (#50).` `The PSNDF VA PRODUCT NAME ENTRY field (#22) from the DRUG file (#50), which is a pointer to the VA PRODUCT file (#50.68) is padded to 5 digits. This is concatenated with a 12-digit code derived from the NDC field (#31)` `from the DRUG file (#50) to form a 17-digit Feeder Key.`
28	DEA, SPECIAL HDLG	0;29	SET	'I' FOR INVESTIGATIONAL; '1' FOR SCHEDULE 1 ITEM; '2' FOR SCHEDULE 2 ITEM; '3' FOR SCHEDULE 3 ITEM; '4' FOR SCHEDULE 4 ITEM; '5' FOR SCHEDULE 5 ITEM; LAST EDITED: `MAR 04, 2012` HELP-PROMPT: `Enter I if the drug is investigational or 1-5 depending on the Drug's Schedule Item.` DESCRIPTION: `Indicates if the drug in this record is Investigational, or Schedule 1-5.` TECHNICAL DESCR: `Derived from the DEA, SPECIAL HDLG field (#3) in the DRUG file (#50). If the field contains a "1","2","3","4" or "5" (DRUG SCHEDULE) it will be set to that number. Otherwise, if it contains an I, it will be set to I.`
29	DAYS SUPPLY	0;30	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 18, 1996` HELP-PROMPT: `Enter a number between 1 and 31, 0 decimal digits.` DESCRIPTION: `The number of days covered by this prescription.` TECHNICAL DESCR: `Derived from the DAYS SUPPLY field (8) in the PRESCRIPTION file (#52) for new prescriptions, or from the DAYS SUPPLY field (1.1) within the REFILL multiple (52) in the PRESCRIPTION file (#52) for refill prescriptions, or` `from the DAYS SUPPLY field (.041) within the PARTIAL DATE multiple (60) in the PRESCRIPTION file (#52) for partial prescriptions.`
30	PLACEHOLD PRIMARY CARE TEAM	0;31	POINTER TO TEAM FILE (#404.51)	TEAM(#404.51) LAST EDITED: `MAY 01, 2018` HELP-PROMPT: `Enter the primary care team assigned to this patient at the time the prescription was filled.` DESCRIPTION: `This field, previously known as PRIMARY CARE TEAM, is no longer needed. The name has been changed to PLACEHOLD PRIMARY CARE TEAM and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3170.`
31	PLACEHOLD PC PROVIDER	0;32	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>11!($L(X)<1) X` LAST EDITED: `MAY 01, 2018` HELP-PROMPT: `Enter primary care provider assigned to this patient.` DESCRIPTION: `This field, previously known as PRIMARY CARE PROVIDER, is no longer needed. The name has been changed to PLACEHOLD PC PROVIDER and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3170.`
32	TIME	0;33	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<6)!'(X?6N) X` OUTPUT TRANSFORM: `S Y=$$ECXTIMEX^ECXUTL(Y,1)` LAST EDITED: `SEP 24, 1997` HELP-PROMPT: `Answer must be 6 characters in length.` DESCRIPTION: `Time of day when the prescription fill/refill was released.` TECHNICAL DESCR: `PRESCRIPTION file (#52); REFILL sub-file (#52.1); RELEASED DATE/TIME field (#17) or PRESCRIPTION file (#52); PARTIAL DATE sub-file (#52.2); RELEASED DATE/TIME field (#8)` `This field is always exactly 6 numeric characters in length; if time cannot be determined, then "000300" is used as default.`
33	PLACEHOLD RACE	0;34	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `MAR 15, 2018` HELP-PROMPT: `Enter race ABBREVIATION for this patient.` DESCRIPTION: `This field, previously known as RACE, is no longer needed. The name has been changed to PLACEHOLD RACE and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3170.`
34	PLACEHOLD MPI	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `APR 29, 2022` HELP-PROMPT: `Answer must be 1-10 characters in length.` DESCRIPTION: `This field, previously known as MASTER PATIENT INDEX, is no longer needed. The name has been changed to PLACEHOLD MPI and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3184.`
35	PLACEHOLDER	1;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `APR 19, 2016` HELP-PROMPT: `Answer must be 1-10 characters in length.` DESCRIPTION: `This field, previously known as DSS PRODUCT DEPARTMENT, is no longer needed. The name has been changed to PLACEHOLDER and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3161.`
36	SEX	1;3	SET	'M' FOR MALE; 'F' FOR FEMALE; LAST EDITED: `JUL 08, 1998` DESCRIPTION: `Patient's gender.` TECHNICAL DESCR: `Data is taken from the SEX field (#.02) of the patient's record in the PATIENT file (#2).` `The status indicator is returned by DEM^VADPT.`
37	ZIP+4	1;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<5) X` LAST EDITED: `JUL 08, 1998` HELP-PROMPT: `Answer must be 5-10 characters in length.` DESCRIPTION: `The ZIP code for where the patient resides. The 5-character ZIP code is provided if ZIP+4 is not available.` TECHNICAL DESCR: `The patient's ZIP code with optional 4-digit extension as found in the ZIP+4 field (#.1112) of the patient's record in the PATIENT file (#2). While the ZIP+4 field in file 2 is a max of 9 characters, it does put the "-" in` `if the ZIP code is a +4 type.`
38	PLACEHOLDER	1;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `APR 26, 2007` HELP-PROMPT: `Answer must be 1-8 characters in length.` DESCRIPTION: `Currently NULL.` TECHNICAL DESCR: `Currently NULL.`
39	PLACEHOLDER	1;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `APR 26, 2007` HELP-PROMPT: `Answer must be 1-8 characters in length.` DESCRIPTION: `Currently NULL.` TECHNICAL DESCR: `Currently NULL.`
40	STATE	1;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>2!($L(X)<2) X` LAST EDITED: `JUL 08, 1998` HELP-PROMPT: `Answer must be 2 characters in length.` DESCRIPTION: `The state in which the patient resides.` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (#4) in the ADMISSION EXTRACT file (#727.802), data is derived from the STATE field (#.115) in the PATIENT file (#2) which points to the STATE file` `(#5). From the STATE file record, use the two character VA STATE CODE field (#2).`
41	COUNTY	1;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>3!($L(X)<3) X` LAST EDITED: `JUL 08, 1998` HELP-PROMPT: `Answer must be 3 characters in length.` DESCRIPTION: `The county in which the patient resides.` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (#4) in the ADMISSION EXTRACT file (#727.802), data is taken from the COUNTY field (#.117) in the PATIENT file (#2) which points to a subfile record in` `the COUNTY multiple field (#3) of the STATE file (#5). A pointer to the STATE file (#5) is obtained from the STATE field (#.115) of the file #2 record.` `From the subfile record of field #3 of file #5, use the value of the VA COUNTY CODE field (#2).`
42	PLACEHOLD PC PROV PERSON CLASS	1;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<7) X` LAST EDITED: `MAY 01, 2018` HELP-PROMPT: `Answer must be 7 characters in length.` DESCRIPTION: `This field, previously known as PC PROVIDER PERSON CLASS, is no longer needed. The name has been changed to PLACEHOLD PC PROV PERSON CLASS and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3170.`
43	POW STATUS	1;10	SET	'Y' FOR YES; 'N' FOR NO; 'U' FOR UNKNOWN; LAST EDITED: `MAY 05, 1999` HELP-PROMPT: `Enter the patient's POW Status.` DESCRIPTION: `Indicates if patient was confined as a Prisoner of War.` TECHNICAL DESCR: `PATIENT file (#2); POW STATUS INDICATED? field (#.525). The status indicator is returned by SVC^VADPT.`
44	POW LOCATION	1;11	POINTER TO POW PERIOD FILE (#22)	POW PERIOD(#22) LAST EDITED: `MAY 05, 1999` DESCRIPTION: `If POW Status is indicated, then this is the POW confinement location/period.` `1 WORLD WAR I` `2 WORLD WAR II - EUROPE` `3 WORLD WAR II - PACIFIC` `4 KOREAN` `5 VIETNAM` `6 OTHER` TECHNICAL DESCR: `PATIENT file (#2); POW CONFINEMENT LOCATION field (#.526). This is a pointer value to the POW PERIOD file (#22). The location indicator is returned by SVC^VADPT.`
45	RADIATION STATUS	1;12	SET	'Y' FOR YES; 'N' FOR NO; 'U' FOR UNKNOWN; '1' FOR NO RADIATION; '2' FOR HIROSHIMA/NAGASAKI; '3' FOR ATMOSPHERIC NUCLEAR TESTING; '4' FOR H/N AND ATMOSPHERIC TESTING; '5' FOR UNDERGROUND NUCLEAR TESTING; '6' FOR EXPOSURE AT NUCLEAR FACILITY; '7' FOR OTHER; LAST EDITED: `MAY 05, 1999` HELP-PROMPT: `Enter the Radiation Status for the patient.` DESCRIPTION: `Indicates if patient claims exposure to ionizing radiation.` TECHNICAL DESCR: `PATIENT file (#2); RADIATION EXPOSURE INDICATED? field (#.32103). The status indicator is returned by SVC^VADPT.`
46	AGENT ORANGE STATUS	1;13	SET	'Y' FOR YES; 'N' FOR NO; 'U' FOR UNKNOWN; LAST EDITED: `MAY 05, 1999` HELP-PROMPT: `Enter the Agent Orange Status for the patient.` DESCRIPTION: `Indicates whether patient was exposed to Agent Orange.` TECHNICAL DESCR: `PATIENT file (#2); AGENT ORANGE EXPOS. INDICATED? field (#.32102). The status indicator is returned by SVC^VADPT.`
47	PLACEHOLD SHARE AGREEMNT PAYOR	1;14	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Answer must be 1 character in length.` DESCRIPTION: `This field, previously known as SHARING AGREEMENT PAYOR, is no longer needed. The name has been changed to PLACEHOLD SHARE AGREEMNT PAYOR and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
48	PLACEHOLD SHARE AGREEMNT INSUR	1;15	POINTER TO INSURANCE COMPANY FILE (#36)	INSURANCE COMPANY(#36) LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Enter the primary insurance company for a patient with a sharing agreement.` DESCRIPTION: `This field, previously known as SHARING AGREEMENT INSURANCE, is no longer needed. The name has been changed to PLACEHOLD SHARE AGREEMNT INSUR and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
49	MST STATUS	1;16	SET	'Y' FOR Yes, screened reports MST; 'N' FOR Screened, does not report MST; 'D' FOR Screened, declines to answer; 'U' FOR Unknown, not screened; LAST EDITED: `JUN 13, 2012` HELP-PROMPT: `Enter the patient's MST Status.` DESCRIPTION: `Military Sexual Trauma (MST) status of a patient on the date of the encounter.` TECHNICAL DESCR: `The MST HISTORY file (#29.11) holds data regarding military sexual trauma claims and effective dates. The patients MST status is stored in the MST STATUS field (#3). A call will be made to $$GETSTAT^DGMSTAPI(DFN,DGDATE)` `using the DFN in the PATIENT NO. DFN field (#4) and the date in the DAY (#8) field.`
50	ENROLLMENT LOCATION	1;17	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<3) X` LAST EDITED: `AUG 08, 2002` HELP-PROMPT: `Answer must be 3-7 characters in length` DESCRIPTION: `The facility that the patient chooses to designate as his preferred location for care.` TECHNICAL DESCR: `The PREFERRED FACILITY field (# 27.02) of the PATIENT file (#2) is defined as the facility that the patient chooses to designate as his preferred location for care. The PREFERRED FACILITY field (# 27.02) is a pointer to` `the INSTITUTION file (#4). From file #4, the value in the STATION NUMBER field (#99) is used.`
51	PLACEHOLD ASSOC PC PROVIDER	1;18	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>11!($L(X)<2) X` LAST EDITED: `MAY 01, 2018` HELP-PROMPT: `Answer must be 2-11 characters in length.` DESCRIPTION: `This field, previously known as ASSOCIATE PC PROVIDER, is no longer needed. The name has been changed to PLACEHOLD ASSOC PC PROVIDER and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3170.`
52	PLACEHOLD AS PC PROV PERSON CL	1;19	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<7) X` LAST EDITED: `MAY 01, 2018` HELP-PROMPT: `Answer must be 7 characters in length.` DESCRIPTION: `This field, previously known as ASSOC. PC PROV. PERSON CLASS, is no longer needed. The name has been changed to PLACEHOLD AS PC PROV PERSON CL and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3170.`
53	PLACEHOLDER	1;20	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `APR 26, 2007` HELP-PROMPT: `Answer must be 1-8 characters in length.` DESCRIPTION: `Currently NULL.` TECHNICAL DESCR: `Currently NULL.`
54	DOM,PRRTP AND SAARTP INDICATOR	1;21	SET	'P' FOR GEN. PRRTP; 'T' FOR PTSD PRRTP; 'S' FOR DOM. PRRTP; 'H' FOR HOMELESS CWT/TR; 'A' FOR SA CWT/TR; 'D' FOR DOMICILIARY; 'B' FOR PTSD CWT/TR; 'C' FOR GEN. CET/TR; LAST EDITED: `JUN 04, 2012` HELP-PROMPT: `Enter the indicator associated with the treating specialty assigned to this record.` DESCRIPTION: `Indicates if the patient is admitted to either a RRTP, PRRTP, or SARRTP at the time care is provided.` TECHNICAL DESCR: `If the patient's treating specialty exists in the DSS TREATING SPECIALTY TRANSLATION file (#727.831), data is derived from the DOM/PRRTP/SARRTP CODE field (#2) of the DSS TREATING SPECIALTY TRANSLATION file (#727.831).` `Otherwise, the value is null.`
55	PURPLE HEART INDICATOR	1;22	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `OCT 09, 2002` HELP-PROMPT: `Enter the Purple Heart Indicator for the patient.` DESCRIPTION: `Indicates whether or not a patient is a Purple Heart recipient.` TECHNICAL DESCR: `PATIENT file (#2); CURRENT PH INDICATOR field (#.531). The status indicator is returned by SVC^VADPT.`
56	ENROLLMENT CATEGORY	1;23	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `JUN 14, 2000` HELP-PROMPT: `Answer must be 1 character in length.` DESCRIPTION: `Patient's enrollment category.` TECHNICAL DESCR: `ENROLLMENT CATEGORY is derived from the standard call $$CATEGORY^DGENA4 using the patient's DFN and the ENROLLMENT STATUS field (#57).`
57	ENROLLMENT STATUS	1;24	POINTER TO ENROLLMENT STATUS FILE (#27.15)	ENROLLMENT STATUS(#27.15) LAST EDITED: `JUN 04, 2012` HELP-PROMPT: `Enter patient's enrollment status.` DESCRIPTION: `Patient's enrollment status.` TECHNICAL DESCR: `ENROLLMENT STATUS is derived from the standard call $$STATUS^DGENA using the patient's DFN and returns the ENROLLMENT STATUS field (#.04) of the PATIENT ENROLLMENT file (#27.11).`
58	PLACEHOLDER	1;25	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `MAR 01, 2004` HELP-PROMPT: `Answer must be 1 character in length.`
59	CNHU STATUS	1;26	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `JUN 05, 2012` HELP-PROMPT: `Indicate if patient resides in a contract nursing home.` DESCRIPTION: `Identifies if patient resides in a contract nursing home.` TECHNICAL DESCR: `Currently passing NULL.`
60	PERIOD OF SERVICE	1;27	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `JUN 14, 2000` HELP-PROMPT: `Answer must be 1 character in length.` DESCRIPTION: `The period of service that best classifies the patient based on eligibility code.` TECHNICAL DESCR: `Period of Service is derived from the Period of Service field (#.323) in the Patient file (#2).`
61	OBSERVATION PATIENT INDICATOR	1;28	SET	'NO' FOR NO; 'YES' FOR YES; LAST EDITED: `JUN 04, 2012` HELP-PROMPT: `Enter observation patient status for this record.` DESCRIPTION: `Indicates if patient is considered to be an observation patient.` TECHNICAL DESCR: `Data (YES, NO) is retrieved from API call $$OBSPAT^ECXUTL4:` `If the patient's treating specialty exists in the DSS TREATING SPECIALTY TRANSLATION file (#727.831), data is derived from the OBSERVATION PAT INDICATOR field (#4) of the DSS TREATING SPECIALTY TRANSLATION file (#727.831).` `If patient is outpatient and treating specialty not in file, AND Feeder Key (CLI) or DSS ID (MTL,IVP,ECQ,NOS,SUR) is 290-297, Observation Patient Ind=YES. Else, Observation Patient Ind=NO.` `Otherwise, Observation Patient Ind=NO.`
62	ENCOUNTER NUMBER	1;29	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>18!($L(X)<1) X` LAST EDITED: `MAY 09, 2001` HELP-PROMPT: `Answer must be 1-18 characters in length.` DESCRIPTION: `The unique number assigned to each encounter within DSS.` TECHNICAL DESCR: `This field is determined by a call to $$ENCNUM^ECXUTL4. Within this call the inpatient/outpatient status, SSN, admit/visit date, treating specialty, observation patient indicator, and DSS Identifier or feeder key values` `of the record are used to create a unique encounter number.`
63	AGENT ORANGE LOCATION	1;30	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` `MAXIMUM LENGTH: 1` LAST EDITED: `MAY 24, 2023` HELP-PROMPT: `Choose the location where the patient was exposed to Agent Orange. Answer must be 1 character in length.` DESCRIPTION: `This field indicates the location where the patient was exposed to Agent Orange. Values are:` `"B" = BLUE WATER NAVY` `"K" = KOREAN DMZ` `"V" = VIETNAM` `"T" = THAILAND(U.S. OR ROYAL THAI MIL BASE)` `"L" = LAOS` `"C" = CAMBODIA(MIMOT OR KREK,KAMPONG CHAM)` `"G" = GUAM, AMERICAN SAMOA, OR TERRITORIAL WATERS` `"J" = JOHNSTON ATOLL` `"O" = OTHER` TECHNICAL DESCR: `The location is returned by a call to SVC^VADPT which gets its data from the AGENT ORANGE EXPOSURE LOCATION field (#.3213) of the PATIENT file (#2). Values are:` `"B" = BLUE WATER NAVY` `"K" = KOREAN DMZ` `"V" = VIETNAM` `"T" = THAILAND(U.S. OR ROYAL THAI MIL BASE)` `"L" = LAOS` `"C" = CAMBODIA(MIMOT OR KREK,KAMPONG CHAM)` `"G" = GUAM, AMERICAN SAMOA, OR TERRITORIAL WATERS` `"J" = JOHNSTON ATOLL` `"O" = OTHER`
64	ORDERING PHYSICIAN	1;31	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>11!($L(X)<2) X` LAST EDITED: `MAY 11, 2001` HELP-PROMPT: `Answer must be 2-11 characters in length` DESCRIPTION: `For future development; currently set to null.`
65	ORDERING STOP CODE	1;32	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>3!($L(X)<3) X` LAST EDITED: `MAY 09, 2001` HELP-PROMPT: `Answer must be 3 characters in length.` DESCRIPTION: `This field contains the stop code associated with the order.` TECHNICAL DESCR: `The STOP CODE field (#1) associated with the ordering location for this order as obtained from the CLINICS AND STOP CODES (#728.44) file.` `Ordering location is derived from the CLINIC field (#5) of the PRESCRIPTION file (#52).`
66	ORDERING DATE	1;33	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<8) X` LAST EDITED: `MAY 09, 2001` HELP-PROMPT: `Answer must be 8 characters in length.` DESCRIPTION: `Date provider ordered the prescription.` TECHNICAL DESCR: `This field is derived from the ISSUE DATE field (#1) of the PRESCRIPTION file (#52). That date is then converted by a call to $$ECXDATE^ECXUTL to the YYYYMMDD format.`
67	CNH STATUS	1;34	SET	'YES' FOR YES; 'NO' FOR NO; LAST EDITED: `MAR 12, 2014` HELP-PROMPT: `Enter the CNH status for this patient.` DESCRIPTION: `This field is used to indicate whether a patient is currently in a contract nursing home.` TECHNICAL DESCR: `Using the CNHSTAT^ECXUTL4(DFN) call, the CNH status is returned based on the CNH CURRENT field (#148) of the PATIENT file (#2).`
68	PRODUCTION DIVISION CODE	1;35	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<3) X` LAST EDITED: `JUN 04, 2012` HELP-PROMPT: `Answer must be 3-7 characters in length.` DESCRIPTION: `Identifies the division/facility where the work was performed.` TECHNICAL DESCR: `Data comes from either the DIVISION field (#20) of the PRESCRIPTION file (#52) or the DIVISION field (#.09) of the PARTIAL DATE field (#60). These fields point to the OUTPATIENT SITE file (#59). This value is then used to` `call the api PREDIV^ECXDEPT to get the STATION NUMBER field (#99) from the INSTITUTION file (#4).`
69	PLACEHOLD MEANS TEST	1;36	SET	This field, previously known as MEANS TEST, is no longer needed. The name has been changed to PLACEHOLD MEANS TEST and its value will be set to null. LAST EDITED: `FEB 13, 2020` HELP-PROMPT: `Select the appropriate means test category.` DESCRIPTION: `This field, previously known as MEANS TEST, is no longer needed. The name has been changed to PLACEHOLD MEANS TEST and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3178.`
70	HEAD & NECK CANCER INDICATOR	1;37	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `AUG 28, 2002` HELP-PROMPT: `Enter the Head & Neck Cancer Indicator for the patient.` DESCRIPTION: `Identifies whether treatment was for head and/or neck cancer.` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (#4), a call is made to $$GETCUR^DGNTAPI to retrieve the HEAD/NECK CA DX field (#2.01) of the NOSE AND THROAT RADIUM HISTORY file (#28.11).`
71	PLACEHOLD ETHNICITY	1;38	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<1) X` LAST EDITED: `MAR 15, 2018` HELP-PROMPT: `Answer must be 1-6 characters in length` DESCRIPTION: `This field, previously known as ETHNICITY, is no longer needed. The name has been changed to PLACEHOLD ETHNICITY and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3170.`
72	PLACEHOLD RACE 1	1;39	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<1) X` LAST EDITED: `MAR 15, 2018` HELP-PROMPT: `Answer must be 1-6 characters in length.` DESCRIPTION: `This field, previously known as RACE 1, is no longer needed. The name has been changed to PLACEHOLD RACE 1 and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3170.`
73	PLACEHOLD DSS IP #	1;40	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Type a Number between 1 and 9999999, 0 Decimal Digits.` DESCRIPTION: `This field, previously known as DSS IP #, is no longer needed. The name has been changed to PLACEHOLD DSS IP # and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
74	ENROLLMENT PRIORITY	1;41	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>2!($L(X)<1) X` LAST EDITED: `MAR 01, 2004` HELP-PROMPT: `Answer must be 1-2 characters in length.` DESCRIPTION: `This field contains the enrollment priority group and the enrollment priority subgroup.` TECHNICAL DESCR: `ENROLLMENT PRIORITY field contains the enrollment priority group and the enrollment priority subgroup from the Patient Enrollment File #27.11.` `ENROLLMENT PRIORITY Groups determined for a patient enrollment include:` `'1' FOR GROUP 1` `'2' FOR GROUP 2` `'3' FOR GROUP 3` `'4' FOR GROUP 4` `'5' FOR GROUP 5` `'6' FOR GROUP 6` `'7' FOR GROUP 7` `'8' FOR GROUP 8` `ENROLLMENT PRIORITY Subgroups determined for a patient enrollment include:` `'a' FOR 1` `'c' FOR 3` `'e' FOR 5` `'g' FOR 7`
75	USER ENROLLEE	1;42	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `MAR 01, 2004` HELP-PROMPT: `Answer must be 1 character in length.` DESCRIPTION: `User enrollee is determined by checking the Patient Enrollment file 27.11, when a user has a current or future fiscal year in the VistA User Enrollee Status field set value to 'U' and Null if no date or a past year's value` `is contained.` TECHNICAL DESCR: `User enrollee is determined by checking the PATIENT ENROLLMENT file (#27.11). When a user has a current or future fiscal year in the VistA ENROLLMENT STATUS field (#.04) the value is set to 'U' and Null if no date or a` `past year's value is contained. Determined by the use of an API: $$UESTAT^EASUERwhere the Patient Identifier (DFN) is passed in.`
76	PATIENT TYPE	2;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>2!($L(X)<1) X` LAST EDITED: `MAR 01, 2004` HELP-PROMPT: `Answer must be 1-2 characters in length.` DESCRIPTION: `PATIENT TYPE refers to the various types of patient which might be seen at a VA facility. It is determined by the TYPE field of the PATIENT File #2 which points to the TYPE OF PATIENT entries in File #391.` TECHNICAL DESCR: `PATIENT TYPE refers to the various types of patient which might be seen at a VA facility. It is determined by the TYPE field of the PATIENT File #2 which points to the TYPE OF PATIENT entries in File #391. Every patient` `added to the system must have a TYPE specified. It best classifies a patient as one of the following values listed below. PATIENT TYPE field value shall contain only the first two characters:` `AC= ACTIVE DUTY AL= ALLIED VETERAN CO= COLLATERAL EM= EMPLOYEE IN= INELIGIBLE MI= MILITARY RETIREE NO= NON-VETERAN (OTHER) NS= NSC VETERAN SC= SC VETERAN TR= TRICARE`
77	CV STATUS ELIGIBILITY	2;2	SET	'Y' FOR YES; 'E' FOR ELIGIBILITY EXPIRED; LAST EDITED: `JUN 04, 2012` HELP-PROMPT: `Enter patient's combat veteran eligibility.` DESCRIPTION: `Records if veteran served on active duty in a theater of combat operations during a period of war after the Persian Gulf War or in combat against a hostile force during a period of hostilities after November 11, 1998.` TECHNICAL DESCR: `CV STATUS ELIGIBILITY is determined by the use of API $$CVEDT^DGCV(DFN,DATE) that checks the COMBAT VET END DATE field (#.5295) from the PATIENT file (#2) to determine CV Status. API returns three pieces (i.e.` `1^20010106^0) and the first piece is resolved as follows.` `1 - veteran qualifies as a CV` `0 - veteran does not qualify as a CV` `-1 - bad DFN` `Based on this result the field will be set to 'Y' for 'YES' or 'E' for 'ELIGIBILITY EXPIRED' or 'NULL' for not eligible.`
78	CV ELIGIBILITY END DATE	2;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<8) X` LAST EDITED: `JUN 04, 2012` HELP-PROMPT: `Answer must be 8 characters in length.` DESCRIPTION: `Records the Combat Veteran eligibility expiration date or veteran who served on active duty in a theater of combat operations during a period of war after the Persian Gulf War or in combat against a hostile force during a` `period of hostilities after November 11, 1998.` TECHNICAL DESCR: `CV ELIGIBILITY END DATE is determined by the use of API $$CVEDT^DGCV(DFN,DATE) that checks the COMBAT VET END DATE field (#.5295) from the PATIENT file (#2) to determine CV Status. API returns three pieces (i.e.` `1^20010106^0) the 2nd piece is the COMBAT VET END DATE in HL7 format.`
79	PLACEHOLD ENCOUNTER CV	2;4	SET	'Y' FOR YES; LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Enter patient's combat veteran eligibility.` DESCRIPTION: `This field, previously known as ENCOUNTER CV, is no longer needed. The name has been changed to PLACEHOLD ENCOUNTER CV and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
80	NATIONAL PATIENT RECORD FLAG	2;5	SET	'Y' FOR YES; LAST EDITED: `JUN 04, 2012` HELP-PROMPT: `Indicate if patient is associated with a category 1 patient record flag.` DESCRIPTION: `This field records whether the patient's record contains 1 or more active category 1 (National) Patient Record Flags.` TECHNICAL DESCR: `The NATIONAL PATIENT RECORD FLAG field is set based on the results of the $$GETACT^DGPFAPI(DFN,TARGET ARRAY) call. This call looks at the category 1 national patient record flags as recorded in the PRF NATIONAL FLAG file` `(#26.15). The resulting value of this call is the number of active category I patient record flags assigned to this patient. This field is set to Y (YES) if the result is greater than zero. A value of zero causes this` `field to be left null.`
81	RX PATIENT STATUS	2;6	SET	'SC' FOR SERVICE CONNECTED; 'AA' FOR A&A; 'OTH' FOR OTHER; 'INP' FOR INPATIENT; 'NON' FOR NON-VA; LAST EDITED: `JUN 04, 2012` HELP-PROMPT: `Enter the patient status of the patient receiving this prescription.` DESCRIPTION: `Indicates the status of the patient at the time the medication was filled.` TECHNICAL DESCR: `RX Patient Status is extracted from the SC/A&A/OTHER/INPATIENT/NVA field (#6) of the RX PATIENT STATUS File (#53).` `The value for this field shall be based on the set of codes of this field.`
82	NON VA PRESCRIBER	2;7	SET	'Y' FOR YES; '0' FOR NO; LAST EDITED: `JUN 05, 2012` HELP-PROMPT: `Indicate if prescriber is a non-VA employee.` DESCRIPTION: `Indicates the provider prescribing the prescription is not a VA employee.` TECHNICAL DESCR: `The NON VA PRESCRIBER field is derived from the NON-VA PRESCRIBER field (#53.91) of the NEW PERSON file (#200). The value stored in that field is used to determine the value stored in the NON VA PRESCRIBER field.`
83	RX ORDER NUMBER	2;8	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `APR 05, 2005` HELP-PROMPT: `Type a Number between 1 and 999999999, 0 Decimal Digits` DESCRIPTION: `This field contains the prescription number which shall be a whole number between 1 and 999999999.` TECHNICAL DESCR: `This field is populated from the RX # field (#.01) located in the Prescription file (#52).`
84	ERI	2;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>2!($L(X)<1) X` `MAXIMUM LENGTH: 2` LAST EDITED: `MAY 05, 2020` HELP-PROMPT: `Answer must be 1-2 characters in length.` DESCRIPTION: `This field identifies patients from impacted zip code areas designated by the Federal Emergency Management Agency (FEMA).` TECHNICAL DESCR: `This field is extracted from the EMERGENCY RESPONSE INDICATOR field (#.181) located in the PATIENT file (#2). Values are:` `"K" = Hurricane Katrina` `"P" = Pandemic` `Null`
85	PLACEHOLD AGENT ORANGE ENC	2;10	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Enter patient's Agent Orange exposure indicator.` DESCRIPTION: `This field, previously known as AGENT ORANGE ENC INDICATOR, is no longer needed. The name has been changed to PLACEHOLD AGENT ORANGE ENC and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
86	PLACEHOLD ENCOUNTER SWAC	2;11	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Indicate if care is related to Southwest Asia Conditions status.` DESCRIPTION: `This field, previously known as ENCOUNTER SWAC, is no longer needed. The name has been changed to PLACEHOLD ENCOUNTER SWAC and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
87	PLACEHOLD ENC HEAD/NECK CA	2;12	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Indicate if service provided is related to head and/or neck cancer.` DESCRIPTION: `This field, previously known as ENC HEAD/NECK CA, is no longer needed. The name has been changed to PLACEHOLD ENC HEAD/NECK CA and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
88	PLACEHOLD ENCOUNTER MST	2;13	SET	'N' FOR NO; 'Y' FOR YES; LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Indicate if treatment is related to military sexual trauma.` DESCRIPTION: `This field, previously known as ENCOUNTER MST, is no longer needed. The name has been changed to PLACEHOLD ENCOUNTER MST and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
89	SW ASIA CONDITIONS	2;14	SET	'Y' FOR YES; 'N' FOR NO; 'U' FOR UNKNOWN; LAST EDITED: `MAY 27, 2009` DESCRIPTION: `This field is used to indicate if this visit represents treatment of a VA patient claiming exposure to Southwest Asia Conditions.` TECHNICAL DESCR: `This field is derived from the SOUTHWEST ASIA CONDITIONS? field (#.322013) in the Patient File (#2) using the patient's DFN. The status indicator is returned by SVC^VADPT. The SVC^VADPT called is made from routine` `PAT^ECXUTL3. The field values are:` `Y = YES` `N = NO` `U = UNKNOWN`
90	PLACEHOLD RADIATION ENCOUNTER	2;15	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Indicate if treatment is related to exposure to ionizing radiation.` DESCRIPTION: `This field, previously known as RADIATION ENCOUNTER INDICATOR, is no longer needed. The name has been changed to PLACEHOLD RADIATION ENCOUNTER and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
91	SERVICE CONNECTED RX	2;16	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `JUL 12, 2006` DESCRIPTION: `This field will indicate whether this prescription is for a service connected condition.` TECHNICAL DESCR: `The value is retrieved from the Prescription file (#52), SERVICE CONNECTED field (#116). Possible values:` `'Y' - Yes 'N' - No` `The value is retrieved via the DIQ^PSODI pharmacy API.`
92	OEF/OIF	2;17	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>9!($L(X)<1) X` LAST EDITED: `MAY 02, 2007` HELP-PROMPT: `Answer must be 1-9 characters in length.` DESCRIPTION: `The Military Operation in which the patient was in combat during the specified time period. This field is a length of nine characters and reflects the OEF or OIF where this patient was in combat.` TECHNICAL DESCR: `The Military Operation in which the patient was in combat during the specified time period. This field is a length of nine characters and reflects the OEF or OIF where this patient was in combat. The value of this field is` `derived from the LOCATION OF SERVICE field (#.01) from SERVICE [OEF OR OIF] sub-file (#2.3215) of field (#.3215) located in the PATIENT File (#2). DSS will capture once, each location where the veteran served. In order to` `accommodate multiple locations, the values for this field are concatenated into this 9-character field. Possible field values are one or more combinations of the following: OEF = Operation Enduring Freedom OIF =` `Operation Iraqi Freedom UNK = Unknown OEF/OIF`
93	OEF/OIF RETURN DATE	2;18	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `MAY 02, 2007` HELP-PROMPT: `Answer must be 1-8 characters in length.` DESCRIPTION: `The date the patient left the OEF/OIF area, if known. Otherwise, it is the end date of military pay for this OEF/OIF deployment. This date field has a format equal to YYYYMMDD.` TECHNICAL DESCR: `The date the patient left the OEF/OIF area, if known. Otherwise, it is the end date of military pay for this OEF/OIF deployment. This date field has a format equal to YYYYMMDD. The value of this field is derived from the` `OEF/OIF TO DATE field (#.03) from sub-file (#2.3215) of field (#.3215) located in the PATIENT file (#2). In cases of multiple OEF/OIF tours, this field contains only most recent return date.`
94	PLACEHOLD ASSOC PC PROV NPI	2;19	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAY 01, 2018` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: `This field, previously known as ASSOCIATE PC PROVIDER NPI, is no longer needed. The name has been changed to PLACEHOLD ASSOC PC PROV NPI and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3170.`
95	PLACEHOLD PC PROVIDER NPI	2;20	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAY 01, 2018` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: `This field, previously known as PRIMARY CARE PROVIDER NPI, is no longer needed. The name has been changed to PLACEHOLD PC PROVIDER NPI and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3170.`
96	PROVIDER NPI	2;21	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAY 02, 2007` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: `A standard unique life-long identifier of the individuals providing health care services. This field has a length of fifteen characters.` TECHNICAL DESCR: `A standard unique life-long identifier of the individuals providing health care services. This field has a length of fifteen characters. The qualified identifier is retrieved via the supporting Kernel API: $$NPI^XUSNPI.`
97	COUNTRY CODE	2;22	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>3!($L(X)<1) X` LAST EDITED: `JUN 09, 2009` HELP-PROMPT: `The code for the country. Answer must be 1-3 characters in length.` DESCRIPTION: `The code for the country associated with the address.` TECHNICAL DESCR: `The three-character alpha identifying code is copied from the CODE (#.01) field of the COUNTRY CODE (#779.004) file.`
98	PATCAT	2;23	SET	'AD' FOR Active Duty; 'ADD' FOR Active Duty Dependent; 'FNRS' FOR Former Non-Remarried Spouse; 'RET' FOR Retired; 'RETD' FOR Retiree Dependent; 'RES' FOR Reservist; 'REC' FOR Recruit; 'TDRL' FOR Temporary Disability; 'TFL' FOR TRICARE for Life; LAST EDITED: `SEP 03, 2010` HELP-PROMPT: `Select the Patient's Category for the FHCC Reconciliation process.` DESCRIPTION: `This is the Patient's category which will be used for FHCC (Federal Health Care Center) Reconciliation. DSS must capture and report DoD patients so that the FHCC reconciliation process can function as designed.` `"Reconciliation" is the process used within the new FHCC to determine which patients DoD pays for and which VA pays for.` TECHNICAL DESCR: `If the VistA Patient Type Code (TYPE field (#391) of the Patient file (#2) ) = Active Duty, Military Retiree, or TRICARE, then the value(s) in the VistA Other Eligibility multiple (PATIENT ELIGIBILITIES field (#361) of` `the PATIENT file (#2)), which points to locally modifiable ELIGIBILITY CODE file (#8) should be evaluated. If the value in the ELIGIBILITY CODE is equal to any entry in the set of codes in this field, the value should be` `placed in this field.`
99	PLACEHOLD ENCOUNTER SC	2;24	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Enter 'YES' if this prescription is for a service connected condition.` DESCRIPTION: `This field, previously known as ENCOUNTER SC, is no longer needed. The name has been changed to PLACEHOLD ENCOUNTER SC and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
100	VIETNAM	2;25	SET	'Y' FOR YES; 'N' FOR NO; 'U' FOR UNKNOWN; LAST EDITED: `MAR 09, 2013` HELP-PROMPT: `Select the appropriate Vietnam service status for this patient.` DESCRIPTION: `Indicates if patient is a Vietnam era veteran.` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (#4) in the PRESCRIPTION EXTRACT file (#727.81), VIETNAM data is derived from the VIETNAM SERVICE INDICATED? field (#.32101) in the PATIENT file (#2).`
101	CAMP LEJEUNE STATUS	2;26	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `MAR 09, 2013` HELP-PROMPT: `Indicate Camp Lejeune status for the patient.` DESCRIPTION: `Indicates if patient was exposed to contaminated water while stationed at Camp Lejeune, NC between January 1, 1957 and December 31, 1987.` TECHNICAL DESCR: `Using the patient's DFN, a call is made to PAT^ECXUTL3, which in turn calls SVC^VADPT. This call returns all service related information for a patient, including their Camp Lejeune status.`
102	PLACEHOLD ENC CAMP LEJEUNE	2;27	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Enter 'YES' if this prescription is related to exposure at Camp Lejeune.` DESCRIPTION: `This field, previously known as ENCOUNTER CAMP LEJEUNE, is no longer needed. The name has been changed to PLACEHOLD ENC CAMP LEJEUNE and its value will be set to null.` TECHNICAL DESCR: `This field is no longer in use as of patch ECX3174.`
103	COMBAT VETERAN INDICATOR	2;28	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `MAR 06, 2014` HELP-PROMPT: `Enter 'YES' if this patient is a Combat Veteran.` DESCRIPTION: `Identifies if the patient served in a combat zone.` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (#4) in this file, COMBAT SERVICE INDICATOR data is derived from the COMBAT SERVICE INDICATED field (#.5291) in the PATIENT file (#2). COMBAT SERVICE` `INDICATED is returned by the supported call SVC^VADPT.`
104	COMBAT VETERAN LOCATION	2;29	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>14!($L(X)<1) X` LAST EDITED: `APR 03, 2014` HELP-PROMPT: `Answer must be 1-14 characters in length.` DESCRIPTION: `Identifies the war in which the combat service was incurred.` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (#4) in this file, COMBAT SERVICE LOCATION data is derived from the COMBAT SERVICE LOCATION field (#.5292) in the PATIENT file (#2). The COMBAT SERVICE` `LOCATION IEN is returned by the supported call SVC^VADPT, this IEN is then used to retrieve the ABBREVIATION field(#1) from the POW PERIOD file (#22).`
105	REMARKS	2;30	SET	'C' FOR CHOICE or CCNRX; LAST EDITED: `MAY 05, 2020` HELP-PROMPT: `Indicate if prescription is filled via the choice program.` DESCRIPTION: `This field is set based on whether the prescription is being filled by the VA as part of the Veteran's Choice/Community Care Network program.` TECHNICAL DESCR: `Using the RX ORDER NUMBER field (#83) of this file, the REMARKS field (#12) of the PRESCRIPTION file (#52) is retrieved. A check is then made to see if the remarks contain a keyword assigned by pharmacy, which indicates` `that the prescription was filled as part of the Veteran's Choice/Community Care Network program.`
106	PATIENT DIVISION	2;31	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<3) X` `MAXIMUM LENGTH: 7` LAST EDITED: `JUN 29, 2017` HELP-PROMPT: `Enter the 3 to 7 character Station Number of the clinic that ordered the prescription.` DESCRIPTION: `This field is the Station Number of the clinic that ordered the prescription.` TECHNICAL DESCR: `The ordering clinic is the input parameter for the RADDIV^ECXDEPT API, which then returns the STATION NUMBER field (#99) from the INSTITUTION file (#4).`
107	VISTA DEA SPECIAL HDLG	2;32	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<1) X` `MAXIMUM LENGTH: 6` LAST EDITED: `MAR 11, 2019` HELP-PROMPT: `Answer must be 1-6 characters in length.` DESCRIPTION: `Identifies the DEA codes assigned to the drug associated with this record.` TECHNICAL DESCR: `Derived from the DEA, SPECIAL HDLG field (#3) in the DRUG file (#50).`
108	PLACEHOLD CERNER	3;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>399!($L(X)<1) X` `MAXIMUM LENGTH: 399` LAST EDITED: `APR 29, 2022` HELP-PROMPT: `Answer must be 1-399 characters in length.` DESCRIPTION: `Placeholder for Cerner fields. Reserved for EHRM conversion.` TECHNICAL DESCR: `Currently null.`
109	NEW MPI	4;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` `MAXIMUM LENGTH: 20` LAST EDITED: `APR 29, 2022` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: `A national VA system IDENTIFIER which uniquely identifies a patient.` `Commonly called "Patient ICN" or "Patient IEN"; not to be confused with the IEN from the VistA PATIENT file.` TECHNICAL DESCR: `Derived by calling API $$GETICN^MPIF001 (supported DBIA #2701) that returns the Integration Control Number (ICN) and the ICN checksum for the given patient in the PATIENT file (#2).`
110	SELF IDENTIFIED GENDER	4;2	SET	'M' FOR Male; 'F' FOR Female; 'TM' FOR Transgender Male; 'TF' FOR Transgender Female; 'O' FOR Other; 'N' FOR Does not wish to disclose; 'B' FOR Non-Binary; LAST EDITED: `APR 29, 2022` HELP-PROMPT: `Answer must be 1-2 characters in length.` DESCRIPTION: `The SELF IDENTIFIED GENDER value indicates the patient's personal sense of their gender identity (if they choose to provide it).` `Self-identified gender may be the same or different as the sex assigned at birth.` TECHNICAL DESCR: `Using the patient pointer (DFN) stored in the PATIENT NO. - DFN field (#4) in the PRESCRIPTION EXTRACT file (#727.81), this data is derived from the SELF IDENTIFIED GENDER field (#.024) in the PATIENT file (#2).`
111	PRICE PER DISPENSE UNIT	4;3	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."5.N) X` LAST EDITED: `MAR 31, 2023` HELP-PROMPT: `Enter the price per dispense unit for the drug. Value must be a number between 0 and 999999, 4 decimal digits.` DESCRIPTION: `This is the price per dispense unit for this drug.` TECHNICAL DESCR: `This is the PRICE PER DISPENSE UNIT field (#16) of the DRUG file (#50).`
112	DISPENSE UNIT	4;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` `MAXIMUM LENGTH: 10` LAST EDITED: `MAR 31, 2023` HELP-PROMPT: `Enter the dispense unit for the drug. Answer must be 1-10 characters in length.` DESCRIPTION: `This is the dispense unit for this drug.` TECHNICAL DESCR: `This is the DISPENSE UNIT field (#14.5) of the DRUG file (#50).`

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	2(XREF 1S), 2(XREF 1K)
>> DINUM	.01+1*
X	.01+1!, 1+1!, 2(XREF 1S), 2(XREF 1K), 3+1!, 5+1!, 6+1!, 8+1!, 10+1!, 11+1! , 13+1!, 14+1!, 16+1!, 17+1*!, 20+1!, 21+1!, 22+1!, 23+1!, 24+1!, 27+1! , 29+1!, 31+1!, 32+1!, 33+1!, 34+1!, 35+1!, 37+1!, 38+1!, 39+1!, 40+1! , 41+1!, 42+1!, 47+1!, 50+1!, 51+1!, 52+1!, 53+1!, 56+1!, 58+1!, 60+1! , 62+1!, 63+1!, 64+1!, 65+1!, 66+1!, 68+1!, 71+1!, 72+1!, 73+1!, 74+1! , 75+1!, 76+1!, 78+1!, 83+1!, 84+1!, 92+1!, 93+1!, 94+1!, 95+1!, 96+1! , 97+1!, 104+1!, 106+1!, 107+1!, 108+1!, 109+1!, 111+1!, 112+1!
>> Y	1OT+1, 8OT+1, 23OT+1, 32OT+1
>> Y(0	1OT+1, 8OT+1, 23OT+1, 32OT+1

Customize PDF page

Package: DSS Extracts

Global: ^ECX(727.81

Information

Description

Directly Accessed By Routines, Total: 5

Accessed By FileMan Db Calls, Total: 1

Pointer To FileMan Files, Total: 8

Fields, Total: 113

External References

Global Variables Directly Accessed

Local Variables

Legend:

Name	Field # of Occurrence
$$ECXDATEX^ECXUTL	8OT+1, 23OT+1
$$ECXTIMEX^ECXUTL	32OT+1
$$ECXYMX^ECXUTL	1OT+1