How to load Editor/400 using FTP
CRTSAVF FILE(QGPL/EDITOR400)
C:\>WINDOWS\FTP SYSTEM
Connected to SYSTEM.
220-QTCP at SYSTEM.
220 Connection will close if idle more than 5
minutes. User (SYSTEM:(none)): USERID
331 Enter password.
Password: PASSWORD
230 USERID logged on
ftp> binary
200 Representation type is binary IMAGE
ftp> put C:\EDITOR400 QGPL/EDITOR400
200 PORT subcommand request successful
150 Sending file to member EDITOR400 in file
EDITOR400 in library QGPL
250 File transfer completed successfully.
17090832 bytes sent in 38.73 seconds (438.11
Kbytes/sec)
FTP> quit
RSTLIB SAVLIB(EDITOR400) DEV(*SAVF) SAVF(QGPL/EDITOR400)
CALL PGM(*LIBL/W@ED00) PARM(&L &F &N &X &S)
CALL W@ED91
+----------------------------- Settings -------------------------------+
| |
| Number of users. . . . . .: 999 |
| |
| Licensed until . . . . . .: (DD/MM/YYYY) |
| |
| Product library. . . . . .: EDITOR400 |
| |
| Security Code. . . . . . .: |
| |
| |
+----------------------------------------------------------------------+