Global: ^AUTTINTY

FileMan FileNo	FileMan Filename	Package
9999999.181	INSURER TYPE	Utility Tables

FileMan FileNo

FileMan Filename

Package

9999999.181

INSURER TYPE

File created to support replacement of the INSURER (#9999999.18) file's pre-existing TYPE OF INSURER field (#.21) with the newer INSURER TYPE field (#.211). The older field was a set of codes, which FileMan limits to a maximum of 16 codes/values. This limit was reached in 2010, when developer-requested expansion of the TYPE OF INSURER code set required specification of up to 18 codes. Required modifications to this codeset will be released by the RPMS DBA. HISTORY...: Deployed in AUT*98.1*24

Package	Total	Routines
IHS Accounts Receivable	5	BARDYSV1 BARDYSVZ BARRERL BARUFRP3 BARVPM
IHS Patient Registration	1	AGUTL
Table Maintenance	1	AUMUPD2
Utility Tables	1	AUTINS

Package	Total	Routines
Third Party Billing	68	ABMAPASS ABMDBADD ABMDE0X1 ABMDE2 ABMDE2A ABMDE2E ABMDE2X ABMDE2X1 ABMDE2X3 ABMDE4X ABMDEBIL ABMDES3 ABMDESMH ABMDEVAR ABMDF12A ABMDF1E ABMDF27A ABMDF27C ABMDF29B ABMDF2A ABMDF2D ABMDF34A ABMDF34B ABMDF35A ABMDF35C ABMDFUTL ABMDLCK2 ABMDRCHK ABMDREEX ABMDTIN1 ABMDTINS ABMDVST ABME5CLM ABME5L2 ABMECS ABMEEPRV ABMEF10 ABMEF32 ABMEHGRV ABMERGRV ABMERINS ABMERUTL ABMESTAT ABMINSIT ABMM2PV8 ABMM2PVP ABMMUFC1 ABMMUFC2 ABMMUFC3 ABMMUFC4 ABMMUFC6 ABMPPADJ ABMPSAPI ABMPTPOP ABMPTSMT ABMRDNY1 ABMRDNY2 ABMRMCRD ABMRSCIN ABMTPYMT ABMUBLST ABMUCANV ABMUCASH ABMUCUTL ABMUITIN ABMURCON ABMUTLP ABMUTLP2
IHS Accounts Receivable	2	BARDMRE BARRPRAC
Table Maintenance	1	AUMUPD2
Utility Tables	1	AUT98P25

Package	Total	FileMan Files
Utility Tables	1	INSURER(#9999999.18)[.211]

Field # Name Loc Type Details

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` HELP-PROMPT: `NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION` CROSS-REFERENCE: `9999999.181^B` 1)= S ^AUTTINTY("B",$E(X,1,30),DA)="" 2)= K ^AUTTINTY("B",$E(X,1,30),DA)
1	CODE	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>4!($L(X)<1) X` LAST EDITED: `JUL 30, 2010` HELP-PROMPT: `Answer must be 1-4 characters in length.` CROSS-REFERENCE: `9999999.181^C` 1)= S ^AUTTINTY("C",$E(X,1,30),DA)="" 2)= K ^AUTTINTY("C",$E(X,1,30),DA)

NAME

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
HELP-PROMPT: NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION

CROSS-REFERENCE: 9999999.181^B

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

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

CODE

0;2

FREE TEXT

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

CROSS-REFERENCE: 9999999.181^C

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

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

NAME: 3P LIABILITY	NAME: CHAMPUS	NAME: CHIP (KIDSCARE)	NAME: FPL 133 PERCENT	NAME: FRATERNAL ORG	NAME: GUARANTOR	NAME: HMO	NAME: INDIAN PATIENT
NAME: MCR MANAGED CARE	NAME: MCR PART C	NAME: MCR PART D	NAME: MEDICAID FI	NAME: MEDICARE FI	NAME: MEDICARE HMO	NAME: MEDICARE SUPPL	NAME: NON-BEN (NON-INDIAN)
NAME: PRIVATE	NAME: STATE EXCHANGE PLAN	NAME: TRIBAL SELF INSURED	NAME: VETERANS ADMINISTRATION	NAME: WORKMEN'S COMP

Information