MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Converter binario de response XML para texto

    Compartilhe

    axlegito
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 09/05/2016

    Converter binario de response XML para texto

    Mensagem  axlegito em Ter 11 Out 2016, 21:38

    Boa noite, colegas. Já estou há bastante tempo nessa luta e gostaria do apoio dos universitários.

    Preciso converter no VBA uma resposta de XML que vem em binário (creio q base 64) para texto compreensível. Tal binário vem por meio de uma tag contida em um xml de um webservice, representando um arquivo de texto (podendo ser PDF ou não).


    Segue exemplo de response e seu equivalente.

    Meu sistema está sendo desenvolvido em Access.

    Desde já agradeço a atenção.

    Att.

    Axlegito

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3206
    Registrado : 15/03/2013

    Re: Converter binario de response XML para texto

    Mensagem  ahteixeira em Ter 11 Out 2016, 23:16

    Olá Alexandre, Bem-vindo ao fórum.

    Veja se ajuda:
    Código:
    Option Explicit
    'origem...: stackoverflow.com/questions/169907/how-do-i-base64-encode-a-string-efficiently-using-excel-vba

    Private Const clOneMask = 16515072          '000000 111111 111111 111111
    Private Const clTwoMask = 258048            '111111 000000 111111 111111
    Private Const clThreeMask = 4032            '111111 111111 000000 111111
    Private Const clFourMask = 63               '111111 111111 111111 000000

    Private Const clHighMask = 16711680         '11111111 00000000 00000000
    Private Const clMidMask = 65280             '00000000 11111111 00000000
    Private Const clLowMask = 255               '00000000 00000000 11111111

    Private Const cl2Exp18 = 262144             '2 to the 18th power
    Private Const cl2Exp12 = 4096               '2 to the 12th
    Private Const cl2Exp6 = 64                  '2 to the 6th
    Private Const cl2Exp8 = 256                 '2 to the 8th
    Private Const cl2Exp16 = 65536              '2 to the 16th

    Public Function Encode64(sString As String) As String

        Dim bTrans(63) As Byte, lPowers8(255) As Long, lPowers16(255) As Long, bOut() As Byte, bIn() As Byte
        Dim lChar As Long, lTrip As Long, iPad As Integer, lLen As Long, lTemp As Long, lPos As Long, lOutSize As Long

        For lTemp = 0 To 63                                 'Fill the translation table.
            Select Case lTemp
                Case 0 To 25
                    bTrans(lTemp) = 65 + lTemp              'A - Z
                Case 26 To 51
                    bTrans(lTemp) = 71 + lTemp              'a - z
                Case 52 To 61
                    bTrans(lTemp) = lTemp - 4               '1 - 0
                Case 62
                    bTrans(lTemp) = 43                      'Chr(43) = "+"
                Case 63
                    bTrans(lTemp) = 47                      'Chr(47) = "/"
            End Select
        Next lTemp

        For lTemp = 0 To 255                                'Fill the 2^8 and 2^16 lookup tables.
            lPowers8(lTemp) = lTemp * cl2Exp8
            lPowers16(lTemp) = lTemp * cl2Exp16
        Next lTemp

        iPad = Len(sString) Mod 3                           'See if the length is divisible by 3
        If iPad Then                                        'If not, figure out the end pad and resize the input.
            iPad = 3 - iPad
            sString = sString & String(iPad, Chr(0))
        End If

        bIn = StrConv(sString, vbFromUnicode)               'Load the input string.
        lLen = ((UBound(bIn) + 1) \ 3) * 4                  'Length of resulting string.
        lTemp = lLen \ 72                                   'Added space for vbCrLfs.
        lOutSize = ((lTemp * 2) + lLen) - 1                 'Calculate the size of the output buffer.
        ReDim bOut(lOutSize)                                'Make the output buffer.

        lLen = 0                                            'Reusing this one, so reset it.

        For lChar = LBound(bIn) To UBound(bIn) Step 3
            lTrip = lPowers16(bIn(lChar)) + lPowers8(bIn(lChar + 1)) + bIn(lChar + 2)    'Combine the 3 bytes
            lTemp = lTrip And clOneMask                     'Mask for the first 6 bits
            bOut(lPos) = bTrans(lTemp \ cl2Exp18)           'Shift it down to the low 6 bits and get the value
            lTemp = lTrip And clTwoMask                     'Mask for the second set.
            bOut(lPos + 1) = bTrans(lTemp \ cl2Exp12)       'Shift it down and translate.
            lTemp = lTrip And clThreeMask                   'Mask for the third set.
            bOut(lPos + 2) = bTrans(lTemp \ cl2Exp6)        'Shift it down and translate.
            bOut(lPos + 3) = bTrans(lTrip And clFourMask)   'Mask for the low set.
            If lLen = 68 Then                               'Ready for a newline
                bOut(lPos + 4) = 13                         'Chr(13) = vbCr
                bOut(lPos + 5) = 10                         'Chr(10) = vbLf
                lLen = 0                                    'Reset the counter
                lPos = lPos + 6
            Else
                lLen = lLen + 4
                lPos = lPos + 4
            End If
        Next lChar

        If bOut(lOutSize) = 10 Then lOutSize = lOutSize - 2 'Shift the padding chars down if it ends with CrLf.

        If iPad = 1 Then                                    'Add the padding chars if any.
            bOut(lOutSize) = 61                             'Chr(61) = "="
        ElseIf iPad = 2 Then
            bOut(lOutSize) = 61
            bOut(lOutSize - 1) = 61
        End If

        Encode64 = StrConv(bOut, vbUnicode)                 'Convert back to a string and return it.

    End Function

    Public Function Decode64(sString As String) As String

        Dim bOut() As Byte, bIn() As Byte, bTrans(255) As Byte, lPowers6(63) As Long, lPowers12(63) As Long
        Dim lPowers18(63) As Long, lQuad As Long, iPad As Integer, lChar As Long, lPos As Long, sOut As String
        Dim lTemp As Long

        sString = Replace(sString, vbCr, vbNullString)      'Get rid of the vbCrLfs.  These could be in...
        sString = Replace(sString, vbLf, vbNullString)      'either order.

        lTemp = Len(sString) Mod 4                          'Test for valid input.
        If lTemp Then
            Call Err.Raise(vbObjectError, "MyDecode", "Input string is not valid Base64.")
        End If

        If InStrRev(sString, "==") Then                     'InStrRev is faster when you know it's at the end.
            iPad = 2                                        'Note:  These translate to 0, so you can leave them...
        ElseIf InStrRev(sString, "=") Then                  'in the string and just resize the output.
            iPad = 1
        End If

        For lTemp = 0 To 255                                'Fill the translation table.
            Select Case lTemp
                Case 65 To 90
                    bTrans(lTemp) = lTemp - 65              'A - Z
                Case 97 To 122
                    bTrans(lTemp) = lTemp - 71              'a - z
                Case 48 To 57
                    bTrans(lTemp) = lTemp + 4               '1 - 0
                Case 43
                    bTrans(lTemp) = 62                      'Chr(43) = "+"
                Case 47
                    bTrans(lTemp) = 63                      'Chr(47) = "/"
            End Select
        Next lTemp

        For lTemp = 0 To 63                                 'Fill the 2^6, 2^12, and 2^18 lookup tables.
            lPowers6(lTemp) = lTemp * cl2Exp6
            lPowers12(lTemp) = lTemp * cl2Exp12
            lPowers18(lTemp) = lTemp * cl2Exp18
        Next lTemp

        bIn = StrConv(sString, vbFromUnicode)               'Load the input byte array.
        ReDim bOut((((UBound(bIn) + 1) \ 4) * 3) - 1)       'Prepare the output buffer.

        For lChar = 0 To UBound(bIn) Step 4
            lQuad = lPowers18(bTrans(bIn(lChar))) + lPowers12(bTrans(bIn(lChar + 1))) + _
                    lPowers6(bTrans(bIn(lChar + 2))) + bTrans(bIn(lChar + 3))           'Rebuild the bits.
            lTemp = lQuad And clHighMask                    'Mask for the first byte
            bOut(lPos) = lTemp \ cl2Exp16                   'Shift it down
            lTemp = lQuad And clMidMask                     'Mask for the second byte
            bOut(lPos + 1) = lTemp \ cl2Exp8                'Shift it down
            bOut(lPos + 2) = lQuad And clLowMask            'Mask for the third byte
            lPos = lPos + 3
        Next lChar

        sOut = StrConv(bOut, vbUnicode)                     'Convert back to a string.
        If iPad Then sOut = Left$(sOut, Len(sOut) - iPad)   'Chop off any extra bytes.
        Decode64 = sOut

    End Function

    ' Link com DLL:
    ' xstandard.com/en/documentation/xbase64/

    Como não é permitido links, foi incluído no código a origem, no final da função tem mais um link que recorre a DLL.

    Abraço
    Anexos
    Base64.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (5 Kb) Baixado 3 vez(es)

    axlegito
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 09/05/2016

    Re: Converter binario de response XML para texto

    Mensagem  axlegito em Ter 08 Nov 2016, 15:12

    Prezado ahteixeira,

    Muito obrigado pela sua ajuda. Deu pra clarear bastante as ideias. Infelizmente eu estou impossibilitado de ter acesso de administrador à minha estação, então nem pude testar a opção com dll externo. Algumas dúvidas que restaram após os testes foram:

    1: Eu noto que o padrão do texto codificado nos meus exemplos (ì½glÔÚº0üÿÓ+Ýû~ßÝ÷œ]Ø”dRf<½÷ÞlÏØžš JD) difere bastante dos exemplos na internet (SGVsbG8gV29ybGQh), o que me faz pensar se estou realmente no caminho certo ou se estou me fazendo entender bem. Agora começo a refletir se meu texto codificado realmente está em base64. As soluções que você me forneceu funcionam bem para os exemplos da internet, mas não para os meus. :/ Para mim retorna o erro: Erro em tempo de execução ... Erro ao analisar 'ì½glÔÚº0üÿÓ+Ýû~ßÝ÷œ]Ø”dRf<½÷ÞlÏØžš JD' como tipo de dados bin.base64.

    2: Eu acreditava que poderia encontrar algo "mais pronto" e direcionado a webservice considerando que as responses XML contendo arquivos codificados seguem determinados padrões, o que me leva à terceira dúvida.

    3: Acredito que o caminho seja converter as responses para arquivos do windows uma vez que será sempre imprevisível saber a extensão do arquivo codificado, que poderá ser uma imagem, um pdf ou um doc, por exemplo.

    Você acha que existe uma alternativa mais adaptável à minha realidade?

    A fim de tentar ser mais claro envio abaixo um exemplo de response que poderia ser revertido para um arquivo PDF:

    Código:

    ------=_Part_55_1033783308.1478617588592
    Content-Type: application/xop+xml; charset=UTF-8; type="text/xml"
    Content-Transfer-Encoding: 8bit
    Content-ID: <rootpart@ws.jboss.org>

    <env:Envelope xmlns:env='http://schemas.xmlsoap.org/soap/envelope/'><env:Header></env:Header><env:Body><ns1:consultarProcessoResposta xmlns="http://www.cnj.jus.br/tipos-servico-intercomunicacao-2.2.2" xmlns:ns2="http://www.cnj.jus.br/intercomunicacao-2.2.2" xmlns:ns3="http://www.cnj.jus.br/mni/cda" xmlns:ns1="http://www.cnj.jus.br/servico-intercomunicacao-2.2.2/"><sucesso>true</sucesso><processo><ns2:documento movimento="1225702" tipoDocumento="80" idDocumento="4058300.2244434"><ns2:conteudo><xop:Include xmlns:xop="http://www.w3.org/2004/08/xop/include" href="cid:conteudo-65c70e76-60dd-4f02-b000-8cf6014890a6@ws.jboss.org"/></ns2:conteudo><ns2:assinatura algoritmoHash="MD5withRSA" cadeiaCertificado="MIIbrTCCBqEwggSJoAMCAQICAQEwDQYJKoZIhvcNAQENBQAwgZcxCzAJBgNVBAYTAkJSMRMwEQYDVQQKEwpJQ1AtQnJhc2lsMT0wOwYDVQQLEzRJbnN0aXR1dG8gTmFjaW9uYWwgZGUgVGVjbm9sb2dpYSBkYSBJbmZvcm1hY2FvIC0gSVRJMTQwMgYDVQQDEytBdXRvcmlkYWRlIENlcnRpZmljYWRvcmEgUmFpeiBCcmFzaWxlaXJhIHYyMB4XDTEwMDYyMTE5MDQ1N1oXDTIzMDYyMTE5MDQ1N1owgZcxCzAJBgNVBAYTAkJSMRMwEQYDVQQKEwpJQ1AtQnJhc2lsMT0wOwYDVQQLEzRJbnN0aXR1dG8gTmFjaW9uYWwgZGUgVGVjbm9sb2dpYSBkYSBJbmZvcm1hY2FvIC0gSVRJMTQwMgYDVQQDEytBdXRvcmlkYWRlIENlcnRpZmljYWRvcmEgUmFpeiBCcmFzaWxlaXJhIHYyMIICIjANBgkqhkiG9w0BAQEFAAOCAg8AMIICCgKCAgEAukakDt3nQPK1oHxSlVdF/G2E84YByYUDrZir0vJeBZnJu29iZ/13RLkDBzzSGwBi1HAsQoN5ZquZVq6BvGpJvfN0D2K361sHZpRCJJ1GrJpCGDDwJKhRQeqrlfGoKwJ4abUpJ16cLnPG/iOl46bO/WwbawBU6wCtTzpMPOcKiFvaXpoLVuS1VDgd8gqTZE7DQZJTICrP/HRu1NszOGLk/o5MWBz3jypN/8WS2QlSvc9wAJ1pmjNqiIdFIZkWUQ0034K9tGmofHzU3dPyFVxLxVgQ6oUZyzYiWCpyDJqW3srPCFFhv7QFKQYrhpD+6U3DBAVHy8922X9xpod7FUDkM4B4Bx2k8o6bQDvJclDfab7wLJYfkLXVrnTjZbSMGulqG/tyXMWCVOrgUwfEzBLp997XL9RIL0c/JmEEsRKaM2u1hksTK9CGnUftafv8hBJm+FblDopsdsRrGnrCoFoS0SOJWAF8CFjaFY4V2X59N7akRfUDhcxH+ot5RbhmYjPTJkreHOnUf+ZtJrk8fc0PKAopD5vdY6u5pkcahNeFpANlBgRLUo2DNEJ/MY4RLuazZ5VAfpd6QAD5EWyDOFitAzNbpsTBxbCsDakG8KZpATS26fiUSE8+pnUJ7ErFO+DJXrAy/59pWc88MG8NzidX7FobaP/sT294Mj55xbRdlX8CAwEAAaOB9TCB8jBOBgNVHSAERzBFMEMGBWBMAQEAMDowOAYIKwYBBQUHAgEWLGh0dHA6Ly9hY3JhaXouaWNwYnJhc2lsLmdvdi5ici9EUENhY3JhaXoucGRmMD8GA1UdHwQ4MDYwNKAyoDCGLmh0dHA6Ly9hY3JhaXouaWNwYnJhc2lsLmdvdi5ici9MQ1JhY3JhaXp2Mi5jcmwwHwYDVR0jBBgwFoAUDDkgOrcBH8vXKH1BoMf6Sq0yJL4wHQYDVR0OBBYEFAw5IDq3AR/L1yh9QaDH+kqtMiS+MA8GA1UdEwEB/wQFMAMBAf8wDgYDVR0PAQH/BAQDAgEGMA0GCSqGSIb3DQEBDQUAA4ICAQBZmhRpGG19KUNwfXabYd93jhp25KnWy3akFgxMlBLGkNGBA8WtBtktRLyyCXYJgDlnABg0bQYK5rUQWUi6dWD8P44dGFVwK55LlayJqwp3JHthxMeRJo5GE1E3townCtMN8JorIoODs72DNa2bPLx4gyk1YTb4EXEzIFRjU0UB2BNahDvXZhMkt8RGxSLYcyTuHBMXlsgl6Bsez9+FUG086vdQnhuX3qdr29Zz0s98UMCwjOVTEnqGOaw1W2fH6tT70cJd6g6Xc5iuKb/kOvMENlAs7d4e24XoHYQJ7vOmgzNbb0d5T0i1/LgmE6uqs/RhEftFZ/MdPm7+KksmRBqfsaLgPNrg5AU6eKz7qKFNv10sdymQzRMd7wYo2LcU81vIyZ6nfjESinhixNEFvAYCYwQrDYnd5FxbMoBE1ELsKvPyQIcx1T7iCjIMFI3Vcm0L5v2N5KjzBY11F3ebCrn6kJKZZYgyZ0MFji0LFbs18WHo2Wd37Rbl6AEtazQ/joOz9+oPSh4+NYSdjIA0P6mV6MOtxM2eyhQWLBme5DaLubmjQiUHPsPl1WhPoGYcprO2cxyQGj9AuRpWQnCH/28tDxH9Hv/3hTAVDuMXMe4nlczJ6Zkel8dtWwe1BWo98kXfuoJ5JHAum4IfZqmlbSfM9iqi0V+Fb+BGnarSpU5VDjCCBlkwggRBoAMCAQICAQkwDQYJKoZIhvcNAQENBQAwgZcxCzAJBgNVBAYTAkJSMRMwEQYDVQQKEwpJQ1AtQnJhc2lsMT0wOwYDVQQLEzRJbnN0aXR1dG8gTmFjaW9uYWwgZGUgVGVjbm9sb2dpYSBkYSBJbmZvcm1hY2FvIC0gSVRJMTQwMgYDVQQDEytBdXRvcmlkYWRlIENlcnRpZmljYWRvcmEgUmFpeiBCcmFzaWxlaXJhIHYyMB4XDTExMTEyMjE3MTUwMVoXDTIxMTEyMjE3MTUwMVowgYkxCzAJBgNVBAYTAkJSMRMwEQYDVQQKEwpJQ1AtQnJhc2lsMTQwMgYDVQQLEytBdXRvcmlkYWRlIENlcnRpZmljYWRvcmEgUmFpeiBCcmFzaWxlaXJhIHYyMS8wLQYDVQQDEyZBdXRvcmlkYWRlIENlcnRpZmljYWRvcmEgZGEgSnVzdGljYSB2NDCCAiIwDQYJKoZIhvcNAQEBBQADggIPADCCAgoCggIBAO+pDS1Hyez0jj4i5CZLRfgDawp588MlIBPjV4ddFmhSwQismEAxqvcpN45bJiez/WuHUWIwzhlzBJsOVz7vlgp+MAH52gRTrVFEgHia8K2plcQYb8dItefA6/SDvJHsOlGga+XlWsRH10yDcablVNk10Y9+oPk4zqUsBGX5L3b59aigwJ21GvACNplrdf/IKfrGk2Y4veVTUdDJyJ0MkY5eFF5ViVPoWTsGEoN0bR0cPYXWMEfOAiotF86eg/zdE3BWIuoUkFui51r2DomkUikdAvvomX0cLHCnqk/Ph6NLKSvo+sMRbZxGzlagKZSvDtAHdlGT9CfT1+PX47GGEN8Kl6y0ciPR2qfWtqREDL2rNq9PLqeAI3oPtGagTwmjsLlcymG4iaxgfHKtWBMAHBv+pT3xAJ6QYCLoHhAhCjSBwCsHXS0dQBd5Q0XvWwzRkcZohqnYbUd+LaPmOvjaBJSNz7scd6mu4XwojGpayBbxmh30KxEkTqOdncvHhWuhUd1EBJ7UnAFi/Cn8JiNVpd1FbTpjJpbkkUIW62A5jqDbgMQ4dPLWMPG2OaCOdO+/t5bJvvT/d9ilvG1ELzOwK6PGi3AinZXB7yU8C4FBJDtUoPEETxaMs49Z45Edwg4pRFJpQlv1+X9bvlqzz3nOR/Gll9oC1gDW8Bx3/58z4Yi/AgMBAAGjgbswgbgwHQYDVR0OBBYEFPg5AKX+67InmgaLYZYC+tKQkO2+MA8GA1UdEwEB/wQFMAMBAf8wDgYDVR0PAQH/BAQDAgEGMBQGA1UdIAQNMAswCQYFYEwBARMwADA/BgNVHR8EODA2MDSgMqAwhi5odHRwOi8vYWNyYWl6LmljcGJyYXNpbC5nb3YuYnIvTENSYWNyYWl6djIuY3JsMB8GA1UdIwQYMBaAFAw5IDq3AR/L1yh9QaDH+kqtMiS+MA0GCSqGSIb3DQEBDQUAA4ICAQAYm2yNbG33QKIPu0w6jEDN0EAN3R2B54g6bRGyg5LJnnz8pG+7s6pQRbkT5LTCQExIx9ywxBEvIozDClvCjl5S4EQAhDoAqBC/wD1KdCzL6BxTCkKvc6U3wmCORCADzE3g5qIH3DCFdYSRF/uaFekFEa0Mi1S3pywypeBvNINARIefzm8Przh17Zf/yjlmxs+lWfr3rWSSDfVstGSVkKtZ9030UVaa2LKD8yyrHvg9cszI0A8nYFWX0uo7VNgyDvxZ9HjycPuKYBx7g8ltitTwYE1A84vOlPWkyCkSM/CcLplhmdGJ0fxiB0DchVR+m0W8UgJDw6CS+UieW4aSOqkhq0kCqTHrJgsZYVew5xTNHW5oqe+d2FwSCivbwNvhkxzXYVoeZwgkKfV32dNxEQNBd64K/0Msfiy1cT7PNkjxVdgvTMRVO+PET5YknGUKBXzetviEMfDRwNb2/7UJHuN6FencOQ4RL7FFebMpahLM01ue1ANDCHB1uFlSNVmctMurrWwcUNNL34zMEe7qxMJOFjGV0+mt+yPLuJppfOLZOUH0gy3h3f4Ua5NnIFYE+W83EysVyxqwDbKWLtnvsOSyMqLYl++1VOmtHLRKyMGWCHR0iwG1rxgJIsoRaXnCacysnCDgFae66dLKhhgABQLMCSDZcAtlUR4N9MAwWy25VTCCBuUwggTNoAMCAQICAQMwDQYJKoZIhvcNAQENBQAwgYkxCzAJBgNVBAYTAkJSMRMwEQYDVQQKEwpJQ1AtQnJhc2lsMTQwMgYDVQQLEytBdXRvcmlkYWRlIENlcnRpZmljYWRvcmEgUmFpeiBCcmFzaWxlaXJhIHYyMS8wLQYDVQQDEyZBdXRvcmlkYWRlIENlcnRpZmljYWRvcmEgZGEgSnVzdGljYSB2NDAeFw0xMTEyMjgxMzAzMjFaFw0xOTEyMjgxMzAzMjFaMHMxCzAJBgNVBAYTAkJSMRMwEQYDVQQKEwpJQ1AtQnJhc2lsMTUwMwYDVQQLEyxBdXRvcmlkYWRlIENlcnRpZmljYWRvcmEgZGEgSnVzdGljYSAtIEFDLUpVUzEYMBYGA1UEAxMPQUMgQ0FJWEEtSlVTIHYyMIICIjANBgkqhkiG9w0BAQEFAAOCAg8AMIICCgKCAgEAmt3okELySqdHZ8jbPWaODlGkJVCn9kUf5dfV+tSPrS7+0NV+UJvYDk7WxtXuZGNlIz1L2YavKf2xQ7APBAiBBhcA3miIFXYoJy2MK7sSDOO+vRO5oYtpOu9gpIsFaLeDuLxm/L0ub1F3mCvYPbMNJnJnxOQKojz0DyMRX51dOvDpxNOruxzpKHC/r6M7ekAmGs5s7e/hSQXLbwaaLs/UM3huUtLdKYqb1mHVnFZKSzsGEfWdsx5to4FoB9y1PjJP5vcXTNw5Znc5/5aJ8ReSQnqFpVrMqR5hWki402+ty4qzne+s1bxYmaWZC/LK1u46ftrWSHyO32f9d94aCjz9DC8X/hB5/iTAVJdJp1m60Nai6xfEt/mhQBUv98AXaemTlFMsrKI0z0yU1BM/jVkmknPhRTrlgxaqC/QCM6ye3yKIKVe/pfxB5bpTltbjZsTFsaXqJnUlmQr9wez0UsT5Zd2jsHL8+GPAuMngEgoWuVsQKSvKZkpQli8DUFdxrouvoXAA+1mF6wul4kvOwzMs5NCkvTIQdnE8yfitXb05g/nnKCmaRJiQ+DpARlg10Aoz+RU728mMBA75HjhOuwkBgCrL78FmhdQ5nDTZYx2kcGd6BtVFKRImaVYHs8xXhiM0kTn51OcNnDTASy1WHClBcnzeq0QurZaEo6oQhVKIbuUCAwEAAaOCAWswggFnMIGTBgNVHSAEgYswgYgwQgYGYEwBAgEWMDgwNgYIKwYBBQUHAgEWKmh0dHA6Ly93d3cuYWNqdXMuanVzLmJyL2FjanVzL2RwY2FjanVzLnBkZjBCBgZgTAECAxMwODA2BggrBgEFBQcCARYqaHR0cDovL3d3dy5hY2p1cy5qdXMuYnIvYWNqdXMvZHBjYWNqdXMucGRmMGsGA1UdHwRkMGIwL6AtoCuGKWh0dHA6Ly93d3cuYWNqdXMuanVzLmJyL2FjanVzL2FjanVzdjQuY3JsMC+gLaArhilodHRwOi8vbGNyLmFjanVzLmp1cy5ici9hY2p1cy9hY2p1c3Y0LmNybDAfBgNVHSMEGDAWgBT4OQCl/uuyJ5oGi2GWAvrSkJDtvjAdBgNVHQ4EFgQU1LHDKUmXrU5mNtvpTgBKatjD2sQwEgYDVR0TAQH/BAgwBgEB/wIBADAOBgNVHQ8BAf8EBAMCAQYwDQYJKoZIhvcNAQENBQADggIBAKxMHE062vbX51KuWGPBeKvu8+UA95y75eNrEbamHqfXpNo31PfSk4d/KBuoKy7hqAJ0RqxDy6Hen2eLFulJpno2nOEitPkN8J82XyFkKiMrdQotvI4i5SuH2TXtqyed1safWonaLd9fvrW59yE8m4H0b4GfZjwhX/rp2/1Vb2mw0hFPVzrxH+fqM/byJj4T5w0JxHxJ91JIli3IUXEOVM2GmIzZWsmCLKASGZY75r+gPkU3Py2DjSfD31Va3CmIf7gOOqqIxZ/qKiyWy1k3/wU/vJI1dBRi8sSMSWEE+DwlzC/hkNGZBxVW/31LTRmj2IKlgXcIq4wCHxBNxbJV4351ZeemP1PGbXOYMlK2FwdBNKKU00GvkYIJ+gqZK6B6Dr3M1bkPzqK1iIZrg7vTFYdp40Ol5O9ScDxdG1KCIy1YKonsKRcTzACtDk1as/91JGFI+6AOB8jL1anJ7wqDhJnPLzmsMSsiAQD7VCJs1Y7wKAY5JJ29eCj9gsfu+5+wYTwX4EYBp7jz5NPrnZmjB5Mt301B1HFxVtYynofUyG9xJtGtOra2DCiGbWrMJepIp38Gtb7aSzRW3onQ4xrls/z7sux9mAc5UeYSwKG/9JYh8g/ibI7psS233jm1KI7PZiVKRjUQ1P9L0szKDOl4ExyLmNlDk5+m8c8mKApl+GdDMIIHvjCCBaagAwIBAgIITHMAv2fXZx8wDQYJKoZIhvcNAQELBQAwczELMAkGA1UEBhMCQlIxEzARBgNVBAoTCklDUC1CcmFzaWwxNTAzBgNVBAsTLEF1dG9yaWRhZGUgQ2VydGlmaWNhZG9yYSBkYSBKdXN0aWNhIC0gQUMtSlVTMRgwFgYDVQQDEw9BQyBDQUlYQS1KVVMgdjIwHhcNMTYwMjE3MTMxNzQ1WhcNMTkwMjE2MTMxNzQ1WjCB8DELMAkGA1UEBhMCQlIxEzARBgNVBAoMCklDUC1CcmFzaWwxJDAiBgNVBAsMG0NlcnQtSlVTIEluc3RpdHVjaW9uYWwgLSBBMzE3MDUGA1UECwwuQXV0b3JpZGFkZSBDZXJ0aWZpY2Fkb3JhIGRhIEp1c3RpY2EgLSBBQ0pVUyB2NDEpMCcGA1UECwwgU0VDQU8gSlVESUNJQVJJQSBQRVJOQU1CVUNPLVNKUEUxETAPBgNVBAsMCFNFUlZJRE9SMS8wLQYDVQQDDCZST0RSSUdPIEVEVUFSRE8gQkFOREVJUkEgREUgQlJJVE86MjYwMzCCASIwDQYJKoZIhvcNAQEBBQADggEPADCCAQoCggEBAJ3eFAaaH1pF6f68ej0p/0Whkz/VG5CJBToat/z0TbN6Q/xhLT8WEx5rty5OJ713YaxmWjLGxzpk4MZTrdx6126HtPnhx8SM3gXc/AU9wtqbtArz2hVYGVTs1ALhSgtYbqsJqjnpbIzpatSpFBlJ5t9GT9hquIEP2/AE6YUh9xA5rpiDdocKoC6oTIr09KycTQJOruRPdfq6aZw56mww3TxVxgMysHYtOqdLgrG4XlvImLjfL91dI5U5I8pETEIB7w25HIYELY50mkUtZYjUGF/dhgN/37cve3RGwZHcXSAsniVlaB/31jL20BD6JMgPNAYNXFqB+QzQLYC5AAuF8qMCAwEAAaOCAtYwggLSMA4GA1UdDwEB/wQEAwIF4DApBgNVHSUEIjAgBggrBgEFBQcDAgYIKwYBBQUHAwQGCisGAQQBgjcUAgIwHQYDVR0OBBYEFMSxnVz701J/wVPpTL+mdQ6/RwIpMB8GA1UdIwQYMBaAFNSxwylJl61OZjbb6U4ASmrYw9rEMIHSBgNVHREEgcowgceBHHJvZHJpZ28uYmFuZGVpcmFAamZwZS5qdXMuYnKgFwYFYEwBAwagDgQMMDAwMDAwMDAwMDAwoCwGCisGAQQBgjcUAgOgHgwccm9kcmlnby5iYW5kZWlyYUBqZnBlLmp1cy5icqAeBgVgTAEDBaAVBBMwMDAwMDAwMDAwMDAwMDAwMDAwoEAGBWBMAQMBoDcENTE5MDcxOTc4ODk1MTA1ODU0OTEwMDAwMDAwMDAwMDAwMDAwMTk3NzIwNjM2M0RFVFJBTlBFMGcGA1UdIARgMF4wXAYGYEwBAgMTMFIwUAYIKwYBBQUHAgEWRGh0dHA6Ly9jZXJ0aWZpY2Fkb2RpZ2l0YWwuY2FpeGEuZ292LmJyL2RvY3VtZW50b3MvZHBjYWMtY2FpeGFqdXMucGRmMIG9BgNVHR8EgbUwgbIwLqAsoCqGKGh0dHA6Ly9sY3IuY2FpeGEuZ292LmJyL2FjY2FpeGFqdXN2Mi5jcmwwL6AtoCuGKWh0dHA6Ly9sY3IyLmNhaXhhLmdvdi5ici9hY2NhaXhhanVzdjIuY3JsME+gTaBLhklodHRwOi8vcmVwb3NpdG9yaW8uaWNwYnJhc2lsLmdvdi5ici9sY3IvQ0FJWEEvQUNDQUlYQUpVUy9hY2NhaXhhanVzdjIuY3JsMFcGCCsGAQUFBwEBBEswSTBHBggrBgEFBQcwAoY7aHR0cDovL2NlcnRpZmljYWRvZGlnaXRhbC5jYWl4YS5nb3YuYnIvYWlhL2FjY2FpeGFqdXN2Mi5wN2IwDQYJKoZIhvcNAQELBQADggIBAGOLHahXlJESj/Bb07mTRQuHicqhPfTRkZxAcWi/IBmH6Y1PLn4KTZWZ+RyYEGeVA9zFKTqomm4UtqjT/XDCDHiroC3Puh8mi8VbRH5BMlDSaWzcmegZxVqT4J+a1Im2gSzLdTX01sBY1uGG3rTbwM4bZlU2Bw4fq1oUd9stIA6YBG6qTfixMI78L2E087oAENXXKbdO5je0RdY7bTFP31hoObC+Dsb9H0EEibNuC7SVpU0V+rlloZCJi7abzYcn6BtNDUzb4qbsdaQJtLLAx2zUJRXAn7+/3/rRz3wrmT/JTjHNi1GC6Lv3NvI11YuyTeSK3Jkj3B7LdnjyMOfyGySZiwT7J9rrwYrmFIpS/VaTQCqqKXy0TNzEwNdu8pJ5oGwVz5PjMBav+hloMyHInjhmeVClic6/rnFE5ERiw96Nd/iljDIxJ2vrcRxSyI6df0+dyjfWatQuapvAht+K2eiAV9nGdqO3E26ZaOJ4RZ6227tw5LrsU9pdZbyVkN5IiRCclc18J6lHod1jRLmbhtw7AJ4kCcSu1NmjBQX25oyhAJf7BeIRCiwStfsKumpx8Pfvix30wz3QuvECPc4nx9x/LrqbMDTAfiKCdu8EckoAXt41ETNXs4ZrdDa3SObAHT3KFVRf20DYfWrYlG2sC4SdNVDHAEqddO0W5BuiS+26" dataAssinatura="20160810141013" assinatura="HxKl9x2yfgGKOS1mdf2rwg3DtUwGeoAd0KBfv1LaTVI5G7IKp69DeB0szkOTn/Kr+qBZ5PDsbGOomj6zMuxknpOECgkWT9L1C2hrpD4wyZkJz8WapoBNBdPVCtiTXfyOtZ5oHLqPw0tnFB/C/ke4E/1YBL1dir28MF1X+2sKC4PNX/lshzRSN55ESEjXYZ2xR+n4DgYDCZ8qUS8QfBhc8uudac1TuJQoKf21np2vQJJIxcz6RBr2at8nfVWd48vtMfZERq8F7aNl/+nUtaC3gMNIzpyV2qG+MWc4NEtDGMKBPrUEFOcVp5YP/+1uTjrrChs6LNLaogrMNxoPIXYFOg=="/><ns2:outroParametro valor="5840" nome="tamanhoConteudo"/></ns2:documento></processo></ns1:consultarProcessoResposta></env:Body></env:Envelope>
    ------=_Part_55_1033783308.1478617588592
    Content-Type: application/octet-stream
    Content-Transfer-Encoding: binary
    Content-Id: <conteudo-65c70e76-60dd-4f02-b000-8cf6014890a6@ws.jboss.org>

    %PDF-1.4
    %âãÏÓ
    2 0 obj
    <</DecodeParms<</Colors 1/Predictor 15/BitsPerComponent 8/Columns 55>>/Type/XObject/ColorSpace[/Indexed/DeviceRGB 248(Q]w×&÷6¹ÃÚÂÇÚÈÕèÓÜêÚåñäëóëò÷ô, ©|\t÷D\t÷GûVúdÇ?&ת6å¹E??´¨µËªºØÆ»ÌæÖ½ÅÉ#ÖÖØÄÌâºØ8\nÙâíæ\)ççéç6ä9ûüü²¾ÙÈ4$×K7ôK$øU#ùw#Vf?×fZÖztãZC°?\f¸???XÀ?¯orÄ?4΢-Vj?Þ²=Ý´FĪfé?xÓ ëÀLis??£»?«ÄÉ'É6\tûW?Âé­ÀÞix??zF¼ÐèÕ??Û??ا¨×µºä??㬧ȽÆÕ3×ZIËÐÙÓÉÈc?©y?©|?´·\r Ua{ÖEx??ëC\béE·&ÈC6????¦Å¡®Ä©?uÌ¡6ÆÆȸ?Y¹¹¹ôÉW­???????¬¢­¥¨´´KEËgcÚB\)Ùri½cm?ëv\\çwg¹¼Ä?v?¥|?º3\)¿ÂÊÔ-ÔÊÔª?$¸?<ìYͬ¶Æ¼®Õ­´åØÕ¤?fâ??§?kf?»¾¡[ÞÍ¡?{SuvväG\)z|?ÔÑÌ©ª­Ò¤+ìV9v¡Çr¨ÒäÚÅÈLCéäÛÓ´_­"Ô¹iôñì]p?¦}?JG???·¢wÜ?{ïðïË??ðïïðïômpp©?Ck¡õk5þ?'ÙÇ?£ÓòÐ_ZNa?llmlpf?²?Êë?ÎðhlpJ\\?Ãâö»$§Ìê²ÛóÎwt?????«¿2\bäM4õ>s}?É·¶ÞJÎ??²xÜ?­Í?¤À¢?ȳ?vSóV1ýb??¸?¡¾èiPm¡Ë?¼ä¾¤aöeC«¡?¯²¹ÿ/º¯­ýr帶¬©?¿­?ã¾Áo¦Ñð~lÔȶæ¼âÓ®ïm;rp^t[X?z=ÌTKËYRȦLÀ¤] ??²?'u?±Ï¶pÄ=2àÉÏâÌÐÓ»rÎa[¯?Vôîßá¹Rî]\(¢ÒîïÄR]¤t?ÃÒld¶?c)]/Subtype/Image/BitsPerComponent 8/Width 55/Length 1731/Height 64/Filter/FlateDecode>>stream
    x^?s?3[G»?ضڶmÛúlÛ¶mûÙ¶5¶mûÏ9·?ê©JúÍ÷~÷Ö*$»ö¹ÈZ?ó?Ë=??{`ûÞ½ïïÝ~ W?¤Ü¤sk=þØÄùsõFãèÎ??/Í??1j0
    ¨M¥¬æÅ?¶i9£§óRÁ??þ¶à?5ÿ9èñs¢°Õ]Ó=Ëve:îàÎ3g
    Þ???©=¬Ù.y7ç÷»Æoå¾úUÛt\gÆ??KÛN?<¾{r2ã¸_?øM×®¶i¹S¿? Áٝ'kFsdÏ®c]Ý l×b¹½§vO?nûÆì?Æø:z?V}ÚÆ+Q\ |»Á÷ùÜUG+A¥Æú®6?ӏÝ{ü³cA©îÇ_ùvíÌ?gÜݳçnÆ͍µïíùa ÷ÜßDcô?8¹ü|ÆÍ?_ÉåiòZÈyù¯ÿ"á(}ÙÓÏÝ{¢ê»]5?(pyyº¿?ÊÏÏ×é´ÙÙÙ?ÉL)Çuè
    ÌÓ`¬: )â Ôåiµº|M:D?å#J ?á0ÆùÓF?§ÍLOKK[Åy ¥CSuÏ>^c?oóD¸âââëtºÙ³ór4V#å\?·õ+
    eecc=ÿ:ºë?Ëæw?Ö?í#ÊJËJ!z½¾§ë\Rͼa|<??7íø8WI?X¹Ò`(Õw× R§ã??7»X« ×yR@8?å8ÎpÁ0?ÇEÓ?¾æÀ![¤N
    䤧Éåòôô
    3@À;³àc«Í4˲.?è^6
    ?"_¸P.g)D³tCk?"(F!ÇgîîÛÇs?9¬Í9¬Õæh?ff7 ¨0&«cxîÆ,ÄÉ£³¡ÕN
    $t?¦ìÝ}ðÜ?ß:Îçû¯mÙ²??H;?$í¤ÙÌ?¨6«f?¯³Nàr
    ÂJ±º'W8t8E3È?¸÷Ðp¨s<g|IÆ?cáÆ×I}Q'è¢|"Üu4<8"aøÀ¾¥ց?Má$×óeõæEê£á[Rо¾érr{{(jþ­ãû¸)D?55/ÿÑß?|CCC¾ýíÏoF\ìø?ãAB@IKámµZ­ò*
    w·¥|?EÜ?/iÊ ÞÖù½Û?_»£îÇ0Ìí»|M²_H8ÞF¶$$ÞI|ÝétV8?É°ä¾Îé} ? ®P??¸Éé쯨¶"н¸ÞÃë ©_Vc?³ÿõþ?N?F î^w?çs}¤ÐÍñjõu¨¿âôð°Ãj¼n,?ò{Fìcý\?UJ7+ÕªA¬¿â¥aà+æŬÁ&&âê?û ÎT???³ab&G#â⾧ °ñ??¸ÐƸÇ?Öa«?÷9ëm?øX¤ãh\S¡8Ü?a&?ú sôNë#xL [w ÅÆÝnÌ?0ç&(ówMLÄ?@
    ? Â? ?É?Ã0+æ¬~½Kêù MÅni÷Á.ÁqÜëõnR9æ?p?õg9?%?? anà??ÕÑ{¢?e)?t???kI??à@SÓÛë5K|O3Q¾ PÒ²"AéÂT^n2ÁJ`m?lsI}±u"]||?:ahñýÆ«A41Jå?Â?0"_?Ô@!ìË?J?:Áwd+¹9Ùç?]§T¾ÜB'øÂóÂRÃsds¼R¥R)}í´¹u\÷?»°??õÈh$?¦å¸¢R¥ê°ìEYY©À½©
    ´ÈÇp,4»@A'È·RqüÃJ÷%SÕ?%U©T »¶%´Ø?x^ª ?^¢ÄñJàö/¡?%f¬?¿ÅÝÞÄû?2ó!Ð?²qã
    àÜ?Sà9Ùp?çdîP=)ò?ãrA??þÁËÀ)á?Í,㢿?*»Bæ^÷³õ/NùhW$4tÆÖ°64j¡zÆEÑÛ?Ý2¯í?`ýÜ?0WJE?îLi+*ÂÖaEEÀÁWJ?ÃÊÛàÕ¾úb?û6]Äl?Î?)Kr¹É<1b24 Oé?Vüù¢?g?ɸ1st¨×N??·Zê??oPèm?ÿm2ýi«ÅÒxuÑêÈønéÅéc|Î??Ysæ}4'kÍÂ9¥ú?ý?,Ó?¬zý¼¹«W??çs $©O?¸¸WW-Ì?{1©ïÀÜ V?À?¾xãðaÉÀ²¾}kG}äÿæItztáO?û}áÿY×m­³?¯¿û ?"×?ç÷{¾Hl3l6á?ÿi¢<
    endstream
    endobj
    7 0 obj
    <</C[0 0 1]/Border[0 0 0]/A<</URI(null/Processo/ConsultaDocumento/listView.seam)/S/URI>>/Subtype/Link/Rect[248 6 426.75 15]>>
    endobj
    8 0 obj
    <</Length 452/Filter/FlateDecode>>stream
    x?}SÍn?0¾û)æ?büËÂÞºÝ4ê­IPÔ«?½G?»´ïܧèØ,mºU"Yßß??Ù5D?P±Kîò@N?Ѻ®µ??7uÛ?ð\òË?ö?ñðxÅ?
    %??è
    KEG?,6Tg? |??ïlÑ8¡_U+­/ÞUÍå¯AT7± 1wñU@
    ́¬?¦94=¹ùCëÆ1láSó?@ù/°æ+U?kÅn?¢?ñ?*Ê4­$c??ãxÇF?Ìþ<?~06?ëÜÃà[Ó»arð3Äw¬?,e&?ý1ÀMD¬óÑ?u°?~
    p {Ýb:zr-Ö&zó6ÚÿêBeõ½? 8x IÐ?ÉI§9?5×US\×+?³?UEpµålËåÇ?\gÞ7?½ûÁþmÿÚ??®?N?¦B(¥¤úØ¢\®Õ`7m.þZ¿t6OɶõÖà?p?6´sº?páDµ´?´Lª*¸¡J?t?×?w?Á=ú?S?Õ>á²ÿ©å<ÉÍ0w]±n[ñ% ãÜMf¿F(:?NÏޝéèL?â08.¿~~2Ú?
    endstream
    endobj
    10 0 obj
    <</Parent 9 0 R/Contents 8 0 R/Type/Page/Resources<</XObject<</img0 2 0 R/Xf2 3 0 R/Xf1 1 0 R>>/ProcSet [/PDF /Text /ImageB /ImageC /ImageI]/Font<</F2 5 0 R/F3 6 0 R>>>>/MediaBox[0 0 595 842]/Annots[7 0 R]>>
    endobj
    4 0 obj
    <</BaseFont/Helvetica/Type/Font/Encoding/WinAnsiEncoding/Subtype/Type1>>
    endobj
    5 0 obj
    <</BaseFont/Times-Roman/Type/Font/Encoding/WinAnsiEncoding/Subtype/Type1>>
    endobj
    6 0 obj
    <</BaseFont/Times-Bold/Type/Font/Encoding/WinAnsiEncoding/Subtype/Type1>>
    endobj
    3 0 obj
    <</Type/XObject/Resources<</ProcSet [/PDF /Text /ImageB /ImageC /ImageI]/Font<</F1 4 0 R>>>>/Subtype/Form/BBox[0 0 168.8 33.66]/Matrix [1 0 0 1 0 0]/Length 291/FormType 1/Filter/FlateDecode>>stream
    x???±nÃ0 Dw}?ÆvQyEKk?ö ü ÍP Kÿ¨ÓÄ??ãROÂ?<=QgKÅ=£xVË??I?Ý%)ý!Ù¶ú?nïîRߥY}.?íns,Ûò©We÷;?:»é`·ªLWÛNwÒ?égÂ?5ÚÕv³?¤)?«9Ó¹fsâð?cj?ð???£n
    Í?mì×?nÜÛIɨì6?@4??4v?t¾F?î 3 çº#'1?(´r A80szj¯\WùÌ?B?,2úh`-jÂ?(­hÁ??Ö??p
    fé-Ø(?-|þSþ%]ÓeMoÈ=¯×?M???QÆÍÝóú^àÒ!ÛÈ?AdÈýQµî½¾®_é}M¿ Ë Ì
    endstream
    endobj
    1 0 obj
    <</Type/XObject/Resources<</ProcSet[/PDF/Text/ImageB/ImageC/ImageI]/Font<</F1 11 0 R/F2 12 0 R>>>>/Subtype/Form/BBox[0 0 595.28 841.88]/Matrix[1 0 0 1 0 0]/Length 333/FormType 1/Filter/FlateDecode>>stream
    x???AnÂ0E÷>Å,ak'?1ìBâHAM?¢?.¢?¶ ??
    ©=SÐ ôZµ??ª
    y3<~¾ä?D@0?? Ó iÐÁÄð<?Ûû¢2ôðH A>A7ߢ ?`Oôú­×>Ç?YiG/ÊóÔ+ºC{?uçýÅ­p?P ?gDO]
    Ì?±?s0-ZE²,äß@¡##Æ°G(Ç ;®O? ª²B§?̍?XBi ?ÿ?C³sÉþ5âO&'#¹??ʽ?B¦«d¤r?¥Q??¥o?Lð5¤ïc?öȨ2a¬¦ -GÇ

    ©eªC(?u*¯¡l<ÎN(~Á2Ô?»Ì«ôþ,ËjV?ÔTF]2½¿LÎY?8Ù>Õ°Äea»?nÛº©×?n=?¦?úØÁ¦?z¿ùìúÄî{,Ð/?$?
    endstream
    endobj
    11 0 obj
    <</BaseFont/Times-Bold/Type/Font/Subtype/Type1/Encoding/WinAnsiEncoding>>
    endobj
    12 0 obj
    <</BaseFont/Times-Roman/Type/Font/Subtype/Type1/Encoding/WinAnsiEncoding>>
    endobj
    9 0 obj
    <</ITXT(2.1.7)/Type/Pages/Count 1/Kids[10 0 R]>>
    endobj
    13 0 obj
    <</Type/Catalog/Pages 9 0 R>>
    endobj
    14 0 obj
    <</Producer(iText 2.1.7 by 1T3XT)/ModDate(D:20160926155632-03'00')/CreationDate(D:20160926155632-03'00')>>
    endobj
    xref
    0 15
    0000000000 65535 f
    0000004412 00000 n
    0000000015 00000 n
    0000003897 00000 n
    0000003630 00000 n
    0000003718 00000 n
    0000003808 00000 n
    0000002746 00000 n
    0000002887 00000 n
    0000005157 00000 n
    0000003406 00000 n
    0000004976 00000 n
    0000005066 00000 n
    0000005221 00000 n
    0000005267 00000 n
    trailer
    <</Root 13 0 R/ID [<648fa5e5669c5f6bcddb92023d062970><634212956a20766c51a045aec1ee4f02>]/Info 14 0 R/Size 15>>
    startxref
    5390
    %%EOF

    ------=_Part_55_1033783308.1478617588592--

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3206
    Registrado : 15/03/2013

    Re: Converter binario de response XML para texto

    Mensagem  ahteixeira em Ter 08 Nov 2016, 17:30

    Olá Alexandre,
    Antes de tudo não deve alterar o titulo do tópico à medida que vai respondendo.
    O fórum repete automaticamente.

    Estou no celular e após uma breve leitura ao ficheiro de resposta, verifico que tem informação codificada.
    Para compreeender melhor deve exitir um manual do fornecedor do webservice.

    Vamos imaginar que está a dar como resposta um ficheiro TXT.
    Então através do stream criamos o ficheiro.

    Em tempos ajudei colega a passar via stream dados bamco de dados.

    Efetue uma busca
    [Você precisa estar registrado e conectado para ver este link.]

    Abraço

      Data/hora atual: Dom 04 Dez 2016, 14:12