EntireX Version 9.7
 —  EntireX PL/I Wrapper  —

Conversational RPC

RPC conversations are supported when communicating with an RPC server.

It is assumed that you are familiar with the concepts of conversational RPC and non-conversational RPC. Open and closing conversations are provided through the Generic RPC Services Module.

This document covers the following topics:


Using Conversational RPC

Start of instruction setTo use conversational RPC

  1. Open a conversation with the function Open Conversation OC (see COM_FUNCTION under RPC Communication Area) from Generic RPC Services module:

    With the Call Interface:

    ...
    ERXCOM.COM_FUNCTION = 'OC'; /* Open Conversation */
    ERXCOM. COM_SERVER_LIBRARY = 'MYLIB';
    call xxxSRVI(ERXCOM); /* see (1) below */
    IF SUBSTR(ERXCOM.COM_ERROR,8) ^= ERX_S_SUCCESS then
    DO;
    /* error handling */
    	/* ... */
    END;
    /* begin of application logic including calls to interface objects */
    ...

    With the EXEC CICS LINK Interface:

    ERXCOM.COM_FUNCTION = 'OC'; /* Open Conversation */
    ERXCOM. COM_SERVER_LIBRARY = 'MYLIB';
    CICS_LEN = STORAGE(ERXCOM);
    CICS_RESP1 = DFHRESP(NORMAL);
    CICS_RESP2 = DFHRESP(NORMAL);
    /* called CICS program name depends on PP switch ERXFCTPRE */
    EXEC CICS LINK PROGRAM  ('xxxSRVI') /* see (1) below */
                   RESP     (CICS_RESP1)
                   RESP2    (CICS_RESP2)
                   COMMAREA (ERXCOM)
                   LENGTH   (CICS_LEN);
    IF SUBSTR(ERXCOM.COM_ERROR,8) ^= ERX_S_SUCCESS then
    DO;
    /* error handling */
    	/* ... */
    END;
    /* begin of application logic including calls to interface objects */
    ...

    (1) The prefix of the program name (xxxSRVI) can be customized, see PL/I Preprocessor Settings. The default is PLISRVI.

  2. Issue your RPC requests as is done within non-conversational mode, using the generated interface objects.

Top of page

Terminating a Conversational RPC Communication

Terminate an RPC conversation unsuccessfully with the function Close Conversation CB (see COM_FUNCTION under RPC Communication Area) from Generic RPC Services module:

With the Call Interface:

...
ERXCOM.COM_FUNCTION = 'CB'; /* Close Conversation */
call xxxSRVI(ERXCOM); /* see (1) below */
IF SUBSTR(ERXCOM.COM_ERROR,8) ^= ERX_S_SUCCESS then
DO;
/* error handling */
	/* ... */
END;
/* begin of application logic including calls to interface objects */
...

(1) The prefix of the program name (xxxSRVI) can be customized, see PL/I Preprocessor Settings. The default is PLISRVI.

With the EXEC CICS LINK Interface:

See Using Conversational RPC above.

Top of page

Closing and Committing a Conversational RPC Communication

Close the RPC conversation successfully with the function Close Conversation and Commit CE (see COM_FUNCTION under RPC Communication Area) from Generic RPC Services module:

With the Call Interface:

...
ERXCOM.COM_FUNCTION = 'CE'; /* Close Conversation and Commit */
call xxxSRVI(ERXCOM); /* see (1) below */
IF SUBSTR(ERXCOM.COM_ERROR,8) ^= ERX_S_SUCCESS then
DO;
/* error handling */
	/* ... */
END;
/* begin of application logic including calls to interface objects */
...

(1) The prefix of the program name (xxxSRVI) can be customized, see PL/I Preprocessor Settings. The default is PLISRVI.

With the EXEC CICS LINK Interface:

See Open Conversation above.

Top of page