OSI/AS Programming Manual

Example 2: Presentation Layer and ACSE
Sample Programs
E–54 056783 Tandem Computers Incorporated
if ( error != ZAPS_ERR_OK )
display_aps_error( error_initialize_proc );
} /* proc initialize_appl */
#pragma PAGE
/*--------------------------------------------------------*/
/* */
/* Main procedure for Example 2, Application 1. */
/* */
/*--------------------------------------------------------*/
main ()
{
/* */
/* read startup message, open output, and initialize APS*/
/* */
initialize_appl();
/* */
/* Set the OSI manager process name. */
/* */
memcpy( api_environment.zend_system_name.u_zc.zb
, "$OMGR "
, 24
);
api_environment.zwaitmode = ZAPS_VAL_WAITED;
/* */
/* Set the local and remote application names. */
/* */
local_appl.zpsap.zpsel.zlen = 0; /* not used */
local_appl.zpsap.zssel.zlen = 0; /* not used */
local_appl.zpsap.ztsel.zlen = 0; /* not used */
local_appl.zpsap.znsap.zlen = 0; /* not used */
local_appl.zappl_name.zlen = 5;
memcpy( local_appl.zappl_name.u_zc.zb, "APPL1", 5 );
remote_appl.zpsap.zpsel.zlen = 0; /* not used */
remote_appl.zpsap.zssel.zlen = 0; /* not used */
remote_appl.zpsap.ztsel.zlen = 0; /* not used */
remote_appl.zpsap.znsap.zlen = 0; /* not used */
remote_appl.zappl_name.zlen = 5;
memcpy( remote_appl.zappl_name.u_zc.zb, "APPL2", 5 );
/* */
/* Initialize session requirements. */
/* */
session_rqmnts.zl5_fu_ispresent = ZAPS_VAL_TRUE;
session_rqmnts.zl5_fu.zhalfduplex = ZAPS_VAL_TRUE;
session_rqmnts.zl5_fu.zduplex = ZAPS_VAL_FALSE;
session_rqmnts.zl5_fu.zexceptions = ZAPS_VAL_FALSE;
session_rqmnts.zl5_fu.ztyped_data = ZAPS_VAL_FALSE;
session_rqmnts.zl5_fu.zneg_release = ZAPS_VAL_FALSE;
session_rqmnts.zl5_fu.zminorsync = ZAPS_VAL_FALSE;