Αυτό το άρθρο ισχύει για το Microsoft Dynamics NAV για τις τοπικές ρυθμίσεις γλώσσας ιταλικά (it).
Συμπτώματα
Ας υποθέσουμε ότι χρησιμοποιείτε ένα πιστωτικό τιμολόγιο εφαρμόζεται τιμολόγιο στην ιταλική έκδοση του Microsoft Dynamics NAV 2009 Service Pack 1 (SP1). Όταν εκτελείτε την αναφορά λίστας λογαριασμών πελατών (12117) και την έκθεση λίστας λογαριασμών λογαριασμού προμηθευτή (12116), οι αναφορές εκτυπώνουν τα πιστωτικά σημειώματα που εφαρμόζονται στο τιμολόγιο δύο φορές απροσδόκητα.
Επίλυση
Πληροφορίες επείγουσας επιδιόρθωσης
Μια υποστηριζόμενη επείγουσα επιδιόρθωση είναι τώρα διαθέσιμη από τη 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.
Σημείωση Δεν χρειάζεται να έχετε δικαιώματα στους χώρους αποθήκευσης δεδομένων, εκτός εάν πρέπει να εκτελέσετε επιδιόρθωση δεδομένων.
Αλλαγές κώδικα
Σημείωση Ελέγχετε πάντα τις επιδιορθώσεις κώδικα σε ελεγχόμενο περιβάλλον, πριν να εφαρμόσετε τις ενημερώσεις κώδικα στους υπολογιστές παραγωγής σας.
Για να επιλύσετε αυτό το ζήτημα, ακολουθήστε τα εξής βήματα:
Αλλάξτε τον κωδικό του αριθμού στοιχείου δεδομένων 2 στην έκθεση λίστας λογαριασμών λογαριασμού προμηθευτή (12116) ως εξής:
Υπάρχων κώδικας... END; OnAfterGetRecord=BEGIN // Delete the following lines. IF (("Document Type" = "Document Type"::Payment) OR ("Document Type" = "Document Type"::" ")) AND (Open = FALSE) THEN // End of the lines. CurrReport.SKIP; CALCFIELDS("Amount (LCY)","Remaining Amt. (LCY)"); ...Κωδικός αντικατάστασης
... END; OnAfterGetRecord=BEGIN // Add the following lines. IF (("Document Type" = "Document Type"::Payment) OR ("Document Type" = "Document Type"::" ") OR ("Document Type" = "Document Type"::"Credit Memo")) AND NOT Open THEN // End of the lines. CurrReport.SKIP; CALCFIELDS("Amount (LCY)","Remaining Amt. (LCY)"); ...Αλλάξτε τον κωδικό των ενοτήτων με αριθμό στοιχείου δεδομένων 2 στην έκθεση λίστας λογαριασμών προμηθευτή (12116) ως εξής:
Υπάρχων κώδικας... DataSetFieldName=VendLedgEntry1__External_Document_No___Control1130023 } { 1130024;TextBox ;1950 ;423 ;1350 ;423 ;SourceExpr="Document Type"; DataSetFieldName=VendLedgEntry1__Document_Type__Control1130024 } } } { PROPERTIES ...Κωδικός αντικατάστασης
... DataSetFieldName=VendLedgEntry1__External_Document_No___Control1130023 } { 1130024;TextBox ;1950 ;423 ;1350 ;423 ;SourceExpr="Document Type"; DataSetFieldName=VendLedgEntry1__Document_Type__Control1130024 } // Add the following lines. { 1130082;TextBox ;27600;0 ;150 ;423 ;Visible=No; ForeColor=65535; SourceExpr=FORMAT("Document Type",0,2); DataSetFieldName=VendLedgEntry1_DocumentType } // End of the lines. } } { PROPERTIES ...Αλλάξτε τον κωδικό των ενοτήτων αριθμού στοιχείου δεδομένων 4 στην έκθεση λίστας λογαριασμών προμηθευτή (12116) ως εξής:
Υπάρχων κωδικός 1... SectionWidth=27750; SectionHeight=846; OnPreSection=BEGIN // Delete the following lines. IF (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::Payment) OR (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::" ") THEN // End of the lines. CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); ...Κωδικός αντικατάστασης 1
... SectionWidth=27750; SectionHeight=846; OnPreSection=BEGIN // Add the following lines. IF (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::Payment) OR (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::"Credit Memo") OR (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::" ") OR ("Unapplied by Entry No." <> 0) THEN // End of the lines. CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); ...Υπάρχων κωδικός 2
... CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); // Delete the following lines. IF ("Unapplied by Entry No." <> 0) THEN CurrReport.SHOWOUTPUT(FALSE); // End of the lines. END; } ...Κωδικός αντικατάστασης 2
... CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); END; } ...Αλλάξτε τον κώδικα της τεκμηρίωσης στην έκθεση λίστας λογαριασμών λογαριασμού προμηθευτή (12116) ως εξής:
Υπάρχων κωδικός 1... </TableCell> </TableCells> <Visibility> // Delete the following line. <Hidden>=IIF((Fields!Detailed_Vendor_Ledg__Entry_Entry_No_.Value=0 or Fields!Detailed_Vendor_Ledg__Entry__Unapplied_by_Entry_No__.Value<>0),TRUE,FALSE)</Hidden> // End of the line. </Visibility> </TableRow> <TableRow> ...Κωδικός αντικατάστασης 1
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!Detailed_Vendor_Ledg__Entry_Entry_No_.Value=0 OR Fields!Detailed_Vendor_Ledg__Entry__Unapplied_by_Entry_No__.Value<>0 OR Fields!VendLedgEntry1_DocumentType.Value="1" OR Fields!VendLedgEntry1_DocumentType.Value="3" OR Fields!VendLedgEntry1_DocumentType.Value="0", TRUE,FALSE)</Hidden> // End of the lines. </Visibility> </TableRow> <TableRow> ...Υπάρχων κωδικός 2
... </TableCell> </TableCells> <Visibility> // Delete the following lines. <Hidden>=IIF(Fields!VendLedgEntry1__Document_Type_.Value="Invoice" OR Fields!VendLedgEntry1__Document_Type_.Value="Finance Charge Memo" OR Fields!VendLedgEntry1__Document_Type_.Value="Reminder" OR Fields!VendLedgEntry1__Document_Type_.Value="Credit Memo", // End of the lines. FALSE,TRUE)</Hidden> </Visibility> </TableRow> ...Κωδικός αντικατάστασης 2
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!VendLedgEntry1_DocumentType.Value="2" OR Fields!VendLedgEntry1_DocumentType.Value="4" OR Fields!VendLedgEntry1_DocumentType.Value="5" OR Fields!VendLedgEntry1_DocumentType.Value="3", // End of the lines. FALSE,TRUE)</Hidden> </Visibility> </TableRow> ...Υπάρχων κωδικός 3
... </TableCell> </TableCells> <Visibility> // Delete the following lines. <Hidden>=IIF(Fields!VendLedgEntry1__Document_Type_.Value<>"Invoice" AND Fields!VendLedgEntry1__Document_Type_.Value<>"Finance Charge Memo" AND Fields!VendLedgEntry1__Document_Type_.Value<>"Reminder" AND Fields!VendLedgEntry1__Document_Type_.Value<>"Credit Memo" AND // End of the lines. Fields!VendLedgEntry1__Remaining_Amt___LCY__.Value<>0, FALSE,TRUE)</Hidden> </Visibility> ...Κωδικός αντικατάστασης 3
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!VendLedgEntry1_DocumentType.Value<>"2" AND Fields!VendLedgEntry1_DocumentType.Value<>"4" AND Fields!VendLedgEntry1_DocumentType.Value<>"5" AND Fields!VendLedgEntry1_DocumentType.Value<>"3" AND // End of the lines. Fields!VendLedgEntry1__Remaining_Amt___LCY__.Value<>0, FALSE,TRUE)</Hidden> </Visibility> ...Υπάρχων κωδικός 4
... <Field Name="VendLedgEntry1__Amount__LCY___Control1130017Format"> <DataField>VendLedgEntry1__Amount__LCY___Control1130017Format</DataField> </Field> <Field Name="Vendor_BalanceCaption"> <DataField>Vendor_BalanceCaption</DataField> </Field> ...Κωδικός αντικατάστασης 4
... <Field Name="VendLedgEntry1__Amount__LCY___Control1130017Format"> <DataField>VendLedgEntry1__Amount__LCY___Control1130017Format</DataField> </Field> // Add the following lines. <Field Name="VendLedgEntry1_DocumentType"> <DataField>VendLedgEntry1_DocumentType</DataField> </Field> // End of the lines. <Field Name="Vendor_BalanceCaption"> <DataField>Vendor_BalanceCaption</DataField> </Field> ...Αλλάξτε τον κωδικό του αριθμού στοιχείου δεδομένων 2 στην αναφορά λίστας λογαριασμών πελατών (12117) ως εξής:
Υπάρχων κώδικας... END; OnAfterGetRecord=BEGIN // Delete the following lines. IF (("Document Type" = "Document Type"::Payment) OR ("Document Type" = "Document Type"::" ")) AND (Open = FALSE) THEN // End of the lines. CurrReport.SKIP; ...Κωδικός αντικατάστασης
... END; OnAfterGetRecord=BEGIN // Add the following lines. IF (("Document Type" = "Document Type"::Payment) OR ("Document Type" = "Document Type"::" ") OR ("Document Type" = "Document Type"::"Credit Memo")) AND NOT Open THEN // End of the lines. CurrReport.SKIP; CALCFIELDS("Amount (LCY)","Remaining Amt. (LCY)"); ...Αλλάξτε τον κωδικό των ενοτήτων αριθμού στοιχείου δεδομένων 2 στην αναφορά λίστας λογαριασμών πελατών (12117) ως εξής:
Υπάρχων κώδικας... ForeColor=65535; SourceExpr=CustLedgEntry1."Bank Receipt"; DataSetFieldName=CustLedgEntry1_CustLedgEntry1__Bank_Receipt_ } } } { PROPERTIES ...Κωδικός αντικατάστασης
... ForeColor=65535; SourceExpr=CustLedgEntry1."Bank Receipt"; DataSetFieldName=CustLedgEntry1_CustLedgEntry1__Bank_Receipt_ } // Add the following lines. { 1130008;TextBox ;24150;423 ;150 ;423 ;Visible=No; ForeColor=65535; SourceExpr=FORMAT("Document Type",0,2); DataSetFieldName=CustLedgEntry1_DocumentType } // End of the lines. } } { PROPERTIES ...Αλλάξτε τον κωδικό των ενοτήτων αριθμού στοιχείου δεδομένων 4 στην αναφορά λίστας λογαριασμών πελάτη (12117) ως εξής:
Υπάρχων κωδικός 1... SectionWidth=24450; SectionHeight=846; OnPreSection=BEGIN // Delete the following lines. IF (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::Payment) OR (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::" ") THEN // End of the lines. CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); ...Κωδικός αντικατάστασης 1
... SectionWidth=24450; SectionHeight=846; OnPreSection=BEGIN // Add the following lines. IF (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::Payment) OR (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::"Credit Memo") OR (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::" ") OR ("Unapplied by Entry No." <> 0) THEN // End of the lines. CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); ...Υπάρχων κωδικός 2
... CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); // Delete the following lines. IF ("Unapplied by Entry No." <> 0) THEN CurrReport.SHOWOUTPUT(FALSE); // End of the lines. END; } ...Κωδικός αντικατάστασης 2
... CurrReport.SHOWOUTPUT(FALSE) ELSE CurrReport.SHOWOUTPUT(TRUE); END; } ...Αλλάξτε τον κώδικα τεκμηρίωσης στην αναφορά λίστας λογαριασμών πελατών (12117) ως εξής:
Υπάρχων κωδικός 1... </TableCell> </TableCells> <Visibility> // Delete the following line. <Hidden>=IIF(Fields!Detailed_Cust__Ledg__Entry_Entry_No_.Value=0,TRUE,FALSE)</Hidden> // End of the line. </Visibility> </TableRow> <TableRow> ...Κωδικός αντικατάστασης 1
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!Detailed_Cust__Ledg__Entry_Entry_No_.Value=0 OR Fields!CustLedgEntry1_DocumentType.Value="0" OR Fields!CustLedgEntry1_DocumentType.Value="1" OR Fields!CustLedgEntry1_DocumentType.Value="3", TRUE,FALSE)</Hidden> // End of the lines. </Visibility> </TableRow> <TableRow> ...Υπάρχων κωδικός 2
... </TableCell> </TableCells> <Visibility> // Delete the following lines. <Hidden>=IIF(Fields!CustLedgEntry1__Document_Type_.Value="Invoice" OR Fields!CustLedgEntry1__Document_Type_.Value="Finance Charge Memo" OR Fields!CustLedgEntry1__Document_Type_.Value="Reminder" OR Fields!CustLedgEntry1__Document_Type_.Value="Credit Memo", // End of the lines. FALSE,TRUE)</Hidden> </Visibility> </TableRow> ...Κωδικός αντικατάστασης 2
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!CustLedgEntry1_DocumentType.Value="2" OR Fields!CustLedgEntry1_DocumentType.Value="4" OR Fields!CustLedgEntry1_DocumentType.Value="5" OR Fields!CustLedgEntry1_DocumentType.Value="3", // End of the lines. FALSE,TRUE)</Hidden> </Visibility> </TableRow> ...Υπάρχων κωδικός 3
... </TableCell> </TableCells> <Visibility> // Delete the following lines. <Hidden>=IIF(Fields!CustLedgEntry1__Document_Type_.Value<>"Invoice" AND Fields!CustLedgEntry1__Document_Type_.Value<>"Finance Charge Memo" AND Fields!CustLedgEntry1__Document_Type_.Value<>"Reminder" AND Fields!CustLedgEntry1__Document_Type_.Value<>"Credit Memo" AND // End of the lines. Fields!CustLedgEntry1__Remaining_Amt___LCY__.Value<>0 AND Fields!CustLedgEntry1_CustLedgEntry1__Bank_Receipt_.Value=FALSE, FALSE,TRUE)</Hidden> ...Κωδικός αντικατάστασης 3
... </TableCell> </TableCells> <Visibility> // Add the following lines. <Hidden>=IIF(Fields!CustLedgEntry1_DocumentType.Value<>"2" AND Fields!CustLedgEntry1_DocumentType.Value<>"4" AND Fields!CustLedgEntry1_DocumentType.Value<>"5" AND Fields!CustLedgEntry1_DocumentType.Value<>"3" AND // End of the lines. Fields!CustLedgEntry1__Remaining_Amt___LCY__.Value<>0 AND Fields!CustLedgEntry1_CustLedgEntry1__Bank_Receipt_.Value=FALSE, FALSE,TRUE)</Hidden> ...Υπάρχων κωδικός 4
... <Field Name="CustLedgEntry1_CustLedgEntry1__Bank_Receipt_"> <DataField>CustLedgEntry1_CustLedgEntry1__Bank_Receipt_</DataField> </Field> <Field Name="Customer_BalanceCaption"> <DataField>Customer_BalanceCaption</DataField> </Field> ..Κωδικός αντικατάστασης 4
... <Field Name="CustLedgEntry1_CustLedgEntry1__Bank_Receipt_"> <DataField>CustLedgEntry1_CustLedgEntry1__Bank_Receipt_</DataField> </Field> // Add the following lines. <Field Name="CustLedgEntry1_DocumentType"> <DataField>CustLedgEntry1_DocumentType</DataField> </Field> // End of the lines. <Field Name="Customer_BalanceCaption"> <DataField>Customer_BalanceCaption</DataField> </Field> ...
Προαπαιτούμενα
Πρέπει να έχετε την ιταλική έκδοση του Microsoft Dynamics NAV 2009 Service Pack 1 για να εφαρμόσετε αυτήν την επείγουσα επιδιόρθωση.
Πληροφορίες κατάργησης
Δεν μπορείτε να καταργήσετε αυτήν την επείγουσα επιδιόρθωση.
Κατάσταση
Η Microsoft έχει επιβεβαιώσει ότι πρόκειται για ένα ζήτημα που αφορά τα προϊόντα της Microsoft που παρατίθενται στην ενότητα "Ισχύει για".
Σημείωση Αυτό είναι ένα άρθρο "FAST PUBLISH" που δημιουργήθηκε απευθείας μέσα από τον οργανισμό υποστήριξης της Microsoft. Οι πληροφορίες που περιέχονται στο παρόν παρέχονται ως έχουν ως απάντηση σε αναδυόμενα ζητήματα. Ως αποτέλεσμα της ταχύτητας διάθεσής του, το υλικό μπορεί να περιλαμβάνει τυπογραφικά λάθη και μπορεί να αναθεωρηθεί ανά πάσα στιγμή χωρίς προειδοποίηση. Ανατρέξτε στους Όρους χρήσης για άλλα ζητήματα.