IC Assembly screen customization - throws error Record Already Exists..

[ramkumar73]

I am intended to associate ic shipment-entry from ic assembly, so i customized the IC Assembly screen. To associate, ic-shipments, i have stored item numbers (which is not a part of ICBOM - non bom items) in a custom table.
here is the coding

When i click on POST, the system throws Record Already Exists error. I checked the document number in IC Options. the next number is fine for IC Shipments and IC Assembly...

Since the Item is serialized item, there it shows a popup, so i could not capture the posting in dsICASEN_OnRecordChanging...
i am doing it in dsICASEN_OnRecordChanged IS it right? if wrong...please suggest...


Please.... Please... help....

'-----------------------------------------------

If eReason = RSN_POST Then

ElseIf RSN_PROCESS Then

If dsICASEN.Fields("DOCNUM").Value = "*** NEW ***" Then

Else
If popup = True Then

'MsgBox (dsICASEN.Fields("DOCNUM").Value)
PbStrASSSEQNO = ""
PbStrASSYDOCNO = ""
PbStrASSDATE = ""
PbStrASSTIME = ""
PbStrAUDTORG = ""
PbStrASSYDOCNO = dsICASEN.Fields("DOCNUM").Value
PbStrASSSEQNO = dsICASEN.Fields("ASSMENSEQ").Value
PbStrASSDATE = Year(dsICASEN.Fields("TRANSDATE").Value)

PbStrAUDTORG = CompanyID 'dsICASEN.Fields("AUDTORG").Value


If Month(dsICASEN.Fields("TRANSDATE").Value) > 9 Then

PbStrASSDATE = PbStrASSDATE & Month(dsICASEN.Fields("TRANSDATE").Value)

Else

PbStrASSDATE = PbStrASSDATE & "0" & Month(dsICASEN.Fields("TRANSDATE").Value)

End If

If Day(dsICASEN.Fields("TRANSDATE").Value) > 9 Then

PbStrASSDATE = PbStrASSDATE & Day(dsICASEN.Fields("TRANSDATE").Value)

Else

PbStrASSDATE = PbStrASSDATE & "0" & Day(dsICASEN.Fields("TRANSDATE").Value)

End If

'txtStatus.Text = "Creating IC Shipments.... Pl. Wait.."
Call cmdShipment_Click
' txtStatus.Text = "Updating Assembly Flags... Pl.Wait.."
Call UpdateAssemblyFlag
' txtStatus.Text = "Capturing Accpac Sl.No.... Pl. Wait.."
Call CaptureAccpacSlno
txtStatus.Text = "Process Completed..."
popup = False
End If

End If


Thanks
RAM73

 

[Jay Converse]

Use RVSPY to diagnose.