#include <malloc.h>
#include <stdlib.h>
#include <memory.h>
#include <string.h>
#include <stdio.h>
#include <include.h>
#include <lucb.h>

/*
 *  All verbs which not prepared to use yet.
 *
 * CopyRight 1995. Nicholas Poljakov all rights reserved.
 *
 */

struct rqb *call_appl(void *);
extern struct lucb lu6;

test(p)
char *p;
{
}
senderr(p)
char *p;
{
}
open_acb(p)
char *p;
{
}
int close_acb(pACB)
void *pACB;
{

#if OS_TYPE == 0 /* MS_DOS */

    struct rqb *p_rqb;

    if ((p_rqb = (struct rqb *)calloc(1, sizeof(struct rqb))) == NULL) {
         return -1;
    }
    p_rqb -> th.ra.stcb = APPL_CODE;
    p_rqb -> th.ra.code = p_rqb -> th.ra.code & 0xbf; /* TOP */
    p_rqb -> th.ra.code |= 0x80; /* RQB */
    memcpy(p_rqb->th.ra.wa.area, lu6.lu_name, 8);
    p_rqb -> th.ra.rparm.parm.parm1 = 7; /* Detach_LU */
    call_appl(p_rqb);
    free( p_rqb );
#endif
    return 0;
}