Implementing exit-json-request and exit-json-response user exits

Signature of Web Service JSON user exit functions

The signatures of these functions are:

C terminology:

exit-json-request (char ** JSON-BODYptr, int *
JSON-BODYlen, char ** JSON-PATHptr, int * JSON-PATHlen)
exit-json-response (char ** JSON-BODYptr, int * JSON-BODYlen)

COBOL terminology:

 LINKAGE SECTION.
01 JSON-BODY pic x. *> any length.
01 JSON-BODYptr pointer.
01 JSON-BODYlen pic s9(9) COMP-5 . *> = int.
01 JSON-PATH pic x.
01 JSON-PATHptr pointer.
01 JSON-PATHlen pic s9(9) COMP-5.
PROCEDURE DIVISION.
EXIT PROGRAM.
…
ENTRY "exit-json-request" using
By reference JSON-BODYptr
By reference JSON-BODYlen
By reference JSON-PATHptr
By reference JSON-PATHlen.
Set address of JSON-BODY to JSON-BODYptr.
Set address of JSON-PATH to JSON-PATHptr.
…
EXIT PROGRAM.
ENTRY "exit-json-response" using
By reference JSON-BODYptr
By reference JSON-BODYlen.

Set address of JSON-BODY to JSON-BODYptr.
…
EXIT PROGRAM. 

The variables:

JSON-BODYptr

Pointer to the JSON body.

JSONBODYlen

Pointer to the length of the JSON body.

JSON-PATHptr

Pointer to the JSON path.

JSON-PATHlen

Pointer to the length of the JSON path.

The variables JSON-BODYptr, JSON-BODYlen, JSON-PATHptr, and JSON-PATHlen are I/O parameters:

• The user exit receives these parameters.
• The user exit can update these parameters.