ME COMPILA  CUANDO CORRE ME DA ERROR DE PUNTO EN Ent1.Vimcaj= '118T001'

______________________________________________
dTransaccion      Pr                  ExtPgm('T475022PD')
d                                 *
d                                 *

D  Ent1           Ds                  Qualified
d                                     Based(Pun_Ent_Salb)
d  Vimcaj                        7A
d  VimCfl                        2A
d  VimCla                        5A
DPun_Ent_Salb     S               *


   Ent1.Vimcaj= '118T001';
   Ent1.VimCfl= 'ZP';
   Ent1.VimCla= '00000';

   Transaccion(Pun_Ent_Salb);

Gracias


De: [email protected] 
[mailto:[email protected]] En nombre de Javier Mora
Enviado el: jueves, 03 de julio de 2014 12:39 p.m.
Para: forum.help400
Asunto: RE: error de puntero

Falta que nos enseñes el prototipo de 'Transaccion()'

Javier Mora

________________________________
De: [email protected] 
[mailto:[email protected]] En nombre de Oqueller Petrocini
Enviado el: jueves, 03 de julio de 2014 16:33
Para: forum.help400
Asunto: error de puntero
Bueno días

Estoy tratando de pasar puntero por un parámetro y me da un error de puntero
D  Ent1           Ds                  Qualified
d                                     Based(Pun_Ent_Salb)
d  Vimcaj                        7A
d  VimCfl                        2A
d  VimCla                        5A
DPun_Ent_Salb     S               *
Ent1.Vimcaj= '118T001';
Ent1.VimCfl= 'ZP';
Ent1.VimCla= '00000';
Transaccion(Pun_Ent_Salb);
Gracias
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a