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

Package: Integrated Billing

Global: ^IBE(365.042


Information

FileMan FileNo FileMan Filename Package
365.042 X12 271 MILITARY SERVICE RANK Integrated Billing

Description

Directly Accessed By Routines, Total: 3

Package Total Routines
Integrated Billing 3 ^IBE(365.042    IBCNES3    ^IBE(399.6    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
Integrated Billing 1 IIV RESPONSE(#365)[12.05]    
Registration 1 PATIENT(#2)[#2.312(12.05)]    

Fields, Total: 5

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

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
    MAXIMUM LENGTH: 30
  • LAST EDITED:  MAR 24, 2023
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This field is controlled by the Financial Service Center (FSC) and is associated with their table: X12_MILITARY_SERVICE_RANK.
  • CROSS-REFERENCE:  365.042^B
    1)= S ^IBE(365.042,"B",$E(X,1,30),DA)=""
    2)= K ^IBE(365.042,"B",$E(X,1,30),DA)
.02 DESCRIPTION 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>90!($L(X)<1) X
    MAXIMUM LENGTH: 90
  • LAST EDITED:  MAR 14, 2023
  • HELP-PROMPT:  Answer must be 1-90 characters in length.
  • DESCRIPTION:  
    This field is controlled by the Financial Service Center (FSC) and is associated with their table: X12_MILITARY_SERVICE_RANK.
  • CROSS-REFERENCE:  ^^TRIGGER^365.042^.04
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBE(365.042,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(365.042,.02,1,1,1.4)
    1.4)= S DIH=$G(^IBE(365.042,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=365.042,DIG=.04 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBE(365.042,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(365.042,.02,1,1,2.4)
    2.4)= S DIH=$G(^IBE(365.042,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=365.042,DIG=.04 D ^DICR
    CREATE VALUE)= NOW
    DELETE VALUE)= NOW
    FIELD)= DATE LAST EDITED
    Update the 'DATE LAST EDITED' whenever the Description is changed.
.03 INACTIVE? 0;3 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAR 11, 2013
  • HELP-PROMPT:  Is the code inactive?
  • DESCRIPTION:  
    This field indicates whether or not the code is inactive and will be marked inactive if a code is determined to no longer be used by X12.
.04 DATE LAST EDITED 0;4 DATE

  • INPUT TRANSFORM:  S %DT="ESTR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 14, 2023
  • HELP-PROMPT:  Enter the date and time the DESCRIPTION was last edited.
  • DESCRIPTION:  
    The date and time that the DESCRIPTION for this entry was last edited.
  • NOTES:  TRIGGERED by the DESCRIPTION field of the X12 271 MILITARY SERVICE RANK File
.05 FSC CONTROLLED 0;5 SET (BOOLEAN Data Type)
  • This field identifies whether or not this file is controlled by FSC.

  • LAST EDITED:  FEB 14, 2023
  • HELP-PROMPT:  Enter 1 if FSC controlled or 0 if not.
  • DESCRIPTION:  
    This field identifies whether or not this file is controlled by FSC.

Found Entries, Total: 39

CODE: A1    CODE: A2    CODE: A3    CODE: B1    CODE: B2    CODE: C1    CODE: C2    CODE: C3    
CODE: C4    CODE: C5    CODE: C6    CODE: C7    CODE: C8    CODE: C9    CODE: E1    CODE: F1    
CODE: F2    CODE: F3    CODE: F4    CODE: G1    CODE: G4    CODE: L1    CODE: L2    CODE: L3    
CODE: L4    CODE: L5    CODE: L6    CODE: M1    CODE: M2    CODE: M3    CODE: M4    CODE: M5    
CODE: M6    CODE: P1    CODE: P2    CODE: P3    CODE: P4    CODE: P5    CODE: R1    

External References

Name Field # of Occurrence
^%DT .04+1
NOW^%DTC .02(XREF 1S), .02(XREF 1K)
^DICR .02(XREF 1n1.4), .02(XREF 1n2.4)

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(365.042 .02(XREF 1S), .02(XREF 1K)
^IBE(365.042 - [#365.042] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1n1.4), .02(XREF 1K), .02(XREF 1n2.4)

Naked Globals

Name Field # of Occurrence
^(0 ID.02+1, .02(XREF 1S), .02(XREF 1n1.4), .02(XREF 1K), .02(XREF 1n2.4)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% .02(XREF 1S), .02(XREF 1K)
>> %DT .04+1*
%H .02(XREF 1S), .02(XREF 1K)
%I .02(XREF 1S), .02(XREF 1K)
>> D0 .02(XREF 1S), .02(XREF 1K)
>> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K)
>> DIG .02(XREF 1n1.4), .02(XREF 1n2.4)
>> DIH .02(XREF 1n1.4), .02(XREF 1n2.4)
>> DIU .02(XREF 1S), .02(XREF 1K)
DIV .02(XREF 1S), .02(XREF 1n1.4), .02(XREF 1K), .02(XREF 1n2.4)
DIV(0 .02(XREF 1S), .02(XREF 1n1.4), .02(XREF 1K), .02(XREF 1n2.4)
U ID.02+1, .02(XREF 1S), .02(XREF 1n1.4), .02(XREF 1K), .02(XREF 1n2.4)
X .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .02(XREF 1S), .02(XREF 1n1.4), .02(XREF 1K), .02(XREF 1n2.4), .04+1*!
Y .02(XREF 1S), .02(XREF 1K), .04+1
Y(1 .02(XREF 1S), .02(XREF 1K)
Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All