Я бы попробовал после OpenCheck сделать что-то подобное:
Код:
if SELF.NameCust<>'' !наименование покупателя
SELF.Contr{'password'} = SELF.Pswd
SELF.Contr{'TagType'} = 7
SELF.Contr{'TagNumber'} = 1227
SELF.Contr{'TagValueStr'}=SELF.NameCust
SELF.Contr{'FNSendTag()'}
end
if SELF.INNCust<>'' !инн покупателя
SELF.Contr{'password'} = SELF.Pswd
SELF.Contr{'TagType'} = 7
SELF.Contr{'TagNumber'} = 1228
SELF.Contr{'TagValueStr'}=SELF.INNCust
SELF.Contr{'FNSendTag()'}
end
Сам не пробовал, жарко пока...
Представители Штриха в открытом доступе сообщили, что FNSendTag поддерживает отправку этих тэгов. Когда народ завалил их техподдержку письмами с предложением дать разъяснения на этот счет... Прошивку и драйвер надо свежие поставить.
ПыСы. Документация у Штриха и Атола - это глоссарий того, что они вроде как могут. Без примеров и практически без комментариев. С разными ошибками и нестыковками. Разобраться по ней, что и как работает, не реально. Раньше помогали примеры, которые шли в комплекте с драйверами. У Атола был довольно подробный файлик с примерами на vbscript. Сейчас эти примеры не обновляются. Причем даже официальная техподдержка порой пишет, ой мы не знаем, пойдем попробуем у себя так сделать...
Приходится гуглить форумы, читать между строк и методом проб. Когда совсем тупик, напрягать клиентов, чтобы они долбили техподдержку производителей ккм.
Это, конечно, не системный подход. Затраты для того, чтобы понять, как написать три-четыре строчки кода, просто неадекватные. Может, со временем, все устаканится. Когда, например, появится кто-то в здравом уме и скажет, Владимир Владимирович, какого х-я бардак развели, давайте просто запретим юриками наличные платежи...