заполнение субконто (REST)

1. Shelest 13.05.20 09:15 Сейчас в теме
Добрый день!
В Бух 3.0 есть РС "ПорядокОтраженияЗарплатыВБухУчете". С помощью REST пытаюсь его заполнить.

...
АдресРесурса= "MDM/odata/standard.odata/InformationRegister_ПорядокОтраженияЗарплатыВБухУчете(" + ТекстЗапроса+ ")?$format=json";
Ответ = ВызватьHTTPМетодНаСервере("DELETE",Неопределено ,ПараметрыСоединения, АдресРесурса,Неопределено);

ДанныеДляЗаписи = Новый Структура();
ДанныеДляЗаписи.Вставить("СпособОтраженияЗарплатыВБухУчете_Key",СпособОтраженияЗарплатыВБухУчете_Key); 
ДанныеДляЗаписи.Вставить("ЕНВД","false");
ДанныеДляЗаписи.Вставить("Счет_Key",Ref_Key("ChartOfAccounts","Хозрасчетный","20.01",ПараметрыСоединения));
ДанныеДляЗаписи.Вставить("Субконто1_Type",Ref_Key("ChartOfCharacteristicTypes","ВидыСубконтоХозрасчетные","Номенклатурные группы",ПараметрыСоединения)); 
ДанныеДляЗаписи.Вставить("Субконто1_Key",Ref_Key("Catalog","НоменклатурныеГруппы",Description,ПараметрыСоединения));
АдресРесурса= "MDM/odata/standard.odata/InformationRegister_ПорядокОтраженияЗарплатыВБухУчете?$format=json";
Ответ = ВызватьHTTPМетодНаСервере("POST",Неопределено ,ПараметрыСоединения, АдресРесурса,ДанныеДляЗаписи);
...
				
Функция Ref_Key(Мета,Имя,Данные,ПараметрыСоединения)
	
	ПоляПоиска= Новый Соответствие();
	Если Мета =  "ChartOfAccounts" Тогда
		ПоляПоиска.Вставить("Code",Данные);
	Иначе	
		ПоляПоиска.Вставить("Description",Данные);
	КонецЕсли;
	
	ТекстЗапроса = "";
	Для Каждого КлючЗначение из ПоляПоиска Цикл
		ТекстЗапроса = ТекстЗапроса + КлючЗначение.Ключ + " eq '" + КлючЗначение.Значение + "' and ";
	КонецЦикла;
	
	ТекстЗапроса = Лев(ТекстЗапроса, СтрДлина(ТекстЗапроса)-5);
	АдресРесурса= "MDM/odata/standard.odata/"+Мета+ "_" + Имя + "?$filter=" + ТекстЗапроса + "&$format=json";
	Ответ = ВызватьHTTPМетодНаСервере("GET",Неопределено ,ПараметрыСоединения, АдресРесурса,Неопределено);
	Массив = Ответ.ОтветСервера["value"];
	Если Массив = Неопределено Тогда 
		Ref_Key_Спр	=  Ответ.ОтветСервера["Ref_Key"]; 
	ИначеЕсли Массив.Количество()>0 Тогда 
		Ref_Key_Спр =  Массив[0]["Ref_Key"];
	КонецЕсли;
	
	Если ЗначениеЗаполнено(Ref_Key_Спр) Тогда
		Возврат Ref_Key_Спр;	
	Иначе
		Возврат "00000000-0000-0000-0000-000000000000";
	КонецЕсли;	

КонецФункции
Показать

В браузере пишет вот так

{
"odata.metadata": "http://www/MDM/odata/standard.odata/$metadata#InformationRegister_ПорядокОтраженияЗарплатыВБухУчете/*Element",
"ЕНВД": false,
"Субконто2": "",
"Субконто2_Type": "StandardODATA.Undefined",
"Субконто3": "",
"Субконто3_Type": "StandardODATA.Undefined",
"Счет_Key": "13e31718-7ed1-11e4-b263-00155d000200",
"Субконто1": "",
"Субконто1_Type": "StandardODATA.Undefined",
"СубконтоНУ1": "",
"СубконтоНУ1_Type": "StandardODATA.Undefined",
"СубконтоНУ3": "",
"СубконтоНУ3_Type": "StandardODATA.Undefined",
"СубконтоНУ2": "",
"СубконтоНУ2_Type": "StandardODATA.Undefined",
"СчетНУ_Key": "00000000-0000-0000-0000-000000000000",
"ОтражениеВУСН": "",
"СпособОтраженияЗарплатыВБухУчете_Key": "574eddcb-906b-11ea-80c5-ac1f6b498d2b"
}

Т.е. он даже вид субконто не прставляет.

ЧЯДНТ?
Прикрепленные файлы:
По теме из базы знаний
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот