Juan Ramón Garcia wrote:
001201c1d180$52597ce0$1601a8c0@Dirac">Hola Miguel Angel:
Tienes que grabar y compilar un programa con el siguiente código:
H*
H* NOTA: Este programa ofrece las mismas funciones que
H* la rutina ASSEMBLER "SUBRED" de S/36 y ha sido
H* confeccionado a partir de apuntes de migración
H* de S/36 a AS/400 proporcionados por I.B.M.
H*
H* Juanra 1.991
C*
C *ENTRY PLIST
C PARM OPTION 1
C PARM STATUS 1
C PARM ERROR 5
C PARM RECORD256
C PARM ATR 34
C RETRN
El nombre que le dés al programa es indiferente, si le llamas SUBRED no
tendrás que cambiar nada más pero si le po nes otro nombre deberás cambiarlo
en todos los programas que utilicen esta función poniendolo en el nombre del
dispositivo SPECIAL.
Si necesitas algo más no tienes más que pedirlo, hace muchos años que ya no
trabajo en entorno S/36 (cómo hecho de menos el IF ACTIVE) pero fuí el
encargado de migrar un montón de estos equipos a AS/400 y todavía guardo
apuntes de aquella época y un maravilloso "libro rojo" sobre el tema.
Un saludo.
Juanra
----- Original Message -----
From: SEGUI MUNAR <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Thursday, March 21, 2002 3:39 PM
Subject: Migración S/36Buenas tardes a todos.
Esta es una pregunta para los que hayais migrado alguna vez un S36 a unAS.Sé que en la migración había unos problemas con unas rutinas enensambladorque había distribuido IBM a los usuarios del S36. Una creo que era para el
tratamiento de "subficheros" (la rutina creo que se llamaba SUBRED).
Si alguien tiene información al respecto, le agradecería que me laenviara.Yo tenía esta información y la solución a los problemas, pero pensé que
nunca más tendría que migrar un S36 (la última migración la realicé hace
unos 8 años)
Muchas gracias por anticipado.
Miquel Àngel.
_____________________________________________________
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, envía el mensaje resultante de pulsar
mailto:[EMAIL PROTECTED]?body=LEAVE
