{"draftJsState":{"blocks":[{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Oracle отдает значения элементов XML файла посредством пакетных функций.","type":"unstyled","key":"d909o"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Задача","type":"header-two","key":"ddta8"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Часто \"программисты\" и \"базисты\" - иногда с веселой взаимной иронией, иногда довольно жестко - спорят о том, что есть база. Для ортодоксальных программистов база - это лишь хранилище данных, а вся обработка ведется в программном коде; для ортодоксальных базистов база - это всё, а программный код над ней - это что-то не очень-то и нужное, благо Oracle APEX дал им в руки мощный козырь в этом споре. Намедни пришлось решить задачу, подход к которой идеологически показался еще более решительным.","type":"unstyled","key":"7p22o"},{"data":{"image":{"id":"5e8d053e46d16f5529155e85"}},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Oracle SQL Developer","type":"atomic:image","key":"1afc1"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"XML документ","type":"header-two","key":"l3uh"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Есть XML файл, который пришел по FTP с другого сервера и лег в папку нашего Oracle/PHP сервера. Поскольку доступа к PHP пространству в связи с \"самоизоляцией\" не было, а к пространству Oracle доступ был, решено было полностью решить задачу в базе.","type":"unstyled","key":"ct3ce"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":9,"offset":93,"style":"ITALIC"}],"text":"XML документ выглядит примерно так и необходимо получать поля по, скажем, заданному значению target_id:","type":"unstyled","key":"d3951"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":295,"offset":0,"style":"ITALIC"}],"text":"\n\n \n 1793\n 1\n 0\n 25.06.2019 13:05:23\n 25.06.2019 13:05:23\n... смысловые элементы, которые нам сейчас не важны ...\n \n...\n ","type":"unstyled","key":"a7ais"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Директория","type":"header-two","key":"997pf"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"XML документ ложится в некоторую папку, путь к которой нам известен, и имеет имя, которое нам тоже известно. Oracle умеет читать файлы, но несколько специфическим образом - у него есть понятие директории (directory). Это по сути синоним пространства Oracle пути к папке в пространстве операционной системы:","type":"unstyled","key":"doug8"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":62,"offset":0,"style":"ITALIC"}],"text":"create directory yk_export_dir as '/var/www/html/ora_export'\n;","type":"unstyled","key":"aqh9q"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"После создания директории следует дать схеме-исполнителю права на пользование ей:","type":"unstyled","key":"3tst1"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":52,"offset":0,"style":"ITALIC"}],"text":"grant read on directory yk_export_dir to xmlreader\n;","type":"unstyled","key":"3fnk7"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"SQL для XML","type":"header-two","key":"ccnp3"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Далее мы уже можем средствами SQL прочитать XML документ и представить его в виде, напоминающем представление (view) базы данных:","type":"unstyled","key":"eu1a4"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":382,"offset":0,"style":"ITALIC"}],"text":"select * from \n(select\nxmltype(\nbfilename('YK_EXPORT_DIR', :file), NLS_CHARSET_ID ('AL32UTF8')\n) as xml_data\nfrom dual) x\n, xmltable(\n '/ROWSET/ROW'\n passing x.xml_data\n columns\n target_id number\n , is_success number\n , is_new number\n , create_date varchar2(20)\n , update_date varchar2(20)\n---, ... смысловые поля ...\n) xt\n;","type":"unstyled","key":"dlgc3"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Обратите внимание, что даты передаются строковым типом данных. XML - это текст, и при его формировании даты были превращены в строки; нам необходимо обратить на это внимание, поскольку далее нам потребуется обратное преобразование.","type":"unstyled","key":"e8abk"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"PL/SQL пакет","type":"header-two","key":"a69ut"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Далее мы записываем PL/SQL пакет, в который включаем пару типов данных, пару конвейерных функций и комплект обычных функций по числу смысловых элементов читаемого XML документа.","type":"unstyled","key":"7ihb5"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Спецификация пакета","type":"header-three","key":"8b3pe"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":1184,"offset":0,"style":"ITALIC"}],"text":"create or replace package xmlreader_pkg\nas\n-- Директория Oracle, указывающая на папку операционной системы, в которой лежит XML файл:\nc_dir constant varchar2(200) := 'YK_EXPORT_DIR'\n;\n-- Формат текстового представления дат:\nc_date_format constant varchar(21) := 'dd.mm.yyyy hh24:mi:ss'\n;\ntype t_row is record (\n xml_data xmltype\n , target_id number\n , is_success number\n , is_new number\n , create_date varchar2(20)\n , update_date varchar2(20)\n--, ... смысловые поля ...\n)\n;\ntype t_tab is table of t_row\n;\n-- Получение всего XML документа (даты - varchar2, формат выше)\n -- select * from table(xmlreader_pkg.read_xml(:p_file)) \nfunction read_xml(p_file varchar2) return t_tab pipelined\n;\n-- Получение строки \"представления\" из XML документа (даты - varchar2, формат выше)\n -- select * from table(xmlreader_pkg.read_xml_line(:p_file, :p_target_id)) \nfunction read_xml_line(p_file varchar2, p_target_id number) return t_tab pipelined\n;\nfunction get_is_success (p_file varchar2, p_target_id number) return number\n;\nfunction get_create_date (p_file varchar2, p_target_id number) return date\n;\n -- ... смысловые функции \nend xmlreader_pkg;","type":"unstyled","key":"e6e1f"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Элементы тела пакета","type":"header-three","key":"6ovj5"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":1153,"offset":0,"style":"ITALIC"}],"text":"create or replace package body xmlreader_pkg\nas\nfunction read_xml(p_file varchar2) return t_tab pipelined\nas\nbegin\n for c in (\nselect *\nfrom \n(select xmltype(bfilename(c_dir, p_file), NLS_CHARSET_ID ('AL32UTF8')) as xml_data from dual) x\n, xmltable(\n '/ROWSET/ROW'\n passing x.xml_data\n columns\n target_id number\n , is_success number\n , is_new number\n , create_date varchar2(20)\n , update_date varchar2(20)\n-- ... смысловые поля\n) xt\n ) loop\n pipe row (c);\n end loop;\n return;\nend read_xml;\n-- ...\n-- ...\nfunction get_is_success(p_file varchar2, p_target_id number) return number\nas\n v_is_success number;\nbegin\n select is_success into v_is_success from table(xmlreader_pkg.read_xml_line(p_file, p_target_id));\n return v_is_success;\nend get_is_success;\n-- ...\nfunction get_create_date(p_file varchar2, p_target_id number) return date\nas\n v_create_date date;\nbegin\n select to_date(create_date, c_date_format) into v_create_date from table(xmlreader_pkg.read_xml_line(p_file, p_target_id));\n return v_create_date;\nend get_create_date;\n -- ... \nend xmlreader_pkg;","type":"unstyled","key":"bfg1d"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Пользование","type":"header-two","key":"1crvv"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Теперь мы можем стандартным образом получать значения необходимых нам элементов XML документа в любом пространстве, имеющем доступ к Oracle:","type":"unstyled","key":"3d2o1"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"SQL","type":"header-three","key":"8la4"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Мы можем включить вызов функций в SQL выражение:","type":"unstyled","key":"d3vn1"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":71,"offset":0,"style":"ITALIC"}],"text":"select xmlreader_pkg.get_create_date(:p_file, :p_target_id) from dual\n;","type":"unstyled","key":"38nov"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"PL/SQL","type":"header-three","key":"ac2lm"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Мы можем включить вызов функций в анонимный блок или хранимую процедуру:","type":"unstyled","key":"5qjam"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":86,"offset":0,"style":"ITALIC"}],"text":"begin\ndbms_output.put_line(xmlreader_pkg.get_create_date(:p_file, :p_target_id));\nend;","type":"unstyled","key":"lpiu"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Oracle APEX","type":"header-three","key":"3u62r"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Мы можем использовать вызов функций в процессах, вычислениях, динамических действиях и т.п.:","type":"unstyled","key":"cuo7i"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":88,"offset":0,"style":"ITALIC"}],"text":"begin\n:P1_CREATE_DATE := xmlreader_pkg.get_create_date(\n:P1_FILE, :P1_TARGET_ID\n);\nend;","type":"unstyled","key":"9i2ou"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"PHP","type":"header-three","key":"bilgk"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Мы можем включить вызов функций в стандартные конструкции обращения к базе данных:","type":"unstyled","key":"6u54l"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":269,"offset":0,"style":"ITALIC"}],"text":"$conn = oci_connect(..., ..., ...);\n$sql = \" select xmlreader_pkg.get_create_date(:p_file, :p_target_id) from dual \";\n$stmt = oci_parse($conn, $sql);\noci_execute($stmt);\noci_fetch($stmt);\n$create_date = oci_result($stmt, 1);\noci_free_statement($stmt);\noci_close($conn);","type":"unstyled","key":"dngvv"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Выводы","type":"header-two","key":"79drt"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"Позиция \"программиста\": база хранит данные в таблицах, всё остальное делает код над ней. Позиция \"базиста\": база выполняет все действия по хранению данных в таблицах и манипулированию ими.","type":"unstyled","key":"clbus"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[{"length":29,"offset":98,"style":"UNDERLINE"}],"text":"Мы предложили решение, в котором Oracle выступает универсальным читателем XML документа, при этом не используя ни одной таблицы. Он - база данных - не хранит никаких данных, а предлагает свои мощные средства по их обработке.","type":"unstyled","key":"dneej"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"","type":"unstyled","key":"4p6q9"},{"data":{},"depth":0,"entityRanges":[],"inlineStyleRanges":[],"text":"","type":"marker","key":"rYLTEpBjjppdOAb6sD3k"}],"entityMap":{}},"mentions":[]}