Global: ^AUTTVTYP

Information

FileMan FileNo	FileMan Filename	Package
9999999.34	VENDOR TYPE	Utility Tables

Changes to this data dictionary should be coordinated thru the IHS DBA. Entries in this file reflect values in the IHS Standard Code Book, Section XX, Type of Provider. Local additions or modifications should not be made. Monthly updates (if required) are provided by the IHS DBA thru the patch module.

Package	Total	Routines
Contract Health Management Information System	10	ACHSGAO ACHSPAZ ACHSTX4 ACHSTX6 ACHSTX66 ACHSTX7 ACHSTX77 ACHSTX7X ACHSUDF ACHSVDV
Referred Care Information System	1	BMCVDV

Package	Total	FileMan Files
Contract Health Management Information System	1	CHS ALTERNATE RESOURCES(#9002072.1)[6]
Utility Tables	1	VENDOR(#9999999.11)[1103]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	CODE	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>2!($L(X)<2)!'(X?2N)!(X'?.ANP) X` HELP-PROMPT: `ANSWER MUST BE 2 CHARACTERS IN LENGTH` DELETE TEST: `.01,0)= I 1` CROSS-REFERENCE: `9999999.34^B` 1)= S ^AUTTVTYP("B",$E(X,1,30),DA)="" 2)= K ^AUTTVTYP("B",$E(X,1,30),DA)
.02	NAME	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3) X` LAST EDITED: `MAR 12, 1987` HELP-PROMPT: `ANSWER MUST BE 3-30 CHARACTERS IN LENGTH` CROSS-REFERENCE: `9999999.34^C` 1)= S ^AUTTVTYP("C",$E(X,1,30),DA)="" 2)= K ^AUTTVTYP("C",$E(X,1,30),DA)

CODE

0;1

FREE TEXT

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

CROSS-REFERENCE: 9999999.34^B

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

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

NAME

0;2

FREE TEXT

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

CROSS-REFERENCE: 9999999.34^C

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

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