Global: ^DIC(23

Information

FileMan FileNo	FileMan Filename	Package
23	BRANCH OF SERVICE	Registration

Package	Total	Routines
Registration	11	DG1010P4 DG53P451 DGENUPL3 DGMSRPT1 DGROHLR1 DGRP6 DGRPMS VAFHLZM1 ^DIC(23 DGRPC3 DGRPTL2
Nursing Service	2	NURAAGS1 NURSAUTL
Patient Care Component	2	APCHS1 APCHS1B
Health Summary Components	1	BHSDEM
Patient Chart	1	BPCRC8

Package	Total	Routines
Nursing Service	1	NURSAGP0
Registration	1	DG53P451

Package	Total	FileMan Files
Nursing Service	1	NURS STAFF(#210)[#210.06(1)]
Registration	1	VA PATIENT(#2)[.325, .3291, .3296, #2.312(3.02)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<2) X` LAST EDITED: `JUL 19, 1988` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DELETE TEST: `.01,0)= I 1` CROSS-REFERENCE: `23^B` 1)= S ^DIC(23,"B",$E(X,1,30),DA)="" 2)= K ^DIC(23,"B",$E(X,1,30),DA)
1	ABBREVIATION	0;2	FREE TEXT	INPUT TRANSFORM: `K:X[""""!(X'?.ANP)!(X<0) X I $D(X) K:$L(X)>10!($L(X)<1) X` HELP-PROMPT: `ANSWER MUST BE 1-10 CHARACTERS IN LENGTH` CROSS-REFERENCE: `23^C` 1)= S ^DIC(23,"C",$E(X,1,30),DA)="" 2)= K ^DIC(23,"C",$E(X,1,30),DA)

NAME

0;1

FREE TEXT

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

CROSS-REFERENCE: 23^B

1)= S ^DIC(23,"B",$E(X,1,30),DA)=""

2)= K ^DIC(23,"B",$E(X,1,30),DA)

ABBREVIATION

0;2

FREE TEXT

CROSS-REFERENCE: 23^C

1)= S ^DIC(23,"C",$E(X,1,30),DA)=""

2)= K ^DIC(23,"C",$E(X,1,30),DA)

NAME: AIR FORCE	NAME: ARMY	NAME: B.E.C.	NAME: COAST GUARD	NAME: MARINE CORPS	NAME: MERCHANT SEAMAN	NAME: NAVY	NAME: NOAA
NAME: OTHER	NAME: USPHS

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #789	MENTAL HEALTH
ICR #1385	NURSING SERVICE ACCOUNTS RECEIVABLE	NAME (.01). Access: Direct Global Read & w/Fileman

Name	Line Occurrences (* Changed, ! Killed)
^DIC(23 - [#23]	.01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)

Name	Field # of Occurrence
>> DA	.01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)
X	.01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 1(XREF 1S), 1(XREF 1K)