ExportToReturnOffer Code

Copy and paste the code below into the designated edit point.

Pre Point Execute

ª+1 Go Sub Initialize XML input document
ª+1 Go Sub Initialize XML output document
ª+1 Go Sub Loop through requested items
ª+1 Go Sub Terminate
@@
 

Pre Point Subroutines
 

ª+2 Sub Initialize XML input document
ª+3 Set InputDocument = InputDoc
ª+2 Sub Initialize XML output document
ª+3 Set OutputDocument = OutputDoc
|0 10 4800008c Function: CommonXML.ReturnOffer.InsertRow
|1 Input
|2 15 b000e38 Field: WSYDOM/ObjectStoreReference
|3 OutputDocument
|4 15 b000e38 Field: WSYDOM/ObjectStoreReference
|7 10 4800008c Function: CommonXML.ReturnOffer.InsertRow
// Input<ObjectStoreReference> OutputDocument<ObjectStoreReference>
|1 Input
|2 15 a0006ef Field: WSYXML/ParentElement
|3 OutputDocument
|4 15 b000065 Field: WSYDOM/ObjectDocument
|7 10 4800008c Function: CommonXML.ReturnOffer.InsertRow
// Input<ParentElement> OutputDocument<ObjectDocument>
|1 Input
|2 15 b000065 Field: WSYDOM/ObjectDocument
|3 OutputDocument
|4 15 b000065 Field: WSYDOM/ObjectDocument
|7 10 4800008c Function: CommonXML.ReturnOffer.InsertRow
// Input<ObjectDocument> OutputDocument<ObjectDocument>
ª+3 Call CommonXML.ReturnOffer.InsertRow
ª+3 Go Sub Error check
ª+3 Set OutputDocument<ObjectElement> = CommonXML.ReturnOffer.InsertRow/Output<ObjectElement>
ª+2 Sub Loop through requested items
|0 10 480000f0 Function: CommonXML.ItemList.Item.GetFirstOccurrence
|1 Input
|2 15 b000e38 Field: WSYDOM/ObjectStoreReference
|3 InputDocument
|4 15 b000e38 Field: WSYDOM/ObjectStoreReference
|7 10 480000f0 Function: CommonXML.ItemList.Item.GetFirstOccurrence
// Input<ObjectStoreReference> InputDocument<ObjectStoreReference>
|1 Input
|2 15 b000065 Field: WSYDOM/ObjectDocument
|3 InputDocument
|4 15 b000065 Field: WSYDOM/ObjectDocument
|7 10 480000f0 Function: CommonXML.ItemList.Item.GetFirstOccurrence
// Input<ObjectDocument> InputDocument<ObjectDocument>
|1 Parent
|2 15 a0006ef Field: WSYXML/ParentElement
|3 <none>
|4 20 a0006d9 Value: WSYXML/ParentElement.NULL
|7 10 480000f0 Function: CommonXML.ItemList.Item.GetFirstOccurrence
// Parent<ParentElement> <ParentElement.NULL>
ª+3 Call CommonXML.ItemList.Item.GetFirstOccurrence
ª+3 Set InputDocument<ObjectElement> = CommonXML.ItemList.Item.GetFirstOccurrence/Output<ObjectNode>
ª+3 Go Sub Error check
|0 10 480000dd Function: CommonXML.ItemList.Item.SingleFetch
|1 Input
|2 15 b000e38 Field: WSYDOM/ObjectStoreReference
|3 InputDocument
|4 15 b000e38 Field: WSYDOM/ObjectStoreReference
|7 10 480000dd Function: CommonXML.ItemList.Item.SingleFetch
// Input<ObjectStoreReference> InputDocument<ObjectStoreReference>
|1 Input
|2 15 b0000b1 Field: WSYDOM/ObjectElement
|3 InputDocument
|4 15 b0000b1 Field: WSYDOM/ObjectElement
|7 10 480000dd Function: CommonXML.ItemList.Item.SingleFetch
// Input<ObjectElement> InputDocument<ObjectElement>
|0 10 48000143 Function: Data.DistributorA.Item.Fetch.SingleFetch
|1 FetchKey
|2 15 4800029d Field: ItemID
|3 Local
|4 15 4800029d Field: ItemID
|7 10 48000143 Function: Data.DistributorA.Item.Fetch.SingleFetch
// FetchKey<ItemID> Local<ItemID>
|0 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
|1 Input
|2 15 b000e38 Field: WSYDOM/ObjectStoreReference
|3 OutputDocument
|4 15 b000e38 Field: WSYDOM/ObjectStoreReference
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input<ObjectStoreReference> OutputDocument<ObjectStoreReference>
|1 Input
|2 15 a0006ef Field: WSYXML/ParentElement
|3 OutputDocument
|4 15 b0000b1 Field: WSYDOM/ObjectElement
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input<ParentElement> OutputDocument<ObjectElement>
|1 Input
|2 15 b000065 Field: WSYDOM/ObjectDocument
|3 OutputDocument
|4 15 b000065 Field: WSYDOM/ObjectDocument
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input<ObjectDocument> OutputDocument<ObjectDocument>
|1 Input/Data
|2 15 48000565 Field: CommonXML.ReturnOffer.Item.Fields.DeliveryTime
|3 OutputDocument
|4 15 48000565 Field: CommonXML.ReturnOffer.Item.Fields.DeliveryTime
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input/Data<CommonXML.ReturnOffer.Item.Fields.DeliveryTime> OutputDocument<CommonXML.ReturnOffer.Item.Fields.DeliveryTime>
|1 Input/Data
|2 15 4800056b Field: CommonXML.ReturnOffer.Item.Fields.ItemID
|3 OutputDocument
|4 15 4800056b Field: CommonXML.ReturnOffer.Item.Fields.ItemID
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input/Data<CommonXML.ReturnOffer.Item.Fields.ItemID> OutputDocument<CommonXML.ReturnOffer.Item.Fields.ItemID>
|1 Input/Data
|2 15 48000569 Field: CommonXML.ReturnOffer.Item.Fields.Name
|3 OutputDocument
|4 15 48000569 Field: CommonXML.ReturnOffer.Item.Fields.Name
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input/Data<CommonXML.ReturnOffer.Item.Fields.Name> OutputDocument<CommonXML.ReturnOffer.Item.Fields.Name>
|1 Input/Data
|2 15 48000567 Field: CommonXML.ReturnOffer.Item.Fields.Price
|3 OutputDocument
|4 15 48000567 Field: CommonXML.ReturnOffer.Item.Fields.Price
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input/Data<CommonXML.ReturnOffer.Item.Fields.Price> OutputDocument<CommonXML.ReturnOffer.Item.Fields.Price>
ª+3 While InputDocument<ObjectElement> != <ObjectElement.NULL>
|0 10 480000dd Function: CommonXML.ItemList.Item.SingleFetch
|1 Input
|2 15 b000e38 Field: WSYDOM/ObjectStoreReference
|3 InputDocument
|4 15 b000e38 Field: WSYDOM/ObjectStoreReference
|7 10 480000dd Function: CommonXML.ItemList.Item.SingleFetch
// Input<ObjectStoreReference> InputDocument<ObjectStoreReference>
|1 Input
|2 15 b0000b1 Field: WSYDOM/ObjectElement
|3 InputDocument
|4 15 b0000b1 Field: WSYDOM/ObjectElement
|7 10 480000dd Function: CommonXML.ItemList.Item.SingleFetch
// Input<ObjectElement> InputDocument<ObjectElement>
ª+4 Call CommonXML.ItemList.Item.SingleFetch
ª+4 Set InputDocument<ObjectElement> = CommonXML.ItemList.Item.SingleFetch/Output<NextOccurrence>
ª+4 Go Sub Error check
ª+4 Cast Local<ItemID>, Data<CommonXML.ItemList.Item.Fields.ItemID>
|0 10 48000143 Function: Data.DistributorA.Item.Fetch.SingleFetch
|1 FetchKey
|2 15 4800029d Field: ItemID
|3 Local
|4 15 4800029d Field: ItemID
|7 10 48000143 Function: Data.DistributorA.Item.Fetch.SingleFetch
// FetchKey<ItemID> Local<ItemID>
ª+4 Call Data.DistributorA.Item.Fetch.SingleFetch
ª+4 Go Sub Error check
ª+4 Cast OutputDocument<CommonXML.ReturnOffer.Item.Fields.DeliveryTime>, FetchedData<Delivery Time>
ª+4 Cast OutputDocument<CommonXML.ReturnOffer.Item.Fields.ItemID>, FetchedData<ItemID>
ª+4 Cast OutputDocument<CommonXML.ReturnOffer.Item.Fields.Name>, FetchedData<MyName>
ª+4 Cast OutputDocument<CommonXML.ReturnOffer.Item.Fields.Price>, FetchedData<MyPrice>
|0 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
|1 Input
|2 15 b000e38 Field: WSYDOM/ObjectStoreReference
|3 OutputDocument
|4 15 b000e38 Field: WSYDOM/ObjectStoreReference
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input<ObjectStoreReference> OutputDocument<ObjectStoreReference>
|1 Input
|2 15 a0006ef Field: WSYXML/ParentElement
|3 OutputDocument
|4 15 b0000b1 Field: WSYDOM/ObjectElement
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input<ParentElement> OutputDocument<ObjectElement>
|1 Input
|2 15 b000065 Field: WSYDOM/ObjectDocument
|3 OutputDocument
|4 15 b000065 Field: WSYDOM/ObjectDocument
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input<ObjectDocument> OutputDocument<ObjectDocument>
|1 Input/Data
|2 15 48000565 Field: CommonXML.ReturnOffer.Item.Fields.DeliveryTime
|3 OutputDocument
|4 15 48000565 Field: CommonXML.ReturnOffer.Item.Fields.DeliveryTime
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input/Data<CommonXML.ReturnOffer.Item.Fields.DeliveryTime> OutputDocument<CommonXML.ReturnOffer.Item.Fields.DeliveryTime>
|1 Input/Data
|2 15 4800056b Field: CommonXML.ReturnOffer.Item.Fields.ItemID
|3 OutputDocument
|4 15 4800056b Field: CommonXML.ReturnOffer.Item.Fields.ItemID
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input/Data<CommonXML.ReturnOffer.Item.Fields.ItemID> OutputDocument<CommonXML.ReturnOffer.Item.Fields.ItemID>
|1 Input/Data
|2 15 48000569 Field: CommonXML.ReturnOffer.Item.Fields.Name
|3 OutputDocument
|4 15 48000569 Field: CommonXML.ReturnOffer.Item.Fields.Name
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input/Data<CommonXML.ReturnOffer.Item.Fields.Name> OutputDocument<CommonXML.ReturnOffer.Item.Fields.Name>
|1 Input/Data
|2 15 48000567 Field: CommonXML.ReturnOffer.Item.Fields.Price
|3 OutputDocument
|4 15 48000567 Field: CommonXML.ReturnOffer.Item.Fields.Price
|7 10 48000556 Function: CommonXML.ReturnOffer.Item.InsertRow
// Input/Data<CommonXML.ReturnOffer.Item.Fields.Price> OutputDocument<CommonXML.ReturnOffer.Item.Fields.Price>
ª+4 Call CommonXML.ReturnOffer.Item.InsertRow
ª+4 Go Sub Error check
ª+2 Sub Error check
ª+3 If Environment<*Returned status> IS <State: OBJECTS/*Returned status.*Abnormal>
ª+4 Set Environment<*Returning status> = <*Returning status.*Error>
ª+4 Go Sub Terminate
@@