Variadito de Abap

Traduccion de ampliacion de menu Sap

2007-10-23T16:22:00.000-03:00

Transaccion SE63.Menu: R/3-Enterprise (al menos en la 4.7) --> Textos breves --> < SHI5 > Ampliaciones de jerarquía Se busca el objeto que se quiere traducir (o sea la ampliacion Z). Se eligen el idioma origen y el idioma destino y se clickea en "Tratar".Van a aparecer TODAS las entradas del menu.

2007-04-12T12:07:00.001-03:00

TEST

Para levantar variables de un programa standar desde un exit....

2007-02-21T10:51:00.001-03:00

* Defino una constante que tenga como valor el nombre del campo a recuperar poniendo entre aprentesis el nombre del programa standardCONSTANTS: c_resbd(15) TYPE c VALUE '(SAPLCOIH)resbd'. FIELD-SYMBOLS: TYPE resbd. ASSIGN (c_resbd) TO .

Comentarios graciosos en programas estandar de SAP - #2

2006-11-22T15:12:00.000-03:00

Mas que un comentario es un mensaje de error.Modulo de funciones: CRM_GET_KEYDATADATA FNAME(40) TYPE C .GENERATE SUBROUTINE POOL LT_SOURCE NAME FNAME .IF SY-SUBRC <> 0. MESSAGE ID 'SU' TYPE 'E' NUMBER '000' WITH 'Shit happens!'. "#EC NOTEXT* MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno* WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. E_STATUS = SY-SUBRC.

Como concatenar caracteres especiales.

2006-11-22T15:05:00.000-03:00

En la version 4.7 no se puede concatenar mas un campo del tipo X para agregar, por ejemplo, el caracter de retorno de carro, fin de linea,tabulacion, etc.Se debe utilizar la clase CL_ABAP_CHAR_UTILITIES.Esta tiene los siguientes atributos:HORIZONTAL_TABVERTICAL_TABNEWLINECR_LFFORM_FEEDBACKSPACESPACE_STRSPACE_STR_LANGUSe usa de la siguiente manera:Aca estoy concatenando una tabulacion.DATA:

Como calcular el proximo o anterior dia habil.

2006-07-05T17:09:00.000-03:00

Se puede usar la siguiente funcion:CALL FUNCTION 'DATE_CONVERT_TO_FACTORYDATE' EXPORTING CORRECT_OPTION = DIRECTION ---> - o + DATE = WRK_CHECK_DATE ---> fecha FACTORY_CALENDAR_ID = FACTORY_CALENDARS-IDENT ---> calendario (T001W-FABKL)

Comentarios graciosos en programas estandar de SAP - #1

2006-06-28T16:03:00.000-03:00

Include LV61BMES.*----------------------------------------------------------------------* INCLUDE LV61BMES*----------------------------------------------------------------------* This INCLUDE contains all generated access routines. Never change it* manually.* Whoever disturbs the silence in this INCLUDE will be hunted by 1000* crying devils!!!*-----------------------------------------------------

Manejo de numeros con decimales

2005-12-28T14:25:00.000-03:00

DATA N TYPE P DECIMALS 2. DATA M TYPE P DECIMALS 2 VALUE '-5.55'. N = ABS( M ). WRITE: 'ABS: ', N. N = SIGN( M ). WRITE: / 'SIGN: ', N. N = CEIL( M ). WRITE: / 'CEIL: ', N. N = FLOOR( M ). WRITE: / 'FLOOR:', N. N = TRUNC( M ). WRITE: / 'TRUNC:', N. N = FRAC( M ). WRITE: / 'FRAC: ', N.* The output appears as follows:** ABS: 5.55 (nro absoluto)** SIGN: 1.00-** CEIL:

Poner un tab como separador de campos en un archivo...

2004-12-29T10:43:00.000-03:00

data: HORIZONTAL_TAB(1) type c. HORIZONTAL_TAB = CL_ABAP_CHAR_UTILITIES=>HORIZONTAL_TAB. concatenate registro i_estrut-matnr HORIZONTAL_TAB into registro.

Funcion para sumar/restar dias/meses a una fecha

2004-12-16T15:57:00.000-03:00

CALL FUNCTION 'RP_CALC_DATE_IN_INTERVAL' EXPORTING date = sy-datum days = 0 months = 1 signum = '-' years = 0 IMPORTING calc_date = v_fecharesultado.

Creacion dinamica de variables....

2004-12-09T11:23:00.000-03:00

PARAMETERS: tab_name TYPE tname default 'YJTTEST', "Table name tab_comp TYPE tfieldname default 'PSPNR', "Field name line_num TYPE i DEFAULT 10. "Line number FIELD-SYMBOLS: TYPE ANY, TYPE ANY. DATA: wa_ref TYPE REF TO DATA. CREATE DATA wa_ref TYPE (tab_name). "Suitable work area ASSIGN wa_ref->* TO . SELECT * FROM (tab_name) INTO .

Grabar variante de visualizacion en un ALV

2004-11-06T15:54:00.000-03:00

Guardar y recuperar variantes del layout de un ALV. Hay que poner este codigo, agregar un boton al STATUS GUI y un par de parametros a la funcion de ALV.En los parametros de seleccion:SELECTION-SCREEN BEGIN OF BLOCK header2 WITH FRAME TITLE text-002.PARAMETERS: p_layout LIKE disvariant-variant.SELECTION-SCREEN END OF BLOCK header2.Variables:DATA: gx_variant LIKE disvariant.DATA:

SQL Dinamico (en los campos de seleccion de un select)

2004-11-06T15:38:00.000-03:00

Tambien se puede usar SQL dinamico para armar el grupo de campos a recuperar en una sentencia SELECT. Puede ser util para no recuperar campos que no vamos a usar (que pueden variar por alguna condicion del programa o parametro de seleccion).En este caso, segun el rango de periodo que me pasaran por parametro tenia que recuperar determinado grupo de campos que iban numerados de 01 a 16.* Definimos

Sumar / restar dias / meses a una fecha

2004-11-06T15:37:00.000-03:00

La funcion "RP_CALC_DATE_IN_INTERVAL" te permite sumar o restar dias/meses a una fecha determinada.

Completar con ceros a la izq un numero.

2003-08-14T23:50:00.000-03:00

Para agregar ceros a la izq en una una variable se hace lo siguiente:UNPACK v_variable to v_variable.El campo destino tiene que ser del tipo Char.

Recuperar la descripcion larga de un material

2003-08-08T13:06:00.000-03:00

En un formulario, habia unos casos que no recuperaba el texto largo del material.Armaba una clave que no correspondia.Lo que hice fue crear una rutina que la llamaba desde el formulario. Esta accedia a la tabla T165P que tiene las dif reglas para recuperar esos textos. Chequeaba con la funcion READ_TEXT que alguna regla recuperara el texto y le mandaba al sapscript la clave correcta.Modificacion

Transporte de formularios entre mandantes

2003-08-01T16:46:00.000-03:00

RSTXR3TR Programa de transporte para objetos de transporte SAPscript (para pasar entre mandantes del mismo servidor)RSTXSCRP Upload/download de objetos SAPscript (para pasar entre mandantes de dif servidores) RSTXFCOM Comparison of two forms

Agregar caracter de salto de linea y retorno de caro al final de un registro de un archivo de texto.

2003-07-18T17:22:00.000-03:00

Para agregar el caracter de salto de linea y retorno de carro se hace lo siguiente...1. Se extiende la longitud de la variable a 2 lugares mas...2. Se agrega el siguiente codigo...* Modificacion SIDTBES - 02/07/2003ASSIGN i_archivo-reg+221(1) TO <crlf> TYPE 'X'.<crlf> = '0D'.ASSIGN i_archivo-reg+222(1) TO <crlf> TYPE 'X'.<crlf> = '0A'.* Fin modificacion SIDTBES - 02/07/20023

Para recuperar la sociedad de un centro

2003-07-15T11:04:00.000-03:00

Entras a la tabla T001W con el centro. Con el bwkey vas a la T001K y ahi recuperas la sociedad....

2003-07-08T22:20:00.000-03:00

Para eliminar los 0 que aparecen a la izq en una variable del tipo n hay que moverlo a otra variable del tipo i.data: v_numero_n(10) type n, v_numero_i(10) type i.Move 10 to v_numero_n.* Si hago un write de esto me aparece 0000000010Move v_numero_n to v_numero_i.* Ahora me aparece 10Para eliminar los espacios que aparecen adelante se usa el SHIFT.

2003-05-29T11:23:00.000-03:00

Para ver formatos de reportes y colores Transaccion LIBS

2003-05-20T11:15:00.000-03:00

Para crear una ayuda de busqueda En el programa se pone lo siguiente: SELECTION-SCREEN BEGIN OF BLOCK bloque1 WITH FRAME. PARAMETERS: p_ident LIKE tfavt-ident MATCHCODE OBJECT zide, SELECTION-SCREEN END OF BLOCK bloque1. La ayuda de busqueda se crea desde la SE11.

2003-04-24T12:03:00.000-03:00

Para eliminar los espacios libres a la derecha o izq en una variable... SHIFT v_variable LEFT (o RIGHT) DELETING LEADING ' '.

2003-04-15T11:15:00.000-03:00

Otra de sapscript... Para subir logos se usa el programa RSTXLDMC...

2003-04-15T11:14:00.000-03:00

Para saber que formularios de sapscript usa un programa se accede a la tabla TNAPR con el campo PGNAM = nombre del programa.

2003-04-07T16:16:00.000-03:00

Este programita le saca el tilde de "Bloqueo de editor".Este se pone para que otro usuario no te toque el codigo fuente. REPORT zpruebabet . TABLES: trdir. SELECT SINGLE *

2003-02-19T10:11:00.000-03:00

Esta es una funcion que le agrega ceros a la izq a un valor que le ingreses. Si en numerico le agrega los ceros y ni no es numerico, devuelve el mismo valor... CONVERSION_EXIT_ALPHA_INPUT

2003-01-30T16:43:00.000-03:00

Funcion que chequea si el contenido de una variable es numerico o no. CALL FUNCTION 'NUMERIC_CHECK' EXPORTING string_in = v_lisel+36(10) IMPORTING * string_out = htype = v_tipo EXCEPTIONS OTHERS

2003-01-30T16:42:00.001-03:00

Para detectar si se marco algun checkbox. DATA: v_check2(01) TYPE c, v_reg(4) TYPE n, v_posi(4) TYPE n, v_sel(2) TYPE c, v_lisel LIKE sy-lisel, v_doc LIKE vbap-vbeln, v_tipo LIKE

2003-01-30T16:42:00.000-03:00

Llamar desde un reporte a una transaccion y pasarle parametros. SET PARAMETER ID 'AUN' FIELD p_v_doc. CALL TRANSACTION 'VA03' USING bdcdata MODE 'A' AND SKIP FIRST SCREEN. El ID se recupera haciendo F1/F9 sobre el campo en la dynpro.

2003-01-06T15:16:00.000-03:00

Para editar un field exit. Ir a la transaccion CMOD. En el menu, ir a Ampliaciones Glob. --> Exists campo. Buscas el campo en el listado, lo marcas y clickeas en el boton "TRATAR MF".

2003-01-03T13:55:00.000-03:00

Esta es la forma en que SAP recupera la cantidad de dias de un mes determinado Es la funcion NUMBER_OF_DAYS_PER_MONTH_GET. Se ingresa el mes y el año. Y este es el codigo fuente... data: days(26) value '00312831303130313130313031', offset type i, i1 type i, i2 type i, i3 type i. field-symbols . offset = 2 * par_month. assign days+offset(2) to . par_days = .

2002-12-19T12:13:00.000-03:00

SQL Dinamico FORM f_armo_sql. DATA: t_fields(50) OCCURS 10 WITH HEADER LINE. DATA: t_values(100) OCCURS 10 WITH HEADER LINE. DATA: t_where_tab(80) OCCURS 10 WITH HEADER LINE. CLEAR t_fields. REFRESH t_fields.

2002-12-19T12:06:00.000-03:00

Field Simbols REPORT zpruebabet1 . data: pepe1(5), pepe2(5), pepe3(5). FIELD-SYMBOLS . data: v_conta type n. data:v_descripcion(15) type c. clear v_conta. add 1 to v_conta. concatenate 'pepe' v_conta into v_descripcion. assign (v_descripcion) to . = 'Uno'. add 1 to v_conta. concatenate 'pepe'

2002-12-09T10:37:00.000-03:00

Envio de mails desde Abap REPORT zrepomail. *-DATA DECLARATION------------------------------------------------------ * DATOS VARIOS DE CONFIGURACION

2002-12-05T15:22:00.000-03:00

Códigos de Transacciones más comunes LIBS Configuración de Listas - RESUMEN CX34 Database List of Totals Records. Reporte de la ECMCT CXCC Display View Upload Methods Overview. Formato de los archivos. Para importar datos a la ECMCT. F-02 Para dar de ALTA Documentos (Entrar apunte de cta.mayor) f-66 Crear Documento Preliminar FBV0 Contabilizar Documento Preliminar SE10

2002-12-05T13:03:00.000-03:00

REPORT zpruebabet6 . * Codigo fuente para poder ver el contenido de un archivo..... * Levanto el archivo de unix y lo baja a la pc... * v_nom_arch = Path del archivo en unix DATA: v_nom_arch LIKE rlgrap-filename. DATA: v_arch_pc LIKE

2002-12-05T12:59:00.000-03:00

Levantar un archivo de la pc... REPORT zcobisdc003 MESSAGE-ID zap.. DATA: BEGIN OF i_arch OCCURS 0, * Campos del archivobla DATA: END OF i_arch. SELECTION-SCREEN BEGIN OF BLOCK sel WITH FRAME TITLE text-001. PARAMETERS: p_arch LIKE rlgrap-filename . PARAMETERS: p_sesion(12) TYPE c. SELECTION-SCREEN END OF BLOCK sel.

2002-11-27T11:03:00.000-03:00

Funciones de fecha - Recuperar el ultimo dia del mes o la cantidad del dias del mes. * RP_LAST_DAY_OF_MONTHS: Ingresas una fecha y te devuelve otra que es el ultimo dia del mes. * NUMBER_OF_DAYS_PER_MONTH_GET: Ingresas el mes y el año y te devuelve la cantidad de dias del mes.

2002-11-25T17:57:00.003-03:00

- INSERTAR DATOS EN TABLAS SIN TENER PERMISOS Cuando queremos insertar datos en una tabla y nos da un mensaje diciendo que no tenemos autorización, hay una forma de inserta datos. COMO HAY QUE HACER? A continuación se muestran los pasos a seguir, junto con un ejemplo. --Identificar la tabla donde se quiere insertar el registro. En este caso es la USR05 (Maestro de usuarios ID de

2002-11-25T17:57:00.002-03:00

- Buscar en una subcadena. (En VB es instr). SEARCH text for 'californ1'. if sy-subrc ne 0. write 'not found.'. else. write 'se encontro'. endif.

2002-11-25T17:57:00.001-03:00

- Acceder a una subcadena. (En VB es Mid). utilizando offsets y lenght. ejemplo= cadena+2(4) "tomar 4 caracteres sin considerar los dos primeros"

2002-11-25T17:57:00.000-03:00

- Sacar los espacios sobrantes. (En Visual Basic es trim()). shift nombrecadena left deleting leading space.

2002-11-25T17:56:00.005-03:00

- Obtener los días hábiles o los de vacaciones? SE INVOCA A UNA FUNCION, PASANDOLE UN RANGO DE FECHAS. SE LE PUEDE PASAR UN DIA SOLO, PONIENDO EN FECHA DESDE Y FECHA HASTA EL MISMO DIA DEVUELVE LA CANTIDAD DE DIAS QUE SON NO HABILES, YA SEA FIN DE SEMANA O FERIADOS. if not xbsid-nfechvto is initial. perform averiguar_dia_habil. if not dia_habil is initial. set cursor

2002-11-25T17:56:00.004-03:00

- Como hacer una búsqueda en una tabla interna sin perder el puntero? O sea, si estoy parado en un registro de una tabla interna, o estoy completando los campos para generar un registro y tengo que hacer una búsqueda, lo que no querría es que los datos que estoy cargando se pierdan. Lo que hay que hacer es utilizar el comando READ TABLE con la opcion TRANSPORTING NO FIELDS Ejemplo:

2002-11-25T17:56:00.003-03:00

- Cómo reemplazar un COLLECT? El collect sumariza los campos numéricos. Hay veces que no se quiere sumarizar un determinado campo, por lo tanto el COLLECT no parece ser lo mas adecuado. En caso de tener que reemplazar un collect porque se descubre este inconveniente, se lo puede reemplazar por Append y modify. Si no se encuentra el registro, se hace un APPEND. Si se

2002-11-25T17:56:00.002-03:00

- Copiar una los datos de una tabla interna a otra? report ycb_36 . tables: t000. data: t_t000 like t000 occurs 0 with header

2002-11-25T17:56:00.001-03:00

- Seleccionar como mucho un registro de un Select que puede devolver más de uno select * from bsak up to 1 rows. En forma generica: select * from bsak up to n rows.

2002-11-25T17:56:00.000-03:00

- Como hacer para que el usuario seleccione de un combo un archivo a importar? NO LE PONE EL NOMBRE DEL ARCHIVO DE ESTA FORMA MUESTRA UNA ESPECIO DE COMBO CON VENTANA PARA QUE EL USUARIO LO SELECCIONE. CALL FUNCTION 'UPLOAD' EXPORTING * CODEPAGE = ' ' FILENAME = ' ' FILETYPE = 'DAT' * ITEM

2002-11-25T17:55:00.005-03:00

- Cómo hacer para buscar una cadena de texto en todos o algunos de los programas de un mandante? Utilizar el programa ygop10 que se encuentra en el directorio CODIGO SAP de esta base de conocimientos.

2002-11-25T17:55:00.004-03:00

- Fijar un breakpoint en el codigo, en forma harcodeada? Escribir la sentencia: break-point.

2002-11-25T17:55:00.003-03:00

- Activar funciones cuando se producen errores en otras funciones del mismo grupo? Hasta que todas las funciones no tengan errores de sintaxis, no se puede activar. Igualmente, en estos casos se deben activar TODAS JUNTAS, ya que si se quiere activar por separado siempre dice que hay otra función que tiene error. Sería casi un "deadlock".

2002-11-25T17:55:00.002-03:00

- Escapar comillas en una cadena? FUNCTION Z_ESCAPAR_COMILLA_SIMPLE. *"---------------------------------------------------------------------- *"*"Local interface: *" IMPORTING *" REFERENCE(V_INPUT) TYPE C *" EXPORTING *" REFERENCE(V_OUTPUT) TYPE C *"---------------------------------------------------------------------- * Autor: Cristian Berri (Accenture) * Fecha: 08/04/

2002-11-25T17:55:00.001-03:00

- Utilizar memoria compartida: ENVIO DE DATOS -------------- DATA: V_ERROR_DESC(200) type c. EXPORT V_ERROR_DESC from V_ERROR_DESC to memory id 'ZBCS_FICUPL90_ERROR_DESC'. * Borra la memoria free memory. RECEPCION DE DATOS ------------------ DATA: V_ERROR_DESC(200) type c. * Importa posibles mensajes de error. IMPORT V_ERROR_DESC FROM MEMORY ID '

2002-11-25T17:55:00.000-03:00

- Mostrar una barra horizontal con el porcentaje realizado de una tarea? - Mostrar una Progress Bar? Ejemplo1: call function 'SAPGUI_PROGRESS_INDICATOR' exporting percentage = i_cont text = 'Ejecutando' exceptions others =

2002-11-25T17:54:00.007-03:00

- Dejar ceros a la izquierda de un numero DATA: i_cont (2) type n. Ahora i_cont tiene el formato 00. Se se hace i_cont = 1. i_cont contendrá 01 El subindice indica el tamaño del campo. También se pueden hacer operaciones aritmeticas sencillas con estos campos de tipo N. Por ejemplo, Add 1 to i_cont Ahora i_cont contendrá 02

2002-11-25T17:54:00.006-03:00

- Comparar contra una fecha que tiene formato en complemento a 9999 o la cantidad de 9 nueves igual a la cantidad de digitos de la fecha. Hacer la resta. Por ejemplo: 7997 se refiere al año 2002, porque 9999-7997 = 2002. También podría darse el caso que la fecha entera se encuentre en complemento. Por ejemplo: 79979469 Este caso es análogo, solo hay que partir la fecha

2002-11-25T17:54:00.005-03:00

- Seleccionar todo el codigo de un programa si no se puede hacer un download? RESPUESTA 1-Presionar F9 en la primera linea 2-Presionar F9 nuevamente en la ultima linea a seleccionar 3-ir al menu Bloque/Archivo y seleccionar copiar al Portapapeles y listo. Después se puede pegar.

2002-11-25T17:54:00.004-03:00

-Configurar un perfil en SAP para que reciba mails? -Ir a la transacción SU3 (Actualización de propios valores prefijados para el usuario) -Presionar el botón Otras Comunicaciones -Cuando se despliegue una lista, seleccionar INT SMTP (Mail Internet) -Completar con la dirección de correo del dueño del perfil de SAP -Grabar y salir

2002-11-25T17:54:00.003-03:00

-Preguntarle al usuario si desea continuar Invocar a alguna de las siguientes funciones de SAP: La diferencia radica en la cantidad de botones que tiene cada una. Por ejemplo en una solo se puede seleccionar Si o No, y en la otra Si, No y cancelar. * (Si, no o cancelar) call function 'POPUP_TO_CONFIRM_STEP * (Si o No) call function 'LC_POPUP_TO_CONFIRM_STEP' Ejemplo 1:

2002-11-25T17:54:00.002-03:00

-Copiar una tabla interna a otra? TABLA1[] = TABLA[2]

2002-11-25T17:54:00.001-03:00

-Insertar los datos de una tabla en otra que ya contiene datos INSERT LINES OF ITAB1 INTO ITAB2.

2002-11-25T17:54:00.000-03:00

-Que cambie el formato del cursor del mouse cuando pasa encima de un texto determinado. write:/ 'Hola' hotspot on. Hace que cuando el cursor pase encima de la palabra 'Hola', el cursor del mouse pasa a ser una MANO.

2002-11-25T17:53:00.007-03:00

-Que cuando se imprimen valores con WRITE no deje espacios entre las distintas cadenas? write:/ CADENA1 no-gap, CADENA2 no-gap , CADENA3 no-gap. Imprime tres cadenas distintas sin dejar espacios entre ellas.

2002-11-25T17:53:00.006-03:00

-Sacar los espacios en blanco a la izquierda de una cadena condense CADENA. quita los espacios a la izquierda. Sino probar con consende CADENA no-gaps.

2002-11-25T17:53:00.005-03:00

-Mover una cadena un caracter a la derecha por ejemplo: CADENA = 'CRISTIAN' shift CADENA right. Imprimiría ' CRISTIAN' (obviamente sin las comillas). Si la cadena queda corta se trunca el caracter de más a la derecha.

2002-11-25T17:53:00.004-03:00

-Definir tipos de datos? EJEMPLO1: DEFINIENDO UN TIPO types: begin of person, name(20) type c, age type i, end of person.

2002-11-25T17:53:00.003-03:00

-Convertir un caracter a TAB? -Declarar una variable tipo hexa con el valor del TAB. * Campo hexadecimal con el caracter 09 (punto y coma). data: v_tab type x value '09'. -Una forma de reemplazar el caracter es recorrer la cadena y a medida que se van leyendo caracteres, ir pasandolos a otra cadena, y cuando el caracter sea el que deseamos reemplazar, pegar el TAB en vez de ese

2002-11-25T17:53:00.002-03:00

-Hacer un marco alrededor de los campos de una pantalla de selección? SELECTION-SCREEN BEGIN OF BLOCK 1 WITH FRAME TITLE TEXT-001. PARAMETERS: P_RYEOLD LIKE TF189-RYEAR, "Año Actual P_PEROLD LIKE TF189-PERID. "Periodo Actual SELECTION-SCREEN END OF BLOCK 1.

2002-11-25T17:53:00.001-03:00

-Saber el idioma en el que se logeó el usuario? usar SY_LANGU. que devuelve en 2 caracteres el idioma actual. Ejemplo: "ES", "EN".

2002-11-25T17:53:00.000-03:00

-Que un parámetro de texto respete las mayúsculas y minúsculas? campo1(100) type c lower case.

2002-11-25T17:52:00.004-03:00

-Preguntar si un parámetro OPTATIVO de una función fue utilizado RESPUESTA The expression f IS REQUESTED is true if an actual parameter was specified for the formal parameter f when the call was made. IF TEXT IS REQUESTED. SELECT SINGLE * FROM ... TEXT = ... ENDIF.

2002-11-25T17:52:00.003-03:00

-Limitar el ancho y cantidad de filas de un reporte? PROGRAM zmrsd031 NO STANDARD PAGE HEADING LINE-COUNT 65 LINE-SIZE 260.

2002-11-25T17:52:00.002-03:00

-Declarar una tabla interna con el formato de una tabla sin tener que volver a definir campo por campo? DATA: BEGIN OF T_BKPF occurs 0. INCLUDE STRUCTURE BKPF. DATA: END OF T_BKPF.

2002-11-25T17:52:00.001-03:00

-Declarar una tabla interna con el formato de una tabla más otros campos que no pertenezcan a la tabla? DATA: BEGIN OF T_BKPF OCCURS 0. INCLUDE STRUCTURE BKPF. DATA: campo1 type c, campo(20) type c, campo3 like bseg-mandt. DATA: END OF T_BKPF.

2002-11-25T17:52:00.000-03:00

-Un JOIN entre tablas? tables: zfr001, zfr002. data: begin of t1 occurs 0. include structure zfr001. data: xblnr like zfr002-xblnr. data: end of t1.

2002-11-25T17:51:00.003-03:00

-Saber la versión del cliente, sistema operativo, etc? DATA: BEGIN OF DATOS. INCLUDE STRUCTURE RFCSI. DATA: END OF DATOS. CALL FUNCTION 'RFC_SYSTEM_INFO' DESTINATION 'SAPGUI' IMPORTING RFCSI_EXPORT = DATOS. WRITE: / 'Sistema SAP .............:', DATOS-RFCSYSID, / 'Sistema operativo .......:', DATOS-RFCOPSYS, / 'VERSION SAPGUI ..........:', DATOS-RFCSAPRL.

2002-11-25T17:51:00.002-03:00

-Desplegar un control para seleccionar el nombre de un archivo DATA: MASK(20) TYPE C VALUE ',*.* ,*.*.'. ************************************************************************ * PARAMETERS * ************************************************************************ PARAMETERS: P_FILE LIKE RLGRAP-FILENAME OBLIGATORY

2002-11-25T17:51:00.001-03:00

-Cambiar la configuración de Usuario? Cambiar la coma por punto? Cambiar los valores prefijados para el usuario? Ir a Sistema-Valores Prefijados-Datos propios

2002-11-25T17:51:00.000-03:00

-Cambiar las comas y puntos de un número decimal? DATA: V_IMPORTE TYPE P DECIMALS 2. DATA: V_IMPORTE_CONV(20) TYPE C . V_IMPORTE = '-99999999' / 7. PERFORM F_FORMATEAR_IMPORTE USING '.' V_IMPORTE CHANGING V_IMPORTE_CONV. WRITE:/ 'v_importe : ', V_IMPORTE.

2002-11-25T17:50:00.003-03:00

-Setear en forma dinámica la fecha en una variante, cuando se ejecuta con job. Desde el programa, poner SAVE AS VARIANT. Marcar el CheckBox VARIABLE para el campo tipo FECHA Presionar Selection Variables Marcar Dynamic Date Calculation Elegir una VARIABLE NAME Ejemplo: Current DATE Presionar Grabar Presionar Grabar (nuevamente)

2002-11-25T17:50:00.002-03:00

- Para reemplazar la coma o punto decimal segun la configuracion del usuario... PERFORM f_formateo_importe USING i_arch-total_costos CHANGING i_arch-total_costos. ~~~~ FORM f_formateo_importe USING p_v_importe CHANGING p_v_importe_formateado.

2002-11-25T17:50:00.001-03:00

- Para guardar una tabla interna en un archivo en unix. data: v_file LIKE rlgrap-filename. v_file tiene el path y nombre de archivo de unix. OPEN DATASET v_file FOR OUTPUT IN TEXT MODE. LOOP i_tab. TRANSFER i_tab TO v_file. ENDLOOP. CLOSE DATASET v_file.

2002-11-25T17:50:00.000-03:00

- Para abrir la ventana para navegar por el disco rigido para levantar un archivo como parametro de entrada SELECTION-SCREEN BEGIN OF BLOCK sel WITH FRAME TITLE text-001. PARAMETERS: p_arch LIKE rlgrap-filename . SELECTION-SCREEN END OF BLOCK sel.

2002-11-25T17:44:00.000-03:00

Cosas varias de Abap