Entradas

Mostrando entradas de 2008

Función para Obtener Texto de cabecera en Factura

Con esta Función podemos obtener las lineas de Texto que nuestros usuarios colocan en el texto de Cabecera de una Factura para hablar de alguna observación. Espero les Ayude lectores. Gracias. CALL FUNCTION 'READ_TEXT' EXPORTING client = sy-mandt id = '0002' language = 'S' name = thead_tdname object = 'VBBK' * ARCHIVE_HANDLE = 0 * LOCAL_CAT = ' ' * IMPORTING * HEADER = TABLES lines = lineas_texto EXCEPTIONS id = 1 language = 2 name = 3 not_found = 4 object = 5 reference_check = 6 wrong_access_to_archive = 7

Tip Sobre la Funcion GUI_DOWNLOAD

Imagen
* se debe utilizar la funcion GUI_DOWNLOAD porque las tablas internas * pertenecientes a estos casos poseen caracteres en blanco al final de cada linea, por lo tanto, es necesario utilizar la funcion * GUI_DOWNLOAD con el parametro TRUNC_TRAILING_BLANKS_EOL en blanco.      IF  p_tipo =  'D'   OR  p_tipo =  'M' .        CALL   FUNCTION   'GUI_DOWNLOAD'          EXPORTING           filename                  = nombre_archivo           filetype                  =  'ASC'           trunc_trailing_blanks_eol =  ' '           confirm_overwrite         =  'X'          TABLES           data_tab                  = it_datos          EXCEPTIONS           invalid_type              =  3           no_batch                  =  4           unknown_error             =  5           gui_refuse_filetransfer   =  6            OTHERS                     =  7 .        IF  sy-subrc <>  0 .          MESSAGE   ID  sy-msgid  TYPE  sy-msg

Función Para leer Business Partner desde el Pedido de Ventas

Imagen
Con esta función podemos leer el BP desde un pedido de Ventas. TS_VBELN es el Numero del Pedido de Venta y en la Tabla GT_XVBPA obtienes el BP con todos sus roles presentes. CALL   FUNCTION   'SD_PARTNER_READ'     EXPORTING      F_VBELN        =  TS_VBELN       OBJECT          =  'VBPA'      NO_MASTER_ADRESS =  'X'     TABLES      I_XVBADR       = GT_XVBADR      I_XVBPA        = GT_XVBPA *    I_YVBADR       = *    I_YVBPA        = *    I_XVBPA2       = *    I_YVBPA2       =            .