{ SEND_PJ_FUNCTION_REQUEST
{
{        The purpose of this procedure is to transmit a partner job function
{ request to the partner job function processor and receive the results of
{ the processing of the requested function.
{
{        SEND_PJ_FUNCTION_REQUEST (PJ_FUNCTION,FAMILY_NAME,PJ_IDENTIFIER,CONDITION)
{
{ PJ_FUNCTION: (input) This parameter specifies the partner job function to
{              be performed.
{
{ FAMILY_NAME: (input) This parameter specifies the users family and is used
{              for the submit_pj function to acquire job validation info-
{              rmation from the link_user_descriptor.
{
{ PJ_IDENTIFIER: (input/output) This parameter is used to specify the partner
{                job identifier.  PJ_IDENTIFIER is returned (output) from a
{                submit_pj function.  PJ_IDENTIFIER must be supplied (input)
{                by the user for a status_pj pj_function.
{
{ CONDITION: (output) This parameter indicates the condition of the partner
{            job function request and the partner job function.
{

  PROCEDURE[XREF] send_pj_function_request (
    pj_function: rht$pj_functions;
    family_name: ost$family_name;
    VAR pj_identifier: INTEGER;
    VAR condition: INTEGER);

?? PUSH (LISTEXT := ON) ??
*copyc RHT$FUNCTION_STATUS
*copyc OST$USER_IDENTIFICATION
?? POP ??
