numeroAlfa = %char(nmero);
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Paco wrote:
Necesito pasar un campo
numerico a alfanumerico eliminando
ceros.
El campo es 0005000 y el
resultado que quiero obtener es 5000
ajustado a la izquierda.
Creo que si usas %dec has de especificar un tamao y decimales:
%dec(numeroAlfa, 3, 2). Si es un entero puedes usar en su lugar %int.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Paco wrote:
Gracias,
Lo contrario
seria?
numero
=
Si no tienes campos modificables en la parte superior de la pantalla,
puedes poner el registro de control del subfichero en la parte inferior
de la pantalla, y as no tendrs problemas.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Gerardo Santillana wrote:
Las tablas referenciadas en un sql esttico incrustado en un rpg s que
se muestran en un dsppgmref. Las de los sql dinmicos son las que no se
muestran.
Para poder continuar usando nicamente dsppgmref nosotros definamos
las tablas usadas solamente en sql dinmico en la hoja F, con la opcin
de
Hola, Santiago.
Pues mira, yo me alegro del desacuerdo, as discutimos ;).
Cuando digo que el chain no tiene rival en accesos a registros
especficos no me refiero tanto a que vaya ms rpido o no (lo cual
para pocos accesos es irrelevante), como a la facilidad del
chain/update frente a montar
Efectivamente est a aos luz del SQL Server, pero por delante, en
fiabilidad, rendimiento, etc. Sirva de ejemplo que nuestro ISeries se
queda colgado una vez cada 5 aos ms o menos, y los SQL Server los
tenemos que reiniciar todas las semanas porque si no se mueren, y an
as se cuelgan de vez en
Buenos das, Vicente.
Desafortunadamente, an no se puede (al menos en V5R2).
Si quieres que no te destroce el sangrado, lo mejor es encapsular los
sql's en procedimientos o funciones.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
vicente gomez wrote:
Buenos
Es que si ests poniendo una variable dentro del sql, el tamao est
definido, mientras que si pones una constante es posible que sql le de
un tamao distinto al que tu esperas.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Fernando Martnez wrote:
Si lo pongo
Caray, me estn entrando ganas de pillarme uno para casa :)
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Guillermo Andrades (CPI Software) escribi:
me parece que nadie ha comentado nada sobre el nuevo
anuncio, sobre todo del nuevo modelo "chiquitito" 515.
que
Aqu tienes un ejemplo de procesar recursivamente datos estructurados
en rbol. Es una funcin de un programa de servicio, creado con
ACTGRP(*CALLER). Espero que te sirva.
*
**
*
* Pcom_dependientes. Devuelve en una
Si te he entendido bien, creo que la siguiente sentencia te valdr Si
en A no hay valores repetidos en campo1 (lo cual no parecera lgico)
update B set campo1 = (select campo2 from A where campo1 = b.campo1)
where exists (select campo1 from A where campo1 = b.campo1)
El where es necesario si
Para recuperar la fecha del sistema en una variable numrica, con
formato MMDD: fecha = %int(%char(%date: *iso0))
Para la hora: hora = %int(%char(%time: *iso0)) ;
Hasta donde yo se, el objeto generado con rpg ILE es tan nativo como el
otro.
Saludos.
Fernando Prez
Cermica Saloni.
Al iniciarse cada trabajo se le asigna una qtemp automticamente. No la
puedes crear porque ya existe. El mensaje que te da no es porque no
exista qtemp, sino porque no puedes aplicarle ese mandato. Haz en su
lugar un DSPLIB QTEMP y vers como s existe.
Saludos.
Fernando Prez
Cermica
Podra funcionar hacer un trigger que antes de insertar el registro
calculara el campo. Si es posible que se modifique la fecha del pedido
(lo que no parece probable en un histrico), habra que hacer tambin
un trigger para la actualizacin.
Saludos.
Fernando Prez
Cermica Saloni. Dpto.
en rpg lo tienes con %scan
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Jos de la Herrn escribi:
En RPG IV? En ILE-RPG? En COBOL? En C? En Basic? En java? En
REXX?
En...?
Matilde Vedia Molina escribi:
Buenos das:
Supongo que ests ejecutando el navegador, especificando el path del
ejecutable. En lugar de eso, puedes hacer lo siguiente:
start www.url.de.la.pagina.html
start ejecuta la aplicacin asociada al tipo de documento que informas
como parmetro.
Saludos.
Fernando Prez
Cermica Saloni.
funciona en V5R2 y posteriores. Puede que también en versiones
anteriores, pero no lo he probado.
Espero que te sirva.
Saludos.
Fernando Pérez
__
Forum.HELP400 es un servicio mamp;#225;s de NEWS/400.
amp;#169; Publicaciones Help400, S.L. - Todos los
En un sql dinmico (prepare + execute) no puedes incluir variables de
programa.
En lugar de ello, has de definir un cursor basado en la sentencia y
recuperar el primer registro del cursor para obtener el valor que
deseas.
Por otro lado, delante de Cnt creo que tendras que poner ':' (:Cnt).
¿Realmente tienes una tabla que se llame AF.002?
Yo diría que eso no es posible
Saludos.
Fernando Pérez
Cerámica Saloni. Dpto. Auditoría y
Organización
Liliana Suarez escribió:
Hola:
A
continuación les expongo la siguiente duda:
Trabajando
en Form – Free Rpg de AS/400
Si no tienes problemas con el efecto 2000, al ser el ao de 2 dgitos,
te puede valer esto:
order by left(digits(movfec), 4)
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Jose Bermdez escribi:
Hola Forum y Feliz Ao
Tengo el siguiente problema SQL_RPGLE
Caray, pues ah s que se pone la cosa bastante complicada. Supongo que
con variables auxiliares de los distintos tamaos posibles se podra
solventar el tema, pero no de una forma elegante.
Lo que no acabo de imaginar es qu situacin requiere ese tipo de
funcionamiento. Si no es indiscrecin,
Lo de las validaciones redundantes, al menos en nuestro caso, se hacen
para poder avisar al usuario del error en los datos que ha informado
Es que hay alguna manera de identificar el error de integridad
referencial al hacer el write/update?.
Por otro lado, al menos tambin en nuestro caso, en
Otra manera es comprobar que los campos que componen la clave del
fichero han cambiado de valor y tienen el buscado.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Juan Carlos Paredes escribi:
Una posibilidad es utilizar un
indicador.
Venga, mujer, que tampoco han sido para tanto (al menos los que me han
llegado a mi correo). Una cosa es evitar el lenguaje soez, que no me ha
parecido ver en las respuestas que he visto, y otra comentar con humor
la alegra que da ver un cuerpo serrano del sexo contrario (o del sexo
propio
Saludos foreros. Creo que este es un tema que ya se ha tratado, pero
soy bastante malo buscando. Existe una api o similar para poder
generar mensajes de error (los famosos CPFXXX y similares) desde las
aplicaciones?
--
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Gracias. Mi intencin es provocar el mismo funcionamiento que se da
cuando hay un error en un programa (error por pantalla y solicitud de
contestacin C G D ...). Esto es posible usando SNDPGMMSG? Con qu
configuracin del mandato?
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Saludos, foreros.
He empezado a utilizar estructuras de datos para operaciones con
ficheros, del tipo chain clave fichero estructura_de_datos.
Hasta aqu todo bien. defino la estructura de datos con
extname(fichero: *input) y listos. El problema me surge cuando quiero
actualizar. Para ello,
Nosotros trabajamos bastante con programas de servicio, y pasamos con
frecuencia la informacin leda de fichero por una funcin a otra. Para
cargar una DS recibida por parmetro con el resultado de un chain,
tenamos una DS que solapaba los campos del fichero, y que se cargaba
al hacer el chain, y
Ya veo que no es el problema que te comentaba antes, sino todo lo
contrario.
Por qu definirlos en una DS?. No puedes definirlos como variables
sueltas?
En el ejemplo de la fecha, si los campos estn correlativos en la DS y
en el orden correcto, puedes crear otra DS que solape a la primera:
Disculpa, Jordi, me equivoqu al enunciar el problema. No es un update
lo que quiero hacer, sino un write. En ese caso, segn el manual (y el
compilador coincide con l, porque me da error) la DS ha de estar
definida con *output. El problema es que tambin necesito hacer un
chain.
Perdn de nuevo
Lo que quera decir es si en lugar de generar una DS con todos los
campos de pantalla no podis definirlos como variables independientes.
De esta manera pueden estar en otra DS. Por lo que respecta al fallo
manual que comentas, ciertamente si lo haces a mano tienes
probabilidades de pifiarla,
No hablo de definir una DS por campo, sino de definir los campos como
simples variables, sin DS:
D dia S 2 0
Y si acaso meter la definicin de esas variables en un fichero aparte,
a incluir con /copy
Si por lo que parece vosotros necesitis que todos los campos de
pantalla estn en una DS
A muy grandes rasgos:
1. Te defines un origen de datos ODBC que apunte al Iseries. En la
pestaa 'Servidor' defines la lista de bibliotecas y dentro de
'Avanzadas' informas en Modalidad de compromiso: 'Compromiso inmediato
(*NONE)'. Revisa tambin el separador decimal.
2. Ya en Access, en la
Si has definido el origen de datos con 'Compromiso inmediato (*NONE)',
creo que no hace falta registrar la tabla por diario.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Juan Ramn Garcia escribi:
Hola Alex:
Es imprescindible?, no es una tabla
No necesitabas crear la tabla en Access. Se trabaja con la tabla
vinculada directamente.
El error que comentas no se me ha dado nunca. Comprueba en el origen de
datos ODBC como tienes, en la pestaa 'Servidor', el combo 'Convenio de
denominacin' (yo tengo '*SQL'), mira de cambiarlo, crgate la
Buenas, foreros.
Cuando hacemos un write a un fichero con clave autonumrica, la nica
forma que conozco de saber el valor del autonumrico es con la funcin
sql 'identity_val_local'.
Para evitar tener que convertir los programas a sqlrpgle hemos hecho un
programa de servicio que implementa esta
Buenas, foreros.
Estoy programando un SQLRPGLE, y al compilar me da el error que da
ttulo a este hilo.
S por qu pasa: he hecho un /copy de un fuente que a su vez hace otros
/copy. Lo que me extraa es que crea haber ledo que en V5R4 esto ya
se poda hacer, aunque por lo visto no es as.
Hay
Si pones: start \\192168.0.170\carpeta1\carpeta2\Fotos_Etiquetado_Productos\NOFOTO.jpg
te abre la imagen con el programa asignado al tipo de archivo
Saludos.
Fernando Pérez
Cerámica Saloni. Dpto. Auditoría y
Organización
Fernando Maestu escribió:
Buenas tardes a todos:
Estoy
Qu barbaridad ! Nunca pens que pudiera caber tanta maldad en 3
mensajes :)
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Carlos escribi:
O enviar
un mensaje indicando su direccion en los campos From y Reply To 0:-)
Juan Ramn Garcia escribi:
Creo que
Que vaaa!. Yo me haba quedado en la idea de darme de alta con su
direccin de correo en alguna de esas webs de 'moral distraida', que
automticamene pasan a spamearte en plan masivo. Pero vosotros es que
sois mala gente ;)
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Si no estoy equivocado, KEEP hace que se mantengan los datos de
pantalla cuando el programa deja de estar activo. Aunque debo admitir
que nosotros no tenemos ningn caso como el que planteas, yo probara a
poner KEEP en los formatos de pantalla de los tres programas (creo que
con ponerlo en un
Bueno, supongo que habr una forma ms fcil pero por si no la hay,
aqu tienes una:
Haz un dspusrprf volcado a disco: DSPUSRPRF USRPRF(*ALL)
OUTPUT(*OUTFILE) OUTFILE(QTEMP/USR)
Quita del archivo generado los perfiles de usuario que no quieras
deshabilitar (qsysopr, qsecofr y similares, en
Para el caso 1: Nosotros le pasamos al programa sometido por parmetro
(o por la lda) el nombre del trabajo en interactivo.
Para el caso 2: Si no encuentas una solucin ms elegante (que
seguramente la habr) puedes hacer un WRKACTJOB volcado a impresora de
los subsistemas que tengan los trabajos
Compaeros... No conocis la poltica de devoluciones de (por ejemplo)
El corte ingls ? (si no ha cambiado, como creo que lo ha hecho en
Mediamarkt. A verificar antes de lanzarse).
Lo compras, te pegas con l una semana a ver si consigues que chute
como quieres, y si no lo consigues lo devuelves
Hola.
Puestos a minimizar la faena, Por qu no pruebas a, en el access que
ya tienes, sustituir las tablas access por las tablas del AS400
vinculadas? Si en el access le das el mismo nombre a la vinculada que a
la que exista anteriormente, con un poco de suerte igual no tienes que
tocar nada
Buenos das.
"Se presupone que PHP es ms fcil de aprender" : Cronometra lo que le
costar a un nefito hacer una pgina web tipo "Hola mundo" con uno y
otro y te dars cuenta de que la curva de aprendizaje de php es mucho
ms rpida. Otra cosa es cunto se tarda en aprender a hacer
aplicaciones
, como :
/free
exec sql drop table qtemp.wrk;
/end-free
Saludos.
Fernando Pérez
Cerámica Saloni. Dpto. Auditoría y
Organización
Diego Denis escribió:
Estimados,
heredé un programa SQLRPGLE (el objeto
desapareció...), con instrucciones en free, que
necesito compilar porque tiene un
es a cenar a base de novillo
a la brasa (y no veas lo que podemos llegar a comer entre los dos ;-) ).
Saludos.
Fernando Pérez
Cerámica Saloni. Dpto. Auditoría y
Organización
Diego Denis escribió:
¡Que grande Fernando! Nunca había usado la opción 15,
siempre el CRTRPGMOD derecho.
¡Muchísim
Paso 1: DSPOBJD OBJ(BIBLIOTECA/*ALL) OBJTYPE(*FILE) OUTPUT(*OUTFILE)
OUTFILE(QTEMP/OBJD)
(En BIBLIOTECA pon el nombre de la biblioteca que quieras estudiar. Si
son varias, puedes usar en su lugar *all, *allusr, etc.)
Paso 2: Ejecuta el SQL: SELECT * FROM qtemp/objd ORDER BY ODOBSZ desc
Y ya
Si te funciona debe ser porque el fichero input tiene la misma
estructura que el fichero Fromfile, Verdad? De no ser as, no creo que
funcionara.
Creo que no hay una forma fcil de hacer lo que comentas. Una manera
(bastante costosa) de conseguirlo que se me ocurre sera usar un dspffd
del
Abajo tienes el fuente de un programa que vale como prueba de concepto
de lo que quieres hacer. Complalo y lo pruebas. Si tienes alguna duda
lo comentamos.
H dftactgrp(*no)
H actgrp(*new)
*
* Necesario para usar las funciones C
H bnddir('QC2LE')
*
* memmove es la versin segura de
Te adjunto el fuente de una pantalla de prueba que tengo con todas las
posibilidades que conozco. Complala y prueba con el SDA los distintos
formatos a ver si encuentras algo que te sirva.
Por cierto, la pantalla del men desplegable no me funciona al probarla
con el SDA (mensaje CPF5051.)
Hola.
Si no te quieres meter en el diseo dinmico de pantallas pasando de
las dds's, una forma de poder tener varios tamaos es definir
condicionalmente varios campos en la misma posicin, de forma que
solamente uno de ellos este activo, en funcin del parmetro.
Otra forma, ms drstica, sera
Si la api es la que utiliza la utilidad SNDMAILF, que es la que
gastamos nosotros, el problema es que no se pueden adjuntar archivos
binarios, porque no los procesa correctamente. Sin embargo s se pueden
adjuntar archivos de texto (.txt, .html. .csv, etc).
Saludos.
Fernando Prez
Cermica
Prueba as:
'USRD(''' + %trim(DESC) + ''') ' +
Para poner comillas simples las has de poner dos veces. Por
ejemplo: x'x sera 'x''x'.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
JUAN Garca escribi:
Buenos das
En un programa RPG, tengo un campo alfanumrico
Cuando lo compiles con crtsqlrpgi, te generar el archivo fuente
qsqltemp1 en la qtemp. All tendrs un fuente del mdulo
correspondiente a la salida del precompilador. Ese fuente lo puedes
compilar con crtrpgmod, con la opcin de generar el pcml.
Saludos.
Fernando Prez
Cermica Saloni. Dpto.
la sintaxis es correcta y el caso que comentas me suena mucho haberlo
oido como problema a corregir con ptf's, hace unos aos.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Antonio escribi:
Hola a todos.
Estoy en versin 5.2 con un nivel de ptf bajo.
Si hago
En el cdigo nada hace pensar que acabar pasando lo que comentas. Lo
nico que se me ocurre que est pasando es que cuando llamas a SRVPGML0_update ests pasando en el parmetro Ds_UpdRec
una Ds que se actualiza cuando se hace el chain. Puedes probar a ver si
definiendo el parmetro Ds_UpdRec
con la
) dim(10) (... Por
cierto, ¿en tu ejemplo no falta algo en la definición de dm_lista?)
Saludos.
Fernando Pérez
Cerámica Saloni. Dpto. Auditoría y
Organización
Jaime Villa Torres escribió:
Señores, tengo el siguiente,
problema, es posible que me den una luz.
en
La operacin que utilizas es la correcta, pero elevar un nmero a la
potencia N significa multiplicar el nmero por s mismo N veces (2**3 =
2*2*2), con lo que 1**16 = 1.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Auditora y
Organizacin
Pedro Molina escribi:
Hola foro !!
Una
Si has creado el directorio de enlace ser de programas de servicio que
implementan esas funciones C, y para poder usarlas desde programas
RPGLE tendrs que definirlos como H DFTACTGRP(*NO). Por lo tanto, ests
trabajando en ILE.
Cuando se hace referencia a RPG ILE, yo interpreto un
Que yo sepa, no puedes redefinir una variable, pero si lo que quieres
es quitar los blancos que sobran en la salida, lo puedes hacer
definiendo en el prtf un solo campo correspondiente a toda la lnea y
concatenando en l las variables quitndole los blancos. Por ejemplo:
linea =
Saludos foreros. Estoy haciendo un poco de I+D+i con php, y he llegado
al envo de de un correo con el texto en html y con un archivo de Excel
como adjunto. Como de vez en cuando se pregunta en el foro por el envo
de correo desde el I5, abajo os copio el cdigo del ejemplo, por si
alguien ms
Framework), aunque la implementación de DB2 no estaba finalizada
del todo la última vez que le pegué un vistazo.
Saludos.
Fernando Pérez
Cerámica Saloni. Dpto. Organización
Àlex Corretgé escribió:
Hola Fernando,
Si puedes, mirate el apartado de Mail del Zend Framework
http://framewor
No conozco ninguna aplicacin que haga lo que comentas, pero por si no
encuentras nada te puedo contar la forma artesanal de sacar las
llamadas entre programas (respecto a los parmetros, no conozco otro
camino que procesar los fuentes en su busca):
Para la lista de llamadas entre programas:
Música para mis oídos :-)
Ya solo faltaría que añadieran un par de funcionalidades a db2 (la más
urgente, una clausula limit al estilo de mysql) para que me funcionara
al 100% con cakephp, y me harían inmensamente feliz.
Saludos.
Fernando Pérez
Cerámica Saloni. Dpto. Organización
Saludos, foreros.
Estoy intentando ejecutar un comando con qsh (concretamente una llamada
a un script de php) desde un programa rpg y querra saber si hay alguna
forma de forzar que no me muestre nada por pantalla, ni siquiera si se
produce algn error (he probado con redireccionar con '
Por si fuera el problema fuera que la defninicin del cursor ReadOnly
no es respetada, yo probara a poner al final del sql FOR READ ONLY, a
ver si as funciona
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
Nicolas Machado escribi:
Buenos
Dias,
Tenemos este problema y no
La llamada a programas es mucho ms sencilla si el php corre en el I5,
ya que entonces se pueden usar las funciones nativas I5... , pero si
tienes creado el procedimiento no debera ser mayor problema, siempre
que para acceder utilices las funciones del driver db2. Puedes dar un
ejemplo de como
O bien usas indicadores de control de valores nulos o (ms fcil) te
aseguras de que el sql no va a devolver nulos con ifnull(campo, '') o
ifnull(campo, 0), segn el tipo de datos
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
albe...@arcadie.es escribi:
Hola Foro. a ver si
Entonces ests accediendo desde un php corriendo en un pc?. Si es as
no vas a poder utilizar las funciones I5_*. Si quieres probar con esa
configuracin, tendrs que utilizar los accesos por ODBC (odbc_connect,
...). La lista de funciones I5_* estn compiladas en nativo, y solo se
pueden utilizar
Pues no es que tengamos gran cosa por el momento, pero la verdad es que
lo que tenemos funcionando va perfectamente, si bien es cierto que con
lo que tenemos en marcha no podemos hacernos una idea del rendimiento
que se puede obtener. Lo ms relevante, un script php que es llamado
por una CL,
"
Pero seguramente cuando tengas esa linda pantallita web te pediran que
desde un boton de la web emitas una factura o apruebes un documento ..."
Lo cual es facilsimo, incluso con acceso por ODBC: Creas un
procedimiento almacenado que ejecute el rpg que lista la factura, desde
php ejecutas el
Pues s, es exctamente lo que comentas. De hecho, en la web de Zend me
pareci ver algo as como un proyecto para hacer algo parecido a lo que
realizan HATS y webfacing (solo me pareci, lo vi de refiln).
No se si preguntas qu es el zend core o a qu me refiero con "ejecutar directamente el
Y si caduca el Zend Development
Environment se puede utilizar el PDT www.eclipse.org/pdt/,
que tiene casi la misma funcionalidad y es totalmente gratuito.
La extensin para db2, si no viene por defecto en XAMPP y similares, es
fcil de instalar, y seguramente estar ms optimizada que ODBC
Mejor que con ODBC prueba con la extensin para db2 (En http://www.php.net/ibm_db2
tienes informacin de cmo utilizarlo y cmo instalar la extensin, si
no la tienes ya). Para saber si lo tienes instalado, busca en phpinfo
algo parecido a lo siguiente:
ibm_db2
IBM
DB2, Cloudscape
Zend core es la parte que se instala en el 400: http://www.zend.com/en/products/platform/downloads
Zend Studio es la herramienta de desarrollo ( se instala en el pc): http://www.zend.com/en/products/studio/for-i5os
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
Maria
Se me olvidaba, la Macro la tienes que grabar en el archivo
PERSONAL.XLS, para que est disponible siempre.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
Alberto Serna escribi:
Buenos Dias A todos
Necesito ayuda, si ha alguien le ha ocurrido por favor, necesito con
Comprueba la lista de bibliotecas.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
Javier Mora escribi:
Estimados
colegas:
Hoy
me ha sucedido una cosa muy curiosa. He subido unos fuentes al iSeries
y los he puesto todos juntos en un archivo fuente de nombre
Saludos foreros.
Estoy haciendo un listado que tiene un cdigo de barras en CODE128.
Hasta ah va bien la cosa, defino un campo con BARCODE(CODE128) y
listos, pero parece ser que CODE128 tiene tres subtipos: A, B y C, y el
que yo necesito listar es el A, y aparentemente no es el que estoy
Te refieres a arrays de tamao variable?
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
Peaherrera, Mauro escribi:
Compaeros:
Necesito
utilizar vectores variables en un programa RPG, saben dnde puedo
conseguir informacin o si alguien me puede dar una
En RPG400 no conozco manera de conseguirlo. Te cuento como se hara en
RPG Ile:
Se consigue con options(*varsize) en la definicin del parmetro. Por
ejemplo:
D literales 80A dim(5000)
options(*varsize)
D numElementos 5 0 value
numElementos se carga en el programa que hace la llamada con el
set campo = left(campo, 6) || 'A' || substr(campo, 8)
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
INFORMATICA escribi:
Hola.
Alguien me podra indicar cmo debo
montar una sentencia sql UPDATE
para actualizar, por ejemplo, la
posicin 7 de un campo de 12
Hombre, vuelve la vieja historia de siempre!
Al RPG se lo estn cargando desde antes de que empezara yo con l, por
1995. Llevan ms de 14 aos matndolo y ah est. Ser que es mala
hierba?. Lo nico que veo que cambia es el arma, en 1995 era Visual
Basic (sic) y ahora es Java. Yo creo que an veremos
Te sobra el group by:
update filecabeceras set total=
(select ifnull(sum(cantidad), 0) from
filelineas where
filecabeceras.cliente = filelineas.cliente)
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
Josep Sanchez escribi:
Buenos dias,
A ver si
Llegados a este punto, parece necesario definirle DDS'S al fichero. No
es una tarea demasiado complicada. Solo hay tener en cuenta los ndices
que pueda tener y controlar si hay programas que crean el fichero con
el mtico BLDFILE, y cambiarlo por CRTPF.
Saludos.
Fernando Prez
Cermica
¡Pedazo de subidón! Cuanta flecha verde tirando para arriba.
A ver si esto anima a IBM a darle capacidad OO al estilo de PHP (si
quieres OO lo tomas y si no lo dejas) para hacerlo pefecto ;)
Saludos.
Fernando Pérez
Cerámica Saloni. Dpto. Organización
Àlex Corretgé escribió:
Ave
Aqu tienes el de una mquina en V5R4
Descripcin de edicin . . . . :
6
Mscara de entero . . . . . . : , , , ,
0
Carcter de coma decimal . . . :
.
Mscara de fraccin . . . . .
:
Carcter de relleno . . . . .
:
Smbolo de moneda . . . . . .
:
Editar valores cero . . . . . :
*NO
Caracteres
Por curiosidad, Con qu mandato lo has vuelto a definir?
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
mar...@ozu.es escribi:
Por error, he borrado el objeto QEDIT6 *EDTD. Alguien me puede enviar la
impresion del mandato DSPEDTD para poder restaurarlo de nuevo?
al invocar strisdb tienes la opcin 'Invocar programa '. Selecciona
*No, te saldr la lnea de mandatos y podrs llamar a la OCL que llame
al RPG.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
Luis . escribi:
Hola:
Hace un tiempo me pareci leer en la revista HELP400 que
%editc(numero: 'X');
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
Rafael Silva escribi:
Hola a todos, alguien podria ayuarme en la
siguiente, como hago o como haria para convertir un valor numerico a
caracter.. por ejemplo: si tengo el valor numerico =
No conozco una forma directa de hacerlo. Nosotros hemos probado con
xito dos opciones:
Crear desde el i5 un documento html, ponindole como extensin
'.XLS', para que la abra excel.
Crear tambin desde el i5 una hoja de clculo de excel con php.
Se crea en un formato antiguo (limitado a
Si solo quieres que en el journal se guarden los cambios y supresiones,
no necesitas hacer nada en los programas (ni siquiera STRCMTCTL).
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
Nicolas Machado escribi:
Buenos
Dias,
me consultaron algo y me surgio una duda.
Si no me equivoco, los registros que se guardan en el journal dependen
de cmo hayas configurado ste, no de como gestionan los programas las
actualizaciones. El control de compromiso afecta a las transacciones,
las cuales se basan en los datos guardados en el journal, pero que yo
sepa el
sencillo y eficiente como lo tiene RPG.
Saludos.
Fernando Pérez
Cerámica Saloni. Dpto. Organización
informa...@vidal.ad escribió:
¿¿¿ pero con un poco de imaginacion se puede utilizar de la misma
manera , el hecho de llamar a un programa de servicio o hacer una
instancia a una
Otra forma ms de hacerlo, sta con punteros. Asumiendo que los campos
estn consecutivos en el registro, y que el primero de ellos es CFV01D:
D @CFV01D S * inz(%addr(CFV01D))
D dat S like(CFV01D) dim(12)
based(@CFV01D)
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
Sera menos as
insert into tablaDestino
(
select char(sum) columna1 from tablaOrigen having sum(columna1) 0
union
select char(sum) columna2 from tablaOrigen having sum(columna2) 0
union
...
select char(sum) columna10 from tablaOrigen having sum(columna10) 0
)
Saludos.
Fernando Prez
ás explicación sobre el uso de cursores, coméntalo y
buscaré un ejemplo.
Saludos.
Fernando Pérez
Cerámica Saloni. Dpto. Organización
Jaime Villa Torres escribió:
Gracias por el tiempo
El problema se origina en lo
siguiente, el programa recibe CUATRO parametros
FROMFI
Buenos das, foreros.
Estoy haciendo un listado con preformato y posicionando los campos con
la palabra clave POSITION.
Iba todo bien hasta que he querido hacer un salto de pgina. En los
listados con posicionamiento por lnea con skipb o skipa poda forzar
el salto de pgina, pero en el prtf no
Muchas gracias, Alex. Problema resuelto.
Saludos.
Fernando Prez
Cermica Saloni. Dpto. Organizacin
alex martinez escribi:
Hola:
Lo que ocurre es que no puedes usar el mismo formato de registro el
SKIPx y POSITION.
para realizar un salto de pgina puedes crear un registro que
1 - 100 de 147 matches
Mail list logo