Собственная программа в бланке документа.

Re: Собственная программа в бланке документа.

Сообщение mch412 » Ср сен 25, 2019 5:36 am

Добрый день!
А возможно сделать так чтоб выводилась не только задолженность, но и переплата клиента?
mch412
 
Сообщения: 16
Зарегистрирован: Ср май 28, 2014 11:28 am

Re: Собственная программа в бланке документа.

Сообщение dmitry » Ср сен 25, 2019 5:30 pm

Note.Text = ""
Dim Op As Predpr.Doc = Frm.Op
Dim Pokup As Predpr.Person = Op.DocPerson
If Pokup Is Nothing Then Exit Sub
Dim Sum as Decimal
Sum = Pokup.GetDebt("Db", Op)
If Sum>0.01 Then
Note.Text = "Ваш долг без учета этой накладной: " & Sum.ToString("0.00")
Else
Sum = Pokup.GetDebt("Cr", Op)
If Sum>0.01 Then
Note.Text = "Переплата за предыдущие поставки: " & Sum.ToString("0.00")
End If
End If
dmitry
Разработчик
 
Сообщения: 3149
Зарегистрирован: Чт янв 27, 2011 3:43 pm

Re: Собственная программа в бланке документа.

Сообщение danielcorelas » Пт окт 25, 2019 7:15 pm

есть база товаров, но... в одном файле код товара, наименование, остаток и цена, а в другом код товара и штрих-код... по одному коду несколько штрихкодов. просто загрузить наименования и коды товаров прекрасно получается через импрот из экселя, а вот ка бы догрузить штрих-коды... не подскажете?
danielcorelas
 
Сообщения: 23
Зарегистрирован: Ср апр 12, 2017 9:37 am

Пред.

Вернуться в Использование программы

Кто сейчас на конференции

Сейчас этот форум просматривают: Google [Bot] и гости: 1

cron