AshleyRP 7/31/2008 4:40:28 PM

Payments

I know I'm probably being a pain with all my questions, but I have one more. Does anyone have some code that they could post for me to look at that will input an SOP payment? Or maybe have an idea of where I can find a sample. I have been very unsuccessful at trying to implement this. I haven't been able to find any sample scripts for this that actually work. Here's what I have so far...

Dim serializer As New XmlSerializer(GetType(eConnectType))

Dim eConnect As New eConnectType

Dim Payment As New taCreateSopPaymentInsertRecord_ItemsTaCreateSopPaymentInsertRecord

Dim PaymentType As New SOPTransactionType

For Each Module1.dr In Module1.dt.Rows

r = r + 1

With Payment

OrderTotal = ds.Tables.Item(0).Rows(r).Item(29).ToString

CustomerID = ds.Tables.Item(0).Rows(r).Item(1).ToString

Order_ID = ds.Tables.Item(0).Rows(r).Item(0).ToString

Card_Type = ds.Tables.Item(0).Rows(r).Item(80).ToString

OrderDateTime = ds.Tables.Item(0).Rows(r).Item(24).ToString

PaymentKind = ds.Tables.Item(0).Rows(r).Item(12).ToString

.Action = 1

.DOCAMNT = OrderTotal

.DOCDATE = OrderDateTime

.CUSTNMBR =
"W" & CustomerID.SOPNUMBE = "FF" & Order_ID

.SOPTYPE = 3

.PYMTTYPE = 1

CHEKBKID = "VISA"

.DOCNUMBR = "PMNTFF" & Order_ID

End With

Version: Unknown or N/A
Section: eConnect


Table Definition Quick Links
All Tables
SOP Tables
RM Tables
GL Tables
POP Tables
HR Tables
PM Tables
UPR Tables
IV Tables
Olympic Tables
3