Sql state

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
use "collections"

trait SqlState
  fun _from_env(h: ODBCHandleEnv tag): Array[(String val, String val)] val =>
    var r: Array[(String val, String val)] trn = Array[(String val, String val)]

    for f in Range[I16](1, 1024) do
      try
        var sdf: SQLDiagFrame = SQLDiagFrame.create_penv(h, f)?
        r.push((sdf.sqlstate.clone(), sdf.msgbuff.clone()))
      else
        break
      end
    end
    consume r

  fun _from_dbc(h: ODBCHandleDbc tag): Array[(String val, String val)] val =>
    var r: Array[(String val, String val)] trn = Array[(String val, String val)]

    for f in Range[I16](1, 1024) do
      try
        var sdf: SQLDiagFrame = SQLDiagFrame.create_pdbc(h, f)?
        r.push((sdf.sqlstate.clone(), sdf.msgbuff.clone()))
      else
        break
      end
    end
    consume r

  fun _from_stmt(h: ODBCHandleStmt tag): Array[(String val, String val)] val =>
    var r: Array[(String val, String val)] trn = Array[(String val, String val)]

    for f in Range[I16](1, 1024) do
      try
        var sdf: SQLDiagFrame = SQLDiagFrame.create_pstmt(h, f)?
        r.push((sdf.sqlstate.clone(), sdf.msgbuff.clone()))
      else
        break
      end
    end
    consume r