Instrucciones para bajar el Software y/o PTFs al AS/400

 

Si esta bajando el software entero de FÉNIX, tiene que tomar en cuenta lo siguiente:

 

1.      El perfil FÉNIX tiene que existir y debería ser de clase programador (USRCLS *PGMR);

 

2.      El fichero FenixSoft llevara la biblioteca completa del FÉNIX con el software entero que se tiene que restaurarse a la biblioteca de FÉNIX utilizando el comando RSTLIB (Restaurar Biblioteca). La biblioteca FÉNIX no debe ser una biblioteca existente. El comando RSTLIB creará la biblioteca.

 

3.      Siga las instrucciones del manual de usuario correspondiente a la instalación de FÉNIX.

 

 

El software y los PTFs llegaran en un fichero de tipo ZIP. Es decir de extensión ZIP (Ej. PTF01001.ZIP). Siga los siguientes pasos para bajar el software al AS/400:

 

1. Baje el fichero de ZIP a la una carpeta en el PC. Al abrir el fichero de ZIP se encuentra un fichero del mismo nombre de tipo binario (Ej. PTF01001.bin);

 

2. Extraer el fichero binario del fichero ZIP y déjelo en la carpeta de windows;

 

3. Cree un fichero de salvar (SAVF) en el AS/400 en la biblioteca QGPL utilizando el comando CRTSAVF de AS/400 como se indica en la siguiente pantalla.

 

                             Línea Comandos                         JAXWARD 

                                                           

 Teclee comando, pulse Intro.

                                                

 =è CRTSAVF FILE(QGPL/PTF01001)                             _____________

___________________________________________________________________________

 

Creación del fichero de salvar en la biblioteca QGPL del AS/400

 

 

4. Abra una sesión de DOS en el PC. Se muestra la siguiente pantalla.

 

 

 

Microsoft(R) Windows 98

   (C)Copyright Microsoft Corp 1981-1998.

 

C:\WINDOWS>

 

 

 

5. Utilizando ftp abra una conexión TCP/IP con el AS/400 en la siguiente manera: ftp SSSSSSSS, donde SSSSSSSS es el nombre del sistema de AS/400 donde se va a conectar o ftp 128.0.2.1. , si conoce la dirección IP del AS/400.

 

 

 

Microsoft(R) Windows 98

   (C)Copyright Microsoft Corp 1981-1998.

 

C:\WINDOWS> ftp jaxward

 

Conexión TCP/IP con el nombre del AS/400

 

 

 

 

Microsoft(R) Windows 98

   (C)Copyright Microsoft Corp 1981-1998.

 

C:\WINDOWS> ftp 128.0.2.1

 

Conexión TCP/IP con la dirección IP de AS/400

 

 

  1. Con Intro, se muestra una de las dos pantallas.

 

 

 

Microsoft(R) Windows 98

   (C)Copyright Microsoft Corp 1981-1998.

 

C:\WINDOWS>ftp jaxward

Connected to JAXWARD.

220-QTCP at JAXWARD.

220 Connection will close if idle more than 5 minutes.

User (JAXWARD:(none)):

 

Conexión con nombre del sistema AS/400

 

 

 

Microsoft(R) Windows 98

   (C)Copyright Microsoft Corp 1981-1998.

 

C:\WINDOWS>ftp 128.0.0.1

Connected to 128.0.0.1.

220-QTCP at JAXWARD.

220 Connection will close if idle more than 5 minutes.

User (128.0.0.1:(none)):

 

Conexión con dirección IP

 

 

  1. Intro el nombre del usario, pulse Intro y Intro la contraseña para abrir una sesión en el AS/400. Se muestra la pantalla siguiente.

 

 

Microsoft(R) Windows 98

   (C)Copyright Microsoft Corp 1981-1998.

 

C:\WINDOWS>ftp jaxward

Connected to JAXWARD.

220-QTCP at JAXWARD.

220 Connection will close if idle more than 5 minutes.

User (JAXWARD:(none)): mike

331 Enter password.

Password:

230 MIKE logged on.

ftp>

Conexión con el AS/400 establecida

 

 

  1. Intro el comando (bin o) como sigue para que la transferencia sea de formato binario.

 

 

Microsoft(R) Windows 98

   (C)Copyright Microsoft Corp 1981-1998.

 

C:\WINDOWS>ftp jaxward

Connected to JAXWARD.

220-QTCP at JAXWARD.

220 Connection will close if idle more than 5 minutes.

User (JAXWARD:(none)): mike

331 Enter password.

Password:

230 MIKE logged on.

ftp> bin 0

200 Representation type is binary IMAGE.

ftp>

Cambio del formato de transferencia a binario

 

9. Cambie la biblioteca actual en el AS/400 a QGPL con el comando 'cd' de DOS como sigue (cd QGPL, Intro).

 

Microsoft(R) Windows 98

   (C)Copyright Microsoft Corp 1981-1998.

 

C:\WINDOWS>ftp jaxward

Connected to JAXWARD.

220-QTCP at JAXWARD.

220 Connection will close if idle more than 5 minutes.

User (JAXWARD:(none)): mike

331 Enter password.

Password:

230 MIKE logged on.

ftp> bin 0

200 Representation type is binary IMAGE.

ftp> cd qgpl

250 "QGPL" is current library.

ftp>

Cambio de la biblioteca actual de AS/400 a QGPL

 

 

10. Utilizando el comando 'put' copie el fichero binario de PTF del directorio de windows a la biblioteca QGPL del AS/400 al fichero de salvar que se creó en el punto 3 arriba así (put ptf01001.bin ptf01001).

 

Microsoft(R) Windows 98

   (C)Copyright Microsoft Corp 1981-1998.

 

C:\WINDOWS>ftp jaxward

Connected to JAXWARD.

220-QTCP at JAXWARD.

220 Connection will close if idle more than 5 minutes.

User (JAXWARD:(none)): mike

331 Enter password.

Password:

230 MIKE logged on.

ftp> bin 0

200 Representation type is binary IMAGE.

ftp> cd qgpl

250 "QGPL" is current library.

ftp> put ptf01001.bin ptf01001

200 PORT subcommand request successful.

150 Sending file to member PTF01001 in file PTF01001 in library QGPL.

250 File transfer completed successfully.

ftp: 536448 bytes sent in 1.04Seconds 515.82Kbytes/sec.

ftp>

Transferencia del fichero PTF (binario) al AS/400

 

Aparecerán mensajes de terminación de la transferencia como se muestra en la pantalla arriba.

 

11. Finalmente, cerré la sección ftp con el comando, quit.

 

Microsoft(R) Windows 98

   (C)Copyright Microsoft Corp 1981-1998.

 

C:\WINDOWS>ftp jaxward

Connected to JAXWARD.

220-QTCP at JAXWARD.

220 Connection will close if idle more than 5 minutes.

User (JAXWARD:(none)): mike

331 Enter password.

Password:

230 MIKE logged on.

ftp> bin 0

200 Representation type is binary IMAGE.

ftp> cd qgpl

250 "QGPL" is current library.

ftp> put ptf01001.bin ptf01001

200 PORT subcommand request successful.

150 Sending file to member PTF01001 in file PTF01001 in library QGPL.

250 File transfer completed successfully.

ftp: 536448 bytes sent in 1.04Seconds 515.82Kbytes/sec.

ftp> quit

 

C:\WINDOWS>

Terminación de sección ftp

 

12. Una vez completada la transferencia, se puede comprobar el fichero de salvar el la biblioteca QGPL en el AS/400 con el comando DSPSAVF (Visualizar fichero de Salvar) del AS/400 como sigue.

 

                             Línea Comandos                         JAXWARD 

                                                          

 Teclee comando, pulse Intro.

                                                

 ===> DSPSAVF FILE(QGPL/PTF01001)                             _____________

___________________________________________________________________________

 

Visualización de fichero de salvar en la biblioteca QGPL del AS/400

 

 

                       Display Saved Objects - Save File                      

                                                                             

Library saved  . . . :   FENIX                 Release level  . . . :   V4R1M0

ASP  . . . . . . . . :   1                     Data compressed  . . :   No   

Save file  . . . . . :   PTF01001              Objects displayed  . :   4    

  Library  . . . . . :     QGPL                Objects saved  . . . :   4    

Records  . . . . . . :   488                   Access paths . . . . :   0    

Save command . . . . :   SAVOBJ                                              

Save active  . . . . :   *NO                                                 

Save date/time . . . :   12/03/02   12:54:28                                 

                                                                              

Type options, press Enter.                                                   

  5=Display saved data base file members                                     

                                                                              

Opt  Object             Type     Attribute     Owner             Size   Data 

     SCL025CL           *PGM     CLP           FENIX            86016   YES  

     SCL116             *PGM     RPG           FENIX            81920   YES   

 _   SCLBKP             *FILE    PF            FENIX            16384   YES  

 _   SCL020             *FILE    PF            FENIX            49152   YES  

                                                                             

                                                                              

                                                                             

F3=Exit        F12=Cancel                                                     

Visualización de fichero de salvar en la biblioteca QGPL del AS/400

 

Se muestra el contenido del fichero que tiene que restaurarse en la biblioteca de FÉNIX siguiendo las instrucciones correspondientes a cada PTF o según el manual del usuario si esta restaurando la biblioteca entera de FÉNIX para la primera vez.