Вверх ↑
Этот топик читают: Гость
Ответов: 952
Рейтинг: 4
#1: 2010-06-14 15:16:59 ЛС | профиль | цитата
Вобщем задумка такова.
Составить простенькую программу для составления и расчета смет.
Пока все остановилось на этом уровне:

code_18856.txt

В верхней таблице выбираем пункт из сборника, при клике на строке он заносится в нижнюю таблицу, т.е саму смету. Но вот вопрос - как суммировать данные и как вносить объемы работ по каждой позиции?

И тут фантазия дала сбой

Можно конечно использовать экспорт выбранных позиций в шаблон экселя в котором уже забиты формулы суммирования и в экселе же вбивать объемы .... но не кошерно как-то.... да и экспортировать в шаблон не умею и незнаю позволяют ли возможности Hiasm-a
карма: 0

0
файлы: 1code_18856.txt [518B] [177]
Ответов: 758
Рейтинг: 112
#2: 2010-06-14 15:27:27 ЛС | профиль | цитата
Пример не открывается
------------ Дoбавленo в 15.24:
Заработало
------------ Дoбавленo в 15.27:
base.txt тоже выложи
карма: 1

0
Ответов: 952
Рейтинг: 4
#3: 2010-06-14 15:32:52 ЛС | профиль | цитата
Пункт;Действия;Ед.изм.;Стоимость
10;Ознакомление;1док;100
11;Расчет;1док;200
12;Сличение;1док;300
13;Составление;1док;400

Это примерное содержание base.txt
карма: 0

0
Ответов: 758
Рейтинг: 112
#4: 2010-06-14 15:56:35 ЛС | профиль | цитата
На сколько я понял, так надо

code_18857.txt

карма: 1

0
файлы: 1code_18857.txt [1.5KB] [172]
Ответов: 952
Рейтинг: 4
#5: 2010-06-14 17:24:16 ЛС | профиль | цитата
Хммм, не понял когда проставлять количество .... до клика на позицию или после, у меня почему то ни то ни другое не умножают позицию.
------------ Дoбавленo в 17.24:
Наверное все же реализовать только таблицами не получится. Так как смета состоит из 2-х частей - к сумме позиций первой части еще применяются коэффициенты и в конце второй части так же возможно применение коэффициентов, и в конце еще и сумму общую по двум частям подбить ....
Слишком все запутано.
Можно как то реализовать через Excel-файлы? Т.е. указываешь позицию в сборнике - заносится строка в Excel-файл, все позиции выбрал - импорт в Эксель и там уже отшлифовываешь. А еще лучше если импорт будет через шаблон.
Уххх закрутил ..... похоже с такими задумками только в C++ лезть .....
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#6: 2010-06-14 18:34:21 ЛС | профиль | цитата
На сколько я понял, так надо :
code_18860.txt

Подбить одновременно ОБЩИЙ ИТОГ - сам думай (хотя там и думать-то нечего).
------------ Дoбавленo в 18.08:
user_asm писал(а):
Можно как то реализовать через Excel-файлы?
можно, но там тоже думать прийдется. (А думать ты совсем не хочешь )
------------ Дoбавленo в 18.34:
А правильнее так:

Add(MainForm,7423308,77,154)
{
Width=749
Height=472
link(onCreate,524209:doEnum,[])
}
Add(StringTable,2937595,203,168)
{
Width=741
Height=205
Align=2
FileName="base.txt"
Columns=#9:Пункт=100|10:Работы=300|14:Количество=100|13:Стоимость=200|
Grid=0
link(onClick,8857643:doAdd,[])
}
Add(StringTable,8857643,273,168)
{
Top=205
Width=741
Height=195
Align=2
Columns=#9:Пункт=100|10:Работы=300|14:Количество=100|13:Стоимость=100|9:Сумма=100|
Grid=0
Point(onBeforeLineChange)
Point(onLineChange)
Point(Matrix)
link(Str,2937595:Select,[(279,156)(250,156)(250,218)(216,218)])
link(onBeforeLineChange,11728440:doValue,[])
link(onLineChange,13643092:doRead,[(415,188)(415,363)(257,363)(257,307)])
}
Add(StrList,3781076,133,105)
{
Strings=#21:10;Ознакомление;1;100|15:11;Расчет;1;200|17:12;Сличение;1;300|20:13;Составление;1;400|
}
Add(ArrayEnum,524209,147,168)
{
link(onItem,2937595:doAdd,[])
link(Array,3781076:Array,[])
}
Add(MatrixRW,8775606,287,245)
{
X=3
link(onRead,3064903:doValue,[])
link(Matrix,9355003:Var2,[])
}
Add(MatrixRW,13643092,273,301)
{
X=2
link(onRead,7481812:doOperation,[])
link(Matrix,9355003:Var1,[(279,236)])
}
Add(GetDataEx,9355003,287,231)
{
link(Data,8857643:Matrix,[])
}
Add(Math,7481812,343,301)
{
OpType=2
link(onResult,16463700:doWrite,[])
link(Op2,3064903:Value,[])
}
Add(Memory,3064903,350,245)
{
}
Add(MatrixRW,16463700,462,294)
{
X=4
link(Matrix,9355003:Var3,[(468,236)])
link(Y,11728440:Value,[])
}
Add(Memory,11728440,483,175)
{
link(onData,8775606:doRead,[(522,181)(522,219)(261,219)(261,251)])
}

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_18860.txt [1.5KB] [157]
Ответов: 11
Рейтинг: -1
#7: 2011-02-16 10:26:17 ЛС | профиль | цитата
Подскажите, как реализовать данную схему, но с автоматическим подсчетом суммы при открытии таблицы... Что-то не получается
карма: 1

0
Гость
Ответов: 17029
Рейтинг: 0
#8: 2011-02-16 12:19:45 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2017-06-17 20:35:03
карма: 0

0
Ответов: 1891
Рейтинг: 110
#9: 2011-02-16 23:13:19 ЛС | профиль | цитата
user_asm, попробуй использовать SQLite, там можно суммировать прямо в запросах
карма: 0
%time%
0
Ответов: 16884
Рейтинг: 1239
#10: 2011-02-17 10:33:53 ЛС | профиль | цитата
AmsterdamNV писал(а):
как реализовать данную схему
это какую "данную"
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
10
Сообщение
...
Прикрепленные файлы
(файлы не залиты)