HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуне правильно работает часть схемы с sqlite ← Ctrl123456789Ctrl →
Этот топик читают: Гость
Ответов: 254
Рейтинг: 6
#61: 2014-01-18 22:03:36 ЛС | профиль | цитата
а для этого компонента подойдет текущая дата? то бишь каждый день дата одна должна меняться автомтически, а вторая браться с базы данных
------------ Дoбавленo в 22.03:
SELECT (date('now')- date(start) ) AS [Возраст] FROM <таблица где записано начало отсчета>

SELECT ([dtime]- date(start) ) AS [vozrast] FROM <grafikdata>
------------ Дoбавленo в 22.03:
правильно?
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#62: 2014-01-18 22:14:12 ЛС | профиль | цитата
Medvedoc, кончай изобретать.
date('now') это и есть ТЕКУЩАЯ (СЕГОДНЯШНЯЯ) ДАТА
Да там ещё нужно примениь волшебное слово 'localtime'.

Что такое твоё dtime - для меня тёмный лес.

code_32851.txt
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_32851.txt [802B] [175]
Ответов: 254
Рейтинг: 6
#63: 2014-01-18 22:39:16 ЛС | профиль | цитата
классно
dtime - это столбик в таблице "вывод". Я предполагал расчет [vozrast] вести: [текущая дата]-[dtime]
------------ Дoбавленo в 22.39: 
Add(MainForm,11607186,182,84)
{
 Width=954
 Height=598
 Caption="график вакцинации"
 BorderStyle=4
 Position=1
 Point(doVisible)
 Point(onClose)
 link(onCreate,7309284:doEvent1,[])
}
Add(MTStrTbl,15761846,882,644)
{
 @Color=5592575
 Left=285
 Top=45
 Width=570
 Height=215
 Name="график"
 Columns=#6:корпус|4:дата|9:поголовье|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|
 TextAlign=2
 Point(doVisible)
}
Add(Button,949453,56,602)
{
 Left=420
 Top=15
 Width=135
 TabOrder=-1
 Caption="рассчитать"
 link(onClick,11771530:doString,[])
}
Add(ComboBox,11406695,126,539)
{
 Left=300
 Top=15
 Width=110
 Height=21
 Strings=#8:корпус 1|8:корпус 2|8:корпус 3|8:корпус 4|8:корпус 5|
 Text="корпус"
 Point(EditText)
}
Add(MTStrTbl,5113738,553,371)
{
 @Color=43520
 Left=20
 Top=115
 Width=250
 Height=155
 Name="вакцинация"
 Columns=#14:ВАКЦИНАЦИЯ=150|17:ВОЗРАСТ (ДНИ)=100|
 Redaction=0
 Point(doSetFocus)
 Point(onSelect)
 Point(doVisible)
}
Add(Edit,16767801,161,308)
{
 Left=101
 Top=45
 Width=110
 Text="0"
 DataType=2
}
Add(Button,12084787,42,371)
{
 Left=15
 Top=70
 Width=195
 Height=30
 TabOrder=-1
 Caption="добавить"
 Point(doSetFocus)
 link(onClick,6806148:doEvent2,[])
}
Add(ComboBox,4864849,119,308)
{
 Left=95
 Top=10
 Width=125
 Height=21
 Strings=#2:БМ|2:БГ|2:БН|3:ИБК|3:ИЛТ|
 Text="вакцинацияя"
 Point(EditText)
}
Add(DatePicker,9450650,168,455)
{
 Left=565
 Top=15
 Width=110
 Height=21
 Font=[MS Sans Serif,6,0,0,1]
 Point(doLeft)
 Point(doTop)
 Point(doSetFocus)
 Point(doBringToFront)
 Point(DateTime)
 Point(doSendToBack)
 Point(CurrentDateTime)
 link(onChange,13250376:doEvent1,[])
}
Add(DS_SQLite,6991059,364,105)
{
 @Color=5636095
 Name="11"
 FileName="memory.db"
 Point(onError)
 link(onOpen,13846613:doExec,[(404,111)(404,90)])
 link(onError,7054140:doEvent2,[])
}
Add(Message,3808633,497,105)
{
}
Add(DSC_Exec,13846613,406,84)
{
 @Color=5636095
 SQL="CREATE TABLE IF NOT EXISTS [vakcina] (\r\n[id] INTEGER  PRIMARY KEY AUTOINCREMENT NOT NULL,\r\n[name] TEXT,\r\n[number] INTEGER);\r\n\r\nCREATE TABLE IF NOT EXISTS [grafikdata] (\r\n[id] INTEGER  PRIMARY KEY AUTOINCREMENT NOT NULL,\r\n[name] TEXT,\r\n[vozrast] REAL,\r\n[golov] REAL,\r\n[dtime] REAL);\r\n\r\nCREATE TABLE IF NOT EXISTS [grafikname] (\r\n[id] INTEGER  PRIMARY KEY AUTOINCREMENT NOT NULL,\r\n[name] TEXT,\r\n[golov1] TEXT,\r\n[ups] TEXT);"
 DSManager="11"
 link(onError,7054140:doEvent1,[(450,97)(450,111)])
}
Add(DSC_Exec,7884957,301,357)
{
 @Color=5636095
 DSManager="11"
 link(onExec,15277953:doEvent1,[])
 link(onError,14022728:doWork,[(338,370)(338,377)])
}
Add(FormatStr,8126504,154,364)
{
 Mask="INSERT INTO [vakcina] ([name], [number]) VALUES('%1', %2);  "
 link(onFString,15049159:doEvent2,[])
 link(Str1,4864849:String,[(160,359)(132,359)])
 link(Str2,16767801:Text,[])
}
Add(MST_DB,953009,511,371)
{
 @Color=43520
 MSTControl="вакцинация"
 Point(doClear)
}
Add(Hub,15277953,364,357)
{
 link(onEvent1,13439786:doEvent1,[(472,363)(472,391)])
 link(onEvent2,11511635:doQuery,[(385,370)(385,377)])
}
Add(DSC_Query,11511635,392,371)
{
 @Color=5636095
 SQL="SELECT [name], [number] from [vakcina]"
 DSManager="11"
 link(onQuery,953009:doAddRow,[])
 link(onError,12129855:doWork,[])
}
Add(LineBreakEx,14022728,343,371)
{
}
Add(LineBreakEx,8042414,420,119)
{
 Type=1
 link(OnEvent,7054140:doEvent3,[])
}
Add(LineBreakEx,12129855,434,385)
{
 Caption="1"
}
Add(DSC_Exec,12182020,287,595)
{
 @Color=5636095
 DSManager="11"
 link(onExec,10771421:doEvent1,[])
 link(onError,3606489:doWork,[(324,608)(324,615)])
}
Add(FormatStr,11771530,147,602)
{
 DataCount=4
 Mask="INSERT INTO [grafikdata] ([name], [vozrast], [golov], [dtime]) VALUES('%1', '%2', %3, %4); \r\nINSERT INTO [grafikname] ([name], [golov1], [ups]) VALUES('%1', %2, '%3'); "
 link(onFString,14909773:doEvent2,[(190,608)(190,636)])
 link(Str1,11406695:String,[(153,593)(139,593)])
 link(Str2,269458:Text,[(160,590)(216,590)])
 link(Str3,15451964:Text,[(167,586)(265,586)])
 link(Str4,16251723:Data1,[])
}
Add(MST_DB,10553212,882,602)
{
 @Color=5592575
 MSTControl="график"
 Point(doClearAll)
 Point(doClear)
}
Add(LineBreakEx,3606489,329,609)
{
}
Add(Hub,10771421,350,595)
{
 OutCount=5
 link(onEvent1,2288361:doEvent2,[(379,601)(379,581)])
 link(onEvent2,15451509:doData,[])
 link(onEvent3,12922371:doQuery,[(394,615)(394,640)(623,640)(623,622)])
 link(onEvent4,4614904:doQuery,[(378,622)(378,664)])
}
Add(DSC_Query,4614904,385,658)
{
 @Color=5636095
 SQL="SELECT [name], [vozrast], [golov],  strftime("%d.%m.%Y", 1721424.5 + [dtime]), [dtime] from [grafikdata]"
 DSManager="11"
 link(onQuery,13313127:doEvent1,[])
 link(onError,3923348:doWork,[])
}
Add(LineBreakEx,3923348,434,672)
{
}
Add(DSC_Query,12922371,630,616)
{
 @Color=5636095
 SQL="SELECT [name] from [vakcina]"
 DSManager="11"
 link(onQuery,9772768:doWork2,[(668,622)(668,615)])
 link(onError,4829472:doWork,[])
}
Add(LineBreakEx,4829472,679,630)
{
}
Add(DoData,15451509,406,602)
{
 Data=String(корпус)
 link(onEventData,3754311:doAdd,[])
}
Add(MT_Add,3754311,448,602)
{
 Data=String(поголовье)
 link(onAdd,10823801:doAdd,[])
}
Add(HubEx,9772768,672,609)
{
 link(onEvent,10498153:doEvent1,[])
}
Add(FormatStr,8156537,595,707)
{
 DataCount=1
 Mask="SELECT strftime("%d.%m.%Y", 1721424.5 + %1 + [number]) from [vakcina]"
 link(onFString,11422646:doQuery,[])
 link(Str1,15251959:Value5,[])
}
Add(DSC_Query,11422646,637,707)
{
 @Color=5636095
 DSManager="11"
 link(onQuery,10214565:doAdd,[])
 link(onError,6059374:doWork,[])
}
Add(LineBreakEx,6059374,679,721)
{
}
Add(MT_MultiMem,15251959,567,658)
{
 Count=5
}
Add(Hub,13313127,455,658)
{
 OutCount=6
 link(onEvent1,15251959:doValue,[])
 link(onEvent2,8156537:doString,[(557,671)(557,713)])
 link(onEvent3,10341187:doAdd,[(550,678)(550,867)])
 link(onEvent4,4303723:doClear,[(644,685)(644,720)])
}
Add(MT_Memory,4303723,756,707)
{
}
Add(MT_Add,10214565,700,707)
{
 InputMT=1
 link(onAdd,4303723:doValue,[])
 link(Data,15937933:Var3,[(706,691)(748,691)])
}
Add(MT_AddData,10341187,567,861)
{
 Count=5
 link(onAdd,10553212:doAddRow,[(795,867)(795,608)])
 link(Data1,15251959:Value1,[])
 link(Data2,15251959:Value2,[])
 link(Data3,15251959:Value3,[])
 link(Data4,15251959:Value4,[])
 link(Data5,15937933:Var1,[(601,747)])
}
Add(GetDataEx,15937933,742,742)
{
 Angle=1
 link(Data,4303723:Value,[(762,747)])
}
Add(Label,2084213,119,266)
{
 Left=15
 Top=15
 Width=64
 Height=17
 Caption="вакцинация"
}
Add(Label,6975909,161,266)
{
 Left=15
 Top=45
 Width=78
 Height=17
 Caption="возраст (дней)"
}
Add(Button,8086717,133,42)
{
 Left=865
 Top=80
 Width=65
 Height=25
 Hint="Сворачивает в трей"
 Caption="Свернуть"
 link(onClick,3126296:doEvent1,[])
}
Add(TrayIcon,6079368,294,35)
{
 Hint="софтинка"
 FormHook=0
 ShowWORemoveIcon=0
 Text="двойной клик - развернуть"
 link(onDblClick,11103182:doCase,[])
}
Add(Case,11103182,336,42)
{
 Value=Integer(0)
 link(onTrue,7275996:doEvent1,[])
}
Add(Hub,3126296,266,42)
{
 InCount=2
 OutCount=1
 link(onEvent1,6079368:doHide,[])
}
Add(ChanelToIndex,12581794,441,49)
{
 link(onIndex,11607186:doVisible,[(480,55)(480,21)(109,21)(109,118)])
}
Add(Hub,7275996,378,49)
{
 link(onEvent1,6079368:doShow,[(397,55)(397,27)(289,27)(289,41)])
 link(onEvent2,12581794:doWork2,[])
}
Add(Hub,7309284,231,98)
{
 OutCount=8
 link(onEvent1,3126296:doEvent2,[(259,104)(259,55)])
 link(onEvent2,6991059:doOpen,[])
 link(onEvent3,922736:doMTString,[(271,118)(271,139)])
 link(onEvent4,6668430:In,[(266,125)(266,167)])
 link(onEvent5,8909681:In,[(259,132)(259,181)])
 link(onEvent8,12328708:doMTString,[(263,153)(263,216)])
}
Add(Button,9281433,133,77)
{
 Left=865
 Top=50
 Width=65
 Height=25
 Caption="Закрыть"
 link(onClick,11607186:doClose,[(170,83)(170,111)])
}
Add(MT_String,922736,280,119)
{
 link(onResult,2904434:doRowAction,[])
}
Add(MST_RowAction,2904434,322,119)
{
 @Color=5592575
 MSTControl="график"
}
Add(Hub,7054140,462,105)
{
 InCount=3
 link(onEvent1,3808633:doMessage,[])
}
Add(Button,4038752,392,462)
{
 Left=20
 Top=310
 Width=195
 Height=35
 Caption="очистить"
 link(onClick,13172925:doEvent1,[])
}
Add(DSC_Exec,16152874,497,469)
{
 @Color=5636095
 SQL="delete from vakcina;\r\ndelete from grafikdata;\r\ndelete from grafikname;"
 DSManager="11"
}
Add(Hub,13172925,455,462)
{
 OutCount=3
 link(onEvent1,13439786:doEvent2,[(480,468)(480,398)])
 link(onEvent2,16152874:doExec,[])
 link(onEvent3,2288361:doEvent1,[(476,482)(476,574)])
}
Add(Hub,2288361,490,568)
{
 InCount=2
 link(onEvent1,10553212:doClearAll,[(693,574)(693,622)])
}
Add(Hub,13439786,483,385)
{
 InCount=2
 OutCount=1
 link(onEvent1,953009:doClear,[])
}
Add(Hub,14909773,259,623)
{
 InCount=2
 link(onEvent1,12182020:doExec,[(280,629)(280,601)])
}
Add(LineBreak,14019031,203,616)
{
 Caption="база1"
 link(Out,14909773:doEvent1,[(253,622)(253,629)])
 Primary=[6668430,77,-455]
}
Add(LineBreak,432956,210,350)
{
 Caption="база 2"
 link(Out,15049159:doEvent1,[(265,356)(265,363)])
 Primary=[8909681,70,-175]
}
Add(Hub,15049159,273,357)
{
 InCount=2
 link(onEvent1,7884957:doExec,[])
}
Add(MT_String,12328708,280,196)
{
 link(onResult,7998381:doRowAction,[])
}
Add(MST_RowAction,7998381,322,196)
{
 @Color=22015
 MSTControl="график2"
}
Add(Hub,10498153,763,609)
{
 link(onEvent1,10553212:doAddCols,[])
}
Add(InfoTip,7056213,371,441)
{
 Info=#13:очистить базу|
 Font=[MS Sans Serif,9,1,0,1]
 Width=190
 Height=102
}
Add(GetData,16251723,168,546)
{
 Count=4
 link(Data,11168039:Var2,[])
}
Add(Hub,13250376,217,455)
{
 OutCount=3
 link(onEvent1,15645073:doCalc,[(243,461)(243,657)(191,657)(191,853)])
}
Add(Hub,6806148,91,364)
{
 InCount=2
 OutCount=1
 link(onEvent1,8126504:doString,[])
}
Add(MT_Add,10823801,490,602)
{
 Data=String(возраст)
 link(onAdd,13615503:doAdd,[(529,608)(529,608)])
}
Add(Edit,269458,210,546)
{
 Left=685
 Top=15
 Text="100"
 DataType=2
}
Add(Edit,15451964,259,539)
{
 Left=745
 Top=16
 Text="1"
 DataType=2
}
Add(MT_Add,13615503,536,602)
{
 Data=String(вывод)
 link(onAdd,9772768:doWork1,[(676,608)])
}
Add(DateDiff,15645073,203,847)
{
 link(onCalc,1509445:doSeparateMT,[])
 link(DateTime1,9450650:CurrentDateTime,[(209,673)(181,673)])
 link(DateTime2,11168039:Var3,[(216,523)])
}
Add(Label,7656362,336,854)
{
 Left=95
 Top=415
 Width=400
 Height=60
 Font=[MS Sans Serif,12,1,0,1]
 Caption="0"
}
Add(GetDataEx,11168039,168,518)
{
 link(Data,9450650:DateTime,[])
}
Add(MT_MultiData,1509445,266,847)
{
 link(onData2,15451964:doText,[(310,860)(310,702)(247,702)(247,545)])
}



Уважаемый, Tad, я прикрутил к своей схеме ваш пример. Все норм, спасибо но одна проблемка. Меняю в системе компа дату, перезапускаю программу, но в таблице данные возраста без изменения. Должно быть динамичными. Можно конечно использовать timer, но я помню, что вы его не признаете
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#64: 2014-01-18 23:07:26 ЛС | профиль | цитата
Medvedoc, а что такое [golov] REAL ?
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 254
Рейтинг: 6
#65: 2014-01-18 23:13:30 ЛС | профиль | цитата
голов не надо там применять они в расчете возраста не принимает участия
------------ Дoбавленo в 23.13:
golov - это поголовье, которое вылупилось - число цыплят
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#66: 2014-01-18 23:20:53 ЛС | профиль | цитата
Ну и нахрена оно REAL ?
Родилось 1.5 цыпленка. Класс !
[dtime] REAL = Год, месяц, день, часы, минуты, секунды
Не скажешь - зачем такая точность ?

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 254
Рейтинг: 6
#67: 2014-01-19 00:13:18 ЛС | профиль | цитата
Tad, не надо пока на поголовье заострять внимание - там косяков куча надо понять как получить разницу между текущей датой и датой вывода через sqlite
------------ Дoбавленo в 23.32: 
Add(MainForm,11607186,182,84)
{
 Width=954
 Height=598
 Caption="график вакцинации"
 BorderStyle=4
 Position=1
 Point(doVisible)
 Point(onClose)
 link(onCreate,7309284:doEvent1,[])
}
Add(MTStrTbl,15761846,882,644)
{
 @Color=5592575
 Left=285
 Top=45
 Width=570
 Height=215
 Name="график"
 Columns=#6:корпус|4:дата|9:поголовье|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|
 TextAlign=2
 Point(doVisible)
}
Add(Button,949453,56,602)
{
 Left=420
 Top=15
 Width=135
 TabOrder=-1
 Caption="рассчитать"
 link(onClick,11771530:doString,[])
}
Add(ComboBox,11406695,126,539)
{
 Left=300
 Top=15
 Width=110
 Height=21
 Strings=#8:корпус 1|8:корпус 2|8:корпус 3|8:корпус 4|8:корпус 5|
 Text="корпус"
 Point(EditText)
}
Add(MTStrTbl,5113738,553,371)
{
 @Color=43520
 Left=20
 Top=115
 Width=250
 Height=155
 Name="вакцинация"
 Columns=#14:ВАКЦИНАЦИЯ=150|17:ВОЗРАСТ (ДНИ)=100|
 Redaction=0
 Point(doSetFocus)
 Point(onSelect)
 Point(doVisible)
}
Add(Edit,16767801,161,308)
{
 Left=101
 Top=45
 Width=110
 Text="0"
 DataType=2
}
Add(Button,12084787,42,371)
{
 Left=15
 Top=70
 Width=195
 Height=30
 TabOrder=-1
 Caption="добавить"
 Point(doSetFocus)
 link(onClick,6806148:doEvent2,[])
}
Add(ComboBox,4864849,119,308)
{
 Left=95
 Top=10
 Width=125
 Height=21
 Strings=#2:БМ|2:БГ|2:БН|3:ИБК|3:ИЛТ|
 Text="вакцинацияя"
 Point(EditText)
}
Add(DatePicker,9450650,168,455)
{
 Left=565
 Top=15
 Width=110
 Height=21
 Font=[MS Sans Serif,6,0,0,1]
 Point(doLeft)
 Point(doTop)
 Point(doSetFocus)
 Point(doBringToFront)
 Point(DateTime)
 Point(doSendToBack)
 Point(CurrentDateTime)
 link(onChange,13250376:doEvent1,[])
}
Add(DS_SQLite,6991059,364,105)
{
 @Color=5636095
 Name="11"
 FileName="memory.db"
 Point(onError)
 link(onOpen,13846613:doExec,[(404,111)(404,90)])
 link(onError,7054140:doEvent2,[])
}
Add(Message,3808633,497,105)
{
}
Add(DSC_Exec,13846613,406,84)
{
 @Color=5636095
 SQL="CREATE TABLE IF NOT EXISTS [vakcina] (\r\n[id] INTEGER  PRIMARY KEY AUTOINCREMENT NOT NULL,\r\n[name] TEXT,\r\n[number] INTEGER);\r\n\r\nCREATE TABLE IF NOT EXISTS [grafikdata] (\r\n[id] INTEGER  PRIMARY KEY AUTOINCREMENT NOT NULL,\r\n[name] TEXT,\r\n[vozrast] REAL,\r\n[golov] REAL,\r\n[dtime] REAL);\r\n\r\nCREATE TABLE IF NOT EXISTS [grafikname] (\r\n[id] INTEGER  PRIMARY KEY AUTOINCREMENT NOT NULL,\r\n[name] TEXT,\r\n[golov1] TEXT,\r\n[ups] TEXT);"
 DSManager="11"
 link(onError,7054140:doEvent1,[(450,97)(450,111)])
}
Add(DSC_Exec,7884957,301,357)
{
 @Color=5636095
 DSManager="11"
 link(onExec,15277953:doEvent1,[])
 link(onError,14022728:doWork,[(338,370)(338,377)])
}
Add(FormatStr,8126504,154,364)
{
 Mask="INSERT INTO [vakcina] ([name], [number]) VALUES('%1', %2);  "
 link(onFString,15049159:doEvent2,[])
 link(Str1,4864849:String,[(160,359)(132,359)])
 link(Str2,16767801:Text,[])
}
Add(MST_DB,953009,511,371)
{
 @Color=43520
 MSTControl="вакцинация"
 Point(doClear)
}
Add(Hub,15277953,364,357)
{
 link(onEvent1,13439786:doEvent1,[(472,363)(472,391)])
 link(onEvent2,11511635:doQuery,[(385,370)(385,377)])
}
Add(DSC_Query,11511635,392,371)
{
 @Color=5636095
 SQL="SELECT [name], [number] from [vakcina]"
 DSManager="11"
 link(onQuery,953009:doAddRow,[])
 link(onError,12129855:doWork,[])
}
Add(LineBreakEx,14022728,343,371)
{
}
Add(LineBreakEx,8042414,420,119)
{
 Type=1
 link(OnEvent,7054140:doEvent3,[])
}
Add(LineBreakEx,12129855,434,385)
{
 Caption="1"
}
Add(DSC_Exec,12182020,287,595)
{
 @Color=5636095
 DSManager="11"
 link(onExec,10771421:doEvent1,[])
 link(onError,3606489:doWork,[(324,608)(324,615)])
}
Add(FormatStr,11771530,147,602)
{
 DataCount=4
 Mask="INSERT INTO [grafikdata] ([name], [vozrast], [golov], [dtime]) VALUES('%1', '%2', %3, %4); \r\nINSERT INTO [grafikname] ([name], [golov1], [ups]) VALUES('%1', %2, '%3'); "
 link(onFString,14909773:doEvent2,[(190,608)(190,636)])
 link(Str1,11406695:String,[(153,593)(139,593)])
 link(Str2,269458:Text,[(160,590)(216,590)])
 link(Str3,15451964:Text,[(167,586)(265,586)])
 link(Str4,16251723:Data1,[])
}
Add(MST_DB,10553212,882,602)
{
 @Color=5592575
 MSTControl="график"
 Point(doClearAll)
 Point(doClear)
}
Add(LineBreakEx,3606489,329,609)
{
}
Add(Hub,10771421,350,595)
{
 OutCount=5
 link(onEvent1,2288361:doEvent2,[(379,601)(379,581)])
 link(onEvent2,15451509:doData,[])
 link(onEvent3,12922371:doQuery,[(394,615)(394,640)(623,640)(623,622)])
 link(onEvent4,4614904:doQuery,[(378,622)(378,664)])
}
Add(DSC_Query,4614904,385,658)
{
 @Color=5636095
 SQL="SELECT [name], [vozrast], [golov],  strftime("%d.%m.%Y", 1721424.5 + [dtime]), [dtime] from [grafikdata]"
 DSManager="11"
 link(onQuery,13313127:doEvent1,[])
 link(onError,3923348:doWork,[])
}
Add(LineBreakEx,3923348,434,672)
{
}
Add(DSC_Query,12922371,630,616)
{
 @Color=5636095
 SQL="SELECT [name] from [vakcina]"
 DSManager="11"
 link(onQuery,9772768:doWork2,[(668,622)(668,615)])
 link(onError,4829472:doWork,[])
}
Add(LineBreakEx,4829472,679,630)
{
}
Add(DoData,15451509,406,602)
{
 Data=String(корпус)
 link(onEventData,3754311:doAdd,[])
}
Add(MT_Add,3754311,448,602)
{
 Data=String(поголовье)
 link(onAdd,10823801:doAdd,[])
}
Add(HubEx,9772768,672,609)
{
 link(onEvent,10498153:doEvent1,[])
}
Add(FormatStr,8156537,595,707)
{
 DataCount=1
 Mask="SELECT strftime("%d.%m.%Y", 1721424.5 + %1 + [number]) from [vakcina]"
 link(onFString,11422646:doQuery,[])
 link(Str1,15251959:Value5,[])
}
Add(DSC_Query,11422646,637,707)
{
 @Color=5636095
 DSManager="11"
 link(onQuery,10214565:doAdd,[])
 link(onError,6059374:doWork,[])
}
Add(LineBreakEx,6059374,679,721)
{
}
Add(MT_MultiMem,15251959,567,658)
{
 Count=5
}
Add(Hub,13313127,455,658)
{
 OutCount=6
 link(onEvent1,15251959:doValue,[])
 link(onEvent2,8156537:doString,[(557,671)(557,713)])
 link(onEvent3,10341187:doAdd,[(550,678)(550,867)])
 link(onEvent4,4303723:doClear,[(644,685)(644,720)])
 link(onEvent5,1254444:doString,[(549,692)(549,797)])
}
Add(MT_Memory,4303723,756,707)
{
}
Add(MT_Add,10214565,700,707)
{
 InputMT=1
 link(onAdd,4303723:doValue,[])
 link(Data,15937933:Var3,[(706,691)(748,691)])
}
Add(MT_AddData,10341187,567,861)
{
 Count=5
 link(onAdd,10553212:doAddRow,[(795,867)(795,608)])
 link(Data1,15251959:Value1,[])
 link(Data2,15251959:Value2,[])
 link(Data3,16539517:Var2,[(587,848)(776,848)])
 link(Data4,15251959:Value4,[])
 link(Data5,15937933:Var1,[(601,747)])
}
Add(GetDataEx,15937933,742,742)
{
 Angle=1
 link(Data,4303723:Value,[(762,747)])
}
Add(Label,2084213,119,266)
{
 Left=15
 Top=15
 Width=64
 Height=17
 Caption="вакцинация"
}
Add(Label,6975909,161,266)
{
 Left=15
 Top=45
 Width=78
 Height=17
 Caption="возраст (дней)"
}
Add(Button,8086717,133,42)
{
 Left=865
 Top=80
 Width=65
 Height=25
 Hint="Сворачивает в трей"
 Caption="Свернуть"
 link(onClick,3126296:doEvent1,[])
}
Add(TrayIcon,6079368,294,35)
{
 Hint="софтинка"
 FormHook=0
 ShowWORemoveIcon=0
 Text="двойной клик - развернуть"
 link(onDblClick,11103182:doCase,[])
}
Add(Case,11103182,336,42)
{
 Value=Integer(0)
 link(onTrue,7275996:doEvent1,[])
}
Add(Hub,3126296,266,42)
{
 InCount=2
 OutCount=1
 link(onEvent1,6079368:doHide,[])
}
Add(ChanelToIndex,12581794,441,49)
{
 link(onIndex,11607186:doVisible,[(480,55)(480,21)(109,21)(109,118)])
}
Add(Hub,7275996,378,49)
{
 link(onEvent1,6079368:doShow,[(397,55)(397,27)(289,27)(289,41)])
 link(onEvent2,12581794:doWork2,[])
}
Add(Hub,7309284,231,98)
{
 OutCount=8
 link(onEvent1,3126296:doEvent2,[(259,104)(259,55)])
 link(onEvent2,6991059:doOpen,[])
 link(onEvent3,922736:doMTString,[(271,118)(271,139)])
 link(onEvent4,6668430:In,[(266,125)(266,167)])
 link(onEvent5,8909681:In,[(259,132)(259,181)])
 link(onEvent8,12328708:doMTString,[(263,153)(263,216)])
}
Add(Button,9281433,133,77)
{
 Left=865
 Top=50
 Width=65
 Height=25
 Caption="Закрыть"
 link(onClick,11607186:doClose,[(170,83)(170,111)])
}
Add(MT_String,922736,280,119)
{
 link(onResult,2904434:doRowAction,[])
}
Add(MST_RowAction,2904434,322,119)
{
 @Color=5592575
 MSTControl="график"
}
Add(Hub,7054140,462,105)
{
 InCount=3
 link(onEvent1,3808633:doMessage,[])
}
Add(Button,4038752,392,462)
{
 Left=20
 Top=310
 Width=195
 Height=35
 Caption="очистить"
 link(onClick,13172925:doEvent1,[])
}
Add(DSC_Exec,16152874,497,469)
{
 @Color=5636095
 SQL="delete from vakcina;\r\ndelete from grafikdata;\r\ndelete from grafikname;"
 DSManager="11"
}
Add(Hub,13172925,455,462)
{
 OutCount=3
 link(onEvent1,13439786:doEvent2,[(480,468)(480,398)])
 link(onEvent2,16152874:doExec,[])
 link(onEvent3,2288361:doEvent1,[(476,482)(476,574)])
}
Add(Hub,2288361,490,568)
{
 InCount=2
 link(onEvent1,10553212:doClearAll,[(693,574)(693,622)])
}
Add(Hub,13439786,483,385)
{
 InCount=2
 OutCount=1
 link(onEvent1,953009:doClear,[])
}
Add(Hub,14909773,259,623)
{
 InCount=2
 link(onEvent1,12182020:doExec,[(280,629)(280,601)])
}
Add(LineBreak,14019031,203,616)
{
 Caption="база1"
 link(Out,14909773:doEvent1,[(253,622)(253,629)])
 Primary=[6668430,77,-455]
}
Add(LineBreak,432956,210,350)
{
 Caption="база 2"
 link(Out,15049159:doEvent1,[(265,356)(265,363)])
 Primary=[8909681,70,-175]
}
Add(Hub,15049159,273,357)
{
 InCount=2
 link(onEvent1,7884957:doExec,[])
}
Add(MT_String,12328708,280,196)
{
 link(onResult,7998381:doRowAction,[])
}
Add(MST_RowAction,7998381,322,196)
{
 @Color=22015
 MSTControl="график2"
}
Add(Hub,10498153,763,609)
{
 link(onEvent1,10553212:doAddCols,[])
}
Add(InfoTip,7056213,371,441)
{
 Info=#13:очистить базу|
 Font=[MS Sans Serif,9,1,0,1]
 Width=190
 Height=102
}
Add(GetData,16251723,168,546)
{
 Count=4
 link(Data,11168039:Var2,[])
}
Add(Hub,13250376,217,455)
{
 OutCount=3
 link(onEvent1,15645073:doCalc,[(243,461)(243,657)(191,657)(191,853)])
}
Add(Hub,6806148,91,364)
{
 InCount=2
 OutCount=1
 link(onEvent1,8126504:doString,[])
}
Add(MT_Add,10823801,490,602)
{
 Data=String(возраст)
 link(onAdd,13615503:doAdd,[(529,608)(529,608)])
}
Add(Edit,269458,210,546)
{
 Left=685
 Top=15
 Text="100"
 DataType=2
}
Add(Edit,15451964,259,539)
{
 Left=745
 Top=16
 Text="1"
 DataType=2
}
Add(MT_Add,13615503,536,602)
{
 Data=String(вывод)
 link(onAdd,9772768:doWork1,[(676,608)])
}
Add(DateDiff,15645073,203,847)
{
 link(onCalc,1509445:doSeparateMT,[])
 link(DateTime1,9450650:CurrentDateTime,[(209,673)(181,673)])
 link(DateTime2,11168039:Var3,[(216,523)])
}
Add(GetDataEx,11168039,168,518)
{
 link(Data,9450650:DateTime,[])
}
Add(MT_MultiData,1509445,266,847)
{
 link(onData2,15451964:doText,[(310,860)(310,702)(247,702)(247,545)])
}
Add(FormatStr,1254444,630,791)
{
 DataCount=1
 Mask="SELECT (date('now')- date(dtime)) FROM [grafikdata]"
 link(onFString,56683:doQuery,[])
 link(Str1,15251959:Value3,[(636,741)(587,741)])
}
Add(DSC_Query,56683,672,791)
{
 @Color=5636095
 DSManager="11"
 link(onQuery,6545168:doAdd,[])
 link(onError,9070171:doWork,[])
}
Add(LineBreakEx,9070171,714,805)
{
}
Add(MT_Memory,5732491,791,791)
{
}
Add(MT_Add,6545168,735,791)
{
 InputMT=1
 link(onAdd,5732491:doValue,[])
 link(Data,16539517:Var1,[(741,779)(767,779)(767,831)])
}
Add(GetDataEx,7432591,791,826)
{
 link(Data,5732491:Value,[])
}
Add(GetDataEx,16539517,770,826)
{
 Angle=1
 link(Data,7432591:Var1,[])
}


прописал SELECT (date('now')- date(dtime)) FROM [grafikdata] ерунда получилась
------------ Дoбавленo в 00.13:
Tad, вот сделал пример по вычислению дат
Add(MainForm,11607186,168,126)
{
 Width=954
 Height=721
 Caption="график вакцинации"
 BorderStyle=4
 Position=1
 Point(doVisible)
 Point(onClose)
 link(onCreate,7309284:doEvent1,[])
}
Add(MTStrTbl,15761846,868,686)
{
 @Color=5592575
 Left=280
 Top=50
 Width=570
 Height=215
 Name="график"
 Columns=#6:корпус|4:дата|9:поголовье|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|
 TextAlign=2
 Point(doVisible)
}
Add(Button,949453,42,644)
{
 Left=185
 Top=20
 Width=135
 TabOrder=-1
 Caption="рассчитать"
 link(onClick,11771530:doString,[])
}
Add(ComboBox,11406695,112,581)
{
 Left=40
 Top=20
 Width=110
 Height=21
 Strings=#8:корпус 1|8:корпус 2|8:корпус 3|8:корпус 4|8:корпус 5|
 Text="корпус"
 Point(EditText)
}
Add(DatePicker,9450650,154,420)
{
 Left=345
 Top=25
 Width=110
 Height=21
 Font=[MS Sans Serif,6,0,0,1]
 Point(doLeft)
 Point(doTop)
 Point(doSetFocus)
 Point(doBringToFront)
 Point(DateTime)
 Point(doSendToBack)
 link(onChange,6784755:doConvert,[(198,426)(198,461)(128,461)(128,496)])
}
Add(DS_SQLite,6991059,350,147)
{
 @Color=5636095
 Name="11"
 FileName="5me8mory.db"
 Point(onError)
 link(onOpen,13846613:doExec,[(390,153)(390,132)])
 link(onError,7054140:doEvent2,[])
}
Add(Message,3808633,483,147)
{
}
Add(DSC_Exec,13846613,392,126)
{
 @Color=5636095
 SQL="CREATE TABLE IF NOT EXISTS [grafikdata] (\r\n[id] INTEGER  PRIMARY KEY AUTOINCREMENT NOT NULL,\r\n[name] TEXT,\r\n[dates] REAL,\r\n[datem] REAL,\r\n[result] REAL );"
 DSManager="11"
 link(onError,7054140:doEvent1,[(436,139)(436,153)])
}
Add(LineBreakEx,8042414,406,161)
{
 Type=1
 link(OnEvent,7054140:doEvent3,[])
}
Add(DSC_Exec,12182020,273,637)
{
 @Color=5636095
 DSManager="11"
 link(onExec,10771421:doEvent1,[])
 link(onError,3606489:doWork,[(310,650)(310,657)])
}
Add(FormatStr,11771530,133,644)
{
 DataCount=4
 Mask="INSERT INTO [grafikdata] ([name], [dates], [datem], [result]) VALUES('%1', '%2', '%3', '%4'); "
 link(onFString,14909773:doEvent2,[(176,650)(176,678)])
 link(Str1,11406695:String,[(139,635)(125,635)])
 link(Str2,11881922:Value,[(146,586)(202,586)])
 link(Str3,6626224:Value,[(153,586)(356,586)])
}
Add(MST_DB,10553212,868,644)
{
 @Color=5592575
 MSTControl="график"
 Point(doClearAll)
 Point(doClear)
}
Add(LineBreakEx,3606489,315,651)
{
}
Add(Hub,10771421,336,637)
{
 OutCount=5
 link(onEvent1,2288361:doEvent2,[(365,643)(365,623)])
 link(onEvent2,15451509:doData,[])
 link(onEvent4,4614904:doQuery,[(364,664)(364,706)])
}
Add(DSC_Query,4614904,371,700)
{
 @Color=5636095
 SQL="SELECT [name], [dates], [datem], [result] from [grafikdata]"
 DSManager="11"
 link(onQuery,13313127:doEvent1,[])
 link(onError,3923348:doWork,[])
}
Add(LineBreakEx,3923348,420,714)
{
}
Add(LineBreakEx,4829472,665,672)
{
}
Add(DoData,15451509,392,644)
{
 Data=String(корпус)
 link(onEventData,3754311:doAdd,[])
}
Add(MT_Add,3754311,434,644)
{
 Data=String(поголовье)
 link(onAdd,10823801:doAdd,[])
}
Add(HubEx,9772768,658,651)
{
 link(onEvent,10498153:doEvent1,[])
}
Add(MT_MultiMem,15251959,553,700)
{
 Count=5
}
Add(Hub,13313127,441,700)
{
 OutCount=6
 link(onEvent1,15251959:doValue,[])
 link(onEvent2,10341187:doAdd,[(504,713)(504,909)])
 link(onEvent3,1254444:doString,[(525,720)(525,790)])
}
Add(MT_AddData,10341187,553,903)
{
 Count=5
 link(onAdd,10553212:doAddRow,[(781,909)(781,650)])
 link(Data1,15251959:Value1,[])
 link(Data2,15251959:Value2,[])
 link(Data3,15251959:Value3,[])
 link(Data4,3912048:Var2,[(580,859)(762,859)])
}
Add(Hub,7309284,217,140)
{
 OutCount=8
 link(onEvent2,6991059:doOpen,[])
 link(onEvent3,922736:doMTString,[(257,160)(257,181)])
 link(onEvent4,6668430:In,[(252,167)(252,209)])
}
Add(MT_String,922736,266,161)
{
 link(onResult,2904434:doRowAction,[])
}
Add(MST_RowAction,2904434,308,161)
{
 @Color=5592575
 MSTControl="график"
}
Add(Hub,7054140,448,147)
{
 InCount=3
 link(onEvent1,3808633:doMessage,[])
}
Add(Hub,2288361,476,610)
{
 InCount=2
 link(onEvent1,10553212:doClearAll,[(679,616)(679,664)])
}
Add(Hub,14909773,245,665)
{
 InCount=2
 link(onEvent1,12182020:doExec,[(266,671)(266,643)])
}
Add(LineBreak,16026948,189,658)
{
 Caption="база1"
 link(Out,14909773:doEvent1,[(239,664)(239,671)])
 Primary=[6668430,77,-455]
}
Add(Hub,10498153,749,651)
{
 link(onEvent1,10553212:doAddCols,[])
}
Add(MT_Add,10823801,476,644)
{
 Data=String(возраст)
 link(onAdd,13615503:doAdd,[])
}
Add(MT_Add,13615503,522,644)
{
 Data=String(вывод)
 link(onAdd,9772768:doWork1,[(662,650)])
}
Add(GetDataEx,8895160,777,872)
{
 Angle=1
}
Add(DatePicker,15543175,266,420)
{
 Left=490
 Top=10
 Width=160
 Height=21
 Point(DateTime)
 link(onChange,3994705:doConvert,[(310,426)(310,461)(282,461)(282,496)])
}
Add(DateConvertor,6784755,140,490)
{
 Mode=9
 Format="dd.MM.yyyy"
 Point(Data)
 link(onResult,11881922:doValue,[(184,496)(184,503)])
 link(Data,9450650:DateTime,[(146,478)(160,478)])
}
Add(Memory,11881922,196,497)
{
}
Add(DateConvertor,3994705,294,490)
{
 Mode=9
 Format="dd.MM.yyyy"
 Point(Data)
 link(onResult,6626224:doValue,[(338,496)(338,503)])
 link(Data,15543175:DateTime,[(300,471)(272,471)])
}
Add(Memory,6626224,350,497)
{
}
Add(FormatStr,1254444,595,784)
{
 DataCount=1
 Mask="SELECT (date(dates) - date(datem)) FROM [grafikdata]"
 link(onFString,56683:doQuery,[])
 link(Str1,15251959:Value4,[(601,758)(580,758)])
}
Add(DSC_Query,56683,637,784)
{
 @Color=5636095
 DSManager="11"
 link(onQuery,6545168:doAdd,[])
 link(onError,9070171:doWork,[])
}
Add(LineBreakEx,9070171,679,798)
{
}
Add(MT_Memory,5732491,756,784)
{
}
Add(MT_Add,6545168,700,784)
{
 InputMT=1
 link(onAdd,5732491:doValue,[])
 link(Data,3912048:Var1,[(706,772)(732,772)(732,831)])
}
Add(GetDataEx,3912048,756,826)
{
 link(Data,5732491:Value,[])
}


но разница между dates и datem не происходит
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#68: 2014-01-19 17:31:03 ЛС | профиль | цитата
Medvedoc, вот тебе, чтобы ты не говорил, что ничего не происходит:
medvedoc_6.gif
ageindays.rar
Считает возраст в днях на текущую дату.

SQL-строку не привожу, учитывая что твоя программа с защитой и будет продаваться.
Просто пример решения задачи одним SELECT-ом.
Как сделать - рассказывал выше. Учи матчасть.
Функции даты - времени в SQLite писал(а):
Функции даты и времени используют подмножество IS0-8601 форматов даты и времени.
Функция date() возвращает дату в следующем формате: YYYY-MM-DD.
функция time() возвращает время как HH: MM: SS.
Функция datetime() возвращает "YYYY-MM-DD HH: MM: SS".
Функция JULIANDAY () возвращает Юлианский день - количество дней, прошедших с полудня по Гринвичу с 24 ноября 4714 года до Нашей эры
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 2medvedoc_6.gif [23.1KB] [311], ageindays.rar [31.8KB] [114]
Ответов: 254
Рейтинг: 6
#69: 2014-01-19 23:15:25 ЛС | профиль | цитата
вообще-то она не будет продаваться - она разрабатывается для предприятия, где я работаю.
------------ Дoбавленo в 22.57:
да и суть немного в другом
расчитывать возраст получилось, но вот как сделать так, чтобы каждый день к начальному значению возраста автоматом плюсовалась еденичка?
------------ Дoбавленo в 23.15: 
Add(MainForm,11607186,91,238)
{
 Width=954
 Height=403
 Caption="график вакцинации"
 BorderStyle=4
 Position=1
 Point(doVisible)
 Point(onClose)
 link(onCreate,7309284:doEvent1,[])
}
Add(MTStrTbl,15761846,840,616)
{
 @Color=5592575
 Left=280
 Top=50
 Width=570
 Height=215
 Name="график"
 Columns=#6:корпус|4:дата|9:поголовье|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|0:|
 TextAlign=2
 Point(doVisible)
}
Add(Button,949453,49,574)
{
 Left=420
 Top=15
 Width=135
 TabOrder=-1
 Caption="рассчитать"
 link(onClick,11771530:doString,[])
}
Add(ComboBox,11406695,84,511)
{
 Left=300
 Top=15
 Width=110
 Height=21
 Strings=#8:корпус 1|8:корпус 2|8:корпус 3|8:корпус 4|8:корпус 5|
 Text="корпус"
 Point(EditText)
}
Add(DatePicker,9450650,119,371)
{
 Left=155
 Top=20
 Width=110
 Height=21
 Font=[MS Sans Serif,6,0,0,1]
 Point(doLeft)
 Point(doTop)
 Point(doSetFocus)
 Point(doBringToFront)
 Point(DateTime)
 Point(doSendToBack)
 link(onChange,11647900:doConvert,[(163,377)(163,409)(107,409)(107,440)])
}
Add(DS_SQLite,6991059,273,259)
{
 @Color=5636095
 Name="11"
 FileName="memtytyory.db"
 Point(onError)
 link(onOpen,13846613:doExec,[(313,265)(313,244)])
 link(onError,7054140:doEvent2,[])
}
Add(Message,3808633,406,259)
{
}
Add(DSC_Exec,13846613,315,238)
{
 @Color=5636095
 SQL="CREATE TABLE IF NOT EXISTS [grafikdata] (\r\n[id] INTEGER  PRIMARY KEY AUTOINCREMENT NOT NULL,\r\n[name] TEXT,\r\n[date1] REAL,\r\n[date2] REAL,\r\n[result] REAL);"
 DSManager="11"
 link(onError,7054140:doEvent1,[(359,251)(359,265)])
}
Add(LineBreakEx,8042414,329,273)
{
 Type=1
 link(OnEvent,7054140:doEvent3,[])
}
Add(DSC_Exec,12182020,245,567)
{
 @Color=5636095
 DSManager="11"
 link(onExec,10771421:doEvent1,[])
 link(onError,3606489:doWork,[(282,580)(282,587)])
}
Add(FormatStr,11771530,105,574)
{
 DataCount=4
 Mask="INSERT INTO [grafikdata] ([name], [date1], [date2]) VALUES('%1', '%2', '%3'); "
 link(onFString,14909773:doEvent2,[(148,580)(148,608)])
 link(Str1,11406695:String,[(111,565)(97,565)])
 link(Str2,13542443:Value,[(118,478)(167,478)])
 link(Str3,1478493:Value,[(125,530)(279,530)])
}
Add(MST_DB,10553212,840,574)
{
 @Color=5592575
 MSTControl="график"
 Point(doClearAll)
 Point(doClear)
}
Add(LineBreakEx,3606489,287,581)
{
}
Add(Hub,10771421,308,567)
{
 OutCount=5
 link(onEvent1,10553212:doClearAll,[(337,573)(337,553)(651,546)(651,594)])
 link(onEvent2,15451509:doData,[])
 link(onEvent4,4614904:doQuery,[(336,594)(336,636)])
}
Add(DSC_Query,4614904,343,630)
{
 @Color=5636095
 SQL="SELECT [name], [date1], [date2], [result] from [grafikdata]"
 DSManager="11"
 link(onQuery,13313127:doEvent1,[])
 link(onError,3923348:doWork,[])
}
Add(LineBreakEx,3923348,392,644)
{
}
Add(DoData,15451509,364,574)
{
 Data=String(корпус)
 link(onEventData,3754311:doAdd,[])
}
Add(MT_Add,3754311,406,574)
{
 Data=String(поголовье)
 link(onAdd,10823801:doAdd,[])
}
Add(HubEx,9772768,630,581)
{
 link(onEvent,10553212:doAddCols,[(678,587)(678,566)(787,566)(787,587)])
}
Add(MT_MultiMem,15251959,532,602)
{
 Count=5
}
Add(Hub,13313127,413,630)
{
 OutCount=3
 link(onEvent1,15251959:doValue,[(479,636)(479,608)])
 link(onEvent2,8156537:doString,[(497,643)(497,692)])
 link(onEvent3,10341187:doAdd,[(508,650)(508,839)])
}
Add(MT_AddData,10341187,525,833)
{
 Count=5
 link(onAdd,10553212:doAddRow,[(753,839)(753,580)])
 link(Data1,15251959:Value1,[(531,733)(538,733)])
 link(Data2,15251959:Value2,[(538,733)(545,733)])
 link(Data3,15251959:Value3,[(545,733)(552,733)])
 link(Data4,3581241:Var1,[(552,705)])
}
Add(Hub,7309284,140,252)
{
 OutCount=3
 link(onEvent1,6991059:doOpen,[(214,258)(214,265)])
 link(onEvent2,922736:doMTString,[(172,265)(172,293)])
 link(onEvent3,6668430:In,[(172,272)(172,321)])
}
Add(MT_String,922736,189,273)
{
 link(onResult,2904434:doRowAction,[])
}
Add(MST_RowAction,2904434,231,273)
{
 @Color=5592575
 MSTControl="график"
}
Add(Hub,7054140,371,259)
{
 InCount=3
 link(onEvent1,3808633:doMessage,[])
}
Add(Hub,14909773,217,595)
{
 InCount=2
 link(onEvent1,12182020:doExec,[(238,601)(238,573)])
}
Add(LineBreak,12199041,161,588)
{
 Caption="база1"
 link(Out,14909773:doEvent1,[(211,594)(211,601)])
 Primary=[6668430,28,-273]
}
Add(MT_Add,10823801,448,574)
{
 Data=String(возраст)
 link(onAdd,13615503:doAdd,[(487,580)(487,580)])
}
Add(MT_Add,13615503,494,574)
{
 Data=String(вывод)
 link(onAdd,9772768:doWork1,[(634,580)])
}
Add(GetDataEx,8895160,749,802)
{
 Angle=1
}
Add(GetDataEx,10574426,567,665)
{
}
Add(DatePicker,14055264,224,378)
{
 Left=125
 Top=56
 Width=115
 Height=21
 Point(DateTime)
 link(onChange,10854376:doConvert,[(268,384)(268,408)(219,408)(219,433)])
}
Add(FormatStr,8156537,567,686)
{
 DataCount=1
 Mask="SELECT (date(date1)- date(date2))  from [grafikdata]"
 link(onFString,11422646:doQuery,[])
 link(Str1,15251959:Value4,[(573,660)(559,660)])
}
Add(DSC_Query,11422646,609,686)
{
 @Color=5636095
 DSManager="11"
 link(onQuery,10214565:doAdd,[])
 link(onError,6059374:doWork,[])
}
Add(LineBreakEx,6059374,651,700)
{
}
Add(MT_Memory,4303723,728,686)
{
}
Add(MT_Add,10214565,672,686)
{
 InputMT=1
 link(onAdd,4303723:doValue,[])
 link(Data,3581241:Var2,[(678,670)(720,670)])
}
Add(GetDataEx,15937933,714,721)
{
 Angle=1
 link(Data,4303723:Value,[(734,726)])
}
Add(DateConvertor,11647900,119,434)
{
 Mode=9
 Format="dd-MM-yyyy"
 Point(Data)
 link(onResult,13542443:doValue,[])
 link(Data,9450650:DateTime,[])
}
Add(Memory,13542443,161,434)
{
}
Add(DateConvertor,10854376,231,427)
{
 Mode=9
 Format="dd-MM-yyyy"
 Point(Data)
 link(onResult,1478493:doValue,[])
 link(Data,14055264:DateTime,[(237,419)(230,419)])
}
Add(Memory,1478493,273,427)
{
}
Add(GetDataEx,1467516,714,707)
{
 Angle=2
 link(Data,15937933:Var3,[])
}
Add(GetDataEx,3581241,714,700)
{
 Angle=2
 link(Data,1467516:Var2,[])
}



почему не считает?
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#70: 2014-01-20 12:50:58 ЛС | профиль | цитата
Не понимаю я тебя.
В паспортном столе в БД хранится дата твоего рождения и никто к этой дате не добавляет "каждый день еденичку".
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 254
Рейтинг: 6
#71: 2014-01-20 17:31:19 ЛС | профиль | цитата
Tad, вечер добрый! Как бы объяснить. Понимаете, в конкретный корпус заселяется птица и для нее расчитываются дни, по которым заходят с вакциной. Для расчета количества вакцины необходимо знать возраст птицы. Например в 10-дневном возрасте цыпленок выпивает 10 мл воды в сутки, а в 20-ти дневном 20 мл.. Поэтому мне так эта графа необходима в автоматическом обновлении Понимаете?
В столбце возраст значения должны расчитывается как раз за счет разницы между текущей датой и датой вывода и ежедневно обновляться. Пробовал применить select, про который вы выше писали, но он у меня выдает постоянно 0 (нуль).
карма: 0

0
Ответов: 758
Рейтинг: 112
#72: 2014-01-20 17:54:11 ЛС | профиль | цитата
Medvedoc, В базе нужно хранить день рождения, а потом select текущая дата - дата рождения , он выдаст возраст и все
карма: 1

0
Ответов: 254
Рейтинг: 6
#73: 2014-01-20 19:03:47 ЛС | профиль | цитата
miver, он день рождения приводил в качестве примера. Я в примере выше прилагал файл, но там все завязано на разнице дат. Но у меня в итоге всегда получается нуль.
------------ Дoбавленo в 19.03:
надо чтобы в столбце выводились результаты вычитания от текущей даты и даты вывода птенцов. Это число и есть возраст птенцов, который должен обновляться каждый день.
карма: 0

0
Ответов: 758
Рейтинг: 112
#74: 2014-01-20 19:38:34 ЛС | профиль | цитата
Medvedoc, У Вас
SELECT (date(date1)- date(date2))  from [grafikdata]
а нужно 
SELECT (date('now')- date(тут нужно написать название колонки в которой хранятся даты вывода птенцов)) from [grafikdata]
карма: 1

0
Ответов: 16884
Рейтинг: 1239
#75: 2014-01-20 19:52:36 ЛС | профиль | цитата
Medvedoc писал(а):
он день рождения приводил в качестве примера.
Чем твой день рождения отличается от "даты вывода птенцов" ?
miver, объяснять человеку, который слушает только себя, дохлый номер.
------------ Дoбавленo в 19.52:
miver писал(а):
а нужно
А нужно привести к ОБЩЕМУ ТИПУ, а не отнимать кур от телят. 

#sql
SELECT (strftime('%J',date('now','LOCALTIME'))  -strftime('%J',date(dtime + 1721424.5)) ) AS "Возраст" FROM grafikdata;
Получается сложновато потому, что человек не может обновить DatePicker и открыть нижнюю точку DateInt, а в таблице grafikdata объявить поле dtime INTEGER. (о чем ему втолковываю уже месяц.)

Товарищ не понимает.
Вернее не хочет понять.
Не читатель
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
ФорумыПомощь по пакетуне правильно работает часть схемы с sqlite ← Ctrl123456789Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2024
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика