AftedrPrintOrPrieview greift nach Update nicht mehr
Monika Lutz
Hallo allerseits,letztes Wochenende haben wir ein Upgrade auf PL 49 und coresuite Designer Version 2.0 durchgeführt.
Nun greift das Event AfterPrintOrPreview nicht mehr.
Hat sich da etwas geändert?
Hat jemand eine Idee, woran das liegen kann?
Code im Generate Script:
Die Mekldung in der Statuszeile erscheint.If Not Engine.IsDoublePass Then
AddHandler LayoutHelper.LD.AfterPrintOrPreview, AddressOf LD_AfterPrintOrPreview
'SwissAddonFramework.Messaging.StatusBar.WriteSucess("Handler installiert")
End If
Code im CommonScript:
Private Sub LD_AfterPrintOrPreview()
'Wenn Parmeter Free text "c" ist alle Vorgänge schließen
Dim oCompany As SAPbobsCOM.Company
SwissAddonFramework.Messaging.StatusBar.WriteSucess("After Print")
'System.Windows.Forms.MessageBox.Show("Jetzt wedden die Angebote geschlossen", "Info")
If (GetData("LD.Par.FreeText")).ToString = "c" Then
oCompany = SwissAddonFramework.B1Connector.GetB1Connector().Company
'System.Windows.Forms.MessageBox.Show("Jetzt wedden die Angebote geschlossen", "Info")
Dim oAngebot As SAPbobsCOM.Documents
oAngebot = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oQuotations)
For each i as Integer in aDocEntries
Try
oAngebot.GetByKey(i)
oAngebot.Close()
Catch ex As Exception
System.Windows.Forms.MessageBox.Show(oCompany.GetLastErrorDescription(), "Fehler")
End Try
Next i
End If
End Sub
Weder die Meldung in der Statuszeile noch die Messagebox erscheint.
Danke, Monika
0
Please sign in to leave a comment.
Comments
0 comments