Skip to content

Instantly share code, notes, and snippets.

```
[25826 "FA " "A" 16 "C000925" none "C000925" "C" none none none "001" false 1 true 0 false true false true " 381 " 381 4-May-2010/0:00:00 "2010" "2010" "IT " " " " " "05010301001 " " " none 4-May-2010/0:00:00 "EUR" 2 3 1.0 "003" true false none none none "CASS" none "008" "900" none none " " deferred "01 " "01 " "01 " "SC " "04" none 5-May-2010/0:00:00 none none none none none 2 0.0 13.0 0.0 deferred 0.0 3 1 4 3 0 3 0.0 0.0 0.0 "0U00000000" "xxxxxmyserverxxxxxxx" "xxxxxmyserver2xxxxxxx" 27-Oct-2012/2:20:00 4-Apr-2018/17:59:00 #{000000000330ED82} deferred none none false 0 false false true none deferred false none none deferred none none none none false none none none deferred none none]
[25827 "FA " "A" 16 "C000907" none "C000907" "C" none none none "001" false 1 true 0 false true false true " 382 " 382 4-May-2010/0:00:00 "2010" "2010" "IT " " " " " "05010301
@GiuseppeChillemi
GiuseppeChillemi / gist:32f11f8f28496f911d26f505e7914695
Created April 11, 2022 00:08
if is missing its cond argument
]
]
about-connection
info: 0 max-driver-connections
info: 1 max-concurrent-activities
info: 2 data-source-name
info: 6 driver-name
info: 7 driver-ver
info: 10 odbc-ver
info: 11 row-updates
@GiuseppeChillemi
GiuseppeChillemi / gist:db00dced4d6cd547619efebce6369c89
Created April 10, 2022 21:28
all does not allow logic! for its conds argument
info: 130 create-domain
info: 131 create-schema
info: 132 create-table
info: 133 create-translation
info: 134 create-view
info: 136 drop-assertion
info: 137 drop-character-set
info: 138 drop-collation
info: 139 drop-domain
info: 140 drop-schema
SQLGetInfo(144) 0
]
info: 145 dynamic-cursor-attributes2
PICK-METADATA [
SQLGetInfo(145) 0
]
info: 146 forward-only-cursor-attributes1
PICK-METADATA [
SQLGetInfo(146) 0
]
//////////////////////////////////
SQLGetInfo(142) 0
]
info: 143 drop-view
PICK-METADATA [
SQLGetInfo(143) 0
]
info: 144 dynamic-cursor-attributes1
PICK-METADATA [
@GiuseppeChillemi
GiuseppeChillemi / gist:b945ca418dff41a77812a0c8c47d4461
Created April 7, 2022 22:20
Single column Attributi retrieve
//////////////////// Without debug ///////////////////
>> do %odbc-test.red
[attributi]
--------------------------------------------------------------------------------
---------------------------------------------------
0375A1E8:
///////// CODE:
cn: switch 'b-ok con
st: open cn
st/state/window: 1
st/state/cursor: 'static
columns: insert st "select top 1 * from cf where attributi is not null "
@GiuseppeChillemi
GiuseppeChillemi / ALL-COLUMNS
Last active April 4, 2022 22:37
All columns
[
id-do-tes "Id_DoTes" 4 10 0 0 handle! 4 handle!
cd-do "Cd_Do" 1 3 0 0 handle! 8 handle!
tipo-documento "TipoDocumento" 1 1 0 0 handle! 4 handle!
do-bit-mask "DoBitMask" 4 10 0 0 handle! 4 handle!
cd-cf "Cd_CF" 1 7 0 0 handle! 16 handle!
cd-cf-fatt "Cd_CF_Fatt" 1 7 0 1 handle! 16 handle!
cd-cf-fatt-r "Cd_CF_Fatt_R" 1 7 0 0 handle! 16 handle!
cli-for "CliFor" 1 1 0 0 handle! 4 handle!
cd-aliquota-e "Cd_Aliquota_E" 1 3 0 1 handle! 8 handle!
@GiuseppeChillemi
GiuseppeChillemi / gist:81a15c08f9bc9b575742ee6dbe05ab30
Created April 1, 2022 20:43
insert st rejoin ["select top 2 descrizione from cf"] copy st
]
info: 129 create-collation
PICK-METADATA [
SQLGetInfo(129) 0
]
info: 130 create-domain
PICK-METADATA [
SQLGetInfo(130) 0
]
info: 131 create-schema
@GiuseppeChillemi
GiuseppeChillemi / gist:67e337ff745c96b7975c733df7079abf
Created April 1, 2022 19:12
ODBC: "select cast(notexml as varchar(8000)) as n from dotes where notexml is not null" test
]
info: 120 batch-row-count
PICK-METADATA [
SQLGetInfo(120) 0
]
info: 121 batch-support
PICK-METADATA [
SQLGetInfo(121) 0
]
info: 127 create-assertion