![]() InsertIntegrationFieldMapping('Prospect', Prospect.FieldNo("No."), CDSProspect.FieldNo(cr95d_ProspectsId), IntegrationFieldMapping.Direction::Bidirectional, '', true, false) IntegrationTableMapping: Record "Integration Table Mapping" ĭATABASE::"Prospect", DATABASE::"CDS cr95d_Prospects", CDSProspect.FieldNo(cr95d_ProspectsId), CDSProspect.FieldNo(ModifiedOn), '', '', true) Local procedure OnAfterResetConfiguration(CDSConnectionSetup: Record "CDS Connection Setup") Search for Event OnAfterResetConfiguration – “CDS Setup Defaults” Local procedure OnAddEntityTableMapping(var TempNameValueBuffer: Record "Name/Value Buffer") ĪddEntityTableMapping('Prospect', DATABASE::"CDS cr95d_Prospects", TempNameValueBuffer) Search for Event OnAddEntityTableMapping – “CRM Setup Defaults” Handled := LookupCDSProspect(SavedCRMId, CRMId, IntTableFilter) If CRMTableID = Database::"CDS cr95d_Prospects" then Local procedure OnLookupCRMTables(CRMTableID: Integer NAVTableId: Integer SavedCRMId: Guid var CRMId: Guid IntTableFilter: Text var Handled: Boolean) Search for Event OnLookupCRMTables – “Lookup CRM Tables” ![]() If BCTableNo = DATABASE::"Prospect" then beginĬDSTableNo := DATABASE::"CDS cr95d_Prospects" Local procedure OnGetCDSTableNo(BCTableNo: Integer var CDSTableNo: Integer var handled: Boolean) Search for Event OnGetCDSTableNo – “CRM Setup Defaults” ![]() To Add Event Subscriptions, Use the new Shift+Alt+E shortcut in the AL code editor to invoke a list of all events. IntegrationFieldMapping.CreateRecord(IntegrationTableMappingName, TableFieldNo, IntegrationTableFieldNo, SynchDirection,ĬonstValue, ValidateField, ValidateIntegrationTableField) IntegrationFieldMapping: Record "Integration Field Mapping" Procedure InsertIntegrationFieldMapping(IntegrationTableMappingName: Code TableFieldNo: Integer IntegrationTableFieldNo: Integer SynchDirection: Option ConstValue: Text ValidateField: Boolean ValidateIntegrationTableField: Boolean) IntegrationTableMapping.CreateRecord(MappingName, TableNo, IntegrationTableNo, IntegrationTableUIDFieldNo, IntegrationTableModifiedFieldNo, TableConfigTemplateCode, IntegrationTableConfigTemplateCode, SynchOnl圜oupledRecords, IntegrationTableMapping.Direction::Bidirectional, 'CDS') Local procedure InsertIntegrationTableMapping(var IntegrationTableMapping: Record "Integration Table Mapping" MappingName: Code TableNo: Integer IntegrationTableNo: Integer IntegrationTableUIDFieldNo: Integer IntegrationTableModifiedFieldNo: Integer TableConfigTemplateCode: Code IntegrationTableConfigTemplateCode: Code SynchOnl圜oupledRecords: Boolean) TempNameValueBuffer.Value := Format(TableID) TempNameValueBuffer.Name := CopyStr(CRMEntityTypeName, 1, MaxStrLen(TempNameValueBuffer.Name)) ![]() TempNameValueBuffer.ID := TempNameValueBuffer.Count + 1 Local procedure AddEntityTableMapping(CRMEntityTypeName: Text TableID: Integer var TempNameValueBuffer: Record "Name/Value Buffer" temporary) OriginalCDSProspectList.GetRecord(CDSProspect) If OriginalCDSProspectList.RunModal = ACTION::LookupOK then begin OriginalCDSProspectList.LookupMode(true) OriginalCDSProspectList.SetTableView(CDSProspect) OriginalCDSProspectList.SetCurrentl圜oupledCDSProspect(OriginalCDSProspect) If OriginalCDSProspect.Get(SavedCRMId) then OriginalCDSProspectList.SetRecord(CDSProspect) OriginalCDSProspectList: Page "CDS Prospect List" OriginalCDSProspect: Record "CDS cr95d_Prospects" If you want to go to previous post click here.įrom the series of steps this post is dedicated to Step-6:Īs a Sixth Step we will Create Integration Codeunit in Business Central codeunit 50120 CDSDataverseEventĪdd these Procedures local procedure LookupCDSProspect(SavedCRMId: Guid var CRMId: Guid IntTableFilter: Text): BooleanĬDSProspect: Record "CDS cr95d_Prospects"
0 Comments
Leave a Reply. |