Codeunit "Job Calculate Batches"

ID 1005
Namespace: Microsoft.Projects.Project.Journal

Methods

SplitLines

procedure SplitLines(var JT2: Record "Job Task"): Integer

Parameters

Name Type Description
JT2 Table Microsoft.Projects.Project.Job."Job Task"

Returns

Type Description
Integer

TransferToPlanningLine

procedure TransferToPlanningLine(var JobLedgEntry: Record "Job Ledger Entry", LineType: Integer)

Parameters

Name Type Description
JobLedgEntry Table Microsoft.Projects.Project.Ledger."Job Ledger Entry"
LineType Integer

ChangePlanningDates

procedure ChangePlanningDates(JT: Record "Job Task", ScheduleLine: Boolean, ContractLine: Boolean, PeriodLength: DateFormula, FixedDate: Date, StartingDate: Date, EndingDate: Date)

Parameters

Name Type Description
JT Table Microsoft.Projects.Project.Job."Job Task"
ScheduleLine Boolean
ContractLine Boolean
PeriodLength DateFormula
FixedDate Date
StartingDate Date
EndingDate Date

ChangeCurrencyDates

procedure ChangeCurrencyDates(JT: Record "Job Task", scheduleLine: Boolean, ContractLine: Boolean, PeriodLength: DateFormula, FixedDate: Date, StartingDate: Date, EndingDate: Date)

Parameters

Name Type Description
JT Table Microsoft.Projects.Project.Job."Job Task"
scheduleLine Boolean
ContractLine Boolean
PeriodLength DateFormula
FixedDate Date
StartingDate Date
EndingDate Date

ChangeDatesEnd

procedure ChangeDatesEnd()

CreateJT

procedure CreateJT(JobPlanningLine: Record "Job Planning Line")

Parameters

Name Type Description
JobPlanningLine Table Microsoft.Projects.Project.Planning."Job Planning Line"

InitDiffBuffer

procedure InitDiffBuffer()

PostDiffBuffer

procedure PostDiffBuffer(DocNo: Code[20], PostingDate: Date, TemplateName: Code[10], BatchName: Code[10])

Parameters

Name Type Description
DocNo Code[20]
PostingDate Date
TemplateName Code[10]
BatchName Code[10]

BatchError

procedure BatchError(PostingDate: Date, DocNo: Code[20])

Parameters

Name Type Description
PostingDate Date
DocNo Code[20]

EndCreateInvoice

procedure EndCreateInvoice(NoOfInvoices: Integer)

Parameters

Name Type Description
NoOfInvoices Integer

CalculateActualToBudget

procedure CalculateActualToBudget(var Job: Record Job, JT: Record "Job Task", var JobDiffBuffer2: Record "Job Difference Buffer", var JobDiffBuffer3: Record "Job Difference Buffer", CurrencyType: Option)

Parameters

Name Type Description
Job Table Microsoft.Projects.Project.Job.Job
JT Table Microsoft.Projects.Project.Job."Job Task"
JobDiffBuffer2 Table Microsoft.Projects.Project.Journal."Job Difference Buffer"
JobDiffBuffer3 Table Microsoft.Projects.Project.Journal."Job Difference Buffer"
CurrencyType Option

GetCurrencyCode

procedure GetCurrencyCode(var Job: Record Job, Type: Option, CurrencyType: Option): Text[50]

Parameters

Name Type Description
Job Table Microsoft.Projects.Project.Job.Job
Type Option
CurrencyType Option

Returns

Type Description
Text[50]

Events

OnBeforeJobPlanningLineInsert

[IntegrationEvent(False,False)]
local procedure OnBeforeJobPlanningLineInsert(var JobPlanningLine: Record "Job Planning Line")

Parameters

Name Type Description
JobPlanningLine Table Microsoft.Projects.Project.Planning."Job Planning Line"

OnBeforePostDiffBuffer

[IntegrationEvent(False,False)]
local procedure OnBeforePostDiffBuffer(var JobDiffBuffer: array[2] of Record "Job Difference Buffer", var IsHandled: Boolean)

Parameters

Name Type Description
JobDiffBuffer array[2] of Record "Job Difference Buffer"
IsHandled Boolean

OnBeforeTransferToPlanningLine

[IntegrationEvent(False,False)]
local procedure OnBeforeTransferToPlanningLine(var JobLedgerEntry: Record "Job Ledger Entry")

Parameters

Name Type Description
JobLedgerEntry Table Microsoft.Projects.Project.Ledger."Job Ledger Entry"

OnCreateJTOnBeforeAssigneJobDiffBuffer2

[IntegrationEvent(False,False)]
local procedure OnCreateJTOnBeforeAssigneJobDiffBuffer2(var JobDiffBuffer: array[2] of Record "Job Difference Buffer", JobPlanningLine: Record "Job Planning Line")

Parameters

Name Type Description
JobDiffBuffer array[2] of Record "Job Difference Buffer"
JobPlanningLine Table Microsoft.Projects.Project.Planning."Job Planning Line"

OnChangeCurrencyDatesOnBeforeJobPlanningLineModify

[IntegrationEvent(False,False)]
local procedure OnChangeCurrencyDatesOnBeforeJobPlanningLineModify(var JobPlanningLine: Record "Job Planning Line")

Parameters

Name Type Description
JobPlanningLine Table Microsoft.Projects.Project.Planning."Job Planning Line"

OnChangePlanningDatesOnBeforeJobPlanningLineModify

[IntegrationEvent(False,False)]
local procedure OnChangePlanningDatesOnBeforeJobPlanningLineModify(var JobPlanningLine: Record "Job Planning Line")

Parameters

Name Type Description
JobPlanningLine Table Microsoft.Projects.Project.Planning."Job Planning Line"

OnPostDiffBufferOnAfterInsertJobJnlLine

[IntegrationEvent(False,False)]
local procedure OnPostDiffBufferOnAfterInsertJobJnlLine(var JobJnlLine: Record "Job Journal Line", var JobDiffBuffer: Record "Job Difference Buffer" temporary)

Parameters

Name Type Description
JobJnlLine Table Microsoft.Projects.Project.Journal."Job Journal Line"
JobDiffBuffer Table Microsoft.Projects.Project.Journal."Job Difference Buffer"

OnPostDiffBufferOnBeforeModify

[IntegrationEvent(False,False)]
local procedure OnPostDiffBufferOnBeforeModify(var JobLedgEntry: Record "Job Ledger Entry", var JobDiffBuffer: Record "Job Difference Buffer" temporary)

Parameters

Name Type Description
JobLedgEntry Table Microsoft.Projects.Project.Ledger."Job Ledger Entry"
JobDiffBuffer Table Microsoft.Projects.Project.Journal."Job Difference Buffer"

OnPostDiffBufferOnAfterSetFilters

[IntegrationEvent(False,False)]
local procedure OnPostDiffBufferOnAfterSetFilters(var JobLedgerEntry: Record "Job Ledger Entry", var JobDifferenceBuffer: Record "Job Difference Buffer" temporary)

Parameters

Name Type Description
JobLedgerEntry Table Microsoft.Projects.Project.Ledger."Job Ledger Entry"
JobDifferenceBuffer Table Microsoft.Projects.Project.Journal."Job Difference Buffer"

OnBeforeCreateJT

[IntegrationEvent(False,False)]
local procedure OnBeforeCreateJT(var IsHanlded: Boolean, JobPlanningLine: Record "Job Planning Line")

Parameters

Name Type Description
IsHanlded Boolean
JobPlanningLine Table Microsoft.Projects.Project.Planning."Job Planning Line"

OnBeforeInsertDiffBuffer

[IntegrationEvent(False,False)]
local procedure OnBeforeInsertDiffBuffer(var JobLedgerEntry: Record "Job Ledger Entry", var JobPlanningLine: Record "Job Planning Line", var JobDiffBuffer: array[2] of Record "Job Difference Buffer", LineType: Option, CurrencyType: Option)

Parameters

Name Type Description
JobLedgerEntry Table Microsoft.Projects.Project.Ledger."Job Ledger Entry"
JobPlanningLine Table Microsoft.Projects.Project.Planning."Job Planning Line"
JobDiffBuffer array[2] of Record "Job Difference Buffer"
LineType Option
CurrencyType Option

OnAfterInsertDiffBuffer

[IntegrationEvent(False,False)]
local procedure OnAfterInsertDiffBuffer(var JobLedgerEntry: Record "Job Ledger Entry", var JobPlanningLine: Record "Job Planning Line", var JobDiffBuffer: array[2] of Record "Job Difference Buffer", LineType: Option, CurrencyType: Option)

Parameters

Name Type Description
JobLedgerEntry Table Microsoft.Projects.Project.Ledger."Job Ledger Entry"
JobPlanningLine Table Microsoft.Projects.Project.Planning."Job Planning Line"
JobDiffBuffer array[2] of Record "Job Difference Buffer"
LineType Option
CurrencyType Option

OnChangeCurrencyDatesOnBeforeChangeCurrencyDate

[IntegrationEvent(False,False)]
local procedure OnChangeCurrencyDatesOnBeforeChangeCurrencyDate(var JobPlanningLine: Record "Job Planning Line", var ForceDateUpdate: Boolean)

Parameters

Name Type Description
JobPlanningLine Table Microsoft.Projects.Project.Planning."Job Planning Line"
ForceDateUpdate Boolean

OnBeforeEndCreateInvoice

[IntegrationEvent(False,False)]
local procedure OnBeforeEndCreateInvoice(var NoOfInvoices: Integer, var IsHandled: Boolean)

Parameters

Name Type Description
NoOfInvoices Integer
IsHandled Boolean

See also