CDatabase cdb;

if ( cdb.OpenEx("DRIVER={Microsoft ODBC for Oracle};SERVER=MYSERVER;UID=MYUSER;PWD=MYPASS", CDatabase::noOdbcDialog) !=  0  )
{

    try 
    {
        cdb.ExecuteSQL("BEGIN MYPACKAGE.INSERT_RECORD('ИВАНОВ') END;");  //1-ОШИБКА
        cdb.ExecuteSQL("MYPACKAGE.INSERT_RECORD('ИВАНОВ')");                  //2-ОШИБКА
        cdb.ExecuteSQL("INSERT INTO MYTABLE (COLUMN1) VALUES ('ИВАНОВ')");   //3-все работает
    }
    catch (CException* myException) 
    {
        AfxMessageBox("EXCEPTION: Ошибка выполнения запроса.", MB_OK | MB_ICONERROR );	
    }

}

cdb.ExecuteSQL("BEGIN MYPACKAGE.INSERT_RECORD('ИВАНОВ'); END;");

cdb.ExecuteSQL("INSERT INTO MYTABLE (COLUMN1) VALUES ('ИВАНОВ');");

cdb.ExecuteSQL("BEGIN MYPACKAGE.INSERT_RECORD('ИВАНОВ'); END;");

//1)цикл чтения файлов
...
//2)цикл чтения строк файла
...
wsprintf(tmpbuff, (CString)"BEGIN K_CARD.INSERT_TRN_FROM_FILE("+
		(CString)"'%s', %s, %s, %s,   %s, %s, '%s', '%s', '%s', '%s', NULL, '%s'); END;", 
		aFile[i], buf_dfiledat, buf_dtrndatetime, buf_itrnsum, 
		buf_icardnum, buf_iaccnum, buf_catmname, buf_ctown, buf_cadress, buf_at_po,   buf01);

cdb.ExecuteSQL(tmpbuff);