Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - oscar

Páginas: 1 [2] 3 4 ... 8
16
Formularios / Re:Formato salida de los puntos de miles y decimales
« en: 27 de Marzo de 2012, 05:06:49 pm »
Hola Nuria,

SAPscript recupera la configuración del formato del país del vendedor, no del usuario.

Puedes verlo a traves de la SPRO > SAP NetWeaver > Parametrizaciones generales > Configurar países > Definir país en mis sistemas SAP.

O bien directamente por la transacción OY01 (Parámetros globales de países).

17
Funciones / Re:Funcion para leer un EXCEL con sus pestañas
« en: 22 de Junio de 2011, 09:47:03 am »
Hola Edgar,

Ese error es por tener declarada alguna variable distinta a la que tienes en la función.

Imagino que será por esto.
1º.- Revisa que te has creado la estructura como la verás en la imagen que adjunto a este post. (Para ver la imagen adjunta hay que estar logueado)

2º.- En tu función 'ZEXCEL_LECTURA_LIBRO', tanto la tabla de salida intern_salida como tu tabla interna it_tabla tienen que hacer referencia a esta estructura creada...ZALSMEX_TABLINE.  Revisa si alguna de estas no lo hace.


Saludos,
Oscar.


18
Links / Mundoabap
« en: 14 de Marzo de 2011, 11:59:30 am »
Navegando me topé con una pagina nueva en español.

Mucho ánimo a esta web. Aquí os dejo el enlace... y a disfrutarla.
http://www.mundoabap.es

 ;D

19
Formularios / Re: PROTECT... ENDPROTECT en un Smartforms
« en: 29 de Enero de 2010, 09:01:48 am »
Hola Nuria,

Yo suelo utilizar (como muestro en la imagen) una altura mínima.

En este caso lo estoy utilizando para que no me parta la cabecera en dos, puesto que mi cabecera contenía dos líneas, yo le puse que como mínimo tiene que tener 3 líneas. De esta manera si no las puede escribir, salta a la siguiente página.





Saludos.

20
Programación ABAP / Re: Cargar tablas del minisap SPFLI, etc...
« en: 26 de Noviembre de 2009, 06:29:01 pm »
Hola Nuria,

Primero ejecutas el programa SAPBC_DATA_GENERATOR desde la SE38.
Este programa nos cargará las tablas:
   - SPFLI
   - SFLIGHT
   - SBOOK

Después ejecutamos este otro programa SFLIGHT_DATA_GEN que nos cargará las tablas:
   - STICKET
   - SNVOICE

Saludos.




21
Formularios / Re: Invoveniente con smartform
« en: 13 de Noviembre de 2009, 02:26:52 pm »
Un poco tarde... pero como me ha ocurrido lo mismo cuento lo que me pasó.

Tenía declarada una variable en Definiciones globales... esta variable hacía referencia a una estructura que no había metido en la misma orden de transporte del formulario.

El resultado es que al transportar el smartforms no me generó la modulo de funciones.



Saludos.


22
Programación ABAP / Re: Abrir un excel desde una ruta de la red.
« en: 13 de Noviembre de 2009, 01:44:49 pm »
Lo que tienes que hacer es... después de recuperar el fichero con el OPEN DATASET (la que comentas que te salen con símbolos raros), es utilizar este código de ejemplo que te muestro.

Declaramos las variables.
Código: [Seleccionar]
DATA: p_filename LIKE  rlgrap-filename.
TYPES: BEGIN OF t_datatab,
      fecha(8),
      ceco(20),
      cuenta(9),
      dcorta(4),
      signo(1),
      impor(13),
      dlarga(30),
      sociedad(4),
END OF t_datatab.

DATA: it_datatab TYPE STANDARD TABLE OF t_datatab,
      wa_datatab TYPE t_datatab.

DATA: it_raw TYPE truxs_t_text_data.

Utilizamos la función: TEXT_CONVERT_XLS_TO_SAP
Es un poco lenta pero 100% efectiva.
Código: [Seleccionar]
  p_filename = p_file.

  CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
    EXPORTING
*     i_field_seperator = ';'
      i_line_header = 'X'                " X = Sin la cabecera
      i_tab_raw_data = it_raw
      i_filename = p_filename
    TABLES
      i_tab_converted_data = it_datatab[]
    EXCEPTIONS
      conversion_failed = 1
    OTHERS = 2.



23
Hola Carlos,

aprovechando que lo que preguntas lo tengo muy reciente... he creado el siguiente manual y lo he colgado en la página.
Manual Prefijos - Códigos de Barras


Un saludo,
Oscar.

24
Funciones / Re: Funcion para leer un EXCEL con sus pestañas
« en: 05 de Mayo de 2009, 07:07:09 pm »
Esto es lo que faltaba por declarar.

Mil disculpas...
Código: [Seleccionar]
FUNCTION-POOL ZEXCEL.                       "MESSAGE-ID ..

TYPE-POOLS: ole2.

TYPES: ty_d_itabvalue             TYPE alsmex_tabline-value.


  TYPES: BEGIN OF ty_s_senderline,
           line(4096)               TYPE c,
         END OF ty_s_senderline,
       ty_t_itab                  TYPE alsmex_tabline   OCCURS 0,

       ty_t_sender                TYPE ty_s_senderline  OCCURS 0.

CONSTANTS:  gc_esc              VALUE '"'.

25
Programación ABAP / Re: Tabla fichajes
« en: 29 de Abril de 2009, 01:01:17 pm »
Detallo un poco mas como tratar el Infotipo 2011.

Los registros del IT2011 no se almacenan en una tabla tipo PANNNN, con NNNN = Nº Infotipo, sino en la tabla TEVEN, por lo que funciones como HR_READ_INFOTYPE, no sirven para leer los datos del IT2011, entonces un ejemplo de lectura del IT2011 es como el siguiente:

Código: [Seleccionar]
     SELECT * FROM teven APPENDING TABLE it_teven
             WHERE pernr EQ gt_pernr-pernr
               AND ldate EQ gf_fecha
               AND stokz EQ space.


A su vez, para borrar un registro es aconsejable hacerlo de la siguiente manera:

Código: [Seleccionar]
   IF teven-stokz EQ space.
     teven-stokz = 'X'.
     teven-uname = sy-uname.
     teven-aedtm = sy-datum.
     UPDATE teven.
   ENDIF.


26
Programación ABAP / Re: Recuperar valores de una tabla BD
« en: 18 de Febrero de 2009, 05:42:50 pm »
Habla con Sistemas y que hagan un backup o restore.



27
Formularios / Re: Alineación en un Smartforms
« en: 28 de Noviembre de 2008, 12:00:17 pm »
Hola,

Dentro de tu transacción SMARTSTYLES seleccionas el formato de párrafo que estas utilizando.

Vas a la primera pestaña (Sangrías e Interlineado), y en la alineación marcas BLOCK.


Un saludo,

28
Formularios / Re: Llamar a un Smartforms
« en: 28 de Noviembre de 2008, 11:56:46 am »
Te pongo un ejemplo de como llamar a un Smartforms desde un programa.

Las variables...

TABLES: nast, itcpo.

DATA: linea1    TYPE char40,
      linea2    TYPE char40,
      linea3    TYPE char40,
      linea4    TYPE char40.

DATA: local_print_options    LIKE itcpo.
DATA: local_nast_data        LIKE nast.
DATA: true      TYPE c       VALUE 'X',
      false     LIKE true    VALUE ' '.



Y los PERFORM que te van hacer falta...

*&---------------------------------------------------------------------*
*&      Form  imprimir_formulario
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM imprimir_formulario.
  DATA: l_funcion              TYPE rs38l_fnam.
  DATA: output_options_smf     TYPE ssfcompop,
        control_parameters_smf TYPE ssfctrlop.

  PERFORM get_print_parameters.


  CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
    EXPORTING
      formname                 = 'ZSMARTFORMS'  "Nombre del formulario
*     VARIANT                  = ' '
*     DIRECT_CALL              = ' '
    IMPORTING
      fm_name                  = l_funcion
    EXCEPTIONS
      no_form                  = 1
      no_function_module       = 2
      OTHERS                   = 3.

  IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.

  IF sy-subrc = 0.

    PERFORM get_smartform_print_options
                           USING    local_print_options
                           CHANGING output_options_smf
                                    control_parameters_smf.

*-- Llamar al smartform
    CALL FUNCTION l_funcion
      EXPORTING
        control_parameters = control_parameters_smf
        output_options     = output_options_smf
        user_settings      = ' '
        linea1             = linea1
        linea2             = linea2
        linea3             = linea3
        linea4             = linea4
      EXCEPTIONS
        formatting_error   = 1
        internal_error     = 2
        send_error         = 3
        user_canceled      = 4
        OTHERS             = 5.
  ENDIF.

ENDFORM.                    " imprimir_formulario

*----------------------------------------------------------------------*
*       Get print parameters                                           *
*----------------------------------------------------------------------*
FORM get_print_parameters.

  MOVE-CORRESPONDING nast TO itcpo.

  itcpo-tdcopies   = 1.         " Cantidad de impresiones
  itcpo-tddest     = 'LOCAL'.   " Nombre de la impresora
  itcpo-tdimmed    = 'X'.       " Imprime inmediatamente
  itcpo-tdnewid    = 'X'.       " Crear nueva SPOOL
  itcpo-tddelete   = 'X'.       " Borra después de imprimir
  itcpo-tdpageslct = space.     " Todas las páginas
  itcpo-tdpreview  = space.     " Visualización de la impresión
  itcpo-tdcover    = space.     " No portada


  local_print_options = itcpo.

ENDFORM.                    "get_print_parameters

*&---------------------------------------------------------------------*
*&      Form  GET_SMARTFORM_PRINT_OPTIONS
*&---------------------------------------------------------------------*
*       Druckparameter ermitteln
*----------------------------------------------------------------------*
FORM get_smartform_print_options USING    p_print_options
                                              LIKE itcpo
                                 CHANGING p_output_options_smf
                                              TYPE ssfcompop
                                          p_control_parameters_smf
                                              TYPE ssfctrlop.

  MOVE-CORRESPONDING p_print_options TO p_output_options_smf.
  MOVE p_print_options-tdpreview TO p_control_parameters_smf-preview.
  p_control_parameters_smf-no_dialog = true.
  p_control_parameters_smf-langu = local_nast_data-spras.

ENDFORM.                               " GET_SMARTFORM_PRINT_OPTIONS


Un saludo,


29
Ampliaciones / Re: Nuevas ampliaciones
« en: 22 de Noviembre de 2008, 09:38:10 am »
Haber si te ayuda esta pequeña explicación.

Enhancement


Un saludo.

30
Programación ABAP / Re: Fichero plano con espacios en blanco al final
« en: 19 de Noviembre de 2008, 12:17:31 pm »
Tienes que usar el siguiente parámetro: trunc_trailing_blanks_eol

Por defecto viene marcado con 'X', simplemente lo igualas a blanco.

Te adjunto un ejemplo.

Código: [Seleccionar]
*&---------------------------------------------------------------------*
*&      Form  DOWNLOAD
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM download .

  DATA: l_filename TYPE string.

  l_filename = p_file_d.

  CALL FUNCTION 'GUI_DOWNLOAD'
    EXPORTING
      filename                  = l_filename
      filetype                  = 'ASC'
*     trunc_trailing_blanks     = ' '
      trunc_trailing_blanks_eol = ' '    "Deja los espacios en blanco
    TABLES
      data_tab                  = lt_salida.

ENDFORM.                    " DOWNLOAD

Un saludo,


Páginas: 1 [2] 3 4 ... 8