Сколько крику, истерики и прочего маразма про эту самую Нибиру! Хех, такие душещипательные сУжеты по ящику! а почитать первоисточник - слабо! а , хотябы, посмотреть сайт http://astrobiology.nasa.gov/ask-an-astrobiologist/intro/nibiru-and-doomsday-2012-questions-and-answers - слабО!
Учите матчасть, одним словом.
Кстати, помните, показали тетку, которой принтер на нибирутском языке печатал? Ей кто нибудь драйвера поставил? Наверное она того загрызет за осквернение нибирутского. Как те правозащитники, которые вопят, что не надо им гебешной статистики по репрессиям всяким, они сами больше напридумают!
понедельник, 13 декабря 2010 г.
среда, 1 декабря 2010 г.
НАНО, оно такое нано!
зашел на сайт РОСНАНО. СОлидно! почитал статью - коллеги стали смотреть как на идиота - сильно и неприлично хихикал ;-)
http://www.rusnano.com/Post.aspx/Show/29135
"...В России стоимость электроэнергии уже выше, чем в США, и рост ее идет значительно быстрее. Принимая во внимание, что уже существуют опытные образцы полупроводниковых источников света со световой отдачей в 160 Лм/Вт, можно сказать, что, со временем, окупаемость светодиодных систем освещения будет происходить за меньшее время."
Это учреждение, босс которого сначала был главным приватизатором, потом главным энергетиком.
В тексте, короче, говорится, через некоторое время, стоимость электроэнергии в России будет такова, что очень дорогие и экономичные светодиоды будут окупаться очень-очень быстро. Выгоднее будет строить светопроводы с солнечной стороны шарика. Представляете, такое оптоволокно, которое доставляет солнечный свет на завод! Зеленые уписиются от восторга! Ну или есть еще предложение - покупать китайские батарейки и ими освещаться, наши-то батарейки делать разучились.
Как вам это! Это в стране, в которой есть энергоресурсы, добыча, переработка и доставка потребителю БЕЗ НЕОБХОДИМОСТИ ТАСКАТЬ НЕФТЬ ИЗ-ЗА ОКЕАНА ОТ ВРАЖДЕБНЫХ ПОСТАВЩИКОВ!
РОИССЯ ВПЕРДЕ!
http://www.rusnano.com/Post.aspx/Show/29135
"...В России стоимость электроэнергии уже выше, чем в США, и рост ее идет значительно быстрее. Принимая во внимание, что уже существуют опытные образцы полупроводниковых источников света со световой отдачей в 160 Лм/Вт, можно сказать, что, со временем, окупаемость светодиодных систем освещения будет происходить за меньшее время."
Это учреждение, босс которого сначала был главным приватизатором, потом главным энергетиком.
В тексте, короче, говорится, через некоторое время, стоимость электроэнергии в России будет такова, что очень дорогие и экономичные светодиоды будут окупаться очень-очень быстро. Выгоднее будет строить светопроводы с солнечной стороны шарика. Представляете, такое оптоволокно, которое доставляет солнечный свет на завод! Зеленые уписиются от восторга! Ну или есть еще предложение - покупать китайские батарейки и ими освещаться, наши-то батарейки делать разучились.
Как вам это! Это в стране, в которой есть энергоресурсы, добыча, переработка и доставка потребителю БЕЗ НЕОБХОДИМОСТИ ТАСКАТЬ НЕФТЬ ИЗ-ЗА ОКЕАНА ОТ ВРАЖДЕБНЫХ ПОСТАВЩИКОВ!
РОИССЯ ВПЕРДЕ!
пятница, 26 ноября 2010 г.
Руссо-Маразмо
http://lenta.ru/news/2010/11/26/unstalin/ - чем Сталин был хуже остальных? Не умел так маскировать акции как остальные! Чем он Хуже Николашки-блаженного, нюни развалившего профукавшего державу? Чем он хуже Петра Первого с его реформами? да и на остальных посмотрите.
Нельзя идти на поводу у тех, кто задался целью лишить страну истории и опустить ее в этом до какой-то америки? А посмотрите на ту же америку! тут писать ничего не надо, достаточно почитать учебник истории (любой, какой хотите) о , например, расовой сегрегации, охоте на ведьм.
ХВАТИТ БРЕДА об уникальной кровожадности коммуняк и гэбни, об отсталости России! Они ни чем не выделяются на фоне остальных в истории России , да и всего мира. Проверьте и опровергните, только, чур, без подтасовок!
Нельзя идти на поводу у тех, кто задался целью лишить страну истории и опустить ее в этом до какой-то америки? А посмотрите на ту же америку! тут писать ничего не надо, достаточно почитать учебник истории (любой, какой хотите) о , например, расовой сегрегации, охоте на ведьм.
ХВАТИТ БРЕДА об уникальной кровожадности коммуняк и гэбни, об отсталости России! Они ни чем не выделяются на фоне остальных в истории России , да и всего мира. Проверьте и опровергните, только, чур, без подтасовок!
воскресенье, 14 ноября 2010 г.
для сборки hwgui примеров можно сделать hbmk.hbp файл:
======================
-lart_lgpl_2
-latk-1.0
-lcairo
-lfontconfig
-lfreetype
-lgdk_pixbuf-2.0
-lgdk-x11-2.0
-lgio-2.0
-lglib-2.0
-lgmodule-2.0
-lgnomeprint-2-2
-lgobject-2.0
-lgtcgi
-lgtcrs
-lgthread-2.0
-lgtk-x11-2.0
-lhbcommon
-lhbcpage
-lhbdebug
-lhblang
-lhbmacro
-lhbpp
-lhbrdd
-lhbrtl
-lhbsix
-lhbvm
-lhbxml
-lhwgui
-lm
-lncurses
-lpango-1.0
-lpangocairo-1.0
-lpangoft2-1.0
-lpng12
-lprocmisc
-lrddcdx
-lrddfpt
-lrddntx
-lrt
-lxml2
-lz
-pthread
======================
Я скопировал библиотеки и инклюды hwgui в соответствуюшие директории Харбора. (/usr/local/lib/harbour и /usr/local/include/harbour)
В примере dbview.prg нужно поменять функцию hb_codepage на hb_cdpselect.
======================
-lart_lgpl_2
-latk-1.0
-lcairo
-lfontconfig
-lfreetype
-lgdk_pixbuf-2.0
-lgdk-x11-2.0
-lgio-2.0
-lglib-2.0
-lgmodule-2.0
-lgnomeprint-2-2
-lgobject-2.0
-lgtcgi
-lgtcrs
-lgthread-2.0
-lgtk-x11-2.0
-lhbcommon
-lhbcpage
-lhbdebug
-lhblang
-lhbmacro
-lhbpp
-lhbrdd
-lhbrtl
-lhbsix
-lhbvm
-lhbxml
-lhwgui
-lm
-lncurses
-lpango-1.0
-lpangocairo-1.0
-lpangoft2-1.0
-lpng12
-lprocmisc
-lrddcdx
-lrddfpt
-lrddntx
-lrt
-lxml2
-lz
-pthread
======================
Я скопировал библиотеки и инклюды hwgui в соответствуюшие директории Харбора. (/usr/local/lib/harbour и /usr/local/include/harbour)
В примере dbview.prg нужно поменять функцию hb_codepage на hb_cdpselect.
среда, 10 ноября 2010 г.
пример HWGUI
Чтобы не потерять: пример кода с использованием HWGUI. Найден где-то на форуме. (пример работает, но создается очень маленькле окошко - нужно его раздвинуть)
#include "hwgui.ch"
Function Main
Local oMainWnd, oFont
Local aCombo := {"First","Second" }
PREPARE FONT oFont NAME "MS Sans Serif" WIDTH 0 HEIGHT -13
INIT WINDOW oMainWnd TITLE "Example" ;
FONT oFont ;
ON EXIT {||MsgYesNo("Really want to quit ?")}
@ 20,10 EDITBOX "Hello, World!" SIZE 200,30
@ 270,10 COMBOBOX aCombo SIZE 100, 150 TOOLTIP "Combobox"
@ 120,60 BUTTON "Close" SIZE 150,30 ;
ON CLICK {||oMainWnd:Close()}
MENU OF oMainWnd
MENUITEM "About" ACTION MsgInfo("First HwGUI Application")
ENDMENU
ACTIVATE WINDOW oMainWnd
Return
#include "hwgui.ch"
Function Main
Local oMainWnd, oFont
Local aCombo := {"First","Second" }
PREPARE FONT oFont NAME "MS Sans Serif" WIDTH 0 HEIGHT -13
INIT WINDOW oMainWnd TITLE "Example" ;
FONT oFont ;
ON EXIT {||MsgYesNo("Really want to quit ?")}
@ 20,10 EDITBOX "Hello, World!" SIZE 200,30
@ 270,10 COMBOBOX aCombo SIZE 100, 150 TOOLTIP "Combobox"
@ 120,60 BUTTON "Close" SIZE 150,30 ;
ON CLICK {||oMainWnd:Close()}
MENU OF oMainWnd
MENUITEM "About" ACTION MsgInfo("First HwGUI Application")
ENDMENU
ACTIVATE WINDOW oMainWnd
Return
вторник, 9 ноября 2010 г.
кодировки в консоли Linux
Вот попробовал последавать наставлениям Петра и попробовать использовать другие функции работы с кодировками. Итак:
-----------------------------------------------------------
-----------------------------------------------
Ну с кодом , наверное, все понятно. сначала демонстрация hb_setTermCP("ККК","ККК"), потом HB_CDPSELECT( "RU1251" ), потом ввод с клавиатуры, запись в БД в разных кодировках. Результат обнадеживает! данные записались в нужных кодировках. Теперь нужно бы проверить как поведет себя база с индексами, но это как нибудь потом. После проверки этого кода на винде.
-----------------------------------------------
проверил на wine - нормально видно только кодировку 1251, в которой , собственно он, wine, и работает.
-----------------------------------------------------------
REQUEST HB_CODEPAGE_RU1251
REQUEST HB_CODEPAGE_RU866
Function Main ()
local cMsg866, cMsg1251,mtest1251:="1234567890",mtest866:="1234567890",i
clear
cMsg866 := '�ਢ�� 866...' //привет 866
cMsg1251 := '������ 1251' //привет 1251
REQUEST HB_CODEPAGE_RU866
Function Main ()
local cMsg866, cMsg1251,mtest1251:="1234567890",mtest866:="1234567890",i
clear
cMsg866 := '�ਢ�� 866...' //привет 866
cMsg1251 := '������ 1251' //привет 1251
// тут про яркий синий воздушный шарик
arr866:={"�ન�", "�����", "���������", "��ਪ", "�ન�", "ᨭ��", "���������", "��ਪ"}
arr1251:={"�����", "�����", "���������", "�����", "�����", "�����", "���������", "�����"}
? '=====111================'
hb_setTermCP("RU866","RU866")
? 'HB_CDPSELECT( "RU866" )'
? cMsg866
? cMsg1251
hb_setTermCP("RU1251","RU1251")
? 'HB_CDPSELECT( "RUWIN" )'
? cMsg866
? cMsg1251
hb_setTermCP("","") // reset codepage to default value
? "=====222====================="
HB_CDPSELECT( "RU1251" )
?
?"CDPSELECT initial 1251:"
for each i in arr1251
? " ", i
end
?"CDPSELECT sorted:"
asort (arr1251)
for each i in arr1251
? " ",i
end
HB_CDPSELECT( "RU866" )
?
?"CDPSELECT initial 866:"
for each i in arr866
? " ",i
end
?"CDPSELECT sorted:"
asort (arr866)
for each i in arr866
? " ",i
end
? "=====333====================="
hb_setTermCP("RU1251","RU1251")
?
?"termcp initial 1251:"
for each i in arr1251
? " ", i
end
?"termcp sorted:"
asort (arr1251)
for each i in arr1251
? " ",i
end
hb_setTermCP("RU866","RU866")
?
?"termcp initial 866:"
for each i in arr866
? " ",i
end
?"termcp sorted:"
asort (arr866)
for each i in arr866
? " ",i
end
? "=====444====================="
dbCreate( "Nakl1.dbf", { {"f1251","C",10,0},{"f866","C",10,0} } )
hb_setTermCP("RU1251","RU1251")
@ 10,10 say "enter test" get mtest1251
read
? mtest1251
hb_setTermCP("RU866","RU866")
@ 10,10 say "enter test" get mtest866
read
? mtest866
use "Nakl1.dbf" new
Append blank
1->f1251:= mtest1251
1->f866:=mtest866
close all
Return Nil
? '=====111================'
hb_setTermCP("RU866","RU866")
? 'HB_CDPSELECT( "RU866" )'
? cMsg866
? cMsg1251
hb_setTermCP("RU1251","RU1251")
? 'HB_CDPSELECT( "RUWIN" )'
? cMsg866
? cMsg1251
hb_setTermCP("","") // reset codepage to default value
? "=====222====================="
HB_CDPSELECT( "RU1251" )
?
?"CDPSELECT initial 1251:"
for each i in arr1251
? " ", i
end
?"CDPSELECT sorted:"
asort (arr1251)
for each i in arr1251
? " ",i
end
HB_CDPSELECT( "RU866" )
?
?"CDPSELECT initial 866:"
for each i in arr866
? " ",i
end
?"CDPSELECT sorted:"
asort (arr866)
for each i in arr866
? " ",i
end
? "=====333====================="
hb_setTermCP("RU1251","RU1251")
?
?"termcp initial 1251:"
for each i in arr1251
? " ", i
end
?"termcp sorted:"
asort (arr1251)
for each i in arr1251
? " ",i
end
hb_setTermCP("RU866","RU866")
?
?"termcp initial 866:"
for each i in arr866
? " ",i
end
?"termcp sorted:"
asort (arr866)
for each i in arr866
? " ",i
end
? "=====444====================="
dbCreate( "Nakl1.dbf", { {"f1251","C",10,0},{"f866","C",10,0} } )
hb_setTermCP("RU1251","RU1251")
@ 10,10 say "enter test" get mtest1251
read
? mtest1251
hb_setTermCP("RU866","RU866")
@ 10,10 say "enter test" get mtest866
read
? mtest866
use "Nakl1.dbf" new
Append blank
1->f1251:= mtest1251
1->f866:=mtest866
close all
Return Nil
-----------------------------------------------
Ну с кодом , наверное, все понятно. сначала демонстрация hb_setTermCP("ККК","ККК"), потом HB_CDPSELECT( "RU1251" ), потом ввод с клавиатуры, запись в БД в разных кодировках. Результат обнадеживает! данные записались в нужных кодировках. Теперь нужно бы проверить как поведет себя база с индексами, но это как нибудь потом. После проверки этого кода на винде.
-----------------------------------------------
проверил на wine - нормально видно только кодировку 1251, в которой , собственно он, wine, и работает.
понедельник, 8 ноября 2010 г.
кодировка при вводе
Вот какой ответ получен на форуме http://clipper.borda.ru :
------------------------
Спасибо, уважаемый Петр! Все коротко, ясно и по теме. При первой возможности попробую. К сожалению возможности не всегда соответствуют желанию ;-)
Кроме уже освоенной вами hb_cdpSelect,
Harbour предлагает такие функции hb_setDispCP(), hb_setKeyCP(), hb_setTermCP().
Так, что есть выбор - перевести локаль в KOIR-8r и при помощи указанных функций добиться желаемого результата
или разблокировать экспериментальную поддержку UTF8 в исходниках, перекомпилировать Harbour и дальше опять с помощью setDispCP(), hb_setKeyCP() получить желаемое.
Все подробности ищите в ChangeLog
P.S. Я не линуксоид, больше чем советом, не совсем иногда уместным
, помочь не смогу.
Harbour предлагает такие функции hb_setDispCP(), hb_setKeyCP(), hb_setTermCP().
Так, что есть выбор - перевести локаль в KOIR-8r и при помощи указанных функций добиться желаемого результата
или разблокировать экспериментальную поддержку UTF8 в исходниках, перекомпилировать Harbour и дальше опять с помощью setDispCP(), hb_setKeyCP() получить желаемое.
Все подробности ищите в ChangeLog
P.S. Я не линуксоид, больше чем советом, не совсем иногда уместным
, помочь не смогу.------------------------
Спасибо, уважаемый Петр! Все коротко, ясно и по теме. При первой возможности попробую. К сожалению возможности не всегда соответствуют желанию ;-)
суббота, 6 ноября 2010 г.
попытка собрать hwgui на ubuntu
запускаем
hbmk2 hwgui.hbm
в результате куча ругани, что не найдены файлы windows.h и shlobj.h
hbmk2 hwgui.hbm
в результате куча ругани, что не найдены файлы windows.h и shlobj.h
как компилировать под UBUNTU
Не забывайте, что Harbour устанавливается в /usr/local/bin , его инклюды /usr/local/include/harbour , либы в /usr/local/lib/harbour .
Эти папки надо обычно указать в Makefile.linux .
Это ,например, нужно сделать для letodb server и hwgui.
Эти папки надо обычно указать в Makefile.linux .
Это ,например, нужно сделать для letodb server и hwgui.
пятница, 5 ноября 2010 г.
GET на UTF-8
если с выводом строк все достаточно прозрачно, то с вводом полное фиаско. попытка ввести строку привела к неудобоваримому представлению двубайтной кодировки. что делать - пока не знаю.
кодировки в программах на Harbour
Вот пример, который выдран с clipper.borda.ru. только там он для xHarbour, наверное, так как у меня не заработал в оригинале.
Итак: локаль UTF-8. Ubuntu. Консоль.
-------------------------------------------------------------------------
REQUEST HB_CODEPAGE_RU1251
REQUEST HB_CODEPAGE_RU866
Function Main ()
local cMsg866, cMsg1251
cMsg866 := '�ਢ�� 866...' //текст в кодировке 866
cMsg1251 := '������ 1251' //текст в кодировке 1251
HB_CDPSELECT("RU866")
? 'HB_CDPSELECT( "RU866" )'
? cMsg866
? cMsg1251
? '====================='
HB_CDPSELECT( "RU1251" )
? 'HB_CDPSELECT( "RUWIN" )'
? cMsg866
? cMsg1251
Return Nil
-------------------------------------------------------------------------
Получаем:
тоесть все строки можно хранить в старой доброй досовской кодировке, а на выводе система сделает преобразование в читабельную информацию.
вопрос с сортировкой проверяем. зададим массивы строк в 866 и 1251 кодировках. текст:
arr1251:={"Яркий", "синий", "Воздушный", "шарик", "яркий", "Синий", "воздушный", "Шарик"}
arr866:={"яркий", "Синий", "воздушный", "Шарик", "Яркий", "синий", "Воздушный", "шарик"}
естественно строки в НУЖНОЙ кодировке, а тут все видно для наглядности ;-)
--------------------------------
REQUEST HB_CODEPAGE_RU1251
REQUEST HB_CODEPAGE_RU866
Function Main()
local cMsg866, cMsg1251,arr866,arr1251,i
cMsg866 := '�ਢ�� 866...' //текст в кодировке 866
cMsg1251 := '������ 1251' //текст в кодировке 1251
arr1251:={"�����", "�����", "���������", "�����", "�����", "�����", "���������", "�����"}
arr866:={"�ન�", "�����", "���������", "��ਪ", "�ન�", "ᨭ��", "���������", "��ਪ"}
HB_CDPSELECT("RU866")
? 'HB_CDPSELECT( "RU866" )'
? cMsg866
? cMsg1251
? '====================='
HB_CDPSELECT( "RU1251" )
? 'HB_CDPSELECT( "RUWIN" )'
? cMsg866
? cMsg1251
HB_CDPSELECT( "RU1251" )
?
?"initial 1251:"
for each i in arr1251
? " ", i
end
?"sorted:"
asort (arr1251)
for each i in arr1251
? " ",i
end
HB_CDPSELECT( "RU866" )
?
?"initial 866:"
for each i in arr866
? " ",i
end
?"sorted:"
asort (arr866)
for each i in arr866
? " ",i
end
Return Nil
-----------------------------------------------------
в результате получаем:
HB_CDPSELECT( "RU866")
привет 866...
яЁштхЄ 1251
=====================
HB_CDPSELECT( "RUWIN" )
ЇаЁўҐв 866...
привет 1251
initial 1251:
Яркий
синий
Воздушный
шарик
яркий
Синий
воздушный
Шарик
sorted:
Воздушный
Синий
Шарик
Яркий
воздушный
синий
шарик
яркий
initial 866:
яркий
Синий
воздушный
Шарик
Яркий
синий
Воздушный
шарик
sorted:
Воздушный
Синий
Шарик
Яркий
воздушный
синий
шарик
яркий
значит сортировка работает корректно!
Итак: локаль UTF-8. Ubuntu. Консоль.
-------------------------------------------------------------------------
REQUEST HB_CODEPAGE_RU1251
REQUEST HB_CODEPAGE_RU866
Function Main ()
local cMsg866, cMsg1251
cMsg866 := '�ਢ�� 866...' //текст в кодировке 866
cMsg1251 := '������ 1251' //текст в кодировке 1251
HB_CDPSELECT("RU866")
? 'HB_CDPSELECT( "RU866" )'
? cMsg866
? cMsg1251
? '====================='
HB_CDPSELECT( "RU1251" )
? 'HB_CDPSELECT( "RUWIN" )'
? cMsg866
? cMsg1251
Return Nil
-------------------------------------------------------------------------
Получаем:
HB_CDPSELECT( "RU866" )
привет 866...
яЁштхЄ 1251
=====================
HB_CDPSELECT( "RUWIN" )
ЇаЁўҐв 866...
привет 1251
привет 866...
яЁштхЄ 1251
=====================
HB_CDPSELECT( "RUWIN" )
ЇаЁўҐв 866...
привет 1251
тоесть все строки можно хранить в старой доброй досовской кодировке, а на выводе система сделает преобразование в читабельную информацию.
вопрос с сортировкой проверяем. зададим массивы строк в 866 и 1251 кодировках. текст:
arr1251:={"Яркий", "синий", "Воздушный", "шарик", "яркий", "Синий", "воздушный", "Шарик"}
arr866:={"яркий", "Синий", "воздушный", "Шарик", "Яркий", "синий", "Воздушный", "шарик"}
естественно строки в НУЖНОЙ кодировке, а тут все видно для наглядности ;-)
--------------------------------
REQUEST HB_CODEPAGE_RU1251
REQUEST HB_CODEPAGE_RU866
Function Main()
local cMsg866, cMsg1251,arr866,arr1251,i
cMsg866 := '�ਢ�� 866...' //текст в кодировке 866
cMsg1251 := '������ 1251' //текст в кодировке 1251
arr1251:={"�����", "�����", "���������", "�����", "�����", "�����", "���������", "�����"}
arr866:={"�ન�", "�����", "���������", "��ਪ", "�ન�", "ᨭ��", "���������", "��ਪ"}
HB_CDPSELECT("RU866")
? 'HB_CDPSELECT( "RU866" )'
? cMsg866
? cMsg1251
? '====================='
HB_CDPSELECT( "RU1251" )
? 'HB_CDPSELECT( "RUWIN" )'
? cMsg866
? cMsg1251
HB_CDPSELECT( "RU1251" )
?
?"initial 1251:"
for each i in arr1251
? " ", i
end
?"sorted:"
asort (arr1251)
for each i in arr1251
? " ",i
end
HB_CDPSELECT( "RU866" )
?
?"initial 866:"
for each i in arr866
? " ",i
end
?"sorted:"
asort (arr866)
for each i in arr866
? " ",i
end
Return Nil
-----------------------------------------------------
в результате получаем:
HB_CDPSELECT( "RU866")
привет 866...
яЁштхЄ 1251
=====================
HB_CDPSELECT( "RUWIN" )
ЇаЁўҐв 866...
привет 1251
initial 1251:
Яркий
синий
Воздушный
шарик
яркий
Синий
воздушный
Шарик
sorted:
Воздушный
Синий
Шарик
Яркий
воздушный
синий
шарик
яркий
initial 866:
яркий
Синий
воздушный
Шарик
Яркий
синий
Воздушный
шарик
sorted:
Воздушный
Синий
Шарик
Яркий
воздушный
синий
шарик
яркий
значит сортировка работает корректно!
суббота, 30 октября 2010 г.
Баба Яга и др.
Опять смотрел с сынулей мультик про приключения БабкиЁжки. Замечательная сказка. От чего ей внимания меньше чем разным князям-владимирам? ААА! Понял, там для попов ничего интересного нету, одна языческая нечисть и обычаи! Хех, интересно почитать, они как-то про этот мультик высказались? Пушкину проклятья шлют, запрещают! Моська на слона!
четверг, 28 октября 2010 г.
не отдадим РПЦ наше!
С чего это попы решили, что церкви им принадлежат? строилось все народом на народные деньги для народа. Ныне, когода церковь ,наконец-то, отделена от государства,Церковники должны арендовать соответствующее имущество у государства, как представителя народа. На вырученные деньги можно это имущество облагоустраивать, поддерживать всякие приюты и контролировать, чтобы не становились рассадниками мракобесия. Ато опять въедут, за деньги будут туристов водить, рестораны наоткрывают, а деньги поди найди потом. А попы при новых мерседесах и хоромах. Они всегда выезжали нахаляву - ХВАТИТ!
воскресенье, 24 октября 2010 г.
Еще один камешек
Даешь Планетарий! Долой мракобесов!
Ударим Планетарием по мракобесию и безграмотности!
на и далее в этом духе.
http://www.gazeta.ru/science/2010/10/14_a_3428717.shtml
PS: надоели попы, даешь научный атеизм!
Ударим Планетарием по мракобесию и безграмотности!
на и далее в этом духе.
http://www.gazeta.ru/science/2010/10/14_a_3428717.shtml
PS: надоели попы, даешь научный атеизм!
суббота, 23 октября 2010 г.
ОПК - не пройдет!!!!!!!
Смотрите, читайте. Нужно не дать ввести ОПК и прочую религиозную хрень в школах.
http://www.scientific.ru/doska/opk.html
Достаточно того, что мы видим эти наглые поповские рожи по телеку.
http://www.scientific.ru/doska/opk.html
Достаточно того, что мы видим эти наглые поповские рожи по телеку.
среда, 20 октября 2010 г.
подбор кодировки кириллицы
Вот набрел случайно. Нужно было перекодировать сообщение, выданное программой ГУЕ, которая, в свою очередь его исказила. На сайте не все символы появились удобочитаемо, но достаточно, чтобы понять смысл.
Универсальный декодер кириллицы
Универсальный декодер кириллицы
среда, 13 октября 2010 г.
игры с SQL из Harbour (2)
теперь попробуем работать через SDDFB. тестов там нет, так что будем экспериментировать. Берем тест из sddmy и слегка адаптируем. БД уже создана в предыдущем посте, так что будем просто пытаться ее прочитать.
.....TO BE CONTINUED.......
user@desktop:~/sources/harbour/contrib/sddfb/tests$ cat test1.prgКомпилим
/*
* $Id: test1.prg 14222 2010-03-24 09:33:58Z vszakats $
*/
#include "dbinfo.ch"
#include "error.ch"
#include "hbrddsql.ch"
REQUEST SDDFB, SQLMIX
ANNOUNCE RDDSYS
FIELD RESIDENTS
PROCEDURE main()
Local DBpath,DBConnect
DBpath:='/home/user/data/simple1.gdb'
//ALTD()
RDDSETDEFAULT("SQLMIX")
AEVAL(RDDLIST(), {|X| QOUT(X)})
if hb_FileExists(DBpath)
? "file OK!"
ENDIF
DBConnect:=RDDINFO(RDDI_CONNECT, {"FIREBIRD","LOCALHOST", "SYSDBA", "masterkey", DBpath })
if aaa==0
? "Unable connect to the server"
RETURN
ENDIF
? "Let's browse table (press any key)"
INKEY(0)
? DBUSEAREA( .T.,, "SELECT * FROM test", "test" )
Browse()
? "Let's browse table ordered by resident count (press any key)"
INKEY(0)
INDEX ON RESIDENTS TAG residents TO country
Browse()
DBCLOSEALL()
RETURN
user@desktop:~/sources/harbour/contrib/sddfb/tests$ hbmk2 test1.prgи запускаем
hbmk2: Processing local make script: hbmk.hbm
Harbour 2.1.0beta2 (Rev. 15604)
Copyright (c) 1999-2010, http://harbour-project.org/
Compiling 'test1.prg'...
Lines 631, Functions/Procedures 2
Generating C source output to '/tmp/hbmk_r1mfw2.dir/test1.c'... Done.
user@desktop:~/sources/harbour/contrib/sddfb/tests$ ./test1Интересно, при чем тут DOS? Ну да ладно - будем разбираться.
SQLBASE
SQLMIX
DBF
DELIM
SDF
DBFFPT
DBFNTX
DBFNSX
DBFCDX
SIXCDX
DBFBLOB
file OK!
Let's browse table (press any key)
Error SDDFB/1909 Fetch error (DOS Error 335544569)
Called from DBUSEAREA(0)
Called from MAIN(37)
.....TO BE CONTINUED.......
игры с SQL из Harbour
Решил записать свои попытки работать с Firebird SQL сервером из Harbour.
Для работы использовал svn с официального сайта.
Компилируем
Смотрим сообщения на консоли. если ошибок нет - продолжаем. Иначе, нужно что-то доустановить. вот и все, harbour собран. Я использовал sudo, чтобы исключить проблемы с правами при установке. Если я не прав - поправьте меня.
Затем идем в contribs и компилируем примеры.
Предположительно на UBUNTU нельзя создавать БД со страницей 1024. Приводим исходник к следующемы виду:
/*
* $Id: simple.prg 13763 2010-02-04 11:56:22Z vszakats $
*/
#include "common.ch"
#include "simpleio.ch"
Function main()
Local oServer, oQuery, oRow, i, x, aTables, aStruct, aKey
Local cServer
Local cUser := "sysdba"
Local cPass := "masterkey"
Local nDialect := 3
Local cQuery
local DBpath
ALTD()
DBpath = ("/home/user/data/simple.gdb" )
cServer := "127.0.0.1:" + DBpath
//DBpath = (hb_dirBase() + "simple.gdb" )
IF hb_FileExists( DBpath )
FErase( DBpath )
ENDIF
? FBCreateDB( DBpath , cuser, cpass, 2048, "ASCII" , nDialect )
........
после этого БД создается, но при попытке вставки появляется ошибка:
создана нормальная БД. Вот ее метаданные:
попробую обновиться и начать с начала. Попутно посмотрю в INSTALL. Может чего-то я пропустил.
Итак, снова скачал с SVN исходники. Сделал make clean, из INSTALL повторил установку нужных -dev пакетов. Скомпилировал оригинальный simple.prg - ошибки
О счастье! все выполнилось!
1
Connecting...
Tables...
MON$ATTACHMENTS
MON$CALL_STACK
MON$DATABASE
MON$IO_STATS
MON$RECORD_STATS
MON$STATEMENTS
MON$TRANSACTIONS
MON$TRANSACTIONS
Using implicit transaction...
Creating domain for boolean fields...
Creating test table...
Press any key to continue...
Structure of test table
CODE N 5 0
DEPT N 9 0
NAME C 40 0
SALES L 1 0
TAX N 15 0
SALARY N 15 0
BUDGET N 15 2
DISCOUNT N 9 2
CREATION D 8 0
DESCRIPTION M 10 0
DESCRIPTION M 10 0
Inserting, declared transaction control
CODE N 5 0
NAME C 40 0
DESCRIPTION M 10 -2
SALES L 1 0
Fields: 4 Primary Key: CODE
4 1 0 CODE N 0 5 2
150 MY TEST
.T.
.T.
.F.
1 .T. TEST CODE N 0 5 Short Description about what ?
2 .T. TEST CODE N 0 5 Short Description about what ?
3 .T. TEST CODE N 0 5 Short Description about what ?
4 .T. TEST CODE N 0 5 Short Description about what ?
5 .T. TEST CODE N 0 5 Short Description about what ?
6 .T. TEST CODE N 0 5 Short Description about what ?
7 .T. TEST CODE N 0 5 Short Description about what ?
8 .T. TEST CODE N 0 5 Short Description about what ?
9 .T. TEST CODE N 0 5 Short Description about what ?
10 .T. TEST CODE N 0 5 Short Description about what ?
11 .T. TEST CODE N 0 5 Short Description about what ?
12 .T. TEST CODE N 0 5 Short Description about what ?
13 .T. TEST CODE N 0 5 Short Description about what ?
14 .T. TEST CODE N 0 5 Short Description about what ?
15 .T. TEST CODE N 0 5 Short Description about what ?
16 .T. TEST CODE N 0 5 Short Description about what ?
17 .T. TEST CODE N 0 5 Short Description about what ?
18 .T. TEST CODE N 0 5 Short Description about what ?
19 .T. TEST CODE N 0 5 Short Description about what ?
20 .T. TEST CODE N 0 5 Short Description about what ?
21 .T. TEST CODE N 0 5 Short Description about what ?
22 .T. TEST CODE N 0 5 Short Description about what ?
23 .T. TEST CODE N 0 5 Short Description about what ?
24 .T. TEST CODE N 0 5 Short Description about what ?
25 .T. TEST CODE N 0 5 Short Description about what ?
26 .T. TEST CODE N 0 5 Short Description about what ?
27 .T. TEST CODE N 0 5 Short Description about what ?
28 .T. TEST CODE N 0 5 Short Description about what ?
29 .T. TEST CODE N 0 5 Short Description about what ?
30 .T. TEST CODE N 0 5 Short Description about what ?
31 .T. TEST CODE N 0 5 Short Description about what ?
32 .T. TEST CODE N 0 5 Short Description about what ?
33 .T. TEST CODE N 0 5 Short Description about what ?
34 .T. TEST CODE N 0 5 Short Description about what ?
35 .T. TEST CODE N 0 5 Short Description about what ?
36 .T. TEST CODE N 0 5 Short Description about what ?
37 .T. TEST CODE N 0 5 Short Description about what ?
38 .T. TEST CODE N 0 5 Short Description about what ?
39 .T. TEST CODE N 0 5 Short Description about what ?
40 .T. TEST CODE N 0 5 Short Description about what ?
41 .T. TEST CODE N 0 5 Short Description about what ?
42 .T. TEST CODE N 0 5 Short Description about what ?
43 .T. TEST CODE N 0 5 Short Description about what ?
44 .T. TEST CODE N 0 5 Short Description about what ?
45 .T. TEST CODE N 0 5 Short Description about what ?
46 .T. TEST CODE N 0 5 Short Description about what ?
47 .T. TEST CODE N 0 5 Short Description about what ?
48 .T. TEST CODE N 0 5 Short Description about what ?
49 .T. TEST CODE N 0 5 Short Description about what ?
50 .T. TEST CODE N 0 5 Short Description about what ?
Update: .F.
51 .T. TEST CODE N 0 5 Short Description about what ?
52 .T. TEST CODE N 0 5 Short Description about what ?
53 .T. TEST CODE N 0 5 Short Description about what ?
54 .T. TEST CODE N 0 5 Short Description about what ?
55 .T. TEST CODE N 0 5 Short Description about what ?
56 .T. TEST CODE N 0 5 Short Description about what ?
57 .T. TEST CODE N 0 5 Short Description about what ?
58 .T. TEST CODE N 0 5 Short Description about what ?
59 .T. TEST CODE N 0 5 Short Description about what ?
60 .T. TEST CODE N 0 5 Short Description about what ?
Delete: .F.
61 .T. TEST CODE N 0 5 Short Description about what ?
62 .T. TEST CODE N 0 5 Short Description about what ?
63 .T. TEST CODE N 0 5 Short Description about what ?
64 .T. TEST CODE N 0 5 Short Description about what ?
65 .T. TEST CODE N 0 5 Short Description about what ?
66 .T. TEST CODE N 0 5 Short Description about what ?
67 .T. TEST CODE N 0 5 Short Description about what ?
68 .T. TEST CODE N 0 5 Short Description about what ?
69 .T. TEST CODE N 0 5 Short Description about what ?
70 .T. TEST CODE N 0 5 Short Description about what ?
71 .T. TEST CODE N 0 5 Short Description about what ?
72 .T. TEST CODE N 0 5 Short Description about what ?
73 .T. TEST CODE N 0 5 Short Description about what ?
74 .T. TEST CODE N 0 5 Short Description about what ?
75 .T. TEST CODE N 0 5 Short Description about what ?
76 .T. TEST CODE N 0 5 Short Description about what ?
77 .T. TEST CODE N 0 5 Short Description about what ?
78 .T. TEST CODE N 0 5 Short Description about what ?
79 .T. TEST CODE N 0 5 Short Description about what ?
80 .T. TEST CODE N 0 5 Short Description about what ?
81 .T. TEST CODE N 0 5 Short Description about what ?
82 .T. TEST CODE N 0 5 Short Description about what ?
83 .T. TEST CODE N 0 5 Short Description about what ?
84 .T. TEST CODE N 0 5 Short Description about what ?
85 .T. TEST CODE N 0 5 Short Description about what ?
86 .T. TEST CODE N 0 5 Short Description about what ?
87 .T. TEST CODE N 0 5 Short Description about what ?
88 .T. TEST CODE N 0 5 Short Description about what ?
89 .T. TEST CODE N 0 5 Short Description about what ?
90 .T. TEST CODE N 0 5 Short Description about what ?
91 .T. TEST CODE N 0 5 Short Description about what ?
92 .T. TEST CODE N 0 5 Short Description about what ?
93 .T. TEST CODE N 0 5 Short Description about what ?
94 .T. TEST CODE N 0 5 Short Description about what ?
95 .T. TEST CODE N 0 5 Short Description about what ?
96 .T. TEST CODE N 0 5 Short Description about what ?
97 .T. TEST CODE N 0 5 Short Description about what ?
98 .T. TEST CODE N 0 5 Short Description about what ?
99 .T. TEST CODE N 0 5 Short Description about what ?
100 .T. TEST CODE N 0 5 Short Description about what ?
100 .T. TEST CODE N 0 5 Short Description about what ?
100 .T. TEST CODE N 0 5 Short Description about what ?
Delete: .T.
1 .T. TEST CODE N 0 5 Short Description about what ?
2 .T. TEST CODE N 0 5 Short Description about what ?
3 .T. TEST CODE N 0 5 Short Description about what ?
4 .T. TEST CODE N 0 5 Short Description about what ?
5 .T. TEST CODE N 0 5 Short Description about what ?
6 .T. TEST CODE N 0 5 Short Description about what ?
7 .T. TEST CODE N 0 5 Short Description about what ?
8 .T. TEST CODE N 0 5 Short Description about what ?
9 .T. TEST CODE N 0 5 Short Description about what ?
10 .T. TEST CODE N 0 5 Short Description about what ?
11 .T. TEST CODE N 0 5 Short Description about what ?
12 .T. TEST CODE N 0 5 Short Description about what ?
13 .T. TEST CODE N 0 5 Short Description about what ?
14 .T. TEST CODE N 0 5 Short Description about what ?
15 .T. TEST CODE N 0 5 Short Description about what ?
16 .T. TEST CODE N 0 5 Short Description about what ?
17 .T. TEST CODE N 0 5 Short Description about what ?
18 .T. TEST CODE N 0 5 Short Description about what ?
19 .T. TEST CODE N 0 5 Short Description about what ?
20 .T. TEST CODE N 0 5 Short Description about what ?
21 .T. TEST CODE N 0 5 Short Description about what ?
22 .T. TEST CODE N 0 5 Short Description about what ?
23 .T. TEST CODE N 0 5 Short Description about what ?
24 .T. TEST CODE N 0 5 Short Description about what ?
25 .T. TEST CODE N 0 5 Short Description about what ?
26 .T. TEST CODE N 0 5 Short Description about what ?
27 .T. TEST CODE N 0 5 Short Description about what ?
28 .T. TEST CODE N 0 5 Short Description about what ?
29 .T. TEST CODE N 0 5 Short Description about what ?
30 .T. TEST CODE N 0 5 Short Description about what ?
31 .T. TEST CODE N 0 5 Short Description about what ?
32 .T. TEST CODE N 0 5 Short Description about what ?
33 .T. TEST CODE N 0 5 Short Description about what ?
34 .T. TEST CODE N 0 5 Short Description about what ?
35 .T. TEST CODE N 0 5 Short Description about what ?
36 .T. TEST CODE N 0 5 Short Description about what ?
37 .T. TEST CODE N 0 5 Short Description about what ?
38 .T. TEST CODE N 0 5 Short Description about what ?
39 .T. TEST CODE N 0 5 Short Description about what ?
40 .T. TEST CODE N 0 5 Short Description about what ?
41 .T. TEST CODE N 0 5 Short Description about what ?
42 .T. TEST CODE N 0 5 Short Description about what ?
43 .T. TEST CODE N 0 5 Short Description about what ?
44 .T. TEST CODE N 0 5 Short Description about what ?
45 .T. TEST CODE N 0 5 Short Description about what ?
46 .T. TEST CODE N 0 5 Short Description about what ?
47 .T. TEST CODE N 0 5 Short Description about what ?
48 .T. TEST CODE N 0 5 Short Description about what ?
49 .T. TEST CODE N 0 5 Short Description about what ?
50 .T. TEST CODE N 0 5 Short Description about what ?
51 .T. TEST CODE N 0 5 Short Description about what ?
52 .T. TEST CODE N 0 5 Short Description about what ?
53 .T. TEST CODE N 0 5 Short Description about what ?
54 .T. TEST CODE N 0 5 Short Description about what ?
55 .T. TEST CODE N 0 5 Short Description about what ?
56 .T. TEST CODE N 0 5 Short Description about what ?
57 .T. TEST CODE N 0 5 Short Description about what ?
58 .T. TEST CODE N 0 5 Short Description about what ?
59 .T. TEST CODE N 0 5 Short Description about what ?
60 .T. TEST CODE N 0 5 Short Description about what ?
61 .T. TEST CODE N 0 5 Short Description about what ?
62 .T. TEST CODE N 0 5 Short Description about what ?
63 .T. TEST CODE N 0 5 Short Description about what ?
64 .T. TEST CODE N 0 5 Short Description about what ?
65 .T. TEST CODE N 0 5 Short Description about what ?
66 .T. TEST CODE N 0 5 Short Description about what ?
67 .T. TEST CODE N 0 5 Short Description about what ?
68 .T. TEST CODE N 0 5 Short Description about what ?
69 .T. TEST CODE N 0 5 Short Description about what ?
71 .T. TEST CODE N 0 5 Short Description about what ?
72 .T. TEST CODE N 0 5 Short Description about what ?
73 .T. TEST CODE N 0 5 Short Description about what ?
74 .T. TEST CODE N 0 5 Short Description about what ?
75 .T. TEST CODE N 0 5 Short Description about what ?
76 .T. TEST CODE N 0 5 Short Description about what ?
77 .T. TEST CODE N 0 5 Short Description about what ?
78 .T. TEST CODE N 0 5 Short Description about what ?
79 .T. TEST CODE N 0 5 Short Description about what ?
80 .T. TEST CODE N 0 5 Short Description about what ?
81 .T. TEST CODE N 0 5 Short Description about what ?
82 .T. TEST CODE N 0 5 Short Description about what ?
83 .T. TEST CODE N 0 5 Short Description about what ?
84 .T. TEST CODE N 0 5 Short Description about what ?
85 .T. TEST CODE N 0 5 Short Description about what ?
86 .T. TEST CODE N 0 5 Short Description about what ?
87 .T. TEST CODE N 0 5 Short Description about what ?
88 .T. TEST CODE N 0 5 Short Description about what ?
89 .T. TEST CODE N 0 5 Short Description about what ?
90 .T. TEST CODE N 0 5 Short Description about what ?
91 .T. TEST CODE N 0 5 Short Description about what ?
92 .T. TEST CODE N 0 5 Short Description about what ?
93 .T. TEST CODE N 0 5 Short Description about what ?
94 .T. TEST CODE N 0 5 Short Description about what ?
95 .T. TEST CODE N 0 5 Short Description about what ?
96 .T. TEST CODE N 0 5 Short Description about what ?
97 .T. TEST CODE N 0 5 Short Description about what ?
98 .T. TEST CODE N 0 5 Short Description about what ?
99 .T. TEST CODE N 0 5 Short Description about what ?
100 .T. TEST CODE N 0 5 Short Description about what ?
150 .F. MY TEST CODE N 0 5
150 .F. MY TEST CODE N 0 5
Closing...
Может ошибки поправили, может я чего-то тормозил. Не буду пока выяснять.
.....TO BE CONTINUED.....
Для работы использовал svn с официального сайта.
sudo svn co https://harbour-project.svn.sourceforge.net/svnroot/harbour-project/trunk/harbour harbourв текущей папке создается папка harbour. далее , проверяем наличие всех нужных компонентов. При попытке работать с SQL серверами, должны быть установлены соответствующие клиентские библиотеки и dev пакеты. Детально можно посмотреть в документе INSTALL. Желательно его прочитать очень внимательно!
Компилируем
cd harbour
sudo make install
Смотрим сообщения на консоли. если ошибок нет - продолжаем. Иначе, нужно что-то доустановить. вот и все, harbour собран. Я использовал sudo, чтобы исключить проблемы с правами при установке. Если я не прав - поправьте меня.
Затем идем в contribs и компилируем примеры.
cd contrib/hbfbird
(Чтобы пересобрать библиотеку
hbrun ../make.hbs clean install)
cd testsполучим примерно следующее:
hbmk2 simple.prg
user@desktop:~/sources/harbour/contrib/hbfbird/tests$ hbmk2 simple.prgДалее выполняем то, что накомпилили. Получаем ошибку.
hbmk2: Processing local make script: hbmk.hbm
Harbour 2.1.0beta2 (Rev. 15585)
Copyright (c) 1999-2010, http://harbour-project.org/
Compiling 'simple.prg'...
Lines 347, Functions/Procedures 1
Generating C source output to '/tmp/hbmk_x4x1j4.dir/simple.c'... Done.
user@desktop:~/sources/harbour/contrib/hbfbird/tests$
Предположительно на UBUNTU нельзя создавать БД со страницей 1024. Приводим исходник к следующемы виду:
/*
* $Id: simple.prg 13763 2010-02-04 11:56:22Z vszakats $
*/
#include "common.ch"
#include "simpleio.ch"
Function main()
Local oServer, oQuery, oRow, i, x, aTables, aStruct, aKey
Local cServer
Local cUser := "sysdba"
Local cPass := "masterkey"
Local nDialect := 3
Local cQuery
local DBpath
ALTD()
DBpath = ("/home/user/data/simple.gdb" )
cServer := "127.0.0.1:" + DBpath
//DBpath = (hb_dirBase() + "simple.gdb" )
IF hb_FileExists( DBpath )
FErase( DBpath )
ENDIF
? FBCreateDB( DBpath , cuser, cpass, 2048, "ASCII" , nDialect )
........
после этого БД создается, но при попытке вставки появляется ошибка:
1
Connecting...
Tables...
Using implicit transaction...
Creating domain for boolean fields...
Creating test table...
Press any key to continue...
Structure of test table
Inserting, declared transaction control
Column does not belong to referenced table
Column does not belong to referenced table
Column does not belong to referenced table
..........
Column does not belong to referenced tableто есть не прочиталась структура БД. Отсюда все остальное. Почему?
Column does not belong to referenced table
Column does not belong to referenced table
Column does not belong to referenced table
Column does not belong to referenced table
Column does not belong to referenced table
Error BASE/1132 Bound error: array access
Called from MAIN(120)
создана нормальная БД. Вот ее метаданные:
/********************* ROLES **********************/Почему, тогда, последующие попытки получить структуру базы и сделать select не приносят успеха?
/********************* UDFS ***********************/
/****************** GENERATORS ********************/
/******************** DOMAINS *********************/
CREATE DOMAIN BOOLEAN_FIELD
AS Smallint
DEFAULT 0
NOT NULL
check (value in (0,1))
;
/******************* PROCEDURES ******************/
/******************** TABLES **********************/
CREATE TABLE TEST
(
CODE Smallint NOT NULL,
DEPT Integer,
NAME Varchar(40),
SALES BOOLEAN_FIELD DEFAULT 0,
TAX Float,
SALARY Double precision,
BUDGET Numeric(12,2),
DISCOUNT Decimal(5,2),
CREATION Date,
DESCRIPTION Blob sub_type 1,
PRIMARY KEY (CODE)
);
/********************* VIEWS **********************/
/******************* EXCEPTIONS *******************/
/******************** TRIGGERS ********************/
GRANT DELETE, INSERT, REFERENCES, SELECT, UPDATE
ON TEST TO SYSDBA WITH GRANT OPTION;
попробую обновиться и начать с начала. Попутно посмотрю в INSTALL. Может чего-то я пропустил.
Итак, снова скачал с SVN исходники. Сделал make clean, из INSTALL повторил установку нужных -dev пакетов. Скомпилировал оригинальный simple.prg - ошибки
-902исправил пути в исходнике на реальную папку с тестовыми БД. сделал 2048 длиной страницы. Компиляция.
Connecting...
Unsuccessful execution caused by a system error that precludes
successful execution of subsequent statements
О счастье! все выполнилось!
1
Connecting...
Tables...
MON$ATTACHMENTS
MON$CALL_STACK
MON$DATABASE
MON$IO_STATS
MON$RECORD_STATS
MON$STATEMENTS
MON$TRANSACTIONS
MON$TRANSACTIONS
Using implicit transaction...
Creating domain for boolean fields...
Creating test table...
Press any key to continue...
Structure of test table
CODE N 5 0
DEPT N 9 0
NAME C 40 0
SALES L 1 0
TAX N 15 0
SALARY N 15 0
BUDGET N 15 2
DISCOUNT N 9 2
CREATION D 8 0
DESCRIPTION M 10 0
DESCRIPTION M 10 0
Inserting, declared transaction control
CODE N 5 0
NAME C 40 0
DESCRIPTION M 10 -2
SALES L 1 0
Fields: 4 Primary Key: CODE
4 1 0 CODE N 0 5 2
150 MY TEST
.T.
.T.
.F.
1 .T. TEST CODE N 0 5 Short Description about what ?
2 .T. TEST CODE N 0 5 Short Description about what ?
3 .T. TEST CODE N 0 5 Short Description about what ?
4 .T. TEST CODE N 0 5 Short Description about what ?
5 .T. TEST CODE N 0 5 Short Description about what ?
6 .T. TEST CODE N 0 5 Short Description about what ?
7 .T. TEST CODE N 0 5 Short Description about what ?
8 .T. TEST CODE N 0 5 Short Description about what ?
9 .T. TEST CODE N 0 5 Short Description about what ?
10 .T. TEST CODE N 0 5 Short Description about what ?
11 .T. TEST CODE N 0 5 Short Description about what ?
12 .T. TEST CODE N 0 5 Short Description about what ?
13 .T. TEST CODE N 0 5 Short Description about what ?
14 .T. TEST CODE N 0 5 Short Description about what ?
15 .T. TEST CODE N 0 5 Short Description about what ?
16 .T. TEST CODE N 0 5 Short Description about what ?
17 .T. TEST CODE N 0 5 Short Description about what ?
18 .T. TEST CODE N 0 5 Short Description about what ?
19 .T. TEST CODE N 0 5 Short Description about what ?
20 .T. TEST CODE N 0 5 Short Description about what ?
21 .T. TEST CODE N 0 5 Short Description about what ?
22 .T. TEST CODE N 0 5 Short Description about what ?
23 .T. TEST CODE N 0 5 Short Description about what ?
24 .T. TEST CODE N 0 5 Short Description about what ?
25 .T. TEST CODE N 0 5 Short Description about what ?
26 .T. TEST CODE N 0 5 Short Description about what ?
27 .T. TEST CODE N 0 5 Short Description about what ?
28 .T. TEST CODE N 0 5 Short Description about what ?
29 .T. TEST CODE N 0 5 Short Description about what ?
30 .T. TEST CODE N 0 5 Short Description about what ?
31 .T. TEST CODE N 0 5 Short Description about what ?
32 .T. TEST CODE N 0 5 Short Description about what ?
33 .T. TEST CODE N 0 5 Short Description about what ?
34 .T. TEST CODE N 0 5 Short Description about what ?
35 .T. TEST CODE N 0 5 Short Description about what ?
36 .T. TEST CODE N 0 5 Short Description about what ?
37 .T. TEST CODE N 0 5 Short Description about what ?
38 .T. TEST CODE N 0 5 Short Description about what ?
39 .T. TEST CODE N 0 5 Short Description about what ?
40 .T. TEST CODE N 0 5 Short Description about what ?
41 .T. TEST CODE N 0 5 Short Description about what ?
42 .T. TEST CODE N 0 5 Short Description about what ?
43 .T. TEST CODE N 0 5 Short Description about what ?
44 .T. TEST CODE N 0 5 Short Description about what ?
45 .T. TEST CODE N 0 5 Short Description about what ?
46 .T. TEST CODE N 0 5 Short Description about what ?
47 .T. TEST CODE N 0 5 Short Description about what ?
48 .T. TEST CODE N 0 5 Short Description about what ?
49 .T. TEST CODE N 0 5 Short Description about what ?
50 .T. TEST CODE N 0 5 Short Description about what ?
Update: .F.
51 .T. TEST CODE N 0 5 Short Description about what ?
52 .T. TEST CODE N 0 5 Short Description about what ?
53 .T. TEST CODE N 0 5 Short Description about what ?
54 .T. TEST CODE N 0 5 Short Description about what ?
55 .T. TEST CODE N 0 5 Short Description about what ?
56 .T. TEST CODE N 0 5 Short Description about what ?
57 .T. TEST CODE N 0 5 Short Description about what ?
58 .T. TEST CODE N 0 5 Short Description about what ?
59 .T. TEST CODE N 0 5 Short Description about what ?
60 .T. TEST CODE N 0 5 Short Description about what ?
Delete: .F.
61 .T. TEST CODE N 0 5 Short Description about what ?
62 .T. TEST CODE N 0 5 Short Description about what ?
63 .T. TEST CODE N 0 5 Short Description about what ?
64 .T. TEST CODE N 0 5 Short Description about what ?
65 .T. TEST CODE N 0 5 Short Description about what ?
66 .T. TEST CODE N 0 5 Short Description about what ?
67 .T. TEST CODE N 0 5 Short Description about what ?
68 .T. TEST CODE N 0 5 Short Description about what ?
69 .T. TEST CODE N 0 5 Short Description about what ?
70 .T. TEST CODE N 0 5 Short Description about what ?
71 .T. TEST CODE N 0 5 Short Description about what ?
72 .T. TEST CODE N 0 5 Short Description about what ?
73 .T. TEST CODE N 0 5 Short Description about what ?
74 .T. TEST CODE N 0 5 Short Description about what ?
75 .T. TEST CODE N 0 5 Short Description about what ?
76 .T. TEST CODE N 0 5 Short Description about what ?
77 .T. TEST CODE N 0 5 Short Description about what ?
78 .T. TEST CODE N 0 5 Short Description about what ?
79 .T. TEST CODE N 0 5 Short Description about what ?
80 .T. TEST CODE N 0 5 Short Description about what ?
81 .T. TEST CODE N 0 5 Short Description about what ?
82 .T. TEST CODE N 0 5 Short Description about what ?
83 .T. TEST CODE N 0 5 Short Description about what ?
84 .T. TEST CODE N 0 5 Short Description about what ?
85 .T. TEST CODE N 0 5 Short Description about what ?
86 .T. TEST CODE N 0 5 Short Description about what ?
87 .T. TEST CODE N 0 5 Short Description about what ?
88 .T. TEST CODE N 0 5 Short Description about what ?
89 .T. TEST CODE N 0 5 Short Description about what ?
90 .T. TEST CODE N 0 5 Short Description about what ?
91 .T. TEST CODE N 0 5 Short Description about what ?
92 .T. TEST CODE N 0 5 Short Description about what ?
93 .T. TEST CODE N 0 5 Short Description about what ?
94 .T. TEST CODE N 0 5 Short Description about what ?
95 .T. TEST CODE N 0 5 Short Description about what ?
96 .T. TEST CODE N 0 5 Short Description about what ?
97 .T. TEST CODE N 0 5 Short Description about what ?
98 .T. TEST CODE N 0 5 Short Description about what ?
99 .T. TEST CODE N 0 5 Short Description about what ?
100 .T. TEST CODE N 0 5 Short Description about what ?
100 .T. TEST CODE N 0 5 Short Description about what ?
100 .T. TEST CODE N 0 5 Short Description about what ?
Delete: .T.
1 .T. TEST CODE N 0 5 Short Description about what ?
2 .T. TEST CODE N 0 5 Short Description about what ?
3 .T. TEST CODE N 0 5 Short Description about what ?
4 .T. TEST CODE N 0 5 Short Description about what ?
5 .T. TEST CODE N 0 5 Short Description about what ?
6 .T. TEST CODE N 0 5 Short Description about what ?
7 .T. TEST CODE N 0 5 Short Description about what ?
8 .T. TEST CODE N 0 5 Short Description about what ?
9 .T. TEST CODE N 0 5 Short Description about what ?
10 .T. TEST CODE N 0 5 Short Description about what ?
11 .T. TEST CODE N 0 5 Short Description about what ?
12 .T. TEST CODE N 0 5 Short Description about what ?
13 .T. TEST CODE N 0 5 Short Description about what ?
14 .T. TEST CODE N 0 5 Short Description about what ?
15 .T. TEST CODE N 0 5 Short Description about what ?
16 .T. TEST CODE N 0 5 Short Description about what ?
17 .T. TEST CODE N 0 5 Short Description about what ?
18 .T. TEST CODE N 0 5 Short Description about what ?
19 .T. TEST CODE N 0 5 Short Description about what ?
20 .T. TEST CODE N 0 5 Short Description about what ?
21 .T. TEST CODE N 0 5 Short Description about what ?
22 .T. TEST CODE N 0 5 Short Description about what ?
23 .T. TEST CODE N 0 5 Short Description about what ?
24 .T. TEST CODE N 0 5 Short Description about what ?
25 .T. TEST CODE N 0 5 Short Description about what ?
26 .T. TEST CODE N 0 5 Short Description about what ?
27 .T. TEST CODE N 0 5 Short Description about what ?
28 .T. TEST CODE N 0 5 Short Description about what ?
29 .T. TEST CODE N 0 5 Short Description about what ?
30 .T. TEST CODE N 0 5 Short Description about what ?
31 .T. TEST CODE N 0 5 Short Description about what ?
32 .T. TEST CODE N 0 5 Short Description about what ?
33 .T. TEST CODE N 0 5 Short Description about what ?
34 .T. TEST CODE N 0 5 Short Description about what ?
35 .T. TEST CODE N 0 5 Short Description about what ?
36 .T. TEST CODE N 0 5 Short Description about what ?
37 .T. TEST CODE N 0 5 Short Description about what ?
38 .T. TEST CODE N 0 5 Short Description about what ?
39 .T. TEST CODE N 0 5 Short Description about what ?
40 .T. TEST CODE N 0 5 Short Description about what ?
41 .T. TEST CODE N 0 5 Short Description about what ?
42 .T. TEST CODE N 0 5 Short Description about what ?
43 .T. TEST CODE N 0 5 Short Description about what ?
44 .T. TEST CODE N 0 5 Short Description about what ?
45 .T. TEST CODE N 0 5 Short Description about what ?
46 .T. TEST CODE N 0 5 Short Description about what ?
47 .T. TEST CODE N 0 5 Short Description about what ?
48 .T. TEST CODE N 0 5 Short Description about what ?
49 .T. TEST CODE N 0 5 Short Description about what ?
50 .T. TEST CODE N 0 5 Short Description about what ?
51 .T. TEST CODE N 0 5 Short Description about what ?
52 .T. TEST CODE N 0 5 Short Description about what ?
53 .T. TEST CODE N 0 5 Short Description about what ?
54 .T. TEST CODE N 0 5 Short Description about what ?
55 .T. TEST CODE N 0 5 Short Description about what ?
56 .T. TEST CODE N 0 5 Short Description about what ?
57 .T. TEST CODE N 0 5 Short Description about what ?
58 .T. TEST CODE N 0 5 Short Description about what ?
59 .T. TEST CODE N 0 5 Short Description about what ?
60 .T. TEST CODE N 0 5 Short Description about what ?
61 .T. TEST CODE N 0 5 Short Description about what ?
62 .T. TEST CODE N 0 5 Short Description about what ?
63 .T. TEST CODE N 0 5 Short Description about what ?
64 .T. TEST CODE N 0 5 Short Description about what ?
65 .T. TEST CODE N 0 5 Short Description about what ?
66 .T. TEST CODE N 0 5 Short Description about what ?
67 .T. TEST CODE N 0 5 Short Description about what ?
68 .T. TEST CODE N 0 5 Short Description about what ?
69 .T. TEST CODE N 0 5 Short Description about what ?
71 .T. TEST CODE N 0 5 Short Description about what ?
72 .T. TEST CODE N 0 5 Short Description about what ?
73 .T. TEST CODE N 0 5 Short Description about what ?
74 .T. TEST CODE N 0 5 Short Description about what ?
75 .T. TEST CODE N 0 5 Short Description about what ?
76 .T. TEST CODE N 0 5 Short Description about what ?
77 .T. TEST CODE N 0 5 Short Description about what ?
78 .T. TEST CODE N 0 5 Short Description about what ?
79 .T. TEST CODE N 0 5 Short Description about what ?
80 .T. TEST CODE N 0 5 Short Description about what ?
81 .T. TEST CODE N 0 5 Short Description about what ?
82 .T. TEST CODE N 0 5 Short Description about what ?
83 .T. TEST CODE N 0 5 Short Description about what ?
84 .T. TEST CODE N 0 5 Short Description about what ?
85 .T. TEST CODE N 0 5 Short Description about what ?
86 .T. TEST CODE N 0 5 Short Description about what ?
87 .T. TEST CODE N 0 5 Short Description about what ?
88 .T. TEST CODE N 0 5 Short Description about what ?
89 .T. TEST CODE N 0 5 Short Description about what ?
90 .T. TEST CODE N 0 5 Short Description about what ?
91 .T. TEST CODE N 0 5 Short Description about what ?
92 .T. TEST CODE N 0 5 Short Description about what ?
93 .T. TEST CODE N 0 5 Short Description about what ?
94 .T. TEST CODE N 0 5 Short Description about what ?
95 .T. TEST CODE N 0 5 Short Description about what ?
96 .T. TEST CODE N 0 5 Short Description about what ?
97 .T. TEST CODE N 0 5 Short Description about what ?
98 .T. TEST CODE N 0 5 Short Description about what ?
99 .T. TEST CODE N 0 5 Short Description about what ?
100 .T. TEST CODE N 0 5 Short Description about what ?
150 .F. MY TEST CODE N 0 5
150 .F. MY TEST CODE N 0 5
Closing...
Может ошибки поправили, может я чего-то тормозил. Не буду пока выяснять.
.....TO BE CONTINUED.....
Подписаться на:
Сообщения (Atom)