Suppose that an application program known as APPLA is deallocating a conversation. The conversation is known by a conversation identifier saved in the storage area CONVERID. APPLA conditionally deallocates the conversation.

         L     9,CONVERID        * LOAD SAVED CONVERSATION ID
 
*
         APPCCMD CONTROL=DEALLOC,                                      X
               QUALIFY=CONFIRM,                                        X
               RPL=RPLA,                                               X
               AAREA=RPLAX,                                            X
               ACB=APPLA,                                              X
               CONVID=(9),                                             X
               OPTCD=SYN
*
         LTR   15,15             * CHECK GENERAL RETURN CODE IN 15
         BNZ   BADGENRC          * HANDLE NONZERO RETURN CODE
         LTR   0,0               * CHECK CONDITIONAL COMPLETION
         BNZ   BADCOND           * HANDLE NONZERO RETURN CODE
*
* GOOD RETURN CODES MEAN THAT THE CONFIRMATION REQUEST WAS
* POSITIVE AND THE CONVERSATION HAS BEEN DEALLOCATED.  NOTE THAT
* THE LOGMODE AND LUNAME WERE NOT NEEDED FOR DEALLOCATION — JUST
* THE CONVERSATION ID.  IF THE RETURN CODES WERE NONZERO, THE
* CONVERSATION IS STILL ACTIVE UNLESS THE CONVERSATION PARTNER
* ABNORMALLY DEALLOCATED THE CONVERSATION FROM ITS END.  APPLA
* AT THAT POINT MUST CHECK THE RCPRI AND RCSEC CODES TO FURTHER
* DETERMINE THE STATUS OF THE CONVERSATION AND POSSIBLE CAUSES FOR
* THE NEGATIVE RESPONSE.  APPLA WOULD ALSO CHECK THE RPL6RTUN BYTE
* IN THE RPL EXTENSION TO SEE IF THE RPL6RLOG BIT HAS BEEN SET.  IF
* SET, ERROR LOG DATA WOULD NEED TO BE RECEIVED.
*
                •
                •
                •
CONVERID DS    XL4               * CONVERSATION ID
RPLA     RPL AM=VTAM             * RPL STORAGE
RPLAX    ISTRPL6                 * RPL EXTENSION STORAGE
APPLA    ACB AM=VTAM,MACRF=LOGON,APPLID=APPLNAME * ACB STORAGE