Global: ^ECX(727.829

FileMan FileNo	FileMan Filename	Package
727.829	BLOOD BANK EXTRACT	DSS Extracts

Package	Total	Routines
DSS Extracts	3	^ECX(727.829 ^ECX(729 ECXLBBC

Package	Total	FileMan Files
DSS Extracts	1	DSS EXTRACT LOG(#727)[2]
Registration	1	PATIENT(#2)[4]

Fields, Total: 35

Field #	Name	Loc	Type	Details
.01	SEQUENCE NUMBER	0;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X` LAST EDITED: `JUN 12, 2012` 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` CROSS-REFERENCE: `727.829^B` `1)= S ^ECX(727.829,"B",$E(X,1,30),DA)=""` `2)= K ^ECX(727.829,"B",$E(X,1,30),DA)`
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: `MAR 01, 2005` HELP-PROMPT: `Answer must be 6 characters in length.` DESCRIPTION: `A six character numeric 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: `DEC 13, 2004` 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. Not transmitted to the AAC.` CROSS-REFERENCE: `727.829^AC` `1)= S ^ECX(727.829,"AC",$E(X,1,30),DA)=""` `2)= K ^ECX(727.829,"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)<3) X` LAST EDITED: `JUN 13, 2012` HELP-PROMPT: `Answer must be 3-7 characters in length.` DESCRIPTION: `This is the facility/division where the extract was performed.` TECHNICAL DESCR: `The value for this field is derived from the ORDERING LOCATION field (#2) of the VBECS DSS EXTRACT file (#6002.03).`
4	PATIENT NO. - DFN	0;5	POINTER TO PATIENT FILE (#2)	PATIENT(#2) LAST EDITED: `DEC 02, 2004` HELP-PROMPT: `Enter the patient for this extract record.` DESCRIPTION: `An identifying number for the patient at the local site.` TECHNICAL DESCR: `Data for this field is derived from the DFN (#1) field in the VBECS DSS EXTRACT file (#6002.03). PATIENT NO. - DFN is a pointer to the NAME (#.01) field of the PATIENT (#2) file.`
5	SSN	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<9) X` LAST EDITED: `DEC 02, 2004` HELP-PROMPT: `Answer must be 9-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 BLOOD BANK EXTRACT file (#727.829), 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: `DEC 02, 2004` 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 BLOOD BANK EXTRACT file (#727.829), 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.`
8	ENCOUNTER NUMBER	0;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>18!($L(X)<1) X` LAST EDITED: `DEC 02, 2004` HELP-PROMPT: `Answer must be 1-18 characters in length.` DESCRIPTION: `The unique number assigned for 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.`
9	DATE OF TRANSFUSION	0;10	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>8!($L(X)<8) X` OUTPUT TRANSFORM: `S Y=$$ECXDATEX^ECXUTL(Y)` LAST EDITED: `FEB 09, 2005` HELP-PROMPT: `Answer must be 8 characters in length.` DESCRIPTION: `This field contains the date of the blood component transfusion.` TECHNICAL DESCR: `Data for this field is derived from the DATE/TIME OF TRANSFUSION field (#9) from the VBECS DSS EXTRACT file (#6002.03). That fileman format date is first parsed by taking the characters up to the ".". Then the month is` `determined by taking the 4th and 5th characters, the year by taking the 2nd and 3rd characters and the day by taking the 6th and 7th characters. 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, month and day giving the results in YYYYMMDD format.`
10	TIME OF TRANSFUSION	0;11	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<6) X` OUTPUT TRANSFORM: `S Y=$$ECXTIMEX^ECXUTL(Y,1)` LAST EDITED: `FEB 09, 2005` HELP-PROMPT: `Answer must be 6 characters in length.` DESCRIPTION: `A 6-character numeric string that represents the time of day the blood component transfusion was performed.` TECHNICAL DESCR: `Data for this field is derived from the DATE/TIME OF TRANSFUSION field (#9) from the VBECS DSS EXTRACT file (#6002.03). Time is parsed from this file man format date by taking the 6 characters after the ".". If time cannot` `be determined, it is set to a default of "000300".`
11	COMPONENT	0;12	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `DEC 02, 2004` HELP-PROMPT: `Answer must be 1-15 characters in length` DESCRIPTION: `This is the name of the blood bank product transfused.` TECHNICAL DESCR: `Data for this field is derived from the PRODUCT NAME field (#6) in the VBECS DSS EXTRACT file (#6002.03).`
12	COMPONENT ABBREVIATION	0;13	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>4!($L(X)<1) X` LAST EDITED: `DEC 02, 2004` HELP-PROMPT: `Answer must be 1-4 characters in length.` DESCRIPTION: `Abbreviation of the blood component.` TECHNICAL DESCR: `Data for this field is derived from the COMPONENT ABBREVIATION field (#7) in the VBECS DSS EXTRACT file (#6002.03).`
13	NUMBER OF UNITS	0;14	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUN 13, 2012` HELP-PROMPT: `Enter a number between 1 and 99, 0 decimal digits.` DESCRIPTION: `Number of pooled units transfused.` TECHNICAL DESCR: `Data for this field is derived from the NUMBER OF UNITS field (#8) in the VBECS DSS EXTRACT file (#6002.03). If the NUMBER OF UNITS is blank or zero, use a default of 1.`
14	VOLUME	0;15	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `MAY 20, 2014` HELP-PROMPT: `Type a number between 0 and 9999, 0 decimal digits.` DESCRIPTION: `This is the volume, in milliliters, of the component or unit transfused.` TECHNICAL DESCR: `Data for this field is derived from the VOLUME field (#11) in the VBECS DSS EXTRACT file (#6002.03).`
15	REACTION	0;16	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `MAY 20, 2014` HELP-PROMPT: `Enter 'YES' if this patient had a transfusion reaction.` DESCRIPTION: `Indicates a transfusion reaction.` TECHNICAL DESCR: `Data for this field is derived from the TRANSFUSION REACTION field (#14) in the VBECS DSS EXTRACT file (#6002.03).`
16	REACTION TYPE	0;17	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<2) X` LAST EDITED: `MAY 24, 2006` HELP-PROMPT: `Answer must be 2-10 characters in length.` DESCRIPTION: `Type of reaction from transfusion` TECHNICAL DESCR: `Data for this field is derived from the REACTION TYPE field (#12) in the VBECS DSS EXTRACT file (#6002.03).`
17	FEEDER LOCATION	0;18	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>9!($L(X)<1) X` LAST EDITED: `DEC 02, 2004` HELP-PROMPT: `Answer must be 1-9 characters in length.` DESCRIPTION: `The Location of the Blood Bank, where the blood is stored and where the Blood Bank technologist performed the (Blood Bank) tests.` TECHNICAL DESCR: `The data for this field is derived by concatenating the letters "BB" with the TRANSFUSION LOCATION field (#3) from the VBECS DSS EXTRACT file (#6002.03).`
18	PLACEHOLDER	0;19	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.`
19	PLACEHOLD DSS IP #	0;20	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<1) X` LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Answer must be 1-7 characters in length.` 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.`
20	ORDERING PROVIDER	0;21	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>11!($L(X)<1) X` LAST EDITED: `APR 26, 2005` HELP-PROMPT: `Answer must be 1-11 characters in length.` DESCRIPTION: `Provider for the patient transfused.` TECHNICAL DESCR: `This is the IEN of the NEW PERSON file (#200) entry and it indicates the provider that ordered the blood transfusion. This field is extracted from the PHYSICIAN field (#6.2) located in the BLOOD INVENTORY file (#65).` `The ORDERING PROVIDER is the value of a "2" prefixed to the pointer value 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.`
21	ORDERING PROVIDER PERSON CLASS	0;22	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<7) X` LAST EDITED: `APR 26, 2005` HELP-PROMPT: `Answer must be 7 characters in length.` DESCRIPTION: `The VA Code of the Person Class of the Ordering Provider as of the date of this extract record.` TECHNICAL DESCR: `Active Person Class is determined by the supported call $$GET^XUA4A72(ECXPHY,ECD), where ECXPHY is the IEN from file #200 and ECD is the date of the event. The VA CODE is determined by the 7th piece of the returned value` `string.`
22	ERI	0;23	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`
23	UNIT MODIFIED	0;24	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `MAY 20, 2014` HELP-PROMPT: `Answer 'YES' if the unit of blood was modified.` DESCRIPTION: `Indicates if unit of blood was modified.` TECHNICAL DESCR: `The Value for this field is derived from the UNIT MODIFICATION field(#13) of the VBECS DSS EXTRACT file (#6002.03). If the UNIT MODIFICATION is not null, this field is set to Y(es), otherwise it's set to N(o).`
24	UNIT MODIFICATION	0;25	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<1) X` LAST EDITED: `JUN 30, 2006` HELP-PROMPT: `Answer must be 1-6 characters in length.` DESCRIPTION: `Type of unit modification performed.` TECHNICAL DESCR: `The Value for this field is derived from the UNIT MODIFICATION field (#13) of the VBECS DSS EXTRACT file (#6002.03).`
25	REQUESTING PROVIDER	0;26	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>11!($L(X)<1) X` LAST EDITED: `MAY 09, 2006` HELP-PROMPT: `Answer must be 1-11 characters in length.` DESCRIPTION: `This is the provider who requested the transfusion.` TECHNICAL DESCR: `Data is derived from the ORDERING PROVIDER field (#5) of the VBECS DSS EXTRACT file (#6002.03)` `REQUESTING 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.`
26	REQUESTING PROVIDER PC	0;27	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<7) X` LAST EDITED: `AUG 29, 2006` HELP-PROMPT: `Answer must be 7 characters in length.` DESCRIPTION: `The field holds the VA Code associated with the active Person Class of the Requesting Provider.` TECHNICAL DESCR: `Active Person Class is determined by the supported call $$GET^XUA4A72(ECXPHY,ECD), where ECXPHY is the IEN from file #200 and ECD is the date of the event. The VA CODE is determined by the 7th piece of the returned value` `string.`
27	PRODUCTION DIVISION CODE	0;28	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<3) X` LAST EDITED: `JUN 18, 2012` HELP-PROMPT: `Answer must be 3-7 characters in length.` DESCRIPTION: `Identifies the division/facility where the work was performed.` TECHNICAL DESCR: `The value for this field is derived from the TRANSFUSION LOCATION field (#3) of the VBECS DSS EXTRACT file (#6002.03).`
28	ORDERING PROVIDER NPI	0;29	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAY 04, 2007` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: `A standard unique life-long identifier of the provider who ordered the type and cross match. This field has a length of fifteen characters.` TECHNICAL DESCR: `ORDERING PROVIDER NPI is a standard unique life-long identifier of the provider who ordered the type and cross match. The qualified identifier shall be retrieved via the supporting Kernel API:$$NPI^XUSNPI.`
29	REQUESTING PROVIDER NPI	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAY 04, 2007` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: `A standard unique life-long identifier of the provider who requested the transfusion. This field has a length of fifteen characters.` TECHNICAL DESCR: `REQUESTING PROVIDER NPI is a standard unique life-long identifier of the provider who requested the transfusion. The qualified identifier shall be retrieved via the supporting Kernel API:$$NPI^XUSNPI.`
30	PATCAT	1;2	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.`
31	PLACEHOLD ENCOUNTER SC	1;3	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `FEB 04, 2019` HELP-PROMPT: `Is this Encounter Service Connected?` 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.`
32	PLACEHOLD CERNER	2;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X` `MAXIMUM LENGTH: 245` LAST EDITED: `APR 29, 2022` HELP-PROMPT: `Answer must be 1-245 characters in length.` DESCRIPTION: `Placeholder for Cerner fields. Reserved for EHRM conversion.` TECHNICAL DESCR: `Placeholder for Cerner fields. Reserved for EHRM conversion.`
33	NEW MPI	3;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).`
34	SELF IDENTIFIED GENDER	3;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: `JUN 10, 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 BLOOD BANK EXTRACT file (#727.829), this data is derived from the SELF IDENTIFIED GENDER field (#.024) in the PATIENT file (#2).`

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	.01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K)
>> DINUM	.01+1*
X	.01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 2(XREF 1S), 2(XREF 1K), 3+1!, 5+1!, 6+1!, 8+1! , 9+1!, 10+1!, 11+1!, 12+1!, 13+1!, 14+1!, 16+1!, 17+1!, 18+1!, 19+1! , 20+1!, 21+1!, 22+1!, 24+1!, 25+1!, 26+1!, 27+1!, 28+1!, 29+1!, 32+1! , 33+1!
>> Y	1OT+1, 9OT+1, 10OT+1*
>> Y(0	1OT+1, 9OT+1, 10OT+1*

Customize PDF page

Package: DSS Extracts

Global: ^ECX(727.829

Information

Description

Directly Accessed By Routines, Total: 3

Pointer To FileMan Files, Total: 2

Fields, Total: 35

External References

Global Variables Directly Accessed

Local Variables

Legend:

Name	Field # of Occurrence
$$ECXDATEX^ECXUTL	9OT+1
$$ECXTIMEX^ECXUTL	10OT+1
$$ECXYMX^ECXUTL	1OT+1