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 - Irua

Páginas: [1]
1
Programación ABAP / Sintaxis provide
« en: 15 de Febrero de 2008, 04:19:30 pm »
Hola tengo un reporte donde deseo filtrar por ubicacion, los datos principales estan en la estructura PERNR (PNP) y la ubicacion esta en el infotipo p0032, para igualar esto debo segun entiendo usar un Provide pero en si cual seria la sintaxis

Ademas para realizar el filtro

diria que

Employee-pernr(mi tabla interna) = pernr-pernr
Employee-ofic = s_ubic (parametro declarado donde el usuario lo selecciona por pantalla)

como seria para indicarle que filtre todos los empleados por la ubicacion seleccionada por el usuario?

gracias

2
Programación ABAP / Ayuda con ADD
« en: 21 de Diciembre de 2007, 02:46:39 pm »
Tengo el siguiente codigo:

DATA: BEGIN OF fds OCCURS 500,
         perm_rec(5)            TYPE p DECIMALS 2,
        perm_norec(5)          TYPE p DECIMALS 2,
        perm_norem(5)          TYPE p DECIMALS 2,
        enfermedad(5)          TYPE p DECIMALS 2,
        ausencia_aut(5)        TYPE p DECIMALS 2,
        reposomay3d(5)         TYPE p DECIMALS 2,
        hora_val_comp(5)       TYPE p DECIMALS 2,
        horas_pro(5)           TYPE p DECIMALS 2,
        horas_fds(5)           TYPE p DECIMALS 2,
        vacaciones_mes(5)      TYPE p DECIMALS 2,
        pote_mes_perm_rec(5)   TYPE p DECIMALS 2,
        pote_acu_perm_rec(5)   TYPE p DECIMALS 2,
        pote_acu_perm_norec(5) TYPE p DECIMALS 2,
        horas_extras(5)        TYPE p DECIMALS 2,
     END OF fds.

LOOP AT T_DATA .
CONCATENATE T_DATA-ITAB '-'  T_DATA-ACUMULADOR INTO pote.
ASSIGN (pote) TO <pote>.
WRITE:/4 T_DATA-BUKRS,15 T_DATA-BEGDA, 30 T_DATA-SUBTY,40 T_DATA-ITAB, 55 T_DATA-ACUMULADOR, 100 <pote>, 120 pote.
  ENDLOOP.


el fields symbols va a tomar el valor de alguno de los campos de la tabla interna si es asi, se debe incrementar a traves de un ADD, seria algo asi, si pote = <pote>

ADD <pote> to <pote>?

en fin como haria para agregar al campo de la tabla interna que corresponda

gracias


3
Programación ABAP / Fields Symbols
« en: 18 de Diciembre de 2007, 08:05:37 pm »
Hola:

Favor si me pueden ayudar con la sintaxis del fields symbols, ya que en el codigo siguiente mi variable es de tipo C y cuando se lo asigno al fields symbols me trae lo siguiente 0.00 

este es el codigo


CONCATENATE T_DATA-ITAB '-' T_DATA-ACUMULADOR INTO pote.
ASSIGN (pote) TO <pote>.
descrip = <pote>.

4
Programación ABAP / Re: Archivo txt
« en: 24 de Septiembre de 2007, 05:43:59 pm »
Listo funciono con el OpendataSet

gracias a todos ;)

5
Programación ABAP / Enviar Archivo desde servidor sap a un servidor externo
« en: 19 de Septiembre de 2007, 04:49:38 pm »
 :) Hola Tengo un opendataset que me genera un txt y lo envia al servidor sap

Lo que requiero es enviar ese mismo archivo a servidor externo


Por favor si me pueden asesorar ya que soy novata programando en abap ???

6
Programación ABAP / Re: Archivo txt
« en: 21 de Agosto de 2007, 04:02:15 pm »
Tengo el siguiente codigo, pero no me carga los datos en el archivo, favor si pueden ayudarme a corregir el error  ???

gracias



TABLES: ZTHR_USUA_EMPL,PA0001,PA0002,PA0032.


DATA: BEGIN OF T_DATA1 OCCURS 0,
      T_BURKS LIKE ZTHR_USUA_EMPL-BUKRS,
      T_PERNR LIKE ZTHR_USUA_EMPL-PERNR,
      T_ORGEH LIKE PA0001-ORGEH,
      T_NACHN LIKE PA0002-NACHN,
      T_VORNA LIKE PA0002-VORNA,
      T_GEBNR LIKE PA0032-GEBNR,
      T_ZIMNR LIKE PA0032-ZIMNR,
END OF T_DATA1.

DATA: BEGIN OF T_CORREO OCCURS 100,
  var type string,
END OF T_CORREO.

SELECT
         ZTHR_USUA_EMPL~BUKRS
         ZTHR_USUA_EMPL~PERNR
         PA0001~ORGEH
         PA0002~NACHN
         PA0002~VORNA
         PA0032~GEBNR
         PA0032~ZIMNR
    INTO TABLE T_DATA1
    FROM ZTHR_USUA_EMPL
    INNER JOIN PA0001 ON
        ZTHR_USUA_EMPL~PERNR = PA0001~PERNR
        AND endda ='99991231'
    INNER JOIN PA0002 ON
        ZTHR_USUA_EMPL~PERNR = PA0002~PERNR
        AND PA0002~endda ='99991231'
    INNER JOIN PA0032 ON
        ZTHR_USUA_EMPL~PERNR = PA0032~PERNR
        AND PA0032~endda ='99991231'.
*    *WHERE  ZTHR_USUA_EMPL~BUKRS IN S_TSOC
*        AND ZTHR_USUA_EMPL~PERNR IN S_TEMPL.

CONCATENATE T_DATA1-T_ORGEH T_DATA1-T_NACHN T_DATA1-T_PERNR INTO T_CORREO-VAR.

CALL FUNCTION 'DOWNLOAD'
 EXPORTING
*   BIN_FILESIZE                  = ' '
*   CODEPAGE                      = ' '
   FILENAME                      =  'D:\Users\Ialcala\My Documents\Irua\txt\prueba.txt'
   FILETYPE                      = 'ASC'
*   ITEM                          = ' '
*   MODE                          = ' '
*   WK1_N_FORMAT                  = ' '
*   WK1_N_SIZE                    = ' '
*   WK1_T_FORMAT                  = ' '
*   WK1_T_SIZE                    = ' '
*   FILEMASK_MASK                 = ' '
*   FILEMASK_TEXT                 = ' '
*   FILETYPE_NO_CHANGE            = ' '
*   FILEMASK_ALL                  = ' '
*   FILETYPE_NO_SHOW              = ' '
*   SILENT                        = 'S'
*   COL_SELECT                    = ' '
*   COL_SELECTMASK                = ' '
*   NO_AUTH_CHECK                 = ' '
* IMPORTING
*   ACT_FILENAME                  =
*   ACT_FILETYPE                  =
*   FILESIZE                      =
*   CANCEL                        =
  TABLES
    DATA_TAB                      = t_correo
*   FIELDNAMES                    =
* EXCEPTIONS
*   INVALID_FILESIZE              = 1
*   INVALID_TABLE_WIDTH           = 2
*   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-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

7
Programación ABAP / Re: AYUDA CON SELECT
« en: 21 de Agosto de 2007, 02:28:13 pm »
Gracias Angel ya funciona a la perfecccion, nuevamente muchas gracias  ;)

8
Programación ABAP / Re: AYUDA CON SELECT
« en: 17 de Agosto de 2007, 09:03:22 pm »
Hola ya  incorpore el select al codigo, a pesar de que no me da ningun error solo me tra los datos de la tabla ZTHR_USUA_EMPL y no de las otras 2  :-\

9
Programación ABAP / AYUDA CON SELECT
« en: 17 de Agosto de 2007, 04:33:01 pm »
 :) Hola tengo el suiguiente codigo:

TABLES: ZTHR_USUA_EMPL,PA0001,PA0002,PA0032.

DATA: BEGIN OF T_DATA1 OCCURS 0,
BUKRS LIKE ZTHR_USUA_EMPL-BUKRS,
Z_PERNR LIKE ZTHR_USUA_EMPL-PERNR,
USUARIO LIKE ZTHR_USUA_EMPL-USUARIO,
FEC_ING LIKE ZTHR_USUA_EMPL-FEC_ING,
TIP_CTA LIKE ZTHR_USUA_EMPL-TIP_CTA,
FECHA LIKE ZTHR_USUA_EMPL-FECHA,
HORA LIKE ZTHR_USUA_EMPL-HORA,
P_ORGEH LIKE PA0001-ORGEH,
T_NACHN LIKE PA0002-NACHN,
T_VORNA LIKE PA0002-VORNA,
T_INICIAL TYPE C,
T_APELLIDO TYPE STRING,
T_CODIGO TYPE STRING,

END OF T_DATA1.

FORM OBTENER_DATOS.

SELECT BUKRS PERNR TIP_CTA
INTO T_DATA1
FROM ZTHR_USUA_EMPL
WHERE BUKRS IN S_TSOC
AND PERNR IN S_TEMPL.
APPEND T_DATA1.
ENDSELECT.


LOOP AT T_DATA1.
SELECT ORGEH PERNR
INTO T_DATA1
FROM PA0001
WHERE PERNR = S_TEMPL
and endda ='99991231'.
APPEND T_DATA1.
ENDSELECT.



SELECT NACHN PERNR VORNA
INTO T_DATA1
FROM PA0002
WHERE PERNR = T_DATA1-PERNR
and endda ='99991231'.
APPEND T_DATA1.
ENDSELECT.

SELECT PERNR GEBNR ZIMNR
INTO T_DATA1
FROM PA0032
WHERE PERNR = T_DATA1-Z_PERNR
and endda ='99991231'.
APPEND T_DATA1
ENDSELECT.
ENDLOOP.

ENDFORM.

 ??? COMO SERIAN LOS SELECT PARA BUSCAR LA BUSQUEDA DE VARIAS TABLAS CON UNA SOLA TABLA INTERNA Y CUAL SERIA LA ESTRUCTURA DEL LOOP PARAFORMAR EL SIGUIENTE REPORTE


WRITE:/1 T_DATA1-BUKRS,7 T_DATA1-Z_PERNR, 25 T_DATA1-T_NACHN ,33 T_DATA1-T_VORNA,50 T_PA0032-C_GEBNR, 65 T_DATA1-P_ORGEH.

MIL GRACIAS :-[

10
Programación ABAP / Archivo txt
« en: 15 de Agosto de 2007, 08:29:25 pm »
Hola,

Necesito generar un archivo txt y luego enviarla a un servidor externo, favor si me pueden orientar para la sintaxis

gracias :)

11
Programación ABAP / variables compuesta
« en: 06 de Agosto de 2007, 10:26:12 pm »
 :) Hola por favor si me pueden orientar para formar una variable compuesta, tomando los datos de otra tabla o variable es decir de la variable o del campo de la tabla x solo quiero el primer caracter, se que la sintaxis
DATA: BEGIN OF T_PA0002 OCCURS 0,
      T_NACHN LIKE PA0002-NACHN,
      T_PERNR LIKE PA0002-PERNR,
      T_VORNA LIKE PA0002-VORNA,
      T_inicial = T_NACHN+0(1).
END OF T_PA0002.

pero me da error  :-[


gracias  :-\


12
Programación ABAP / Crear cuentas de Red y correo desde Sap
« en: 13 de Julio de 2007, 05:10:56 pm »
Crear cuentas de Red y correo desde Sap



Hola   :)

Estoy trabajando con la Function SXPG_COMMAND_EXECUTE para crear automaticamente desde SAP cuentas de red y de correo al ingresar un nuevo registro , si alguien ha trabajado con algo parecido agradeceria su ayuda   ???

gracias  ::)

13
Programación ABAP / Entorno de test para modulos de funciones
« en: 11 de Julio de 2007, 05:07:33 pm »
Hola

Estoy tratando de hacer uso del Entorno de test para modulos de funciones pero tengo dudas en dos campo , es el Sist.dest.RFC: , que me estan pidiendo alli ? y como es la sintaxis para el ADDITIONAL_PARAMETERS ?


 ??? gracias....
 

Páginas: [1]