Hi
I am trying to change the line item comments /instruction for existing POs from other modules.
.i use the following code it works but i have no result.
Dim ITEM_WISE_Note As ACCPACXAPILib.xapiView
Dim Session As ACCPACXAPILib.xapiSession
Set Session = CreateObject("ACCPAC.xapisession")
Session.Open userID, "ADMIN", Company_id, Date, 0
Set ITEM_WISE_Note = Nothing
Set ITEM_WISE_Note = Session.OpenView("PO0610", "PO")
With ITEM_WISE_Note
.Init
.Order = 1
.Browse "porhseq = " & l_porhseq & " and porcseq = " & l_linenumber & " ", True
If .Fetch Then
ITEM_WISE_Note.Fields("comment").Value = Trim(Text1.Text)
.Update
End If
.Cancel
End With
Please help me to solve the issue
Thanks
Saravanan
I am trying to change the line item comments /instruction for existing POs from other modules.
.i use the following code it works but i have no result.
Dim ITEM_WISE_Note As ACCPACXAPILib.xapiView
Dim Session As ACCPACXAPILib.xapiSession
Set Session = CreateObject("ACCPAC.xapisession")
Session.Open userID, "ADMIN", Company_id, Date, 0
Set ITEM_WISE_Note = Nothing
Set ITEM_WISE_Note = Session.OpenView("PO0610", "PO")
With ITEM_WISE_Note
.Init
.Order = 1
.Browse "porhseq = " & l_porhseq & " and porcseq = " & l_linenumber & " ", True
If .Fetch Then
ITEM_WISE_Note.Fields("comment").Value = Trim(Text1.Text)
.Update
End If
.Cancel
End With
Please help me to solve the issue
Thanks
Saravanan