SELECT karta1
GO TOP
IF EMPTY(karta1.celkdruh)
	SELECT karta1.c_karty,karta1.cena_prum,karta1.c_mena,karta1.c_mena_n,karta1.celkdruh,;
		karta1.cena01, karta1.cena02, karta1.cena03, karta1.cena04, karta1.cena05, karta1.cena06, karta1.cena07, karta1.cena08, karta1.cena09, karta1.cena10,;
		karta1.cena11, karta1.cena12, karta1.cena13, karta1.cena14, karta1.cena15, karta1.cena16, karta1.cena17, karta1.cena18, karta1.cena19, karta1.cena20,;
		karta1.cena21, karta1.cena22, karta1.cena23, karta1.cena24, karta1.cena25, karta1.cena26, karta1.cena27, karta1.cena28, karta1.cena29, karta1.cena30,;
		karta1.cena31, karta1.cena32, karta1.cena33, karta1.cena34, karta1.cena35, karta1.cena36, karta1.cena37, karta1.cena38, karta1.cena39, karta1.cena40,;
		kceny1.cenaa1, kceny1.cenaa2, kceny1.cenaa3, kceny1.cenaa4, kceny1.cenaa5, kceny1.cenaa6, kceny1.cenaa7, kceny1.cenaa8, kceny1.cenaa9, kceny1.cenaa0,;
		kceny1.cenab1, kceny1.cenab2, kceny1.cenab3, kceny1.cenab4, kceny1.cenab5, kceny1.cenab6, kceny1.cenab7, kceny1.cenab8, kceny1.cenab9, kceny1.cenab0,;
		kceny1.cenac1, kceny1.cenac2, kceny1.cenac3, kceny1.cenac4, kceny1.cenac5, kceny1.cenac6, kceny1.cenac7, kceny1.cenac8, kceny1.cenac9, kceny1.cenac0,;
		kceny1.cenad1, kceny1.cenad2, kceny1.cenad3, kceny1.cenad4, kceny1.cenad5, kceny1.cenad6, kceny1.cenad7, kceny1.cenad8, kceny1.cenad9, kceny1.cenad0,;
		kceny1.cenae1, kceny1.cenae2, kceny1.cenae3, kceny1.cenae4, kceny1.cenae5, kceny1.cenae6, kceny1.cenae7, kceny1.cenae8, kceny1.cenae9, kceny1.cenae0,;
		kceny1.cenaf1, kceny1.cenaf2, kceny1.cenaf3, kceny1.cenaf4, kceny1.cenaf5, kceny1.cenaf6, kceny1.cenaf7, kceny1.cenaf8, kceny1.cenaf9, kceny1.cenaf0,;
		kceny1.cenag1, kceny1.cenag2, kceny1.cenag3, kceny1.cenag4, kceny1.cenag5, kceny1.cenag6, kceny1.cenag7, kceny1.cenag8, kceny1.cenag9, kceny1.cenag0,;
		kceny1.cenah1, kceny1.cenah2, kceny1.cenah3, kceny1.cenah4, kceny1.cenah5, kceny1.cenah6, kceny1.cenah7, kceny1.cenah8, kceny1.cenah9, kceny1.cenah0,;
		kceny1.cenai1, kceny1.cenai2, kceny1.cenai3, kceny1.cenai4, kceny1.cenai5, kceny1.cenai6, kceny1.cenai7, kceny1.cenai8, kceny1.cenai9, kceny1.cenai0,;
		kceny1.cenaj1, kceny1.cenaj2, kceny1.cenaj3, kceny1.cenaj4, kceny1.cenaj5, kceny1.cenaj6, kceny1.cenaj7, kceny1.cenaj8, kceny1.cenaj9, kceny1.cenaj0,;
		kceny1.cenak1, kceny1.cenak2, kceny1.cenak3, kceny1.cenak4, kceny1.cenak5, kceny1.cenak6, kceny1.cenak7, kceny1.cenak8, kceny1.cenak9, kceny1.cenak0,;
		kceny1.cenal1, kceny1.cenal2, kceny1.cenal3, kceny1.cenal4, kceny1.cenal5, kceny1.cenal6, kceny1.cenal7, kceny1.cenal8, kceny1.cenal9, kceny1.cenal0 ;
		FROM karta1, kceny1 WHERE karta1.c_karty=kceny1.c_karty INTO CURSOR karty2 READWRITE

	SELECT karta1.c_karty,;
		m.dph1 AS dan01, m.dph1 AS dan02,m.dph1 AS dan03, m.dph1 AS dan04, m.dph1 AS dan05, m.dph1 AS dan06, m.dph1 AS dan07, m.dph1 AS dan08, m.dph1 AS dan09, m.dph1 AS dan10,;
		m.dph1 AS dan11, m.dph1 AS dan12,m.dph1 AS dan13, m.dph1 AS dan14, m.dph1 AS dan15, m.dph1 AS dan16, m.dph1 AS dan17, m.dph1 AS dan18, m.dph1 AS dan19, m.dph1 AS dan20,;
		m.dph1 AS dan21, m.dph1 AS dan22,m.dph1 AS dan23, m.dph1 AS dan24, m.dph1 AS dan25, m.dph1 AS dan26, m.dph1 AS dan27, m.dph1 AS dan28, m.dph1 AS dan29, m.dph1 AS dan30,;
		m.dph1 AS dan31, m.dph1 AS dan32,m.dph1 AS dan33, m.dph1 AS dan34, m.dph1 AS dan35, m.dph1 AS dan36, m.dph1 AS dan37, m.dph1 AS dan38, m.dph1 AS dan39, m.dph1 AS dan40,;
		m.dph1 AS dana0, m.dph1 AS dana1,m.dph1 AS dana2, m.dph1 AS dana3, m.dph1 AS dana4, m.dph1 AS dana5, m.dph1 AS dana6, m.dph1 AS dana7, m.dph1 AS dana8, m.dph1 AS dana9,;
		m.dph1 AS danb0, m.dph1 AS danb1,m.dph1 AS danb2, m.dph1 AS danb3, m.dph1 AS danb4, m.dph1 AS danb5, m.dph1 AS danb6, m.dph1 AS danb7, m.dph1 AS danb8, m.dph1 AS danb9,;
		m.dph1 AS danc0, m.dph1 AS danc1,m.dph1 AS danc2, m.dph1 AS danc3, m.dph1 AS danc4, m.dph1 AS danc5, m.dph1 AS danc6, m.dph1 AS danc7, m.dph1 AS danc8, m.dph1 AS danc9,;
		m.dph1 AS dand0, m.dph1 AS dand1,m.dph1 AS dand2, m.dph1 AS dand3, m.dph1 AS dand4, m.dph1 AS dand5, m.dph1 AS dand6, m.dph1 AS dand7, m.dph1 AS dand8, m.dph1 AS dand9,;
		m.dph1 AS dane0, m.dph1 AS dane1,m.dph1 AS dane2, m.dph1 AS dane3, m.dph1 AS dane4, m.dph1 AS dane5, m.dph1 AS dane6, m.dph1 AS dane7, m.dph1 AS dane8, m.dph1 AS dane9,;
		m.dph1 AS danf0, m.dph1 AS danf1,m.dph1 AS danf2, m.dph1 AS danf3, m.dph1 AS danf4, m.dph1 AS danf5, m.dph1 AS danf6, m.dph1 AS danf7, m.dph1 AS danf8, m.dph1 AS danf9,;
		m.dph1 AS dang0, m.dph1 AS dang1,m.dph1 AS dang2, m.dph1 AS dang3, m.dph1 AS dang4, m.dph1 AS dang5, m.dph1 AS dang6, m.dph1 AS dang7, m.dph1 AS dang8, m.dph1 AS dang9,;
		m.dph1 AS danh0, m.dph1 AS danh1,m.dph1 AS danh2, m.dph1 AS danh3, m.dph1 AS danh4, m.dph1 AS danh5, m.dph1 AS danh6, m.dph1 AS danh7, m.dph1 AS danh8, m.dph1 AS danh9,;
		m.dph1 AS dani0, m.dph1 AS dani1,m.dph1 AS dani2, m.dph1 AS dani3, m.dph1 AS dani4, m.dph1 AS dani5, m.dph1 AS dani6, m.dph1 AS dani7, m.dph1 AS dani8, m.dph1 AS dani9,;
		m.dph1 AS danj0, m.dph1 AS danj1,m.dph1 AS danj2, m.dph1 AS danj3, m.dph1 AS danj4, m.dph1 AS danj5, m.dph1 AS danj6, m.dph1 AS danj7, m.dph1 AS danj8, m.dph1 AS danj9,;
		m.dph1 AS dank0, m.dph1 AS dank1,m.dph1 AS dank2, m.dph1 AS dank3, m.dph1 AS dank4, m.dph1 AS dank5, m.dph1 AS dank6, m.dph1 AS dank7, m.dph1 AS dank8, m.dph1 AS dank9,;
		m.dph1 AS danl0, m.dph1 AS danl1,m.dph1 AS danl2, m.dph1 AS danl3, m.dph1 AS danl4, m.dph1 AS danl5, m.dph1 AS danl6, m.dph1 AS danl7, m.dph1 AS danl8, m.dph1 AS danl9 ;
		FROM karta1 INTO CURSOR karty3 READWRITE
ELSE
	cmd = "SELECT karta1.c_karty, karta1.cena_prum, karta1.c_mena, karta1.c_mena_n, karta1.celkdruh, " ;
		+ "karta1.cena01, karta1.cena02, karta1.cena03, karta1.cena04, karta1.cena05, karta1.cena06, karta1.cena07, karta1.cena08, karta1.cena09, karta1.cena10," ;
		+ "karta1.cena11, karta1.cena12, karta1.cena13, karta1.cena14, karta1.cena15, karta1.cena16, karta1.cena17, karta1.cena18, karta1.cena19, karta1.cena20," ;
		+ "karta1.cena21, karta1.cena22, karta1.cena23, karta1.cena24, karta1.cena25, karta1.cena26, karta1.cena27, karta1.cena28, karta1.cena29, karta1.cena30," ;
		+ "karta1.cena31, karta1.cena32, karta1.cena33, karta1.cena34, karta1.cena35, karta1.cena36, karta1.cena37, karta1.cena38, karta1.cena39, karta1.cena40 "

	cmd = m.cmd + "," ;
		+ "kceny1.cenaA1, kceny1.cenaA2, kceny1.cenaA3, kceny1.cenaA4, kceny1.cenaA5, kceny1.cenaA6, kceny1.cenaA7, kceny1.cenaA8, kceny1.cenaA9, kceny1.cenaA0," ;
		+ "kceny1.cenaB1, kceny1.cenaB2, kceny1.cenaB3, kceny1.cenaB4, kceny1.cenaB5, kceny1.cenaB6, kceny1.cenaB7, kceny1.cenaB8, kceny1.cenaB9, kceny1.cenaB0," ;
		+ "kceny1.cenaC1, kceny1.cenaC2, kceny1.cenaC3, kceny1.cenaC4, kceny1.cenaC5, kceny1.cenaC6, kceny1.cenaC7, kceny1.cenaC8, kceny1.cenaC9, kceny1.cenaC0," ;
		+ "kceny1.cenaD1, kceny1.cenaD2, kceny1.cenaD3, kceny1.cenaD4, kceny1.cenaD5, kceny1.cenaD6, kceny1.cenaD7, kceny1.cenaD8, kceny1.cenaD9, kceny1.cenaD0," ;
		+ "kceny1.cenaE1, kceny1.cenaE2, kceny1.cenaE3, kceny1.cenaE4, kceny1.cenaE5, kceny1.cenaE6, kceny1.cenaE7, kceny1.cenaE8, kceny1.cenaE9, kceny1.cenaE0," ;
		+ "kceny1.cenaF1, kceny1.cenaF2, kceny1.cenaF3, kceny1.cenaF4, kceny1.cenaF5, kceny1.cenaF6, kceny1.cenaF7, kceny1.cenaF8, kceny1.cenaF9, kceny1.cenaF0," ;
		+ "kceny1.cenaG1, kceny1.cenaG2, kceny1.cenaG3, kceny1.cenaG4, kceny1.cenaG5, kceny1.cenaG6, kceny1.cenaG7, kceny1.cenaG8, kceny1.cenaG9, kceny1.cenaG0," ;
		+ "kceny1.cenaH1, kceny1.cenaH2, kceny1.cenaH3, kceny1.cenaH4, kceny1.cenaH5, kceny1.cenaH6, kceny1.cenaH7, kceny1.cenaH8, kceny1.cenaH9, kceny1.cenaH0," ;
		+ "kceny1.cenaI1, kceny1.cenaI2, kceny1.cenaI3, kceny1.cenaI4, kceny1.cenaI5, kceny1.cenaI6, kceny1.cenaI7, kceny1.cenaI8, kceny1.cenaI9, kceny1.cenaI0," ;
		+ "kceny1.cenaJ1, kceny1.cenaJ2, kceny1.cenaJ3, kceny1.cenaJ4, kceny1.cenaJ5, kceny1.cenaJ6, kceny1.cenaJ7, kceny1.cenaJ8, kceny1.cenaJ9, kceny1.cenaJ0," ;
		+ "kceny1.cenaK1, kceny1.cenaK2, kceny1.cenaK3, kceny1.cenaK4, kceny1.cenaK5, kceny1.cenaK6, kceny1.cenaK7, kceny1.cenaK8, kceny1.cenaK9, kceny1.cenaK0," ;
		+ "kceny1.cenaL1, kceny1.cenaL2, kceny1.cenaL3, kceny1.cenaL4, kceny1.cenaL5, kceny1.cenaL6, kceny1.cenaL7, kceny1.cenaL8, kceny1.cenaL9, kceny1.cenaL0 "
	cmd = cmd + " FROM karta1, fnskupiny, kceny1 WHERE karta1.celkdruh=fnskupiny.c_druh AND karta1.c_karty=kceny1.c_karty INTO CURSOR karty2 READWRITE "
	&cmd

	cmd = "SELECT karta1.c_karty," ;
		+ "(fnskupiny.dan01-1)*100 as dan01,(fnskupiny.dan02-1)*100 as dan02,(fnskupiny.dan03-1)*100 as dan03,(fnskupiny.dan04-1)*100 as dan04,(fnskupiny.dan05-1)*100 as dan05," ;
		+ "(fnskupiny.dan06-1)*100 as dan06,(fnskupiny.dan07-1)*100 as dan07,(fnskupiny.dan08-1)*100 as dan08,(fnskupiny.dan09-1)*100 as dan09,(fnskupiny.dan10-1)*100 as dan10," ;
		+ "(fnskupiny.dan11-1)*100 as dan11,(fnskupiny.dan12-1)*100 as dan12,(fnskupiny.dan13-1)*100 as dan13,(fnskupiny.dan14-1)*100 as dan14,(fnskupiny.dan15-1)*100 as dan15," ;
		+ "(fnskupiny.dan16-1)*100 as dan16,(fnskupiny.dan17-1)*100 as dan17,(fnskupiny.dan18-1)*100 as dan18,(fnskupiny.dan19-1)*100 as dan19,(fnskupiny.dan20-1)*100 as dan20," ;
		+ "(fnskupiny.dan21-1)*100 as dan21,(fnskupiny.dan22-1)*100 as dan22,(fnskupiny.dan23-1)*100 as dan23,(fnskupiny.dan24-1)*100 as dan24,(fnskupiny.dan25-1)*100 as dan25," ;
		+ "(fnskupiny.dan26-1)*100 as dan26,(fnskupiny.dan27-1)*100 as dan27,(fnskupiny.dan28-1)*100 as dan28,(fnskupiny.dan29-1)*100 as dan29,(fnskupiny.dan30-1)*100 as dan30," ;
		+ "(fnskupiny.dan31-1)*100 as dan31,(fnskupiny.dan32-1)*100 as dan32,(fnskupiny.dan33-1)*100 as dan33,(fnskupiny.dan34-1)*100 as dan34,(fnskupiny.dan35-1)*100 as dan35," ;
		+ "(fnskupiny.dan36-1)*100 as dan36,(fnskupiny.dan37-1)*100 as dan37,(fnskupiny.dan38-1)*100 as dan38,(fnskupiny.dan39-1)*100 as dan39,(fnskupiny.dan40-1)*100 as dan40 "
	cmd = m.cmd + "," ;
		+ "(fnskupiny.danA0-1)*100 as danA0,(fnskupiny.danA1-1)*100 as danA1,(fnskupiny.danA2-1)*100 as danA2,(fnskupiny.danA3-1)*100 as danA3,(fnskupiny.danA4-1)*100 as danA4," ;
		+ "(fnskupiny.danA5-1)*100 as danA5,(fnskupiny.danA6-1)*100 as danA6,(fnskupiny.danA7-1)*100 as danA7,(fnskupiny.danA8-1)*100 as danA8,(fnskupiny.danA9-1)*100 as danA9," ;
		+ "(fnskupiny.danB0-1)*100 as danB0,(fnskupiny.danB1-1)*100 as danB1,(fnskupiny.danB2-1)*100 as danB2,(fnskupiny.danB3-1)*100 as danB3,(fnskupiny.danB4-1)*100 as danB4," ;
		+ "(fnskupiny.danB5-1)*100 as danB5,(fnskupiny.danB6-1)*100 as danB6,(fnskupiny.danB7-1)*100 as danB7,(fnskupiny.danB8-1)*100 as danB8,(fnskupiny.danB9-1)*100 as danB9," ;
		+ "(fnskupiny.danC0-1)*100 as danC0,(fnskupiny.danC1-1)*100 as danC1,(fnskupiny.danC2-1)*100 as danC2,(fnskupiny.danC3-1)*100 as danC3,(fnskupiny.danC4-1)*100 as danC4," ;
		+ "(fnskupiny.danC5-1)*100 as danC5,(fnskupiny.danC6-1)*100 as danC6,(fnskupiny.danC7-1)*100 as danC7,(fnskupiny.danC8-1)*100 as danC8,(fnskupiny.danC9-1)*100 as danC9," ;
		+ "(fnskupiny.danD0-1)*100 as danD0,(fnskupiny.danD1-1)*100 as danD1,(fnskupiny.danD2-1)*100 as danD2,(fnskupiny.danD3-1)*100 as danD3,(fnskupiny.danD4-1)*100 as danD4," ;
		+ "(fnskupiny.danD5-1)*100 as danD5,(fnskupiny.danD6-1)*100 as danD6,(fnskupiny.danD7-1)*100 as danD7,(fnskupiny.danD8-1)*100 as danD8,(fnskupiny.danD9-1)*100 as danD9," ;
		+ "(fnskupiny.danE0-1)*100 as danE0,(fnskupiny.danE1-1)*100 as danE1,(fnskupiny.danE2-1)*100 as danE2,(fnskupiny.danE3-1)*100 as danE3,(fnskupiny.danE4-1)*100 as danE4," ;
		+ "(fnskupiny.danE5-1)*100 as danE5,(fnskupiny.danE6-1)*100 as danE6,(fnskupiny.danE7-1)*100 as danE7,(fnskupiny.danE8-1)*100 as danE8,(fnskupiny.danE9-1)*100 as danE9," ;
		+ "(fnskupiny.danF0-1)*100 as danF0,(fnskupiny.danF1-1)*100 as danF1,(fnskupiny.danF2-1)*100 as danF2,(fnskupiny.danF3-1)*100 as danF3,(fnskupiny.danF4-1)*100 as danF4," ;
		+ "(fnskupiny.danF5-1)*100 as danF5,(fnskupiny.danF6-1)*100 as danF6,(fnskupiny.danF7-1)*100 as danF7,(fnskupiny.danF8-1)*100 as danF8,(fnskupiny.danF9-1)*100 as danF9," ;
		+ "(fnskupiny.danG0-1)*100 as danG0,(fnskupiny.danG1-1)*100 as danG1,(fnskupiny.danG2-1)*100 as danG2,(fnskupiny.danG3-1)*100 as danG3,(fnskupiny.danG4-1)*100 as danG4," ;
		+ "(fnskupiny.danG5-1)*100 as danG5,(fnskupiny.danG6-1)*100 as danG6,(fnskupiny.danG7-1)*100 as danG7,(fnskupiny.danG8-1)*100 as danG8,(fnskupiny.danG9-1)*100 as danG9," ;
		+ "(fnskupiny.danH0-1)*100 as danH0,(fnskupiny.danH1-1)*100 as danH1,(fnskupiny.danH2-1)*100 as danH2,(fnskupiny.danH3-1)*100 as danH3,(fnskupiny.danH4-1)*100 as danH4," ;
		+ "(fnskupiny.danH5-1)*100 as danH5,(fnskupiny.danH6-1)*100 as danH6,(fnskupiny.danH7-1)*100 as danH7,(fnskupiny.danH8-1)*100 as danH8,(fnskupiny.danH9-1)*100 as danH9," ;
		+ "(fnskupiny.danI0-1)*100 as danI0,(fnskupiny.danI1-1)*100 as danI1,(fnskupiny.danI2-1)*100 as danI2,(fnskupiny.danI3-1)*100 as danI3,(fnskupiny.danI4-1)*100 as danI4," ;
		+ "(fnskupiny.danI5-1)*100 as danI5,(fnskupiny.danI6-1)*100 as danI6,(fnskupiny.danI7-1)*100 as danI7,(fnskupiny.danI8-1)*100 as danI8,(fnskupiny.danI9-1)*100 as danI9," ;
		+ "(fnskupiny.danJ0-1)*100 as danJ0,(fnskupiny.danJ1-1)*100 as danJ1,(fnskupiny.danJ2-1)*100 as danJ2,(fnskupiny.danJ3-1)*100 as danJ3,(fnskupiny.danJ4-1)*100 as danJ4," ;
		+ "(fnskupiny.danJ5-1)*100 as danJ5,(fnskupiny.danJ6-1)*100 as danJ6,(fnskupiny.danJ7-1)*100 as danJ7,(fnskupiny.danJ8-1)*100 as danJ8,(fnskupiny.danJ9-1)*100 as danJ9," ;
		+ "(fnskupiny.danK0-1)*100 as danK0,(fnskupiny.danK1-1)*100 as danK1,(fnskupiny.danK2-1)*100 as danK2,(fnskupiny.danK3-1)*100 as danK3,(fnskupiny.danK4-1)*100 as danK4," ;
		+ "(fnskupiny.danK5-1)*100 as danK5,(fnskupiny.danK6-1)*100 as danK6,(fnskupiny.danK7-1)*100 as danK7,(fnskupiny.danK8-1)*100 as danK8,(fnskupiny.danK9-1)*100 as danK9," ;
		+ "(fnskupiny.danL0-1)*100 as danL0,(fnskupiny.danL1-1)*100 as danL1,(fnskupiny.danL2-1)*100 as danL2,(fnskupiny.danL3-1)*100 as danL3,(fnskupiny.danL4-1)*100 as danL4," ;
		+ "(fnskupiny.danL5-1)*100 as danL5,(fnskupiny.danL6-1)*100 as danL6,(fnskupiny.danL7-1)*100 as danL7,(fnskupiny.danL8-1)*100 as danL8,(fnskupiny.danL9-1)*100 as danL9 "
	cmd = cmd + " FROM karta1, fnskupiny WHERE karta1.celkdruh=fnskupiny.c_druh INTO CURSOR karty3 READWRITE "
	&cmd
ENDIF

SELECT karta1.c_karty,;
	$0 AS rozp01, $0 AS rozp02, $0 AS rozp03, $0 AS rozp04, $0 AS rozp05, $0 AS rozp06, $0 AS rozp07, $0 AS rozp08, $0 AS rozp09, $0 AS rozp10,;
	$0 AS rozp11, $0 AS rozp12, $0 AS rozp13, $0 AS rozp14, $0 AS rozp15, $0 AS rozp16, $0 AS rozp17, $0 AS rozp18, $0 AS rozp19, $0 AS rozp20,;
	$0 AS rozp21, $0 AS rozp22, $0 AS rozp23, $0 AS rozp24, $0 AS rozp25, $0 AS rozp26, $0 AS rozp27, $0 AS rozp28, $0 AS rozp29, $0 AS rozp30,;
	$0 AS rozp31, $0 AS rozp32, $0 AS rozp33, $0 AS rozp34, $0 AS rozp35, $0 AS rozp36, $0 AS rozp37, $0 AS rozp38, $0 AS rozp39, $0 AS rozp40,;
	$0 AS rozpa0, $0 AS rozpa1, $0 AS rozpa2, $0 AS rozpa3, $0 AS rozpa4, $0 AS rozpa5, $0 AS rozpa6, $0 AS rozpa7, $0 AS rozpa8, $0 AS rozpa9,;
	$0 AS rozpb0, $0 AS rozpb1, $0 AS rozpb2, $0 AS rozpb3, $0 AS rozpb4, $0 AS rozpb5, $0 AS rozpb6, $0 AS rozpb7, $0 AS rozpb8, $0 AS rozpb9,;
	$0 AS rozpc0, $0 AS rozpc1, $0 AS rozpc2, $0 AS rozpc3, $0 AS rozpc4, $0 AS rozpc5, $0 AS rozpc6, $0 AS rozpc7, $0 AS rozpc8, $0 AS rozpc9,;
	$0 AS rozpd0, $0 AS rozpd1, $0 AS rozpd2, $0 AS rozpd3, $0 AS rozpd4, $0 AS rozpd5, $0 AS rozpd6, $0 AS rozpd7, $0 AS rozpd8, $0 AS rozpd9,;
	$0 AS rozpe0, $0 AS rozpe1, $0 AS rozpe2, $0 AS rozpe3, $0 AS rozpe4, $0 AS rozpe5, $0 AS rozpe6, $0 AS rozpe7, $0 AS rozpe8, $0 AS rozpe9,;
	$0 AS rozpf0, $0 AS rozpf1, $0 AS rozpf2, $0 AS rozpf3, $0 AS rozpf4, $0 AS rozpf5, $0 AS rozpf6, $0 AS rozpf7, $0 AS rozpf8, $0 AS rozpf9,;
	$0 AS rozpg0, $0 AS rozpg1, $0 AS rozpg2, $0 AS rozpg3, $0 AS rozpg4, $0 AS rozpg5, $0 AS rozpg6, $0 AS rozpg7, $0 AS rozpg8, $0 AS rozpg9,;
	$0 AS rozph0, $0 AS rozph1, $0 AS rozph2, $0 AS rozph3, $0 AS rozph4, $0 AS rozph5, $0 AS rozph6, $0 AS rozph7, $0 AS rozph8, $0 AS rozph9,;
	$0 AS rozpi0, $0 AS rozpi1, $0 AS rozpi2, $0 AS rozpi3, $0 AS rozpi4, $0 AS rozpi5, $0 AS rozpi6, $0 AS rozpi7, $0 AS rozpi8, $0 AS rozpi9,;
	$0 AS rozpj0, $0 AS rozpj1, $0 AS rozpj2, $0 AS rozpj3, $0 AS rozpj4, $0 AS rozpj5, $0 AS rozpj6, $0 AS rozpj7, $0 AS rozpj8, $0 AS rozpj9,;
	$0 AS rozpk0, $0 AS rozpk1, $0 AS rozpk2, $0 AS rozpk3, $0 AS rozpk4, $0 AS rozpk5, $0 AS rozpk6, $0 AS rozpk7, $0 AS rozpk8, $0 AS rozpk9,;
	$0 AS rozpl0, $0 AS rozpl1, $0 AS rozpl2, $0 AS rozpl3, $0 AS rozpl4, $0 AS rozpl5, $0 AS rozpl6, $0 AS rozpl7, $0 AS rozpl8, $0 AS rozpl9 ;
	FROM karta1 INTO CURSOR karty4 READWRITE

SELECT karta1.c_karty,;
	$0 AS crozp01, $0 AS crozp02, $0 AS crozp03, $0 AS crozp04, $0 AS crozp05, $0 AS crozp06, $0 AS crozp07, $0 AS crozp08, $0 AS crozp09, $0 AS crozp10,;
	$0 AS crozp11, $0 AS crozp12, $0 AS crozp13, $0 AS crozp14, $0 AS crozp15, $0 AS crozp16, $0 AS crozp17, $0 AS crozp18, $0 AS crozp19, $0 AS crozp20,;
	$0 AS crozp21, $0 AS crozp22, $0 AS crozp23, $0 AS crozp24, $0 AS crozp25, $0 AS crozp26, $0 AS crozp27, $0 AS crozp28, $0 AS crozp29, $0 AS crozp30,;
	$0 AS crozp31, $0 AS crozp32, $0 AS crozp33, $0 AS crozp34, $0 AS crozp35, $0 AS crozp36, $0 AS crozp37, $0 AS crozp38, $0 AS crozp39, $0 AS crozp40,;
	$0 AS crozpa0, $0 AS crozpa1, $0 AS crozpa2, $0 AS crozpa3, $0 AS crozpa4, $0 AS crozpa5, $0 AS crozpa6, $0 AS crozpa7, $0 AS crozpa8, $0 AS crozpa9,;
	$0 AS crozpb0, $0 AS crozpb1, $0 AS crozpb2, $0 AS crozpb3, $0 AS crozpb4, $0 AS crozpb5, $0 AS crozpb6, $0 AS crozpb7, $0 AS crozpb8, $0 AS crozpb9,;
	$0 AS crozpc0, $0 AS crozpc1, $0 AS crozpc2, $0 AS crozpc3, $0 AS crozpc4, $0 AS crozpc5, $0 AS crozpc6, $0 AS crozpc7, $0 AS crozpc8, $0 AS crozpc9,;
	$0 AS crozpd0, $0 AS crozpd1, $0 AS crozpd2, $0 AS crozpd3, $0 AS crozpd4, $0 AS crozpd5, $0 AS crozpd6, $0 AS crozpd7, $0 AS crozpd8, $0 AS crozpd9,;
	$0 AS crozpe0, $0 AS crozpe1, $0 AS crozpe2, $0 AS crozpe3, $0 AS crozpe4, $0 AS crozpe5, $0 AS crozpe6, $0 AS crozpe7, $0 AS crozpe8, $0 AS crozpe9,;
	$0 AS crozpf0, $0 AS crozpf1, $0 AS crozpf2, $0 AS crozpf3, $0 AS crozpf4, $0 AS crozpf5, $0 AS crozpf6, $0 AS crozpf7, $0 AS crozpf8, $0 AS crozpf9,;
	$0 AS crozpg0, $0 AS crozpg1, $0 AS crozpg2, $0 AS crozpg3, $0 AS crozpg4, $0 AS crozpg5, $0 AS crozpg6, $0 AS crozpg7, $0 AS crozpg8, $0 AS crozpg9,;
	$0 AS crozph0, $0 AS crozph1, $0 AS crozph2, $0 AS crozph3, $0 AS crozph4, $0 AS crozph5, $0 AS crozph6, $0 AS crozph7, $0 AS crozph8, $0 AS crozph9,;
	$0 AS crozpi0, $0 AS crozpi1, $0 AS crozpi2, $0 AS crozpi3, $0 AS crozpi4, $0 AS crozpi5, $0 AS crozpi6, $0 AS crozpi7, $0 AS crozpi8, $0 AS crozpi9,;
	$0 AS crozpj0, $0 AS crozpj1, $0 AS crozpj2, $0 AS crozpj3, $0 AS crozpj4, $0 AS crozpj5, $0 AS crozpj6, $0 AS crozpj7, $0 AS crozpj8, $0 AS crozpj9,;
	$0 AS crozpk0, $0 AS crozpk1, $0 AS crozpk2, $0 AS crozpk3, $0 AS crozpk4, $0 AS crozpk5, $0 AS crozpk6, $0 AS crozpk7, $0 AS crozpk8, $0 AS crozpk9,;
	$0 AS crozpl0, $0 AS crozpl1, $0 AS crozpl2, $0 AS crozpl3, $0 AS crozpl4, $0 AS crozpl5, $0 AS crozpl6, $0 AS crozpl7, $0 AS crozpl8, $0 AS crozpl9 ;
	FROM karta1 INTO CURSOR karty5 READWRITE

USE IN karta1
