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

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

Print Page as PDF

Global: ^FH(113.2

Package: Dietetics

Global: ^FH(113.2

Information

FileMan FileNo	FileMan Filename	Package
113.2	FH VENDOR	Dietetics

Description

This file contains basic data on the various vendors supplying ingredients to the Dietetic Service. It contains address, telephone numbers and name of contacts.

Accessed By FileMan Db Calls, Total: 1

Package	Total	Routines
Dietetics	1	FHPRI

Pointed To By FileMan Files, Total: 1

Package	Total	FileMan Files
Dietetics	1	INGREDIENT(#113)[3]

Fields, Total: 8

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X` LAST EDITED: `MAR 12, 1993` HELP-PROMPT: `NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION` DESCRIPTION: `This is the name of a vendor from whom ingredients are ordered.` DELETE TEST: `1,0)= I 1 D EN^DDIOL("Cannot delete. Inactivate instead.","","?3")` CROSS-REFERENCE: `113.2^B` `1)= S ^FH(113.2,"B",$E(X,1,30),DA)=""` `2)= K ^FH(113.2,"B",$E(X,1,30),DA)` `This is the normal B cross-reference of the NAME field.`
1	1ST ADDRESS LINE	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `JUN 06, 1985` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This field contains the first address line following the vendor's name.`
2	2ND ADDRESS LINE	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `JUN 06, 1985` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This field may contain a second address line if necessary.`
3	3RD ADDRESS LINE	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `JUN 06, 1985` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This field may contain a third address line if necessary.`
4	CITY, STATE ZIP	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `JUN 06, 1985` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This field contains the last address line showing city, state and zip code.`
6	CONTACT	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `JUN 06, 1985` HELP-PROMPT: `ANSWER MUST BE 1-30 CHARACTERS IN LENGTH` DESCRIPTION: `This is the name of person who is the usual contact person with the vendor.`
7	TELEPHONE	0;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `JUN 06, 1985` HELP-PROMPT: `ANSWER MUST BE 1-20 CHARACTERS IN LENGTH` DESCRIPTION: `This field contains the telephone number of the vendor contact person.`
99	INACTIVE?	I;1	SET	'Y' FOR YES; 'N' FOR NO; LAST EDITED: `FEB 23, 2000` DESCRIPTION: `This field, if answered YES, will prohibit further selection of this entry.` CROSS-REFERENCE: `113.2^AC^MUMPS` `1)= K:X'="Y" ^FH(113.2,DA,"I")` `2)= K ^FH(113.2,DA,"I")` `This cross-reference is used to create an 'I' node for inactive entries.`

Found Entries, Total: 1

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