<%if session("conect") <> 3 then response.write "


Você não tem acesso a esta página.

Entre com um nome e senha válidos.
" response.write "


" response.end end if categoria = "0;1" bd = "gfarma" bd2 = "gtamultimidia" ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' x = len(categoria) z = 0 for y = 1 to x categ = mid(categoria,y,1) if categ = cstr(session("categoria")) then z = 1 exit for end if next if z = 0 then session("txt1") = "


("&session("nome")&")
NOTIFICAÇÃO: Seu nível de acesso não permite a visualização desta página.



" irpage = "erro.asp?envmail=1" response.redirect irpage response.end end if z = 0 ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' %> <%=session("titulo")%> <%chamado = request.querystring("ch") if chamado = "" or not IsNumeric(chamado) then response.write "


Ocorreram erros durante o processamento da página.

Tente novamente. Erro #233
" response.write "


" response.end end if if session("txt") <> "" then response.write session("txt") &"
" session("txt") = "" end if cstrCaminhoMDB="DRIVER={MySQL ODBC 3.51 Driver};SERVER=mysql01.gtamultimidia.com.br;PORT=3306;DATABASE=gtamultimidia;USER=gtamultimidia;PASSWORD=erectuspenis35;OPTION=3;" set conn = server.createobject("ADODB.connection") conn.Open cstrCaminhoMDB set rs = Server.CreateObject("ADODB.Recordset") rs.open "Select * from gfarma_help_cod WHERE chamado="&chamado&" ", conn if rs.eof then response.write "




Erro 250#

" rs.close conn.close set rs = nothing set conn = nothing response.end end if if rs("usuario") <> session("user") then rs.close conn.close set rs = nothing set conn = nothing session("txt1") = "


("&session("nome")&")
NOTIFICAÇÃO: O Chamado do HelpDesk não lhe pertence.

Chamado: "&chamado&"
Usuário: "&session("user")&"
" irpage = "erro.asp?envmail=1" response.redirect irpage response.end end if response.write " CHAMADO Nº "&rs("chamado")&"
 TÍTULO: "&rs("titulo")&"

" response.write " Cliente: "&rs("nome")&"
 Suporte: "&rs("responsavel")&"
" rs.close conn.close set rs = nothing set conn = nothing if session("menu") <> 1 then response.write "
  
" end if %>
Interações
<% set conn = server.createobject("ADODB.connection") conn.Open cstrCaminhoMDB set rs = Server.CreateObject("ADODB.Recordset") rs.open "Select * from gfarma_help WHERE chamado="&chamado&" ", conn if rs.eof then response.write "
DATA e HORA COMENTÁRIOS





Erro 270#

" rs.close conn.close set rs = nothing set conn = nothing response.end end if contador = 0 while not rs.eof contador = contador + 1 if rs("master_sn") = "N" then fdcolor = "#F0FFF0" else fdcolor = "#F2F8FF" end if if rs("acao") = "x" then xacao = "" else xacao = ""&rs("acao")&"
" end if response.write "" response.write ""&contador&"" response.write ""&rs("d_chamado")&" - "&rs("h_chamado")&"" response.write ""&xacao&Replace(rs("comentario"), vbCrLf, "
")&"
" response.write "" rs.movenext wend rs.close set rs = nothing conn.close set conn = nothing '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' %>

 Para reabrir este chamado basta adicionar um comentário

  Novo Comentário:

     Observação:
  Determinação do prazo de resposta:
  Chamados reabertos antes das 15h em dias úteis o prazo padrão de resposta é o mesmo dia.
  Chamados reabertos após as 15h ou final de semana - Prazo padrão de resposta é o próximo dia útil