<% id_treinamento=request.queryString("id_treinamento") call db_open() if (Request.Form() <> "") then if (Request.Form("cmb-acao") <> "") then if (request.Form("chk-id") <> "") Then chave=request.Form("chk-id") id_cf_entrevistador=pega_piece(chave,"|",0) numero_convite=pega_piece(chave,"|",1) ' altera o status do entrevistador na cf_entrevistador sql="update cf_entrevistador set id_cf_status = " & Request.Form("cmb-acao") & " where id_cf_entrevistador=" & id_cf_entrevistador con.execute(sql) ' altera o status do entrevistador na cf_confirmacao sql="update cf_confirmacao set id_cf_status = " & Request.Form("cmb-acao") & " where id_cf_entrevistador=" & id_cf_entrevistador & " and NUMERO_CONVITE=" & numero_convite con.execute(sql) End if End if End if %> IPESO
Listagem de Confirmação

<% call form_combo("filtro", " onchange=""f.submit();"" class=textbox ",",Sem resposta|1,Confirmados|2,Não confirmados|3,Excluídos|4,Todos|5,Iniciante",request.Form("filtro")) %>
<% req_filtro=request.form("filtro") If (req_filtro="") Then req_filtro=0 End if If (req_filtro=4) Then %> <% End if %> <% sql = "select * from CF_CONFIRMACAO where id_cf_treinamento=" & id_treinamento if (req_filtro = 0) Then filtro = " AND (STATUS_CONFIRMACAO IS NULL) AND (ID_CF_STATUS IS NULL)" End If if (req_filtro <> 0) Then filtro = " AND STATUS_CONFIRMACAO = " & req_filtro & " AND (ID_CF_STATUS IS NULL)" ' Todos If (req_filtro=4) Then sql="select * from CF_CONFIRMACAO CONF, CF_ENTREVISTADOR ENT where CONF.id_cf_treinamento=" & id_treinamento & " AND CONF.ID_CF_ENTREVISTADOR=ENT.ID_CF_ENTREVISTADOR AND ENT.ID_CF_STATUS<>16" filtro = " AND (CONF.STATUS_CONFIRMACAO <> 3 OR CONF.STATUS_CONFIRMACAO IS NULL)" End if ' Inciante If (req_filtro=5) Then sql="select * from CF_CONFIRMACAO CONF, CF_ENTREVISTADOR ENT where CONF.id_cf_treinamento=" & id_treinamento & " AND CONF.ID_CF_ENTREVISTADOR=ENT.ID_CF_ENTREVISTADOR AND ENT.ID_CF_STATUS=16" filtro = "" End if End If sql = sql & filtro set rs = con.execute(sql) while not rs.eof id_cf_entrevistador=rs("id_cf_entrevistador") numero_convite=rs("numero_convite") status_confirmacao=rs("STATUS_CONFIRMACAO") chave=id_cf_entrevistador & "|" & numero_convite sql = "select ENT.nome, tre.id_cf_treinamento, tre.titulo as treinamento, pes.titulo as pesquisa, "_ & "tre.cidade, tre.estado, tre.data_treinamento as data, tre.horario from CF_ENTREVISTADOR ENT, "_ & "cf_treinamento tre, cf_pesquisa pes where ENT.id_cf_entrevistador="_ & id_cf_entrevistador & " and (tre.id_cf_pesquisa = pes.id_cf_pesquisa) and tre.id_cf_treinamento="_ & id_treinamento set rs1 = con.execute(sql) %> <% If (req_filtro=4) Then If (status_confirmacao=1) Then descricao_status="confirmado" ElseIf (status_confirmacao=2) Then descricao_status="cancelou" else descricao_status="sem resposta" End if %> <% End if %> <% rs.moveNext : wend %>
  Nome Título/descrição Pesquisa Cidade Estado Data HorárioStatus Confirmação
<% db_write(rs1("nome")) %> <% db_write(rs1("treinamento")) %> <% db_write(rs1("pesquisa")) %> <% db_write rs1("cidade") %> <% db_write rs1("estado") %> <% db_write rs1("data") %> <% db_write rs1("horario") %><%=descricao_status%>

   

Voltar ao treinamento