A ver.No me sale.No lo debo de hacer bien:
Tengo un programa que lee todo el journal como Input Primary, y dependiendo del archivo registrado,manda el registro como parámetro a un programa u otro. En este caso el programa es este:
FLogealbcc O a E k Disk
DRegealbcc e DS Extname(Logealbcc)
DXCSITU 1 13
DXCTIPO 1
DXCEMPR 3p 0
DXCNALB 6s 0
DXCCLIA 5p 0
DXCRUTA 2s 0
DXCDEXP 8p 0
DXCTBAS 11p 2
DXCTALB 11p 2
c *entry plist
c parm @entrada 2
c parm @nrr 10 0
c parm @regealbcc 272
C Move @regealbcc Regealbcc
Los datos que me llegan en el @regealbcc corresponden al campo JOEDS del fichero generado por el journal.
*
| alex martinez <[EMAIL PROTECTED]>
Enviado por: [EMAIL PROTECTED] 26/10/05 11:09
|
|
No es complicado
en un ILE-RPG creas una DS con el formato de registro y mueves el
campo JOESD a la DS
d registro e ds extname ( fichero )
c move joeds registro
El 26/10/05, [EMAIL PROTECTED]<[EMAIL PROTECTED]> escribió:
>
> Hola
> Una pregunta para los que entendeis de Journals,que yo la verdad,no tengo
> mucha idea:
> En el refistro hay un campo variable que se llama JOESD y que contiene los
> datos de todo el registro del fichero 'journalizado' en cuestión. Cuando en
> este fichero tengo campos empaquetados se me descogorcian los datos del
> campo del journal y no los puedo recuperar. Cómo lo haceis vosotros?
--
Mi blog sobre as400
http://www.ajut400.com
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400
