Global: ^OOPS(2263.5

Information

FileMan FileNo	FileMan Filename	Package
2263.5	ASISTS DOL PROVIDER TITLE	Asists

This file contains the valid titles that can be used for Providers for submission of CA1/CA2 claims to the DOL (Department of Labor). This file MUST NOT be altered as doing so may cause DOL to reject the submission.

Package	Total	FileMan Files
Asists	2	ASISTS ACCIDENT REPORTING(#2260)[182, 270] ASISTS SITE PARAMETER(#2262)[#2262.03(6)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	TITLE	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K X D EN^DDIOL("Sorry, Can't Add") Q K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `MAR 29, 2000` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: `This table file contains valid entries for the Physician Title` DELETE TEST: `1,0)= I 1 D EN^DDIOL("Sorry, entries may not be deleted.")` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `2263.5^B` `1)= S ^OOPS(2263.5,"B",$E(X,1,30),DA)=""` `2)= K ^OOPS(2263.5,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `2263.5^D^MUMPS` `1)= S ^OOPS(2263.5,"D",$$UP^OOPSUTL4($E(X,1,30)),DA)=""` `2)= K ^OOPS(2263.5,"D",$$UP^OOPSUTL4($E(X,1,30)),DA)`
1	CODE	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>4!($L(X)<2) X` LAST EDITED: `MAR 29, 2000` HELP-PROMPT: `Answer must be 2-4 characters in length.` DESCRIPTION: `This field contains the Code that will be sent to DOL for the Physician Title.` `UNEDITABLE` CROSS-REFERENCE: `2263.5^C` `1)= S ^OOPS(2263.5,"C",$E(X,1,30),DA)=""` `2)= K ^OOPS(2263.5,"C",$E(X,1,30),DA)`

TITLE

0;1

FREE TEXT

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

INPUT TRANSFORM: K X D EN^DDIOL("Sorry, Can't Add") Q K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: MAR 29, 2000
HELP-PROMPT: Answer must be 3-30 characters in length.
DESCRIPTION:
This table file contains valid entries for the Physician Title
DELETE TEST: 1,0)= I 1 D EN^DDIOL("Sorry, entries may not be deleted.")
UNEDITABLE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 2263.5^B
1)= S ^OOPS(2263.5,"B",$E(X,1,30),DA)=""
2)= K ^OOPS(2263.5,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 2263.5^D^MUMPS
1)= S ^OOPS(2263.5,"D",$$UP^OOPSUTL4($E(X,1,30)),DA)=""
2)= K ^OOPS(2263.5,"D",$$UP^OOPSUTL4($E(X,1,30)),DA)

CODE

0;2

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>4!($L(X)<2) X
LAST EDITED: MAR 29, 2000
HELP-PROMPT: Answer must be 2-4 characters in length.
DESCRIPTION:
This field contains the Code that will be sent to DOL for the Physician Title.
UNEDITABLE
CROSS-REFERENCE: 2263.5^C
1)= S ^OOPS(2263.5,"C",$E(X,1,30),DA)=""
2)= K ^OOPS(2263.5,"C",$E(X,1,30),DA)