Xerox -05W - Manual (Page 215)

12-11
Creating A Script File
}
ELSE
{
MSGBOX "'KERMIT remote SEND' successful",1,reply
}
lab6:
FTU CANCEL
RETURN
***********************************
* Take Kermit out of 'server' mode *
***********************************
lab5:
LET success = 1
FTU INITIATE
FTU SET TRANSFER KERMIT
IF (errno)
{
LET success = 0
MSGBOX "Could not set 'TRANSFER' mode to 'KERMIT'",1,reply
GOTO lab7:
}
FTU SET REMOTE FINISH
IF (errno)
{
LET success = 0
MSGBOX "Failed to set 'REMOTE' parameter to 'FINISH'",1,reply
GOTO lab7:
}
FTU SET HOW REMOTE
IF (errno)
{
LET success = 0
MSGBOX "Failed to set 'HOW' parameter to 'REMOTE'",1,reply
GOTO lab7:
}
FTU START
IF (errno)
{
LET success = 0
LET message = "'KERMIT REMOTE FINISH' failed (errno = " + errno + ")"
MSGBOX message,1,reply
GOTO lab7:
}
lab7:
FTU CANCEL
RETURN