BUSCAR AMPLIACIONES ACTIVAS (BADIS, USER EXITS, FIELD EXITS, BTEs, APPENDs)

El reporte SNIF deber ser ejecutado por la  SE80, SE38 o SA38 y permite encontrar objetos activos como BAdIs, Customer Exits, Field Exits, Business Transaction Events (BTEs), Appends y  Estructuras include, así como programas Z que hagan llamados a BAPIS.

APAGAR EMBALAJE Y PICKING EN ENTREGAS PARA UNA ORGANIZACION DE VENTAS ESPECÍFICA

INCLUDE MV50AFZ1

FORM userexit_move_field_to_lips.

  IF LIKP-VKORG = '1120'. " Inhabilita picking y embalaje en Org Ventas 1120 
    LIPS-PCKPF = ' '.
    LIPS-KOMKZ = ' '.
  ENDIF.

ENDFORM.

BADI LE_SHP_ITEM_STATUS

IF_EX_LE_SHP_ITEM_STATUS

Error ME21N no permite cambiar tamaño Ventana Resumen Documento

Error ME21N  Venta Resumen Documento no permite cambiar de tamaño.

Se debe modificar la tabla ESDUS,   se buscan los registros del usuario que presenta el problema y se cambian los siguientes campos:

MEPO     SAPLMEGUI/0000      Tree-On     X

MEPO     SAPLMEGUI/0000      Tree-Width     175

MEPO     Tree-Control        Tree-On     X

MEPO     Tree-Control        Tree-Width     175

Borrar Necesidad de MD04

En algunos casos cuando se anula un proceso de entrega y factura a pesar de que el material se borre de la entrega sigue apareciendo la necesidad por la MD04.

Para borrar la necesidad se puede utilizar el programa SDRQCR21 por la SE38, se debe tener  cuidado de colocar el MATERIAL-CENTRO-DOCUMENTO asociado a la necesidad que se quiere borrar.

Ejemplo:

TRANSFER, GUI_DOWNLOAD Grabar Archivo Directorio

Nota: los archivos grabados con la sentencia OPEN DATASET , TRANSFER , no se visualizan bien en el programa Notepad de Windows debido a que se aprecian todos los datos juntos como si fuera una sola línea, pero si se abren con WordPad, Excel u otra herramienta estos datos se aprecian bien organizados.

EJEMPLO GRABAR ARCHIVO A RUTA EN UN SERVIDOR.

REPORT ZTMP_PRUEBA.

TYPES : BEGIN OF ST_DEMO,
        REG_NO(10) TYPE C,
        NAME(20) TYPE C,
        ADDR(20) TYPE C,
        END OF ST_DEMO.

DATA : WA_DEMO TYPE ST_DEMO,
       IT_DEMO TYPE TABLE OF ST_DEMO,
       L_FNAME TYPE STRING .

PARAMETERS: P_FNAME(128) TYPE C DEFAULT '/usr/sap/SRI/SYS/src/DOWN.TXT' OBLIGATORY.

L_FNAME = P_FNAME.

WA_DEMO-REG_NO = '100001'.
WA_DEMO-NAME = 'ANAND'.
WA_DEMO-ADDR = 'NAGARKOVIL'.
 APPEND WA_DEMO TO IT_DEMO.

WA_DEMO-REG_NO = '100002'.
WA_DEMO-NAME = 'VIKRAM'.
WA_DEMO-ADDR = 'CHENNAI'.
APPEND WA_DEMO TO IT_DEMO.


 OPEN DATASET L_FNAME FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.

 WRITE :5 'REG NUM',16 'NAME',37 'ADDRESS' .

  LOOP AT IT_DEMO INTO WA_DEMO.
    IF SY-SUBRC = 0.
      TRANSFER WA_DEMO TO L_FNAME.
      WRITE :/5 WA_DEMO-REG_NO,16 WA_DEMO-NAME,37 WA_DEMO-ADDR.
    ENDIF.
  ENDLOOP.

http://help.sap.com/saphelp_40b/helpdata/en/34/55cad198482bc0e10000009b38f91f/content.htm
http://help.sap.com/saphelp_40b/helpdata/en/34/8e73b06df74873e10000009b38f9b8/content.htm

EJEMPLO GRABAR  ARCHIVO A RUTA EN UN SERVIDOR.

REPORT ZTMP_PRUEBA2.

DATA: BEGIN OF t_itab OCCURS 0,
              line(2500),
END OF t_itab.

DATA RUTA_ARC TYPE STRING.

RUTA_ARC = '/CVPL/PRUEBA.TXT'.

OPEN DATASET RUTA_ARC FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.

LOOP AT t_itab.
     TRANSFER t_itab TO RUTA_ARC.
ENDLOOP.

PARA GRABAR ARCHIVOS A RUTAS de PCs CLIENTES

DATA RUTA_ARC TYPE STRING.

RUTA_ARC = 'C:\TEMPORAL\PRUEBA.TXT'.

CALL FUNCTION 'GUI_DOWNLOAD'
    EXPORTING
*   BIN_FILESIZE                    =
      filename                      = RUTA_ARC
      filetype                      = 'ASC'
      trunc_trailing_blanks_eol     = space
    TABLES
      data_tab                      =  t_itab
 EXCEPTIONS
   file_write_error                = 1
   no_batch                        = 2
   gui_refuse_filetransfer         = 3
   invalid_type                    = 4
   no_authority                    = 5
   unknown_error                   = 6
   header_not_allowed              = 7
   separator_not_allowed           = 8
   filesize_not_allowed            = 9
   header_too_long                 = 10
   dp_error_create                 = 11
   dp_error_send                   = 12
   dp_error_write                  = 13
   unknown_dp_error                = 14
   access_denied                   = 15
   dp_out_of_memory                = 16
   disk_full                       = 17
   dp_timeout                      = 18
   file_not_found                  = 19
   dataprovider_exception          = 20
   control_flush_error             = 21
   OTHERS                          = 22
            .

Funcion para extraer año y periodo de fecha

* Encuentra el periodo actual basado en la fecha actual
*
REPORT ZPERIOD.

DATA: X_PERIOD LIKE T009B-POPER,
      X_YEAR   LIKE CSSL-GJAHR.

CALL FUNCTION 'DATE_TO_PERIOD_CONVERT'
     EXPORTING
          I_DATE         = SY-DATUM
*         I_MONMIT       = 00
          I_PERIV        = 'K4'
     IMPORTING
          E_BUPER        = X_PERIOD
          E_GJAHR        = X_YEAR
     EXCEPTIONS
          INPUT_FALSE    = 1
          T009_NOTFOUND  = 2
          T009B_NOTFOUND = 3
          OTHERS         = 4.

WRITE: / 'El periodo actual de la compañia es:', X_PERIOD, X_YEAR.

SET/GET PARAMETER Ejemplo

Se utiliza para guardar un valor en memoria y volverlo a leer desde otro codigo.


REPORT  PARAMID                                                 .

data: gd_valuein(10) type c,

      gd_valueout(10) type c.

PARAMETERS: p_value(10) type c.

********************

*start-of-selection.

start-of-selection.

get parameter ID 'ZMESS' field gd_valuein.

set parameter ID 'ZMESS' field p_value.

get parameter ID 'ZMESS' field gd_valueout.

******************

*end-of-selection.

end-of-selection.

write:/ 'value at start of program:',  gd_valuein,

      / 'value at end of program:',  gd_valueout.