Batch Assemblies ....

[uranshushka]

Hi,

I have developed a production scheduling application which exchanges information with Accpac (transfer of new orders to SQL server through DTS and production entries through xapi).
UI in Accpac for assembly entries is not user friendly when you have to enter a lot of different assemblies, but it has a usefull function "Verify Quantities" which i can't figure out how to use. Any info on the subject would be greatly appreciated. Here is a snipet of my code:
Set oAccView = oAccSes.OpenView("IC0160", "ICASEN&quot
Set oAccFields = oAccView.Fields
If rsFinished.RecordCount > 0 Then
rsFinished.MoveFirst
While Not rsFinished.EOF
If rsFinished!QTYORDERED > 0 Then
oAccView.Init
oAccView.Init
oAccFields("DOCNUM&quot.Value = CStr(DatePart("y", Date)) + CStr(Year(Date))
oAccFields("TRANSDATE&quot.Value = Date
oAccFields("ITEMNO&quot.Value = rsFinished!Item
oAccFields("BOMNO&quot.Value = "1"
oAccFields("LOCATION&quot.Value = "FAB"
oAccFields("QUANTITY&quot.Value = CStr(rsFinished!QTYORDERED)
oAccFields("HDRDESC&quot.PutWithoutVerification ("Production Scheduler" & rsFinished!OrdNumber)

Here i would like to trap entries with insufficient raw materials and generate an exception report

oAccView.Insert
End If
rsFinished.MoveNext
Wend