Αυτό το άρθρο ισχύει για το Microsoft Dynamics NAV για τις τοπικές ρυθμίσεις γλώσσας Δανικά (dk).
Συμπτώματα
Μετά την καταχώρηση μιας παραγγελίας πώλησης στην οποία ο πελάτης πώλησης είναι από τη Σουηδία, μια χώρα της Ευρωπαϊκής Ένωσης (ΕΕ), και ο πελάτης τιμολόγησης είναι από τη Νορβηγία, μια χώρα εκτός ΕΕ, στη δανική έκδοση του Microsoft Dynamics NAV 2009, η παραγγελία πώλησης δεν αναφέρεται στην έκθεση "VAT-VIES Tax Auth" (19) όπως αναμένεται.
Αυτό το ζήτημα παρουσιάζεται στα ακόλουθα προϊόντα:
- Η δανική έκδοση του Microsoft Dynamics NAV 2009 R2
- Η δανική έκδοση του Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
Επίλυση
Πληροφορίες επείγουσας επιδιόρθωσης
Μια υποστηριζόμενη επείγουσα επιδιόρθωση είναι τώρα διαθέσιμη από τη Microsoft. Ωστόσο, αυτή η ενέργεια προορίζεται μόνο για τη διόρθωση του ζητήματος που περιγράφεται σε αυτό το άρθρο. Εφαρμόστε το μόνο σε συστήματα που αντιμετωπίζουν αυτό το συγκεκριμένο πρόβλημα. Αυτή η επείγουσα επιδιόρθωση ενδέχεται να υποβληθεί σε πρόσθετο έλεγχο. Επομένως, εάν αυτό το ζήτημα δεν σας επηρεάζει ιδιαίτερα, συνιστάται να περιμένετε έως το επόμενο service pack του Microsoft Dynamics NAV 2009 ή την επόμενη έκδοση του Microsoft Dynamics NAV που περιέχει αυτήν την επείγουσα επιδιόρθωση.
Σημείωση Σε ειδικές περιπτώσεις, οι χρεώσεις που προκύπτουν κανονικά για κλήσεις υποστήριξης ενδέχεται να ακυρωθούν, εάν ένας επαγγελματίας τεχνικής υποστήριξης για το Microsoft Dynamics και τα σχετικά προϊόντα προσδιορίσει ότι μια συγκεκριμένη ενημερωμένη έκδοση θα επιλύσει το ζήτημά σας. Για πρόσθετες ερωτήσεις υποστήριξης και για θέματα που δεν αφορούν τη συγκεκριμένη ενημερωμένη έκδοση, θα ισχύσουν οι συνηθισμένες χρεώσεις υποστήριξης.
Πληροφορίες εγκατάστασης
Η Microsoft παρέχει παραδείγματα προγραμματισμού μόνο για απεικόνιση, χωρίς καμία εγγύηση, ρητή ή σιωπηρή. Αυτό περιλαμβάνει, ενδεικτικά, τις σιωπηρές εγγυήσεις εμπορευσιμότητας ή καταλληλότητας για συγκεκριμένο σκοπό. Αυτό το άρθρο προϋποθέτει ότι είστε εξοικειωμένοι με τη γλώσσα προγραμματισμού που επιδεικνύεται και με τα εργαλεία που χρησιμοποιούνται για τη δημιουργία και τον εντοπισμό σφαλμάτων διαδικασιών. Οι μηχανικοί υποστήριξης της Microsoft μπορούν να σας βοηθήσουν να εξηγήσετε τη λειτουργικότητα μιας συγκεκριμένης διαδικασίας, αλλά δεν θα τροποποιήσουν αυτά τα παραδείγματα για να παρέχουν πρόσθετες λειτουργίες ούτε θα δημιουργήσουν διαδικασίες για να ικανοποιήσουν τις συγκεκριμένες απαιτήσεις σας.
Σημείωση Πριν να εγκαταστήσετε αυτήν την επείγουσα επιδιόρθωση, βεβαιωθείτε ότι όλοι οι χρήστες προγράμματος-πελάτη Microsoft Navision έχουν αποσυνδεθεί από το σύστημα. Αυτό περιλαμβάνει χρήστες προγράμματος-πελάτη Microsoft Navision Application Services (NAS). Θα πρέπει να είστε ο μόνος χρήστης-πελάτης που είναι συνδεδεμένος όταν υλοποιείτε αυτήν την επείγουσα επιδιόρθωση.
Για να υλοποιήσετε αυτήν την επείγουσα επιδιόρθωση, πρέπει να έχετε άδεια προγραμματιστή.
Συνιστούμε ο λογαριασμός χρήστη στο παράθυρο Συνδέσεις των Windows ή στο παράθυρο Συνδέσεις βάσης δεδομένων να έχει το αναγνωριστικό ρόλου "SUPER". Εάν δεν είναι δυνατή η εκχώρηση του αναγνωριστικού ρόλου "SUPER" στο λογαριασμό χρήστη, πρέπει να επαληθεύσετε ότι ο λογαριασμός χρήστη έχει τα ακόλουθα δικαιώματα:
- Το δικαίωμα τροποποίησης για το αντικείμενο που θα αλλάξετε.
- Το δικαίωμα εκτέλεσης για το αντικείμενο αναγνωριστικού αντικειμένου συστήματος 5210 και για το αντικείμενο αναγνωριστικού αντικειμένου συστήματος 9015.
Σημείωση Δεν χρειάζεται να έχετε δικαιώματα στους χώρους αποθήκευσης δεδομένων, εκτός εάν πρέπει να εκτελέσετε επιδιόρθωση δεδομένων.
Αλλαγές κώδικα
Σημείωση Ελέγχετε πάντα τις επιδιορθώσεις κώδικα σε ελεγχόμενο περιβάλλον, πριν να εφαρμόσετε τις ενημερώσεις κώδικα στους υπολογιστές παραγωγής σας.
Για να επιλύσετε αυτό το ζήτημα, ακολουθήστε τα εξής βήματα:
Αλλάξτε τον κωδικό στη συνάρτηση InsertVAT στο "Gen. Jnl.-Post Line" κωδική μονάδα (12) ως εξής:
Υπάρχων κώδικας... VATEntry."Sales Tax Connection No." := NextConnectionNo; VATEntry."User ID" := USERID; VATEntry."No. Series" := "Posting No. Series"; VATEntry."VAT Base Discount %" := "VAT Base Discount %"; VATEntry."Bill-to/Pay-to No." := "Bill-to/Pay-to No."; // Delete the following lines. IF "Bill-to/Pay-to No." <> '' THEN CASE VATEntry.Type OF VATEntry.Type::Purchase: BEGIN IF Vend."No." <> "Bill-to/Pay-to No." THEN Vend.GET("Bill-to/Pay-to No."); VATEntry."Country/Region Code" := Vend."Country/Region Code"; VATEntry."VAT Registration No." := Vend."VAT Registration No."; END; VATEntry.Type::Sale: BEGIN IF Cust."No." <> "Bill-to/Pay-to No." THEN Cust.GET("Bill-to/Pay-to No."); VATEntry."Country/Region Code" := Cust."Country/Region Code"; VATEntry."VAT Registration No." := Cust."VAT Registration No."; END; END; // End of the lines. ...Κωδικός αντικατάστασης
... VATEntry."Sales Tax Connection No." := NextConnectionNo; VATEntry."User ID" := USERID; VATEntry."No. Series" := "Posting No. Series"; VATEntry."VAT Base Discount %" := "VAT Base Discount %"; VATEntry."Bill-to/Pay-to No." := "Bill-to/Pay-to No."; // Add the following lines. VATEntry."Country/Region Code" := "Country/Region Code"; VATEntry."VAT Registration No." := "VAT Registration No."; //End of the lines. ...Αλλάξτε τον κωδικό στο πεδίο Αριθμός πώλησης στον πελάτη. - Έναυσμα OnValidate στον πίνακα κεφαλίδας πωλήσεων (36) ως εξής:
Υπάρχων κώδικας... "Sell-to Contact" := Cust.Contact; "Gen. Bus. Posting Group" := Cust."Gen. Bus. Posting Group"; "VAT Bus. Posting Group" := Cust."VAT Bus. Posting Group"; "Tax Area Code" := Cust."Tax Area Code"; "Tax Liable" := Cust."Tax Liable"; // Delete the following line. "VAT Registration No." := Cust."VAT Registration No."; ...Κωδικός αντικατάστασης
... "Sell-to Contact" := Cust.Contact; "Gen. Bus. Posting Group" := Cust."Gen. Bus. Posting Group"; "VAT Bus. Posting Group" := Cust."VAT Bus. Posting Group"; "Tax Area Code" := Cust."Tax Area Code"; "Tax Liable" := Cust."Tax Liable"; // Add the following lines. GLSetup.GET; IF GLSetup."Bill-to/Sell-to VAT Calc." = GLSetup."Bill-to/Sell-to VAT Calc."::"Sell-to/Buy-from No." THEN BEGIN "VAT Registration No." := Cust."VAT Registration No."; "VAT Country/Region Code" := Cust."Country/Region Code"; END; //End of the lines. ...Αλλάξτε τον κωδικό στο Αριθμό χρέωσης σε Πελάτη. - Έναυσμα OnValidate στον πίνακα κεφαλίδας πωλήσεων (36) ως εξής:
Υπάρχων κωδικός 1... "Bill-to Address 2" := Cust."Address 2"; "Bill-to City" := Cust.City; "Bill-to Post Code" := Cust."Post Code"; "Bill-to County" := Cust.County; "Bill-to Country/Region Code" := Cust."Country/Region Code"; // Delete the following line. "VAT Country/Region Code" := Cust."Country/Region Code"; ...Κωδικός αντικατάστασης 1
... "Bill-to Address 2" := Cust."Address 2"; "Bill-to City" := Cust.City; "Bill-to Post Code" := Cust."Post Code"; "Bill-to County" := Cust.County; "Bill-to Country/Region Code" := Cust."Country/Region Code"; ...Υπάρχων κωδικός 2
... // Delete the following line. IF GLSetup."Bill-to/Sell-to VAT Calc." = GLSetup."Bill-to/Sell-to VAT Calc."::"Bill-to/Pay-to No." THEN "VAT Bus. Posting Group" := Cust."VAT Bus. Posting Group"; ...Κωδικός αντικατάστασης 2
... // Add the following line. IF GLSetup."Bill-to/Sell-to VAT Calc." = GLSetup."Bill-to/Sell-to VAT Calc."::"Bill-to/Pay-to No." THEN BEGIN "VAT Bus. Posting Group" := Cust."VAT Bus. Posting Group"; // Add the following lines. "VAT Registration No." := Cust."VAT Registration No."; "VAT Country/Region Code" := Cust."Country/Region Code"; END; //End of the lines. ...Υπάρχων κωδικός 3
... "Language Code" := Cust."Language Code"; "Salesperson Code" := Cust."Salesperson Code"; "Combine Shipments" := Cust."Combine Shipments"; Reserve := Cust.Reserve; // Delete the following line. "VAT Registration No." := Cust."VAT Registration No."; ...Κωδικός αντικατάστασης 3
... "Language Code" := Cust."Language Code"; "Salesperson Code" := Cust."Salesperson Code"; "Combine Shipments" := Cust."Combine Shipments"; Reserve := Cust.Reserve; ...Αλλάξτε τον κωδικό στο Customer No. - OnValidate έναυσμα στον πίνακα Κεφαλίδα υπηρεσίας (5900) ως εξής:
Υπάρχων κώδικας... END; "Gen. Bus. Posting Group" := Cust."Gen. Bus. Posting Group"; "VAT Bus. Posting Group" := Cust."VAT Bus. Posting Group"; "Tax Area Code" := Cust."Tax Area Code"; "Tax Liable" := Cust."Tax Liable"; // Delete the following line. "VAT Registration No." := Cust."VAT Registration No."; ...Κωδικός αντικατάστασης
... END; "Gen. Bus. Posting Group" := Cust."Gen. Bus. Posting Group"; "VAT Bus. Posting Group" := Cust."VAT Bus. Posting Group"; "Tax Area Code" := Cust."Tax Area Code"; "Tax Liable" := Cust."Tax Liable"; // Add the following lines. GLSetup.GET; IF GLSetup."Bill-to/Sell-to VAT Calc." = GLSetup."Bill-to/Sell-to VAT Calc."::"Sell-to/Buy-from No." THEN BEGIN "VAT Registration No." := Cust."VAT Registration No."; "VAT Country/Region Code" := Cust."Country/Region Code"; END; //End of the lines. ...Αλλάξτε τον κωδικό στο Αριθμό χρέωσης σε Πελάτη. - OnValidate έναυσμα στον πίνακα Κεφαλίδα υπηρεσίας (5900) ως εξής:
Υπάρχων κωδικός 1... // Delete the following line. IF GLSetup."Bill-to/Sell-to VAT Calc." = GLSetup."Bill-to/Sell-to VAT Calc."::"Bill-to/Pay-to No." THEN "VAT Bus. Posting Group" := Cust."VAT Bus. Posting Group"; ...Κωδικός αντικατάστασης 1
... // Add the following line. IF GLSetup."Bill-to/Sell-to VAT Calc." = GLSetup."Bill-to/Sell-to VAT Calc."::"Bill-to/Pay-to No." THEN BEGIN "VAT Bus. Posting Group" := Cust."VAT Bus. Posting Group"; // Add the following lines. "VAT Registration No." := Cust."VAT Registration No."; "VAT Country/Region Code" := Cust."Country/Region Code"; END; //End of the lines. ...Υπάρχων κωδικός 2
... "Invoice Disc. Code" := Cust."Invoice Disc. Code"; "Customer Disc. Group" := Cust."Customer Disc. Group"; "Language Code" := Cust."Language Code"; "Salesperson Code" := Cust."Salesperson Code"; Reserve := Cust.Reserve; // Delete the following line. "VAT Registration No." := Cust."VAT Registration No."; ...Κωδικός αντικατάστασης 2
... "Invoice Disc. Code" := Cust."Invoice Disc. Code"; "Customer Disc. Group" := Cust."Customer Disc. Group"; "Language Code" := Cust."Language Code"; "Salesperson Code" := Cust."Salesperson Code"; Reserve := Cust.Reserve; ...Διαγράψτε τον ακόλουθο κωδικό στο έναυσμα Κωδικός χώρας/περιοχής αποστολής - OnValidate στον πίνακα κεφαλίδας υπηρεσίας (5900):
... // Delete the following lines. IF "Ship-to Country/Region Code" <> '' THEN "VAT Country/Region Code" := "Country/Region Code" ELSE "VAT Country/Region Code" := "Country/Region Code" // End of the lines. ...Αλλάξτε τον κωδικό στην τοπική διαδικασία UpdateShipToAddress στον πίνακα κεφαλίδας υπηρεσίας (5900) ως εξής:
Υπάρχων κώδικας... "Ship-to County" := CompanyInfo."Ship-to County"; "Ship-to Country/Region Code" := CompanyInfo."Ship-to Country/Region Code"; "Ship-to Contact" := CompanyInfo."Ship-to Contact"; END; // Delete the following line. "VAT Country/Region Code" := "Country/Region Code"; END; ...Κωδικός αντικατάστασης
... "Ship-to County" := CompanyInfo."Ship-to County"; "Ship-to Country/Region Code" := CompanyInfo."Ship-to Country/Region Code"; "Ship-to Contact" := CompanyInfo."Ship-to Contact"; END; END; ...
Προαπαιτούμενα
Πρέπει να έχετε ένα από τα ακόλουθα προϊόντα για να εφαρμόσετε αυτήν την επείγουσα επιδιόρθωση:
- Η δανική έκδοση του Microsoft Dynamics NAV 2009 R2
- Η δανική έκδοση του Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
Πληροφορίες κατάργησης
Δεν μπορείτε να καταργήσετε αυτήν την επείγουσα επιδιόρθωση.
Κατάσταση
Η Microsoft έχει επιβεβαιώσει ότι πρόκειται για ένα ζήτημα που αφορά τα προϊόντα της Microsoft που παρατίθενται στην ενότητα "Ισχύει για".
Σημείωση Αυτό είναι ένα άρθρο "FAST PUBLISH" που δημιουργήθηκε απευθείας μέσα από τον οργανισμό υποστήριξης της Microsoft. Οι πληροφορίες που περιέχονται στο παρόν παρέχονται ως έχουν ως απάντηση σε αναδυόμενα ζητήματα. Ως αποτέλεσμα της ταχύτητας διάθεσής του, το υλικό μπορεί να περιλαμβάνει τυπογραφικά λάθη και μπορεί να αναθεωρηθεί ανά πάσα στιγμή χωρίς προειδοποίηση. Ανατρέξτε στους Όρους χρήσης για άλλα ζητήματα.