Delete from Relations where lcase(RelationTable) = lcase('Издадени Invoices')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','__OPTIONS__','Издадени Invoices','__OPTIONS__','Издадени Invoices','__OPTIONS__',1,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','bvrData1','Издадени Invoices','От дата','Издадени Invoices','bvrData1',2,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'bvrData1','','',0,0,'',1,'','select bvrData1',100,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','bvrData2','Издадени Invoices','До дата','Издадени Invoices','bvrData2',2,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'bvrData2','','',0,0,'',1,'','select bvrData2',100,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','DateCreditDt','Издадени Invoices','Дата','Издадени Invoices','DateCreditDt',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'DateCreditDt','','',0,0,'','','','',70,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','InvoiceNo','Издадени Invoices','No Invoice','Издадени Invoices','InvoiceNo',2,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'InvoiceNo','','',1,1,'','','','',50,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','Contract','Издадени Invoices','Договор','Издадени Invoices','Contract',2,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'Contract','','',0,0,'','','Select FullName From Contracts Order by GroupNo, FullName
','',120,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','DateArrive','Издадени Invoices','Дата на пристигане','Издадени Invoices','DateArrive',2,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'DateArrive','','',0,0,'','','','',100,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','VaucherNum','Издадени Invoices','Ваучер No','Издадени Invoices','VaucherNum',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'VaucherNum','','',0,0,'','','','',60,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','VaucherSeason','Издадени Invoices','Сезон','Издадени Invoices','VaucherSeason',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'VaucherSeason','','',0,0,'','','','',60,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','VaucherBoard','Издадени Invoices','BP','Издадени Invoices','VaucherBoard',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'VaucherBoard','','',0,0,'','','','',20,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','GuestName','Издадени Invoices','Гост','Издадени Invoices','GuestName',2,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'GuestName','','',0,0,'','','','',100,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','AdultType','Издадени Invoices','Възр. група','Издадени Invoices','AdultType',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'AdultType','','',0,0,'','','','',70,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','VaucherRoomType','Издадени Invoices','Тип стая','Издадени Invoices','VaucherRoomType',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'VaucherRoomType','','',0,0,'','','','',30,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','VaucherBedType','Издадени Invoices','Тип легло','Издадени Invoices','VaucherBedType',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'VaucherBedType','','',0,0,'','','','',70,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','ArticleName','Издадени Invoices','Услуга','Издадени Invoices','ArticleName',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'ArticleName','','',0,0,'','','','',80,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','NumberServices','Издадени Invoices','Бр. услуги','Издадени Invoices','NumberServices',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'NumberServices','','',0,0,'','','','',30,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','Nights','Издадени Invoices','Бр. нощ.','Издадени Invoices','Nights',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'Nights','','',0,0,'','','','',30,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','TotalNights','Издадени Invoices','Тотал нощ.','Издадени Invoices','TotalNights',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'TotalNights','','',0,0,'','','','',30,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','SinglePrice','Издадени Invoices','Ед. цена','Издадени Invoices','SinglePrice',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'SinglePrice','','# ### ##0.00',0,0,'','','','',60,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','Discount','Издадени Invoices','Отст.','Издадени Invoices','Discount',0,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'Discount','','0%',0,0,'','','','',30,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','GrandTotal','Издадени Invoices','Обща сума','Издадени Invoices','GrandTotal',2,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'SUM(GrandTotal)','SUM(qrData.Обща сума)','# ### ##0.00',1,0,'','','','',100,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','Symbol','Издадени Invoices','Валута','Издадени Invoices','Symbol',2,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'Symbol','','',0,0,'','','','',40,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','GrandTotalLV','Издадени Invoices','Сума лв.','Издадени Invoices','GrandTotalLV',2,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'SUM(GrandTotalLV)','SUM(qrData.Сума лв.)','# ### ##0.00',1,0,0,0,'','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServForContract','Cancelled','Издадени Invoices','Анулиран или кредитно изв.','Издадени Invoices','Cancelled',2,GetFreeNInRelations('Издадени Invoices', Null, Null, 10),'Cancelled','','',0,0,0,0,'Select Ans=''ДА'' from Dummy union all Select Ans=''НЕ'' from Dummy','',60,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_ServForContract'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_ServForContract'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Real Turnover for Sleeping Accommodation')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','__Options__','Фактически оборот нощувки','__Options__','Real Turnover for Sleeping Accommodation','__Options__',1,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'__Options__','','',0,0,'','','','call FillBookForDay',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','bvrData1','Фактически оборот нощувки','От дата','Real Turnover for Sleeping Accommodation','From Date',2,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'bvrData1','','',0,0,1,1,'','select bvrData1',32,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','bvrData2','Фактически оборот нощувки','До дата','Real Turnover for Sleeping Accommodation','To Date',2,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'bvrData2','','',0,0,1,1,'','select bvrData2',32,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','ForDate','Фактически оборот нощувки','Дата','Real Turnover for Sleeping Accommodation','Date',2,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'ForDate','','',0,1,'','','','',64,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','SumBG','Фактически оборот нощувки','Оборот бълг.','Real Turnover for Sleeping Accommodation','Turnover Native',2,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'SumBG','Sum(qrData.Оборот бълг.)','# ### ##0.00 лв.',0,0,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','SumInsBG','Фактически оборот нощувки','Застр. бълг.','Real Turnover for Sleeping Accommodation','Insurance Native',2,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'SumInsBG','Sum(qrData.Застр. бълг.)','',0,0,'','','','',64,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','GuestsBG','Фактически оборот нощувки','Гости бълг.','Real Turnover for Sleeping Accommodation','Native Guests',2,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'GuestsBG','Sum(qrData.Гости бълг.)','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','SumFG','Фактически оборот нощувки','Оборот чужд.','Real Turnover for Sleeping Accommodation','Turnover Foreigners',2,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'SumFG','Sum(qrData.Оборот чужд.)','# ### ##0.00 лв.',0,0,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','SumInsFG','Фактически оборот нощувки','Застр. чужд.','Real Turnover for Sleeping Accommodation','Insurance Foreigners',2,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'SumInsFG','Sum(qrData.Застр. чужд.)','',0,0,'','','','',64,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','GuestsFG','Фактически оборот нощувки','Гости чужд.','Real Turnover for Sleeping Accommodation','Foreign Guests',2,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'GuestsFG','Sum(qrData.Гости чужд.)','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','TotalOborot','Фактически оборот нощувки','Общо оборот','Real Turnover for Sleeping Accommodation','Total Native',2,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'TotalOborot','Sum(qrData.Общо оборот)','# ### ##0.00 лв.',0,0,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','TotalGuests','Фактически оборот нощувки','Общо гости','Real Turnover for Sleeping Accommodation','Total Foreigners',2,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'TotalGuests','Sum(qrData.Общо гости)','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','AvgBG','Фактически оборот нощувки','Ср. ц. бълг.','Real Turnover for Sleeping Accommodation','Avg Price BG',0,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'AvgBG','Sum(qrData.Ср. ц. бълг.)','# ### ##0.00 лв.',1,0,0,0,'','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','AvgFG','Фактически оборот нощувки','Ср. ц. чужд.','Real Turnover for Sleeping Accommodation','Avg Price FG',0,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'AvgFG','Sum(qrData.Ср. ц. чужд.)','# ### ##0.00 лв.',1,0,0,0,'','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_FaktOborotLodgings','AvgTotal','Фактически оборот нощувки','Сума ср. ц.','Real Turnover for Sleeping Accommodation','Avg Price Total',0,GetFreeNInRelations('Real Turnover for Sleeping Accommodation', Null, Null, 10),'AvgTotal','Sum(qrData.Сума ср. ц.)','# ### ##0.00 лв.',1,0,0,0,'','',100,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_FaktOborotLodgings'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_FaktOborotLodgings'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Guestmovement')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','__OPTIONS__','Движение на гост','__OPTIONS__','Guestmovement','__OPTIONS__',1,GetFreeNInRelations('Guestmovement', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','bvrData1','Движение на гост','От дата','Guestmovement','From Date',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'bvrData1','','',0,0,1,1,'','select bvrData1',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','bvrData2','Движение на гост','До дата','Guestmovement','To Date',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'bvrData2','','',0,0,1,1,'','select bvrData2',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','RegDate','Движение на гост','Дата','Guestmovement','Date',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'RegDate','','',0,1,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','DateEnd','Движение на гост','Дата на напускане','Guestmovement','DateEnd',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'DateEnd','','',0,1,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','Dogovor','Движение на гост','Договор','Guestmovement','Contract',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'Dogovor','','',0,0,'','','SELECT ShortName FROM Contracts','',104,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','Account','Движение на гост','Кл.номер','Guestmovement','Client Number',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'Account','','',0,1,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','GuestName','Движение на гост','Име гост','Guestmovement','Guest Name',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'GuestName','','',0,0,'','','SELECT "Name" FROM Guests GROUP BY "Name"','',150,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','RoomNo','Движение на гост','Стая No','Guestmovement','Room #',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'RoomNo','','',0,0,'','','select RoomName from Rooms where Status <> 1 and Status <> 3','',48,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','Service','Движение на гост','Услуга','Guestmovement','Service',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'Service','','',0,0,'','','select ServiceName from Services union (select ''Нощувка и застраховка'')','',168,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','ServicesNum','Движение на гост','Кол.','Guestmovement','Quant.',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'ServicesNum','','',1,0,'','','','',56,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','ServiceSngPrice','Движение на гост','Ед.цена','Guestmovement','Sng. Price',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'ServiceSngPrice','','# ### ##0.00',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','AllSum','Движение на гост','Сума','Guestmovement','Total',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'AllSum','','# ### ##0.00',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegBaseServicesPeriodForOazis','Plateni','Движение на гост','Платено','Guestmovement','PayedTotal',2,GetFreeNInRelations('Guestmovement', Null, Null, 10),'Plateni','','# ### ##0.00',1,0,'','','','',72,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_RegBaseServicesPeriodForOazis'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_RegBaseServicesPeriodForOazis'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Day Forcast')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','__Options__','Дневни прогнози','__Options__','Day Forcast','__Options__',1,GetFreeNInRelations('Day Forcast', Null, Null, 10),'__Options__','','',0,0,'','','Printer.Orientation=1
','call FillContDates();
call FillRoomStat();
call FillArrivingGuests();
call FillBoardingPlan();
call FillBusyRooms();
call FillArriveStayGuests()',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','bvrdata1','Дневни прогнози','От дата','Day Forcast','From Date',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'bvrdata1','','',1,0,1,1,'','select date(now())',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','bvrdata2','Дневни прогнози','До дата','Day Forcast','To Date',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'bvrdata2','','',1,0,1,1,'','select bvrData2',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','FDate','Дневни прогнози','Дата','Day Forcast','Date',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'FDate','','',1,1,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','RoomCount','Дневни прогнози','Общ бр.стаи','Day Forcast','Total Rooms',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(RoomCount)','Sum(qrdata.Общ бр.стаи)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','BusyRooms','Дневни прогнози','З.стаи до мин.нощ','Day Forcast','Occupied Rooms till Last Night',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(BusyRooms)','Sum(qrdata.З.стаи до мин.нощ)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','LeaveTodayRooms','Дневни прогнози','Зам.за деня','Day Forcast','Check Out Today',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(LeaveTodayRooms)','Sum(qrdata.Зам.за деня)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','StayingTodayRooms','Дневни прогнози','Оставащи','Day Forcast','Left',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(StayingTodayRooms)','Sum(qrdata.Оставащи)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','ArrivingTodayRooms','Дневни прогнози','Пристигащи','Day Forcast','Arriving',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(ArrivingTodayRooms)','Sum(qrdata.Пристигащи)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','BusyTonightRooms','Дневни прогнози','Стаи з.довечера','Day Forcast','Occupied Rooms Tonight',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(BusyTonightRooms)','Sum(qrdata.Стаи з.довечера)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','ExpFreeRooms','Дневни прогнози','Оч.св.стаи','Day Forcast','Expected Rooms Available',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(ExpFreeRooms)','Sum(qrdata.Оч.св.стаи)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','PercBusyRooms','Дневни прогнози','Проц.заетост','Day Forcast','% Occupied',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(PercBusyRooms)','Sum(qrdata.Проц.заетост)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','BusyRoomsFIT','Дневни прогнози','Заети по FIT','Day Forcast','Occupied By FIT',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(BusyRoomsFIT)','Sum(qrdata.Заети по FIT)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','CrashedRooms','Дневни прогнози','Аварийни','Day Forcast','Urgent',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(CrashedRooms)','Sum(qrdata.Аварийни)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','ServiceRooms','Дневни прогнози','Служебни','Day Forcast','Service',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(ServiceRooms)','Sum(qrdata.Служебни)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','OwnedRooms','Дневни прогнози','Частни','Day Forcast','OwnedRooms',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(OwnedRooms)','Sum(qrdata.Частни)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','Elderly','Дневни прогнози','Бр.възр.в хот.','Day Forcast','Adults in Hotel',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(Elderly)','Sum(qrdata.Бр.възр.в хот.)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','Children','Дневни прогнози','Бр.деца в хот.','Day Forcast','Children in Hotel',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(Children)','Sum(qrdata.Бр.деца в хот.)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','ArrivingElderly','Дневни прогнози','Прист.възр.','Day Forcast','Arriving Adults',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(ArrivingElderly)','Sum(qrdata.Прист.възр.)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','ArrivingChildren','Дневни прогнози','Прист.деца','Day Forcast','Arriving Kids',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(ArrivingChildren)','Sum(qrdata.Прист.деца)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','TotElderly','Дневни прогнози','Вс. възр.','Day Forcast','All Ages',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(TotElderly)','Sum(qrdata.Toтал вз.в хот.)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','TotChildren','Дневни прогнози','Вс. деца','Day Forcast','All Children',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(TotChildren)','Sum(qrdata.Toтал деца.в хот.)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','Breakfasts','Дневни прогнози','Закуски','Day Forcast','Breakfast',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(Breakfasts)','Sum(qrdata.Закуски)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','Lunches','Дневни прогнози','Обяди','Day Forcast','Lunches',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(Lunches)','Sum(qrdata.Обяди)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','Dinners','Дневни прогнози','Вечери','Day Forcast','Dinners',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(Dinners)','Sum(qrdata.Вечери)','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DateForecast','HalfBoards','Дневни прогнози','НВ','Day Forcast','HB',2,GetFreeNInRelations('Day Forcast', Null, Null, 10),'Sum(HalfBoards)','Sum(qrdata.НВ)','',1,0,'','','','',72,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_DateForecast'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_DateForecast'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

Go

Delete from Relations where lcase(RelationTable) = lcase('Day Income')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyIncomes','__OPTIONS__','Дневни приходи','__OPTIONS__','Day Income','__OPTIONS__',1,GetFreeNInRelations('Day Income', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyIncomes','bvrData2','Дневни приходи','Дата','Day Income','Date',2,GetFreeNInRelations('Day Income', Null, Null, 10),'bvrData2','','',0,0,1,1,'','select current date',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyIncomes','PayType','Дневни приходи','Начин пл.','Day Income','Type Of Payment',2,GetFreeNInRelations('Day Income', Null, Null, 10),'PayType','','',0,0,'','','select PayTypeName from PayTypes','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyIncomes','Account','Дневни приходи','Кл.номер','Day Income','Client Number',2,GetFreeNInRelations('Day Income', Null, Null, 10),'Account','','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyIncomes','GuestName','Дневни приходи','Име гост','Day Income','Guest Name',2,GetFreeNInRelations('Day Income', Null, Null, 10),'GuestName','','',0,0,'','','SELECT "Name" FROM Guests GROUP BY "Name"','',150,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyIncomes','AllSum','Дневни приходи','Сума','Day Income','Total',2,GetFreeNInRelations('Day Income', Null, Null, 10),'Sum(AllSum)','Sum(qrData.Сума)','# ##0.00',1,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyIncomes','Currency','Дневни приходи','Код валута','Day Income','Currency',0,GetFreeNInRelations('Day Income', Null, Null, 10),'Currency','','',1,0,'','','','',100,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_DaylyIncomes'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_DaylyIncomes'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

Go

Delete from Relations where lcase(RelationTable) = lcase('Дневен лист за дата')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','__Options__','Дневен лист за дата','__Options__','Дневен лист за дата','__Options__',1,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'__Options__','','',0,0,'','','Printer.Orientation=1','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','bvrData1','Дневен лист за дата','От дата','Дневен лист за дата','От дата',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'bvrData1','','',0,0,1,1,'','select bvrData1',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','bvrData2','Дневен лист за дата','До дата','Дневен лист за дата','До дата',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'bvrData2','','',0,0,1,1,'','select bvrData2',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','GuestNum','Дневен лист за дата','No','Дневен лист за дата','No',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'GuestNum','','',1,1,'','','','',40,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','ArriveDate','Дневен лист за дата','Дата прист.','Дневен лист за дата','Дата прист.',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'ArriveDate','','',0,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','Name','Дневен лист за дата','Име','Дневен лист за дата','Име',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'Name','','',0,0,'','','select Name from guests','',180,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','EGN','Дневен лист за дата','ЕГН','Дневен лист за дата','ЕГН',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'EGN','','',0,0,'','','select Name from guests','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','BirthCountry','Дневен лист за дата','Държава','Дневен лист за дата','Държава',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'BirthCountry','','',0,0,'','','SELECT Description FROM Countries WHERE CountryKod>=0','',88,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','BirthData','Дневен лист за дата','Дата и място на раждане','Дневен лист за дата','Дата и място на раждане',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'BirthData','','',0,0,'','','','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','PassportData','Дневен лист за дата','Паспорт','Дневен лист за дата','Паспорт',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'PassportData','','',0,0,'','','','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','Age','Дневен лист за дата','Възр.','Дневен лист за дата','Възр.',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'Age','','',2,0,'','','','',40,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','AddressData','Дневен лист за дата','Местожителство','Дневен лист за дата','Местожителство',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'AddressData','','',0,0,'','','','',188,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','RoomNo','Дневен лист за дата','Стая','Дневен лист за дата','Стая',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'RoomNo','','',2,0,'','','','',40,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RegisterGuests','LeaveDate','Дневен лист за дата','Дата замин.','Дневен лист за дата','Дата замин.',2,GetFreeNInRelations('Дневен лист за дата', Null, Null, 10),'LeaveDate','','',0,0,'','','','',72,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_RegisterGuests'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_RegisterGuests'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Депозити по резервации')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','__OPTIONS__','Депозити по резервации','__OPTIONS__','Депозити по резервации','__OPTIONS__',1,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','bvrData1','Депозити по резервации','От дата','Депозити по резервации','bvrData1',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'bvrData1','','',0,0,1,1,'','select bvrData1',70,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','bvrData2','Депозити по резервации','До дата','Депозити по резервации','bvrData2',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'bvrData2','','',0,0,1,1,'','select bvrData2',70,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','ReserveNo','Депозити по резервации','Рез. No','Депозити по резервации','ReserveNo',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'ReserveNo','','',0,0,'','','','',50,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','Name','Депозити по резервации','Име','Депозити по резервации','Name',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'Name','','',0,0,'','','','',160,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','BrojHora','Депозити по резервации','Брой хора','Депозити по резервации','BrojHora',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'BrojHora','','',0,0,'','','','',70,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','DateReserveDt','Депозити по резервации','Дата на пристигане','Депозити по резервации','DateReserveDt',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'DateReserveDt','','',0,0,'','','','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','DateLeave','Депозити по резервации','Дата на заминаване','Депозити по резервации','DateLeave',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'DateLeave','','',0,0,'','','','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','Days','Депозити по резервации','Дни','Депозити по резервации','Days',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'Days','','',0,0,'','','','',40,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','StatusName','Депозити по резервации','Статус на резервацията','Депозити по резервации','StatusName',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'StatusName','','',0,0,'','','select StatusName from ReserveStatuses','',140,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','Deposit','Депозити по резервации','Депозит','Депозити по резервации','Deposit',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'Deposit','','# ### ##0.00',0,0,'','','','',70,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','Valuta','Депозити по резервации','Валута','Депозити по резервации','Valuta',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'Valuta','','',0,0,'','','','',45,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','DepositLeva','Депозити по резервации','Депозит лева','Депозити по резервации','DepositLeva',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'DepositLeva','','# ### ##0.00',0,0,'','','','',90,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','PayTypeName','Депозити по резервации','Начин на плащане','Депозити по резервации','PayTypeName',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'PayTypeName','','',0,0,'','','select PayTypeName from PayTypes','',110,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','InvoiceDateDt','Депозити по резервации','Дата на пл.','Депозити по резервации','InvoiceDateDt',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'InvoiceDateDt','','',0,0,0,0,'','',90,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','InvoiceNo','Депозити по резервации','Сметка N','Депозити по резервации','InvoiceNo',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'InvoiceNo','','',0,0,0,0,'','',70,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','TrueInvoiceNo','Депозити по резервации','Фактура N','Депозити по резервации','TrueInvoiceNo',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'TrueInvoiceNo','','',0,0,0,0,'','',70,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','OSP','Депозити по резервации','Очаквана сума за плащане в лв.','Депозити по резервации','OSP',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'OSP','','# ### ##0.00',0,0,0,0,'','',180,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ReserveDeposits','Balance','Депозити по резервации','Баланс в лв.','Депозити по резервации','Balance',2,GetFreeNInRelations('Депозити по резервации', Null, Null, 10),'Balance','','# ### ##0.00',0,0,0,0,'','',70,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_ReserveDeposits'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_ReserveDeposits'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Accommodation List')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','__OPTIONS__','Дневен лист','__OPTIONS__','Accommodation List','__OPTIONS__',1,GetFreeNInRelations('Accommodation List', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','bvrData1','Дневен лист','Дата','Accommodation List','Date',2,GetFreeNInRelations('Accommodation List', Null, Null, 10),'bvrData1','','',0,0,1,1,'','select date(now()-1)',80,'',0,0,32,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','GuestNum','Дневен лист','Кл.номер','Accommodation List','Client Number',2,GetFreeNInRelations('Accommodation List', Null, Null, 10),'GuestNum','','',0,0,'','','','',80,'',0,0,32,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','GuestName','Дневен лист','Гост','Accommodation List','Guest',2,GetFreeNInRelations('Accommodation List', Null, Null, 10),'GuestName','','',0,0,'','','select "Name" from Guests','',80,'',0,0,32,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','RoomNum','Дневен лист','Стая No','Accommodation List','Room #',2,GetFreeNInRelations('Accommodation List', Null, Null, 10),'RoomNum','','',0,0,'','','select RoomName from Rooms where Status <> 1 and Status <> 3','',80,'',0,0,32,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','ArriveDate','Дневен лист','Дата прист.','Accommodation List','Accom. Date',2,GetFreeNInRelations('Accommodation List', Null, Null, 10),'ArriveDate','','',0,0,'','','','',80,'',0,0,32,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','LeaveDate','Дневен лист','Дата напус.','Accommodation List','Departure Date',2,GetFreeNInRelations('Accommodation List', Null, Null, 10),'LeaveDate','','',0,0,'','','','',80,'',0,0,32,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','NumNight','Дневен лист','Бр.нощ.','Accommodation List','Sleep Nmb',2,GetFreeNInRelations('Accommodation List', Null, Null, 10),'Sum((NumNight)','Sum(qrData.Бр.нощ.)','',0,0,'','','','',80,'',0,0,32,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','PriceNight','Дневен лист','Цена','Accommodation List','Price',2,GetFreeNInRelations('Accommodation List', Null, Null, 10),'PriceNight','','',0,0,'','','','',80,'',0,0,32,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','SumPayedServ','Дневен лист','Платено','Accommodation List','Paid',2,GetFreeNInRelations('Accommodation List', Null, Null, 10),'Sum(SumPayedServ)','Sum(qrData.Платено)','',0,0,'','','','',80,'',0,0,32,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','Balance','Дневен лист','Баланс','Accommodation List','Balance',2,GetFreeNInRelations('Accommodation List', Null, Null, 10),'Sum(Balance)','Sum(qrData.Баланс)','',0,0,'','','','',80,'',0,0,32,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DaylyList','Country','Дневен лист','Държави','Accommodation List','Country',2,GetFreeNInRelations('Accommodation List', Null, Null, 10),'Country','','',1,0,'','','','',100,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_DaylyList'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_DaylyList'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Депозити по услуги')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','__OPTIONS__','Депозити по услуги','__OPTIONS__','Депозити по услуги','__OPTIONS__',1,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','bvrData1','Депозити по услуги','От дата','Депозити по услуги','bvrData1',2,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'bvrData1','','',1,0,1,1,'','select bvrdata1',100,'',0,0,'',today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','bvrData2','Депозити по услуги','До дата','Депозити по услуги','bvrData2',2,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'bvrData2','','',1,0,1,1,'','select bvrdata2',100,'',0,0,'',today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','Contract','Депозити по услуги','Договор','Депозити по услуги','Contract',2,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'Contract','','',0,0,'','','select c.FullName from Contracts as c where IsGroupContract=0','',120,'',0,0,'',today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','Name','Депозити по услуги','Гост','Депозити по услуги','Name',2,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'Name','','',0,0,'','','','',130,'',0,0,'',today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','Deposit','Депозити по услуги','Депозит','Депозити по услуги','Deposit',2,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'Deposit','','',0,0,'','','','',70,'',0,0,'',today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','Price','Депозити по услуги','Ед. цена','Депозити по услуги','Price',2,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'Price','','# ### ##0.00',0,0,'','','','',60,'',0,0,'',today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','Qty','Депозити по услуги','Количество','Депозити по услуги','Qty',2,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'Qty','','',0,0,'','','','',70,'',0,0,'',today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','Discount','Депозити по услуги','Отстъпка','Депозити по услуги','Discount',2,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'Discount','','',0,0,'','','','',70,'',0,0,'',today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','ServiceName','Депозити по услуги','Име на услуга','Депозити по услуги','ServiceName',2,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'ServiceName','','',0,0,'','','select ServiceName from services','',240,'',0,0,'',today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','Total','Депозити по услуги','Обща сума','Депозити по услуги','Total',2,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'SUM(Total)','','# ### ##0.00',0,0,'','','','',70,'',0,0,'',today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_DepositByServices','RegDate','Депозити по услуги','Дата','Депозити по услуги','RegDate',2,GetFreeNInRelations('Депозити по услуги', Null, Null, 10),'RegDate','','',0,0,'','','','',70,'',0,0,'',today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_DepositByServices'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_DepositByServices'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Monthly rent information')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','__OPTIONS__','Дължим и платен наем - месец','__OPTIONS__','Monthly rent information','__OPTIONS',1,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','call FillOwePaidRentMonth("date"(''1.'' || bvrSpravkaM || ''.'' || bvrSpravkaY),1)',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','bvrSpravkaY','Дължим и платен наем - месец','Година','Monthly rent information','Year',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'bvrSpravkaY','','',0,0,1,1,'','select YEAR(today(*))',20,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','bvrSpravkaM','Дължим и платен наем - месец','Месец','Monthly rent information','Month',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'bvrSpravkaM','','',0,0,1,1,'','select MONTH(today(*))',20,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','Name','Дължим и платен наем - месец','Студент','Monthly rent information','Name',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Name','','',0,1,'','','','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','UniName','Дължим и платен наем - месец','Университет','Monthly rent information','UniName',0,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Uni','','',0,0,'','','select FullName from Universities','',200,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','Spec','Дължим и платен наем - месец','Специалност','Monthly rent information','Spec',0,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Spec','','',0,0,'','','select Name from Specialities','',200,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','Kurs','Дължим и платен наем - месец','Курс','Monthly rent information','Kurs',0,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Kurs','','',0,0,'','','select Name from Kursove','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','FN','Дължим и платен наем - месец','ФН','Monthly rent information','FN',0,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'FN','','',0,0,'','','','',50,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','City','Дължим и платен наем - месец','Град','Monthly rent information','City',0,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'City','','',0,0,'','','','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','Address','Дължим и платен наем - месец','Адрес','Monthly rent information','Address',0,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Address','','',0,0,'','','','',150,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','Country','Дължим и платен наем - месец','Държава','Monthly rent information','Country',0,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'CountryName','','',0,0,'','','select Description from Countries','',150,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','Sex','Дължим и платен наем - месец','Пол','Monthly rent information','Sex',0,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Sex','','',0,0,'','','','',30,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','PriceKind','Дължим и платен наем - месец','Ценоразпис','Monthly rent information','PriceKind',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'PriceKind','','',0,0,'','','select Description from PriceKinds','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','Usluga','Дължим и платен наем - месец','Услуга','Monthly rent information','Usluga',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Usluga','','',0,0,'','','select ServiceName from Services','',250,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','Kol','Дължим и платен наем - месец','Количество','Monthly rent information','Kol',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Sum(Kol)','Sum(qrData.Количество)','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','Cena','Дължим и платен наем - месец','Цена','Monthly rent information','Cena',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Cena','','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','SumOwe','Дължим и платен наем - месец','Дължима Сума','Monthly rent information','SumOwe',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Sum(SumOwe)','Sum(qrData.Дължима Сума)','',0,0,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','SumPaid','Дължим и платен наем - месец','Платена Сума','Monthly rent information','SumPaid',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Sum(SumPaid)','Sum(qrData.Платена Сума)','',0,0,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','Razlika','Дължим и платен наем - месец','Разлика','Monthly rent information','Razlika',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Sum(Razlika)','Sum(qrData.Разлика)','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','RoomName','Дължим и платен наем - месец','Стая','Monthly rent information','RoomName',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'RName','','',0,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','Koef','Дължим и платен наем - месец','Коефициент','Monthly rent information','Koef',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'Sum(Koef)','Sum(qrData.Кофициент)','',0,0,'','','','',90,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//#OwePaidRentMonth','RealDatePaid','Дължим и платен наем - месец','Дата плащане','Monthly rent information','RealDatePaid',2,GetFreeNInRelations('Monthly rent information', Null, Null, 10),'RealDatePayed','','',0,0,'','','','',80,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//#OwePaidRentMonth'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//#OwePaidRentMonth'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Monthly lodgings information')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','__OPTIONS__','Дължими и платени нощувки - месец','__OPTIONS__','Monthly lodgings information','__OPTIONS',1,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','bvrSpravkaY','Дължими и платени нощувки - месец','Година','Monthly lodgings information','Year',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'bvrSpravkaY','','',0,0,1,1,'','select YEAR(today(*))',20,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','bvrSpravkaM','Дължими и платени нощувки - месец','Месец','Monthly lodgings information','Month',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'bvrSpravkaM','','',0,0,1,1,'','select MONTH(today(*))',20,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','GNo','Дължими и платени нощувки - месец','Клиентски номер','Monthly lodgings information','GNo',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'GNo','','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','Name','Дължими и платени нощувки - месец','Студент','Monthly lodgings information','Name',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Name','','',0,0,'','','','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','Uni','Дължими и платени нощувки - месец','Университет','Monthly lodgings information','Uni',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Uni','','',0,0,'','','select FullName from Universities','',200,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','Spec','Дължими и платени нощувки - месец','Специалност','Monthly lodgings information','Spec',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Spec','','',0,0,'','','select Name from Specialities','',200,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','Kurs','Дължими и платени нощувки - месец','Курс','Monthly lodgings information','Kurs',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Kurs','','',0,0,'','','select Name from Kursove','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','FN','Дължими и платени нощувки - месец','ФН','Monthly lodgings information','FN',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'FN','','',0,0,'','','','',50,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','City','Дължими и платени нощувки - месец','Град','Monthly lodgings information','City',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'City','','',0,0,'','','','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','Address','Дължими и платени нощувки - месец','Адрес','Monthly lodgings information','Address',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Address','','',0,0,'','','','',150,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','Sex','Дължими и платени нощувки - месец','Пол','Monthly lodgings information','Sex',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Sex','','',0,0,'','','','',30,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','PriceKind','Дължими и платени нощувки - месец','Ценоразпис','Monthly lodgings information','PriceKind',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'PriceKind','','',0,0,'','','select Description from PriceKinds','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','Usluga','Дължими и платени нощувки - месец','Услуга','Monthly lodgings information','Usluga',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Usluga','','',0,0,'','','select ServiceName from Services','',150,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','Kol','Дължими и платени нощувки - месец','Количество','Monthly lodgings information','Kol',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Sum(Kol)','Sum(qrData.Количество)','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','Cena','Дължими и платени нощувки - месец','Цена','Monthly lodgings information','Cena',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Cena','','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','SumOwe','Дължими и платени нощувки - месец','Дължима Сума','Monthly lodgings information','SumOwe',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Sum(SumOwe)','Sum(qrData.Дължима Сума)','',0,0,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','SumPaid','Дължими и платени нощувки - месец','Платена Сума','Monthly lodgings information','SumPaid',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Sum(SumPaid)','Sum(qrData.Платена Сума)','',0,0,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','Razlika','Дължими и платени нощувки - месец','Разлика','Monthly lodgings information','Razlika',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Sum(Razlika)','Sum(qrData.Разлика)','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','RName','Дължими и платени нощувки - месец','Стая','Monthly lodgings information','RName',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'RName','','',0,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','BrStudenti','Дължими и платени нощувки - месец','Брой Студенти','Monthly lodgings information','BrStudenti',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'Sum(BrStudenti)','Sum(qrData.Брой Студенти)','',0,0,'','','','',90,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OwePaidLodgMonth','RealDatePayed','Дължими и платени нощувки - месец','Дата плащане','Monthly lodgings information','RealDatePayed',2,GetFreeNInRelations('Monthly lodgings information', Null, Null, 10),'RealDatePayed','','',0,0,'','','','',120,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_OwePaidLodgMonth'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_OwePaidLodgMonth'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('CanceledReservations')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','__OPTIONS__','Анулирани резервации','__OPTIONS__','CanceledReservations','__OPTIONS__',1,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'__OPTIONS__','','',0,0,'','','Printer.Orientation=1','',80,'',0,0,0,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','bvrData1','Анулирани резервации','От дата','CanceledReservations','bvrData1',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'bvrData1','','',0,0,1,1,'','select Date(Now())',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','bvrData2','Анулирани резервации','До дата','CanceledReservations','bvrData2',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'bvrData2','','',0,0,1,1,'','select Date(Now())',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','ReserveNo','Анулирани резервации','Номер','CanceledReservations','ReserveNo',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','','',2,2,'','','','',43,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','DateReserveDt','Анулирани резервации','Дата','CanceledReservations','DateReserveDt',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','','',0,1,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','ReserveName','Анулирани резервации','Име','CanceledReservations','TipSdelka',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','','',0,0,'','','','',160,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','Hora','Анулирани резервации','Души','CanceledReservations','Hora',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','SUM(qrData.Души)','',2,0,'','','','',32,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','Days','Анулирани резервации','Дни','CanceledReservations','Days',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','','',2,0,'','','','',32,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','BoardPlanName','Анулирани резервации','Борд','CanceledReservations','BoardPlanName',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','','',2,0,'','','','',32,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','BusyCount','Анулирани резервации','Типове стаи','CanceledReservations','BusyCount',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','','',0,0,'','','','',100,'',0,1,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','BusyRooms','Анулирани резервации','Номера стаи','CanceledReservations','BusyRooms',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','','',0,0,'','','','',150,'',0,1,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','ReserveNote','Анулирани резервации','Бележка','CanceledReservations','ReserveNote',0,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','','',0,0,'','','','',200,'',0,1,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','Phone','Анулирани резервации','Телефон','CanceledReservations','Phone',0,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','','',0,0,'','','','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','ContractName','Анулирани резервации','Договор','CanceledReservations','ContractName',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'ContractName','','',0,0,'','','','',200,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','StatusName','Анулирани резервации','Статус резевация','CanceledReservations','StatusName',0,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','','',0,0,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CanceledReservations','CanceledKodAdmin','Анулирани резервации','Админ/амул.','CanceledReservations','CanceledKodAdmin',2,GetFreeNInRelations('CanceledReservations', Null, Null, 10),'','','',0,0,'','','','',100,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_CanceledReservations'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_CanceledReservations'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Report Cold Water')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','__Options__','Справка студена вода','__Options__','Report Cold Water','__Options__',1,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'__Options__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','bvrData1','Справка студена вода','От дата','Report Cold Water','bvrData1',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'bvrData1','','',1,0,1,1,'','select bvrData1',56,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','bvrData2','Справка студена вода','До дата','Report Cold Water','bvrData2',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'bvrData2','','',1,0,1,1,'','select bvrData2',56,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','Data','Справка студена вода','Дата','Report Cold Water','Date',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'Data','','',0,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','Mon','Справка студена вода','Месец','Report Cold Water','Month',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'Mon','','',1,1,'','','','',40,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','ApartName','Справка студена вода','Помещение','Report Cold Water','Apartment Name',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'ApartName','','',0,0,'','','select distinct ApartName from WaterAbonats','',70,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','UserName','Справка студена вода','Потребител','Report Cold Water','Username',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'UserName','','',0,0,'','','select distinct Username from WaterAbonats','',70,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','AbonatNo','Справка студена вода','Номер водомер','Report Cold Water','Abonat Number',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'AbonatNo','','',0,0,'','','','',56,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','OldValue','Справка студена вода','Старо Показание м3','Report Cold Water','Old Value',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'OldValue','','',1,0,'','','','',85,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','NewValue','Справка студена вода','Ново Показание м3','Report Cold Water','New Value',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'NewValue','','',1,0,'','','','',85,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','Kol','Справка студена вода','Кол.изразх. вода м3','Report Cold Water','Drain',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'Sum(Kol)','SUM(qrData.Кол.изразх. вода м3)','',1,0,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','SinglePrice','Справка студена вода','Единична цена лв.','Report Cold Water','SinglePrice',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'Max(SinglePrice)','','# ### ##0.00',1,0,'','','','',65,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_Water','Suma','Справка студена вода','Сума за плащане лв.','Report Cold Water','Sum',2,GetFreeNInRelations('Report Cold Water', Null, Null, 10),'Sum(Suma)','SUM(qrData.Сума за плащане лв.)','# ### ##0.00',1,0,'','','','',56,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_Water'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_Water'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Сметка за резервация - Справка')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_SmetkaReserve','__OPTIONS__','Сметка за резервация - Справка','__OPTIONS__','Сметка за резервация - Справка','__OPTIONS__',1,GetFreeNInRelations('Сметка за резервация - Справка', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_SmetkaReserve','Reservation','Сметка за резервация - Справка','Резервация','Сметка за резервация - Справка','Резервация',2,GetFreeNInRelations('Сметка за резервация - Справка', Null, Null, 10),'Reservation','','',3,0,'','','','select 0',40,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_SmetkaReserve','GuestName','Сметка за резервация - Справка','Гост','Сметка за резервация - Справка','Гост',2,GetFreeNInRelations('Сметка за резервация - Справка', Null, Null, 10),'GuestName','','',3,0,'','','','',200,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_SmetkaReserve','ServiceName','Сметка за резервация - Справка','Услуга','Сметка за резервация - Справка','Услуга',2,GetFreeNInRelations('Сметка за резервация - Справка', Null, Null, 10),'ServiceName','','',3,1,'','','','',300,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_SmetkaReserve','ServicePrice','Сметка за резервация - Справка','Цена','Сметка за резервация - Справка','Цена',2,GetFreeNInRelations('Сметка за резервация - Справка', Null, Null, 10),'ServicePrice','','# ### ##0.00',1,0,'','','','',50,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_SmetkaReserve','Qty','Сметка за резервация - Справка','Кол.','Сметка за резервация - Справка','Кол.',2,GetFreeNInRelations('Сметка за резервация - Справка', Null, Null, 10),'Sum(Qty)','Sum(qrData.Кол.)','',1,0,'','','','',32,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_SmetkaReserve','TotalSum','Сметка за резервация - Справка','Сума','Сметка за резервация - Справка','Сума',2,GetFreeNInRelations('Сметка за резервация - Справка', Null, Null, 10),'Sum(TotalSum)','Sum(qrData.Сума)','# ### ##0.00',1,0,'','','','',50,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_SmetkaReserve'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_SmetkaReserve'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Storn Operations')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServiceCorrections','__OPTIONS__','Сторно операции','__OPTIONS__','Storn Operations','__OPTIONS__',1,GetFreeNInRelations('Storn Operations', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServiceCorrections','bvrData1','Сторно операции','От дата','Storn Operations','From Date',2,GetFreeNInRelations('Storn Operations', Null, Null, 10),'bvrData1','','',0,0,1,1,'','select bvrData1',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServiceCorrections','bvrData2','Сторно операции','До дата','Storn Operations','To Date',2,GetFreeNInRelations('Storn Operations', Null, Null, 10),'bvrData2','','',0,0,1,1,'','select bvrData2',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServiceCorrections','Service','Сторно операции','Услуга','Storn Operations','Service',2,GetFreeNInRelations('Storn Operations', Null, Null, 10),'Service','','',0,0,'','','select ServiceName from Services','',140,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServiceCorrections','ServicesNum','Сторно операции','Брой','Storn Operations','Number',2,GetFreeNInRelations('Storn Operations', Null, Null, 10),'ServicesNum','','',1,0,'','','','',48,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServiceCorrections','ServiceSngPrice','Сторно операции','Ед.цена','Storn Operations','Sng. Price',2,GetFreeNInRelations('Storn Operations', Null, Null, 10),'ServiceSngPrice','','# ##0.00',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServiceCorrections','AllSum','Сторно операции','Сума','Storn Operations','Total',2,GetFreeNInRelations('Storn Operations', Null, Null, 10),'Sum(AllSum)','Sum(qrData.Сума)','# ##0.00',1,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServiceCorrections','GuestName','Сторно операции','Име гост','Storn Operations','Guest Name',2,GetFreeNInRelations('Storn Operations', Null, Null, 10),'GuestName','','',0,0,'','','SELECT "Name" FROM Guests GROUP BY "Name"','',150,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServiceCorrections','Account','Сторно операции','Кл.номер','Storn Operations','Client Number',2,GetFreeNInRelations('Storn Operations', Null, Null, 10),'Account','','',1,0,'','','','',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServiceCorrections','RoomNo','Сторно операции','Стая No','Storn Operations','Room #',2,GetFreeNInRelations('Storn Operations', Null, Null, 10),'RoomNo','','',0,0,'','','select RoomName from Rooms where Status <> 1 and Status <> 3','',48,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_ServiceCorrections','AdminName','Сторно операции','Админ.','Storn Operations','Admin.',2,GetFreeNInRelations('Storn Operations', Null, Null, 10),'AdminName','','',0,0,'','','','',100,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_ServiceCorrections'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_ServiceCorrections'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Rooming Rist')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','__OPTIONS__','Руминг лист','__OPTIONS__','Rooming Rist','__OPTIONS__',1,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','BookDate','Руминг лист','Дата','Rooming Rist','Date',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'BookDate','','',0,0,'','','','select current date',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','RoomNum','Руминг лист','Стая No','Rooming Rist','Room #',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'RoomNum','','',0,1,'','','select RoomName from Rooms where Status <> 1 and Status <> 3','',48,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','GuestNum','Руминг лист','Кл.номер','Rooming Rist','Client Number',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'GuestNum','','',0,1,'','','','',56,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','GuestName','Руминг лист','Име гост','Rooming Rist','Guest Name',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'GuestName','','',0,0,'','','SELECT "Name" FROM Guests GROUP BY "Name"','',168,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','Elderly','Руминг лист','В','Rooming Rist','A',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'Sum(Elderly)','Sum(qrData.В)','',1,0,'','','','',40,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','Children','Руминг лист','Д','Rooming Rist','K',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'Sum(Children)','Sum(qrData.Д)','',1,0,'','','','',40,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','ArriveDate','Руминг лист','Пристига','Rooming Rist','Arrive',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'ArriveDate','','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','LeaveDate','Руминг лист','Заминава','Rooming Rist','Check Out',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'LeaveDate','','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','BB','Руминг лист','Закуска','Rooming Rist','Breakfast',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'Sum(BB)','Sum(qrData.Закуска)','',1,0,'','','','',50,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','L','Руминг лист','Обяд','Rooming Rist','Lunch',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'Sum(L)','Sum(qrData.Обяд)','',1,0,'','','','',50,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','D','Руминг лист','Вечеря','Rooming Rist','Dinner',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'Sum(D)','Sum(qrData.Вечеря)','',1,0,'','','','',50,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','Agent','Руминг лист','Договор','Rooming Rist','Contract',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'Agent','','',0,0,'','','SELECT "ShortName" FROM Contracts WHERE Active=1','',104,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_RoomingList','MPS','Руминг лист','МПС','Rooming Rist','Vehicle',2,GetFreeNInRelations('Rooming Rist', Null, Null, 10),'MPS','','',1,0,'','','','',104,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_RoomingList'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_RoomingList'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Transfer of Service to Account')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','__OPTIONS__','Прехвърлени услуги към сметка','__OPTIONS__','Transfer of Service to Account','__OPTIONS__',1,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','bvrData1','Прехвърлени услуги към сметка','От дата','Transfer of Service to Account','From Date',0,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'bvrData1','','',0,0,1,1,'','select bvrData1',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','bvrData2','Прехвърлени услуги към сметка','До дата','Transfer of Service to Account','To Date',0,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'bvrData2','','',0,0,1,1,'','select bvrData2',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','FromGuestName','Прехвърлени услуги към сметка','От гост','Transfer of Service to Account','From Guest',2,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'FromGuestName','','',0,0,'','','select "Name" from Guests','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','FromAccount','Прехвърлени услуги към сметка','От сметка','Transfer of Service to Account','From Account',2,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'FromAccount','','',0,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','Service','Прехвърлени услуги към сметка','Услуга','Transfer of Service to Account','Service',2,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'Service','','',0,0,'','','select servicename from services','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','ServiceNum','Прехвърлени услуги към сметка','Брой','Transfer of Service to Account','Number',2,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'ServiceNum','','',0,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','ServiceSngPrice','Прехвърлени услуги към сметка','Ед.цена','Transfer of Service to Account','Sng. Price',2,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'ServiceSngPrice','','# ##0.00',0,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','AllSum','Прехвърлени услуги към сметка','Сум','Transfer of Service to Account','Total',2,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'Sum(AllSum)','Sum(qrData.Сума)','# ##0.00',1,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','Currency','Прехвърлени услуги към сметка','Валута','Transfer of Service to Account','Currency',2,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'Currency','','',1,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','RegDate','Прехвърлени услуги към сметка','Дата начисляване','Transfer of Service to Account','RegDate',2,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'','','',1,0,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','ToGuestName','Прехвърлени услуги към сметка','На гост','Transfer of Service to Account','To Guest',2,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'ToGuestName','','',0,0,'','','','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','ToAccount','Прехвърлени услуги към сметка','Към сметка','Transfer of Service to Account','ToAccount',2,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'ToAccount','','',1,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossServices','AdminName','Прехвърлени услуги към сметка','Админ.','Transfer of Service to Account','Admin.',2,GetFreeNInRelations('Transfer of Service to Account', Null, Null, 10),'AdminName','','',0,0,'','','','',80,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_CrossServices'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_CrossServices'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Transfer of Initial Services to Account')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','__OPTIONS__','Прехвърлени основни услуги към сметка','__OPTIONS__','Transfer of Initial Services to Account','__OPTIONS__',1,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','bvrData1','Прехвърлени основни услуги към сметка','От дата','Transfer of Initial Services to Account','From Date',2,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'bvrData1','','',0,0,1,1,'','select bvrData1',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','bvrData2','Прехвърлени основни услуги към сметка','До дата','Transfer of Initial Services to Account','To Date',2,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'bvrData2','','',0,0,1,1,'','select bvrData2',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','FromGuestName','Прехвърлени основни услуги към сметка','От гост','Transfer of Initial Services to Account','From Guest',2,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'FromGuestName','','',0,0,'','','select "Name" from Guests','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','FromAccount','Прехвърлени основни услуги към сметка','От сметка','Transfer of Initial Services to Account','From Account',2,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'FromAccount','','',0,0,'','','select GuestNum from Guests','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','ServiceCount','Прехвърлени основни услуги към сметка','Брой','Transfer of Initial Services to Account','Number',0,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'ServiceCount','','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','Price','Прехвърлени основни услуги към сметка','Ед. цена','Transfer of Initial Services to Account','Price',0,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'Price','','',1,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','AllSum','Прехвърлени основни услуги към сметка','Стойност','Transfer of Initial Services to Account','AllSum',0,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'AllSum','','',1,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','Currency','Прехвърлени основни услуги към сметка','Валута','Transfer of Initial Services to Account','Currency',0,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'Currency','','',1,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','RegDate','Прехвърлени основни услуги към сметка','Дата начисляване','Transfer of Initial Services to Account','RegDate',2,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'RegDate','','',1,0,'','','','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','ToGuestName','Прехвърлени основни услуги към сметка','Към гост','Transfer of Initial Services to Account','To Guest',2,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'ToGuestName','','',0,0,'','','select "Name" from Guests','',120,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','ToAccount','Прехвърлени основни услуги към сметка','Към сметка','Transfer of Initial Services to Account','To Account',2,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'ToAccount','','',0,0,'','','select GuestNum from Guests','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_CrossBaseServices','AdminName','Прехвърлени основни услуги към сметка','Админ.','Transfer of Initial Services to Account','Admin.',2,GetFreeNInRelations('Transfer of Initial Services to Account', Null, Null, 10),'AdminName','','',0,0,'','','','',100,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_CrossBaseServices'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_CrossBaseServices'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Payments on Additional Services')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_PayedAdditionalServices','__OPTIONS__','Плащания по допълнителни услуги','__OPTIONS__','Payments on Additional Services','__OPTIONS__',1,GetFreeNInRelations('Payments on Additional Services', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_PayedAdditionalServices','bvrData1','Плащания по допълнителни услуги','От дата','Payments on Additional Services','From Date',0,GetFreeNInRelations('Payments on Additional Services', Null, Null, 10),'bvrData1','','',0,0,1,1,'','select bvrData1',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_PayedAdditionalServices','bvrData2','Плащания по допълнителни услуги','До дата','Payments on Additional Services','To Date',0,GetFreeNInRelations('Payments on Additional Services', Null, Null, 10),'bvrData2','','',0,0,1,1,'','select bvrData2',72,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_PayedAdditionalServices','Service','Плащания по допълнителни услуги','Услуга','Payments on Additional Services','Service',2,GetFreeNInRelations('Payments on Additional Services', Null, Null, 10),'Service','','',0,1,'','','select ServiceName from Services','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_PayedAdditionalServices','Account','Плащания по допълнителни услуги','Кл.номер','Payments on Additional Services','Client Number',2,GetFreeNInRelations('Payments on Additional Services', Null, Null, 10),'Account','','',0,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_PayedAdditionalServices','PayType','Плащания по допълнителни услуги','Начин пл.','Payments on Additional Services','Type Of Payment',2,GetFreeNInRelations('Payments on Additional Services', Null, Null, 10),'PayType','','',0,0,'','','select PayTypeName from PayTypes','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_PayedAdditionalServices','AllSum','Плащания по допълнителни услуги','Сума','Payments on Additional Services','Total',2,GetFreeNInRelations('Payments on Additional Services', Null, Null, 10),'Sum(AllSum)','Sum(qrData.Сума)','# ##0.00',1,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_PayedAdditionalServices','Operator','Плащания по допълнителни услуги','Оператор','Payments on Additional Services','Operator',2,GetFreeNInRelations('Payments on Additional Services', Null, Null, 10),'Operator','','',0,0,'','','select shortname from admin','',120,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_PayedAdditionalServices'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_PayedAdditionalServices'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

Delete from Relations where lcase(RelationTable) = lcase('Tourist Report by Reservations')

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','__OPTIONS__','Отчет туристи по резервации','__OPTIONS__','Tourist Report by Reservations','__OPTIONS__',1,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'__OPTIONS__','','',0,0,'','','','',1,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','NumSign','Отчет туристи по резервации','.','Tourist Report by Reservations','.',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'.','Sum(qrData..)','',1,0,'','','','',20,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','RoomType','Отчет туристи по резервации','Тип','Tourist Report by Reservations','Type',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'RoomType','','',0,0,'','','select shortname from Classes','',30,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','Vaucher','Отчет туристи по резервации','Ваучер','Tourist Report by Reservations','Voucher',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'Vaucher','','',0,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','Ime','Отчет туристи по резервации','Име','Tourist Report by Reservations','Name',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'Ime','','',0,0,'','','select Name from guests','',160,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','Elderly','Отчет туристи по резервации','Вз','Tourist Report by Reservations','Adults',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'Sum(Elderly)','Sum(qrData.Вз)','',0,0,'','','','',40,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','Children','Отчет туристи по резервации','Дц','Tourist Report by Reservations','Kids',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'Sum(Children)','Sum(qrData.Дц)','',0,0,'','','','',40,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','RoomName','Отчет туристи по резервации','Стая No','Tourist Report by Reservations','Room #',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'RoomNum','','',0,0,'','','','',48,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','Account','Отчет туристи по резервации','Кл.номер','Tourist Report by Reservations','Client Number',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'Account','','',2,0,'','','','',50,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','ReserveNo','Отчет туристи по резервации','Резерв. No','Tourist Report by Reservations','Reserv. #',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'ReserveNo','','',2,0,'','','','',70,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','ReserveDate','Отчет туристи по резервации','Дата пристиг.','Tourist Report by Reservations','Accom. Date',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'ReserveDate','','',0,1,'','','','SELECT current date',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','ResMadeDate','Отчет туристи по резервации','Дата резерв.','Tourist Report by Reservations','Reserv. Date',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'ResMadeDate','','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','LeaveDate','Отчет туристи по резервации','Дата замин.','Tourist Report by Reservations','Check Out Date',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'LeaveDate','','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','DaysToStay','Отчет туристи по резервации','Бр. дни','Tourist Report by Reservations','Nmb Days',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'Sum(DaysToStay)','Sum(qrData.Бр. дни)','',1,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','TogetherWith','Отчет туристи по резервации','Заедно','Tourist Report by Reservations','Together',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'TogetherWith','','',1,1,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','NumRooms','Отчет Туристи по резервации','Бр. Стаи','Tourist Report by Reservations','Number Rooms',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'NumRooms','Sum(qrData.Бр. стаи)','',1,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','BoardPlan','Отчет туристи по резервации','Меню','Tourist Report by Reservations','Menu',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'BoardPlan','','',0,0,'','','','',60,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','Agent','Отчет туристи по резервации','Агент','Tourist Report by Reservations','Agent',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'Agent','','',0,0,'','','select shortname from contracts','',100,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','GuestStatus','Отчет туристи по резервации','Статус.','Tourist Report by Reservations','Status',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'NumSign','Sum(qrData..)','',1,0,'','','','',40,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','HourArrive','Отчет туристи по резервации','Час пристиг.','Tourist Report by Reservations','Arrival Hour',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'HourArrive','','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','HourLeaving','Отчет туристи по резервации','Час зам.','Tourist Report by Reservations','Departure Hour',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'HourLeaving','','',0,0,'','','','',80,'',0,0,1,today())

Go

INSERT INTO Relations(TableName,ColName,BGTableName,BGColName,RelationTable,RelationCol,SelectCol,N,Function,Suma,Mask,Align,Sortirane,Zadaljitelna,Promenliva,FilterList,DftFilter,Shirina,Opisanie,DftLike,AutoStretch,Spravka,PoslData)
VALUES('//v_OtchetTurReserve','TypeVip','Отчет туристи по резервации','VIP','Tourist Report by Reservations','VIP',2,GetFreeNInRelations('Tourist Report by Reservations', Null, Null, 10),'TypeVip','','',0,0,'','','select VipName from VIP','',90,'',0,0,1,today())

Go

delete from InformPermission where RelationN=(
select N from Relations where TableName='//v_OtchetTurReserve'and ColName='__OPTIONS__')

Go

f1: for f1 as curs scroll cursor for select grNo=N from AdminGroups do
  if grNo <> 0 then
    insert into InformPermission(N,RelationN,AdminGroupNo,Stoinost)
    values((select MAX(N+1) from InformPermission),(select N from Relations where TableName='//v_OtchetTurReserve'and ColName='__OPTIONS__'  ),GrNo,1);
  end if;
end for;

GO

IF (EXISTS(Select * from sys.sysprocedure where LCase(proc_name) = LCase('GetQtyRentForPeriodInMonth')))
THEN Drop procedure GetQtyRentForPeriodInMonth
END IF

GO

create function
DBA.GetQtyRentForPeriodInMonth(in @RegNo integer, in @Tip tinyint, in @PeriodStart date, in @PeriodEnd date) 
--@Tip 0-cqloto kolichestvo, 1-platenoto kolichestvo
--Izchislqva koficienta na no6tuvki v zadaden period (plateni ili vsi4ki) ot celiq mesec (broi noshtuvki v perioda v meseca)/(broi dni v meseca)
returns real
begin
  declare @Res real;
  declare @DateArrive date;
  declare @DateLeave date;
  declare @DatePaidTo date;
  declare @MonthIsWith30Days integer;
	declare @CalcStart date;
	declare @CalcEnd date;
	
	if (@PeriodEnd<=@PeriodStart) then
	  return (0);
	end if;
	
	if ((MONTH(@PeriodStart) <> MONTH(@PeriodEnd)) or ((YEAR(@PeriodStart) <> YEAR(@PeriodEnd)))) then
	  return (0);
	end if;
	
  select 
	  FloatToDate(DateReg), 
	  FloatToDate(DateReg+NumLodgings), 
		FloatToDate(DateReg+PayedLodgings) 
	into @DateArrive, @DateLeave, @DatePaidTo
	from 
	  Book 
	where 
	  Book.RegNum = @RegNo;
	
	if (@Tip=1) then
	  set @DateLeave=@DatePaidTo;
	end if;
	
  if (@DateArrive >= @DateLeave) then 
	  return(0);
  end if;
	
  set @MonthIsWith30Days = (select MonthIsWith30Days from Hotels where Hotel_ID = (select IntStojnost from Registers where RegisterName = 'HotelID'));
	
	if (@DateArrive>=@PeriodEnd) then
	  return(0);
	end if;
	
	if (@DateLeave<=@PeriodStart) then
	  return(0);
	end if;
	
	set @CalcStart=@DateArrive;
	set @CalcEnd=@DateLeave-1;
	
	if (@CalcStart<=@PeriodStart) then
	  set @CalcStart=@PeriodStart;
	end if;
	
	if (@CalcEnd>=@PeriodEnd) then
	  set @CalcEnd=@PeriodEnd;
	end if;
	
	set @Res = (cast(DAY(@CalcEnd)-DAY(@CalcStart)+1 as real)/cast(DOM(MONTH(@PeriodStart),YEAR(@PeriodStart),@MonthIsWith30Days) as real));
	
	if (MONTH(@PeriodStart)=2) and (@MonthIsWith30Days=1) then
	  if (cast(DAY(@CalcEnd)-DAY(@CalcStart)+1 as real)=28) then
		  set @Res=1;
		end if;
	end if;
	
	if (@Res>1) then
	  return(1);
	else 
	  return(@Res);
	end if;
end
--[v. 29.07.2009] - Yoan - Saobrazqva se s PriceSeasonPeriods

GO

IF (EXISTS(Select * from sys.sysprocedure where LCase(proc_name) = LCase('GetNoshtuvkaNameForPeriodInMonth')))
THEN Drop procedure GetNoshtuvkaNameForPeriodInMonth
END IF

GO

create function
DBA.GetNoshtuvkaNameForPeriodInMonth(in @RegNo integer,in @PeriodStart date, in @PeriodEnd date, in @IsLodg integer default 0)
--@IsLodg 0-uslugata e za mesec,1-uslugata e za noshtuvka
--Resultata e palen string s ime na noshtvkata vkliuchvasht mesec, staq i broi dni
returns varchar(60)
begin
  declare @Res varchar(60);
  declare @ServiceName varchar(40);
  declare @RoomName varchar(6);
  declare @DaysInMonth varchar(6);
  declare @KoefDaysInMonth real;
	declare @MonthIsWith30Days integer;
	set @MonthIsWith30Days = (select MonthIsWith30Days from Hotels where Hotel_ID =(select IntStojnost from Registers where RegisterName='HotelID'));
  set @KoefDaysInMonth=GetQtyRentForPeriodInMonth(@RegNo,0,@PeriodStart,@PeriodEnd);
  if @KoefDaysInMonth <> 1 then
    set @DaysInMonth=' ' || Round(@KoefDaysInMonth*DOM(MONTH(@PeriodStart),YEAR(@PeriodStart),@MonthIsWith30Days),0) || '/' || DOM(MONTH(@PeriodStart),YEAR(@PeriodStart),@MonthIsWith30Days)
  end if;
  select S.ServiceName,R.RoomName into @ServiceName,@RoomName from Services as S,PriceKinds as PK,Book as B,Rooms as R where
    B.RegNum = @RegNo and B.PriceKind = PK.PriceKind and PK.ServiceNo = S.ServiceNo and R.RoomNum = B.Room;
  if @IsLodg = 1 then
    if(select IsRest from Book where RegNum = @RegNo) = 1 then
      set @ServiceName='Почивка ';
    else
      set @ServiceName='Нощувка ';
    end if;
  end if;
  if @IsLodg = 0 then 
	  set @Res=@ServiceName || ' ' || ImeMesec(MONTH(@PeriodStart)) || ' в стая ' || @RoomName || @DaysInMonth;
  else 
	  set @Res=@ServiceName || ' в стая ' || @RoomName;
  end if;
  return(@Res)
end
--[29.07.2009] - Yoan - Saobrazqva se s PriceSeasonPeriods

GO