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 | Pointer To FileMan Files | Fields | All

Print Page as PDF

Global: ^AGEVH

Package: IHS Patient Registration

Global: ^AGEVH

Information

FileMan FileNo	FileMan Filename	Package
9009066	AGEV INSURANCE ELIGIBILITY HOLDING	IHS Patient Registration

Description

DATA DICTIONARY...: This dd is owned by PtReg (AG) ENTRIES IN THIS FILE...: Entries are inbound 271 replies, which must be displayed to User and processed according to User's directions. Once processed, an entry is deleted from this file. HISTORY...: Deployed in AG*6*17.

Directly Accessed By Routines, Total: 5

Accessed By FileMan Db Calls, Total: 2

Pointer To FileMan Files, Total: 9

Fields, Total: 19

Field #	Name	Loc	Type	Details
.01	PATIENT NAME	0;1	POINTER TO PATIENT FILE (#9000001)	**********************REQUIRED FIELD********************** PATIENT(#9000001) LAST EDITED: `APR 20, 2001` CROSS-REFERENCE: `9009066^B` 1)= S ^AGEVH("B",$E(X,1,30),DA)="" 2)= K ^AGEVH("B",$E(X,1,30),DA)
.02	INSURER	0;2	POINTER TO INSURER FILE (#9999999.18)	INSURER(#9999999.18) LAST EDITED: `APR 24, 2001` CROSS-REFERENCE: `9009066^C` 1)= S ^AGEVH("C",$E(X,1,30),DA)="" 2)= K ^AGEVH("C",$E(X,1,30),DA)
.03	DATE ADDED TO FILE	0;3	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAY 24, 2001`
1	POLICY HOLDER NAME	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>35!($L(X)<1) X` LAST EDITED: `APR 20, 2001` HELP-PROMPT: `Answer must be 1-35 characters in length.`
11	POLICY HOLDER DOB	1;10	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 08, 2001` HELP-PROMPT: `Please enter the Policy Holder's date of birth` DESCRIPTION: This field stores the policy holder's date of birth.
12	POLICY HOLDER IEN	1;2	POINTER TO POLICY HOLDER FILE (#9000003.1)	POLICY HOLDER(#9000003.1) LAST EDITED: `APR 20, 2001`
13	POLICY NUMBER	1;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `APR 20, 2001` HELP-PROMPT: `Answer must be 1-15 characters in length.`
14	POLICY HOLDER GROUP	1;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `APR 20, 2001` HELP-PROMPT: `Answer must be 1-30 characters in length.`
15	POLICY HOLDER SEX	1;5	SET	'M' FOR MALE; 'F' FOR FEMALE; LAST EDITED: `APR 20, 2001`
16	POLICY HOLDER STREET	1;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAY 21, 2001` HELP-PROMPT: `Answer must be 1-30 characters in length.`
17	POLICY HOLDER CITY	1;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `APR 20, 2001` HELP-PROMPT: `Answer must be 1-20 characters in length.`
18	POLICY HOLDER STATE	1;8	POINTER TO STATE FILE (#5)	STATE(#5) LAST EDITED: `APR 20, 2001`
19	POLICY HOLDER ZIP	1;9	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `APR 20, 2001` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits`
20	SUBSCRIBER LEVEL REQ VAL	2;0	POINTER Multiple #9009066.01	9009066.01
21	SUBSCRIBER LEVEL ELG/BEN INFO	3;0	POINTER Multiple #9009066.021	9009066.021
22	SUBSCRIBER LEV DTP	2.5;0	POINTER Multiple #9009066.022	9009066.022
30	DEPENDENT LEVEL REQ VAL	4;0	POINTER Multiple #9009066.02	9009066.02
31	DEPENDENT LEVEL ELG/BEN INFO	5;0	POINTER Multiple #9009066.031	9009066.031
32	DEPENDENT LEVEL DTP	4.5;0	POINTER Multiple #9009066.032	9009066.032

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | All