{ Deck: DFC$TEST_JR_CONSTANTS
{ File server has the range of 150 to 199
{ These constants provide a test of file server job recovery
{ by allowing the job to hang at a call to syp$hang_if_job_jrt_set
{ when SET_JOB_RECOVERY_TEST JOB  is used to set the value,
{ or to hang at a call to syp$hang_if_system_jrt_set when
{ SET_JOB_RECOVERY_TEST SYSTEM is used to set the value.
{ SET_JOB_RECOVERY_TEST may only be used after doing
{ SETSA ALLOW_JR_TEST 1 from the console.


  CONST
    { Setable by setjrt SYSTEM
    { Hang in dfp$determine_client_status (poll task on server mainframe)
    dfc$tjr_determine_client_status = 151,

    { Hang in dfp$determine_server_status (poll task on client mainframe)
    dfc$tjr_determine_server_status = 152,

    { Hang in recovery task on client mainframe. State is recovering.
    dfc$tjr_recover_req_to_server = 153,

    { Setable by SETJRT JOB
    { dfp$begin_remote_procedure_call after the queue entry is assigned
    dfc$tjr_begin_rpc = 154,

    { dfp$send_remote_procedure_call after the queue entry is queued
    dfc$tjr_send_rpc  = 155,

    { dfp$end_remote_procedure_call before the queue entry is released.
     dfc$tjr_end_rpc  = 156,

     { Must use SENRCL in DFTU TO send 'setjrt job 157 '
     { Hangs after the remote procedure is called on the server.
     dfc$tjr_server_rpc_after_call = 157,


    { Setable by setjrt SYSTEM
     { allocate space with the entry assigned but not queued
     dfc$tjr_server_allocate_space = 158,

     { reallocate space with the entry assigned but not queued
    dfc$tjr_server_reallocate_space = 159,

    { dfp$set_server_eoi after dfp$begin_remote_procedur_call
    dfc$tjr_server_set_eoi = 160,

    { Process server response <new request > just before the call to
    { mmp$mtr_process_server_complete
    dfc$tjr_prosr_new_request   = 161,

    { Process server response < complete request> just before the call to
    { mmp$mtr_process_server_complete
    dfc$tjr_prosr_complete_request  = 162,


    { dfp$begin_remote_core_call after the queue entry is assigned
    dfc$tjr_begin_core_rpc = 163,

    { dfp$send_remote_core_call  after the queue entry is queued
    dfc$tjr_send_core_rpc  = 164,

    { dfp$end_remote_core_call before the queue entry is released.
    dfc$tjr_end_core_rpc  = 165,

    { Halt during terc - dfp$manage_client_connection before pp unloaded
    dfc$tjr_halt_terc = 166,

    { Setable by SETJRT system
    { Halt during writing the image file on continuation deadstart
    { dfm$manage_image - save_server_file_image  or
    { dfm$recovery_services - save_server_file_pages.
    { Must be set at system core command time
    dfc$tjr_halt_save_server_image = 167,

    { Setable by SETJRT system
    { Hang while rebuilding client jobs
    { dfm$client_mainframe_manager - rebuild_client_jobs
    dfc$tjr_hang_rebuild_clientjobs = 168,

    { Setable by SETJRT system
    { dfm$preserved_family_manager - dfp$flush_served_family_table
    dfc$tjr_flush_served_family = 169,


    dfc$tjr_last_constant =  199;

