Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- cn = Новый ComОбъект("ADODB.Connection");
- StrConnection = "Provider=OraOLEDB.Oracle.1;Password=oracle;User ID=wms;Data Source=//192.168.47.11:1521/wmsdb;Persist Security Info=True;";
- cn.Open(StrConnection);
- rs = Новый COMОбъект("ADODB.Recordset");
- Запрос = "SELECT *
- | FROM (Select *
- |from CCA_HIST_EXT
- |ORDER BY CCA_HIST_EXT.OP_TIME DESC
- |)
- |WHERE ROWNUM < 1000 AND
- //OP_TYPE_NAME = 'mls_change_load_status'";
- |NUM_INC = '163277943067971531198618184787465251726'";
- //|LOT = '0111T09'";//OP_TIME >= TO_DATE( '20200428', 'YYYYMMDDSSSSS')"; 141305499382841214631709319388576510008
- rs.Open(Запрос, cn);
- ТЗ = Новый ТаблицаЗначений;
- Для Каждого Колон Из rs.fields Цикл
- ТЗ.Колонки.Добавить(Колон.Name);
- КонецЦикла;
- Пока rs.EOF()=0 Цикл
- НоваяСтрока = ТЗ.Добавить();
- Для Каждого Колон Из rs.fields Цикл
- НоваяСтрока[Колон.Name] = rs.Fields(Колон.Name).Value;
- КонецЦикла;
- rs.MoveNext();
- КонецЦикла;
- rs.Close();
- cn.Close();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement