この資料では、すべての国と言語ロケールのすべての Microsoft Dynamics NAV に該当します。
現象
出荷先の住所コードの値を入力すると Microsoft Dynamics NAV 2013、郵便番号、都市および郡の値での販売注文に転送されません配送先のアドレスカード配送先住所の郵便番号フィールド、出荷先都道府県] フィールドおよび配送先の市区郡のフィールドに販売注文の。この問題は、販売注文の配送先の国/地域コードの値が既に指定されていて、新しい配送先住所の国/地域コードの値から値が異なる場合にのみ発生します。
解決策
修正プログラムの情報
サポートされている修正プログラムはマイクロソフトから現在入手可能です。ただし、この資料に記載されている問題を解決するためのものはのみ。この特定の問題が発生したシステムにのみ適用してください。この修正プログラムは、今後さらにテストを行うことがあります。この問題で深刻な影響を受けていない場合は、次の Microsoft Dynamics NAV 2013 service pack または修正プログラムを含む次の Microsoft Dynamics NAV バージョン待つことを勧めします。
注: かかる料金が免除されるテクニカル サポート担当者 Microsoft Dynamics および関連製品のことは、通常は特別な場合は、特定の更新プログラムは、問題を解決するにを決定します。追加の質問および問題の特定のアップデートの対象にはなりませんが、通常のサポート料金が適用されます。
インストール情報
マイクロソフトでは解説することのみを目的としてプログラミング例を提供しています。暗示あるいは明示していることに対しての保証はしておりません。ここで言う保証とは、特定の目的に対する商品性や適合性の暗示的保証を含んでいますが、それに限定されるわけではありません。この資料では、例示されているプログラミング言語およびプロシージャの作成やデバッグに使用するツールにお客様が精通していることを前提としています。マイクロソフトのサポート エンジニアは、特定のプロシージャの機能について説明することができます。ただし、お客様固有の要件を満たすために、追加機能の提供またはプロシージャの作成のために、これらの例に変更を加えたりはしません。
注: この修正プログラムをインストールする前に、Microsoft Navision のすべてのクライアント ユーザーがシステムの電源を記録することを確認します。これには、Microsoft Navision アプリケーション サービス (NAS) クライアントのユーザーが含まれます。この修正プログラムを実装すると、ログオンしている唯一のクライアント ユーザーが必要です。
この修正プログラムを実装するには、開発者用のライセンスが必要です。
ユーザー アカウントまたはデータベース ログイン ウィンドウに Windows のログイン ウィンドウにある「スーパー」ロール id を割り当てられていることをお勧めします。ユーザー アカウントには、「スーパー」ロール ID を割り当てることができません、する場合は、ユーザー アカウントが次のアクセス許可を持っているを確認する必要があります。
-
変更するオブジェクトの変更のアクセス許可。
-
システム オブジェクトの ID 5210オブジェクトおよびシステム オブジェクトの ID 9015オブジェクトの実行が許可されます。
注:
データの修復を実行する必要があるない限り、データ ストアへの権限を持っている必要はありません。
コードの変更
注: 常にテスト コードを修正、管理された環境で適用する前に、運用コンピューターに修正プログラムします。
この問題を解決するには、次の手順を実行します。
-
表内の場所 (14) は、フィールド内のコードを次のように変更します。
既存のコード... ValidateTableRelation=No;
TestTableRelation=No }
{ 5715; ;County ;Text30 }
{ 5718; ;E-Mail ;Text80 ;ExtendedDatatype=E-Mail }
{ 5719; ;Home Page ;Text90 ;ExtendedDatatype=URL }
// Delete the following lines.
{ 5720; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND ("Country/Region Code" <> '') THEN
Postcode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 5724; ;Use As In-Transit ;Boolean ;OnValidate=BEGIN
IF "Use As In-Transit" THEN BEGIN
TESTFIELD("Require Put-away",FALSE);
TESTFIELD("Require Pick",FALSE);
TESTFIELD("Use Cross-Docking",FALSE);
...置換用コード
... ValidateTableRelation=No;
TestTableRelation=No }
{ 5715; ;County ;Text30 }
{ 5718; ;E-Mail ;Text80 ;ExtendedDatatype=E-Mail }
{ 5719; ;Home Page ;Text90 ;ExtendedDatatype=URL }
// Add the following line.
{ 5720; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 5724; ;Use As In-Transit ;Boolean ;OnValidate=BEGIN
IF "Use As In-Transit" THEN BEGIN
TESTFIELD("Require Put-away",FALSE);
TESTFIELD("Require Pick",FALSE);
TESTFIELD("Use Cross-Docking",FALSE);
... -
(18) の [得意先] テーブルのフィールドにコードを次のように変更します。
既存のコード... { 32 ; ;Place of Export ;Code20 }
{ 33 ; ;Invoice Disc. Code ;Code20 ;TableRelation=Customer;
ValidateTableRelation=No;
TestTableRelation=No }
{ 34 ; ;Customer Disc. Group;Code20 ;TableRelation="Customer Discount Group" }
// Delete the following lines.
{ 35 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 36 ; ;Collection Method ;Code20 }
{ 37 ; ;Amount ;Decimal ;AutoFormatType=1;
AutoFormatExpr="Currency Code" }
{ 38 ; ;Comment ;Boolean ;FieldClass=FlowField;
CalcFormula=Exist("Comment Line" WHERE (Table Name=CONST(Customer),
...置換用コード
... { 32 ; ;Place of Export ;Code20 }
{ 33 ; ;Invoice Disc. Code ;Code20 ;TableRelation=Customer;
ValidateTableRelation=No;
TestTableRelation=No }
{ 34 ; ;Customer Disc. Group;Code20 ;TableRelation="Customer Discount Group" }
// Add the following line.
{ 35 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 36 ; ;Collection Method ;Code20 }
{ 37 ; ;Amount ;Decimal ;AutoFormatType=1;
AutoFormatExpr="Currency Code" }
{ 38 ; ;Comment ;Boolean ;FieldClass=FlowField;
CalcFormula=Exist("Comment Line" WHERE (Table Name=CONST(Customer),
... -
(23) の仕入先テーブルのフィールドのコードを次のように変更します。
既存のコード... { 30 ; ;Shipment Method Code;Code10 ;TableRelation="Shipment Method" }
{ 31 ; ;Shipping Agent Code ;Code10 ;TableRelation="Shipping Agent" }
{ 33 ; ;Invoice Disc. Code ;Code20 ;TableRelation=Vendor;
ValidateTableRelation=No;
TestTableRelation=No }
// Delete the following lines.
{ 35 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 38 ; ;Comment ;Boolean ;FieldClass=FlowField;
CalcFormula=Exist("Comment Line" WHERE (Table Name=CONST(Vendor),
No.=FIELD(No.)));
Editable=No }
{ 39 ; ;Blocked ;Option ;OptionString=[ ,Payment,All] }
...置換用コード
... { 30 ; ;Shipment Method Code;Code10 ;TableRelation="Shipment Method" }
{ 31 ; ;Shipping Agent Code ;Code10 ;TableRelation="Shipping Agent" }
{ 33 ; ;Invoice Disc. Code ;Code20 ;TableRelation=Vendor;
ValidateTableRelation=No;
TestTableRelation=No }
// Add the following line.
{ 35 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 38 ; ;Comment ;Boolean ;FieldClass=FlowField;
CalcFormula=Exist("Comment Line" WHERE (Table Name=CONST(Vendor),
No.=FIELD(No.)));
Editable=No }
{ 39 ; ;Blocked ;Option ;OptionString=[ ,Payment,All] }
... -
販売ヘッダー テーブル (36) のフィールドのコードを次のように変更します。
既存のコード 1... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 86 ; ;Bill-to County ;Text30 }
// Delete the following lines.
{ 87 ; ;Bill-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Bill-to Country/Region Code" <> xRec."Bill-to Country/Region Code") AND (xRec."Bill-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Bill-to City","Bill-to Post Code","Bill-to County");
END;
}
// End of the lines.
{ 88 ; ;Sell-to Post Code ;Code20 ;TableRelation="Post Code";
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Sell-to City","Sell-to Post Code","Sell-to County","Sell-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
END;
...置換用コード 1
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 86 ; ;Bill-to County ;Text30 }
// Add the following line.
{ 87 ; ;Bill-to Country/Region Code;Code10 ;TableRelation=Country/Region }
{ 88 ; ;Sell-to Post Code ;Code20 ;TableRelation="Post Code";
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Sell-to City","Sell-to Post Code","Sell-to County","Sell-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
END;
...既存のコード 2
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 89 ; ;Sell-to County ;Text30 }
// Delete the following lines.
{ 90 ; ;Sell-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Sell-to Country/Region Code" <> xRec."Sell-to Country/Region Code") AND (xRec."Sell-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Sell-to City","Sell-to Post Code","Sell-to County");
END;
}
// End of the lines.
{ 91 ; ;Ship-to Post Code ;Code20 ;TableRelation="Post Code";
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Ship-to City","Ship-to Post Code","Ship-to County","Ship-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
END;
...置換用コード 2
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 89 ; ;Sell-to County ;Text30 }
// Add the following line.
{ 90 ; ;Sell-to Country/Region Code;Code10 ;TableRelation=Country/Region }
{ 91 ; ;Ship-to Post Code ;Code20 ;TableRelation="Post Code";
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Ship-to City","Ship-to Post Code","Ship-to County","Ship-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
END;
...既存のコード 3
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 92 ; ;Ship-to County ;Text30 }
// Delete the following lines.
{ 93 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Ship-to Country/Region Code" <> xRec."Ship-to Country/Region Code") AND (xRec."Ship-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Ship-to City","Ship-to Post Code","Ship-to County");
END;
}
// End of the lines.
{ 94 ; ;Bal. Account Type ;Option ;OptionString=G/L Account,Bank Account }
{ 97 ; ;Exit Point ;Code10 ;TableRelation="Entry/Exit Point";
OnValidate=BEGIN
UpdateSalesLines(FIELDCAPTION("Exit Point"),FALSE);
END;
...置換用コード 3
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 92 ; ;Ship-to County ;Text30 }
// Add the following line.
{ 93 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region }
{ 94 ; ;Bal. Account Type ;Option ;OptionString=G/L Account,Bank Account }
{ 97 ; ;Exit Point ;Code10 ;TableRelation="Entry/Exit Point";
OnValidate=BEGIN
UpdateSalesLines(FIELDCAPTION("Exit Point"),FALSE);
END;
... -
購買注文ヘッダー テーブル (38) のフィールドのコードを次のように変更します。
既存のコード 1... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 86 ; ;Pay-to County ;Text30 }
// Delete the following lines.
{ 87 ; ;Pay-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Pay-to Country/Region Code" <> xRec."Pay-to Country/Region Code") AND (xRec."Pay-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Pay-to City","Pay-to Post Code","Pay-to County");
END;
}
// End of the lines.
{ 88 ; ;Buy-from Post Code ;Code20 ;TableRelation=IF (Buy-from Country/Region Code=CONST()) "Post Code"
ELSE IF (Buy-from Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Buy-from Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Buy-from City","Buy-from Post Code","Buy-from County","Buy-from Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...置換用コード 1
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 86 ; ;Pay-to County ;Text30 }
// Add the following line.
{ 87 ; ;Pay-to Country/Region Code;Code10 ;TableRelation=Country/Region }
{ 88 ; ;Buy-from Post Code ;Code20 ;TableRelation=IF (Buy-from Country/Region Code=CONST()) "Post Code"
ELSE IF (Buy-from Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Buy-from Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Buy-from City","Buy-from Post Code","Buy-from County","Buy-from Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...既存のコード 2
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 89 ; ;Buy-from County ;Text30 }
// Delete the following lines.
{ 90 ; ;Buy-from Country/Region Code;Code10;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Buy-from Country/Region Code" <> xRec."Buy-from Country/Region Code") AND (xRec."Buy-from Country/Region Code" <> '') THEN
PostCode.ClearFields("Buy-from City","Buy-from Post Code","Buy-from County");
END;
}
// End of the lines.
{ 91 ; ;Ship-to Post Code ;Code20 ;TableRelation=IF (Ship-to Country/Region Code=CONST()) "Post Code"
ELSE IF (Ship-to Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Ship-to Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Ship-to City","Ship-to Post Code","Ship-to County","Ship-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...置換用コード 2
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 89 ; ;Buy-from County ;Text30 }
// Add the following line.
{ 90 ; ;Buy-from Country/Region Code;Code10;TableRelation=Country/Region }
{ 91 ; ;Ship-to Post Code ;Code20 ;TableRelation=IF (Ship-to Country/Region Code=CONST()) "Post Code"
ELSE IF (Ship-to Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Ship-to Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Ship-to City","Ship-to Post Code","Ship-to County","Ship-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...既存のコード 3
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 92 ; ;Ship-to County ;Text30 }
// Delete the following lines.
{ 93 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Ship-to Country/Region Code" <> xRec."Ship-to Country/Region Code") AND (xRec."Ship-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Ship-to City","Ship-to Post Code","Ship-to County");
END;
}
// End of the lines.
{ 94 ; ;Bal. Account Type ;Option ;OptionString=G/L Account,Bank Account }
{ 95 ; ;Order Address Code ;Code10 ;TableRelation="Order Address".Code WHERE (Vendor No.=FIELD(Buy-from Vendor No.));
OnValidate=BEGIN
IF "Order Address Code" <> '' THEN BEGIN
OrderAddr.GET("Buy-from Vendor No.","Order Address Code");
...置換用コード 3
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 92 ; ;Ship-to County ;Text30 }
// Add the following line.
{ 93 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region }
{ 94 ; ;Bal. Account Type ;Option ;OptionString=G/L Account,Bank Account }
{ 95 ; ;Order Address Code ;Code10 ;TableRelation="Order Address".Code WHERE (Vendor No.=FIELD(Buy-from Vendor No.));
OnValidate=BEGIN
IF "Order Address Code" <> '' THEN BEGIN
OrderAddr.GET("Buy-from Vendor No.","Order Address Code");
... -
(79) 会社情報テーブルのフィールドのコードを次のように変更します。
既存のコード... ValidateTableRelation=No;
TestTableRelation=No }
{ 33 ; ;Ship-to County ;Text30 }
{ 34 ; ;E-Mail ;Text80 ;ExtendedDatatype=E-Mail }
{ 35 ; ;Home Page ;Text80 ;ExtendedDatatype=URL }
// Delete the following lines.
{ 36 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
{ 37 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Ship-to Country/Region Code" <> xRec."Ship-to Country/Region Code") AND (xRec."Ship-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Ship-to City","Ship-to Post Code","Ship-to County");
END;
}
// End of the lines.
{ 38 ; ;IBAN ;Code50 ;OnValidate=BEGIN
CheckIBAN(IBAN);
END;
}
{ 39 ; ;SWIFT Code ;Code20 }
...置換用コード
... ValidateTableRelation=No;
TestTableRelation=No }
{ 33 ; ;Ship-to County ;Text30 }
{ 34 ; ;E-Mail ;Text80 ;ExtendedDatatype=E-Mail }
{ 35 ; ;Home Page ;Text80 ;ExtendedDatatype=URL }
// Add the following lines.
{ 36 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 37 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region }
// End of the lines.
{ 38 ; ;IBAN ;Code50 ;OnValidate=BEGIN
CheckIBAN(IBAN);
END;
}
{ 39 ; ;SWIFT Code ;Code20 }
... -
(156) の [リソース] テーブルのフィールドにコードを次のように変更します。
既存のコード... { 55 ; ;Automatic Ext. Texts;Boolean }
{ 56 ; ;No. Series ;Code10 ;TableRelation="No. Series";
Editable=No }
{ 57 ; ;Tax Group Code ;Code10 ;TableRelation="Tax Group" }
{ 58 ; ;VAT Prod. Posting Group;Code10 ;TableRelation="VAT Product Posting Group" }
// Delete the following lines.
{ 59 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 60 ; ;IC Partner Purch. G/L Acc. No.;Code20;
TableRelation="IC G/L Account" }
{ 900 ; ;Qty. on Assembly Order;Decimal ;FieldClass=FlowField;
CalcFormula=Sum("Assembly Line"."Remaining Quantity (Base)" WHERE (Document Type=CONST(Order),
Type=CONST(Resource),
...置換用コード
... { 55 ; ;Automatic Ext. Texts;Boolean }
{ 56 ; ;No. Series ;Code10 ;TableRelation="No. Series";
Editable=No }
{ 57 ; ;Tax Group Code ;Code10 ;TableRelation="Tax Group" }
{ 58 ; ;VAT Prod. Posting Group;Code10 ;TableRelation="VAT Product Posting Group" }
// Add the following line.
{ 59 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 60 ; ;IC Partner Purch. G/L Acc. No.;Code20;
TableRelation="IC G/L Account" }
{ 900 ; ;Qty. on Assembly Order;Decimal ;FieldClass=FlowField;
CalcFormula=Sum("Assembly Line"."Remaining Quantity (Base)" WHERE (Document Type=CONST(Order),
Type=CONST(Resource),
... -
(167) のジョブ テーブル内のフィールドにコードを次のように変更します。
既存のコード... ValidateTableRelation=No;
TestTableRelation=No }
{ 66 ; ;No. Series ;Code10 ;TableRelation="No. Series";
Editable=No }
{ 67 ; ;Bill-to Country/Region Code;Code10 ;TableRelation=Country/Region;
// Delete the following lines.
OnValidate=BEGIN
IF ("Bill-to Country/Region Code" <> xRec."Bill-to Country/Region Code") AND (xRec."Bill-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Bill-to City","Bill-to Post Code","Bill-to County");
END;
// End of the lines.
Editable=Yes }
{ 68 ; ;Bill-to Name 2 ;Text50 }
{ 117 ; ;Reserve ;Option ;OptionString=Never,Optional,Always }
{ 1000; ;WIP Method ;Code20 ;TableRelation="Job WIP Method".Code WHERE (Valid=CONST(Yes));
OnValidate=VAR
...置換用コード
... ValidateTableRelation=No;
TestTableRelation=No }
{ 66 ; ;No. Series ;Code10 ;TableRelation="No. Series";
Editable=No }
{ 67 ; ;Bill-to Country/Region Code;Code10 ;TableRelation=Country/Region;
Editable=Yes }
{ 68 ; ;Bill-to Name 2 ;Text50 }
{ 117 ; ;Reserve ;Option ;OptionString=Never,Optional,Always }
{ 1000; ;WIP Method ;Code20 ;TableRelation="Job WIP Method".Code WHERE (Valid=CONST(Yes));
OnValidate=VAR
... -
(222) の送付先の表には、フィールド内のコードを次のように変更します。
既存のコード... IF "Shipping Agent Code" <> xRec."Shipping Agent Code" THEN
VALIDATE("Shipping Agent Service Code",'');
END;
}
{ 32 ; ;Place of Export ;Code20 }
// Delete the following lines.
{ 35 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 54 ; ;Last Date Modified ;Date ;Editable=No }
{ 83 ; ;Location Code ;Code10 ;TableRelation=Location WHERE (Use As In-Transit=CONST(No)) }
{ 84 ; ;Fax No. ;Text30 }
{ 85 ; ;Telex Answer Back ;Text20 }
{ 91 ; ;Post Code ;Code20 ;TableRelation=IF (Country/Region Code=CONST()) "Post Code"
...置換用コード
... IF "Shipping Agent Code" <> xRec."Shipping Agent Code" THEN
VALIDATE("Shipping Agent Service Code",'');
END;
}
{ 32 ; ;Place of Export ;Code20 }
// Add the following line.
{ 35 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 54 ; ;Last Date Modified ;Date ;Editable=No }
{ 83 ; ;Location Code ;Code10 ;TableRelation=Location WHERE (Use As In-Transit=CONST(No)) }
{ 84 ; ;Fax No. ;Text30 }
{ 85 ; ;Telex Answer Back ;Text20 }
{ 91 ; ;Post Code ;Code20 ;TableRelation=IF (Country/Region Code=CONST()) "Post Code"
... -
Post コード表 (225) 内のClearFields関数内のコードを次のように変更します。
既存のコード... CountryCode := PostCodeRec."Country/Region Code";
County := PostCodeRec.County;
END;
END;
// Delete the following lines.
PROCEDURE ClearFields@1(VAR City@1000 : Text[30];VAR PostCode@1001 : Code[20];VAR County@1002 : Text[30]);
BEGIN
City := '';
PostCode := '';
County := '';
END;
// End of the lines.
BEGIN
END.
}
}
...置換用コード
... CountryCode := PostCodeRec."Country/Region Code";
County := PostCodeRec.County;
END;
END;
BEGIN
END.
}
}
... -
(270) 銀行口座テーブルのフィールドのコードを次のように変更します。
既存のコード... END;
}
{ 24 ; ;Language Code ;Code10 ;TableRelation=Language }
{ 26 ; ;Statistics Group ;Integer }
{ 29 ; ;Our Contact Code ;Code10 ;TableRelation=Salesperson/Purchaser }
// Delete the following lines.
{ 35 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 37 ; ;Amount ;Decimal ;AutoFormatType=1;
AutoFormatExpr="Currency Code" }
{ 38 ; ;Comment ;Boolean ;FieldClass=FlowField;
CalcFormula=Exist("Comment Line" WHERE (Table Name=CONST(Bank Account),
No.=FIELD(No.)));
...置換用コード
... END;
}
{ 24 ; ;Language Code ;Code10 ;TableRelation=Language }
{ 26 ; ;Statistics Group ;Integer }
{ 29 ; ;Our Contact Code ;Code10 ;TableRelation=Salesperson/Purchaser }
// Add the following line.
{ 35 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 37 ; ;Amount ;Decimal ;AutoFormatType=1;
AutoFormatExpr="Currency Code" }
{ 38 ; ;Comment ;Boolean ;FieldClass=FlowField;
CalcFormula=Exist("Comment Line" WHERE (Table Name=CONST(Bank Account),
No.=FIELD(No.)));
... -
アラーム ヘッダー テーブル (295) のフィールドのコードを次のように変更します。
既存のコード... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 9 ; ;County ;Text30 }
// Delete the following line.
{ 10 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 11 ; ;Language Code ;Code10 ;TableRelation=Language }
{ 12 ; ;Currency Code ;Code10 ;TableRelation=Currency;
OnValidate=BEGIN
IF CurrFieldNo = FIELDNO("Currency Code") THEN
IF Undo THEN BEGIN
...置換用コード
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 9 ; ;County ;Text30 }
// Add the following line.
{ 10 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 11 ; ;Language Code ;Code10 ;TableRelation=Language }
{ 12 ; ;Currency Code ;Code10 ;TableRelation=Currency;
OnValidate=BEGIN
IF CurrFieldNo = FIELDNO("Currency Code") THEN
IF Undo THEN BEGIN
... -
財務雑費のメモ ヘッダー テーブル (302) のフィールドのコードを次のように変更します。
既存のコード... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 9 ; ;County ;Text30 }
// Delete the folloiwng lines.
{ 10 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '')THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 11 ; ;Language Code ;Code10 ;TableRelation=Language }
{ 12 ; ;Currency Code ;Code10 ;TableRelation=Currency;
OnValidate=BEGIN
IF CurrFieldNo = FIELDNO("Currency Code") THEN
IF Undo THEN BEGIN
...置換用コード
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 9 ; ;County ;Text30 }
// Add the following line.
{ 10 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 11 ; ;Language Code ;Code10 ;TableRelation=Language }
{ 12 ; ;Currency Code ;Code10 ;TableRelation=Currency;
OnValidate=BEGIN
IF CurrFieldNo = FIELDNO("Currency Code") THEN
IF Undo THEN BEGIN
... -
(5050) 連絡先のテーブルのフィールドにコードをとおり変更します。
既存のコード... { 10 ; ;Telex No. ;Text20 }
{ 15 ; ;Territory Code ;Code10 ;TableRelation=Territory }
{ 22 ; ;Currency Code ;Code10 ;TableRelation=Currency }
{ 24 ; ;Language Code ;Code10 ;TableRelation=Language }
{ 29 ; ;Salesperson Code ;Code10 ;TableRelation=Salesperson/Purchaser }
// Delete the following lines.
{ 35 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 38 ; ;Comment ;Boolean ;FieldClass=FlowField;
CalcFormula=Exist("Rlshp. Mgt. Comment Line" WHERE (Table Name=CONST(Contact),
No.=FIELD(No.),
Sub No.=CONST(0)));
Editable=No }
...置換用コード
... { 10 ; ;Telex No. ;Text20 }
{ 15 ; ;Territory Code ;Code10 ;TableRelation=Territory }
{ 22 ; ;Currency Code ;Code10 ;TableRelation=Currency }
{ 24 ; ;Language Code ;Code10 ;TableRelation=Language }
{ 29 ; ;Salesperson Code ;Code10 ;TableRelation=Salesperson/Purchaser }
// Add the following line.
{ 35 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 38 ; ;Comment ;Boolean ;FieldClass=FlowField;
CalcFormula=Exist("Rlshp. Mgt. Comment Line" WHERE (Table Name=CONST(Contact),
No.=FIELD(No.),
Sub No.=CONST(0)));
Editable=No }
... -
次のように連絡先の代替アドレス テーブル (5051) のフィールドにコードを変更します。
既存のコード... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 9 ; ;County ;Text30 }
// Delete the following lines.
{ 10 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 12 ; ;Phone No. ;Text30 ;ExtendedDatatype=Phone No. }
{ 13 ; ;Telex No. ;Text20 }
{ 14 ; ;Extension No. ;Text30 }
{ 15 ; ;Mobile Phone No. ;Text30 ;ExtendedDatatype=Phone No. }
{ 16 ; ;Pager ;Text30 }
...置換用コード
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 9 ; ;County ;Text30 }
// Add the following line.
{ 10 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 12 ; ;Phone No. ;Text30 ;ExtendedDatatype=Phone No. }
{ 13 ; ;Telex No. ;Text20 }
{ 14 ; ;Extension No. ;Text30 }
{ 15 ; ;Mobile Phone No. ;Text30 ;ExtendedDatatype=Phone No. }
{ 16 ; ;Pager ;Text30 }
... -
(5200) の [社員] テーブルでは、フィールド内のコードを次のように変更します。
既存のコード... { 20 ; ;Birth Date ;Date }
{ 21 ; ;Social Security No. ;Text30 }
{ 22 ; ;Union Code ;Code10 ;TableRelation=Union }
{ 23 ; ;Union Membership No.;Text30 }
{ 24 ; ;Gender ;Option ;OptionString=[ ,Female,Male] }
// Delete the following lines.
{ 25 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 26 ; ;Manager No. ;Code20 ;TableRelation=Employee }
{ 27 ; ;Emplymt. Contract Code;Code10 ;TableRelation="Employment Contract" }
{ 28 ; ;Statistics Group Code;Code10 ;TableRelation="Employee Statistics Group" }
{ 29 ; ;Employment Date ;Date }
{ 31 ; ;Status ;Option ;OnValidate=BEGIN
...置換用コード
... { 20 ; ;Birth Date ;Date }
{ 21 ; ;Social Security No. ;Text30 }
{ 22 ; ;Union Code ;Code10 ;TableRelation=Union }
{ 23 ; ;Union Membership No.;Text30 }
{ 24 ; ;Gender ;Option ;OptionString=[ ,Female,Male] }
// Add the following line.
{ 25 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 26 ; ;Manager No. ;Code20 ;TableRelation=Employee }
{ 27 ; ;Emplymt. Contract Code;Code10 ;TableRelation="Employment Contract" }
{ 28 ; ;Statistics Group Code;Code10 ;TableRelation="Employee Statistics Group" }
{ 29 ; ;Employment Date ;Date }
{ 31 ; ;Status ;Option ;OnValidate=BEGIN
... -
(5201) のアドレスの代わりにテーブルのフィールドにコードをとおり変更します。
既存のコード... { 13 ; ;Comment ;Boolean ;FieldClass=FlowField;
CalcFormula=Exist("Human Resource Comment Line" WHERE (Table Name=CONST(Alternative Address),
No.=FIELD(Employee No.),
Alternative Address Code=FIELD(Code)));
Editable=No }
// Delete the following lines.
{ 14 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
}
KEYS
{
{ ;Employee No.,Code ;Clustered=Yes }
}
...置換用コード
... { 13 ; ;Comment ;Boolean ;FieldClass=FlowField;
CalcFormula=Exist("Human Resource Comment Line" WHERE (Table Name=CONST(Alternative Address),
No.=FIELD(Employee No.),
Alternative Address Code=FIELD(Code)));
Editable=No }
// Add the following line.
{ 14 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
}
KEYS
{
{ ;Employee No.,Code ;Clustered=Yes }
}
... -
次のように共用体のテーブル (5209) のフィールドにコードを変更します。
既存のコード... { 9 ; ;Address 2 ;Text50 }
{ 10 ; ;County ;Text30 }
{ 11 ; ;Fax No. ;Text30 }
{ 12 ; ;E-Mail ;Text80 ;ExtendedDatatype=E-Mail }
{ 13 ; ;Home Page ;Text80 ;ExtendedDatatype=URL }
// Delete the following lines.
{ 14 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
}
KEYS
{
{ ;Code ;Clustered=Yes }
}
...置換用コード
... { 9 ; ;Address 2 ;Text50 }
{ 10 ; ;County ;Text30 }
{ 11 ; ;Fax No. ;Text30 }
{ 12 ; ;E-Mail ;Text80 ;ExtendedDatatype=E-Mail }
{ 13 ; ;Home Page ;Text80 ;ExtendedDatatype=URL }
// Add the following line.
{ 14 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
}
KEYS
{
{ ;Code ;Clustered=Yes }
}
... -
責任センター テーブル (5714) では、フィールド内のコードを次のように変更します。
既存のコード... PostCode.ValidatePostCode(City,"Post Code",County,"Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
END;
ValidateTableRelation=No;
TestTableRelation=No }
// Delete the folloiwng lines.
{ 7 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
END;
}
// End of the lines.
{ 8 ; ;Phone No. ;Text30 ;ExtendedDatatype=Phone No. }
{ 9 ; ;Fax No. ;Text30 }
{ 10 ; ;Name 2 ;Text50 }
{ 11 ; ;Contact ;Text50 }
{ 12 ; ;Global Dimension 1 Code;Code20 ;TableRelation="Dimension Value".Code WHERE (Global Dimension No.=CONST(1));
...置換用コード
... PostCode.ValidatePostCode(City,"Post Code",County,"Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
END;
ValidateTableRelation=No;
TestTableRelation=No }
// Add the following line.
{ 7 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region }
{ 8 ; ;Phone No. ;Text30 ;ExtendedDatatype=Phone No. }
{ 9 ; ;Fax No. ;Text30 }
{ 10 ; ;Name 2 ;Text50 }
{ 11 ; ;Contact ;Text50 }
{ 12 ; ;Global Dimension 1 Code;Code20 ;TableRelation="Dimension Value".Code WHERE (Global Dimension No.=CONST(1));
... -
(5740) ヘッダーの転送テーブル内のフィールドにコードを次のように変更します。
既存のコード 1... ValidateTableRelation=No;
TestTableRelation=No }
{ 9 ; ;Transfer-from County;Text30 }
{ 10 ; ;Trsf.-from Country/Region Code;Code10;
// Delete the following lines.
TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Trsf.-from Country/Region Code" <> xRec."Trsf.-from Country/Region Code") AND
(xRec."Trsf.-from Country/Region Code" <> '')
THEN
PostCode.ClearFields("Transfer-from City","Transfer-from Post Code","Transfer-from County");
END;
}
// End of the lines.
{ 11 ; ;Transfer-to Code ;Code10 ;TableRelation=Location WHERE (Use As In-Transit=CONST(No));
OnValidate=VAR
Location@1000 : Record 14;
Confirmed@1001 : Boolean;
BEGIN
...置換用コード 1
... ValidateTableRelation=No;
TestTableRelation=No }
{ 9 ; ;Transfer-from County;Text30 }
{ 10 ; ;Trsf.-from Country/Region Code;Code10;
// Add the folloiwng line.
TableRelation=Country/Region }
{ 11 ; ;Transfer-to Code ;Code10 ;TableRelation=Location WHERE (Use As In-Transit=CONST(No));
OnValidate=VAR
Location@1000 : Record 14;
Confirmed@1001 : Boolean;
BEGIN
...既存のコード 2
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 18 ; ;Transfer-to County ;Text30 }
// Delete the following lines.
{ 19 ; ;Trsf.-to Country/Region Code;Code10;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Trsf.-to Country/Region Code" <> xRec."Trsf.-to Country/Region Code") AND (xRec."Trsf.-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Transfer-to City","Transfer-to Post Code","Transfer-to County");
END;
}
// End of the lines.
{ 20 ; ;Posting Date ;Date }
{ 21 ; ;Shipment Date ;Date ;OnValidate=BEGIN
TestStatusOpen;
TransferRoute.CalcReceiptDate(
"Shipment Date",
...置換用コード 2
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 18 ; ;Transfer-to County ;Text30 }
// Add the following line.
{ 19 ; ;Trsf.-to Country/Region Code;Code10;TableRelation=Country/Region }
{ 20 ; ;Posting Date ;Date }
{ 21 ; ;Shipment Date ;Date ;OnValidate=BEGIN
TestStatusOpen;
TransferRoute.CalcReceiptDate(
"Shipment Date",
... -
サービス ヘッダー テーブル (5900) には、フィールド内のコードを次のように変更します。
既存のコード 1... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 86 ; ;Bill-to County ;Text30 }
// Delete the following lines.
{ 87 ; ;Bill-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Bill-to Country/Region Code" <> xRec."Bill-to Country/Region Code") AND (xRec."Bill-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Bill-to City","Bill-to Post Code","Bill-to County");
END;
}
// End of the lines.
{ 88 ; ;Post Code ;Code20 ;TableRelation=IF (Country/Region Code=CONST()) "Post Code"
ELSE IF (Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(City,"Post Code",County,"Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
END;
...置換用コード 1
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 86 ; ;Bill-to County ;Text30 }
// Add the following line.
{ 87 ; ;Bill-to Country/Region Code;Code10 ;TableRelation=Country/Region }
{ 88 ; ;Post Code ;Code20 ;TableRelation=IF (Country/Region Code=CONST()) "Post Code"
ELSE IF (Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(City,"Post Code",County,"Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
END;
...既存のコード 2
... TestTableRelation=No }
{ 89 ; ;County ;Text30 }
{ 90 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
VALIDATE("Ship-to Country/Region Code");
// Delete the following lines.
IF ("Country/Region Code" <> xRec."Country/Region Code") AND (xRec."Country/Region Code" <> '') THEN
PostCode.ClearFields(City,"Post Code",County);
// End of the lines.
END;
}
{ 91 ; ;Ship-to Post Code ;Code20 ;TableRelation=IF (Ship-to Country/Region Code=CONST()) "Post Code"
ELSE IF (Ship-to Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Ship-to Country/Region Code));
OnValidate=BEGIN
...置換用コード 2
... TestTableRelation=No }
{ 89 ; ;County ;Text30 }
{ 90 ; ;Country/Region Code ;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
VALIDATE("Ship-to Country/Region Code");
END;
}
{ 91 ; ;Ship-to Post Code ;Code20 ;TableRelation=IF (Ship-to Country/Region Code=CONST()) "Post Code"
ELSE IF (Ship-to Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Ship-to Country/Region Code));
OnValidate=BEGIN
...既存のコード 3
... ValidateTableRelation=No;
TestTableRelation=No }
{ 92 ; ;Ship-to County ;Text30 }
{ 93 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
// Delete the following lines.
IF ("Ship-to Country/Region Code" <> xRec."Ship-to Country/Region Code") AND (xRec."Ship-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Ship-to City","Ship-to Post Code","Ship-to County");
// End of the lines.
IF "Ship-to Country/Region Code" <> '' THEN
"VAT Country/Region Code" := "Ship-to Country/Region Code"
ELSE
"VAT Country/Region Code" := "Country/Region Code"
END;
...置換用コード 3
... ValidateTableRelation=No;
TestTableRelation=No }
{ 92 ; ;Ship-to County ;Text30 }
{ 93 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF "Ship-to Country/Region Code" <> '' THEN
"VAT Country/Region Code" := "Ship-to Country/Region Code"
ELSE
"VAT Country/Region Code" := "Country/Region Code"
END;
... -
次のように返す出荷ヘッダー テーブル (6650) のフィールドにコードを変更します。
既存のコード 1... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 86 ; ;Pay-to County ;Text30 }
// Delete the following lines.
{ 87 ; ;Pay-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Pay-to Country/Region Code" <> xRec."Pay-to Country/Region Code") AND (xRec."Pay-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Pay-to City","Pay-to Post Code","Pay-to County");
END;
}
// End of the lines.
{ 88 ; ;Buy-from Post Code ;Code20 ;TableRelation=IF (Buy-from Country/Region Code=CONST()) "Post Code"
ELSE IF (Buy-from Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Buy-from Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Buy-from City","Buy-from Post Code","Buy-from County","Buy-from Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...置換用コード 1
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 86 ; ;Pay-to County ;Text30 }
// Add the following line.
{ 87 ; ;Pay-to Country/Region Code;Code10 ;TableRelation=Country/Region }
{ 88 ; ;Buy-from Post Code ;Code20 ;TableRelation=IF (Buy-from Country/Region Code=CONST()) "Post Code"
ELSE IF (Buy-from Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Buy-from Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Buy-from City","Buy-from Post Code","Buy-from County","Buy-from Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...既存のコード 2
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 89 ; ;Buy-from County ;Text30 }
// Delete the following lines.
{ 90 ; ;Buy-from Country/Region Code;Code10;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Buy-from Country/Region Code" <> xRec."Buy-from Country/Region Code") AND (xRec."Buy-from Country/Region Code" <> '') THEN
PostCode.ClearFields("Buy-from City","Buy-from Post Code","Buy-from County");
END;
}
// End of the lines.
{ 91 ; ;Ship-to Post Code ;Code20 ;TableRelation=IF (Ship-to Country/Region Code=CONST()) "Post Code"
ELSE IF (Ship-to Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Ship-to Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Ship-to City","Ship-to Post Code","Ship-to County","Ship-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...置換用コード 2
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 89 ; ;Buy-from County ;Text30 }
// Add the following line.
{ 90 ; ;Buy-from Country/Region Code;Code10;TableRelation=Country/Region }
{ 91 ; ;Ship-to Post Code ;Code20 ;TableRelation=IF (Ship-to Country/Region Code=CONST()) "Post Code"
ELSE IF (Ship-to Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Ship-to Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Ship-to City","Ship-to Post Code","Ship-to County","Ship-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...既存のコード 3
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 92 ; ;Ship-to County ;Text30 }
// Delete the following lines.
{ 93 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Ship-to Country/Region Code" <> xRec."Ship-to Country/Region Code") AND (xRec."Ship-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Ship-to City","Ship-to Post Code","Ship-to County");
END;
}
// End of the lines.
{ 94 ; ;Bal. Account Type ;Option ;OptionString=G/L Account,Bank Account }
{ 95 ; ;Order Address Code ;Code10 ;TableRelation="Order Address".Code WHERE (Vendor No.=FIELD(Buy-from Vendor No.)) }
{ 97 ; ;Entry Point ;Code10 ;TableRelation="Entry/Exit Point" }
{ 98 ; ;Correction ;Boolean }
{ 99 ; ;Document Date ;Date }
...置換用コード 3
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 92 ; ;Ship-to County ;Text30 }
// Add the following line.
{ 93 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region }
{ 94 ; ;Bal. Account Type ;Option ;OptionString=G/L Account,Bank Account }
{ 95 ; ;Order Address Code ;Code10 ;TableRelation="Order Address".Code WHERE (Vendor No.=FIELD(Buy-from Vendor No.)) }
{ 97 ; ;Entry Point ;Code10 ;TableRelation="Entry/Exit Point" }
{ 98 ; ;Correction ;Boolean }
{ 99 ; ;Document Date ;Date }
... -
次のように返す受信確認のヘッダー テーブル (6660) のフィールドにコードを変更します。
既存のコード 1... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 86 ; ;Bill-to County ;Text30 }
// Delete the following lines.
{ 87 ; ;Bill-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Bill-to Country/Region Code" <> xRec."Bill-to Country/Region Code") AND (xRec."Bill-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Bill-to City","Bill-to Post Code","Bill-to County");
END;
}
// End of the lines.
{ 88 ; ;Sell-to Post Code ;Code20 ;TableRelation=IF (Sell-to Country/Region Code=CONST()) "Post Code"
ELSE IF (Sell-to Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Sell-to Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Sell-to City","Sell-to Post Code","Sell-to County","Sell-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...置換用コード 1
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 86 ; ;Bill-to County ;Text30 }
// Add the following line.
{ 87 ; ;Bill-to Country/Region Code;Code10 ;TableRelation=Country/Region }
{ 88 ; ;Sell-to Post Code ;Code20 ;TableRelation=IF (Sell-to Country/Region Code=CONST()) "Post Code"
ELSE IF (Sell-to Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Sell-to Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Sell-to City","Sell-to Post Code","Sell-to County","Sell-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...既存のコード 2
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 89 ; ;Sell-to County ;Text30 }
// Delete the following lines.
{ 90 ; ;Sell-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Sell-to Country/Region Code" <> xRec."Sell-to Country/Region Code") AND (xRec."Sell-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Sell-to City","Sell-to Post Code","Sell-to County");
END;
}
// End of the lines.
{ 91 ; ;Ship-to Post Code ;Code20 ;TableRelation=IF (Ship-to Country/Region Code=CONST()) "Post Code"
ELSE IF (Ship-to Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Ship-to Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Ship-to City","Ship-to Post Code","Ship-to County","Ship-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...置換用コード 2
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 89 ; ;Sell-to County ;Text30 }
// Add the following line.
{ 90 ; ;Sell-to Country/Region Code;Code10 ;TableRelation=Country/Region }
{ 91 ; ;Ship-to Post Code ;Code20 ;TableRelation=IF (Ship-to Country/Region Code=CONST()) "Post Code"
ELSE IF (Ship-to Country/Region Code=FILTER(<>'')) "Post Code" WHERE (Country/Region Code=FIELD(Ship-to Country/Region Code));
OnValidate=BEGIN
PostCode.ValidatePostCode(
"Ship-to City","Ship-to Post Code","Ship-to County","Ship-to Country/Region Code",(CurrFieldNo <> 0) AND GUIALLOWED);
...既存のコード 3
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 92 ; ;Ship-to County ;Text30 }
// Delete the following lines.
{ 93 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region;
OnValidate=BEGIN
IF ("Ship-to Country/Region Code" <> xRec."Ship-to Country/Region Code") AND (xRec."Ship-to Country/Region Code" <> '') THEN
PostCode.ClearFields("Ship-to City","Ship-to Post Code","Ship-to County");
END;
}
// End of the lines.
{ 94 ; ;Bal. Account Type ;Option ;OptionString=G/L Account,Bank Account }
{ 97 ; ;Exit Point ;Code10 ;TableRelation="Entry/Exit Point" }
{ 98 ; ;Correction ;Boolean }
{ 99 ; ;Document Date ;Date }
{ 100 ; ;External Document No.;Code35 }
...置換用コード 3
... END;
ValidateTableRelation=No;
TestTableRelation=No }
{ 92 ; ;Ship-to County ;Text30 }
// Add the following line.
{ 93 ; ;Ship-to Country/Region Code;Code10 ;TableRelation=Country/Region }
{ 94 ; ;Bal. Account Type ;Option ;OptionString=G/L Account,Bank Account }
{ 97 ; ;Exit Point ;Code10 ;TableRelation="Entry/Exit Point" }
{ 98 ; ;Correction ;Boolean }
{ 99 ; ;Document Date ;Date }
{ 100 ; ;External Document No.;Code35 }
...
必要条件
Microsoft Dynamics NAV 2013 がこの修正プログラムを適用するためにインストールする必要があります。
アンインストール情報
この修正プログラムを削除することはできません。
状況
マイクロソフトは、この問題を「対象製品」セクションに記載されているマイクロソフト製品の問題として認識しています。
注: これは、マイクロソフト サポートの組織内から直接作成した「高速公開」の資料です。ここに含まれる情報は、新たに発生している問題に応じて現状のまま提供されています。速やかに利用できるようにした結果として、内容には誤植が含まれている可能性があり、事前告知なしで改訂する場合があります。その他の考慮事項については、使用条件を参照してください。
