Sub-Field: 9999999.1813

Parent File	Name	Number	Package
INSURER(#9999999.18)	MEDICAID FI	9999999.1813	Utility Tables

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	MEDICAID STATE	0;1	POINTER TO STATE FILE (#5)	STATE(#5) INPUT TRANSFORM: `S DIC("S")="I $P(^AUTNINS(DA,0),U)=""MEDICAID""" D ^DIC K DIC S DIC=DIE,(X,DINUM)=+Y K:Y<0 X` LAST EDITED: `JUL 19, 1990` SCREEN: `S DIC("S")="I $P(^AUTNINS(DA,0),U)=""MEDICAID"""` EXPLANATION: `CAN ONLY BE SET IF INSURER IS MEDICAID` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9999999.1813^B` 1)= S ^AUTNINS(DA(1),13,"B",$E(X,1,30),DA)="" 2)= K ^AUTNINS(DA(1),13,"B",$E(X,1,30),DA)
.02	MEDICAID FI	0;2	POINTER TO INSURER FILE (#9999999.18)	INSURER(#9999999.18) LAST EDITED: `AUG 19, 1990` CROSS-REFERENCE: `9999999.1813^C` 1)= S ^AUTNINS(DA(1),13,"C",$E(X,1,30),DA)="" 2)= K ^AUTNINS(DA(1),13,"C",$E(X,1,30),DA)
.03	WORKMEN'S COMP FI	0;3	POINTER TO INSURER FILE (#9999999.18)	INSURER(#9999999.18) LAST EDITED: `JUL 11, 1991`

MEDICAID STATE

0;1

POINTER TO STATE FILE (#5)

INPUT TRANSFORM: S DIC("S")="I $P(^AUTNINS(DA,0),U)=""MEDICAID""" D ^DIC K DIC S DIC=DIE,(X,DINUM)=+Y K:Y<0 X
LAST EDITED: JUL 19, 1990
SCREEN: S DIC("S")="I $P(^AUTNINS(DA,0),U)=""MEDICAID"""
EXPLANATION: CAN ONLY BE SET IF INSURER IS MEDICAID
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

CROSS-REFERENCE: 9999999.1813^B

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

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

MEDICAID FI

0;2

POINTER TO INSURER FILE (#9999999.18)

CROSS-REFERENCE: 9999999.1813^C

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

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

WORKMEN'S COMP FI

0;3

POINTER TO INSURER FILE (#9999999.18)