projekt kivitendo

  $form->all_vc(\%myconfig, "vendor", "AP");

  my $vendor;

    map { $vendor .= "<option>$_->{name}--$_->{id}\n" }

      @{ $form->{all_vendor} };

    $vendor = qq|<select name=vendor><option>\n$vendor\n</select>|;