using $XFERSTATUS in a while statement

[paasmith]

I'm helping someone debug some aspect code. I have a question about the fact that $XFERSTATUS gets reset to 0 after it is accessed. There is a while loop in the code like:
sendfile ZMODEM <filename>
while $XFERSTATUS
iTemp = $XFERSTATUS
yield
endwhile
It seems like iTemp is being set to zero even when the transmission is successful. Is the while resetting $XFERSTATUS to zero?????
Trish Smith

 

[RogerMialkowski]

Here's what we've been using in production for a long time:

INTEGER XferFlag = 0
Sendfile Zmodem $FILESPEC
while $XFERSTATUS
yield
XferFlag = $XFERSTATUS
endwhile
termmsg &quot;`r`nTransfer Status = %d&quot; XferFlag

Now, there is a funky catch. Are you uploading or downloading? If you uploading, THEN download, you'll need to add this segment BEFORE the command to download from the host is issued:

while $XFERSTATUS
yield
endwhile
transmit &quot;Download^M&quot;
getfile ZMODEM
while $XFERSTATUS
yield
SentFlag = $XFERSTATUS
endwhile
termmsg &quot;`r`nTransfer Status = %d`r`n&quot; SentFlag

I have only used this on a Windows 2000 platform so if you using anything else, it may not work. Also, maybe try rebooting...lemme know what happens...

Roger