Input |
Input |
Message Control ID - created by the HL7 package and
is concatenated with the "CSLPRPC" and used as part of the node subscripts and
node value into the ^XTMP global. Order Control - PO status as New Order (NW)
or Data Error (DE) Prosthetics Batch ID - An identifier for Prosthetic batch
CoreFLS PO # - An Purchase Order number created by CoreFLS Line IEN - Line
internal entry number from VistA Prosthetics Order Status - "VAAP", if
approved by CoreFLS Approved Date - date and time the PO approved by CoreFLS
PO Header ID - An identifier for CoreFLS PO header Ship to Location Code - A
code assigned by user CoreFLS Line Number - Line number in this PO from
CoreFLS Item Number - the item number ordered on a specific line of a PO.
Contract Number - Contract which item(s) purchase by. Contract Type - type of
contract Accounting Code String - the complete Account Classification String
for the PO. Quantity - Quantity actually ordered Unit of Measure Code -
standard code indicating the unit of measure for item UOM Description - the
spelled out description of the Unit of Measure CoreFLS Line ID - An identifier
of the specific line item on the PO Purchase card Number - 16 digits,
specifying the card used for this order Ship to Org Code - Organization code
where the order delivered to Vendor Number - the number that identifies a
specific vendor Vendor Site Code - the site code for the vendor on the PO
These fields are captured by CSL and formatted into an ^XTMP global as
specified. The CSL routine calls a VistA routine, EN^RMPRCSL2(CSLSUB),
passing the complete node structure of "CSLPRPC" concatenated with the Message
Control ID, for processing.
|
Output |
Output |
^XTMP("CSLPRPC;"_MID,"ORDER CONTROL")=Order Control
type
Date^PO Header ID
^XTMP("CSLPRPC;"_MID,"VENDOR","ID")=Vendor #^^^Vendor Site Code
^XTMP("CSLPRPC;"_MID,"ITEM",ITEM #,"ACCOUNTING",1)=Accounting Code String
(ACS) ^XTMP("CSLPRPC;"_MID,"ITEM",ITEM #,"ACCOUNTING",2)= coreFLS Line
ID^P-Card #^Line IEN^ Order Control type ^XTMP("CSLPRPC;"_MID,"ITEM",ITEM
#,"DELIVERY")=Ship to Org Code^ Ship to Location Code
^XTMP("CSLPRPC;"_MID,"ITEM",ITEM #,"DETAIL",1)=coreFLS Line #^Item #^ Item
Description^Quantity^UOM Code^UOM Description^Contract #^Unit Price^Contract
Type ^XTMP("CSLPRPC;"_MID,"ITEM",ITEM #,"ERROR")=Error Message from
coreFLS^Error Message from CSL ^XTMP("CSLPRPC;"_MID,"ERROR")="DE" if errors
found
The CSL routine evaluates the data sent by CoreFLS for the following structure
and content: Vendor ID is not numeric Item Number is not numeric Quantity is
not numeric Unit Price is more than five digits after decimal point
After VistA Prosthetics processes the supplied information, if an error is
detected, an error node will be created, ^XTMP("CSLPRPC;"_MID,"ERROR").
|