:::: MENU ::::

este blog tiene como objetivo de compartir los conocimientos prácticos de cada lenguaje de programación más conocidos.

  • Lo mejor está por suceder

  • Easy to Customize

  • Customizable fonts.

jueves, 1 de septiembre de 2016


Yo tengo este form que lo tengo definido en la funcion ALV, Luego en el commad que tengo definido pregunto por el ucomm 'FC01', si agregas mas botones vas sumando +1, con esto te evitas crear un status nuevo.



  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

    EXPORTING

      I_CALLBACK_PF_STATUS_SET = 'PF_STATUS'

      I_CALLBACK_USER_COMMAND  = 'USER_COMMAND'

      .....



FORM PF_STATUS USING ce_func_exclude TYPE slis_t_extab.



  DATA fcode_attrib_tab LIKE smp_dyntxt OCCURS 4 WITH HEADER LINE.



  CLEAR: fcode_attrib_tab, fcode_attrib_tab[].

* function: participation-list

  fcode_attrib_tab-text      = text-001.

  fcode_attrib_tab-icon_id   = '@01@'.

  fcode_attrib_tab-icon_text = text-001.

  fcode_attrib_tab-quickinfo = space.

  fcode_attrib_tab-path      = space.

  APPEND fcode_attrib_tab.

*

  PERFORM dynamic_report_fcodes(rhteiln0) TABLES fcode_attrib_tab

                                       
USING  ce_func_exclude

                                               
' ' ' '.

  SET PF-STATUS 'ALVLIST' EXCLUDING ce_func_exclude

                OF PROGRAM 'RHTEILN0'.

ENDFORM.                            
" PF_STATUS



FORM USER_COMMAND  USING UCOMM LIKE SY-UCOMM

                       
RS_SELFIELD TYPE SLIS_SELFIELD.

  data : e_datos like ZES_LIBER_USUARIO.

  COMMIT WORK.

  CASE UCOMM.

    WHEN 'DISPLAY'.

              .............

    WHEN 'FC01'.

             .........



  ENDCASE.

  RS_SELFIELD-REFRESH = 'X'.

ENDFORM.                  
"USER_COMMAND
Este pequeño código se utiliza para obtener la ruta del archivo de la PC que se quiera cargar a SAP

La implementación de la función es la siguiente:


  DATA: v_usr_action TYPE i,
                    v_rc         TYPE i,
               gt_filename  TYPE filetable.

CALL METHOD cl_gui_frontend_services=>file_open_dialog
      CHANGING
        file_table              = gt_filename
        rc                      = v_rc
        user_action             = v_usr_action
*    file_encoding           =
      EXCEPTIONS
        file_open_dialog_failed = 1
        cntl_error              = 2
        error_no_gui            = 3
        not_supported_by_gui    = 4
        OTHERS                  = 5.
IF sy-subrc EQ 0.

  READ TABLE gt_filename INTO p_p_filout INDEX 1.

ENDIF.

La siguiente publicación ayuda a pasar una OT de DEV 100 por ejemplo, a DEV 110 y replicar los cambios realizados en dicho ambiente.

La transacción a utilizar es: SCC1 se ingresa el mandante fuente:



luego se ingresa la Orden de transporte cuyos cambios se quieran replicar



Y por último se da clic en el botón de Inicio Inmediato :






miércoles, 31 de agosto de 2016

LECTURA Y ESCRITURA DE INFOTIPOS - HCM

 CASO

 Se requiere insertar registros a un infotipo para una sola persona y luego obtener a nivel de consulta los registros ingresados.

El Problema:

que al ingresar o eliminar registros para una persona, el programa no está obteniendo dichos registros. Ejemplo:

 en tabla:
                Registro 1
                Registro 2
                Registro 3

 Se quiere agregar el Registro 4 y el Registro 5, pero al consultar desde la misma función los registros consultados, sólo se muestran los Registros 1,2 y 3.

El porqué?...

Esto se debe a que cuando se está ejecutando la función para obtener datos  (  HR_READ_INFOTYPE,) luego de haber insertado algunos más (ambas lógicas en la misma función), se está ejecutando a nivel de BUFFER, por ello sólo trae los datos que se cargaron al BUFFER y no desde la tabla (que ya tiene los datos agregados).

La solución:

Para ello se agrega un parámetro más a la función HR_READ_INFOTYPE.












domingo, 15 de mayo de 2016


Gestión de Talento y Evaluación de desempeño


Una muy buena ponencia del Dr. Pedro Calvo.

Muy educativa y clara donde nos explica la diferencia e importancia que tiene la Gestión del Talento y la Evaluación de Desempeño.



viernes, 29 de enero de 2016

A call-to-action text Contact us