Skip to content

KVSKBAContactLib#

Procedures#

GetContNoByNoAndTableID(Code[20], Integer) : Code[20]#

procedure GetContNoByNoAndTableID(noPar: Code[20]; tableIDPar: Integer): Code[20]

GetCurrNoAndTableIDByContNo(Code[20], Code[20], Integer) :#

procedure GetCurrNoAndTableIDByContNo(contNoPar: Code[20]; var currNoVar: Code[20]; var currTableIDVar: Integer): 

GetSalutCodeByNoAndTableID(Code[20], Integer) : Code[10]#

procedure GetSalutCodeByNoAndTableID(noPar: Code[20]; tableIDPar: Integer): Code[10]

CalcNumberOfSalesDocByContNo(Code[20], Integer) : Integer#

procedure CalcNumberOfSalesDocByContNo(contNoPar: Code[20]; docTypePar: Integer): Integer

CreateActivityByContNo(Code[20]) :#

procedure CreateActivityByContNo(contNoPar: Code[20]): 

CreateOpportunityByContNo(Code[20]) :#

procedure CreateOpportunityByContNo(contNoPar: Code[20]): 

CreatePersonByContNo(Code[20]) :#

procedure CreatePersonByContNo(contNoPar: Code[20]): 

CreatePhoneCallByContNo(Code[20]) :#

procedure CreatePhoneCallByContNo(contNoPar: Code[20]): 

CreatePurchDocByContNo(Code[20], Enum Purchase Document Type) :#

procedure CreatePurchDocByContNo(contNoPar: Code[20]; docTypePar: Enum "Purchase Document Type"): 

CreateSalesDocByContNo(Code[20], Enum Sales Document Type) : Code[20]#

procedure CreateSalesDocByContNo(contNoPar: Code[20]; docTypePar: Enum "Sales Document Type"): Code[20]

CreateToDoByContNo(Code[20]) :#

procedure CreateToDoByContNo(contNoPar: Code[20]): 

GetCustNo(Record Contact) : Code[20]#

procedure GetCustNo(ContactPar: Record "Contact"): Code[20]

GetVendNo(Record Contact) : Code[20]#

procedure GetVendNo(ContactPar: Record "Contact"): Code[20]

Events#

OnBeforeCreateVendorPart1Tab5050(Record Contact, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCreateVendorPart1Tab5050(Contact: Record "Contact"; var Handled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAContactLib", 'OnBeforeCreateVendorPart1Tab5050', '', false, false)]
local procedure DoSomethingOnBeforeCreateVendorPart1Tab5050(Contact: Record "Contact"; var Handled: Boolean)
begin
end;

OnCreatePersonByContNoOnBeforeDeleteEmptyContact(Record Contact, Record Contact, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnCreatePersonByContNoOnBeforeDeleteEmptyContact(var Contact: Record "Contact"; CompanyContact: Record "Contact"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAContactLib", 'OnCreatePersonByContNoOnBeforeDeleteEmptyContact', '', false, false)]
local procedure DoSomethingOnCreatePersonByContNoOnBeforeDeleteEmptyContact(var Contact: Record "Contact"; CompanyContact: Record "Contact"; var IsHandled: Boolean)
begin
end;

OnCalcNumberOfSalesDocByContNoOnBeforeCurrTableIDCaseElse(Code[20], Integer, Code[20], Integer, Integer, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnCalcNumberOfSalesDocByContNoOnBeforeCurrTableIDCaseElse(ContNo: Code[20]; DocType: Integer; CurrNo: Code[20]; CurrTableID: Integer; var ReturnValue: Integer; var Handled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAContactLib", 'OnCalcNumberOfSalesDocByContNoOnBeforeCurrTableIDCaseElse', '', false, false)]
local procedure DoSomethingOnCalcNumberOfSalesDocByContNoOnBeforeCurrTableIDCaseElse(ContNo: Code[20]; DocType: Integer; CurrNo: Code[20]; CurrTableID: Integer; var ReturnValue: Integer; var Handled: Boolean)
begin
end;

OnCreatePersonByContNoOnAfterModifyContact(Record Contact, Record Contact) :#

[IntegrationEvent(false, false)]
local procedure OnCreatePersonByContNoOnAfterModifyContact(var Contact: Record "Contact"; CompanyContact: Record "Contact"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAContactLib", 'OnCreatePersonByContNoOnAfterModifyContact', '', false, false)]
local procedure DoSomethingOnCreatePersonByContNoOnAfterModifyContact(var Contact: Record "Contact"; CompanyContact: Record "Contact")
begin
end;

OnCreatePersonByContNoOnBeforeModifyContact(Record Contact, Record Contact) :#

[IntegrationEvent(false, false)]
local procedure OnCreatePersonByContNoOnBeforeModifyContact(var Contact: Record "Contact"; CompanyContact: Record "Contact"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAContactLib", 'OnCreatePersonByContNoOnBeforeModifyContact', '', false, false)]
local procedure DoSomethingOnCreatePersonByContNoOnBeforeModifyContact(var Contact: Record "Contact"; CompanyContact: Record "Contact")
begin
end;

OnLookupCockpitByContNoOnBeforeRunModalPage(Record Contact, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnLookupCockpitByContNoOnBeforeRunModalPage(var Contact: Record "Contact"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAContactLib", 'OnLookupCockpitByContNoOnBeforeRunModalPage', '', false, false)]
local procedure DoSomethingOnLookupCockpitByContNoOnBeforeRunModalPage(var Contact: Record "Contact"; var IsHandled: Boolean)
begin
end;

OnUpdatePurchaseQuotesBeforeChangePurchHeader(Record Purchase Header, Record Contact, Record Vendor, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnUpdatePurchaseQuotesBeforeChangePurchHeader(var PurchaseHeader: Record "Purchase Header"; Contact: Record "Contact"; Vendor: Record "Vendor"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBAContactLib", 'OnUpdatePurchaseQuotesBeforeChangePurchHeader', '', false, false)]
local procedure DoSomethingOnUpdatePurchaseQuotesBeforeChangePurchHeader(var PurchaseHeader: Record "Purchase Header"; Contact: Record "Contact"; Vendor: Record "Vendor"; var IsHandled: Boolean)
begin
end;