Questo articolo si applica a Microsoft Dynamics NAV per tutti i paesi e tutte le impostazioni locali della lingua.
Sintomi
Quando si pubblicano più righe con le dimensioni specificate in un giornale di registrazione di riclassificazione warehouse in Microsoft Dynamics NAV 2009 Service Pack 1 (SP1), viene visualizzato un messaggio di errore simile al seguente:
Nota
Una dimensione utilizzata nel numero di riga Giornale di registrazione articoli ha causato un errore. Selezionare un Codice valore dimensione per l'AREA Codice dimensione per il nome dell'elemento.
Causa
Questo problema si verifica perché la funzione CreateItemJnlLine utilizza il numero di riga di una riga di giornale di registrazione riclassificazione magazzino, quando si creano le dimensioni per un'altra riga di giornale di registrazione riclassificazione magazzino. Il numero di riga non viene aggiornato fino alla fine della funzione. Poiché le dimensioni fanno riferimento al vecchio numero di riga, non sarà possibile trovarle in un secondo momento.
Risoluzione
Informazioni sull'aggiornamento rapido
È ora disponibile un hotfix supportato da Microsoft. Tuttavia, è destinato solo a correggere il problema descritto in questo articolo. Applicala solo ai sistemi che stanno riscontrando questo problema specifico. Questo hotfix potrebbe ricevere ulteriori test. Pertanto, se non si è gravemente colpiti da questo problema, è consigliabile attendere il prossimo Service Pack di Microsoft Dynamics NAV o la prossima versione di Microsoft Dynamics NAV che contiene questo hotfix.
Nota In casi speciali, gli addebiti normalmente sostenuti per le chiamate al supporto tecnico possono essere annullati se un professionista del supporto tecnico per Microsoft Dynamics e i prodotti correlati determinano che un aggiornamento specifico risolverà il problema. I soliti costi del supporto verranno applicati a domande e problemi di supporto aggiuntivi che non sono idonei per l'aggiornamento specifico in questione.
Informazioni sull'installazione
Microsoft fornisce esempi di programmazione a titolo puramente illustrativo, senza alcuna garanzia espressa o implicita. Ciò include, a titolo esemplificativo e non esaustivo, le garanzie implicite di commerciabilità o idoneità a uno scopo particolare. Questo articolo presuppone che si abbia familiarità con il linguaggio di programmazione oggetto della dimostrazione e con gli strumenti utilizzati per la creazione e il debug delle procedure. I tecnici del supporto Tecnico Microsoft possono spiegare le funzionalità di una particolare procedura, ma non modificarli per fornire funzionalità aggiuntive o creare procedure in base a specifici requisiti.
Nota Prima di installare questo hotfix, verificare che tutti gli utenti client di Microsoft Navision siano disconnessi dal sistema. Sono inclusi gli utenti client di Microsoft Navision Application Services (NAS). Dovresti essere l'unico utente client connesso quando implementi questo hotfix.
Per implementare questo hotfix, è necessario disporre di una licenza per sviluppatori.
È consigliabile assegnare l'ID ruolo "SUPER" all'account utente nella finestra Accessi di Windows o nella finestra Accessi database. Se all'account utente non è possibile assegnare l'ID ruolo "SUPER", è necessario verificare che l'account utente disponga delle autorizzazioni seguenti:
- Autorizzazione modifica per l'oggetto che si desidera modificare.
- Autorizzazione Execute per l'oggetto System Object ID 5210 e per l'oggetto System Object ID 9015.
Nota: non è necessario disporre dei diritti per gli archivi dati a meno che non sia necessario eseguire il ripristino dei dati.
Modifiche al codice
Nota Verifica sempre le correzioni del codice in un ambiente controllato prima di applicare le correzioni ai computer di produzione.
Per risolvere il problema, modificare il codice nella funzione CreateItemJnlLine in Whse. Jnl.-Register Batch codeunit (7304) come segue:
Codice esistente
WhseItemTrkgLine.SETCURRENTKEY(
"Source ID","Source Type","Source Subtype","Source Batch Name",
"Source Prod. Order Line","Source Ref. No.","Location Code");
WhseItemTrkgLine.SETRANGE("Source Type",DATABASE::"Warehouse Journal Line");
WhseItemTrkgLine.SETRANGE("Source ID",WhseJnlLine2."Journal Batch Name");
WhseItemTrkgLine.SETRANGE("Source Batch Name",WhseJnlLine2."Journal Template Name");
WhseItemTrkgLine.SETRANGE("Source Ref. No.",WhseJnlLine2."Line No.");
WhseItemTrkgLine.SETRANGE("Location Code",WhseJnlLine2."Location Code");
IF WhseItemTrkgLine.FINDSET THEN BEGIN
ItemJnlLine.INIT;
ItemJnlLine.VALIDATE("Entry Type",ItemJnlLine."Entry Type"::Transfer);
WITH WhseJnlLine2 DO BEGIN
REPEAT
IF ((WhseItemTrkgLine."New Serial No." <> WhseItemTrkgLine."Serial No.") OR
(WhseItemTrkgLine."New Lot No." <> WhseItemTrkgLine."Lot No.") OR
(WhseItemTrkgLine."New Expiration Date" <> WhseItemTrkgLine."Expiration Date")) THEN BEGIN
CreateReservEntry.CreateReservEntryFor(
DATABASE::"Item Journal Line",
ItemJnlLine."Entry Type",
'',
'',
0,
"Line No.",
WhseItemTrkgLine."Qty. per Unit of Measure",
ABS(WhseItemTrkgLine."Qty. to Handle (Base)"),
WhseItemTrkgLine."Serial No.",
WhseItemTrkgLine."Lot No.");
CreateReservEntry.SetNewSerialLotNo(WhseItemTrkgLine."New Serial No.",WhseItemTrkgLine."New Lot No.");
CreateReservEntry.SetDates(WhseItemTrkgLine."Warranty Date",WhseItemTrkgLine."Expiration Date");
CreateReservEntry.SetNewExpirationDate(WhseItemTrkgLine."New Expiration Date");
CreateReservEntry.CreateEntry(
"Item No.",
"Variant Code",
"Location Code",
Description,
0D,
0D,
0,
ReservEntry."Reservation Status"::Prospect);
QtyToHandleBase += ABS(WhseItemTrkgLine."Qty. to Handle (Base)");
END;
UNTIL WhseItemTrkgLine.NEXT = 0;
IF QtyToHandleBase <> 0 THEN BEGIN
ItemJnlLine."Document No." := "Whse. Document No.";
ItemJnlLine.VALIDATE("Posting Date", "Registering Date");
ItemJnlLine.VALIDATE("Item No.", "Item No.");
ItemJnlLine.VALIDATE("Variant Code","Variant Code");
ItemJnlLine.VALIDATE("Location Code","Location Code");
ItemJnlLine.VALIDATE("Unit of Measure Code", "Unit of Measure Code");
ItemJnlLine.VALIDATE("Quantity (Base)", QtyToHandleBase);
ItemJnlLine.Description := Description;
ItemJnlLine."Source Type" := ItemJnlLine."Source Type"::Item;
ItemJnlLine."Source No." := "Item No.";
ItemJnlLine."Source Code" := "Source Code";
ItemJnlLine."Reason Code" := "Reason Code";
//Delete the following line.
ItemJnlLine."Line No." := "Line No.";
END;
END;
END;
Codice sostitutivo
WhseItemTrkgLine.SETCURRENTKEY(
"Source ID","Source Type","Source Subtype","Source Batch Name",
"Source Prod. Order Line","Source Ref. No.","Location Code");
WhseItemTrkgLine.SETRANGE("Source Type",DATABASE::"Warehouse Journal Line");
WhseItemTrkgLine.SETRANGE("Source ID",WhseJnlLine2."Journal Batch Name");
WhseItemTrkgLine.SETRANGE("Source Batch Name",WhseJnlLine2."Journal Template Name");
WhseItemTrkgLine.SETRANGE("Source Ref. No.",WhseJnlLine2."Line No.");
WhseItemTrkgLine.SETRANGE("Location Code",WhseJnlLine2."Location Code");
IF WhseItemTrkgLine.FINDSET THEN BEGIN
ItemJnlLine.INIT;
//Add the following line.
ItemJnlLine."Line No." := WhseJnlLine2."Line No.";
ItemJnlLine.VALIDATE("Entry Type",ItemJnlLine."Entry Type"::Transfer);
WITH WhseJnlLine2 DO BEGIN
REPEAT
IF ((WhseItemTrkgLine."New Serial No." <> WhseItemTrkgLine."Serial No.") OR
(WhseItemTrkgLine."New Lot No." <> WhseItemTrkgLine."Lot No.") OR
(WhseItemTrkgLine."New Expiration Date" <> WhseItemTrkgLine."Expiration Date")) THEN BEGIN
CreateReservEntry.CreateReservEntryFor(
DATABASE::"Item Journal Line",
ItemJnlLine."Entry Type",
'',
'',
0,
"Line No.",
WhseItemTrkgLine."Qty. per Unit of Measure",
ABS(WhseItemTrkgLine."Qty. to Handle (Base)"),
WhseItemTrkgLine."Serial No.",
WhseItemTrkgLine."Lot No.");
CreateReservEntry.SetNewSerialLotNo(WhseItemTrkgLine."New Serial No.",WhseItemTrkgLine."New Lot No.");
CreateReservEntry.SetDates(WhseItemTrkgLine."Warranty Date",WhseItemTrkgLine."Expiration Date");
CreateReservEntry.SetNewExpirationDate(WhseItemTrkgLine."New Expiration Date");
CreateReservEntry.CreateEntry(
"Item No.",
"Variant Code",
"Location Code",
Description,
0D,
0D,
0,
ReservEntry."Reservation Status"::Prospect);
QtyToHandleBase += ABS(WhseItemTrkgLine."Qty. to Handle (Base)");
END;
UNTIL WhseItemTrkgLine.NEXT = 0;
IF QtyToHandleBase <> 0 THEN BEGIN
ItemJnlLine."Document No." := "Whse. Document No.";
ItemJnlLine.VALIDATE("Posting Date", "Registering Date");
ItemJnlLine.VALIDATE("Item No.", "Item No.");
ItemJnlLine.VALIDATE("Variant Code","Variant Code");
ItemJnlLine.VALIDATE("Location Code","Location Code");
ItemJnlLine.VALIDATE("Unit of Measure Code", "Unit of Measure Code");
ItemJnlLine.VALIDATE("Quantity (Base)", QtyToHandleBase);
ItemJnlLine.Description := Description;
ItemJnlLine."Source Type" := ItemJnlLine."Source Type"::Item;
ItemJnlLine."Source No." := "Item No.";
ItemJnlLine."Source Code" := "Source Code";
ItemJnlLine."Reason Code" := "Reason Code";
END;
END;
END;
Prerequisiti
Per applicare questo hotfix, è necessario che microsoft Dynamics NAV 2009 Service Pack 1 sia installato.
Informazioni sulla rimozione
Non è possibile rimuovere questo hotfix.
Stato
Microsoft ha confermato che si tratta di un problema relativo ai prodotti elencati nella sezione "Si applica a".
Nota Questo è un articolo "FAST PUBLISH" creato direttamente dall'organizzazione di supporto Microsoft. Le informazioni contenute nel presente documento vengono fornite così come sono in risposta ai problemi emergenti. A causa della velocità di reso disponibile, i materiali possono includere errori tipografici e possono essere modificati in qualsiasi momento senza preavviso. Per altre considerazioni, vedere Condizioni per l'utilizzo .