Get code for a revision of a REST API definition

Shell - curl

1package RestApiDefinition /inline;
2
3  method errorOnRc(integer rc, varchar(1024) msg) returns integer;
4    if rc ne 0 then do;
5      put 'ERROR:' msg ' rc=' rc;
6    end;
7    return rc;
8  end;
9
10  method warnOnRc(integer rc, varchar(1024) msg) returns integer;
11    if rc ne 0 then do;
12      put 'WARNING:'  msg ' rc=' rc;
13    end;
14    return rc;
15  end;
16
17
18  method execute(
19    in_out  varchar  "responseBody" ,
20    in_out  double  "responseStatusCode"
21    );
22
23    dcl package http serviceCall();
24    dcl varchar(2048) baseUrl;
25    dcl varchar(2048) queryParams;
26    dcl varchar(4097) finalUrl;
27    dcl int rc;
28
29    queryParams = '';
30    responseBody = '';
31    responseStatusCode = -1;
32    baseUrl = 'https://example.com';
33
34    if length(queryParams) > 0 then do;
35      finalUrl = baseUrl || '?' || queryParams;
36    end;
37    else do;
38      finalUrl = baseUrl;
39    end;
40
41    rc = serviceCall.createGetMethod(finalUrl);
42    if 0 ne errorOnRc(rc, 'Failed serviceCall.createGetMethod of uri ' || finalUrl) then do;
43      return;
44    end;
45
46    rc = serviceCall.executeMethod();
47    if 0 ne errorOnRc(rc, 'Failed serviceCall.executeMethod for uri ' || finalUrl) then do;
48      return;
49    end;
50
51    responseStatusCode = serviceCall.getStatusCode();
52
53    serviceCall.getResponseBodyAsString(responseBody, rc);
54    if 0 ne errorOnRc(rc, 'Failed serviceCall.getResponseBodyAsString') then do;
55      return;
56    end;
57
58end;
59endpackage;
60