ECR = CreateObject("AddIn.DrvFR")
&& если подключен не один фискальник, то надо указать на какой будем выводить чек
ECR.LDNumber =  1 
ECR.SetActiveLD
ECR.Password = "30"  && по умолчанию пароль вроде бы  30 
ECR.OpenCheck()      && открытие чека
IF ECR.ResultCode <>  0 
    =MESSAGEBOX(ECR.ResultCodeDescription, 48 ,"Ошибка "+ALLTRIM(STR(ECR.ResultCode)))
ELSE
    && здесь идёт заполнение чека
    SCAN
        ECR.StringForPrinting = Наименование
        ECR.Quantity = Количество
	ECR.Price = Цена
        ECR.Department = НомерОтдела   && см описание драйвера
        ECR.Sale()  && регистрация продажи
        IF ECR.ResultCode <>  0 
            =MESSAGEBOX(ECR.ResultCodeDescription, 48 ,"Ошибка "+ALLTRIM(STR(ECR.ResultCode)))
        ENDIF
    ENDSCAN
    && закрытие чека
    ECR.Summ1 = ИтоговаяСумма
    ECR.Summ2 =  0 
    ECR.Password = "30"
    ECR.StringForPrinting = "================================"
    ECR.CloseCheck()
    IF ECR.ResultCode <>  0 
        =MESSAGEBOX(ECR.ResultCodeDescription, 48 ,"Ошибка "+ALLTRIM(STR(ECR.ResultCode)))
        && здесь, если чек не фискализирован, то его лучше сразу аннулировать
        IF MESSAGEBOX("В конце чека серая строка с буквами 'ФП' есть?", 308 ,"Выбор")= 6 
		&& чек фискализирован
	ELSE
		ECR.CancelCheck()
	ENDIF 
    ENDIF
ENDIF