"; ?>
  Usuário :   Cartão :   Empresa :   Tipo :      Processar
  Data Inicial :   Data Final : onMouseOut='MM_swapImgRestore()' onMouseOver="MM_swapImage('Image5','','images/bt_incluir02.gif',1)">Inserir Novo Registro
Novo
0 "; if ($usuario != '') { $stmt = $stmt . "AND VIP_USR_ID = '$usuario'"; } if ($cartao != '') { $stmt = $stmt . "AND VIP_ID = '$cartao'"; } if ($dtamov != '') { $dataini = FormatDate2($dtamov); $stmt = $stmt . "AND VIP_DTA_CAD >= '$dataini'"; } if ($dtamov2 != '') { $datafim = FormatDate2($dtamov2); $stmt = $stmt . "AND VIP_DTA_CAD <= '$datafim'"; } if ($empresa != '') { $stmt = $stmt . "AND VIP_EMP_ID = '$empresa'"; } if ($tipo != '') { $stmt = $stmt . "AND VIP_TIPO = '$tipo'"; } $stmt = $stmt . " ORDER BY VIP_DTA_CAD, VIP_USR_ID,VIP_EMP_ID"; $totvip = 0; $totvir = 0; $sth = ibase_query($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { if ($row->VIP_EMP_ID == '1') $empdesc2 = 'FANTASY CARAZINHO'; if ($row->VIP_EMP_ID == '2') $empdesc2 = 'PARADISO CARAZINHO'; if ($row->VIP_EMP_ID == '3') $empdesc2 = 'PARADISO TAPERA'; if ($row->VIP_EMP_ID == '4') $empdesc2 = 'PARADISO SOLEDADE'; if ($row->VIP_EMP_ID == '5') $empdesc2 = 'PARADISO CRUZ ALTA'; if ($row->VIP_EMP_ID == '6') $empdesc2 = 'PARADISO IBIRUBÁ'; if ($row->VIP_EMP_ID == '7') $empdesc2 = 'PARADISO PASSO FUNDO'; if ($row->VIP_EMP_ID == '8') $empdesc2 = 'PARADISO PANAMBI'; if ($row->VIP_EMP_ID == '9') $empdesc2 = 'PARADISO SANTA ROSA'; if ($row->VIP_EMP_ID == '10') $empdesc2 = 'PARADISO SANTO ÂNGELO'; if ($row->VIP_TIPO == 'VIRTUAL') { $totvir = $totvir + 1; } else { $totvip = $totvip + 1; } $dt = substr($row->VIP_DTA_CAD,8,2) . '/' . substr($row->VIP_DTA_CAD,5,2) . '/' . substr($row->VIP_DTA_CAD,0,4); $reg = $reg + 1; if ($cor==1) { echo " "; $f_btn++; $cor = 0; } else { echo " "; $f_btn++; $cor = 1; } } $mesini = $mes - 2; $anoini = $ano; $anofim = $ano; if ($mesini == 0) { $mesini = 12; $anoini = $ano - 1; } if ($mesini == -1) { $mesini = 11; $anoini = $ano - 1; } $mesfim = $mes + 2; if ($mesfim == 13) { $mesfim = 1; $anofim = $ano + 1; } if ($mesfim == 14) { $mesfim = 2; $anofim = $ano + 1; } $diaini = $mesini . '/01/' . $anoini; $qdia = qtd_dias_mes($mesfim,$anofim); $diafim = $mesfim . '/' . $qdia . '/' . $anofim; } ?>
 Código  Usuário  Data  Empresa  Tipo
 $row->VIP_ID  $row->VIP_USR_ID  $dt  $empdesc2  $row->VIP_TIPO
 $row->VIP_ID  $row->VIP_USR_ID  $dt  $empdesc2  $row->VIP_TIPO
0 "; if ($usuario != '') { $stmt = $stmt . " AND VIP_USR_ID = '$usuario'"; } if ($cartao != '') { $stmt = $stmt . " AND VIP_ID = '$cartao'"; } if ($dtamov != '') { $dataini = FormatDate2($dtamov); $stmt = $stmt . "AND VIP_DTA_CAD >= '$dataini'"; } if ($dtamov2 != '') { $datafim = FormatDate2($dtamov2); $stmt = $stmt . "AND VIP_DTA_CAD <= '$datafim'"; } if ($tipo != '') { $stmt = $stmt . "AND VIP_TIPO = '$tipo'"; } if ($empresa != '') { $stmt = $stmt . "AND VIP_EMP_ID = '$empresa'"; } $stmt = $stmt . " GROUP BY VIP_ID ORDER BY COUNT(*) DESC "; $sth = ibase_query($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { $qtdv = $row->CONTADOR; $resto = $qtdv % 11; if ($qtdv % 11 == 0) { $resto = 11; } $reg = $reg + 1; if ($cor==1) { echo " "; $f_btn++; $cor = 0; } else { echo " "; $f_btn++; $cor = 1; } } } echo"
 Cartão  Qtde  Posição Atual
 $row->VIP_ID  $row->CONTADOR  $resto
 $row->VIP_ID  $row->CONTADOR  $resto
 Total Vip  Total Virtual
 $totvip  $totvir
"; if ($cont_reg > 0) echo "  "; else echo "  "; echo "
"; } ?>