I use STRPCO and STRPCCMD quite a bit, typically to execute FTP or a .bat file on my PC. It works great, but if the transfer runs for maybe a minute, having the screen BLACKED out that long might make the user think something is hung. So I have tried using SNDSTSMSG to display an ...in progress message, or even a DSPF with something similar. Both get blacked out as soon as the STRPCCMD command is executed.
Has anyone else experienced this and if so what did you do to overcome the problem?
Thanks!
here is some of my code:
/* Start PC Organizer */
STRPCO
MONMSG MSGID(CPF0000 IWS4010)
/* Execute T:// drive script GETTXTFILE.TXT which gets FTP script from AS400 */
CHGVAR VAR(&PCCMD) VALUE('ftp -n -s:' *TCAT &PATH +
*TCAT '\' *TCAT &SYSNAME *TCAT +
'\gettxtfile.txt')
STRPCCMD PCCMD(&PCCMD) PAUSE(*NO)
DLYJOB DLY(1)
/* Execute T:// drive script GETFTPFILE.TXT which puts CSV file to AS400 */
CHGVAR VAR(&PCCMD) VALUE('ftp -n -s:' *TCAT &PATH +
*TCAT '\' *TCAT &SYSNAME *TCAT +
'\getftpfile.txt')
STRPCCMD PCCMD(&PCCMD) PAUSE(*NO)
DLYJOB DLY(1)
ENDDO
Has anyone else experienced this and if so what did you do to overcome the problem?
Thanks!
here is some of my code:
/* Start PC Organizer */
STRPCO
MONMSG MSGID(CPF0000 IWS4010)
/* Execute T:// drive script GETTXTFILE.TXT which gets FTP script from AS400 */
CHGVAR VAR(&PCCMD) VALUE('ftp -n -s:' *TCAT &PATH +
*TCAT '\' *TCAT &SYSNAME *TCAT +
'\gettxtfile.txt')
STRPCCMD PCCMD(&PCCMD) PAUSE(*NO)
DLYJOB DLY(1)
/* Execute T:// drive script GETFTPFILE.TXT which puts CSV file to AS400 */
CHGVAR VAR(&PCCMD) VALUE('ftp -n -s:' *TCAT &PATH +
*TCAT '\' *TCAT &SYSNAME *TCAT +
'\getftpfile.txt')
STRPCCMD PCCMD(&PCCMD) PAUSE(*NO)
DLYJOB DLY(1)
ENDDO
Comment