Fecha de caducidad

[molaci]

Hola a todos,

de donde se saca la fecha de caducidad de un producto, o fecha de consumo preferente?

Gracias.

[Carlos]

Hola.

Te copio un trozo de código donde le calculo la fecha de caducidad.

Código: [Seleccionar]

*&---------------------------------------------------------------------*
*&      Form  calcular_f_consumo_pref
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
form calcular_f_consumo_pref using    p_f_produccion
                                      p_m_con_preferente
                                      p_ind_dias_fcp
                             changing p_f_consumo_p.

  data: lf_fecha               type datum.

  lf_fecha = p_f_produccion.

* Cálculo de la fecha de consumo preferente
  call function 'RE_ADD_MONTH_TO_DATE'
    EXPORTING
      months  = p_m_con_preferente
      olddate = lf_fecha
    IMPORTING
      newdate = lf_fecha.
  .

* Aplicamos el redondeo (siempre al último día del periodo)
  if p_ind_dias_fcp = '+'.
    call function 'LAST_DAY_OF_MONTHS'
      EXPORTING
        day_in            = lf_fecha
      IMPORTING
        last_day_of_month = lf_fecha
      EXCEPTIONS
        day_in_no_date    = 1
        others            = 2.

  endif.

  p_f_consumo_p = lf_fecha.

endform.                    " calcular_f_consumo_pref

Un saludo.
Carlos.