STANDARD DATA DICTIONARY #351.51 -- TRICARE PHARMACY ERRORS FILE 9/29/25 PAGE 1
STORED IN ^IBE(351.51, (150 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This table file is used to store the various errors which may occur when TRICARE prescriptions are billed using the commercial
point-of-sale pharmacy billing software package.
DD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
CROSS
REFERENCED BY: ERROR CODE(AC), SYSTEM(AD), ERROR CODE(AD1), SYSTEM(B)
351.51,.01 SYSTEM 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: AUG 15, 1996
HELP-PROMPT: Answer must be 3-30 characters in length.
DESCRIPTION: This field describes the system on which the error occurred. A description of the systems are as
follows:
System Description
------ -----------
DHCP These errors are identified in DHCP.
MLINK These errors are identified by the commercial
point-of-sale pharmacy billing package.
UNIVERSAL These errors are identified by the Fiscal Intermediary.
Both the System and the Error Code are required to identify a specific error, as different systems
may use the same error code.
CROSS-REFERENCE: 351.51^B
1)= S ^IBE(351.51,"B",$E(X,1,30),DA)=""
2)= K ^IBE(351.51,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 351.51^AD^MUMPS
1)= I $P(^IBE(351.51,DA,0),U,2)]"" S ^IBE(351.51,"AD",X,$P(^(0),U,2),DA)=""
2)= I $P(^IBE(351.51,DA,0),U,2)]"" K ^IBE(351.51,"AD",X,$P(^(0),U,2),DA)
Cross reference of all errors by System and Error Code. The AD1 cross reference on the ERROR CODE
(#.02) field is the companion to this cross reference.
351.51,.02 ERROR CODE 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>5!($L(X)<1) X
LAST EDITED: AUG 15, 1996
HELP-PROMPT: Answer must be 1-5 characters in length.
DESCRIPTION:
This code is used, along with the System on which the error occurred, to identify an error.
CROSS-REFERENCE: 351.51^AC
1)= S ^IBE(351.51,"AC",$E(X,1,30),DA)=""
2)= K ^IBE(351.51,"AC",$E(X,1,30),DA)
CROSS-REFERENCE: 351.51^AD1^MUMPS
1)= I $P(^IBE(351.51,DA,0),U)]"" S ^IBE(351.51,"AD",$P(^(0),U),X,DA)=""
2)= I $P(^IBE(351.51,DA,0),U)]"" K ^IBE(351.51,"AD",$P(^(0),U),X,DA)
Cross reference of all errors by System and Error Code. The AD cross reference on the SYSTEM
(#.01) field is the companion to this cross reference.
351.51,.03 ERROR MESSAGE 0;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>60!($L(X)<1) X
LAST EDITED: AUG 15, 1996
HELP-PROMPT: Answer must be 1-60 characters in length.
DESCRIPTION:
This field describes the error identified by both System and error code.
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):