Þetta efni gefur dæmi um kóða til að sýna breytt mynstur í víddakóða breytingar og flutning í fimm mismunandi aðstæður. Það ber saman kóðadæmin í fyrri útgáfum við kóða dæmi í Microsoft Dynamics NAV2016
Bókun færslubókarlínu
Helstu breytingar eru skráðar eins og hér segir:
-
Bókarlínuvíddartöflur eru fjarlægðar.
-
Víddasamstæðuauðkenni er stofnað í reitnum Auðkenni víddasamstæðu.
Eldri útgáfur
|
Microsoft Dynamics NAV2016
|
---|
| Afrita kóta |
---|
ResJnlLine."Qty. per Unit of Measure" :=
SalesLine."Qty. per Unit of Measure";
TempJnlLineDim.DELETEALL;
TempDocDim.RESET;
TempDocDim.SETRANGE(
"Table ID",DATABASE::"Sales Line");
TempDocDim.SETRANGE(
"Line No.",SalesLine."Line No.");
DimMgt.CopyDocDimToJnlLineDim(
TempDocDim,TempJnlLineDim);
ResJnlPostLine.RunWithCheck(
ResJnlLine,TempJnlLineDim);
|
| | Afrita kóta |
---|
ResJnlLine."Qty. per Unit of Measure" :=
SalesLine."Qty. per Unit of Measure";
ResJnlLine."Dimension Set ID" :=
SalesLine." Dimension Set ID ";
ResJnlPostLine.Run(ResJnlLine);
|
|
Fylgiskjal bókað
Þegar þú bókar fylgiskjal í Microsoft Dynamics NAV2016,þarftu ekki lengur að afrita stærðarmál fylgiskjalsins.
Eldri útgáfur
|
Microsoft Dynamics NAV2016
|
---|
| Afrita kóta |
---|
DimMgt.MoveOneDocDimToPostedDocDim(
TempDocDim,DATABASE::"Sales Line",
"Document Type",
"No.",
SalesShptLine."Line No.",
DATABASE::"Sales Shipment Line",
SalesShptHeader."No."); |
| | Afrita kóta |
---|
SalesShptLine."Dimension Set ID”
:= SalesLine."Dimension Set ID” |
|
Vídd breytt úr skjali
Hægt er að breyta vídd úr skjali. Til dæmis er hægt að breyta sölupöntunarlínu.
Eldri útgáfur
|
Microsoft Dynamics NAV2016
|
---|
| Afrita kóta |
---|
Table 37, function ShowDimensions:
TESTFIELD("Document No.");
TESTFIELD("Line No.");
DocDim.SETRANGE("Table ID",DATABASE::"Sales Line");
DocDim.SETRANGE("Document Type","Document Type");
DocDim.SETRANGE("Document No.","Document No.");
DocDim.SETRANGE("Line No.","Line No.");
DocDimensions.SETTABLEVIEW(DocDim);
DocDimensions.RUNMODAL; |
| | Afrita kóta |
---|
Table 37, function ShowDimensions:
"Dimension ID" :=
DimSetEntry.EditDimensionSet(
"Dimension ID"); |
|
Sýna víddir frá bókuðum færslum
Hægt er að sýna víddir úr bókuðum færslum, svo sem sendingarlínum sölu.
Eldri útgáfur
|
Microsoft Dynamics NAV2016
|
---|
| Afrita kóta |
---|
Table 111, function ShowDimensions:
TESTFIELD("No.");
TESTFIELD("Line No.");
PostedDocDim.SETRANGE(
"Table ID",DATABASE::"Sales Shipment Line");
PostedDocDim.SETRANGE(
"Document No.","Document No.");
PostedDocDim.SETRANGE("Line No.","Line No.");
PostedDocDimensions.SETTABLEVIEW(PostedDocDim);
PostedDocDimensions.RUNMODAL; |
| | Afrita kóta |
---|
Table 111, function ShowDimensions:
DimSetEntry.ShowDimensionSet(
"Dimension ID"); |
|
Uppsetning sjálfgefinna vídda fyrir skjal
Uppsetning sjálfgefinna vídda fyrir skjal, svop sem sölupöntunarlínu.
Eldri útgáfur
|
Microsoft Dynamics NAV2016
|
---|
| Afrita kóta |
---|
Table 37, function CreateDim()
SourceCodeSetup.GET;
TableID[1] := Type1;
No[1] := No1;
TableID[2] := Type2;
No[2] := No2;
TableID[3] := Type3;
No[3] := No3;
"Shortcut Dimension 1 Code" := '';
"Shortcut Dimension 2 Code" := '';
DimMgt.GetPreviousDocDefaultDim(
DATABASE::"Sales Header","Document Type",
"Document No.",0,
DATABASE::Customer,
"Shortcut Dimension 1 Code",
"Shortcut Dimension 2 Code");
DimMgt.GetDefaultDim(
TableID,No,SourceCodeSetup.Sales,
"Shortcut Dimension 1 Code",
"Shortcut Dimension 2 Code");
IF "Line No." <> 0 THEN
DimMgt.UpdateDocDefaultDim(
DATABASE::"Sales Line","Document Type",
"Document No.","Line No.",
"Shortcut Dimension 1 Code",
"Shortcut Dimension 2 Code"); |
| | Afrita kóta |
---|
Table 37, function CreateDim()
SourceCodeSetup.GET;
TableID[1] := Type1;
No[1] := No1;
TableID[2] := Type2;
No[2] := No2;
TableID[3] := Type3;
No[3] := No3;
"Shortcut Dimension 1 Code" := '';
"Shortcut Dimension 2 Code" := '';
GetSalesHeader;
"Dimension ID" :=
DimMgt.GetDefaultDimID(
TableID,No,SourceCodeSetup.Sales,
"Shortcut Dimension 1 Code",
"Shortcut Dimension 2 Code",
SalesHeader."Dimension ID",
DATABASE::"Sales Header"); |
|
Sjá einnig