compat_informix-sqlda.c Source File (original) (raw)

124{

125 int i;

126

128 {

129 printf("dump_sqlda called with NULL sqlda\n");

130 return;

131 }

132

133 for (i = 0; i < sqlda->sqld; i++)

134 {

135 if (sqlda->sqlvar[i].sqlind && *(sqlda->sqlvar[i].sqlind) == -1)

136 printf("name sqlda descriptor: '%s' value NULL'\n", sqlda->sqlvar[i].sqlname);

137 else

138 switch (sqlda->sqlvar[i].sqltype)

139 {

141 printf("name sqlda descriptor: '%s' value '%s'\n", sqlda->sqlvar[i].sqlname, sqlda->sqlvar[i].sqldata);

142 break;

144 printf("name sqlda descriptor: '%s' value %d\n", sqlda->sqlvar[i].sqlname, *(int *)sqlda->sqlvar[i].sqldata);

145 break;

147 printf("name sqlda descriptor: '%s' value %f\n", sqlda->sqlvar[i].sqlname, *(double *)sqlda->sqlvar[i].sqldata);

148 break;

150 {

151 char val[64];

153 printf("name sqlda descriptor: '%s' value DECIMAL '%s'\n", sqlda->sqlvar[i].sqlname, val);

154 break;

155 }

156 }

157 }

158}

162{

163

164

165

166

167

168

169#line 57 "sqlda.pgc"

170 char * stmt1 = "SELECT * FROM t1" ;

171

172#line 58 "sqlda.pgc"

173 char * stmt2 = "SELECT * FROM t1 WHERE id = ?" ;

174

175#line 59 "sqlda.pgc"

176 int rec ;

177

178#line 60 "sqlda.pgc"

179 int id ;

180

181#line 61 "sqlda.pgc"

182

183

184 char msg[128];

185

187

188 strcpy(msg, "connect");

190#line 68 "sqlda.pgc"

191

193#line 68 "sqlda.pgc"

194

195

198#line 71 "sqlda.pgc"

199

201#line 71 "sqlda.pgc"

202

203

204 strcpy(msg, "create");

205 { ECPGdo(__LINE__, 1, 1, NULL, 0, ECPGst_normal, "create table t1 ( id integer , t text , d1 numeric , d2 float8 , c char ( 10 ) )", ECPGt_EOIT, ECPGt_EORT);

206#line 79 "sqlda.pgc"

207

209#line 79 "sqlda.pgc"

210

211

212 strcpy(msg, "insert");

213 { ECPGdo(__LINE__, 1, 1, NULL, 0, ECPGst_normal, "insert into t1 values ( 1 , 'a' , 1.0 , 1 , 'a' ) , ( 2 , null , null , null , null ) , ( 4 , 'd' , 4.0 , 4 , 'd' )", ECPGt_EOIT, ECPGt_EORT);

214#line 85 "sqlda.pgc"

215

217#line 85 "sqlda.pgc"

218

219

220 strcpy(msg, "commit");

222#line 88 "sqlda.pgc"

223

225#line 88 "sqlda.pgc"

226

227

228

229

231

232 strcpy(msg, "prepare");

234#line 95 "sqlda.pgc"

235

237#line 95 "sqlda.pgc"

238

239

240 strcpy(msg, "declare");

241

242#line 98 "sqlda.pgc"

243

244

249#line 101 "sqlda.pgc"

250

252#line 101 "sqlda.pgc"

253

254

255

256#line 103 "sqlda.pgc"

257

258

259 rec = 0;

260 while (1)

261 {

262 strcpy(msg, "fetch");

266#line 109 "sqlda.pgc"

267

269#line 109 "sqlda.pgc"

270

272#line 109 "sqlda.pgc"

273

274

275 printf("FETCH RECORD %d\n", ++rec);

277 }

278

279

280#line 115 "sqlda.pgc"

281

282

283 strcpy(msg, "close");

285#line 118 "sqlda.pgc"

286

288#line 118 "sqlda.pgc"

289

290

291 strcpy(msg, "deallocate");

293#line 121 "sqlda.pgc"

294

296#line 121 "sqlda.pgc"

297

298

300

301

302

303

304

306

307 strcpy(msg, "prepare");

309#line 132 "sqlda.pgc"

310

312#line 132 "sqlda.pgc"

313

314

315 strcpy(msg, "declare");

316

317#line 135 "sqlda.pgc"

318

319

324#line 138 "sqlda.pgc"

325

327#line 138 "sqlda.pgc"

328

329

330

331#line 140 "sqlda.pgc"

332

333

334 rec = 0;

335 while (1)

336 {

337 strcpy(msg, "fetch");

341#line 146 "sqlda.pgc"

342

344#line 146 "sqlda.pgc"

345

347#line 146 "sqlda.pgc"

348

349

350 printf("FETCH RECORD %d\n", ++rec);

352 }

353

354

355#line 152 "sqlda.pgc"

356

357

358 strcpy(msg, "close");

360#line 155 "sqlda.pgc"

361

363#line 155 "sqlda.pgc"

364

365

366 strcpy(msg, "deallocate");

368#line 158 "sqlda.pgc"

369

371#line 158 "sqlda.pgc"

372

373

375

376

377

378

384

387

388 printf("EXECUTE RECORD 4\n");

389

390 id = 4;

391

393

394 strcpy(msg, "prepare");

396#line 181 "sqlda.pgc"

397

399#line 181 "sqlda.pgc"

400

401

402 strcpy(msg, "execute");

408#line 184 "sqlda.pgc"

409

411#line 184 "sqlda.pgc"

412

413

415

416 strcpy(msg, "deallocate");

418#line 189 "sqlda.pgc"

419

421#line 189 "sqlda.pgc"

422

423

427

428

429

430

431

433#line 199 "sqlda.pgc"

434

436#line 199 "sqlda.pgc"

437

438

439

445

448

449 printf("EXECUTE RECORD 4\n");

450

451 id = 4;

452

454

455 strcpy(msg, "prepare");

457#line 218 "sqlda.pgc"

458

460#line 218 "sqlda.pgc"

461

462

463 strcpy(msg, "execute");

469#line 221 "sqlda.pgc"

470

472#line 221 "sqlda.pgc"

473

474

476

477 strcpy(msg, "commit");

479#line 226 "sqlda.pgc"

480

482#line 226 "sqlda.pgc"

483

484

485 strcpy(msg, "deallocate");

487#line 229 "sqlda.pgc"

488

490#line 229 "sqlda.pgc"

491

492

496

497 strcpy(msg, "disconnect");

499#line 236 "sqlda.pgc"

500

502#line 236 "sqlda.pgc"

503

504

505

506

509#line 241 "sqlda.pgc"

510

512#line 241 "sqlda.pgc"

513

514

515 strcpy(msg, "commit");

517#line 244 "sqlda.pgc"

518

520#line 244 "sqlda.pgc"

521

522

523 strcpy(msg, "disconnect");

525#line 247 "sqlda.pgc"

526

528#line 247 "sqlda.pgc"

529

530

531 return 0;

532}