/* Copyright © Oracle Corporation 1995.  All Rights Reserved. */
/*****************************************************************************
*  This routine delete an employee from the west database.  The distributed 
*  context structure is the parameter this routine expects.
*
******************************************************************************/
#include <descrip.h>
#include <stsdef.h>
#include <ssdef.h>
#include <stdio.h>
#include ctype

struct context_struct {
        	long version;
        	long type;
          	long length;
          	long distributed_tid[4];
          	long end;
	              }; 
extern char emp_id[6];
long sqlcode;
void sql$dist_trans_error (struct context_struct *context);
void delete_west();

rdb_del_west(struct context_struct *context )

{
	struct context_struct  local_context;
	local_context =  *context;



/* 		*/
	delete_west(&sqlcode,  &emp_id, &local_context); 
	if (sqlcode != 0) sql$dist_trans_error(&local_context);
	return;
}