Print Page as PDF
COPY FUNCTIONS FOR IB EOB FILE #361.1 ICR (5671)

COPY FUNCTIONS FOR IB EOB FILE #361.1    ICR (5671)

Name Value
NUMBER 5671
IA # 5671
DATE CREATED 2011/05/11
CUSTODIAL PACKAGE INTEGRATED BILLING
USAGE Private
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE IBCEOB4
NAME COPY FUNCTIONS FOR IB EOB FILE #361.1
GENERAL DESCRIPTION
File 361.1 EXPLANATION OF BENEFITS is shared by
Accounts Receivable and Integrated Billing. A/R already has full read access
to the data in this file and options to add new entries.

The additional functions defined below are required to allow AR to MOVE COPY,
REMOVE or RESTORE erroneous entries in File 361.1 and update audit trail
fields.
STATUS Active
KEYWORDS
  • IBM(361.1
  • EOB FILE
  • EXPLANATION OF BENEFITS
  • 361.1
DURATION Till Otherwise Agreed
ID IBCEOB4
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
$$MOVE(EOBIEN,IBIFN,DUZ,MDATE,JUST)
This component is used to move a File 361.1 entry to
a different bill and updates the following fields:

.01    BILL
101,.01 DATE/TIME EEOB MOVED
101,.02 EEOB MOVE/COPY/REMOVE BY
101,.03 MOVE/COPY/REMOVE REASON
101,.04 ORIGINAL BILL NUMBER
101,.05 MOVE/COPY/REMOVE EVENT

VARIABLES TYPE VARIABLES DESCRIPTION
EOBIEN Input
The pointer (ien) to the existing entry in file
361.1.

IBIFN Input
The pointer (ien) to the new bill in file 399.

DUZ Input
The pointer (ien) to the user in file 200.


MDATE Input
Date and time the move was performed.


JUST Input
Free text comment (up to 100 characters) entered by
user making the change.

$$COPY(EOBIEN,.IBIFN,DUZ,CDATE,JUST)
This component is used to copy a single File 361.1
entry. An array of bill numbers is passed and new File 361.1 entries are
created for each valid bill.

In addition to existing data fields the following audit fields are updated on
both the original entry and the new copied entries:

101,.01 DATE/TIME EEOB MOVED
101,.02 EEOB MOVE/COPY/REMOVE BY
101,.03 MOVE/COPY/REMOVE REASON
101,.04 ORIGINAL BILL NUMBER
101,.05 MOVE/COPY/REMOVE EVENT
101,.06 OTHER CLAIM NUMBERS (Multiple)


VARIABLES TYPE VARIABLES DESCRIPTION
EOBIEN Input
The pointer (ien) to the existing entry in file
361.1.

.IBIFN Input
Array of pointers (ien) to the new bills in file 399.

DUZ Input
The pointer (ien) to the user in file 200.

CDATE Input
Date and time the copy was performed.

JUST Input
Free text comment (up to 100 characters) entered by
the user.

$$LOCK(EOBIEN)
Lock entry in EOB file #361.1.

VARIABLES TYPE VARIABLES DESCRIPTION
EOBIEN Input
The pointer (ien) to the existing entry in file
361.1.


$$UNLOCK(EOBIEN)
Unlock entry in EOB file #361.1.

VARIABLES TYPE VARIABLES DESCRIPTION
EOBIEN Input
The pointer (ien) to the existing entry in file
361.1.

$$REMOVE(EOBIEN,DUZ,JCOM)
This component is used to mark an EEOB as removed by
updating the following field:

102 EEOB REMOVED

The following audit fields are also updated:

101,.01 DATE/TIME EEOB MOVED
101,.02 EEOB MOVE/COPY/REMOVE BY
101,.03 MOVE/COPY/REMOVE REASON
101,.05 MOVE/COPY/REMOVE EVENT


VARIABLES TYPE VARIABLES DESCRIPTION
EOBIEN Input
The pointer (ien) to the existing entry in file
#361.1.

DUZ Input
The pointer (ien) to the user in file 200.

JCOM Input
Free text comment (up to 100 characters) entered by
the user.

RESTORE
This component is used to restore a removed EEOB. The
following field  is updated in EOB file #361.1:

102 EEOB REMOVED

Audit fields in the 101 multiple are not updated.
VARIABLES TYPE VARIABLES DESCRIPTION
EOBIEN Input
The pointer (ien) to the existing entry in file
#361.1.
SUBSCRIBING PACKAGE ACCOUNTS RECEIVABLE
DATE ACTIVATED 2011/05/17