OSI/AS Programming Manual

Example 2: Presentation Layer and ACSE
Sample Programs
E–64 056783 Tandem Computers Incorporated
INT(32) more_data; -- APS_DATA_GETPARAM_
INT(32) next_position; -- APS_DATA_GETPARAM_
INT(32) start_position; -- APS_DATA_GETPARAM_
INT(32) tag; -- tag for APS calls
STRUCT .acse_appl_context_name
( zaps^ddl^appl^cntxt^def );
STRUCT .acse_local_ae_title
( zaps^ddl^ae^title^def );
STRUCT .acse_local_invocation_ids
( zaps^ddl^invocation^ids^def );
STRUCT .acse_remote_ae_title
( zaps^ddl^ae^title^def );
STRUCT .acse_remote_invocation_ids
( zaps^ddl^invocation^ids^def );
STRUCT .api_environment
( zaps^ddl^environment^def );
STRUCT .conid
( zaps^ddl^l5^conid^def );
STRUCT .device_name
( zaps^ddl^filename^def );
STRUCT .diagnostic_buffer
( zaps^ddl^diag^buf^def );
STRUCT .give_tokens
( zaps^ddl^tokens^def );
STRUCT .local_appl
( zaps^ddl^appl^addr^def );
STRUCT .original_error_info
( zaps^ddl^original^error^def );
STRUCT .pres_context_list
( zaps^ddl^pres^cntxt^list^def );
STRUCT .pres_context_result_list
( zaps^ddl^pres^cntxt^rlist^def );
STRUCT .pres_default_context_name
( zaps^ddl^pres^deflt^cntxt^def );
STRUCT .remote_appl
( zaps^ddl^appl^addr^def );
STRUCT .session_rqmnts
( zaps^ddl^l5^rqmnts^def );
STRUCT .EXT user_data
( user_data_def );
INT .EXT user_data_element
( user_data_element_def );
STRING .EXT user_data_ptr;
--
-- Source in APS external declarations.
-- EXTDECS0 comes from the appropriate volume and subvolume.
--
? NOLIST, SOURCE EXTDECS0( APS_ASSOC_ATTACH_
? , APS_ASSOC_CONNECTRSP_
? , APS_ASSOC_GETPARAM_
? , APS_ASSOC_RELEASEREQ_