Sub-Field: 60.2

Parent File	Name	Number	Package
60.01	FOREIGN COMPUTER SYSTEM	60.2	Lab Service

Details

Field #	Name	Loc	Type	Details
.01	FOREIGN COMPUTER SYSTEM	0;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<2) X` LAST EDITED: `NOV 23, 1993` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: Reserved for future use. Do not use. CROSS-REFERENCE: `60.2^B` 1)= S ^LAB(60,DA(2),1,DA(1),4,"B",$E(X,1,30),DA)="" 2)= K ^LAB(60,DA(2),1,DA(1),4,"B",$E(X,1,30),DA) CROSS-REFERENCE: `60.01^AC^MUMPS` 1)= S ^LAB(60,DA(2),1,"AC",$E(X,1,30),DA(1),DA)="" 2)= K ^LAB(60,DA(2),1,"AC",$E(X,1,30),DA(1),DA) To allow look up of foreign computer symbols for this test and sample.
1	FOREIGN ITEM #	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<2) X` LAST EDITED: `NOV 23, 1993` HELP-PROMPT: `Answer must be 2-30 characters in length.` DESCRIPTION: RESERVED FOR FUTURE USE
2	INTEGER	0;3	SET	LAST EDITED: `NOV 23, 1993` HELP-PROMPT: `ENTER 'YES' IF THE FOREIGN COMPUTER EXPECTS THIS VALUE TO BE AN INTEGER.` DESCRIPTION: RESERVED FOR FUTURE USE
3	UNIT CONVERSION	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `NOV 23, 1993` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: RESERVED FOR FUTURE USE EXECUTABLE HELP: `Q`