Loading...
Select Version
&pagelevel(5)&pagelevel
Nachfolgend ist die Include-Datei YMLGML.H aufgelistet. Ein Beispielprogramm, das die Verwendung des Funktionsaufrufs YMLDML() zeigt, finden Sie auf "C-Beispielprogramme"
#ifndef _YMLGML_H
#define _YMLGML_H
#if 0
/*********************************************************************
BEGIN-INTERFACE YMLGML
TITLE (/ Get info about send mail orders /)
NAME YMLGML.H
DOMAIN MAIL
LANGUAGE C
COPYRIGHT (C) Fujitsu Technology Solutions GmbH 2010
ALL RIGHTS RESERVED
COMPILATION-SCOPE USER
INTERFACE-TYPE CALL
RUN-CONTEXT TU
PURPOSE (/ Get info about submitted send mail order(s)
/)
[...]
END-INTERFACE YMLGML.
*********************************************************************/
#endif
[...]
#ifdef _YMLGML_H_VERSION_2
#define YMLGML_UNIT 940
#define YMLGML_FUNCTION 23
#define YMLGML_VERSION 2
/* order */
/* ENUM order_s */
#define YMLGML_sum 1 /* sum */
#define YMLGML_all 2 /* all */
#define YMLGML_single 3 /* single */
/* owner */
/* ENUM owner_s */
#define YMLGML_own 1 /* OWN */
#define YMLGML_all_users 2 /* ALL */
#define YMLGML_other 3 /* OTHER */
/* main return codes */
/* mret_code */
#define YMLGML_successful 0 /* No error detected */
#define YMLGML_parameter_error 1 /* Parameter error */
#define YMLGML_int_error 2 /* Internal error */
#define YMLGML_order_not_found 3 /* Order not found */
#define YMLGML_out_too_small 4 /* Output area too small */
#define YMLGML_order_not_own 5 /* Order not own */
#define YMLGML_resource_sat 6 /* Resource saturation */
#define YMLGML_foreign_task 7 /* Order issued by foreign */
/* task */
#define YMLGML_asti_not_avail 8 /* Subsystem ASTI not */
/* available */
#define YMLGML_not_mail_send_order 9 /* Not a mail send order */
#define YMLGML_asti_error 10 /* Unexpected ASTI error */
#define YMLGML_serv_not_avail 11 /* Mailclient service not */
/* available */
/* Parameter area */
struct YMLGML_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 reserved1[2]; /* Reserved */
char user_id[8]; /* User id of owner */
void* out; /* Output area */
unsigned long outl; /* Output area length */
char optfile[54]; /* Option file */
char reserved2[2]; /* Reserved */
} in_data;
/* Output parameters */
struct {
unsigned long sum; /* Number of queued mails */
unsigned long asti_rc; /* Return code from ASTI */
char msg_id[7]; /* Message Id */
char reserved3[1]; /* Reserved */
} out_data;
};
/* Entry for YMLGML */
#ifdef __SNI_HOST_BS2000
#ifdef __cplusplus
extern "C" void _SVC(int, void*);
inline void YMLGML(struct YMLGML_pl_mdl& param)
{_SVC(20, ¶m);}
#else
void _SVC(int, void*);
#define YMLGML(p) _SVC(20, &p)
#endif
#endif
/* order status */
/* ENUM status_s */
#define YMLGML_waiting 1 /* waiting */
#define YMLGML_deferred 2 /* deferred */
#define YMLGML_active 3 /* active */
#define YMLGML_sent_ok 4 /* send successful */
#define YMLGML_sent_fail 5 /* send failed */
/* Data type selector */
/* ENUM slctr_s */
#define YMLGML_sel_order 1 /* order data */
#define YMLGML_sel_result 2 /* result data */
/* rc */
/* ENUM rc_s */
#define YMLGML_be_ok 0 /* OK */
#define YMLGML_be_param_error 1 /* Parameter error */
#define YMLGML_be_resource_sat 2 /* Resource saturation */
#define YMLGML_be_smtp_error 3 /* General SMTP error */
#define YMLGML_be_smime_error 4 /* SMIME error */
#define YMLGML_be_smtp_mail_from_error 5
/* Error at SMTP MAIL FROM */
#define YMLGML_be_smtp_rcpt_to_error 6 /* Error at SMTP RCPT TO */
#define YMLGML_be_smtp_data_error 7 /* Error at SMTP DATA */
#define YMLGML_be_file_access_error 8 /* Error at user file access */
#define YMLGML_be_message_too_large 9 /* Message too large */
#define YMLGML_be_int_error 10 /* Internal error */
/* Output parameters */
struct YMLGML_order {
unsigned long num_order; /* number of orders */
char order_id[1][16]; /* Array of order ids, real */
/* array size: num_order */
};
/* order specific data */
struct YMLGML_order_data {
unsigned long cnt_tries; /* # sending tries */
};
/* result specific data */
struct YMLGML_result_data {
unsigned long rc; /* return code */
char ret_msg[160]; /* return message */
};
/* mail parameter */
struct YMLGML_mail_data {
unsigned long status; /* mail status */
unsigned long time; /* submission time */
char user[8]; /* submitter */
unsigned long slctr; /* data selector */
/* UNION data */
union /* _data */ {
struct YMLGML_result_data result_data;
/* result data */
struct YMLGML_order_data order_data;
/* order data */
} _data;
unsigned long mail_par_len; /* mail parameter length */
char mail_par[4]; /* mail parameters, real */
/* size: mail_par_len */
};
/* STRUCT Output parameters */
struct YMLGMLoutpar {
/* UNION Output parameters */
union /* _outp */ {
struct YMLGML_mail_data mail_data;
/* mail data */
struct YMLGML_order order_ids;
/* order Ids */
} _outp;
};
#endif /* _YMLGML_H_VERSION_2 */