Linkform 'Реестр (rtf)' prototype is 'ReestrBDoc'




Скачать 45.86 Kb.
НазваниеLinkform 'Реестр (rtf)' prototype is 'ReestrBDoc'
Дата публикации06.08.2013
Размер45.86 Kb.
ТипДокументы
#doc

Реестр (RTF)

#end

.linkform 'Реестр (RTF)' prototype is 'ReestrBDoc'

.var

ItogoRub : double;

ItogoVal : double;

ItogoOplRub : double;

ItogoOplVal : double;

ItogoOtgrRub : double;

ItogoOtgrVal : double;

.endvar

.fields

CommonFormHeader

Header1

.endfields

.begin

ItogoRub := 0;

ItogoVal := 0;

ItogoOplRub := 0;

ItogoOplVal := 0;

ItogoOtgrRub := 0;

ItogoOtgrVal := 0;

end.

^
^


Дата и номер документа

Контрагент

Срок действия,

дней

Оплатить до

Итого

Сумма оплат по данному ДО

В НДЕ

Сумма отгрузок по данному ДО

В НДЕ

В НДЕ

В валюте документа







.fields

DateDoc

NumDoc

OrgName

KolDays

DateEnd

DoubleToStr(SumRub,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumVal,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumOplRub,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumOtgrRub,'\2p[|-]3666`666`666`666`666.88')

.endfields

.{

^

^

^

^

^

^

^

^

^

.{

.}

.begin

ItogoRub := ItogoRub + SumRub;

ItogoVal := ItogoVal + SumVal;

ItogoOplRub := ItogoOplRub + SumOplRub;

ItogoOplVal := ItogoOplVal + SumOplVal;

ItogoOtgrRub := ItogoOtgrRub + SumOtgrRub;

ItogoOtgrVal := ItogoOtgrVal + SumOtgrVal;

end.

.}

.fields

DoubleToStr(ItogoRub,'\2p [|-]3666`666`666`666`666.88')

DoubleToStr(ItogoVal,'\2p [|-]3666`666`666`666`666.88')

DoubleToStr(ItogoOplRub,'\2p [|-]3666`666`666`666`666.88')

DoubleToStr(ItogoOtgrRub,'\2p [|-]3666`666`666`666`666.88')

.endfields

ИТОГО










^

^

^

^

.endform

#doc

Реестр ДО на продажу в валюте документа (RTF)

#end

.linkform ' ReestrVal (RTF)' prototype is 'ReestrBDoc'

.NameInList 'Реестр ДО на продажу в валюте документа (RTF)'

.fields

CommonFormHeader

DateDoc

NumDoc

OrgName

BaseName

ValN

DoubleToStr(SumVal,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumOtgrD,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumOplD,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumOtgrD - SumOplD,'\2p[|-]3666`666`666`666`666.88')

.endfields

^

Реестр ДО на продажу в валюте документа


Дата и номер документа

Контрагент

Примечание

Валюта

Сумма по ДО

Отгружено

Оплачено

Баланс

.{

^

^

^

^

^

^

^

^

^

.{

.}

.}

.endform

#doc

Реестр ДО на продажу в валюте документа и НДЕ (RTF)

#end

.linkform ' ReestrValNDE (RTF)' prototype is 'ReestrBDoc'

.NameInList 'Реестр ДО на продажу в валюте документа и НДЕ (RTF)'

.fields

CommonFormHeader

DateDoc NumDoc

OrgName

BaseName

ValN

DoubleToStr(SumRub,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumVal,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumOplRub,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumOplVal,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumOtgrRub,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumOtgrVal,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumOtgrRub - SumOplRub,'\2p[|-]3666`666`666`666`666.88')

DoubleToStr(SumOtgrVal - SumOplVal,'\2p[|-]3666`666`666`666`666.88')

.endfields

^

Реестр ДО на продажу в валюте документа


Дата и номер документа

Контрагент

Примечание

Валюта

Сумма по ДО

Оплата

Выручка

Баланс

В НДЕ

в вал.док

В НДЕ

в вал.док

В НДЕ

в вал.док

В НДЕ

в вал.док

.{

^

^

^

^

^

^

^

^

^

^

^

^

^

.{

.}

.}

.endform

Добавить документ в свой блог или на сайт

Похожие:

Linkform \Linkform 'InvCardosbudget rtf' prototype is 'FormOS6'
Равно значению настройки wGetTune('OS. SrokIspEdIzm'). Для того чтобы не читать каждый раз её из базы

Linkform \Linkform 'GroupOs 15 rtf' prototype is 'GroupOs'

Linkform \LinkForm 'blankper 03 va rtf' Prototype is 'blankper'

Linkform \Linkform 'Form nma1 Rus rtf' prototype is 'FormOS6'
Код сче­та и объ­ек­та ана­ли­ти­чес­ко­го уче­та (для от­не­се­ния амор­ти­за­ции не­ма­те­ри­аль­ных ак­ти­вов)

Linkform \Linkform 'FormOS6Russia rtf' prototype is 'FormOS6'
Дата Составления)=0,'',DateToStr(longint(Дата Составления), efDateFormatExcel))

Linkform \Linkform 'Form os6 Bel full rtf' prototype is 'FormOS6'
Дата Составления)=0,'',DateToStr(longint(Дата Составления), efDateFormatExcel))

Linkform \Linkform 'HozOper 04' Prototype Is 'HozOper'
Реестр типовых хозяйственных операций и формируемых проводок по счетам бухгалтерского учета

Linkform \Linkform 'OsOne 01 Bel rtf' prototype is 'OsOne'
Хар1 := 1; Хар1 Хар2, iExcelFormat. DoubleToStrFormatExcelNotNul (Характеристика Количество Объектов [Хар1 Хар2 + 1], Разрядность...

Linkform \Linkform 'BelReestrPP' prototype is 'BudgKlass'

Linkform \Linkform 'AsrVerifLog02Rtf' prototype is AsrVerifLog

Вы можете разместить ссылку на наш сайт:
Школьные материалы


При копировании материала укажите ссылку © 2013
контакты
vbibl.ru
Главная страница