Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All
Print Page as PDF
Global: ^ABMDERR

Package: Third Party Billing

Global: ^ABMDERR


Information

FileMan FileNo FileMan Filename Package
9002274.04 3P ERROR CODE Third Party Billing

Description

Directly Accessed By Routines, Total: 4

Package Total Routines
Third Party Billing 4 ABMDERR    ABMDSS    ABMDTDER    ABMDWARN    

Accessed By FileMan Db Calls, Total: 21

Package Total Routines
Third Party Billing 21 ABMDBETA    ABMDERR    ABMP2510    ABMP2511    ABMP2512    ABMP2513    ABMP2514    ABMP2515
ABMP2611    ABMP2614    ABMP2619    ABMP263    ABMPOST9    ABMPST26    ABMPT255    ABMPT256
ABMPT258    ABMPT259    ABMPT266    ABMPT268    ABMPT269    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Utility Tables 2 INSURER(#9999999.18)[#9002274.411(.01)]    LOCATION(#9999999.06)[#9002274.0431(.01)]    
Third Party Billing 1 3P EXPORT MODE(#9002274.08)[#9002274.421(.01)]    

Fields, Total: 9

Field # Name Loc Type Details
.001 NUMBER NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  Enter form locator number which corresponds to this entry on the UB-82 form.
  • DESCRIPTION:  
    This number corresponds to the form locator number of this entry on the UB-82 form.
.01 ERROR 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45)!($L(X)>64)!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  MAR 18, 1994
  • HELP-PROMPT:  Answer must be 3-64 characters in length.
  • DESCRIPTION:  
    This defines a reason why a bill may be disapproved during the review phase of the billing process.
  • DELETE TEST:  .01,0)= I 1
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9002274.04^B
    1)= S ^ABMDERR("B",$E(X,1,30),DA)=""
    2)= K ^ABMDERR("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9002274.04^C^KWIC
    1)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "(,.?! '-/&:;)"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)>2,^DD("KWIC")'[I S ^ABMDERR("C",I,DA)=""
    2)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "(,.?! '-/&:;)"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)>2 K ^ABMDERR("C",I,DA)
.02 CORRECTIVE ACTION 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>170!($L(X)<3) X
  • LAST EDITED:  MAY 21, 1990
  • HELP-PROMPT:  Answer must be 3-170 characters in length.
.03 ERROR STATUS 0;3 SET
  • 'E' FOR ERROR;
  • 'W' FOR WARNING;

  • LAST EDITED:  MAY 08, 2003
.04 *DISPLAY ONLY WHEN IN ERROR 0;4 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  MAY 02, 1994
.05 RESTRICT LOCAL EDITING 0;5 SET
  • '1' FOR Y;
  • '0' FOR NO;

  • LAST EDITED:  MAR 18, 1994
11 REQUIRED BY INSURER 11;0 POINTER Multiple #9002274.411 9002274.411
21 REQD FOR EXPORT FORM 21;0 POINTER Multiple #9002274.421 9002274.421
31 SITE 31;0 POINTER Multiple #9002274.0431 9002274.0431
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Found Entries |  All