Sub-Field: 9002274.3071

Parent File	Name	Number	Package
3P CLAIM DATA(#9002274.3)	CLAIM ATTACHMENTS	9002274.3071	Third Party Billing

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	CLM ATTCH REPORT TYPE CODE	0;1	POINTER TO 3P CODES FILE (#9002274.03)	3P CODES(#9002274.03) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,2)=""W""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X` LAST EDITED: `SEP 28, 2009` SCREEN: `S DIC("S")="I $P(^(0),U,2)=""W"""` EXPLANATION: `Only PWK codes` CROSS-REFERENCE: `9002274.3071^B` 1)= S ^ABMDCLM(DUZ(2),DA(1),71,"B",$E(X,1,30),DA)="" 2)= K ^ABMDCLM(DUZ(2),DA(1),71,"B",$E(X,1,30),DA)
.02	REPORT TRANS CODE	0;2	SET	**********************REQUIRED FIELD********************** 'AA' FOR AVAILABLE ON REQUEST AT PROVIDER SITE; 'BM' FOR BY MAIL; 'EL' FOR ELECTRONICALLY ONLY; 'EM' FOR E-MAIL; 'FX' FOR BY FAX; 'FT' FOR FILE TRANSFER; LAST EDITED: `JUL 27, 2010`
.03	ATTACHMENT CONTROL NUMBER	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<2) X` LAST EDITED: `SEP 28, 2009` HELP-PROMPT: `Answer must be 2-80 characters in length`

CLM ATTCH REPORT TYPE CODE

0;1

POINTER TO 3P CODES FILE (#9002274.03)

INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,2)=""W""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: SEP 28, 2009
SCREEN: S DIC("S")="I $P(^(0),U,2)=""W"""
EXPLANATION: Only PWK codes

CROSS-REFERENCE: 9002274.3071^B

1)= S ^ABMDCLM(DUZ(2),DA(1),71,"B",$E(X,1,30),DA)=""

2)= K ^ABMDCLM(DUZ(2),DA(1),71,"B",$E(X,1,30),DA)

REPORT TRANS CODE

0;2

SET

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

ATTACHMENT CONTROL NUMBER

0;3

FREE TEXT