ФОРУМ "Предприниматель 4"

не могу понять почему проводки разные,накладные расходы то учитывает,то нет

Я понял, что первый вопрос - "Не могу создать операцию Продажа торговой точки".
Текст, должен быть такой (скопировать, Ctrl+F10, вставить):

Dim R As Predpr.TableSQL
Dim OpStr As String = "Продажа торг. точки"
Dim ID As Integer
R = DB.OpenRecordset("BuhTempls", 2)
R.FindFirst("TextName='" & OpStr & "' and ParentID=2")
If R.NoMatch = True Then
R.AddNew()
R("TextName") = OpStr
R("BlankID") = 3
R("ParentID") = 2
R.Update()
R.MoveLast()
End If
ID = R("ID")
R.Close()
DB.Execute("DELETE BuhTemplRows.* FROM BuhTemplRows WHERE BuhTemplRows.TemplID=" & ID & ";")
R = DB.OpenRecordset("BuhTemplRows", 2)
R.AddNew()
R("TemplID") = ID
R("TransNum") = 1
R("Caption") = "Реализация"
R("FlagDb") = 0
R("AccDbID") = 37
R("AccCrID") = 1
R.Update()
R.AddNew()
R("TemplID") = ID
R("TransNum") = 2
R("Caption") = "Себестоимость"
R("AccDbID") = 1
R("AccCrID") = 12
R.Update()
R.AddNew()
R("TemplID") = ID
R("TransNum") = 3
R("Caption") = "Перевести долг"
R("FlagCr") = 0
R("AccDbID") = 37
R("PersonFormula") = "CopyOffice(1)"
R("SumFormula") = "CopySum(1)"
R.Update()
R.AddNew()
R("TemplID") = ID
R("AccountType") = 1
R("TransNum") = 1
R("Caption") = "Доходы в отчетность"
R("FlagDb") = 0
R("FlagCr") = 0
R("AccDbID") = 17
R.Update()
R.AddNew()
R("TemplID") = ID
R("AccountType") = 1
R("TransNum") = 2
R("Caption") = "Налоговые обязательства"
R("FlagDb") = 0
R("FlagCr") = 0
R("AccDbID") = 18
R.Update()
R.AddNew()
R("TemplID") = ID
R("AccountType") = 1
R("TransNum") = 3
R("Caption") = "Себестоимость (общ. сист.)"
R("FlagDb") = 0
R("FlagCr") = 0
R("AccCrID") = 17
R.Update()
R.Close()
Predpr.DataMain.AppData.TemplsCollection.DAOrecordset.Requery()

Второй вопрос - проводки, когда есть сумма накладных расходов.
Воспроизвел ситуацию у себя - проводки выглядят иначе, все корректно. Позвоните (телефоны - в Справка / О программе), подключусь через TeamViewer, рассмотрим конкретный случай.