Artikel ini berlaku untuk Microsoft Dynamics NAV untuk semua negara dan semua bahasa lokal.
Gejala
Ketika Anda memasukkan nilai Pengiriman ke alamat kode pesanan penjualan di Microsoft Dynamics NAV 2013, Kode pos, kota dan County nilai yang tidak dipindahkan dari pengiriman ke alamat kartu kolom Pengiriman untuk kode pos , kolom Pengiriman ke kota dan kolom Pengiriman-negara pesanan penjualan. Masalah ini hanya terjadi jika nilai Pengiriman untuk kode negara/wilayah yang telah ditetapkan pada pesanan penjualan dan nilainya berbeda dari nilai Kode negara/wilayah di alamat pengiriman untuk baru.
Pemecahan masalah
Informasi Hotfix
Sekarang tersedia hotfix yang didukung dari Microsoft. Namun, hanya ditujukan untuk memperbaiki masalah yang dijelaskan di artikel ini. Terapkan hanya ke sistem yang mengalami masalah khusus ini. Perbaikan terbaru ini dapat menerima pengujian tambahan. Oleh karena itu, jika Anda tidak terlalu dipengaruhi oleh masalah ini, kami sarankan Anda menunggu paket layanan Microsoft Dynamics NAV 2013 atau versi Microsoft Dynamics NAV berikutnya yang berisi perbaikan terbaru ini.
Catatan Dalam kasus tertentu, biaya yang biasanya diadakan untuk panggilan mungkin dibatalkan apabila profesional dukungan teknis untuk Microsoft Dynamics dan produk-produk terkait dukungan menentukan bahwa pembaruan khusus akan memecahkan masalah Anda. Biaya dukungan biasa akan berlaku untuk pertanyaan dan masalah yang tidak termasuk pada pembaruan tertentu yang dimaksud dukungan tambahan.
Informasi penginstalan
Microsoft menyediakan contoh pemrogaman hanya untuk ilustrasi, tanpa garansi baik tersurat maupun tersirat. Ini mencakup, namun tidak terbatas pada, garansi yang tersirat dapat diperjualbelikan atau kesesuaian untuk tujuan tertentu. Artikel ini menganggap bahwa Anda sudah terbiasa dengan bahasa pemrograman yang ditunjukkan dan terbiasa dengan alat-alat yang digunakan untuk membuat dan prosedur debug. Teknisi dukungan Microsoft dapat membantu menjelaskan fungsionalitas prosedur tertentu. Namun, mereka tidak akan mengubah contoh tersebut untuk memberikan fungsionalitas tambahan atau menyusun prosedur untuk memenuhi persyaratan khusus Anda.
Catatan Sebelum Anda menginstal perbaikan terbaru ini, verifikasi bahwa semua pengguna klien Microsoft Navision log off sistem. Ini termasuk Microsoft Navision aplikasi Layanan (NAS) klien pengguna. Anda harus klien hanya pengguna yang masuk saat Anda menerapkan perbaikan terbaru ini.
Untuk menerapkan hotfix ini, Anda harus memiliki lisensi pengembang.
Kami menyarankan bahwa akun pengguna di jendela login Windows atau jendela login Database ditetapkan id peran "SUPER" Jika account pengguna tidak dapat menetapkan ID peran "SUPER", Anda harus memverifikasi bahwa account pengguna yang memiliki izin berikut ini:
-
Ubah izin untuk objek yang Anda akan berubah.
-
Izin eksekusi untuk objek sistem objek ID 5210 dan sistem objek ID 9015 objek.
Catatan Anda tidak harus memiliki hak untuk penyimpanan data kecuali jika Anda harus melakukan perbaikan data.
Perubahan kode
Catatan Selalu menguji kode perbaikan di lingkungan yang dikontrol sebelum menerapkan perbaikan untuk komputer produksi.
Untuk mengatasi masalah ini, ikuti langkah-langkah berikut:
-
Ubah kode di kolom dalam tabel lokasi (14) sebagai berikut:
Kode yang ada... 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);
...Penggantian kode
... 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);
... -
Ubah kode di kolom dalam tabel pelanggan (18) sebagai berikut:
Kode yang ada... { 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),
...Penggantian kode
... { 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),
... -
Ubah kode di kolom dalam tabel Vendor (23) sebagai berikut:
Kode yang ada... { 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] }
...Penggantian kode
... { 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] }
... -
Ubah kode di kolom dalam tabel Header penjualan (36) sebagai berikut:
Kode yang ada 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;
...Penggantian kode 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;
...Kode yang ada 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;
...Penggantian kode 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;
...Kode yang ada 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;
...Penggantian kode 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;
... -
Ubah kode di kolom dalam tabel pembelian Header (38) sebagai berikut:
Kode yang ada 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);
...Penggantian kode 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);
...Kode yang ada 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);
...Penggantian kode 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);
...Kode yang ada 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");
...Penggantian kode 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");
... -
Ubah kode di kolom dalam tabel informasi perusahaan (79) sebagai berikut:
Kode yang ada... 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 }
...Penggantian kode
... 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 }
... -
Ubah kode di kolom dalam tabel sumber daya (156) sebagai berikut:
Kode yang ada... { 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),
...Penggantian kode
... { 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),
... -
Ubah kode di kolom dalam tabel pekerjaan (167) sebagai berikut:
Kode yang ada... 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
...Penggantian kode
... 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
... -
Ubah kode di kolom dalam tabel pengiriman ke alamat (222) sebagai berikut:
Kode yang ada... 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"
...Penggantian kode
... 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"
... -
Ubah kode di fungsi ClearFields dalam tabel kode pos (225) sebagai berikut:
Kode yang ada... 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.
}
}
...Penggantian kode
... CountryCode := PostCodeRec."Country/Region Code";
County := PostCodeRec.County;
END;
END;
BEGIN
END.
}
}
... -
Ubah kode di kolom dalam tabel rekening (270) sebagai berikut:
Kode yang ada... 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.)));
...Penggantian kode
... 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.)));
... -
Ubah kode di kolom dalam tabel pengingat Header (295) sebagai berikut:
Kode yang ada... 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
...Penggantian kode
... 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
... -
Ubah kode di kolom Memo biaya keuangan Header tabel (302) sebagai berikut:
Kode yang ada... 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
...Penggantian kode
... 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
... -
Ubah kode di kolom dalam tabel kontak (5050) sebagai berikut:
Kode yang ada... { 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 }
...Penggantian kode
... { 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 }
... -
Ubah kode di kolom dalam tabel Alt. alamat kontak (5051) sebagai berikut:
Kode yang ada... 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 }
...Penggantian kode
... 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 }
... -
Ubah kode di kolom dalam tabel karyawan (5200) sebagai berikut:
Kode yang ada... { 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
...Penggantian kode
... { 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
... -
Ubah kode di kolom dalam tabel alamat alternatif (5201) sebagai berikut:
Kode yang ada... { 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 }
}
...Penggantian kode
... { 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 }
}
... -
Ubah kode di kolom dalam tabel Union (5209) sebagai berikut:
Kode yang ada... { 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 }
}
...Penggantian kode
... { 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 }
}
... -
Ubah kode di kolom dalam tabel tanggung jawab pusat (5714) sebagai berikut:
Kode yang ada... 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));
...Penggantian kode
... 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));
... -
Ubah kode di bidang di Transfer Header tabel (5740) sebagai berikut:
Kode yang ada 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
...Penggantian kode 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
...Kode yang ada 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",
...Penggantian kode 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",
... -
Ubah kode di bidang layanan Header tabel (5900) sebagai berikut:
Kode yang ada 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;
...Penggantian kode 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;
...Kode yang ada 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
...Penggantian kode 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
...Kode yang ada 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;
...Penggantian kode 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;
... -
Ubah kode di kolom dalam tabel kembali pengiriman Header (6650) sebagai berikut:
Kode yang ada 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);
...Penggantian kode 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);
...Kode yang ada 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);
...Penggantian kode 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);
...Kode yang ada 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 }
...Penggantian kode 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 }
... -
Ubah kode di kolom dalam tabel kembali tanda terima Header (6660) sebagai berikut:
Kode yang ada 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);
...Penggantian kode 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);
...Kode yang ada 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);
...Penggantian kode 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);
...Kode yang ada 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 }
...Penggantian kode 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 }
...
Prasyarat
Anda harus memiliki Microsoft Dynamics NAV 2013 diinstal untuk menerapkan hotfix ini.
Informasi penghapusan
Anda tidak dapat menghapus hotfix ini.
Status
Microsoft telah memastikan bahwa ini merupakan masalah di dalam produk Microsoft sebagaimana tercantum di bagian "Berlaku untuk".
Catatan Ini adalah artikel "Penerbitan cepat" dibuat langsung dari dalam organisasi dukungan Microsoft. Informasi yang terkandung di dalamnya disediakan sebagai tanggapan masalah yang muncul. Sebagai akibat dari kecepatan untuk menjadikannya tersedia, materi dapat mengandung kesalahan ketik dan dapat direvisi setiap saat tanpa pemberitahuan. Lihat Ketentuan untuk pertimbangan lainnya.
