Job-System

; Copy files from remote host to PC
; with parameter input

/Parameter: %Host-File%, %PC-File%=c:\data\bi.txt
/Parameter: Translate characters to=%Font%=LIST[DOS,Windows,none]

/Set %Transfertype%=CONV(%Font%,DOS:ascii,Windows:ansi,none:binary)

:Copy FTP data

FTPLogin HOST 172.16.10.30 %Host-UserID% %Host-Password%
%Transfertype%
copy HOST:%Host-File% %PC-File%
del %Host-File%
FTPLogout

msg Data transfer from %Host-File% is completed.



-------------------------------------------------------------------------------------------------------------
; Call a program and check the externally created log file
; on error of the job inform a responsible person

/Set Notification=EMAIL(OnError:Markart,_Juergen)

; Program call
k:\progs\fileconv.exe &&templogfile k:\data\input.dat c:\data\output.dat

; Add external log file to internal log file and check it
addtolog &&templogfile /ErrorIfNotExists: 'normal terminated'


-------------------------------------------------------------------------------------------------------------
; Test the VBScript installation
; and send a confirmation mail

:Test Script function

Inline VBScript
MsgBox "%SYSCOMPNAME%"
EndInline


:Test EMail function

WriteTo MailUser
[User]
From=JMarkart@online.de
To=JMarkart@online.de
[Note]
Subject=Job-System Test
test successfull

EndWriteTo