Aqui mando un utilitario muy antiguo (TAATOOL) que puede ser muy util, al
cual hicimos algunas adaptaciones.....
Suerte.
Ignacio Tellez A.
==========================================


(See attached file: rtvdat.cmd)(See attached file: isxcmd07.pgm)


para compilar el comando:

 Programa para procesar mandato . . . . :   ISXCMD07
   Biblioteca . . . . . . . . . . . . . :     *LIBL
   Estado utilizado para llamar programa:     *USER
 Archivo fuente . . . . . . . . . . . . :   QCMDSRC
   Biblioteca . . . . . . . . . . . . . :     LECOISF
 Miembro archivo fuente . . . . . . . . :   RTVDAT
 Programa comprobaci�n validez  . . . . :   *NONE
 Modalidad(es) en que es v�lido . . . . :   *PROD
                                            *DEBUG
                                            *SERVICE
 D�nde se permite ejecutar  . . . . . . :   *BPGM      *IPGM
 Permitir usuario limitado  . . . . . . :   *NO
 M�ximo par�metros posicionales . . . . :   *NOMAX
 Archivo mensajes para texto solicitud  :   *NONE
Archivo mensajes . . . . . . . . . . . :   QCPFMSG
  Biblioteca . . . . . . . . . . . . . :     *LIBL
Biblioteca actual  . . . . . . . . . . :   *NOCHG
Biblioteca producto  . . . . . . . . . :   *NOCHG
Estanter�a . . . . . . . . . . . . . . :   *NONE
Grupo de paneles de ayuda  . . . . . . :   *NONE
Identificador de ayuda . . . . . . . . :   *NONE
�ndice de b�squeda de ayuda  . . . . . :   *NONE
Programa alteraci�n temporal de
  solicitud  . . . . . . . . . . . . . :   *NONE
Habilitado para interfaz gr�fica de
  usuario  . . . . . . . . . . . . . . :   *NO
Protegido contra hebras  . . . . . . . :   *NO
Acci�n de trabajo multihebra . . . . . :   *SYSVAL
ID de juego de caracteres  . . . . . . :   284
 Texto  . . . . . . . . . . . . . . . . :   Rescata fecha en varios
formatos - RTVDAT (Y2K)


Attachment: =?iso-8859-1?Q?rtvdat.cmd?=
Description: Binary data

Attachment: =?iso-8859-1?Q?isxcmd07.pgm?=
Description: Binary data

Responder a