#include < stdio.h >
#include "lincppapi.h"

int main(void)
{
  L_LONG         lRet;     /* return code */
  L_CHAR         date[30]; /* date as a string */
  linCursor     *pCursor;
  linConnection *pConnect = new linConnection;

  if (!pConnect)
  {
    ptintf("No memory\n")
    exit(1);
  }

  if (lRet = pConnect- >Connect("SYSTEM", 0, "MANAGER8", 0, NULL, mAutocommit))
    processing_error(pConnect, lRet, "ERROR Connect");

  printf("Open cursor\n");
  if (lRet = pConnect- >OpenCursor(NULL, 0, &pCursor))
    processing_error(pConnect, lRet, "Error open cursor");

  printf("ExecuteDirect: 'create or replace table TDATE ( D date )'\n");
  if (lRet = pCursor- >ExecuteDirect("create or replace table TDATE (D date)", 0))
    processing_error(pConnect, lRet, "Error ExecuteDirect 1");

  printf("ExecuteDirect: 'insert into TDATE values(sysdate)'\n");
  if (lRet = pCursor- >ExecuteDirect("insert into TDATE values(sysdate)", 0))
    processing_error(pConnect, lRet, "Error ExecuteDirect 2");

  printf("ExecuteDirect: 'select D from TDATE'\n");
  if (lRet = pCursor- >ExecuteDirect("select D from TDATE", 0))
    processing_error(pConnect, lRet, "Error ExecuteDirect 3");

  printf("GetData (as tString)\n");
  if (lRet = pCursor- >GetData(1,
                              date,     /* answer bufer */
                              30,       /* length of bufer */
                              tString,  /* type of the answer */
                              0, 0, NULL))
    processing_error(pConnect, lRet, "Error GetData");

  printf("    DATE : %s\n", date);

  printf(" ExecuteDirect: 'drop table TDATE'\n");
  if (lRet = pCursor- >ExecuteDirect("drop table TDATE", 0))
    processing_error(pConnect, lRet, "Error ExecuteDirect 4", false);

  printf("CloseCursor\n");
  if (lRet = pConnect- >CloseCursor(pCursor))
    processing_error(pConnect, lRet, "Error CloseCursor");

  printf("CloseConnect\n");
  if (lRet = pConnect- >CloseConnect())
    processing_error(pConnect, lRet, "Error CloseConnect");

  delete pConnect;
}