/* Created by SDL V3.1-7     */
/* Source:  8-AUG-1988 10:31:39 EMULEX$DISK:[MEADOWS.UNSDL.VMS5-0_H]SOR$ROUTINE */
#ifndef SOR$ROUTINES.TEMPLATE_
#define SOR$ROUTINES.TEMPLATE_
 
/*** MODULE SOR$ROUTINES ***/
/*+~sor$begin_merge~+*/
unsigned long int sor$begin_merge(
    /* const int  *key_buffer, */
    /* const unsigned short int  *lrl, */
    /* const unsigned long int  *options, */
    /* const unsigned char  *merge_order, */
    /* const int *user_compare, */
    /* const int *user_equal, */
    /* const int *user_input, */
    /* unsigned long int  *context */
    ) ;
/*~-sor$begin_merge-~*/
/*+~sor$begin_sort~+*/
unsigned long int sor$begin_sort(
    /* const int  *key_buffer, */
    /* const unsigned short int  *lrl, */
    /* const unsigned long int  *options, */
    /* const unsigned long int  *file_alloc, */
    /* const int *user_compare, */
    /* const int *user_equal, */
    /* const unsigned char  *sort_process, */
    /* const unsigned char  *work_files, */
    /* unsigned long int  *context */
    ) ;
/*~-sor$begin_sort-~*/
/*+~sor$do_merge~+*/
long int sor$do_merge() ;
/*~-sor$do_merge-~*/
/*+~sor$end_sort~+*/
unsigned long int sor$end_sort(
    /* unsigned long int  *context */
    ) ;
/*~-sor$end_sort-~*/
/*+~sor$init_merge~+*/
long int sor$init_merge(
    /* const unsigned char  *merge_order, */
    /* const int  *key_buffer, */
    /* const unsigned short int  *lrl, */
    /* const unsigned long int  *options, */
    /* const int *user_compare, */
    /* const int *user_equal */
    ) ;
/*~-sor$init_merge-~*/
/*+~sor$init_sort~+*/
long int sor$init_sort(
    /* const int  *key_buffer, */
    /* const unsigned short int  *lrl, */
    /* const unsigned long int  *file_alloc, */
    /* const unsigned char  *work_files, */
    /* const unsigned char  *sort_process, */
    /* const unsigned char  *key_size, */
    /* const int *user_compare, */
    /* const unsigned long int  *options */
    ) ;
/*~-sor$init_sort-~*/
/*+~sor$pass_files~+*/
unsigned long int sor$pass_files(
    /* const struct dsc$descriptor *inp_desc, */
    /* const struct dsc$descriptor *out_desc, */
    /* const unsigned char  *org, */
    /* const unsigned char  *rfm, */
    /* const unsigned char  *bks, */
    /* const unsigned short int  *bls, */
    /* const unsigned short int  *mrs, */
    /* const unsigned long int  *alq, */
    /* const unsigned long int  *fop, */
    /* const unsigned char  *fsz, */
    /* unsigned long int  *context */
    ) ;
/*~-sor$pass_files-~*/
/*+~sor$release_rec~+*/
unsigned long int sor$release_rec(
    const struct dsc$descriptor *desc,
    ...
    /* unsigned long int  *context */
    ) ;
/*~-sor$release_rec-~*/
/*+~sor$return_rec~+*/
unsigned long int sor$return_rec(
    struct dsc$descriptor *desc,
    ...
    /* unsigned short int  *length, */
    /* unsigned long int  *context */
    ) ;
/*~-sor$return_rec-~*/
/*+~sor$sort_merge~+*/
unsigned long int sor$sort_merge(
    /* unsigned long int  *context */
    ) ;
/*~-sor$sort_merge-~*/
/*+~sor$spec_file~+*/
unsigned long int sor$spec_file(
    /* const struct dsc$descriptor *spec_file, */
    /* const struct dsc$descriptor *spec_buffer, */
    /* unsigned long int  *context */
    ) ;
/*~-sor$spec_file-~*/
/*+~sor$stat~+*/
unsigned long int sor$stat(
    const unsigned short int  *code,
    unsigned long int  *result,
    ...
    /* unsigned long int  *context */
    ) ;
/*~-sor$stat-~*/
#endif