| .DATA |
Input |
First parameter, passed by reference, contains
information related to the authorization document.
DATA(1,seq#) = Line Item Number, where seq#
will indicate the line item number
ranging from 1 to n
DATA(2) = Authorization ID
DATA(3) = VistA Payment Batch ID
DATA(4) = Invoice Date, format: YYYYMMDD
DATA(5) = Invoice Received Date, format: YYYYMMDD
DATA(6) = Payment Flag
DATA(7) = Accounting Code String
DATA(8) = VistA Invoice Number
DATA(9) = Fee Program
DATA(10) = Invoice Amount
DATA(11,seq#) = Invoice Line Item Amount
DATA(12,seq#) = Prompt Pay Type for line item
DATA(13) = Payment Type Code
DATA(14,seq#) = Suspend Code for line item
DATA(15,seq#) = Amount Claimed for line item
DATA(16) = Buyer SSN
DATA(17,seq#) = Prescription number for line item
DATA(18,seq#) = Date Prescription filled, format:YYYYMMDD
DATA(19) = Total Invoice Line items
DATA(20,seq#) = Invoice item counter
|
.VendorData |
Input |
Second parameter, passed by reference, contains
vendor-related information.
VDATA(1) = Supplier Number
VDATA(2) = Supplier Site Name
|
.PatientData |
Input |
Third paramter, passed by reference, contains
patient-related information.
PDATA(1) = Veteran ID (full SSN)
PDATA(2) = Veteran ICN
PDATA(3) = Veteran Last Name
PDATA(4) = Veteran First Name
PDATA(5) = Veteran Middle Initial
PDATA(6) = Veteran Suffix
PDATA(7) = Address Line 1
PDATA(8) = Address Line 2
PDATA(9) = City
PDATA(10) = State
PDATA(11) = Zip
|
XTMP global |
Output |
Header Node: ^XTMP("CSLroutineName;MSGID";0)=
PurgeDate^CreateDate^StatusMessage
[n] Where: n = piece number ("^" delimited)
MSGID = HL7 message ID consisting of
Station# concatenated
with IEN to ^HLMA for
original HL7 message. ^XTMP("CSLFB39;MSGID",0)
[1] = Purge Date (current date+35 days),
FileMan internal date format.
[2] = Create Date (current date),
FileMan internal date format.
[3] = User-friendly status message
to indicate message processing
is completed.
Data Node:
^XTMP("CSLroutineName;MSGID","Subscript_Name") =
data
^XTMP("CSLFB39;MSGID","PRE_VALIDATION_MSG") =
Pre Validation Message
^XTMP("CSLFB39;MSGID","VISTA_INVOICE_NUMBER") =
VistA Invoice Number
^XTMP("CSLFB39;MSGID","VISTA_PAYMENT_BATCH_ID") =
VistA Payment Batch ID
^XTMP("CSLFB39;MSGID","TIME") =
[1] = $H when HL7 message was submitted
for transmission to CoreFLS.
[2] = $H when CoreFLS response was
processed.
[3] = Computed time used for the round trip
to CoreFLS in the following format:
days hours:minutes:seconds.
[4] = DUZ of user who created the message
in VistA Fee Basis.
For exceptions sent by CoreFLS, the error message will be stored after the
zero node as follows:
^XTMP("CSLFB39;MSGID","ERR",$H) = Error
description, applicable for both
Application Error (AE)
and Application Reject (AR)
|