El coste unitario de los artículos se vuelve negativo después de ejecutar la revaluación en los elementos que usan el método de cálculo del coste medio en Microsoft Dynamics NAV

Se aplica a
Dynamics NAV 2009 Service Pack 1 Dynamics NAV 2009 Microsoft Dynamics NAV 5.0 Service Pack 1

Este artículo se aplica a Microsoft Dynamics NAV para todos los países y todas las configuraciones regionales de idioma.

Síntomas

Suponga que tiene un artículo que utiliza el método de cálculo del coste medio . Cuando ejecuta la revaluación en el artículo, el costo unitario del artículo se convierte en negativo inesperadamente. Además, experimenta un rendimiento lento al realizar el trabajo por lotes Ajustar costo para el elemento.
Este problema se produce en los siguientes productos:

  • Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
  • Microsoft Dynamics NAV 2009
  • Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1) con 975251 de revisiones aplicado

Nota Para obtener más información sobre la 975251 de revisiones, haga clic en el número de artículo siguiente para verlo en Microsoft Knowledge Base:

975251 El rendimiento es lento al realizar el trabajo por lotes Ajustar costo para el costo promedio en Microsoft Dynamics NAV 5.0

Resolución

Información de revisiones

Una revisión compatible ya está disponible en Microsoft. Sin embargo, solo está pensado para corregir el problema que se describe en este artículo. Aplicarlo solo a los sistemas que experimentan este problema específico. Esta revisión puede recibir pruebas adicionales. Por lo tanto, si no se ve afectado gravemente por este problema, le recomendamos que espere al siguiente Service Pack de Microsoft Dynamics NAV 2009 o a la siguiente versión de Microsoft Dynamics NAV que contenga esta revisión.

Nota En casos especiales, los cargos que se incurren normalmente por las llamadas de soporte técnico pueden cancelarse si un profesional de soporte técnico de Microsoft Dynamics y productos relacionados determina que una actualización específica resolverá el problema. Se aplicarán los costos habituales de soporte técnico a las consultas y cuestiones de soporte técnico adicionales que no guarden relación con la actualización en cuestión.

            
          

Información de instalación

Microsoft proporciona ejemplos de programación solo para ilustración, sin garantía expresa o implícita. Esto incluye, entre otras, las garantías implícitas de comerciabilidad o idoneidad para un propósito determinado. En este artículo se supone que está familiarizado con el lenguaje de programación que se muestra y con las herramientas que se usan para crear y depurar procedimientos. Los ingenieros de soporte técnico de Microsoft pueden explicarle la funcionalidad de un determinado procedimiento, pero no modificarán estos ejemplos para ofrecer mayor funcionalidad ni crearán procedimientos adaptados a sus necesidades específicas.

Nota Antes de instalar esta revisión, verifique que todos los usuarios cliente de Microsoft Navision hayan cerrado sesión en el sistema. Esto incluye a los usuarios cliente de Microsoft Navision Application Services (NAS). Usted debe ser el único usuario del cliente que ha iniciado sesión al implementar esta revisión.

Para implementar esta revisión, debe tener una licencia de desarrollador.

Le recomendamos que la cuenta de usuario en la ventana Inicios de sesión de Windows o en la ventana Inicios de sesión de base de datos tenga asignado el id. de rol "SUPER". Si no se puede asignar a la cuenta de usuario el id. de rol "SUPER", debe comprobar que la cuenta de usuario tiene los permisos siguientes:

  • El permiso Modificar para el objeto que va a cambiar.
  • El permiso Execute para el objeto System Object ID 5210 y para el objeto System Object ID 9015.

                
Nota No es necesario tener derechos sobre los almacenes de datos a menos que tenga que realizar una reparación de datos.

Cambios de código

Nota Pruebe siempre las correcciones de código en un entorno controlado antes de aplicar las correcciones a los equipos de producción.
Para resolver este problema, siga estos pasos:

  1. Cambie el código de la función AvgValueEntriesToAdjustExist en la unidad de código Ajuste de inventario (5895) por lo siguiente:

    ...
             IF FindNextRange THEN BEGIN
               AvgCostAdjmtEntryPoint."Valuation Date" := GetNextDate(AvgCostAdjmtEntryPoint."Valuation Date");
               AvgValueEntriesToAdjustExist(OutbndValueEntry,ExcludedValueEntry,AvgCostAdjmtEntryPoint);
             END;  
    
      // Add the following line.
      OutbndValueEntry.SETCURRENTKEY("Item Ledger Entry No."); 
    
    ...
    
  2. Cambie el código de la función IsExcludeEntryFromAvgCostCalc de la unidad de código Desajuste de inventario (5895) a la siguiente:

    ...
             IF NOT "Valued By Average Cost" THEN
               EXIT(FALSE);
             ItemLedgEntry.GET("Item Ledger Entry No.");
             IF ItemLedgEntry.Positive THEN
               EXIT(FALSE);
    
    // Delete the following line.
    EXIT(TRUE); 
    
    // Add the following line.
           EXIT("Item Ledger Entry No." > OutbndValueEntry."Item Ledger Entry No."); 
    ...
    
    ...
        // Delete the following lines.
        LOCAL PROCEDURE GetEntryNoToStartAt@78
        BEGIN
          StartAt := 0;
          WITH ExcludedValueEntry DO BEGIN
            RESET;
            IF FINDFIRST THEN
              REPEAT
                IF "Partial Revaluation" AND
                   (OutbndValueEntry."Entry No." > "Entry No.")
                THEN
                  StartAt := "Entry No.";
              UNTIL NEXT = 0;
          END;
          EXIT(StartAt + 1);
        END;
        // End of the lines.
    ...
    
  3. Cambie el código de la función AdjustItemAvgCost de la unidad de código Ajuste de inventario (5895) a lo siguiente:

    ...
                WHILE NOT Restart AND AvgValueEntriesToAdjustExist(
                        TempOutbndValueEntry,TempExcludedValueEntry,AvgCostAdjmtEntryPoint)
                DO BEGIN
                  REPEAT
    
                    // Delete the following lines.
                    TempExcludedValueEntry.SETFILTER("Entry No.",'>=%1',                          
                      GetEntryNoToStartAt(TempOutbndValueEntry,TempExcludedValueEntry)); 
                    // End of the lines.
    
                    AdjustOutbndAvgEntry(TempOutbndValueEntry,TempExcludedValueEntry);
                    UpdateConsumpAvgEntry(TempOutbndValueEntry);
                  UNTIL TempOutbndValueEntry.NEXT = 0;
    ...
    
  4. Cambie el código de la función IsExcludeEntryFromAvgCostCalc de la unidad de código Desajuste de inventario (5895) a la siguiente:

    ...
        BEGIN
          WITH ValueEntry DO BEGIN
            IF "Partial Revaluation" THEN         
    
              // Delete the following line.
              EXIT(TRUE);                                                                           
    
              // Add the following lines.
              EXIT(                                                                                 
                ("Entry No." > OutbndValueEntry."Entry No.") OR                                     
                (("Entry No." < OutbndValueEntry."Entry No.") AND NOT                               
                 IncludedInCostCalculation(ValueEntry,OutbndValueEntry."Item Ledger Entry No.")));  
              // End of the lines.
    
            IF "Item Ledger Entry No." = OutbndValueEntry."Item Ledger Entry No." THEN
              EXIT(TRUE);
    ...
    

Requisitos previos

Debe tener uno de los siguientes productos instalados para aplicar esta revisión:

  • Microsoft Dynamics NAV 2009 Service Pack 1
  • Microsoft Dynamics NAV 2009
  • Microsoft Dynamics NAV 5.0 Service Pack 1 con 975251 de revisiones aplicado

Información sobre la eliminación

No puede quitar esta revisión.

Estado

Microsoft ha confirmado que se trata de un problema de los productos de Microsoft que se enumeran en la sección "Aplicable a".

Nota Esto es un artículo "PUBLICACIÓN RÁPIDA" creado directamente desde la organización de soporte técnico de Microsoft. La información contenida se proporciona tal cual en respuesta a nuevos problemas. Como resultado de la rapidez en la publicación, es posible que los materiales incluyan errores tipográficos. Además, se pueden revisar en cualquier momento sin previo aviso. Consulte los Términos de uso para otras consideraciones.