Include file YMLDML.H for YMLDML() - Delete e-mail send order

The include file YMLDML.H is listed below. You will find a program example that shows how to use the YMLDML() function call on "C program examples".

#ifndef _YMLDML_H
#define _YMLDML_H
 
#if 0
/*********************************************************************
 BEGIN-INTERFACE   YMLDML
 
 TITLE             (/ Delete send mail order /)
 NAME              YMLDML.H
 DOMAIN            MAIL
 LANGUAGE          C
 COPYRIGHT         (C) Fujitsu Technology Solutions 2002
                       ALL RIGHTS RESERVED
 COMPILATION-SCOPE USER
 INTERFACE-TYPE    CALL
 RUN-CONTEXT       TU
 PURPOSE           (/ Delete send mail order which is yet uncompleted
                   /)
[...]
 END-INTERFACE     YMLDML.
*********************************************************************/
#endif
 
[...]
#ifdef _YMLDML_H_VERSION_3
 
#define YMLDML_UNIT     940
#define YMLDML_FUNCTION  22
#define YMLDML_VERSION    3
 
/* order                                                              */
/* ENUM order_s                                                       */
#define YMLDML_all 1                    /* ALL                        */
#define YMLDML_single 2                 /* SINGLE                     */
 
/* owner                                                              */
/* ENUM owner_s                                                       */
#define YMLDML_own 1                    /* OWN                        */
#define YMLDML_all_users 2              /* ALL                        */
#define YMLDML_other 3                  /* OTHER                      */
 
/* main return codes                                                  */
/* mret_code                                                          */
#define YMLDML_successful 0             /* No error detected          */
#define YMLDML_parameter_error 1        /* Parameter error            */
#define YMLDML_int_error 2              /* Internal error             */
#define YMLDML_order_not_found 3        /* Order not found            */
#define YMLDML_insuff_priv 4            /* Insufficient privileges    */
#define YMLDML_wrong_owner 5            /* Order not owned by         */
                                        /* specified owner            */
#define YMLDML_foreign_task 6           /* Order issued by foreign    */
                                        /* task                       */
#define YMLDML_asti_not_avail 7         /* Subsystem ASTI not         */
                                        /* available                  */
#define YMLDML_asti_error 8             /* Unexpected ASTI error      */
#define YMLDML_serv_not_avail 9         /* Mailclient service not     */
                                        /* available                  */
#define YMLDML_resource_sat 10          /* Resource saturation        */
#define YMLDML_data_temp_not_avail 11   /* Order data temporarily not */
                                        /* available                  */
#define YMLDML_data_perm_not_avail 12   /* Order data permanently not */
                                        /* available                  */
 
/* Parameter area                                                     */
struct YMLDML_pl_mdl {
 
        /* FHDR                                                       */
        struct ESMFHDR hdr;
 
        /* Input parameters                                           */
        struct {
                char order_id[16];      /* Order Id                   */
                unsigned char order;    /* Order specification        */
                unsigned char owner;    /* Owner specification        */
                char user_id[8];        /* User id of owner           */
                char optfile[54];       /* Option file                */
        } in_data;
 
        /* Output parameters                                          */
        struct {
                unsigned long asti_rc;  /* Return code from ASTI      */
                char msg_id[7];         /* Message Id                 */
                char reserved1[1];      /* Reserved                   */
        } out_data;
};
 
/*  Entry for YMLDML  */
#ifdef __SNI_HOST_BS2000
#ifdef __cplusplus
extern "C" void _SVC(int, void*);
inline void YMLDML(struct YMLDML_pl_mdl& param)
{_SVC(20, &param);}
#else
void _SVC(int, void*);
#define YMLDML(p) _SVC(20, &p)
#endif
#endif
 
 
#endif /* _YMLDML_H_VERSION_3 */
 
#endif          /* _YMLDML_H */