private OLE DefaultSubconto(int SubcontoNumber, string SubcontoName)
{
OLE Result;
if (SubcontoName == "договора")
{
Result = V7B.CreateObject("Документ.Договор");
if (Result.Method("НайтиПоНомеру", TemplateEntry.Property("Субконто" + Marker + (SubcontoNumber + 1)).Property("Code").ToString()).ToBool())
{
return(Result.Method("CurrentItem"));
}
}
else
{
Result = V7B.CreateObject("Справочник." + SubcontoName);
int search = 0;
if (V7B.EvalExpr("Метаданные.Справочник(\"" + SubcontoName + "\").СерииКодов").ToString().Trim().ToUpper() == ("ВПределахПодчинения").ToUpper())
{
search = 2;
}
if (Result.Method("FindByCode", TemplateEntry.Property("Субконто" + Marker + (SubcontoNumber + 1)).Property("КАУ").ToString().Trim(), search).ToBool())
{
if (SubcontoName.ToUpper() == "ВидыЗатрат".ToUpper())
{
Zatrat = Result.Method("CurrentItem");
}
return(Result.Method("CurrentItem"));
}
}
return(null);
}
private OLE GenDoc231()
{
OLE doc = FindDoc(V7B, "ЗатратыПроизводственногоХарактера", CommonVariables.ДатаПериода.End,
CommonVariables.ДатаПериода.End, OperationDescription);
if (doc != null)
{
if (doc.Method("Проведен").ToBool())
{
doc.Method("СделатьНеПроведенным");
}
doc.Method("УдалитьСтроки");
}
else
{
doc = V7B.CreateObject("Документ.ЗатратыПроизводственногоХарактера");
doc.Method("New");
V7B.Method("глУстановитьФирму", doc);
doc.Property("ПроводитьПоЭлементамЗатрат", V7B.EvalExpr("?(ИспользоватьСчетаРасходов <> Класс9,1,0)"));
doc.Property("ДатаДок", CommonVariables.ДатаПериода.End);
doc.Property("Операция").Property("Description", OperationDescription);
}
doc.Property("Примечание", "Генерація проводок " + DateTime.Now);
// Проверим на пригодность к записи
bool entr_ok = true;
do
{
try
{
doc.Method("Записать");
entr_ok = true;
}
catch
{
entr_ok = false;
doc.Property("НомерДок", int.Parse(doc.Property("НомерДок").ToString()) + 1);
}
} while (!entr_ok);
return(doc);
}