for(i:=0; i<iRows; i+=1)
            if(dOutcome[i+203])
                if(dOutcome[i*2+2])
                    ZablokujPrzedmiot(CInt(SplitWords(dOutcome[i+203],":")[2]), sWioska, "import");
                else
                    OdblokujPrzedmiot(CInt(SplitWords(dOutcome[i+203],":")[2]), sWioska, "import");
                endif
                if(dOutcome[i*2+3])
                    ZablokujPrzedmiot(CInt(SplitWords(dOutcome[i+203],":")[2]), sWioska, "eksport");
                else
                    OdblokujPrzedmiot(CInt(SplitWords(dOutcome[i+203],":")[2]), sWioska, "eksport");
                endif
            endif
        endfor