
?? PUSH (LISTEXT := ON) ??
?? POP ??

  CONST

    mlc$pj_exec_frequency = 10,
    mlc$max_partner_jobs = 50;

  TYPE

    mlt$partner_job_unique_id = integer,

    mlt$find_status = (mlc$job_signed_on, mlc$job_not_signed_on),

    mlt$terminate_status = (mlc$job_terminated, mlc$no_term_not_signed_on),

    mlt$create_status = (mlc$job_entry_created_ok,
      mlc$job_entry_create_failed),

    mlt$delete_status = (mlc$job_entry_deleted_ok,
      mlc$job_entry_delete_failed),

    mlt$job_sign_on_state = (mlc$not_signed_on, mlc$signed_on, mlc$signed_off),

    mlt$forced_sign_off_status = (mlc$forced_sign_off_ok,
      mlc$forced_sign_off_failed);
