fwuensche

# frozen_string_literal: true

require 'json'
require 'httparty'

PROJECT_NAME = 'rsv-ink/majestic_monolith'

file = File.read('./simplecov.json')
json = JSON.parse(file)
occurrences = []

fwuensche

<?xml version="1.0" encoding="utf-8"?>
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
    <soapenv:Body>
    <getValor xmlns="https://www3.bcb.gov.br/wssgs/services/FachadaWSSGS">
        <codigoSerie>12</codigoSerie>
        <data>31/08/2015</data>
    </getValor>
    </soapenv:Body>
</soapenv:Envelope>

fwuensche

Public Function getValor(seriesId As Integer, refDate As Date)
    
    Dim sURL As String
    Dim sEnv As String
    Dim xmlhtp As New MSXML2.XMLHTTP60
    Dim xmlDoc As New DOMDocument60
    sURL = "https://www3.bcb.gov.br/wssgs/services/FachadaWSSGS?method=getValor"
    
    sEnv = "<?xml version=""1.0"" encoding=""utf-8""?>"
    sEnv = sEnv & "<soapenv:Envelope xmlns:soapenv=""http://schemas.xmlsoap.org/soap/envelope/"" xmlns:xsd=""http://www.w3.org/2001/XMLSchema"" xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"">"