La pregunta era, si, en all free, es la forma más correcta, definir como binario la posición 370 del INFDS , ya que por lo que veo, en all free le tienes que decir implícitamente la longitud Y añado: en el único ejemplo que he encontrado de IBM, sale definida como char de 2 posiciones. Nada que ver con un binario de 4: [cid:[email protected]] Saludos
De: Forum.help400 <[email protected]> En nombre de Sergio Luis Puentes-Valladares Enviado el: miércoles, 21 de julio de 2021 18:33 Para: forum.help400 <[email protected]> Asunto: ** Newsletter ** Re: Campos binarios en All Free Buenas El binario es una forma de empaquetado(compresión) en 2 y 4 posiciones Saludos Sergio Luis Puentes Valladares Desarrollador SR IBM i RPG/COBOL El mié, 21 jul 2021 a las 13:02, Alberto Martinez (<[email protected]<mailto:[email protected]>>) escribió: Buenas. Supongo que también os habéis encontrado con el problema al pasar campos binarios de ‘tradicional’ a All Free Yo no trabajo con binarios excepto en las definiciones del INFS de pantalla para localizar la posición del cursor, definido tal que así: D CURSOR DS D CSRLOC 370 371B 0 Pero si lo defino en All Free lo tengo que definir así: Dcl-ds cursor; Csrloc bindec(4) pos(370); Ésta longitud de 4 la he puesto a ‘ojo’ como lo más exacto que creo que es, pero no sé si es lo más correcto. La pregunta es: lo estoy haciendo bien? O hay otra manera más correcta. La verdad, no he encontrado mucha información al respecto. Gracias. ____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
____________________________________________________ �nete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 � Publicaciones Help400, S.L.
