function db_selectmultiple($nome, $record, $size, $db_opcao = 3, $js_script = "", $nomevar = "", $bgcolor = "", $record_select, $onchange = "")
{
    if ($nomevar != "") {
        $nome = $nomevar;
    }
    if ($db_opcao != 3 && $db_opcao != 5 && $db_opcao != 33 && $db_opcao != 22) {
        ?>
    <select multiple name="<?php 
        echo $nome;
        ?>
[]" size="<?php 
        echo $size;
        ?>
" id="<?php 
        echo $nome;
        ?>
" 
	  onchange="js_ProcCod_<?php 
        echo $nome;
        ?>
('<?php 
        echo $nome;
        ?>
','<?php 
        echo $nome;
        ?>
');<?php 
        echo $onchange;
        ?>
"
    <?php 
        if ($db_opcao == 3 || $db_opcao == 22) {
            echo " readonly ";
        }
        if ($db_opcao == 5) {
            echo " disabled ";
        }
        echo $js_script;
        ?>
     >
    <?php 
        for ($sqli = 0; $sqli < pg_numrows($record); $sqli++) {
            if ($sqli % 2 == 0) {
                $color = "#D7CC06";
            } else {
                $color = "#F8EC07";
            }
            $sqlv = pg_result($record, $sqli, 0);
            $sqlv1 = pg_result($record, $sqli, 1);
            $esta_selecionado = "";
            if ($db_opcao != 1 && $db_opcao != 22) {
                for ($sqls = 0; $sqls < pg_numrows($record_select); $sqls++) {
                    $sqlsv = pg_result($record_select, $sqls, 0);
                    if ($sqlsv == $sqlv) {
                        $esta_selecionado = " selected ";
                    }
                }
            }
            ?>
      <option value="<?php 
            echo $sqlv;
            ?>
" style="background-color:<?php 
            echo $color;
            ?>
" <?php 
            echo $esta_selecionado;
            ?>
><?php 
            echo $sqlv1;
            ?>
</option>
      <?php 
        }
        ?>
 
    </select>
    <?php 
    } else {
        if (!is_int($record_select) && $record_select != false) {
            if (pg_numrows($record_select) > 0) {
                db_selectrecord($nome, $record_select, true, $db_opcao == 3 ? 2 : $db_opcao, "", $nomevar = "", $bgcolor = "", $todos = "", $onchange = "");
            }
        } else {
            db_input($nome, 5, '', true, 'text', 3, "");
        }
    }
}
          <?php 
if ($iNroCalculoAnos > 0) {
    ?>
          <table  class="tableForm" width="250px;">
            <tr>
              <td class="tituloForm" colspan="2" nowrap>
                 Comprovante de Rendimentos
              </td>
            </tr>
            <tr>
              <td class="labelForm">
                Ano Base:
              </td>
              <td class="dadosForm">
                <?php 
    db_selectrecord('anobase', $rsCalculoAnos, true, 1, '', '', '', '', '', 1);
    db_input('iMatric', 10, '', true, 'hidden', 1, '');
    db_input('iInstit', 10, '', true, 'hidden', 1, '');
    ?>
              </td>
            </tr>
            <tr align="center">
              <td colspan="2">
                <input type="button" name="emitir" id="emitir" value="Emitir" onClick='js_emitir()'>
              </td>
            </tr>
          </table>
          <?php 
} else {
    ?>
      
        <td>
          <fieldset>
          <?php 
if ($iNroCalculoAnos > 0) {
    ?>
          <table  class="tableForm"  align="center">
            <tr>

              <td class="labelForm">
                Ano Base:
              </td>

              <td class="dadosForm">
                <?php 
    if ($iNroCalculoAnos > 0) {
        db_selectrecord('anocalc', $rsCalculoAnos, true, 1, '', '', '', '', 'js_consultaMes()', 1);
    }
    db_input('iMatric', 10, '', true, 'hidden', 1, '');
    db_input('iInstit', 10, '', true, 'hidden', 1, '');
    db_input('iSequencial', 10, '', true, 'hidden', 1, '');
    db_input('sDescricao', 40, '', true, 'hidden', 1, '');
    db_input('iCodigo', 40, '', true, 'hidden', 1, '');
    ?>
              </td>

              <td class="labelForm">
                Mês:
              </td>

              <td class="dadosForm">
                <select id="selMes"      name="mescalc" onChange="js_consultaTipo()"></select>
function db_selectmultiple($nome, $record, $size, $db_opcao = 3, $js_script = "", $nomevar = "", $bgcolor = "", $record_select = "", $onchange = "")
{
    //#00#//db_selectmultiple
    //#10#//Função para montar um objeto select do tipo multiple (multiplas linhas) na tela, recebendo dados de um recordset
    //#15#//db_selectmultiple($nome,$record,$size,$db_opcao=3,$js_script="",$nomevar="",$bgcolor="",$record_select="",$onchange="");
    //#20#//Nome            : Nome do ca po da documentacao do sistema ou do arquivo
    //#20#//Record Set      : Recordset que gera o objeto select, sendo o primeiro campo do recordset o campo chave
    //#20#//                  e o segundo campo a descricao que aparecerá na tela
    //#20#//Tamanho         : Número de linhas que o objeto ocupará na tela
    //#20#//Opcao           : *db_opcao* do programa a ser executado neste objeto input, inclusão(1) alteração(2) exclusão(3)
    //#20#//Script          : JAVASCRIPT  a ser executado juntamento com o objeto, indicando os métodos
    //#20#//Nome Secundário : Nome do input que será gerado, assumindo somente as características do campo Nome
    //#20#//Cor Background  : Cor de fundo da tela, no caso de *db_opcao*=3 será "#DEB887"
    //#20#//Record Set      : Este recordset enviado para a função terá os valores que serão habilitados no objeto select
    //#20#//                  multiple, colocandos-os com a propriedade selected habilidata
    //#20#//OnChange        : Função ou funções que serão incluídas no método onchange dos objetos select.
    //#99#//Quando o parâmetro Opção for de alteração (Opcao = 22) ou exclusão (Opção = 33) o sistema
    //#99#//não mostrará os objetos desta função e sim executará o objeto SELECT com as opções do
    //#99#//segundo recordset, mostrando somente os dados cadastrados no código de registro para alterar
    //#99#//ou excluir
    if ($nomevar != "") {
        $nome = $nomevar;
    }
    if ($db_opcao != 3 && $db_opcao != 5 && $db_opcao != 33 && $db_opcao != 22) {
        /*change="js_ProcCod_<?=$nome?>('<?=$nome?>','<?=$nome?>');<?=$onchange?>"tava assim dae eu mudei pra : (ze)*/
        ?>
    <select multiple name="<?php 
        echo $nome;
        ?>
[]" size="<?php 
        echo $size;
        ?>
" id="<?php 
        echo $nome;
        ?>
"
          onchange="<?php 
        echo $js_script;
        ?>
"
    <?php 
        if ($db_opcao == 3 || $db_opcao == 22) {
            echo " readonly ";
            if ($bgcolor == "") {
                $bgcolor = "#DEB887";
            }
        }
        if ($db_opcao == 5) {
            echo " disabled ";
        }
        echo $js_script;
        ?>
     >
    <?php 
        for ($sqli = 0; $sqli < pg_numrows($record); $sqli++) {
            if ($sqli % 2 == 0) {
                $color = "#D7CC06";
            } else {
                $color = "#F8EC07";
            }
            $sqlv = pg_result($record, $sqli, 0);
            $sqlv1 = pg_result($record, $sqli, 1);
            $esta_selecionado = "";
            if ($db_opcao != 1 && $db_opcao != 22) {
                for ($sqls = 0; $sqls < pg_numrows($record_select); $sqls++) {
                    $sqlsv = pg_result($record_select, $sqls, 0);
                    if ($sqlsv == $sqlv) {
                        $esta_selecionado = " selected ";
                    }
                }
            }
            ?>
      <option value="<?php 
            echo $sqlv;
            ?>
" style="background-color:<?php 
            echo $color;
            ?>
" <?php 
            echo $esta_selecionado;
            ?>
><?php 
            echo $sqlv1;
            ?>
</option>
      <?php 
        }
        ?>
    </select>
    <?php 
    } else {
        if (!is_int($record_select) && $record_select != false) {
            if (pg_numrows($record_select) > 0) {
                db_selectrecord($nome, $record_select, true, $db_opcao == 3 ? 2 : $db_opcao, "", $nomevar = "", $bgcolor = "", $todos = "", $onchange = "");
            }
        } else {
            db_input($nome, 5, '', true, 'text', 3, "");
        }
    }
}