mirror of
https://github.com/microsoft/BCQuality.git
synced 2026-10-05 14:46:55 +01:00
eb9cae0af4
- activate-new-price-calculation-handler-via-onfindsupportedsetup: Default := true is required only for the fallback branch of PriceCalculationMgt's two-stage FindSetup - a handler reachable via a specific Dtld. Price Calculation Setup row needs no Default. Softened the article and its worklist cue accordingly. Also fixed an undefined "Sample Price Calc - Special" codeunit referenced but never declared in the eval fixtures - added a real implementation of interface "Price Calculation" with stub methods. - new-price-source-must-add-candidate-and-trigger-recalculation: the good fixture called UpdateUnitPriceByField directly, which is a silent no-op without a prior PlanPriceCalcByField call (FieldCausedPriceCalculation gating, verified against SalesLine.Table.al). Switched to the public UpdateUnitPrice wrapper, matching real BCApps usage in ItemReferenceManagement.Codeunit.al. - report-barcodes-must-use-barcode-module-and-production-font-name: split the 1D (ValidateInput + EncodeFont) and 2D (EncodeFont only) Barcode Font Provider interfaces, which the article previously conflated. Reframed the Code 39 anti-pattern around demonstrable encoding/checksum mismatch (verified against IDA1DCode39Encoder.Codeunit.al's real '(value)' output) rather than rejecting all manual delimiter use, since '*' is a legitimate Code 39 start/stop character. Also fixed extend-find-entries-navigate- for-new-document-types' eval fixtures, which referenced an undefined "Sample Posted Document Header" table/page - declared both. All claims re-verified against live microsoft/BCApps source. Validators: frontmatter 0/0, review-fixtures 126/20 domains PASSED, knowledge-index 342/575 PASSED, skill-index 19 leaves PASSED. Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
38 lines
1.7 KiB
AL
38 lines
1.7 KiB
AL
tableextension 50105 "Sample Sales Line Ext" extends "Sales Line"
|
|
{
|
|
fields
|
|
{
|
|
field(50100; "Sample Loyalty Customer No."; Code[20])
|
|
{
|
|
Caption = 'Sample Loyalty Customer No.';
|
|
TableRelation = Customer;
|
|
|
|
trigger OnValidate()
|
|
begin
|
|
// Second half of the wiring: without this call, changing
|
|
// the field on an existing line never re-runs price
|
|
// calculation, even though the source is already a known
|
|
// candidate via OnAfterAddSources below.
|
|
//
|
|
// UpdateUnitPriceByField(CalledByFieldNo) only recalculates
|
|
// if PlanPriceCalcByField(CalledByFieldNo) was already
|
|
// called for that same field - calling it alone is a
|
|
// silent no-op. UpdateUnitPrice(CalledByFieldNo) does both
|
|
// steps in the right order (plan, then update) in one
|
|
// call; it's the same method the base app itself calls
|
|
// from outside Sales Line to trigger recalculation for a
|
|
// field it just changed.
|
|
UpdateUnitPrice(FieldNo("Sample Loyalty Customer No."));
|
|
end;
|
|
}
|
|
}
|
|
}
|
|
|
|
codeunit 50106 "Sample Sales Line Price Sources"
|
|
{
|
|
[EventSubscriber(ObjectType::Codeunit, Codeunit::"Sales Line - Price", 'OnAfterAddSources', '', false, false)]
|
|
local procedure AddLoyaltyCustomerSource(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; PriceType: Enum "Price Type"; var PriceSourceList: Codeunit "Price Source List")
|
|
begin
|
|
PriceSourceList.Add(Enum::"Price Source Type"::Customer, SalesLine."Sample Loyalty Customer No.");
|
|
end;
|
|
}
|