Вот в эту тему сегодня приземлюсь со своим интересом.
Может быть кому-то послужит в качестве образца. Но буду рада услышать замечания. Может быть можно как-то усовершенствовать. Например, вставлять дату не из буфера через копирование, а сразу, в требуемых замены, полях. Я почему то только сейчас об этом подумала... Должно же получиться?
#name "Новая дата в шаблоны"
// определить старт.корды
GETSCREEN
COLORMODE(6)
IF_PICTURE_IN (0,0, 300,300, "Банк6.bmp", -1, 100)
$start_x=$_return1 // 33
$start_y=$_return2 // 8
WAITMS(100)
ELSE
WAITMS(100)
HALT
END_IF
// вывод текущей даты в лог
LOGSHOW (1, 200,300)
WAIT(1)
LOGCLEAR
WAITMS(50)
// прописать текущую дату в лог
$dd = $_date_d
$dm = $_date_m
$dy = $_date_y
LOGWRITE($dd,".",$dm,".",$dy)
WAITMS(500)
LCLICK($start_x+239,$start_y+353) // м/д временем и датой 272/361
// выделить дату в логе
WAITMS(500)
KEYDOWN(#SHIFT)
WAITMS(20)
KEYPRESS(#END)
WAITMS(20)
KEYUP(#SHIFT)
WAIT(1)
// скопировать в буфер обмена
KEYDOWN(#CTRL)
WAITMS(20)
KEYPRESS(#C)
WAITMS(20)
KEYUP(#CTRL)
WAITMS(20)
// закрыть лог
LCLICK($start_x+487,$start_y+305)
WAITMS(20)
// выбор иконки - создать документ по шаблону
WAIT(1)
LCLICK($start_x+383,$start_y+140) // 416/148
WAIT(5)
SUB(Data)
LCLICK($start_x+367,$start_y+152) // открыть документ // 400/160
WAIT(3)
LCLICK($start_x+767,$start_y+397) // переход на вкладку Расчетные документы 800/405
WAIT(2)
// выделить старую дату в программе
LCLICK($start_x+807,$start_y+492) // окончание строки с датой
WAITMS(100)
KEYDOWN(#SHIFT)
WAITMS(20)
KEYPRESS(#HOME)
WAITMS(20)
KEYUP(#SHIFT)
WAITMS(20)
// вставить из буфера
KEYDOWN(#CTRL)
WAITMS(20)
KEYPRESS(#V)
WAITMS(20)
KEYUP(#CTRL)
WAIT(2)
// сохранить изменение в шаблоне
LCLICK($start_x+392,$start_y+122) // 425/130
WAIT(5)
END_SUB
// открыть первый шаблон
LCLICK($start_x+487,$start_y+372) // выделить 1-ую строку в таблице шаблонов 520/380
WAIT(3)
Data()
// открыть второй шаблон
LCLICK($start_x+487,$start_y+396) // выделить 2-ую строку в таблице шаблонов 520/405
WAIT(3)
Data()
// открыть третий шаблон
LCLICK($start_x+487,$start_y+422) // выделить 3-ую строку в таблице шаблонов 520/430
WAIT(3)
Data()
// открыть четвертый шаблон
LCLICK($start_x+487,$start_y+447) // выделить 4-ую строку в таблице шаблонов 520/455
WAIT(3)
Data()
// открыть пятый шаблон
LCLICK($start_x+487,$start_y+472) // выделить 5-ую строку в таблице шаблонов 520/480
WAIT(3)
Data()
// открыть шестой шаблон
LCLICK($start_x+487,$start_y+497) // выделить 6-ую строку в таблице шаблонов 520/505
WAIT(3)
Data()
// открыть седьмой шаблон
LCLICK($start_x+487,$start_y+522) // выделить 7-ую строку в таблице шаблонов 520/530
WAIT(3)
Data()
HALT