ruslan-hut

import android.app.AlertDialog;
import android.content.ContentValues;
import android.content.Context;
import android.content.DialogInterface;
import android.content.Intent;
import android.content.SharedPreferences;
import android.database.Cursor;
import android.os.Bundle;
import android.os.PersistableBundle;
import android.preference.PreferenceManager;

ruslan-hut

package ua.com.programmer.webapp;

import org.jawin.COMException;
import org.jawin.DispatchPtr;
import org.jawin.win32.Ole32;
import org.json.simple.JSONArray;
import org.json.simple.JSONObject;

public class Connector {

ruslan-hut

Перем Пусто, ИтОстатки, ИтСальдо, ДатаОстатков;
Перем ФильтрПоТоварам, ФильтрПоКлиентам, спТовары, спКлиенты;
Перем ЕстьОстаткиТоваров,ЕстьОстаткиВР, КоличествоСтрокОстатков;  
Перем НомерПоПорядку, ДанныеТоваров, ДанныеЦен, ДатаДокументаВР;
Перем НомерТовараПоПорядку;

Перем ПреобразовательОЛЕ;
Перем мФайлЖурнала,мИмяЖурнала,мЦикловВыгрузки; 

Перем мИмяФайлаОстатковТоваров;

ruslan-hut

@Nullable
private SoapObject getData(String objectCode) {
    errorText = "";
    SoapObject request = new SoapObject(NAMESPACE, "get");

    PropertyInfo param = new PropertyInfo();
    param.setName("objectCode");
    param.setValue(objectCode);

    request.addProperty(param);

ruslan-hut

private class SyncHttp {
 
        private RequestQueue requestQueue;
 
        SyncHttp(Context context){
            requestQueue = Volley.newRequestQueue(context);
        }
 
        HashMap<String, String> authHeaders(){
            HashMap<String, String> headers = new HashMap<>();

ruslan-hut

		Если НеобходимыеДанные.ИсчисленныйНДФЛ Тогда
			ИсчисленныйНДФЛТекст = 
			"ВЫБРАТЬ
			|	ВзаиморасчетыПоНДФЛ.Сотрудник КАК Сотрудник,
			|	СУММА(ВзаиморасчетыПоНДФЛ.Налог) КАК НДФЛ
			|ПОМЕСТИТЬ ВТИсчисленныйНДФЛ
			|ИЗ
			|	РегистрНакопления.ВзаиморасчетыПоНДФЛ КАК ВзаиморасчетыПоНДФЛ
			|ГДЕ
			|	ВзаиморасчетыПоНДФЛ.Организация = &парамОрганизация

ruslan-hut

Функция СтрокаЧисло(Ч)

	Возврат Формат(Ч,"ЧДЦ=6; ЧРД=.; ЧН=0.0; ЧГ=0");

КонецФункции // СтрокаЧисло()

&НаСервере
Процедура ПостроитьКарту()
	
	Запрос = Новый Запрос;

ruslan-hut

Функция ПодготовитьДанныеОТоварах(МобильныйКлиент,НомерЭлемента) Экспорт
	
	Дата = КонецДня(ТекущаяДата());
	
	зТовары = Новый Запрос;
	зТовары.Текст =
	"ВЫБРАТЬ ПЕРВЫЕ 1000
	|	Агент_Товары.Номенклатура КАК Товар,
	|	Агент_Товары.ПорядковыйНомер КАК ПорядковыйНомер
	|ИЗ

ruslan-hut

      ProgID = ДанныеДрайвера.ИдентификаторОбъекта;
			Если ПустаяСтрока(ProgID) Тогда
				ОбъектДрайвера = ""; // Драйвер не требуется
			ИначеЕсли ProgID = "ArtSoft.FiscalPrinter" Тогда
				ТестДрайвера = Новый COMОбъект("ArtSoft.FiscalPrinter");
				ОбъектДрайвера = "COM_ArtSoft_FiscalPrinter"; // COM-соединение
				
	//begin ----------- programmer.com.ua ------------------[30.09.2020]
			ИначеЕсли ProgID = "COM_ecrmini_t400" Тогда
				ТестДрайвера = Новый COMОбъект("ecrmini.t400");

ruslan-hut

		// Фискальные регистраторы
		Если ОбработчикДрайвера = ПредопределенноеЗначение("Перечисление.ОбработчикиДрайверовПодключаемогоОборудования.Обработчик1СФискальныйРегистраторЭмулятор") Тогда
			Возврат ПодключаемоеОборудованиеУниверсальныйДрайверКлиент;
		ИначеЕсли ОбработчикДрайвера = ПредопределенноеЗначение("Перечисление.ОбработчикиДрайверовПодключаемогоОборудования.ОбработчикАртСофтФискальныйРегистратор") Тогда
			Возврат ПодключаемоеОборудованиеАртСофтФискальныйРегистратор;
			
		//begin ----------- programmer.com.ua ------------------[30.09.2020]
		ИначеЕсли  ОбработчикДрайвера = ПредопределенноеЗначение("Перечисление.ОбработчикиДрайверовПодключаемогоОборудования.ОбработчикUnisystemФискальныеРегистраторы") Тогда
			Возврат UnisystemФискальныйРегистратор;
		//end ------------- programmer.com.ua ------------------[30.09.2020]