Cacher is the code snippet organizer for pro developers

module WebAPI

    function Post(uri, body = EMPTY)
        result = sendRequest("POST", uri, body)
    fend

    function Get(uri, body = EMPTY)
        result = sendRequest("GET", uri, body)
    fend
    
    function Put(uri, body = EMPTY)
        result = sendRequest("PUT", uri, body)
    fend
    
    function PostH(uri, hashHeaders[], body = EMPTY)
        result = sendRequestH("POST", uri, body, hashHeaders)
    fend

    function GetH(uri, hashHeaders[], body = EMPTY)
        result = sendRequestH("GET", uri, body, hashHeaders)
    fend
    
    function PutH(uri, hashHeaders[], body = EMPTY)
        result = sendRequestH("PUT", uri, body, hashHeaders)
    fend
    
    function sendRequest(method, uri, body)
        hashtbl dummy
        result = sendRequestH(method, uri, body, dummy)
    fend

    function sendRequestH(method, uri, body, Header[])
        result = createoleobj("Msxml2.XMLHTTP")
        result.open(method, uri, FALSE)
        for key in Header
            result.setRequestHeader(key, Header[key])
        next
        result.send(body)
    fend
    
endmodule