Tad писал(а):
Пока вместо SELECT COUNT(*) FROM kontragenti; + Math примени INSERT INTO kontragenti(nomer) SELECT max(nomer)+1 FROM kontragenti;
а не могу, у меня блок с MATH формирует число строк для другой формы(. нужно придумать тогда откуда брать число строк для формы.
--- Добавлено в 2017-12-11 17:25:09
только если так. вроде рабоает.
Add(EditMulti,14480963,7,21)
{
EventCount=4
WorkCount=1
VarCount=2
Width=979
Height=578
VOffset=100
HOffset=300
link(doWork1,14389453:doShowModal,[(35,127)(35,76)])
link(Var1,491585:Var,[(313,590)(265,590)])
link(Var2,2670930:Var,[(320,590)(328,590)])
}
Add(ChildPanel,2267976,84,301)
{
link(onEvent1,7617765:In,[])
link(onEvent2,1338475:doEvent1,[(128,314)(128,237)])
}
BEGIN_SDK
Add(EditMulti,2706561,21,21)
{
EventCount=2
}
Add(Panel,13506441,35,105)
{
Top=-11
Width=1251
Height=38
Align=4
BorderWidth=0
BevelWidth=0
}
Add(Button,4101179,164,18)
{
Left=10
Top=5
Width=120
Height=30
Caption="Удалить Клинета"
link(onClick,2706561:onEvent1,[(258,24)(258,27)])
}
Add(Button,8169091,144,89)
{
Left=330
Top=5
Width=110
Height=25
Caption="Отмена"
link(onClick,2706561:onEvent2,[(248,95)(248,34)])
}
END_SDK
Add(MainForm,14389453,84,42)
{
Left=35
Top=105
Width=640
Height=480
Visible=1
Caption="Контрагенты"
Position=1
Point(doShowModal)
Point(onClose)
Point(onSetFocus)
Point(onKillFocus)
Point(onShow)
link(onActivate,6677629:doEvent3,[(314,48)(314,55)])
link(onCreate,6838620:doEvent1,[])
}
Add(StringTableMT,13053839,532,287)
{
Top=35
Width=1259
Height=721
Align=5
Columns=#8:Номер=40|27:Название фирмы партнера=150|22:Наименование Фирмы=100|37:Англ. Наименование (Обязательно!)=100|5:Адрес|3:ИНН|3:КПП|14:Расчетный счет|4:Банк|9:Кор. счет|3:БИК|6:Е@майл|7:Телефон|15:Контактное лицо|18:Использовать прайс|11:Код клиента|22:Закрепленный заправщик|10:Примечание|
StrDelimiter="\9"
Grid=0
IconsCheck=[]
MiscIcons=[]
Icons=[]
Point(doMT_Add)
Point(Strings)
Point(Index)
Point(onDblClick)
Point(EndIdx)
Point(onChange)
link(onClick,12817222:doWork2,[(604,293)(604,391)])
link(onDblClick,12817222:doWork1,[(604,300)(604,384)])
}
Add(DSC_Query,6815197,196,133)
{
SQL="SELECT * FROM kontragenti ORDER BY nazvanie ASC"
DSManager="parent.global"
link(onQuery,14482478:doEvent1,[(334,139)(334,328)])
}
Add(Hub,6838620,140,56)
{
OutCount=3
link(onEvent1,6677629:doEvent2,[(332,62)(332,48)])
link(onEvent2,6815197:doQuery,[(175,69)(175,139)])
link(onEvent3,14150523:doExec,[(200,76)(200,62)])
}
Add(DSC_Exec,14150523,245,56)
{
SQL="CREATE TABLE kontragenti (nomer int, nazvanie char, polnoe_naimenovanie char, angl_nazvanie char, adres char, inn char, kpp char, raschetniy_schet char, bank char, kor_schet char, bik char, email char, telefon char, kontact_lico char, ispolzovat_price char, cod_clienta char, zapravshik char, primechanie char)\r\n"
DSManager="parent.global"
}
Add(FormatStr,665183,539,154)
{
DataCount=1
Mask="INSERT INTO kontragenti(nomer) SELECT max(nomer)+1 FROM kontragenti;"
Point(FString)
link(onFString,13109121:doExec,[])
}
Add(DSC_Exec,13109121,609,154)
{
DSManager="parent.global"
link(SQL,665183:FString,[(615,142)(587,142)(587,198)(545,198)])
}
Add(Hub,11279204,399,511)
{
link(onEvent1,10597944:doRead,[])
link(onEvent2,15991349:doData,[(420,524)(420,531)])
}
Add(ArrayRW,10597944,546,511)
{
link(onRead,5550212:doSplit,[])
link(Array,7870548:Var2,[])
link(Index,15447161:Var2,[])
}
Add(GetDataEx,1153524,546,402)
{
Angle=3
link(Data,13053839:Strings,[(552,407)])
}
Add(MultiStrPart,5550212,637,511)
{
Char="\9"
Count=1
link(onSplit,11003076:doString,[])
}
Add(FormatStr,11003076,707,511)
{
DataCount=1
Mask="DELETE FROM kontragenti WHERE nomer=%1"
Point(FString)
link(onFString,12749641:doExec,[])
link(Str1,5550212:Part1,[(713,499)(671,499)(671,555)(643,555)])
}
Add(DSC_Exec,12749641,763,511)
{
DSManager="parent.global"
link(onExec,6677629:doEvent1,[(800,517)(800,226)(499,226)(499,41)])
link(SQL,11003076:FString,[(769,499)(741,499)(741,555)(713,555)])
}
Add(DoData,15991349,441,525)
{
link(onEventData,13053839:doDelete,[(510,531)(510,307)])
link(Data,15447161:Var1,[(447,474)])
}
Add(GetDataEx,15447161,553,469)
{
link(Data,1564464:Var2,[])
}
Add(ChildForm,9467718,714,119)
{
FirstUsage=0
link(onEvent1,14480963:onEvent1,[(869,125)(869,127)])
link(onEvent3,6270659:doEvent1,[(758,139)(758,219)(275,219)(275,300)])
link(onEvent4,9802789:doQuery,[(811,146)(811,153)])
}
BEGIN_SDK
Add(EditMulti,2379941,-35,-7)
{
EventCount=6
WorkCount=1
DataCount=1
VarCount=2
Width=1329
Height=823
link(doWork1,14021805:doShowModal,[(21,-1)(21,237)])
link(Var1,16034921:Index,[(-29,629)(689,629)])
link(Var2,13311944:Var1,[(-22,82)])
}
Add(MainForm,14021805,154,203)
{
Left=35
Top=105
Width=807
Height=383
Visible=1
Point(onClose)
Point(doShowModal)
link(onActivate,11585841:doEvent1,[(250,209)(250,139)])
link(onDeactivate,2379941:onEvent4,[(775,216)(775,20)])
link(onCreate,15049992:doOpen,[])
link(onClose,15049992:doClose,[])
}
Add(Edit,8193515,567,280)
{
Left=220
Top=210
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Edit,4896915,574,315)
{
Left=220
Top=245
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Edit,7707199,588,350)
{
Left=220
Top=280
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Edit,15698063,616,413)
{
Left=615
Top=70
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Label,3448287,1184,371)
{
Left=10
Top=10
Width=154
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Название фирмы партнера"
}
Add(Label,12074310,1182,420)
{
Left=10
Top=50
Width=176
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Полное Наименование фирмы"
}
Add(Label,16429677,1182,462)
{
Left=10
Top=85
Width=156
Height=39
Font=[Times New Roman,10,1,0,204]
Caption="Английское Наименование (Обязательно!)"
}
Add(Label,4932833,1183,511)
{
Left=10
Top=140
Width=39
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Адрес"
}
Add(Label,1072301,1176,553)
{
Left=10
Top=170
Width=31
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="ИНН"
}
Add(Label,11865404,1183,595)
{
Left=10
Top=210
Width=30
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="КПП"
}
Add(Label,3469290,1183,679)
{
Left=10
Top=245
Width=91
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Расчетный счет"
}
Add(Label,15736005,1197,728)
{
Left=410
Top=10
Width=56
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Кор. счет"
}
Add(Label,1739345,1187,641)
{
Left=10
Top=280
Width=30
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Банк"
}
Add(Button,7503969,28,378)
{
Left=600
Top=305
Width=85
Height=35
Enabled=1
Caption="ОК"
Point(doEnabled)
link(onClick,13004597:doEvent1,[])
}
Add(Button,13679188,63,245)
{
Left=695
Top=305
Width=85
Height=35
Caption="ОТМЕНА"
link(onClick,13117481:doEvent1,[(111,251)(111,293)])
}
Add(Edit,8947271,511,35)
{
Left=220
Top=10
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
Point(doSetFocus)
link(onChange,15997396:doWork1,[(569,41)(569,139)(408,139)(408,237)])
}
Add(DS_SQLite,15049992,203,217)
{
Name="global"
FileName=".\global.db"
WaitClose=0
link(onOpen,942555:doEvent1,[])
}
Add(Hub,14982477,140,385)
{
OutCount=3
link(onEvent1,13117481:doEvent3,[(166,391)(166,349)(114,349)(114,307)])
link(onEvent2,8675650:doString,[(228,398)(228,699)])
link(onEvent3,2379941:onEvent1,[(724,405)(724,-1)])
}
Add(Hub,13117481,126,287)
{
InCount=3
link(onEvent1,14021805:doClose,[(147,293)(147,230)])
}
Add(Label,772740,1194,725)
{
Left=410
Top=40
Width=28
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="БИК"
}
Add(Label,71411,1188,719)
{
Left=410
Top=70
Width=44
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="E@mail"
}
Add(Label,9676561,1181,712)
{
Left=410
Top=135
Width=98
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Контактное лицо"
}
Add(Label,3842413,1174,705)
{
Left=410
Top=105
Width=53
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Телефон"
}
Add(Label,1664523,1167,698)
{
Left=410
Top=175
Width=116
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Использовать прайс"
}
Add(Label,13024792,1160,691)
{
Left=410
Top=210
Width=71
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Код клиента"
}
Add(Label,11531711,1153,684)
{
Left=410
Top=245
Width=148
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Закрепленный заправщик"
}
Add(Label,5124501,1146,677)
{
Left=410
Top=280
Width=75
Height=19
Font=[Times New Roman,10,0,0,204]
Caption="Примечание"
}
Add(Edit,9848688,536,165)
{
Left=220
Top=90
Width=160
Font=[Times New Roman,10,0,0,204]
Enabled=1
Text=""
Point(doSetFocus)
link(onChange,4175374:In,[(585,171)(585,174)])
}
Add(ComboBox,11496103,823,606)
{
Left=615
Top=245
Width=160
Height=21
Font=[Times New Roman,10,0,0,204]
Strings=#3:Нет|
Text=""
DataType=1
Point(Handle)
Point(Index)
Point(onSelect)
}
Add(Edit,11868430,529,102)
{
Left=220
Top=50
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Edit,3983540,704,536)
{
Left=615
Top=210
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Edit,797990,865,641)
{
Left=615
Top=280
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Edit,7914082,613,480)
{
Left=615
Top=105
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Edit,9688994,613,536)
{
Left=615
Top=135
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Edit,9606788,599,389)
{
Left=615
Top=10
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Edit,12710250,620,445)
{
Left=615
Top=40
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Edit,6824894,543,200)
{
Left=220
Top=130
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(Edit,8358532,557,242)
{
Left=220
Top=170
Width=160
Font=[Times New Roman,10,0,0,204]
Text=""
}
Add(DSC_Exec,1263187,785,693)
{
DSManager="parent.parent.global"
}
Add(DSC_Query,14112046,756,609)
{
SQL="SELECT fio FROM sotrudniki"
DSManager="parent.parent.global"
link(onQuery,11496103:doAdd,[(806,615)(806,612)])
}
Add(LineBreak,1448107,714,609)
{
link(Out,14112046:doQuery,[])
Primary=[8707490,-434,-392]
}
Add(GetDataEx,13311944,511,77)
{
link(Data,8947271:Text,[])
}
Add(ComboBox,16034921,662,494)
{
Left=615
Top=170
Width=160
Height=21
Font=[Times New Roman,10,0,0,204]
Text=""
DataType=1
Point(Handle)
Point(Index)
Point(onSelect)
}
Add(Hub,942555,252,217)
{
link(onEvent1,8707490:In,[])
link(onEvent2,13711868:In,[])
}
Add(DSC_Query,1590475,693,336)
{
SQL="SELECT naimenovanie FROM kategory_price"
DSManager="parent.parent.global"
link(onQuery,16034921:doAdd,[(816,342)(816,500)])
}
Add(LineBreak,6701965,637,336)
{
link(Out,1590475:doQuery,[])
Primary=[13711868,-357,-112]
}
Add(Button,1036844,49,455)
{
Left=515
Top=305
Width=75
Height=35
Enabled=1
Caption="Добавить"
Point(doEnabled)
link(onClick,7304843:doEvent1,[(89,461)(89,440)])
}
Add(Hub,13004597,77,378)
{
link(onEvent1,13117481:doEvent2,[(109,384)(109,300)])
link(onEvent2,3255284:doEvent1,[])
}
Add(Hub,3255284,112,385)
{
InCount=2
OutCount=1
link(onEvent1,14982477:doEvent1,[])
}
Add(ChildForm,8146851,252,574)
{
FirstUsage=0
link(onEvent1,2379941:onEvent5,[(789,580)(789,27)])
link(onEvent2,2379941:onEvent6,[(789,587)(789,34)])
link(Data1,5483149:Var1,[(258,389)])
}
BEGIN_SDK
Add(EditMulti,14390227,21,21)
{
EventCount=2
WorkCount=1
DataCount=1
Width=1315
Height=788
link(doWork1,1590239:doShowModal,[(73,27)(73,195)])
}
Add(ChildPanel,12795484,28,203)
{
link(onEvent1,11900977:doEvent2,[(68,209)(68,321)(94,321)(94,244)])
link(onEvent2,7738847:doEvent1,[(65,216)(65,265)])
link(onEvent3,16211581:doEvent2,[])
}
BEGIN_SDK
Add(EditMulti,5115687,21,21)
{
EventCount=3
}
Add(Panel,11032594,35,105)
{
Top=472
Width=364
Height=41
Align=4
}
Add(Button,12090924,44,30)
{
Left=10
Top=5
Width=70
Height=35
Caption="Сохранить"
link(onClick,5115687:onEvent1,[(198,36)(198,27)])
}
Add(Button,2547117,171,51)
{
Left=265
Top=5
Width=70
Height=35
Caption="Отмена"
link(onClick,5115687:onEvent2,[(262,57)(262,34)])
}
Add(Button,9624714,249,112)
{
Left=145
Top=5
Width=60
Height=35
Caption="Очистить"
link(onClick,5115687:onEvent3,[(287,118)(287,41)])
}
END_SDK
Add(ChildPanel,15552921,399,301)
{
link(onEvent1,6215464:doMT_Add,[(461,307)(461,244)])
}
BEGIN_SDK
Add(EditMulti,4159810,21,21)
{
EventCount=1
}
Add(Panel,7378138,35,105)
{
Width=364
Height=55
Align=2
BorderWidth=0
BevelWidth=0
}
Add(Label,1814261,69,27)
{
Left=5
Top=10
Width=91
Height=17
Caption="Заполнить ценой"
}
Add(DSC_Query,8435477,203,42)
{
SQL="SELECT nomer, vid_rabot, model, partner FROM price"
DSManager="parent.parent.parent.parent.global"
link(onQuery,10526459:doEvent1,[(275,48)(275,90)])
}
Add(Button,15192029,140,42)
{
Left=235
Top=5
Width=115
Height=25
Caption="Партнер"
link(onClick,8435477:doQuery,[])
}
Add(Button,13220521,140,91)
{
Left=105
Top=5
Width=60
Height=25
Caption="Розница"
link(onClick,8548199:doQuery,[])
}
Add(DSC_Query,8548199,203,91)
{
SQL="SELECT nomer, vid_rabot, model, roznica FROM price"
DSManager="parent.parent.parent.parent.global"
link(onQuery,10526459:doEvent2,[])
}
Add(Hub,10526459,280,84)
{
InCount=2
OutCount=1
link(onEvent1,4159810:onEvent1,[(308,90)(308,27)])
}
Add(Label,1868121,14,35)
{
Top=35
Width=365
Height=17
Caption="При заполнении прайса обязательно выберите любую строку таблицы"
}
END_SDK
Add(MainForm,1590239,140,161)
{
Left=35
Top=105
Width=372
Height=547
Visible=1
Point(doShowModal)
link(onActivate,14390227:onEvent1,[(754,167)(754,27)])
link(onCreate,14519631:doOpen,[(177,181)(177,230)])
}
Add(DS_SQLite,14519631,189,224)
{
Name="global"
FileName=".\global.db"
link(onOpen,6626196:doEvent1,[])
}
Add(StringTableMT,6215464,490,203)
{
Top=55
Width=364
Height=417
Align=5
Columns=#4:№=25|6:Услуга|6:Модель|7:Цена=35|
StrDelimiter="\9"
Redaction=0
Grid=0
IconsCheck=[]
MiscIcons=[]
Icons=[]
Point(doMT_Add)
Point(Strings)
Point(Index)
Point(onDblClick)
Point(Cell)
Point(onChange)
Point(onLineChange)
link(onClick,12604284:doEvent1,[])
link(onDblClick,12604284:doEvent2,[])
link(onChange,12604284:doEvent3,[])
link(onLineChange,12604284:doEvent4,[])
}
Add(Hub,6626196,252,224)
{
}
Add(Hub,11900977,105,231)
{
InCount=2
link(onEvent1,1590239:doClose,[(123,237)(123,188)])
link(onEvent2,14390227:onEvent2,[(727,244)(727,34)])
}
Add(Hub,7738847,70,259)
{
link(onEvent1,11900977:doEvent1,[(105,265)])
link(onEvent2,16211581:doEvent1,[(287,272)(287,216)])
}
Add(ArrayRW,494619,609,203)
{
link(onRead,12314249:doSplit,[])
link(Array,6215464:Strings,[(615,191)(563,191)(563,260)(510,260)])
}
Add(MultiStrPart,12314249,672,203)
{
Char="\9"
Count=4
link(onSplit,5925683:doString,[(716,209)(716,265)(660,265)(660,300)])
}
Add(FormatStr,5925683,672,294)
{
DataCount=4
Mask="UPDATE price SET '%2'='%4' WHERE nomer=%1"
Point(FString)
link(onFString,5428505:doExec,[])
link(Str1,12314249:Part1,[])
link(Str2,14390227:Data1,[(685,158)(27,158)])
link(Str4,12314249:Part4,[])
}
Add(DSC_Exec,5428505,742,294)
{
DSManager="parent.parent.parent.global"
link(SQL,5925683:FString,[(748,282)(713,282)(713,338)(678,338)])
}
Add(Hub,12604284,546,203)
{
InCount=4
OutCount=1
link(onEvent1,494619:doRead,[])
}
Add(Hub,16211581,427,210)
{
InCount=2
OutCount=1
link(onEvent1,6215464:doClear,[])
}
END_SDK
Add(Hub,7304843,98,434)
{
OutCount=3
link(onEvent1,3255284:doEvent2,[(124,440)(124,419)(100,419)(100,398)])
link(onEvent2,8146851:doWork1,[(182,447)(182,580)])
link(onEvent3,7503969:doEnabled,[(124,454)(124,419)(16,419)(16,384)])
}
Add(Hub,11585841,315,133)
{
OutCount=3
link(onEvent1,5259777:doEvent1,[(395,139)(395,48)])
link(onEvent2,2379941:onEvent3,[(847,146)(847,13)])
link(onEvent3,8347477:doQuery,[(343,153)(343,90)])
}
Add(Hub,5259777,413,42)
{
link(onEvent1,8947271:doText,[(445,48)(445,41)])
link(onEvent2,8947271:doSetFocus,[])
}
Add(LineBreak,4191113,-14,455)
{
link(Out,1643356:doEvent1,[])
Primary=[4175374,609,-287]
}
Add(MultiElement,15997396,420,231)
{
link(onEvent1,9848688:doText,[(459,237)(459,171)])
}
BEGIN_SDK
Add(EditMulti,12137061,42,49)
{
EventCount=1
WorkCount=1
DataCount=1
Width=1549
Height=60
VOffset=21
HOffset=21
link(doWork1,7056492:doModify,[])
}
Add(Replace,11439842,112,70)
{
SubStr="а"
DestStr="a"
link(onReplace,530333:doReplace,[])
}
Add(Replace,530333,154,70)
{
SubStr="б"
DestStr="b"
link(onReplace,11128969:doReplace,[])
}
Add(Replace,11128969,196,70)
{
SubStr="в"
DestStr="v"
link(onReplace,3391353:doReplace,[])
}
Add(Replace,3391353,238,70)
{
SubStr="г"
DestStr="g"
link(onReplace,14636492:doReplace,[])
}
Add(Replace,14636492,280,70)
{
SubStr="д"
DestStr="d"
link(onReplace,12283807:doReplace,[])
}
Add(Replace,12283807,322,70)
{
SubStr="е"
DestStr="e"
link(onReplace,16094144:doReplace,[])
}
Add(Replace,16094144,364,70)
{
SubStr="ё"
DestStr="yo"
link(onReplace,15370106:doReplace,[])
}
Add(Replace,15370106,406,70)
{
SubStr="ж"
DestStr="zh"
link(onReplace,16045438:doReplace,[])
}
Add(Replace,16045438,448,70)
{
SubStr="з"
DestStr="z"
link(onReplace,7316617:doReplace,[])
}
Add(Replace,7316617,490,70)
{
SubStr="и"
DestStr="i"
link(onReplace,7859333:doReplace,[])
}
Add(Replace,7859333,532,70)
{
SubStr="й"
DestStr="i"
link(onReplace,4297793:doReplace,[])
}
Add(Replace,4297793,574,70)
{
SubStr="к"
DestStr="k"
link(onReplace,14445077:doReplace,[])
}
Add(Replace,14445077,616,70)
{
SubStr="л"
DestStr="l"
link(onReplace,2487017:doReplace,[])
}
Add(Replace,2487017,658,70)
{
SubStr="м"
DestStr="m"
link(onReplace,13580692:doReplace,[])
}
Add(Replace,13580692,700,70)
{
SubStr="н"
DestStr="n"
link(onReplace,634748:doReplace,[])
}
Add(Replace,634748,742,70)
{
SubStr="о"
DestStr="o"
link(onReplace,439275:doReplace,[])
}
Add(Replace,439275,784,70)
{
SubStr="п"
DestStr="p"
link(onReplace,10546314:doReplace,[])
}
Add(Replace,10546314,826,70)
{
SubStr="р"
DestStr="r"
link(onReplace,5604329:doReplace,[])
}
Add(Replace,5604329,868,70)
{
SubStr="с"
DestStr="s"
link(onReplace,8844822:doReplace,[])
}
Add(Replace,8844822,910,70)
{
SubStr="т"
DestStr="t"
link(onReplace,1176478:doReplace,[])
}
Add(Replace,1176478,952,70)
{
SubStr="у"
DestStr="u"
link(onReplace,2638968:doReplace,[])
}
Add(Replace,2638968,994,70)
{
SubStr="ф"
DestStr="f"
link(onReplace,2325184:doReplace,[])
}
Add(Replace,2325184,1036,70)
{
SubStr="х"
DestStr="h"
link(onReplace,7324732:doReplace,[])
}
Add(Replace,7324732,1078,70)
{
SubStr="ц"
DestStr="tс"
link(onReplace,7644681:doReplace,[])
}
Add(Replace,7644681,1118,70)
{
SubStr="ч"
DestStr="ch"
link(onReplace,5102336:doReplace,[])
}
Add(Replace,5102336,1160,70)
{
SubStr="ш"
DestStr="sh"
link(onReplace,1683350:doReplace,[])
}
Add(Replace,1683350,1202,70)
{
SubStr="щ"
DestStr="sh"
link(onReplace,713049:doReplace,[])
}
Add(Replace,713049,1244,70)
{
SubStr="ь"
DestStr="'"
link(onReplace,2888230:doReplace,[])
}
Add(Replace,12869705,1370,70)
{
SubStr="э"
DestStr="a"
link(onReplace,10021912:doReplace,[])
}
Add(Replace,12585389,1328,70)
{
SubStr="ъ"
link(onReplace,12869705:doReplace,[])
}
Add(Replace,2888230,1286,70)
{
SubStr="ы"
DestStr="y"
link(onReplace,12585389:doReplace,[])
}
Add(Replace,10021912,1412,70)
{
SubStr="ю"
DestStr="yu"
link(onReplace,7662520:doReplace,[])
}
Add(Replace,7662520,1454,70)
{
SubStr="я"
DestStr="ya"
link(onReplace,1073863:doReplace,[])
}
Add(StrCase,7056492,63,70)
{
link(onModify,11439842:doReplace,[])
link(Str,12137061:Data1,[])
}
Add(Replace,1073863,1510,70)
{
SubStr=" "
DestStr="_"
link(onReplace,12137061:onEvent1,[])
}
END_SDK
Add(CheckBox,16362267,28,511)
{
Left=5
Top=315
Width=505
Caption="Если Вы заполнили все данные поставьте пожалуйста флажок и нажмите кнопку ДОБАВИТЬ"
link(onCheck,1643356:doEvent2,[(72,517)(72,493)(16,493)(16,468)])
}
Add(Hub,1643356,28,455)
{
InCount=2
OutCount=1
link(onEvent1,1036844:doEnabled,[])
}
Add(FormatStr,8675650,525,693)
{
DataCount=18
Mask="UPDATE kontragenti SET [nazvanie]='%1', \r\n [polnoe_naimenovanie]='%2', \r\n [angl_nazvanie]='%3', \r\n [adres] ='%4', \r\n [inn] ='%5', \r\n [kpp] ='%6', \r\n [raschetniy_schet] ='%7', \r\n [bank] ='%8', \r\n [kor_schet] ='%9', \r\n [bik] ='%10', \r\n [email] ='%11', \r\n [telefon] ='%12', \r\n [kontact_lico] ='%13', \r\n [ispolzovat_price] ='%14', \r\n [cod_clienta] ='%15', \r\n [zapravshik] ='%16', \r\n [primechanie] ='%17'\r\n WHERE [nomer]=%18;"
link(onFString,1263187:doExec,[])
link(Str1,13311944:Var2,[(531,393)(517,393)])
link(Str2,11868430:Text,[(538,417)(535,417)])
link(Str3,5483149:Var2,[(545,541)(542,541)])
link(Str4,6824894:Text,[(552,540)(549,540)])
link(Str5,8358532:Text,[(559,483)(563,483)])
link(Str6,8193515:Text,[(566,503)(573,503)])
link(Str7,4896915:Text,[(573,520)(580,520)])
link(Str8,7707199:Text,[(580,537)(594,537)])
link(Str9,9606788:Text,[(587,435)(605,435)])
link(Str10,12710250:Text,[(594,490)(626,490)])
link(Str11,15698063:Text,[(601,453)(622,453)])
link(Str12,7914082:Text,[(608,589)(619,589)])
link(Str13,9688994:Text,[(615,606)(619,606)])
link(Str14,16034921:String,[(622,616)(675,616)])
link(Str15,3983540:Text,[(629,631)(710,631)])
link(Str16,11496103:String,[(636,672)(836,672)])
link(Str17,797990:Text,[(643,683)(871,683)])
link(Str18,8347477:Result,[])
}
Add(GetDataEx,5483149,536,381)
{
link(Data,9848688:Text,[])
}
Add(DSC_QueryScalar,8347477,644,84)
{
SQL="SELECT COUNT(*) FROM kontragenti"
DSManager="parent.parent.global"
}
END_SDK
Add(Hub,9374952,462,70)
{
link(onEvent1,9467718:doWork1,[(595,76)(595,125)])
link(onEvent2,665183:doString,[(508,83)(508,160)])
}
Add(ChildForm,12817222,693,378)
{
FirstUsage=0
link(Data2,7870548:Var3,[(706,338)(613,338)(613,418)])
link(Data3,1564464:Var3,[(713,338)(620,338)(620,411)])
}
BEGIN_SDK
Add(EditMulti,15221509,-28,14)
{
EventCount=1
WorkCount=2
DataCount=3
Width=1427
Height=830
link(doWork1,8062457:doShowModal,[(21,20)(21,244)])
link(doWork2,1601173:doRead,[(38,27)(38,132)])
}
Add(MainForm,8062457,154,210)
{
Left=35
Top=105
Width=837
Height=415
Visible=1
Caption="Редактирование реквизитов контрагента"
Point(onClose)
Point(doShowModal)
link(onActivate,12031208:doSetFocus,[(324,216)(324,55)])
link(onDeactivate,15221509:onEvent1,[(792,223)(792,20)])
link(onCreate,3847960:doOpen,[])
link(onClose,3847960:doClose,[])
}
Add(Edit,6371502,469,546)
{
Left=230
Top=210
Width=190
Height=25
Font=[MS Sans Serif,12,0,0,1]
Text=""
link(Str,5580083:Part7,[(475,415)(244,415)])
}
Add(Edit,3406330,469,665)
{
Left=230
Top=245
Width=190
Height=25
Font=[MS Sans Serif,12,0,0,1]
Text=""
link(Str,5580083:Part8,[(475,419)(251,419)])
}
Add(Edit,369482,469,770)
{
Left=230
Top=280
Width=190
Height=25
Font=[MS Sans Serif,12,0,0,1]
Text=""
link(Str,5580083:Part9,[(475,436)(258,436)])
}
Add(Edit,3584000,1099,154)
{
Left=635
Top=75
Width=185
Height=25
Font=[MS Sans Serif,12,0,0,1]
Text=""
link(Str,5580083:Part12,[(1105,156)(279,156)])
}
Add(Label,13776450,1422,42)
{
Left=10
Top=10
Width=138
Height=24
Font=[MS Sans Serif,12,0,0,1]
Caption="Название фирмы партнера"
}
Add(Label,3147538,1420,91)
{
Left=10
Top=50
Width=163
Height=24
Font=[MS Sans Serif,12,0,0,1]
Caption="Полное Наименование фирмы"
}
Add(Label,5382834,1420,133)
{
Left=10
Top=90
Width=220
Height=24
Font=[MS Sans Serif,12,0,0,1]
Caption="Англ.Наименование не ред."
}
Add(Label,402104,1421,182)
{
Left=10
Top=140
Width=52
Height=24
Font=[MS Sans Serif,12,0,0,1]
Caption="Адрес"
}
Add(Label,10682440,1414,224)
{
Left=10
Top=170
Width=39
Height=24
Font=[MS Sans Serif,12,0,0,1]
Caption="ИНН"
}
Add(Label,16742240,1421,266)
{
Left=10
Top=210
Width=38
Height=24
Font=[MS Sans Serif,12,0,0,1]
Caption="КПП"
}
Add(Label,10062633,1421,350)
{
Left=10
Top=245
Width=51
Height=24
Font=[MS Sans Serif,12,0,0,1]
Caption="Расчетный счет"
}
Add(Label,6422460,1435,399)
{
Left=430
Top=10
Width=75
Height=24
Font=[MS Sans Serif,12,0,0,1]
Caption="Кор. счет"
}
Add(Label,6500044,1425,312)
{
Left=10
Top=280
Width=41
Height=24
Font=[MS Sans Serif,12,0,0,1]
Caption="Банк"
}
Add(Button,3568416,35,385)
{
Left=315
Top=330
Width=85
Height=40
Caption="ОК"
link(onClick,9612764:doEvent1,[])
}
Add(Button,6264284,63,245)
{
Left=470
Top=330
Width=85
Height=40
Caption="ОТМЕНА"
link(onClick,11158824:doEvent1,[(111,251)(111,293)])
}
Add(Edit,12031208,462,35)
{
Left=230
Top=10
Width=190
Height=25
Font=[MS Sans Serif,12,0,0,1]
Text=""
Point(doSetFocus)
link(Str,5580083:Part2,[(468,23)(332,23)(332,156)(209,156)])
}
Add(DS_SQLite,3847960,203,224)
{
Name="global"
FileName=".\global.db"
WaitClose=0
link(onOpen,9876680:In,[])
}
Add(DSC_Exec,7861455,609,91)
{
DSManager="parent.parent.global"
link(SQL,14358325:FString,[(615,72)(587,72)(587,128)(559,128)])
}
Add(FormatStr,14358325,553,91)
{
Mask="UPDATE kontragenti SET nazvanie='%2' WHERE nomer=%1"
Point(FString)
link(onFString,7861455:doExec,[])
link(Str1,10810715:Var2,[])
link(Str2,14678831:Var3,[(566,82)])
}
Add(DoData,47192,462,91)
{
link(onEventData,14358325:doString,[])
link(Data,14678831:Var2,[])
}
Add(Hub,5322682,133,385)
{
OutCount=11
link(onEvent1,617995:doEvent1,[(448,391)(448,370)])
link(onEvent2,47192:doData,[(410,398)(410,97)])
link(onEvent3,7844180:doData,[(371,405)(371,307)])
link(onEvent4,6491422:doData,[])
link(onEvent5,12522566:doData,[(406,419)(406,517)])
link(onEvent6,15470302:doData,[(410,426)(410,621)])
link(onEvent7,1254534:doData,[(410,433)(410,734)])
link(onEvent8,13292051:doData,[(452,440)(452,839)])
link(onEvent9,11158824:doEvent2,[(159,447)(159,373)(114,373)(114,300)])
link(onEvent10,16755554:doData,[(371,454)(371,202)])
}
Add(Hub,11158824,126,287)
{
InCount=2
OutCount=1
link(onEvent1,8062457:doClose,[(147,293)(147,237)])
}
Add(DSC_Exec,15493858,609,168)
{
DSManager="parent.parent.global"
link(SQL,4449385:FString,[(615,156)(587,156)(587,212)(566,212)])
}
Add(FormatStr,4449385,560,168)
{
Mask="UPDATE kontragenti SET polnoe_naimenovanie='%2' WHERE nomer=%1"
Point(FString)
link(onFString,15493858:doExec,[])
link(Str1,5816098:Var3,[(566,138)])
link(Str2,16294731:Var3,[(573,156)(525,156)(525,187)])
}
Add(DSC_Exec,12485757,623,301)
{
DSManager="parent.parent.global"
link(SQL,14268199:FString,[(629,289)(597,289)(597,345)(566,345)])
}
Add(FormatStr,14268199,560,301)
{
Mask="UPDATE kontragenti SET angl_nazvanie='%2' WHERE nomer=%1"
Point(FString)
link(onFString,12485757:doExec,[])
link(Str1,6625954:Var1,[(566,261)(522,261)(522,222)])
link(Str2,85940:Var3,[(573,278)])
}
Add(DSC_Exec,8069070,651,497)
{
DSManager="parent.parent.global"
link(SQL,1610677:FString,[(657,492)(622,492)(622,548)(538,548)])
}
Add(FormatStr,1610677,532,504)
{
Mask="UPDATE kontragenti SET inn=%2 WHERE nomer=%1"
Point(FString)
link(onFString,8069070:doExec,[(632,510)(632,503)])
link(Str1,10151587:Var2,[(538,474)(531,474)])
link(Str2,16332806:Var3,[(545,488)])
}
Add(DSC_Exec,9466477,651,609)
{
DSManager="parent.parent.global"
link(SQL,8758281:FString,[(657,597)(601,597)(601,660)(545,660)])
}
Add(FormatStr,8758281,539,616)
{
Mask="UPDATE kontragenti SET kpp=%2 WHERE nomer=%1"
Point(FString)