Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations IamaSherpa on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

OE CREATION OF INVOICE

Status
Not open for further replies.

Zak2009

Programmer
Sep 4, 2009
325
KE
Hi All,

I have an issue.When a shipment was done and the create invoice check box checked it did not create an invoice. But the goods were shipped.

When attempting to create the invoice from the OE invoice entry screen and choosing the shipment number the bellow error occurs and is preventing me from creating an invoice.

ver 300 6.1
sp 2
DB sql2012

Thanks
 
Sorry here it is

Order Detail. Record has been modified by another program.
Incorrect procedure.Invoice cannot be posted. You must manually create the invoice from invoice entry
 
I have attempted to make a new invoice from OE Invoice and referencing the shipment number and thats where am getting that error
 
I'm seeing a lot of these errors in OE 6.1
Usually ICILOC and ICCOST don't add up. Check if QTYONHAND = QTYOFFSET and TOTALCOST = COSTOFFSET for the item and location on the shipment.
 
I should have been more specific:
Check in ICILOC if QTYONHAND = QTYOFFSET and TOTALCOST = COSTOFFSET for the item and location on the shipment.
 
In case they are not matching, what is the way forward. Am assuming that line of thought would have to change if they are the same.
 
Ok, then no problems there, they should match.
If they do not match then you need to look at ICCOST, the values in ICCOST should make up the difference - if not then you need to edit QTYOFFSET and COSTOFFSET.
But since they match then that is not the problem.
 
You will have to run RvSpy and then figure out the error from there.
 
Here is a macro recording for this issue.....anyone with insights on where to look for the solution



Sub MainSub()
'
' Sage 300 ERP Macro file: C:\Program Files (x86)\Sage\Sage 300 ERP\Macros\MACRO01.AVB
' Recorded at: Mon Apr 14 12:09:26 2014
'

On Error GoTo ACCPACErrorHandler

' TODO: To increase efficiency, comment out any unused DB links.
Dim mDBLinkCmpRW As AccpacCOMAPI.AccpacDBLink
Set mDBLinkCmpRW = OpenDBLink(DBLINK_COMPANY, DBLINK_FLG_READWRITE)

Dim mDBLinkSysRW As AccpacCOMAPI.AccpacDBLink
Set mDBLinkSysRW = OpenDBLink(DBLINK_SYSTEM, DBLINK_FLG_READWRITE)

Dim temp As Boolean

OEINV15headerFields("SHINUMBER").Value = "SH00000448" ' Shipment Number
OEINV15headerFields("INV1SHIPMT").Value = "1" ' Generate Inv. from Single Ship.

OEINV15header.Process
temp = OEINV15header.Exists
temp = OEINV15header.Exists
temp = OEINV15header.Exists
temp = OEINV15header.Exists
temp = OEINV15header.Exists
temp = OEINV15header.Exists
temp = OEINV15header.Exists
temp = OEINV15header.Exists
temp = OEINV15header.Exists
temp = OEINV15header.Exists
temp = OEINV15header.Exists

OEINV15headerFields("OECOMMAND").PutWithoutVerification ("4") ' Process O/E Command

OEINV15header.Process
temp = OEINV15header.Exists
OEINV15header.Insert
OEINV15header.Cancel

Exit Sub

ACCPACErrorHandler:
Dim lCount As Long
Dim lIndex As Long

If Errors Is Nothing Then
MsgBox Err.Description
Else
lCount = Errors.Count

If lCount = 0 Then
MsgBox Err.Description
Else
For lIndex = 0 To lCount - 1
MsgBox Errors.Item(lIndex)
Next
Errors.Clear
End If
Resume Next

End If

End Sub
 
A macro recording? How is that going to help to solve the issue?
You need to run RV Spy... Start, Sage, Sage 300 ERP 2012, Tools, RVSpy
 
RVSPY and DBSPY dont give any good leads.

Solution: I cleared table OEORDDL (should be empty for goods that have been shipped out). Temp table that stores Lot numbers in an order.

 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top