Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Fields | Found Entries | All

Print Page as PDF

Global: ^ACDCOMP

Package: Alcohol Chemical Dependency

Global: ^ACDCOMP

Information

FileMan FileNo	FileMan Filename	Package
9002170.1	CDMIS COMPONENT	Alcohol Chemical Dependency

Description

This file is a static table file that holds the components. Data lives in ^ACDCOMP. Data files point to this file. Pointers are transmitted in pointer (internal form). Table files are locked with a 'K X' on end of input transforms of all fields in file.

Directly Accessed By Routines, Total: 13

Package	Total	Routines
Alcohol Chemical Dependency	13	ACDCKIN ACDDE2 ACDFLAT2 ACDFLAT3 ACDFLAT4 ACDFUL2 ACDRR1CB ACDVID ACDWCINV ACDWIIF ACDWPD ACDWTDC ACDWVIS

Accessed By FileMan Db Calls, Total: 2

Package	Total	Routines
Alcohol Chemical Dependency	2	ACD4P1P ACDDE2

Pointed To By FileMan Files, Total: 7

Package	Total	FileMan Files
Alcohol Chemical Dependency	7	CDMIS PROGRAM(#9002173)[#9002173.21(.01)] CDMIS INIT/INFO/FU(#9002170)[15, 17, 101] CDMIS INTERVENTIONS(#9002173.5)[10, 11] CDMIS CLIENT CATEGORY(#9002172.8)[.03] CDMIS PREVENTION(#9002170.7)[1] CDMIS TRANS/DISC/CLOSE(#9002171)[12, 14] CDMIS VISIT(#9002172.1)[1]

Fields, Total: 6

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>14!($L(X)<2)!'(X'?1P.E) X K X` LAST EDITED: `FEB 25, 1998` HELP-PROMPT: `Answer must be 2-14 characters in length.` DELETE TEST: `.01,0)= I 1` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9002170.1^B` 1)= S ^ACDCOMP("B",$E(X,1,30),DA)="" 2)= K ^ACDCOMP("B",$E(X,1,30),DA)
1	ACRONYM	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:X[""""!($A(X)=45) X Q:'$D(X) K:$L(X)>5!($L(X)<2) X` LAST EDITED: `MAR 07, 1995` HELP-PROMPT: `Answer must be 2-5 characters in length.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9002170.1^C` 1)= S ^ACDCOMP("C",$E(X,1,30),DA)="" 2)= K ^ACDCOMP("C",$E(X,1,30),DA)
2	PROGRAM TYPE	0;3	SET	**********************REQUIRED FIELD********************** 'I' FOR INPATIENT; 'O' FOR OUTPATIENT; 'B' FOR BOTH; LAST EDITED: `OCT 13, 1993`
3	VALID COMPONENT	0;4	SET	**********************REQUIRED FIELD********************** 'Y' FOR YES; 'N' FOR NO; LAST EDITED: `OCT 13, 1993` HELP-PROMPT: `ENTER 'Y' IF THIS IS A VALID COMPONENT FOR ALL FORMS. ENTER 'N' IF USED FOR #CDMIS-3.1 ONLY.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
4	COMPONENT	0;5	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>36!($L(X)<3) X` LAST EDITED: `FEB 20, 1998` HELP-PROMPT: `ANSWER MUST BE 3-36 CHARACTERS IN LENGTH` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
5	CLASS	0;6	SET	'OP' FOR OUTPATIENT; 'IN' FOR INPATIENT; 'OT' FOR OTHER; LAST EDITED: `OCT 13, 1993` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Fields | Found Entries | All