#-------------------------------------------------------------- # Lista04ss.php = Emite relação dos CONTATADOS em ordem alfabética # Roberto Massaru Watanabe # # R-0 22/10/08 # R-1 03/11/2008 - Separei Curso de Bloco. # R-2 07/11/2008 Coloca também se pagou ou se disse que não vai. # R-3 15/11/2008 Racionalizei critérios. # R-4 15/11/2008 Não considera registro Eliminado. # $hoje = date("d/m/Y"); $hora = date("H:i"); $arquivo = fopen("tabela.jpg","r"); $autor = trim(fgets($arquivo,200)); $dataarq = trim(fgets($arquivo,200)); $servidorBD = trim(fgets($arquivo,200)); $nomeBD = trim(fgets($arquivo,200)); $userBD = trim(fgets($arquivo,200)); $senhaBD = trim(fgets($arquivo,200)); $senhaMaster = trim(fgets($arquivo,200)); $senhaComissao = trim(fgets($arquivo,200)); $rt = fclose($arquivo); $tabela = 'CRUSP68'; $TCABEC = "RELAÇÃO COMPLETA DOS CONTATADOS"; $TNOTA = "Relação emitida em ".$hoje." às ".$hora." horas."; $programa = "cabec.htm"; Include "montaHTM.php"; $TNOME = "NOME COMPLETO"; $TAPELIDO = "APELIDO"; $TCURSO = "CURSO"; // $TBLOCO = "BLOCO APARTAMENTO INSCRIÇÃO PAGAMENTO CONVIDADOS "; $TBLOCO = "BLOCO APARTAMENTO"; $programa = "Lista01d.htm"; Include "montaHTM.php"; $db = mysql_connect($servidorBD,$userBD,$senhaBD); mysql_select_db($nomeBD,$db); $rt = mysql_query("Select nome, apelido, bloco, apto, apartamentos, faculdade, registro, situacao, falecido, categoria, pagou, naovou, acc, convidados from $tabela where eliminado <> 'S' Order BY nome ",$db); $Nregistros = mysql_num_rows($rt); If ($Nregistros>0): $seq = 0; While ($myrow = mysql_fetch_row($rt)){ $TAPELIDO = trim($myrow[1]); $TBLOCO = trim($myrow[2]); $TAPTO = trim($myrow[3]); $TAPARTAMENTOS = trim($myrow[4]); $TCURSO = trim($myrow[5]); $TREGISTRO = $myrow[6]; $TSITUACAO = $myrow[7]; $TFALECIDO = trim($myrow[8]); $TCATEGORIA = $myrow[9]; $TPAGOU = $myrow[10]; $TNAOVOU = $myrow[11]; $TQACC = $myrow[12]; $TNACC = $myrow[13]; // If ($TSITUACAO<>"P"): If ($TFALECIDO=="F"): $TSTATUS = "[Falecido]"; Endif; If ($TSITUACAO=="P"): $TSTATUS = "[Procurado]"; Endif; If ($TSITUACAO=="C"): $TSTATUS = ""; Endif; // If ($TFALECIDO<>"F"): // If ($TFALECIDO<>"F"): If(!empty($TBLOCO) and !empty($TAPTO)): $TBLOCO = $TBLOCO."-".$TAPTO; Endif; If (!empty($TAPARTAMENTOS)): If (empty($TBLOCO)): $TBLOCO = $TAPARTAMENTOS; Else: $TBLOCO = $TBLOCO." e ".$TAPARTAMENTOS; Endif; Endif; If ($TCATEGORIA == "C" or empty($TCATEGORIA)): Endif; If ($TCATEGORIA == "F"): $TBLOCO = "Frequentador do CRUSP ".$TBLOCO; Endif; If ($TCATEGORIA == "P"): $TBLOCO = "Parente de cruspiano ".$TBLOCO; Endif; If ($TCATEGORIA == "A"): $TBLOCO = "Amigo de cruspiano ".$TBLOCO; Endif; If (!empty($TPAGOU)): // $TBLOCO = $TBLOCO." Inscrição paga"; Endif; If ($TNAOVOU == "S"): // $TBLOCO = $TBLOCO." Não vai poder participar"; Endif; If(!empty($TQACC)): // $TBLOCO = $TBLOCO." Convidados = "; // $TBLOCO = $TBLOCO.$TQACC; // $TBLOCO = $TBLOCO." que são: "; // $TBLOCO = $TBLOCO.trim($TNACC); Endif; $seq = $seq + 1; $TNOME = $seq."- ".trim($myrow[0]); If (empty($TNOME)): $TNOME = "* não informado *"; Endif; $programa = "Lista01d.htm"; Include "montaHTM.php"; // Endif; // Endif; } Else: Echo "

NÃO HÁ NOMES CADASTRADOS
"; Endif; $TRODAPE = "Lista04.htm"; $programa = "rodape.htm"; Include "montaHTM.php"; ?>