Global: ^IBE(363.32

FileMan FileNo	FileMan Filename	Package
363.32	BILLING SPECIAL GROUPS	Integrated Billing

Directly Accessed By Routines, Total: 16

Package	Total	Routines
Integrated Billing	16	IB20P383 IBCRED IBCREE2 IBCREU1 IBCRLL IBCRLM IBCRLN IBCRON IBCRU6 IBYP520 IBYP667 IBYPPR IBYPPS IBYPSA IBYPSK IBYPSP1

Package	Total	Routines
Integrated Billing	2	IBCREE2 IBCRU1

Package	Total	FileMan Files
Integrated Billing	2	BILLING REVENUE CODE LINKS(#363.33)[.02] BILLING PROVIDER DISCOUNT(#363.34)[.02]

Package	Total	FileMan Files
Integrated Billing	2	CHARGE SET(#363.1)[#363.3211(.02)] BILLING RATE(#363.3)[#363.3211(.01)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `DEC 28, 1998` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: `This is the name of the billing group.` DELETE TEST: `363.33,0)= I +$P($G(^IBE(363.32,DA,0)),U,2)=1,+$O(^IBE(363.33,"C",DA,0)) W !,"Can not Delete a Group that has Revenue Code Links defined!",!` `363.34,0)= I +$P($G(^IBE(363.32,DA,0)),U,2)=2,+$O(^IBE(363.34,"C",DA,0)) W !,"Can not Delete a Group that has Provider Discounts defined!",!` CROSS-REFERENCE: `363.32^B` `1)= S ^IBE(363.32,"B",$E(X,1,30),DA)=""` `2)= K ^IBE(363.32,"B",$E(X,1,30),DA)`
.02	TYPE	0;2	SET	**********************REQUIRED FIELD********************** '1' FOR REVENUE CODE LINK; '2' FOR PROVIDER DISCOUNT; LAST EDITED: `APR 13, 1999` HELP-PROMPT: `Enter the type of this group.` DESCRIPTION: `This defines the type of data that will be associated with this group.`
11	BILLING RATE/SET	11;0	POINTER Multiple #363.3211	363.3211 LAST EDITED: `APR 28, 1999`

NAME

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: DEC 28, 1998
HELP-PROMPT: Answer must be 3-30 characters in length.
DESCRIPTION:
This is the name of the billing group.
DELETE TEST: 363.33,0)= I +$P($G(^IBE(363.32,DA,0)),U,2)=1,+$O(^IBE(363.33,"C",DA,0)) W !,"Can not Delete a Group that has Revenue Code Links defined!",!
363.34,0)= I +$P($G(^IBE(363.32,DA,0)),U,2)=2,+$O(^IBE(363.34,"C",DA,0)) W !,"Can not Delete a Group that has Provider Discounts defined!",!
CROSS-REFERENCE: 363.32^B
1)= S ^IBE(363.32,"B",$E(X,1,30),DA)=""
2)= K ^IBE(363.32,"B",$E(X,1,30),DA)

TYPE

0;2

SET

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

LAST EDITED: APR 13, 1999
HELP-PROMPT: Enter the type of this group.
DESCRIPTION:
This defines the type of data that will be associated with this group.

BILLING RATE/SET

11;0

POINTER Multiple #363.3211