Global: ^ECX(729

Information

FileMan FileNo	FileMan Filename	Package
729	DSS PRODUCTION UNIT	DSS Extracts

Description

This file provides codes associated with DSS production units. These codes are used when the DSS Site Manager develops DSS Department codes to be associated with various medical center entities such as wards. This file is intended for read only purposes. It must not be modified in any way by the local site. Modifications to this file will be distributed nationally in accordance with guidance provided by the DSS Bedford Technical Services Office.

Directly Accessed By Routines, Total: 4

Package	Total	Routines
DSS Extracts	3	ECXDSSD ^ECX(729 ECX319PT

Accessed By FileMan Db Calls, Total: 3

Package	Total	Routines
DSS Extracts	3	ECX319PT ECX342P ECXDSSD

Fields, Total: 3

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DSS PRODUCTION UNIT CODE	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K X` LAST EDITED: `JUL 02, 1998` HELP-PROMPT: `Answer must be 2 characters in length.` DESCRIPTION: `A unique two-character code for the DSS Production Unit. DSS Production Units and associated codes are provided by the Bedford Technical Services Office.` `The two characters may consist of any numeric digit or any uppercase alphabetic character.` `DELETE AUTHORITY: ^` `WRITE AUTHORITY: ^` CROSS-REFERENCE: `729^B` `1)= S ^ECX(729,"B",$E(X,1,30),DA)=""` `2)= K ^ECX(729,"B",$E(X,1,30),DA)`
1	LONG DESCRIPTION	0;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>80!($L(X)<3) X` LAST EDITED: `JUN 30, 1998` HELP-PROMPT: `Answer must be 3-80 characters in length.` DESCRIPTION: `A descriptive phrase which defines the DSS Production Unit.` `As with all information associated with DSS Production Units, this is provided by the Bedford Technical Services Office.` `DELETE AUTHORITY: ^` `WRITE AUTHORITY: ^`
2	SHORT DESCRIPTION	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<3) X` LAST EDITED: `JUN 30, 1998` HELP-PROMPT: `Answer must be 3-10 characters in length.` DESCRIPTION: `An acronym-like character string which identifies the DSS Production Unit.` `The string may be no more than 10 characters in length. It may contain uppercase letters, numeric digits, and certain special characters (e.g., "/", "-", and ).` `DELETE AUTHORITY: ^` `WRITE AUTHORITY: ^`

.01

DSS PRODUCTION UNIT CODE

0;1

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K X
LAST EDITED: JUL 02, 1998
HELP-PROMPT: Answer must be 2 characters in length.
DESCRIPTION: A unique two-character code for the DSS Production Unit. DSS Production Units and associated codes are provided by the Bedford Technical Services Office.
The two characters may consist of any numeric digit or any uppercase alphabetic character.
DELETE AUTHORITY: ^
WRITE AUTHORITY: ^
CROSS-REFERENCE: 729^B
1)= S ^ECX(729,"B",$E(X,1,30),DA)=""
2)= K ^ECX(729,"B",$E(X,1,30),DA)

LONG DESCRIPTION

0;3

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:$L(X)>80!($L(X)<3) X
LAST EDITED: JUN 30, 1998
HELP-PROMPT: Answer must be 3-80 characters in length.
DESCRIPTION: A descriptive phrase which defines the DSS Production Unit.
As with all information associated with DSS Production Units, this is provided by the Bedford Technical Services Office.
DELETE AUTHORITY: ^
WRITE AUTHORITY: ^

SHORT DESCRIPTION

0;4

FREE TEXT

INPUT TRANSFORM: K:$L(X)>10!($L(X)<3) X
LAST EDITED: JUN 30, 1998
HELP-PROMPT: Answer must be 3-10 characters in length.
DESCRIPTION: An acronym-like character string which identifies the DSS Production Unit.
The string may be no more than 10 characters in length. It may contain uppercase letters, numeric digits, and certain special characters (e.g., "/", "-", and ).
DELETE AUTHORITY: ^
WRITE AUTHORITY: ^

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	\|sort
^DIC(40.7 - [#40.7]	\|dd728.44
^ECX(727 - [#727]	\|sort
^ECX(727.1 - [#727.1]	\|dd727.1*!
^ECX(727.2 - [#727.2]	\|dd727.2!, \|dd727.21!, \|dd727.211!, \|dd727.22!, \|dd727.23!, \|dd727.24!, \|sort
^ECX(727.29 - [#727.29]	\|dd727.29*!
^ECX(727.3 - [#727.3]	\|dd727.3*!
^ECX(727.4 - [#727.4]	\|dd727.4*!
^ECX(727.5 - [#727.5]	\|dd727.5!, \|dd727.51!
^ECX(727.7 - [#727.7]	\|dd727.7*!
^ECX(727.802 - [#727.802]	\|dd727.802*!
^ECX(727.804 - [#727.804]	\|dd727.804*!
^ECX(727.805 - [#727.805]	\|dd727.805*!
^ECX(727.806 - [#727.806]	\|dd727.806*!
^ECX(727.808 - [#727.808]	\|dd727.808*!
^ECX(727.809 - [#727.809]	\|dd727.809*!
^ECX(727.81 - [#727.81]	\|dd727.81*!
^ECX(727.811 - [#727.811]	\|dd727.811*!
^ECX(727.812 - [#727.812]	\|dd727.812*!
^ECX(727.813 - [#727.813]	\|dd727.813*!
^ECX(727.814 - [#727.814]	\|dd727.814*!
^ECX(727.815 - [#727.815]	\|dd727.815*!
^ECX(727.816 - [#727.816]	\|dd727.816*!
^ECX(727.817 - [#727.817]	\|dd727.817*!
^ECX(727.818 - [#727.818]	\|dd727.818*!
^ECX(727.819 - [#727.819]	\|dd727.819*!
^ECX(727.82 - [#727.82]	\|dd727.82*!
^ECX(727.821 - [#727.821]	\|dd727.821*!
^ECX(727.822 - [#727.822]	\|dd727.822*!
^ECX(727.823 - [#727.823]	\|dd727.823*!
^ECX(727.824 - [#727.824]	\|dd727.824*!
^ECX(727.825 - [#727.825]	\|dd727.825*!
^ECX(727.826 - [#727.826]	\|dd727.826*!
^ECX(727.827 - [#727.827]	\|dd727.827*!
^ECX(727.829 - [#727.829]	\|dd727.829*!
^ECX(727.831 - [#727.831]	\|dd727.831*!
^ECX(727.832 - [#727.832]	\|dd727.832*!
^ECX(727.833 - [#727.833]	\|dd727.833*!
^ECX(728 - [#728]	\|dd728!, \|dd728.059!, \|dd728.068*!
^ECX(728.113 - [#728.113]	\|dd728.113*!
^ECX(728.44 - [#728.44]	\|dd728.44*!
^ECX(728.441 - [#728.441]	\|dd728.441*!, \|sort
^ECX(728.442 - [#728.442]	\|dd728.442*!
^ECX(728.45 - [#728.45]	\|dd728.45!, \|dd728.451!
^ECX(728.46 - [#728.46]	\|dd728.46*!
^ECX(728.506 - [#728.506]	\|dd728.506!, \|dd728.5061!
^ECX(728.904 - [#728.904]	\|dd728.904*!
^ECX(729 - [#729]	.01(XREF 1S), .01(XREF 1K), \|dd729*!
^RMPR(660 - [#660]	\|sort

Naked Globals

Name	Field # of Occurrence
^("QUEUE"	\|dd728
^(0	ID1+1, \|dd727.825, \|dd728.44, \|dd728.442, \|dd729, \|sort
^(2	\|sort

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	\|dd727.51, \|dd727.812, \|dd728, \|dd728.059, \|dd728.113, \|dd728.44, \|dd728.441, \|dd728.904
>> D	\|dd728.44*
>> D(0	\|sort*
>> D0	\|sort
>> D1	\|sort
>> D2	\|sort
>> DA	.01(XREF 1S), .01(XREF 1K), \|dd727.1, \|dd727.2, \|dd727.21, \|dd727.211, \|dd727.22, \|dd727.23, \|dd727.24, \|dd727.29 , \|dd727.3, \|dd727.4, \|dd727.5, \|dd727.51, \|dd727.7, \|dd727.802, \|dd727.804, \|dd727.805, \|dd727.806, \|dd727.808 , \|dd727.809, \|dd727.81, \|dd727.811, \|dd727.812, \|dd727.813, \|dd727.814, \|dd727.815, \|dd727.816, \|dd727.817, \|dd727.818 , \|dd727.819, \|dd727.82, \|dd727.821, \|dd727.822, \|dd727.823, \|dd727.824, \|dd727.825, \|dd727.826, \|dd727.827, \|dd727.829 , \|dd727.831, \|dd727.832, \|dd727.833, \|dd728, \|dd728.059, \|dd728.068, \|dd728.113, \|dd728.44, \|dd728.441, \|dd728.442 , \|dd728.45, \|dd728.451, \|dd728.46, \|dd728.506, \|dd728.5061, \|dd728.904, \|dd729
>> DA(1	\|dd727.21, \|dd727.211, \|dd727.22, \|dd727.23, \|dd727.24, \|dd727.51, \|dd728.059, \|dd728.068, \|dd728.451, \|dd728.5061
>> DA(2	\|dd727.211
DIC	\|dd727.211!, \|dd727.815!, \|dd727.825!, \|dd728.44!~
DIC("S"	\|dd727.211, \|dd727.815, \|dd727.825, \|dd728.44
DIC(0	\|dd728.44*, \|dd728.441
>> DIE	\|dd727.211, \|dd727.815, \|dd727.825, \|dd728.44
>> DINUM	\|dd727.22, \|dd727.23, \|dd727.24, \|dd727.802, \|dd727.804, \|dd727.805, \|dd727.806, \|dd727.808, \|dd727.809, \|dd727.81 , \|dd727.811, \|dd727.812, \|dd727.813, \|dd727.814, \|dd727.815, \|dd727.816, \|dd727.817, \|dd727.818, \|dd727.819, \|dd727.82 , \|dd727.821, \|dd727.822, \|dd727.823, \|dd727.824, \|dd727.825, \|dd727.826, \|dd727.827, \|dd727.829, \|dd727.831, \|dd727.832 , \|dd727.833, \|dd728.113, \|dd728.506, \|dd728.904
>> DISX(1	\|sort*
>> DISX(2	\|sort*
>> DISX(3	\|sort*
DT	\|dd728.44
>> ECX4CHAR	\|dd728.441
>> ECXED	\|prnt
ECXSC	\|dd728.44*~
>> ECXSD	\|prnt
FLAG	\|opt*!
>> I(0	\|sort*
>> LN	\|prnt*
U	ID1+1, \|dd728.44, \|dd728.442, \|dd729, \|sort
X	.01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 2+1!, \|dd727.1!, \|dd727.2!, \|dd727.21!, \|dd727.211!, \|dd727.22 , \|dd727.23, \|dd727.24, \|dd727.29!, \|dd727.3!, \|dd727.4!, \|dd727.5!, \|dd727.51!, \|dd727.7!, \|dd727.802!, \|dd727.802! , \|dd727.804!, \|dd727.804!, \|dd727.805!, \|dd727.806!, \|dd727.806!, \|dd727.808!, \|dd727.809!, \|dd727.809!, \|dd727.81!, \|dd727.81! , \|dd727.811!, \|dd727.811!, \|dd727.811!, \|dd727.812!, \|dd727.812!, \|dd727.813!, \|dd727.813!, \|dd727.814!, \|dd727.814!, \|dd727.815! , \|dd727.815!, \|dd727.815!, \|dd727.816!, \|dd727.817!, \|dd727.817!, \|dd727.818!, \|dd727.819!, \|dd727.819!, \|dd727.82!, \|dd727.821! , \|dd727.822!, \|dd727.823!, \|dd727.824!, \|dd727.825!, \|dd727.825!, \|dd727.825!, \|dd727.826!, \|dd727.826!, \|dd727.827!, \|dd727.827! , \|dd727.827!, \|dd727.827!, \|dd727.829!, \|dd727.831!, \|dd727.832!, \|dd727.832!, \|dd727.833!, \|dd727.833!, \|dd728!, \|dd728! , \|dd728.059!, \|dd728.068!, \|dd728.113!, \|dd728.44!~, \|dd728.441!, \|dd728.442!, \|dd728.45, \|dd728.451!, \|dd728.46, \|dd728.506! , \|dd728.5061!, \|dd728.904!, \|dd729!, \|sort
X(1	\|dd728.904
X(2	\|dd728.904
>> Y	\|dd727.211, \|dd727.51, \|dd727.802, \|dd727.804, \|dd727.805, \|dd727.806, \|dd727.808, \|dd727.809, \|dd727.81, \|dd727.811 , \|dd727.812, \|dd727.813, \|dd727.814, \|dd727.815, \|dd727.816, \|dd727.817, \|dd727.819, \|dd727.82, \|dd727.821, \|dd727.822* , \|dd727.823, \|dd727.824, \|dd727.825, \|dd727.826, \|dd727.827, \|dd727.829, \|dd727.833, \|dd728, \|dd728.059, \|dd728.113 , \|dd728.44, \|dd728.441, \|dd728.904
>> Y(0	\|dd727.802, \|dd727.804, \|dd727.805, \|dd727.806, \|dd727.808, \|dd727.809, \|dd727.81, \|dd727.811, \|dd727.813, \|dd727.814 , \|dd727.815, \|dd727.816, \|dd727.817, \|dd727.819, \|dd727.82, \|dd727.821, \|dd727.822, \|dd727.823, \|dd727.824, \|dd727.825 , \|dd727.826, \|dd727.827, \|dd727.829, \|dd727.833, \|dd728.44*
>> Y(1	\|sort*
ZD	\|dd728.44*!

Customize PDF page

Package: DSS Extracts

Global: ^ECX(729

Legend: