$wi{OrderUniqueId} = join " ", grep { $_ ne "" } map { unquote_text($_) }
                ($ty eq "need" ? "Zamów" : "Posia"), $$it{name}, $$it{para}{Termin}, $$it{para}{Ile}, seq_num(6);