OSI/AS Programming Manual

Example 2: Presentation Layer and ACSE
Sample Programs
E–50 056783 Tandem Computers Incorporated
zaps_ddl_ae_title_def acse_remote_ae_title;
zaps_ddl_invocation_ids_def acse_remote_invocation_ids;
zaps_ddl_environment_def api_environment;
zaps_ddl_l5_conid_def conid;
zaps_ddl_filename_def device_name;
zaps_ddl_diag_buf_def diagnostic_buffer;
zaps_ddl_tokens_def give_tokens;
zaps_ddl_appl_addr_def local_appl;
zaps_ddl_original_error_def original_error_info;
zaps_ddl_pres_cntxt_list_def pres_context_list;
zaps_ddl_pres_cntxt_rlist_def pres_context_result_list;
zaps_ddl_pres_deflt_cntxt_def pres_default_context_name;
zaps_ddl_appl_addr_def remote_appl;
zaps_ddl_l5_rqmnts_def session_rqmnts;
struct user_data_def user_data;
struct user_data_element_def *user_data_element;
char *user_data_ptr;
/* */
/* Source in APS external declarations. */
/* CEXTDECS comes from the appropriate volume and subvol. */
/* */
#include "CEXTDECS ( APS_ASSOC_CONNECTREQ_ )"
#include "CEXTDECS ( APS_ASSOC_GETPARAM_ )"
#include "CEXTDECS ( APS_ASSOC_RELEASERSP_ )"
#include "CEXTDECS ( APS_DATA_REQ_ )"
#include "CEXTDECS ( APS_DATA_GETPARAM_ )"
#include "CEXTDECS ( APS_DISCARD_ )"
#include "CEXTDECS ( APS_EVENT_RECEIVE_ )"
#include "CEXTDECS ( APS_INITIALIZE_ )"
#include "CEXTDECS ( APS_STATUS_ )"
#pragma PAGE
/*--------------------------------------------------------*/
/* */
/* Display an error message for those APS procedures that */
/* return 'error'. */
/* */
/*--------------------------------------------------------*/
void display_aps_error( error_proc )
int error_proc; /* i : aps proc label */
{
char *proc_name;
switch( error_proc )
{
case error_assoc_getparam_proc :
proc_name = "APS_ASSOC_GETPARAM_";
break;
case error_data_getparam_proc :
proc_name = "APS_DATA_GETPARAM_";
break;