#include<lrd.h>
static LRD_INIT_INFO InitInfo={LRD_INIT_INFO_EYECAT};
static LRD_DEFAULT_DB_VERSION DBTypeVersion[]={{LRD_DBTYPE_NONE,LRD_DBVERSION_NONE}};
static LRD_VAR_DESC OBJECT_NAME_D1;
static void FAR * OraEnv1;
static void FAR * OraSvc1;
static void FAR * OraSrv1;
static void FAR * OraSes1;
static void FAR * OraStm1;
static void FAR * OraDef1;
unsigned long rownum;

Action()
{
   
 lrd_init(&InitInfo,DBTypeVersion);
 lrd_initialize_db(LRD_DBTYPE_ORACLE,3,0);
 lrd_env_init(LRD_DBTYPE_ORACLE,&OraEnv1,0,0);
 lrd_ora8_handle_alloc(OraEnv1,SVCCTX,&OraSvc1,0);
 lrd_ora8_handle_alloc(OraEnv1,SERVER,&OraSrv1,0);
 lrd_ora8_handle_alloc(OraEnv1,SESSION,&OraSes1,0);
 lrd_server_attach(OraSrv1,"cs2qa1",-1,0,0);
 lrd_ora8_attr_set_from_handle(OraSvc1,SERVER,OraSrv1,0,0);
 lrd_ora8_attr_set(OraSes1,USERNAME,"cs2_supp",-1,0);
 lrd_ora8_attr_set(OraSes1,PASSWORD,"cs2_supp",-1,0);
 lrd_ora8_attr_set_from_handle(OraSvc1,SESSION,OraSes1,0,0);

 lrd_session_begin(OraSvc1,OraSes1,1,0,0);
 lrd_ora8_handle_alloc(OraEnv1,STMT,&OraStm1,0);

 lrd_ora8_stmt(OraStm1,"select cs2_bkg_cfm.bkg_num from cs2_bkg_cfm,cs2_bkg_cfm_pty where cs2_bkg_cfm.bkg_cfm_id=cs2_bkg_cfm_pty.bkg_cfm_id and cs2_bkg_cfm_pty.cs_comp_id='SOLUUS1676980353' and cs2_bkg_cfm.bkg_stat='Confirmed'",1,0,0);
    lrd_ora8_exec(OraSvc1,OraStm1,0,0,&rownum,0,0,0,0,0);
    //lrd_ora8_bind_col(OraStm1,&OraDef1,1,&OBJECT_NAME_D1,0,0);
 return 0;
}