In order to receive payment for lab charges, Roswell Park Cancer Institute must bill these charges on a recurring account that has had recent services (within 30 days of the lab charge) rather than an episodic account set up specifically for the lab service. Charges are sent from the lab system and need to be posted in Invision. Roswell created an EMUE script process to find an appropriate recurring account and transfer the charge from the episodic account to the recurring account.
The input file that Roswell generated for this process includes the episodic account that charges will be transferred from, the date of service, a list of potential recurring accounts to receive the charge, and a service .
The service field is used to help determine preference if there are multiple recurring accounts from which to choose. In that case, the episodic account will be listed once with each potential recurring account. In the example below, INF has a priority 1 and RTH has a priority 2, so the second recurring account is the preferred account for the transfer.
This script takes advantage of Lists (a data structure that is similar to a two-dimensional array or a table in a spreadsheet) and EMUE's sorting capabilities. Given a set of potential "transfer to" accounts, the list should be sorted in order of preference. That is, the preferred account will be examined first to see if it qualifies to receive the transfer. If it does not, the next account with highest preference will be examined. In order to accomplish this, a rank was assigned to each service.
Let Rank = 6
If Service eq "INF" Let Rank = 1
If Service eq "RTH" Let Rank = 2
If Service eq "BMT" Let Rank = 3
If Service eq "PED" Let Rank = 4
If Service eq "INC" Let Rank = 5
Then the record from the input file is added to a List.
PutListMember TransferToAccounts Rank FromAccount ChgDate ToAccount Service
Since EMUE is configured to sort list members by the first item in the list as they are created, as the accounts are added to the list, they will be placed in order by rank.
SETSTARTUP SortLists "Yes"
Once all of the potential accounts are in a list, EMUE can look up each account and see if it meets the qualifications to receive a transfer. In particular, for the "transfer from" account, there must be a balance and certain patient types are excluded. The "transfer to" account must have a date within 30 days of the date of service for the lab charge. Once it has been determined that there is a valid "to account" and a valid "from account" then the OPOP transfer can occur. If there is no valid combination, then the record is skipped.
When an OPOP transfer has occurred a note is posted and a record is written to the log file detailing the transfer.
When the entire input file has been processed, a copy of the log file is moved to another server and the appropriate persons are notified by e-mail that the script has completed successfully.
Find out more about EMUE:
If you would like to find out more about EMUE or to schedule an online web-based demo, click here.
Download the Script:
If you are already a script library member, click here to download the script. (Login required)
If you are a Siemens SIGNATURE® or INVISION® client, and not yet a member of the script library you can click here to join for FREE and have unlimited access to this script plus over 60 more!