Global: ^ECX(727.817

FileMan FileNo	FileMan Filename	Package
727.817	TREATING SPECIALTY CHANGE EXTRACT	DSS Extracts

Package	Total	Routines
DSS Extracts	5	ECX8171 ECX8172 ECXATRT ^ECX(727.817 ^ECX(729

Package	Total	FileMan Files
Registration	3	MAS MOVEMENT TYPE(#405.2)[18] PATIENT MOVEMENT(#405)[12] PATIENT(#2)[4]
DSS Extracts	1	DSS EXTRACT LOG(#727)[2]

Fields, Total: 48

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: `OCT 04, 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.817^AC` `1)= S ^ECX(727.817,"AC",$E(X,1,30),DA)=""` `2)= K ^ECX(727.817,"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` `MAXIMUM LENGTH: 7` LAST EDITED: `SEP 05, 2017` HELP-PROMPT: `Answer must be 1-7 characters in length.` DESCRIPTION: `This is the Station Number of the Division where the Treating Specialty Change occurred.` TECHNICAL DESCR: `The Station Number of the Division where the Treating Specialty Change occurred. It is derived from the DIVISION field (#.015) of the WARD LOCATION file (#42), which points to the MEDICAL CENTER DIVISION file (#40.8). The` `resulting value is the STATION NUMBER field (#99) from 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 (.03) in the PATIENT MOVEMENT file (#405), which is a pointer to 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: `OCT 04, 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 TREATING SPECIALTY CHANGE EXTRACT file (#727.817), SSN data is derived from the SOCIAL SECURITY NUMBER field (#.09) in the PATIENT file` `(#2).` `"Test" patient status is determined in PAT^ECXUTL3.`
6	NAME	0;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>4!($L(X)<4) X` LAST EDITED: `OCT 04, 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 TREATING SPECIALTY CHANGE EXTRACT file (#727.817), 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 at the time of the treating specialty change.` 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	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: `An 8-character numeric string that represents the date on which the Treating Specialty change took place.` TECHNICAL DESCR: `Data source:` `PATIENT MOVEMENT file (#405); DATE/TIME field (#.01)` `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	PRODUCT	0;10	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `OCT 04, 1996` HELP-PROMPT: `The product or feeder key for this extract.` DESCRIPTION: `The product or feeder key for this extract.` TECHNICAL DESCR: `For the Treating Specialty Change extract, the PRODUCT field is null.`
10	ADMISSION DATE	0;11	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 admission date.` TECHNICAL DESCR: `Data source:` `PATIENT MOVEMENT file (#405); ADMISSION/CHECK-IN MOVEMENT field (#.14) PATIENT MOVEMENT FILE (#405); DATE/TIME (#.01)` `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.`
11	DISCHARGE DATE	0;12	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 discharge date.` TECHNICAL DESCR: `Data source:` `PATIENT MOVEMENT file (#405); DATE/TIME field (#.01)` `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.`
12	MOVEMENT FILE #	0;13	POINTER TO PATIENT MOVEMENT FILE (#405)	PATIENT MOVEMENT(#405) LAST EDITED: `OCT 04, 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 number used as an index into the patient movement file.` `The ^DGPM("ATT3" or "ATT6",DATE,D0) cross reference is used to obtain the current movement IEN associated with this patient.`
13	TYPE	0;14	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>1!($L(X)<1) X` LAST EDITED: `OCT 04, 1996` HELP-PROMPT: `Your answer must be 1 character in length.` DESCRIPTION: `The type of movement for this patient.` TECHNICAL DESCR: `Using the "ATT"_TYPE cross reference where TYPE=6 (specialty change).`
14	NEW TREATING SPECIALTY	0;15	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>3!($L(X)<2) X` LAST EDITED: `APR 13, 2007` HELP-PROMPT: `PTF Code from Specialty File (#42.4) (2 to 3 characters)` DESCRIPTION: `The treating specialty code for this patient at the date and time of this record.` TECHNICAL DESCR: `Source: Field #.09; file #405 Field #7; file #45.7` `PTF Code of the SPECIALTY file (#42.4) derived from the SPECIALTY field (#1) and PTF CODE (#7) of the FACILITY TREATING SPECIALTY file (#45.7) record pointed to by the FACILITY TREATING SPECIALTY field (#.09) of the` `PATIENT MOVEMENT file (#405) record. The movement record is the current treating specialty movement. Then, the PTF Code is obtained and stored instead of the actual specialty code.`
15	LOSING TREATING SPECIALTY	0;16	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>3!($L(X)<2) X` LAST EDITED: `MAY 02, 2007` HELP-PROMPT: `Answer must be 2-3 characters in length.` DESCRIPTION: `The patient's treating specialty code from prior treating specialty record.` TECHNICAL DESCR: `Using the "ATT3" or "ATT6" cross reference on the PATIENT MOVEMENT file (#405) and the patient pointer (DFN) stored in the PATIENT NO. - DFN field (4) in the TREATING SPECIALTY CHANGE EXTRACT file (#727.817), NEW TREATING` `SPECIALTY data is derived from the FACILITY TREATING SPECIALTY field (.09) in the PATIENT MOVEMENT file (#405). This facility treating specialty data is a pointer to the FACILITY TREATING SPECIALTY file (#45.7). Using the` `SPECIALTY field (1) in the FACILITY TREATING SPECIALTY file (#45.7), the pointer to the SPECIALTY file (#42.4) is obtained.` `This Specialty is then the LOSING Specialty for the Treating Specialty change occurring on the date in the TRT extract record.` `Then, the PTF Code is obtained and stored instead of the actual specialty code.`
16	LOSING TREATING SPECIALTY LOS	0;17	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 16, 1998` HELP-PROMPT: `Type a Number between 0 and 9999, 0 Decimal Digits` DESCRIPTION: `The length of stay, in days, on the prior treating specialty.` TECHNICAL DESCR: `Calculated as current treating specialty date minus the date (DATE/TIME field (.01) of the PATIENT MOVEMENT file (#405)) of the last treating specialty change.` `This field will only be used for actual treating specialty changes. For file #405 records which reflect provider-only changes this field will be null.`
17	LOSING ATTENDING PHYSICIAN	0;18	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>11!($L(X)<1) X` LAST EDITED: `JAN 20, 1998` HELP-PROMPT: `Enter attending physician assigned to this patient.` DESCRIPTION: `The Attending Physician associated with the previous treating specialty change record in file #405.` TECHNICAL DESCR: `Derived from the ATTENDING PHYSICIAN field (.19) of the PATIENT MOVEMENT file (#405). If ATTENDING PHYSICIAN is a pointer to the NEW PERSON file (#200), it is stored as "2"_pointer value. If ATTENDING PHYSICIAN is a` `pointer to the PROVIDER file (#6), it is stored as "6"_pointer value.`
18	MOVEMENT TYPE	0;19	POINTER TO MAS MOVEMENT TYPE FILE (#405.2)	MAS MOVEMENT TYPE(#405.2) LAST EDITED: `OCT 04, 1996` HELP-PROMPT: `Enter the patient movement number associated with this extract record.` DESCRIPTION: `The MAS movement type for this movement.` TECHNICAL DESCR: `MOVEMENT TYPE is derived from the MAS MOVEMENT TYPE field (.18) of the PATIENT MOVEMENT file (#405). It is a pointer to the MAS MOVEMENT TYPE file (#405.2).`
19	TRT TIME	0;20	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<6)!'(X?6N) X` OUTPUT TRANSFORM: `S Y=$$ECXTIMEX^ECXUTL(Y,0)` LAST EDITED: `SEP 24, 1997` HELP-PROMPT: `Answer must be 6 characters in length.` DESCRIPTION: `A 6-character numeric string representing the time of day when the Treating Specialty change took place.` TECHNICAL DESCR: `Data source:` `PATIENT MOVEMENT file (#405); DATE/TIME field (#.01);` `2nd "." piece only.` `This field is always exactly 6 numeric characters in length; if time cannot be determined, then "000300" is used as default.`
20	ADMISSION TIME	0;21	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<6)!'(X?6N) X` OUTPUT TRANSFORM: `S Y=$$ECXTIMEX^ECXUTL(Y,0)` LAST EDITED: `SEP 24, 1997` HELP-PROMPT: `Answer must be 6 characters in length.` DESCRIPTION: `The time at which the patient admission occurred in HHMMSS. A 24 hour clock format is used (e.g. 8:31:12 p.m. would be 203112).` TECHNICAL DESCR: `Data source:` `PATIENT MOVEMENT file (#405); ADMISSION/CHECK-IN MOVEMENT field (#.14) PATIENT MOVEMENT FILE (#405); DATE/TIME (#.01)` `This field is always exactly 6 numeric characters in length; if time cannot be determined, then "000300" is used as default.`
21	NEW PRIMARY WARD PROVIDER	0;22	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>11!($L(X)<1) X` LAST EDITED: `JAN 20, 1998` HELP-PROMPT: `Answer must be 1-11 characters in length.` DESCRIPTION: `The new Primary Provider associated with the current patient movement record in file #405.` TECHNICAL DESCR: `Source: Field #.08; file #405` `Internal entry number of NEW PERSON file (#200) derived from the PRIMARY CARE PHYSICIAN field (#.08) of the PATIENT MOVEMENT file (#405). The movement record here is the current treating specialty movement.` `A "2" is prefixed to this pointer value, if the pointer references file #200.`
22	NEW ATTENDING PHYSICIAN	0;23	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>11!($L(X)<1) X` LAST EDITED: `JAN 20, 1998` HELP-PROMPT: `Answer must be 1-11 characters in length.` DESCRIPTION: `The new Attending Physician associated with the current patient movement record in file #405.` TECHNICAL DESCR: `Source: Field #.19; file #405` `Internal entry number of NEW PERSON file (#200) derived from the ATTENDING PHYSICIAN field (#.19) of the PATIENT MOVEMENT file (#405). The movement record here is the current treating specialty movement.` `A "2" is prefixed to this pointer value, if the pointer references file #200.`
23	LOSING PRIMARY WARD PROVIDER	0;24	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>11!($L(X)<1) X` LAST EDITED: `JAN 20, 1998` HELP-PROMPT: `Answer must be 1-11 characters in length.` DESCRIPTION: `The losing Primary Provider for the patient movement; i.e., the Primary Provider of the previous treating specialty chnage record.` TECHNICAL DESCR: `Source: Field #.08; file #405` `Internal entry number of NEW PERSON file (#200) derived from the PRIMARY CARE PHYSICIAN field (#.08) of the PATIENT MOVEMENT file (#405). The movement record is not the current treating specialty movement, but the one` `which corresponds to the previous treating specialty or provider change.` `A "2" is prefixed to this pointer value, if the pointer references file #200.`
24	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.`
25	PLACEHOLDER	1;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<4) X` LAST EDITED: `APR 19, 2016` HELP-PROMPT: `Answer must be 4-10 characters in length.` DESCRIPTION: `This field, previously known as DSS DEPT., 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.`
26	PLACEHOLDER	1;3	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.`
27	PLACEHOLDER	1;4	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.`
28	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.`
29	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.`
30	ATTENDING PHYSICIAN LOS	1;7	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 23, 1998` HELP-PROMPT: `Type a Number between 0 and 9999, 0 Decimal Digits.` DESCRIPTION: `The patient's length of stay with the losing attending physician.` TECHNICAL DESCR: `The ATTENDING PHYSICIAN LOS is determined by looping through both the treating specialty/provider change movements and the discharge movements of the PATIENT MOVEMENT file (#405).` `For each movement, a call is made to PREVATT^ECXTRT1. If the attending physician has changed since the last movement, or if the movement is a discharge, then the call returns the length of stay (LOS) to be associated with` `the attending physician of the previous movement. For the treating specialty/provider change movement associated with an admission, this field will be left blank. This field will also be blank if the attending physician` `for the current movement or the previous movement cannot be determined. Maximum value for this field is 9999.`
31	PRIMARY WARD PROVIDER LOS	1;8	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 23, 1998` HELP-PROMPT: `Type a Number between 0 and 9999, 0 Decimal Digits` DESCRIPTION: `The patient's length of stay with the losing primary ward provider.` TECHNICAL DESCR: `The PRIMARY WARD PROVIDER LOS is determined by looping through both the treating specialty/provider change movements and the discharge movements of the PATIENT MOVEMENT file (#405).` `For each movement, a call is made to PREVPRV^ECXTRT1. If the primary provider has changed since the last movement, or if the movement is a discharge, then the call returns the length of stay (LOS) to be associated with` `the primary provider of the previous movement. For the treating specialty/provider change movement associated with an admission, this field will be left blank. This field will also be blank if the primary provider for` `the current movement or the previous movement cannot be determined. Maximum value for this field is 9999.`
32	DOM,PRRTP AND SAARTP INDICATOR	1;9	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. CWT/TR; LAST EDITED: `MAR 08, 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.`
33	OBSERVATION PATIENT INDICATOR	1;10	SET	'NO' FOR NO; 'YES' FOR YES; LAST EDITED: `MAR 08, 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.`
34	ENCOUNTER NUMBER	1;11	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>18!($L(X)<1) X` LAST EDITED: `MAY 03, 2001` 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.`
35	PRODUCTION DIVISION CODE	1;12	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<3) X` LAST EDITED: `AUG 12, 2002` HELP-PROMPT: `Answer must be 3-6 characters in length.` DESCRIPTION: `Data represents the medical center division the work was performed in. This field corresponds to an entry in the INSTITUTION file (#4).` TECHNICAL DESCR: `Data comes from the FACILITY NUMBER field (#1) of the MEDICAL CENTER DIVISION file (#40.8).`
36	LOSING ATTENDING PHYSICIAN PC	1;13	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<1) X` LAST EDITED: `APR 05, 2005` HELP-PROMPT: `Answer must be 1-7 characters in length.` DESCRIPTION: `The VA Code of the Person Class of the Losing Attending Physician associated with this record. The VA Code is always of the form "V"_six numeric digits; exactly 7.` TECHNICAL DESCR: `NEW PERSON file #200, Field #5; file #8932.1. Active Person Class is determined by $$GET^XUA4A72(PERS,DATE), where PERS is the IEN from file #200.`
37	NEW PRIMARY WARD PROVIDER PC	1;14	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<1) X` LAST EDITED: `APR 05, 2005` HELP-PROMPT: `Answer must be 1-7 characters in length.` DESCRIPTION: `The VA Code of the Person Class of the New Primary Ward Provider associated with this record. The VA Code is always of the form "V"_six numeric digits; exactly 7.` TECHNICAL DESCR: `NEW PERSON file #200, Field #5; file #8932.1. Active Person Class is determined by $$GET^XUA4A72(PERS,DATE), where PERS is the IEN from file #200.`
38	NEW ATTENDING PHYSICIAN PC	1;15	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<1) X` LAST EDITED: `MAY 02, 2005` HELP-PROMPT: `Answer must be 1-7 characters in length.` DESCRIPTION: `The VA Code of the Person Class of the New Attending Provider associated with this record. The VA Code is always of the form "V"_six numeric digits; exactly 7.` TECHNICAL DESCR: `NEW PERSON file #200, Field #5; file #8932.1. Active Person Class is determined by $$GET^XUA4A72(PERS,DATE), where PERS is the IEN from file #200.`
39	LOSING PRIMARY WARD PROV PC	1;16	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<1) X` LAST EDITED: `APR 05, 2005` HELP-PROMPT: `Answer must be 1-7 characters in length.` DESCRIPTION: `The VA Code of the Person Class of the Losing Primary Ward Provider associated with this record. The VA Code is always of the form "V"_six numeric digits; exactly 7.` TECHNICAL DESCR: `NEW PERSON file #200, Field #5; file #8932.1. Active Person Class is determined by $$GET^XUA4A72(PERS,DATE), where PERS is the IEN from file #200.`
40	LOSING ATTENDING PHYSICIAN NPI	1;17	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 attending physician associated with the previous treating specialty change record. This field has a length of fifteen characters.` TECHNICAL DESCR: `LOSING ATTENDING PHYSICIAN NPI is a standard unique life-long identifier of the attending physician associated with the previous treating specialty change record in File (#405). The qualified identifier shall be retrieved` `via the supporting Kernel API:$$NPI^XUSNPI.`
41	LOSING PRIM WARD PROVIDER NPI	1;18	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 losing primary ward provider for the patient movement (i.e., the Primary Provider of the previous treating specialty change record). This field has a length of fifteen` `characters.` TECHNICAL DESCR: `LOSING PRIM WARD PROVIDER NPI is a standard unique life-long identifier of the losing primary ward provider for the patient movement (i.e., the Primary Provider of the previous treating specialty change record). The` `qualified identifier shall be retrieved via the supporting Kernel API:$$NPI^XUSNPI.`
42	NEW ATTENDING PHYSICIAN NPI	1;19	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 new attending physician associated with the current patient movement record in the PATIENT MOVEMENT File (#405). This field has a length of fifteen characters.` TECHNICAL DESCR: `NEW ATTENDING PHYSICIAN NPI is a standard unique life-long identifier of the new attending physician associated with the current patient movement record in File (#405). The qualified identifier shall be retrieved via the` `supporting Kernel API:$$NPI^XUSNPI.`
43	NEW PRIMARY WARD PROVIDER NPI	1;20	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 new primary ward provider associated with the current patient movement record in PATIENT MOVEMENT File (#405). This field has a length of fifteen characters.` TECHNICAL DESCR: `NEW PRIMARY WARD PROVIDER NPI is a standard unique life-long identifier of the new primary ward provider associated with the current movement record in File (#405). The qualified identifier shall be retrieved via the` `supporting Kernel API:$$NPI^XUSNPI.`
44	PATCAT	1;21	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.`
45	PLACEHOLD CERNER	2;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>284!($L(X)<1) X` `MAXIMUM LENGTH: 284` LAST EDITED: `APR 29, 2022` HELP-PROMPT: `Answer must be 1-284 characters in length.` DESCRIPTION: `Placeholder for Cerner fields. Reserved for EHRM conversion.` TECHNICAL DESCR: `This field is reserved for CERNER extract data.`
46	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).`
47	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: `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 TREATING SPECIALTY CHANGE EXTRACT file (#727.817), 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	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!, 9+1!, 10+1! , 11+1!, 13+1!, 14+1!, 15+1!, 16+1!, 17+1!, 19+1!, 20+1!, 21+1!, 22+1! , 23+1!, 24+1!, 25+1!, 26+1!, 27+1!, 28+1!, 29+1!, 30+1!, 31+1!, 34+1! , 35+1!, 36+1!, 37+1!, 38+1!, 39+1!, 40+1!, 41+1!, 42+1!, 43+1!, 45+1! , 46+1!
>> Y	1OT+1, 8OT+1, 10OT+1, 11OT+1, 19OT+1, 20OT+1
>> Y(0	1OT+1, 8OT+1, 10OT+1, 11OT+1, 19OT+1, 20OT+1

Customize PDF page

Package: DSS Extracts

Global: ^ECX(727.817

Information

Description

Directly Accessed By Routines, Total: 5

Pointer To FileMan Files, Total: 4

Fields, Total: 48

External References

Global Variables Directly Accessed

Local Variables

Legend:

Name	Field # of Occurrence
$$ECXDATEX^ECXUTL	8OT+1, 10OT+1, 11OT+1
$$ECXTIMEX^ECXUTL	19OT+1, 20OT+1
$$ECXYMX^ECXUTL	1OT+1