Страница 1 из 1

РАсчеты с контрагентами

Добавлено: 19 май 2005, 19:05
Irina Redko
Добрый день всем !
Помогите найти файл .pro для ALLPLATS .
А может кто-нибудь делал отчет по расчетам с
контрагентами в котором отдельно учитывается
задолженность по вал.-руб. ДО ( в валюте ) и рублевым в
поставщиках-получателях ? :roll:

Добавлено: 20 май 2005, 11:11
aleks1232321
Какя версия?

Добавлено: 20 май 2005, 13:00
Irina Redko
Версия 58502 со всеми (на 31,03,2003) патчами

Добавлено: 20 май 2005, 13:42
aleks1232321
А как переслать?

Добавлено: 20 май 2005, 13:45
aleks1232321
Да собственно говоря и не надо пересылать

/*
╔════════════════════════════════════════════════════════════════════════════╗
║ (c) Корпорация ГАЛАКТИКА, 1996,97 ║
║ Проект : ГАЛАКТИКА ║
║ Система : Оперативный контур ║
║ Версия : 5.00 ║
║ Назначение : Реестр платежей по контрагентам ║
║ Ответственный : Володько Вадим Геннадьевич (VVG) ║
╚════════════════════════════════════════════════════════════════════════════╝
*/
#include predefs.inc

.set name='ALLPLATS'
.hide
.fields
valtar valbas header1 header2
.endfields
^
^
^
^
.{
.fields
kontrname
#ifdef GAL5_80
nreckontr
#end
kontraddr kontrtel
bankname bankmfo bankschet
#ifdef GAL5_80
nd:word insaldo:double insaldov:double
#end
.endfields
организация:^
#ifdef GAL5_80
^
#end
адрес:^
телефон:^
банк:^
МФО:^
счет:^
#ifdef GAL5_80
входящее сальдо:^ ^ ^
#end
.{
.fields
ddate ddocument dsumma dsummav dsummavf dsimvvf dnumber
dbasenumber dbasen dbased dbases dbasesv dbasesfv dbasescv
kdate kdocument ksumma ksummav ksummavf ksimvvf knumber
kbasenumber kbasen kbased kbases kbasesv kbasesfv kbasescv
.endfields

^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^
^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^ ^
.}
.fields
dsummakon:double dsummakonv:double
ksummakon:double ksummakonv:double
saldokon:double
saldokonv:double
#ifdef GAL5_80
outsaldokon:double
outsaldokonv:double
#end
.endfields
^ ^ ^ ^ ^ ^
#ifdef GAL5_80
^ ^
#end
.}
.fields
ddolgtot:double
ddolgtotv:double
kdolgtot:double
kdolgtotv:double
saldotot:double
saldototv:double
#ifdef GAL5_80
outsaldotot:double
outsaldototv:double
#end
.endfields
^ ^ ^ ^ ^ ^
#ifdef GAL5_80
^ ^
#end
.endform


Вот весь прототип.

Добавлено: 20 май 2005, 17:40
Irina Redko
Спасибо ! А может есть описание полей ?
Трудно сообразить в каждом конкретном месте
что значит "^".
:shock:

Добавлено: 24 май 2005, 15:27
Maverick
Только попорядочку считать - каждый ^ соответствует полю в .fields ... .endfields

Добавлено: 25 май 2005, 11:36
edward_K
в Fcom есть режим дизайнера но
1.в файле должна быть только одна форма
2.при попытках манипуляции возможно внесете нежелательный изменения в форму
3.ресурсы с прототипами должны быть подключены.