[Event Requests] Table 77 - Report Selections

[bleisibach]

Requesting 7 events with handled pattern....

OnBeforePrintWithCheck

[External] PrintWithCheck(ReportUsage : Integer;RecordVariant : Variant;CustomerNoFieldNo : Integer)
OnBeforePrintWithCheck(ReportUsage,RecordVariant,CustomerNoFieldNo,Handled);
IF Handled THEN
  EXIT;

PrintWithGUIYesNoWithCheck(ReportUsage,RecordVariant,TRUE,CustomerNoFieldNo);
.
.

LOCAL [IntegrationEvent] OnBeforePrintWithCheck(ReportUsage : Integer;RecordVariant : Variant;CustomerNoFieldNo : Integer;VAR Handled : Boolean)

OnBeforePrintWithGUIYesNoWithCheckVendor

[External] PrintWithGUIYesNoWithCheckVendor(ReportUsage : Integer;RecordVariant : Variant;IsGUI : Boolean;VendorNoFieldNo : Integer)
OnBeforePrintWithGUIYesNoWithCheckVendor(ReportUsage,RecordVariant,IsGUI,VendorNoFieldNo,Handled);
IF Handled THEN
  EXIT;

PrintDocumentsWithCheckGUIYesNoCommon(ReportUsage,RecordVariant,IsGUI,VendorNoFieldNo,TRUE,DATABASE::Vendor);
.
.

LOCAL [IntegrationEvent] OnBeforePrintWithGUIYesNoWithCheckVendor(ReportUsage : Integer;RecordVariant : Variant;IsGUI : Boolean;VendorNoFieldNo : Integer;VAR Handled : Boolean)

OnBeforePrint

[External] Print(ReportUsage : Integer;RecordVariant : Variant;CustomerNoFieldNo : Integer)
OnBeforePrint(ReportUsage,RecordVariant,CustomerNoFieldNo,Handled);
IF Handled THEN
  EXIT;

PrintWithGUIYesNo(ReportUsage,RecordVariant,TRUE,CustomerNoFieldNo);
.
.

LOCAL [IntegrationEvent] OnBeforePrint(ReportUsage : Integer;RecordVariant : Variant;CustomerNoFieldNo : Integer;VAR Handled : Boolean)

OnBeforePrintWithGUIYesNo

[External] PrintWithGUIYesNo(ReportUsage : Integer;RecordVariant : Variant;IsGUI : Boolean;CustomerNoFieldNo : Integer)
OnBeforePrintWithGUIYesNo(ReportUsage,RecordVariant,IsGUI,CustomerNoFieldNo,Handled);
IF Handled THEN
  EXIT;

PrintDocumentsWithCheckGUIYesNoCommon(ReportUsage,RecordVariant,IsGUI,CustomerNoFieldNo,FALSE,DATABASE::Customer);
.
.

LOCAL [IntegrationEvent] OnBeforePrintWithGUIYesNo(ReportUsage : Integer;RecordVariant : Variant;IsGUI : Boolean;CustomerNoFieldNo : Integer;VAR Handled : Boolean)

OnBeforePrintWithGUIYesNoVendor

[External] PrintWithGUIYesNoVendor(ReportUsage : Integer;RecordVariant : Variant;IsGUI : Boolean;VendorNoFieldNo : Integer)
OnBeforePrintWithGUIYesNoVendor(ReportUsage,RecordVariant,IsGUI,VendorNoFieldNo,Handled);
IF Handled THEN
  EXIT;

PrintDocumentsWithCheckGUIYesNoCommon(ReportUsage,RecordVariant,IsGUI,VendorNoFieldNo,FALSE,DATABASE::Vendor);
.
.

LOCAL [IntegrationEvent] OnBeforePrintWithGUIYesNoVendor(ReportUsage : Integer;RecordVariant : Variant;IsGUI : Boolean;VendorNoFieldNo : Integer;VAR Handled : Boolean)

OnBeforeSendEmailToCust

SendEmailToCust(ReportUsage : Integer;RecordVariant : Variant;DocNo : Code[20];DocName : Text[150];ShowDialog : Boolean;CustNo : Code[20])
OnBeforeSendEmailToCust(ReportUsage,RecordVariant,DocNo,DocName,ShowDialog,CustNo,Handled);
IF Handled THEN
  EXIT;

IF ShowDialog OR
   (NOT SMTPMail.IsEnabled) OR
   (GetEmailAddressIgnoringLayout(ReportUsage,RecordVariant,CustNo) = '') OR
   OfficeMgt.IsAvailable
THEN BEGIN
  SendEmailToCustDirectly(ReportUsage,RecordVariant,DocNo,DocName,TRUE,CustNo);
  EXIT;
END;
.
.

LOCAL [IntegrationEvent] OnBeforeSendEmailToCust(ReportUsage : Integer;RecordVariant : Variant;DocNo : Code[20];DocName : Text[150];ShowDialog : Boolean;CustNo : Code[20];VAR Handled : Boolean)

OnBeforeSendEmailToVendor

SendEmailToVendor(ReportUsage : Integer;RecordVariant : Variant;DocNo : Code[20];DocName : Text[150];ShowDialog : Boolean;VendorNo : Code[20])
OnBeforeSendEmailToVendor(ReportUsage,RecordVariant,DocNo,DocName,ShowDialog,VendorNo,Handled);
IF Handled THEN
  EXIT;

VendorEmail := GetVendorEmailAddress(VendorNo,RecordVariant,ReportUsage);
.
.

LOCAL [IntegrationEvent] OnBeforeSendEmailToVendor(ReportUsage : Integer;RecordVariant : Variant;DocNo : Code[20];DocName : Text[150];ShowDialog : Boolean;VendorNo : Code[20];VAR Handled : Boolean)