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 |  Pointed To By FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^IBT(356.006

Package: Integrated Billing

Global: ^IBT(356.006


Information

FileMan FileNo FileMan Filename Package
356.006 X12 278 DIAGNOSIS TYPE Integrated Billing

Description

Directly Accessed By Routines, Total: 3

Package Total Routines
Integrated Billing 3 ^IBE(399.6    ^IBT(356.006    PATIENT DIAGNOSIS    

Accessed By FileMan Db Calls, Total: 5

Package Total Routines
Integrated Billing 5 IBTRH3A    IBTRH5D    IBTRH6    IBTRH8    IBTRHLO    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Integrated Billing 1 HCS REVIEW TRANSMISSION(#356.22)[#356.22107(.02), #356.223(.01), #356.2316(.02)]

Fields, Total: 3

Field # Name Loc Type Details
.01 CODE 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<2)!'(X'?1P.E) X
  • LAST EDITED:  APR 08, 2014
  • HELP-PROMPT:  Answer must be 2-3 characters in length.
  • DESCRIPTION:  
    This is the code value sent in an X.12 message.
  • CROSS-REFERENCE:  356.006^B
    1)= S ^IBT(356.006,"B",$E(X,1,30),DA)=""
    2)= K ^IBT(356.006,"B",$E(X,1,30),DA)
.02 DESCRIPTION 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  MAR 30, 2015
  • HELP-PROMPT:  Answer must be 1-40 characters in length.
  • DESCRIPTION:  
    This describes the code value in more detail.
  • FIELD INDEX:  C (#439) REGULAR IR LOOKUP & SORTING
    Short Descr: Convert to Upper Case for lookups
    Set Logic: S ^IBT(356.006,"C",$E(X,1,30),DA)=""
    Kill Logic: K ^IBT(356.006,"C",$E(X,1,30),DA)
    Whole Kill: K ^IBT(356.006,"C")
    X(1): DESCRIPTION (356.006,.02) (Subscr 1) (Len 30) (forwards)
    Transform (Storage): S X=$$UP^XLFSTR($E(X,1,30))
.03 INACTIVE? 0;3 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  APR 08, 2014
  • HELP-PROMPT:  Set this to YES in order to deactivate the code.
  • DESCRIPTION:  
    This field will be marked inactive if a code is determined to no longer be used by X.12.

Found Entries, Total: 10

CODE: ABF    CODE: ABJ    CODE: ABK    CODE: APR    CODE: BF    CODE: BJ    CODE: BK    CODE: PR    
CODE: DR    CODE: LOI    

External References

Name Field # of Occurrence
$$UP^XLFSTR IXCP1TS+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBT(356.006 - [#356.006] IXCSL+1*, IXCKL+1!, IXCKEIC+1!, .01(XREF 1S), .01(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(0 ID.02+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA IXCSL+1, IXCKL+1, .01(XREF 1S), .01(XREF 1K)
U ID.02+1
X IXCSL+1, IXCKL+1, IXCP1TS+1*, .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All