Μετάβαση στο κύριο περιεχόμενο
Υποστήριξη
Είσοδος με Microsoft
Είσοδος ή δημιουργία λογαριασμού.
Γεια σας,
Επιλέξτε διαφορετικό λογαριασμό.
Έχετε πολλούς λογαριασμούς
Επιλέξτε τον λογαριασμό με τον οποίο θέλετε να εισέλθετε.

Αυτό το άρθρο ισχύει για το Microsoft Dynamics NAV για όλες τις χώρες και για όλες τις τοπικές ρυθμίσεις γλώσσας.

Συμπτώματα

Ας υποθέσουμε ότι εκτελείτε τη λειτουργία Αντιγραφή καταχωρημένων γραμμών παραστατικού για αντιλογισμό στη σελίδα επιστροφή πώλησης στο Microsoft Dynamics NAV 2009. Όταν ορίζετε ένα φίλτρο για ένα στοιχείο, λαμβάνετε το ακόλουθο μήνυμα λάθους:

Γραμμή τιμολογίου πώλησης: Δεν υπάρχει καμία γραμμή τιμολογίου πώλησης εντός του φίλτρου. Φίλτρα Αρ.:X, όχι: @Y


Σημείωση Το σύμβολο κράτησης θέσης X αντικαθιστά τον αριθμό παραστατικού από τη γραμμή όπου είναι το δείκτη του ποντικιού και το σύμβολο κράτησης θέσης Y αντικαθιστά τον κωδικό του είδους που θα εισαχθεί στο φίλτρο.

Αυτό το ζήτημα παρουσιάζεται στα ακόλουθα προϊόντα:

  • Microsoft Dynamics NAV 2009 R2

  • Microsoft Dynamics NAV 2009 Service Pack 1

Προτεινόμενη αντιμετώπιση

Πληροφορίες άμεσης επιδιόρθωσης

Μια υποστηριζόμενη άμεση επιδιόρθωση είναι τώρα διαθέσιμη από τη Microsoft. Ωστόσο, προορίζεται μόνο για τη διόρθωση του ζητήματος που περιγράφεται σε αυτό το άρθρο. Eφαρμόστε τη μόνο σε συστήματα που αντιμετωπίζουν το συγκεκριμένο ζήτημα. Αυτή η επείγουσα επιδιόρθωση ενδέχεται να υποβληθεί σε πρόσθετο έλεγχο. Επομένως, εάν αυτό το ζήτημα δεν σας επηρεάζει ιδιαίτερα, σας συνιστούμε να περιμένετε έως το επόμενο service pack του Microsoft Dynamics NAV 2009 ή την επόμενη έκδοση του Microsoft Dynamics NAV που περιέχει αυτήν την επείγουσα επιδιόρθωση.

Σημείωση Σε ειδικές περιπτώσεις, οι χρεώσεις που υφίστανται κανονικά για κλήσεις υποστήριξης ενδέχεται να να ακυρωθούν, εάν έναν επαγγελματία τεχνικής υποστήριξης για το Microsoft Dynamics και σχετικά προϊόντα προσδιορίζει ότι μια συγκεκριμένη ενημερωμένη έκδοση θα επιλύσει το ζήτημά σας. Οι συνηθισμένες χρεώσεις υποστήριξης θα ισχύει για πρόσθετες ερωτήσεις υποστήριξης και για θέματα που δεν αφορούν τη συγκεκριμένη ενημερωμένη έκδοση.


Πληροφορίες εγκατάστασης

Η Microsoft παρέχει παραδείγματα προγραμματισμού μόνο για επεξήγηση, χωρίς καμία εγγύηση, είτε σιωπηρή είτε ρητή. Αυτό περιλαμβάνει, ενδεικτικά, τις σιωπηρές εγγυήσεις εμπορευσιμότητας ή καταλληλότητας για συγκεκριμένο σκοπό. Αυτό το άρθρο προϋποθέτει ότι είστε εξοικειωμένοι με τη γλώσσα προγραμματισμού που παρουσιάζεται, καθώς και με τα εργαλεία που χρησιμοποιούνται για τη δημιουργία διαδικασιών και τον εντοπισμό σφαλμάτων σε αυτές. Οι μηχανικοί υποστήριξης της Microsoft μπορούν να σας εξηγήσουν τη λειτουργικότητα μιας συγκεκριμένης διαδικασίας. Ωστόσο, δεν θα τροποποιήσουν αυτά τα παραδείγματα για να παράσχουν πρόσθετες λειτουργίες, ούτε θα δημιουργήσουν διαδικασίες για να καλύψουν τις συγκεκριμένες απαιτήσεις σας.

Σημείωση Πριν να εγκαταστήσετε αυτήν την επείγουσα επιδιόρθωση, επιβεβαιώστε ότι όλοι οι χρήστες προγράμματος-πελάτη Microsoft Navision έχουν αποσυνδεθεί από το σύστημα. Σε αυτές περιλαμβάνονται οι χρήστες του προγράμματος-πελάτη Microsoft Navision εφαρμογής υπηρεσιών (NAS). Θα πρέπει να το πρόγραμμα-πελάτη μόνο χρήστη που είναι συνδεδεμένος κατά την εφαρμογή αυτής της επείγουσας επιδιόρθωσης.

Για να εφαρμόσετε αυτήν την επείγουσα επιδιόρθωση, πρέπει να έχετε μια άδεια χρήσης του προγραμματιστή.

Συνιστούμε ότι ο λογαριασμός χρήστη στο παράθυρο "Συνδέσεις Windows" ή στο παράθυρο συνδέσεις βάσης δεδομένων να αντιστοιχιστεί το "SUPER" αναγνωριστικό ρόλου. Εάν ο λογαριασμός χρήστη δεν μπορεί να αντιστοιχιστεί το Αναγνωριστικό ρόλου "SUPER", πρέπει να επαληθεύσετε ότι ο λογαριασμός χρήστη έχει τα ακόλουθα δικαιώματα:

  • Το δικαίωμα "Τροποποίηση" για το αντικείμενο που θα αλλάξετε.

  • Τα δικαιώματα εκτέλεσης για το αντικείμενο 5210 Αναγνωριστικό αντικειμένου συστήματος και για το αντικείμενο 9015 Αναγνωριστικό αντικειμένου συστήματος .



Σημείωση Δεν πρέπει να έχετε δικαιώματα για τους χώρους αποθήκευσης δεδομένων, εκτός και αν έχετε να εκτελέσετε επιδιόρθωση δεδομένων.

Αλλαγές κώδικα

Σημείωση Πάντα δοκιμή κώδικα διορθώνει σε ελεγχόμενο περιβάλλον πριν να εφαρμόσετε τις ενημερώσεις κώδικα στους υπολογιστές παραγωγής.
Για να επιλύσετε αυτό το ζήτημα, ακολουθήστε τα εξής βήματα:

  1. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στο το λήψη Αντιγρ.Παραστ.Καταχ. - σελίδα Γραμ.Παραλ.αγορών S.ShptLn (5851) ως εξής:
    Υπάρχοντα κώδικα

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    SalesShptLine2.COPYFILTERS(Rec);
    SalesShptLine2.SETRANGE("Document No.","Document No.");
    SalesShptLine2.FINDSET;
    REPEAT
    ShowRec := IsShowRec(SalesShptLine2);
    IF ShowRec THEN BEGIN
    ...

    Αντικατάσταση κώδικα

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    SalesShptLine2.COPYFILTERS(Rec);
    SalesShptLine2.SETRANGE("Document No.","Document No.");
    IF NOT SalesShptLine2.FINDSET THEN
    EXIT(FALSE);
    REPEAT
    ShowRec := IsShowRec(SalesShptLine2);
    IF ShowRec THEN BEGIN

  2. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στο το λήψη Αντιγρ.Παραστ.Καταχ. - Υποφόρμα S.InvLn σελίδα (5852) ως εξής:
    Υπάρχοντα κώδικα

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    SalesInvLine2.COPYFILTERS(Rec);
    SalesInvLine2.SETRANGE("Document No.","Document No.");
    SalesInvLine2.FINDSET;
    REPEAT
    ShowRec := IsShowRec(SalesInvLine2);
    IF ShowRec THEN BEGIN
    ...

    Αντικατάσταση κώδικα

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    SalesInvLine2.COPYFILTERS(Rec);
    SalesInvLine2.SETRANGE("Document No.","Document No.");
    IF NOT SalesInvLine2.FINDSET THEN
    EXIT(FALSE);
    REPEAT
    ShowRec := IsShowRec(SalesInvLine2);
    IF ShowRec THEN BEGIN

  3. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στο το λήψη Αντιγρ.Παραστ.Καταχ. - Υποφόρμα Γραμ.Παραλ.αγορών σελίδα (5856) ως εξής:
    Υπάρχοντα κώδικα

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    PurchRcptLine2.COPYFILTERS(Rec);
    PurchRcptLine2.SETRANGE("Document No.","Document No.");
    PurchRcptLine2.FINDSET;
    REPEAT
    ShowRec := IsShowRec(PurchRcptLine2);
    IF ShowRec THEN BEGIN
    ...

    Αντικατάσταση κώδικα

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    PurchRcptLine2.COPYFILTERS(Rec);
    PurchRcptLine2.SETRANGE("Document No.","Document No.");
    IF NOT PurchRcptLine2.FINDSET THEN
    EXIT(FALSE);
    REPEAT
    ShowRec := IsShowRec(PurchRcptLine2);
    IF ShowRec THEN BEGIN

  4. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στο το λήψη Αντιγρ.Παραστ.Καταχ. - Γραμ.Αποθ.αγορών σελίδα (5857) ως εξής:
    Υπάρχοντα κώδικα

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    PurchInvLine2.COPYFILTERS(Rec);
    PurchInvLine2.SETRANGE("Document No.","Document No.");
    PurchInvLine2.FINDSET;
    REPEAT
    ShowRec := IsShowRec(PurchInvLine2);
    IF ShowRec THEN BEGIN
    ...

    Αντικατάσταση κώδικα

    ...        RevUnitCostLCY2 := RevUnitCostLCY;
    PurchInvLine2.COPYFILTERS(Rec);
    PurchInvLine2.SETRANGE("Document No.","Document No.");
    IF NOT PurchInvLine2.FINDSET THEN
    EXIT(FALSE);
    REPEAT
    ShowRec := IsShowRec(PurchInvLine2);
    IF ShowRec THEN BEGIN

  5. Για να αλλάξετε τον κωδικό στη συνάρτηση IsFirstDocLine στο πεδίο Αγορές-Λογ. Παραλαβή φόρμα γραμμές (5806) ως εξής:
    Υπάρχοντα κώδικα

    ...          FILTERGROUP(2);
    PurchRcptLine.COPYFILTERS(Rec);
    FILTERGROUP(0);
    PurchRcptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    PurchRcptLine.FIND('-');

    TempPurchRcptLine := PurchRcptLine;
    TempPurchRcptLine.INSERT;
    END;
    IF "Line No." = TempPurchRcptLine."Line No." THEN
    ...

    Αντικατάσταση κώδικα

    ...          FILTERGROUP(2);
    PurchRcptLine.COPYFILTERS(Rec);
    FILTERGROUP(0);
    PurchRcptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT PurchRcptLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempPurchRcptLine := PurchRcptLine;
    TempPurchRcptLine.INSERT;
    END;
    IF "Line No." = TempPurchRcptLine."Line No." THEN

  6. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στη φόρμα λήψη Αντιγρ.Παραστ.Καταχ.-Υποφόρμα Γραμ.Παραλ.Επιστρ. (5853) ως εξής:
    Υπάρχοντα κώδικα

    ...        TempReturnRcptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnRcptLine.FINDFIRST THEN BEGIN
    ReturnRcptLine.COPYFILTERS(Rec);
    ReturnRcptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ReturnRcptLine.FINDSET;

    TempReturnRcptLine := ReturnRcptLine;
    TempReturnRcptLine.INSERT;
    END;
    ...

    Αντικατάσταση κώδικα

    ...        TempReturnRcptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnRcptLine.FINDFIRST THEN BEGIN
    ReturnRcptLine.COPYFILTERS(Rec);
    ReturnRcptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ReturnRcptLine.FINDSET THEN
    EXIT(FALSE);
    // End of the lines.

    TempReturnRcptLine := ReturnRcptLine;
    TempReturnRcptLine.INSERT;
    END;

  7. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στη φόρμα λήψη Αντιγρ.Παραστ.Καταχ.-Υποφόρμα Γραμ.Πιστ.Τιμολ.Πωλ Γραμ.Παραλ.αγορών (5854) ως εξής:
    Υπάρχοντα κώδικα

    ...        TempSalesCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempSalesCrMemoLine.FINDFIRST THEN BEGIN
    SalesCrMemoLine.COPYFILTERS(Rec);
    SalesCrMemoLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    SalesCrMemoLine.FIND('-');

    TempSalesCrMemoLine := SalesCrMemoLine;
    TempSalesCrMemoLine.INSERT;
    END;
    ...

    Αντικατάσταση κώδικα

    ...        TempSalesCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempSalesCrMemoLine.FINDFIRST THEN BEGIN
    SalesCrMemoLine.COPYFILTERS(Rec);
    SalesCrMemoLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT SalesCrMemoLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempSalesCrMemoLine := SalesCrMemoLine;
    TempSalesCrMemoLine.INSERT;
    END;

  8. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στη φόρμα λήψη Αντιγρ.Παραστ.Καταχ.-Υποφόρμα Γραμ.Αποστ.Επιστρ. (5858) ως εξής:
    Υπάρχοντα κώδικα

    ...        TempReturnShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnShptLine.FINDFIRST THEN BEGIN
    ReturnShptLine.COPYFILTERS(Rec);
    ReturnShptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ReturnShptLine.FINDSET;

    TempReturnShptLine := ReturnShptLine;
    TempReturnShptLine.INSERT;
    END;
    ...

    Αντικατάσταση κώδικα

    ...        TempReturnShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnShptLine.FINDFIRST THEN BEGIN
    ReturnShptLine.COPYFILTERS(Rec);
    ReturnShptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ReturnShptLine.FINDSET THEN
    EXIT(FALSE);
    // End of the lines.

    TempReturnShptLine := ReturnShptLine;
    TempReturnShptLine.INSERT;
    END;

  9. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στη φόρμα λήψη Αντιγρ.Παραστ.Καταχ.-Υποφόρμα Γραμ.Πιστ.Τιμολ.αγορών (5859) ως εξής:
    Υπάρχοντα κώδικα

    ...        TempPurchCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempPurchCrMemoLine.FINDFIRST THEN BEGIN
    PurchCrMemoLine.COPYFILTERS(Rec);
    PurchCrMemoLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    PurchCrMemoLine.FINDSET;

    TempPurchCrMemoLine := PurchCrMemoLine;
    TempPurchCrMemoLine.INSERT;
    END;
    ...

    Αντικατάσταση κώδικα

    ...        TempPurchCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempPurchCrMemoLine.FINDFIRST THEN BEGIN
    PurchCrMemoLine.COPYFILTERS(Rec);
    PurchCrMemoLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT PurchCrMemoLine.FINDSET THEN
    EXIT(FALSE);
    // End of the lines.

    TempPurchCrMemoLine := PurchCrMemoLine;
    TempPurchCrMemoLine.INSERT;
    END;

  10. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στη φόρμα Αντιγραφή Γραμμών ΔΑ υπηρεσίας (5994) ως εξής:
    Υπάρχοντα κώδικα

    ...        TempServiceShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServiceShptLine.FIND('-') THEN BEGIN
    ServiceShptLine.COPYFILTERS(Rec);
    ServiceShptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ServiceShptLine.FIND('-');

    TempServiceShptLine := ServiceShptLine;
    TempServiceShptLine.INSERT;
    END;
    IF "Line No." = TempServiceShptLine."Line No." THEN
    ...

    Αντικατάσταση κώδικα

    ...        TempServiceShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServiceShptLine.FIND('-') THEN BEGIN
    ServiceShptLine.COPYFILTERS(Rec);
    ServiceShptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ServiceShptLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempServiceShptLine := ServiceShptLine;
    TempServiceShptLine.INSERT;
    END;
    IF "Line No." = TempServiceShptLine."Line No." THEN

  11. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στη φόρμα δευτερεύουσα φόρμα γραμμές τ / υ (6036) ως εξής:
    Υπάρχοντα κώδικα

    ...        IF NOT TempServLine.FIND('-') THEN BEGIN
    ServLine.COPYFILTERS(Rec);
    ServLine.SETRANGE("Document Type","Document Type");
    ServLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ServLine.FIND('-');

    TempServLine := ServLine;
    TempServLine.INSERT;
    END;
    IF "Line No." = TempServLine."Line No." THEN
    IF "Line No." = TempServiceShptLine."Line No." THEN
    ...

    Αντικατάσταση κώδικα

    ...        IF NOT TempServLine.FIND('-') THEN BEGIN
    ServLine.COPYFILTERS(Rec);
    ServLine.SETRANGE("Document Type","Document Type");
    ServLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ServLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempServLine := ServLine;
    TempServLine.INSERT;
    END;
    IF "Line No." = TempServLine."Line No." THEN

  12. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στη φόρμα Υποφόρμα γραμμών αποστολής τ/υ (6037) ως εξής:
    Υπάρχοντα κώδικα

    ...        TempServShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServShptLine.FIND('-') THEN BEGIN
    ServShptLine.COPYFILTERS(Rec);
    ServShptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ServShptLine.FIND('-');

    TempServShptLine := ServShptLine;
    TempServShptLine.INSERT;
    END;
    IF "Line No." = TempServShptLine."Line No." THEN
    ...

    Αντικατάσταση κώδικα

    ...        TempServShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServShptLine.FIND('-') THEN BEGIN
    ServShptLine.COPYFILTERS(Rec);
    ServShptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ServShptLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.
    TempServShptLine := ServShptLine;
    TempServShptLine.INSERT;
    END;
    IF "Line No." = TempServShptLine."Line No." THEN

  13. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στη φόρμα Υποφόρμα γραμμών τιμολογίου τ/υ (6038) ως εξής:
    Υπάρχοντα κώδικα

    ...        TempServInvLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServInvLine.FIND('-') THEN BEGIN
    ServInvLine.COPYFILTERS(Rec);
    ServInvLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ServInvLine.FIND('-');

    TempServInvLine := ServInvLine;
    TempServInvLine.INSERT;
    END;
    EXIT("Line No." = TempServInvLine."Line No.");
    ...

    Αντικατάσταση κώδικα

    ...        TempServInvLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServInvLine.FIND('-') THEN BEGIN
    ServInvLine.COPYFILTERS(Rec);
    ServInvLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ServInvLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempServInvLine := ServInvLine;
    TempServInvLine.INSERT;
    END;
    EXIT("Line No." = TempServInvLine."Line No.");

  14. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στη φόρμα Υποφόρμα γραμμών τ πιστωτικού τιμολογίου (6039) ως εξής:
    Υπάρχοντα κώδικα

    ...        TempServCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServCrMemoLine.FIND('-') THEN BEGIN
    ServCrMemoLine.COPYFILTERS(Rec);
    ServCrMemoLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ServCrMemoLine.FIND('-');

    TempServCrMemoLine := ServCrMemoLine;
    TempServCrMemoLine.INSERT;
    END;
    EXIT("Line No." = TempServCrMemoLine."Line No.");
    ...

    Αντικατάσταση κώδικα

    ...        TempServCrMemoLine.SETRANGE("Document No.","Document No.");
    IF NOT TempServCrMemoLine.FIND('-') THEN BEGIN
    ServCrMemoLine.COPYFILTERS(Rec);
    ServCrMemoLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ServCrMemoLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempServCrMemoLine := ServCrMemoLine;
    TempServCrMemoLine.INSERT;
    END;
    EXIT("Line No." = TempServCrMemoLine."Line No.");

  15. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στη φόρμα αναζήτηση γραμμών παραλαβής (6638) ως εξής:
    Υπάρχοντα κώδικα

    ...        TempReturnRcptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnRcptLine.FIND('-') THEN BEGIN
    ReturnRcptLine.COPYFILTERS(Rec);
    ReturnRcptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ReturnRcptLine.FIND('-');

    TempReturnRcptLine := ReturnRcptLine;
    TempReturnRcptLine.INSERT;
    END;
    IF "Line No." = TempReturnRcptLine."Line No." THEN
    ...

    Αντικατάσταση κώδικα

    ...        TempReturnRcptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnRcptLine.FIND('-') THEN BEGIN
    ReturnRcptLine.COPYFILTERS(Rec);
    ReturnRcptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ReturnRcptLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempReturnRcptLine := ReturnRcptLine;
    TempReturnRcptLine.INSERT;
    END;
    IF "Line No." = TempReturnRcptLine."Line No." THEN

  16. Αλλάξτε τον κωδικό στη συνάρτηση IsFirstDocLine στη φόρμα αντιγραφή γραμμών αποστολής επιστροφής (6648) ως εξής:
    Υπάρχοντα κώδικα

    ...        TempReturnShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnShptLine.FIND('-') THEN BEGIN
    ReturnShptLine.COPYFILTERS(Rec);
    ReturnShptLine.SETRANGE("Document No.","Document No.");

    // Delete the following line.
    ReturnShptLine.FIND('-');

    TempReturnShptLine := ReturnShptLine;
    TempReturnShptLine.INSERT;
    END;
    IF "Line No." = TempReturnShptLine."Line No." THEN
    ...

    Αντικατάσταση κώδικα

    ...        TempReturnShptLine.SETRANGE("Document No.","Document No.");
    IF NOT TempReturnShptLine.FIND('-') THEN BEGIN
    ReturnShptLine.COPYFILTERS(Rec);
    ReturnShptLine.SETRANGE("Document No.","Document No.");

    // Add the following lines.
    IF NOT ReturnShptLine.FINDFIRST THEN
    EXIT(FALSE);
    // End of the lines.

    TempReturnShptLine := ReturnShptLine;
    TempReturnShptLine.INSERT;
    END;
    IF "Line No." = TempReturnShptLine."Line No." THEN

Προϋποθέσεις

Πρέπει να έχετε ένα από τα ακόλουθα προϊόντα, για να εφαρμόσετε αυτήν την επείγουσα επιδιόρθωση:

  • Microsoft Dynamics NAV 2009 R2

  • Microsoft Dynamics NAV 2009 Service Pack 1

Πληροφορίες κατάργησης

Δεν μπορείτε να καταργήσετε αυτήν την επείγουσα επιδιόρθωση.

Κατάσταση

Η Microsoft έχει επιβεβαιώσει ότι πρόκειται για ένα ζήτημα των προϊόντων της Microsoft που παρατίθενται στην ενότητα "Ισχύει για".

Σημείωση Αυτό είναι ένα άρθρο "ΤΑΧΕΙΑΣ ΔΗΜΟΣΙΕΥΣΗΣ" που έχει δημιουργηθεί απευθείας από την εταιρεία υποστήριξης της Microsoft. Οι πληροφορίες που περιέχονται στο παρόν έγγραφο παρέχονται ως έχουν, ως απάντηση σε ζητήματα που προέκυψαν. Ως αποτέλεσμα της ταχύτητας διαθεσιμότητάς του, το υλικό ενδέχεται να περιλαμβάνει τυπογραφικά λάθη και μπορεί να αναθεωρηθεί οποιαδήποτε στιγμή, χωρίς προειδοποίηση. Για άλλα θέματα, ανατρέξτε στην ενότητα " Όροι χρήσης ".

Χρειάζεστε περισσότερη βοήθεια;

Θέλετε περισσότερες επιλογές;

Εξερευνήστε τα πλεονεκτήματα της συνδρομής, περιηγηθείτε σε εκπαιδευτικά σεμινάρια, μάθετε πώς μπορείτε να προστατεύσετε τη συσκευή σας και πολλά άλλα.

Οι κοινότητες σάς βοηθούν να κάνετε και να απαντάτε σε ερωτήσεις, να δίνετε σχόλια και να ακούτε από ειδικούς με πλούσια γνώση.

Σας βοήθησαν αυτές οι πληροφορίες;

Πόσο ικανοποιημένοι είστε με τη γλωσσική ποιότητα;
Τι επηρέασε την εμπειρία σας;
Πατώντας "Υποβολή" τα σχόλια σας θα χρησιμοποιηθούν για τη βελτίωση των προϊόντων και των υπηρεσιών της Microsoft. Ο διαχειριστής IT θα έχει τη δυνατότητα να συλλέξει αυτά τα δεδομένα. Δήλωση προστασίας προσωπικών δεδομένων.

Σας ευχαριστούμε για τα σχόλιά σας!

×