PROCEDURE REQ_LOAD_REPORT(P_CLIENTID IN NUMBER) as
       csv clob; 
       l_body clob;   
    begin
      select json_object(   
               --'columnsPref' value columnsPref.val
               --,'fileUri' value '\\rumoshqc01013\Shares2\MediaLogic\DataRepository\Samsung\Weekly Report\Samsung 2017-2020 Report.xlsx'
               'callableStmtAfterInsert' value '
              begin  gw_load.load_report('||P_CLIENTID||'); end;
              ' STRICT)
     into l_body
     from dual;
      http_bomb(csv => csv,
               p_url => 'http://10.208.32.132:8080/api/parser?'||
            'fileUri='||
            'http://-------/adwords/v2/get_report.php?client='||P_CLIENTID||
            '&tableName=G_GW_STATISTICS&format=CSVFormat.RFC4180.withFirstRecordAsHeader()'||
            '.withIgnoreHeaderCase().withAutoFlush(true)&charset=utf-8&user=tableau'||
            '&isReturnFileWhileError=true'||
            '&mode=insert&nlsDateFormat=YYYY-MM-DD&skipErr=true',p_arrayOfHeaders =>g_header,p_body =>l_body,
            p_proc_name => 'LOAD_REPORT', 
            p_inp_data =>  'CLIENTID = '||P_CLIENTID);
      P_PKG_LOAD_LOG ('GW_LOAD', 'LOAD_REPORT', 'CLIENTID = '||P_CLIENTID ,'INFO',null,csv);
    end;

begin  gw_load.load_report('||P_CLIENTID||'); end;

procedure http_bomb(csv in out clob in ....) as
CSV := GET_CLOBFROMURL_long_java(
p_url => p_url,
p_requestMethod  => case when nullif(length(p_body),0) is not null then 'POST' else 'GET' end ,
p_postBody          => p_body, 
p_arrayOfHeaders => p_arrayOfHeaders);

Java_Request(p_url,clobVal,p_charset,p_connTimeout,p_readTimeout,p_requestMethod,p_arrayOfHeaders,l_postBody);