FTAM/9000 Programmer's Guide

Chapter 10 409
Example Programs
Common Code Example
/*
** Initialize the input_dcb.
*/
res = ft_didcb(FTiFDelete, 0, (Octet **)input_dcb, & outcome);
if (res != SUCCESS)
error_handler(outcome, diag);
(*input_dcb)-init_id = SRC_ID;
(*input_dcb)-filestore_pw.pointer = (Octet *)SRC_PW;
(*input_dcb)-filestore_pw.length = SRC_PW_LEN;
(*input_dcb)-delete_file_pw.pointer = (Octet *)DEL_PW;
(*input_dcb)-delete_file_pw.length = DEL_PW_LEN;
(*input_dcb)-account = DEST_ACCOUNT;
/*
** Initialize the inout_dcb.
*/
*inout_dcb = NULL;
}
/*
**
** sel_parm_in
**
** DESCRIPTION:
** This routine assigns valid values to the ft_select parameters.
**
**
** PARAMETERS:
** Outputs:
** filename : name of the file to select
** requested_access : requested file action
** return_event_name : gets signalled when the event completes
** default: SYNCHRONOUS
** input_dcb : contains ft_select input information
** inout_dcb : contains return_code field
**
*/
void
sel_parm_in(filename, requested_access, return_event_name, input_dcb,
inout_dcb)
Ft_filename *filename;
Ft_file_actions *requested_access;
Local_event_name *return_event_name;
struct Ft_select_in_dcb **input_dcb;
struct Ft_select_out_dcb **inout_dcb;
{