Add(MainForm,2953706,14,189)
{
 Point(onClose)
 link(onCreate,4800683:doOpen,[])
 link(onClose,4800683:doClose,[])
}
Add(DS_SQLite,4800683,63,203)
{
 Name="mydb"
 FileName="Sale.db"
 link(onOpen,9733076:doExec,[])
}
Add(DSC_Exec,9733076,112,203)
{
 SQL="-- Список программ\r\nCREATE TABLE IF NOT EXISTS progs(\r\n  [id] INTEGER PRIMARY KEY,\r\n  [progName] TEXT NOT NULL ,\r\n  [Data] INTEGER,\r\n  [comm] TEXT);\r\n-- Отметки о продаже\r\nCREATE TABLE IF NOT EXISTS sb(\r\n  [id] INTEGER PRIMARY KEY,\r\n  [prog_id] INTEGER, \r\n  [pData] INTEGER);   "
 DSManager="mydb"
}