Global: ^IBE(363.32

FileMan FileNo	FileMan Filename	Package
363.32	BILLING SPECIAL GROUPS	Integrated Billing

Directly Accessed By Routines, Total: 20

Package	Total	Routines
Integrated Billing	20	BILLING RATE/SET IB20P383 IBCRED IBCREE2 IBCREU1 IBCRLL IBCRLM IBCRLN IBCRON IBCRU6 IBYP520 IBYP667 IBYPPR IBYPPS IBYPSA IBYPSK ^IBE(363.32 ^IBE(363.33 ^IBE(399.6 IBYPSP1

Accessed By FileMan Db Calls, Total: 2

Package	Total	Routines
Integrated Billing	2	IBCREE2 IBCRU1

Pointed To By FileMan Files, Total: 2

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

Pointer To FileMan Files, Total: 2

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

Fields, Total: 3

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`

.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

Found Entries, Total: 2

NAME: STANDARD RVCD LINKS

NAME: RC PROVIDER DISCOUNTS

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IBE(363.32 - [#363.32]	.01DEL363.33+1, .01DEL363.34+1, .01(XREF 1S), .01(XREF 1K)
^IBE(363.33 - [#363.33]	.01DEL363.33+1
^IBE(363.34 - [#363.34]	.01DEL363.34+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	.01DEL363.33+1, .01DEL363.34+1, .01(XREF 1S), .01(XREF 1K)
>> DIC	ID.02+1
U	.01DEL363.33+1, .01DEL363.34+1
X	.01+1!, .01(XREF 1S), .01(XREF 1K)

Customize PDF page

Package: Integrated Billing