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 |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^IBA(364.2

Package: Integrated Billing

Global: ^IBA(364.2


Information

FileMan FileNo FileMan Filename Package
364.2 EDI MESSAGES Integrated Billing

Description

Directly Accessed By Routines, Total: 19

Package Total Routines
Integrated Billing 17 IB20P191    IB20P407    IBCE    IBCEF21    IBCEM    IBCEM1    IBCEOB    IBCEPTM
IBCERP4    IBCESRV    IBCESRV1    IBCESRV3    ^IBA(364.1    ^IBA(364.2    ^IBE(399.6    IBCESRV2
IBCEST    

Accessed By FileMan Db Calls, Total: 8

Package Total Routines
Integrated Billing 8 IB20P191    IB20P407    IBCEM    IBCERP4    IBCESRV    IBCESRV1    IBCESRV2    IBCEST

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Integrated Billing 1 EDI TRANSMISSION BATCH(#364.1)[.11]    

Pointer To FileMan Files, Total: 5

Package Total FileMan Files
Integrated Billing 3 EDI TRANSMIT BILL(#364)[.05]    EDI TRANSMISSION BATCH(#364.1)[.04]    IB MESSAGE ROUTER(#364.3)[.02]    
Kernel 1 NEW PERSON(#200)[1.04]    
Registration 1 PATIENT(#2)[.07]    

Fields, Total: 16

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

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2)!'(X'?1P.E) X
  • LAST EDITED:  JUL 23, 1998
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
  • CROSS-REFERENCE:  364.2^B
    1)= S ^IBA(364.2,"B",$E(X,1,30),DA)=""
    2)= K ^IBA(364.2,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  364.2^AMAN^MUMPS
    1)= S:$P(X,"-",2)="MAN" ^IBA(364.2,"AMAN",+X,DA)=""
    2)= K:$P(X,"-",2)="MAN" ^IBA(364.2,"AMAN",+X,DA)
    3)= DO NOT DELETE
    This xref allows a unique number for each manual entry.
.02 MESSAGE TYPE 0;2 POINTER TO IB MESSAGE ROUTER FILE (#364.3) IB MESSAGE ROUTER(#364.3)

  • LAST EDITED:  MAY 14, 1996
  • HELP-PROMPT:  Enter the type of message that is contained in this record
  • DESCRIPTION:  
    This field contains the type of message that is represented by this record. It is used to determine the type of processing and processing options that will be allowed for this message.
  • CROSS-REFERENCE:  364.2^AMT
    1)= S ^IBA(364.2,"AMT",$E(X,1,30),DA)=""
    2)= K ^IBA(364.2,"AMT",$E(X,1,30),DA)
    3)= DO NOT DELETE
    Cross reference by message type
.03 DATE RECORDED 0;3 DATE

  • INPUT TRANSFORM:  S %DT="ETX" D ^%DT S X=Y K:Y<1 X I $D(X) S X=$E(X,1,12)
  • LAST EDITED:  OCT 02, 1996
  • HELP-PROMPT:  Enter the date/time this record was added to the file.
  • DESCRIPTION:  
    This is the date and time that this record was recorded in this file.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  364.2^ARD
    1)= S ^IBA(364.2,"ARD",$E(X,1,30),DA)=""
    2)= K ^IBA(364.2,"ARD",$E(X,1,30),DA)
    3)= DO NOT DELETE
    Cross reference by date recorded
.04 BATCH NUMBER 0;4 POINTER TO EDI TRANSMISSION BATCH FILE (#364.1) EDI TRANSMISSION BATCH(#364.1)

  • LAST EDITED:  MAY 13, 1996
  • HELP-PROMPT:  Enter the batch number associated with this message.
  • DESCRIPTION:  
    This is the batch number this message is associated with. This field only applies to message types that deal with batch processing.
  • CROSS-REFERENCE:  364.2^ABA
    1)= S ^IBA(364.2,"ABA",$E(X,1,30),DA)=""
    2)= K ^IBA(364.2,"ABA",$E(X,1,30),DA)
    3)= DO NOT DELETE
    This is a cross reference by batch #.
.05 TRANSMIT BILL 0;5 POINTER TO EDI TRANSMIT BILL FILE (#364) EDI TRANSMIT BILL(#364)

  • LAST EDITED:  JUN 21, 1999
  • HELP-PROMPT:  Enter the bill number that this message is associated with.
  • DESCRIPTION:  
    This is the bill number this message is associated with. This field only applies to message types that deal with bill processing.
  • CROSS-REFERENCE:  364.2^ABI
    1)= S ^IBA(364.2,"ABI",$E(X,1,30),DA)=""
    2)= K ^IBA(364.2,"ABI",$E(X,1,30),DA)
    3)= DO NOT DELETE
    Cross reference by bill #
  • CROSS-REFERENCE:  364.2^C
    1)= S ^IBA(364.2,"C",$E(X,1,30),DA)=""
    2)= K ^IBA(364.2,"C",$E(X,1,30),DA)
    Allows lookup of messages by bill #
.06 STATUS 0;6 SET
************************REQUIRED FIELD************************
  • 'P' FOR PENDING;
  • 'U' FOR UPDATING;

  • LAST EDITED:  FEB 26, 2001
  • HELP-PROMPT:  Enter the current status of this message.
  • DESCRIPTION:  
    This is the current status of this message.
  • CROSS-REFERENCE:  364.2^AMS
    1)= S ^IBA(364.2,"AMS",$E(X,1,30),DA)=""
    2)= K ^IBA(364.2,"AMS",$E(X,1,30),DA)
    3)= DO NOT DELETE
    Cross reference by message status
  • CROSS-REFERENCE:  ^^TRIGGER^364.2^1.03
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBA(364.2,D0,1)):^(1),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y X ^DD(364.2,.06,1,2,1.1) X ^DD(364.2,.06,1,2,1.4)
    1.1)= S X=DIV N %I,%H,% D NOW^%DTC S X=%
    1.4)= S DIH=$S($D(^IBA(364.2,DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,3)=DIV,DIH=364.2,DIG=1.03 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    3)= DO NOT DELETE
    CREATE VALUE)= NOW
    DELETE VALUE)= NO EFFECT
    FIELD)= STATUS CHANGED DATE
    Triggers status change date when status is changed.
  • CROSS-REFERENCE:  ^^TRIGGER^364.2^1.04
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBA(364.2,D0,1)):^(1),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV S X=$G(DUZ) X ^DD(364.2,.06,1,3,1.4)
    1.4)= S DIH=$S($D(^IBA(364.2,DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,4)=DIV,DIH=364.2,DIG=1.04 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    3)= DO NOT DELETE
    CREATE VALUE)= S X=$G(DUZ)
    DELETE VALUE)= NO EFFECT
    FIELD)= STATUS CHANGED BY
    Triggers status changed by when status is changed.
.07 PATIENT 0;7 POINTER TO PATIENT FILE (#2) PATIENT(#2)

  • LAST EDITED:  SEP 24, 1996
  • HELP-PROMPT:  Enter the name of the patient associated with this message
  • DESCRIPTION:  
    If this is not a bill processing type message, it must be a patient type message. This is the name of the patient referenced in this type of record.
.08 SOURCE LEVEL 0;8 SET
  • '0' FOR PRIOR TO PAYER;
  • '1' FOR FROM PAYER;

  • LAST EDITED:  AUG 25, 1998
  • HELP-PROMPT:  Enter 0 if source is other than payer, otherwise enter 1
  • DESCRIPTION:  
    This field identifies the level of the source of the EDI message. If it was generated by the payer, this field is a 1. If the message was generated by other than the payer, this field is null or 0.
.1 MESSAGE DATE 0;10 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X I $D(X) S X=$E(X,1,12)
  • LAST EDITED:  OCT 02, 1996
  • HELP-PROMPT:  Enter the date/time this message was generated.
  • DESCRIPTION:  
    This is the date and time when the message was generated. It will be taken from the return message transaction.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  364.2^AMD
    1)= S ^IBA(364.2,"AMD",$E(X,1,30),DA)=""
    2)= K ^IBA(364.2,"AMD",$E(X,1,30),DA)
    3)= DO NOT DELETE
    Cross reference by message date
.11 UPDATE TASK 0;11 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  SEP 24, 1996
  • HELP-PROMPT:  Type a Number between 1 and 99999999999, 0 Decimal Digits
  • DESCRIPTION:  
    This is the last Task Manager job that was entered for this transaction.
.12 DATA BASE UPDATED 0;12 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  SEP 25, 1996
  • HELP-PROMPT:  Enter NO if data base not updated, YES if it has been
  • DESCRIPTION:  
    This is a flag that keeps track of whether or not this message has been applied against the data base and updated the appropriate statuses of the transmit bill and any other appropriate files.
.13 SOURCE 0;13 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>45!($L(X)<1) X
  • LAST EDITED:  OCT 21, 1999
  • HELP-PROMPT:  Answer must be 1-45 characters in length.
  • DESCRIPTION:  
    This is the text to identify who sent the message.
.14 CLAIM RESUBMITTED TEST 0;14 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  JAN 27, 2005
  • HELP-PROMPT:  Enter a 1 (YES) if the message was received for a test claim from a resubmission for test.
  • DESCRIPTION:  This is a flag that indicates if the status message is for a non-TEST claim, a test claim that was sent as TEST only or a live EDI claim that was resubmitted as a test claim. The first 2 instances will always have a 0
    (NO) here, while the third instance will have a 1 (YES).
  • TECHNICAL DESCR:  The way this flag is calcualted is to first look to see if the message was received from the test queue. If it was not, this field is NO. If it was, and the last entry for the claim in file 364 indicates it was a test
    claim, this flag is NO. Otherwise, the flag is YES.
1.03 STATUS CHANGED DATE 1;3 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X I $D(X) S X=$E(X,1,12)
  • LAST EDITED:  OCT 02, 1996
  • HELP-PROMPT:  Enter the date/time the status was last changed
  • DESCRIPTION:  
    This is the date and time that the status was last changed.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
    TRIGGERED by the STATUS field of the EDI MESSAGES File
  • CROSS-REFERENCE:  364.2^ASCD
    1)= S ^IBA(364.2,"ASCD",$E(X,1,30),DA)=""
    2)= K ^IBA(364.2,"ASCD",$E(X,1,30),DA)
    3)= DO NOT DELETE
    Xref used for purging messages
1.04 STATUS CHANGED BY 1;4 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JAN 21, 1997
  • HELP-PROMPT:  Enter the name of the user who last changed the status
  • DESCRIPTION:  
    The name of the person who last changed the status of this message.
  • NOTES:  TRIGGERED by the STATUS field of the EDI MESSAGES File
2 MESSAGE 2;0 WORD-PROCESSING #364.21

  • LAST EDITED:  JUL 28, 1998
  • LAST EDITED:  JUL 29, 1998
  • HELP-PROMPT:  Enter the message or actual return message format (preceeded by ##)
  • DESCRIPTION:  
    This is control information or actual text of the mailman message. Control information starts with ## in the first 2 characters.

External References

Name Field # of Occurrence
^%DT .03+1, .1+1, 1.03+1
NOW^%DTC .06(XREF 2n1.1)
^DICR .06(XREF 2n1.4), .06(XREF 3n1.4)
Y^DIQ ID.04+1, ID.05+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( .06(XREF 2n1.4), .06(XREF 3n1.4)
^DD(364 ID.05+1
^DD(364.1 ID.04+1
^DD(364.2 .06(XREF 2S), .06(XREF 3S)
^IBA(364 - [#364] ID.05+1
^IBA(364.1 - [#364.1] ID.04+1
^IBA(364.2 - [#364.2] .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K), .04(XREF 1S), .04(XREF 1K)
.05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K), .06(XREF 1S), .06(XREF 1K), .06(XREF 2S), .06(XREF 2n1.4), .06(XREF 3S), .06(XREF 3n1.4)
.1(XREF 1S), .1(XREF 1K), 1.03(XREF 1S), 1.03(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(0 ID.04+1, ID.05+1
^(1 .06(XREF 2S), .06(XREF 2n1.4), .06(XREF 3S), .06(XREF 3n1.4)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% .06(XREF 2n1.1)
>> %DT .03+1*, .1+1*, 1.03+1*
%H .06(XREF 2n1.1)
%I ID.04+1*!, ID.05+1*!, .06(XREF 2n1.1)
>> C ID.04+1*, ID.05+1*
>> D0 .06(XREF 2S), .06(XREF 3S)
>> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K), .04(XREF 1S), .04(XREF 1K)
.05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K), .06(XREF 1S), .06(XREF 1K), .06(XREF 2S), .06(XREF 3S), .1(XREF 1S), .1(XREF 1K)
1.03(XREF 1S), 1.03(XREF 1K)
>> DIC ID.04+1, ID.05+1
>> DIG .06(XREF 2n1.4), .06(XREF 3n1.4)
>> DIH .06(XREF 2n1.4), .06(XREF 3n1.4)
>> DIU .06(XREF 2S), .06(XREF 3S)
DIV .06(XREF 2S), .06(XREF 2n1.1), .06(XREF 2n1.4), .06(XREF 3S), .06(XREF 3n1.4)
DIV(0 .06(XREF 2S), .06(XREF 2n1.4), .06(XREF 3S), .06(XREF 3n1.4)
DUZ .06(XREF 3S)
U ID.04+1, ID.05+1, .06(XREF 2S), .06(XREF 2n1.4), .06(XREF 3S), .06(XREF 3n1.4)
X .01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K), .03+1*!, .03(XREF 1S), .03(XREF 1K)
.04(XREF 1S), .04(XREF 1K), .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K), .06(XREF 1S), .06(XREF 1K), .06(XREF 2S), .06(XREF 2n1.1)
.06(XREF 2n1.4), .06(XREF 3S), .06(XREF 3n1.4), .1+1*!, .1(XREF 1S), .1(XREF 1K), .11+1!, .13+1!, 1.03+1*!, 1.03(XREF 1S)
1.03(XREF 1K)
Y ID.04+1*, ID.05+1*, .03+1, .06(XREF 2S), .06(XREF 3S), .1+1, 1.03+1
Y(1 .06(XREF 2S), .06(XREF 3S)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All