Global: ^FSCD("WEB"

Information

FileMan FileNo	FileMan Filename	Package
7100.7	NOIS WEB	National Online Information Sharing

Package	Total	FileMan Files
Kernel	1	NEW PERSON(#200)[2, 4]
National Online Information Sharing	1	NOIS PACKAGE(#7105.5)[1]

Field #	Name	Loc	Type	Details
.01	PID	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<2)!'(X'?1P.E) X` LAST EDITED: `JUN 17, 1998` HELP-PROMPT: `Answer must be 2-30 characters in length.` CROSS-REFERENCE: `7100.7^B` `1)= S ^FSCD("WEB","B",$E(X,1,30),DA)=""` `2)= K ^FSCD("WEB","B",$E(X,1,30),DA)`
1	PACKAGE	0;2	POINTER TO NOIS PACKAGE FILE (#7105.5)	NOIS PACKAGE(#7105.5) LAST EDITED: `JUN 17, 1998` CROSS-REFERENCE: `7100.7^C` `1)= S ^FSCD("WEB","C",$E(X,1,30),DA)=""` `2)= K ^FSCD("WEB","C",$E(X,1,30),DA)`
2	ENTERED BY	0;3	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `JUN 17, 1998`
3	ENTRY TIME	0;4	DATE	INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUN 17, 1998`
4	LAST EDITED BY	0;5	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `JUN 17, 1998`
5	LAST EDIT TIME	0;6	DATE	INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUN 17, 1998`
6	TITLE	1;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<3) X` LAST EDITED: `JUN 17, 1998` HELP-PROMPT: `Answer must be 3-245 characters in length.`
7	PROBLEM	2;0	WORD-PROCESSING #7100.77	LAST EDITED: `JUN 17, 1998`
8	SOLUTION	3;0	WORD-PROCESSING #7100.78	LAST EDITED: `JUN 17, 1998`