REM LabelTrace Macro for HostAccess 7.20m

REM QuickTrace Ltd 2006

dim esc$, datafile$, labeltrace$, script$, result$, dir$ as string

REM CONFIGURE THESE VALUES BELOW FOR THE CURRENT SETUP

REM SPECIFY A TEMPORARY FILE THAT HOSTACCESS CAN WRITE TO

datafile$= "c:\tmp\labeltrace.tmp"

REM SPECIFY WHERE LABELTRACE.EXE IS

labeltrace$ = "c:\labeltrace\labeltrace.exe"

REM SPECIFY THE LABELTRACE SCRIPT TO USE

script$ = "clinicom"

REM END OF CONFIGURATION DO NOT ALTER ANYTHING BELOW THIS LINE

REM -----------------------------------------------------------

rem useful variable
esc$ = chr$(27)

rem delete datafile
print esc$;"_E";datafile$;esc$;"\";

rem change the current print device to datafile$
print esc$;"_L";datafile$;esc$;"\";

rem printscreen
print esc$;"[=0i";

rem run labeltrace, documentation is wrong, use 0 as startup type
print esc$;"_0e";labeltrace$;" -script ";script$;" -nodelete -file ";datafile$;esc$;"\";

rem must read the result or it will be echoed back
input result$