| GENERAL DESCRIPTION |
This global subtree of ^XTMP contains data for a Single
Patient, Approved Purchase Order created in coreFLS and sent to VistA
Prosthetics for processing. The COMMUNICATIONS SERVICE LIBRARY package sets up
this global upon receipt of the HL7 ORM^O01 message and the PROSTHETICS
package then extracts the data.
MCID is the Message Control ID from the HL7 message's MSH segment.
GLOBAL REFERENCES:
^XTMP("CSLPRPO;"_MCID,0)=Purge date^Create Date^"PO Sent from coreFLS to
VistA"
^XTMP("CSLPRPO;"_MCID,"CONSULT")=Consult ID^Inpatient or Outpatient
^station
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"ACCOUNTING")=ACS^Alias^Purchase
Card Number
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DELIVERY")=Location Code^Location
Description^Date Needed
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",1)=PO_LINE_ID^ITEM_ID
(internal item number)^SEGMENT1 (external item number)^Quantity^Unit
code;name^Unit Price
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",2)=Manufacturer
code;name^Vendor Product Number^Contract Number
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",3)=HCPC Code^NPPD Line
^Patient Category^Transaction Type
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",4)=Date Last Edited
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",5)=Line Counter^"ITEM
DESCRIPTION"
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",5,counter,0)=Description
Text
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",6)=Line Counter^"NOTE TO
SUPPLIER"
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",6,counter,0)=Note to
Supplier Text
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",7)=Line Counter^"NOTE TO
RECEIVER"
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",7,counter,0)=Note to
Receiver Text
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",8)=Line Counter^"ITEM
ATTACHMENT"
^XTMP("CSLPRPO;"_MCID,"ITEM",counter,"DETAIL",8,counter,0)=Item
Attachment Text
^XTMP("CSLPRPO;"_MCID,"ORDER CONTROL")=Order Control^Reason
^XTMP("CSLPRPO;"_MCID,"PO",1)=SEGMENT1 (external PO number)^
PO_HEADER_ID (internal PO number)^Station^ORG_ID^Enter Date^
Enter Agent SSN^Approved Date^Action Agent SSN^Lastname^First Name^
Middlename^Suffix
^XTMP("CSLPRPO;"_MCID,"PO",2)=Authorization Status^Version Number^Version
Date
^XTMP("CSLPRPO;"_MCID,"PO",4)=Line Counter^"COMMENTS"
^XTMP("CSLPRPO;"_MCID,"PO",4,counter,0)=Comments Text
^XTMP("CSLPRPO;"_MCID,"PATIENT")=ICN^'NI' or 'LR'^Station^DFN^Station
^SSN^Lastname^Firstname^Middlename^Suffix
^XTMP("CSLPRPO;"_MCID,"PPA")=SSN^Lastname^Firstname^Middlename^Suffix
^XTMP("CSLPRPO;"_MCID,"SHIPPING",1)=Location Code^Address Line1^Address
Line2
^XTMP("CSLPRPO;"_MCID,"SHIPPING",2)=City^State^Zip Code
^XTMP("CSLPRPO;"_MCID,"SHIPPING",3)=FOB^Ship to Terms^S&H Charges
^Currency^Shipping PO_LINE_ID
^XTMP("CSLPRPO;"_MCID,"VENDOR","ADDRESS")=Address Line1^Address
Line2^City^State^Zip Code
^XTMP("CSLPRPO;"_MCID,"VENDOR","ID")=Name^ID Number
^XTMP("CSLPRPO;"_MCID,"VENDOR","PHONE")=Voice^Fax
^XTMP("CSLPRPO;"_MCID,"ZERRORS",counter)=Error description
Note: All dates are in FileMan format, converted from HL7 date format, if
necessary.
|