修改

Question

如何通过输入文件使用PL SQL执行删除操作？我不想冒险直接从表中删除。是否可以通过给出值作为输入来删除？如果是这样的话？

Answer 1

修改仅用于使用plsql提取数据。

https://asktom.oracle.com/pls/asktom/f?p=100:11:0::::P11_QUESTION_ID:68212348056

其他方法

1）使用shell脚本（如BASH）将数据从FILE传输到临时表。

2）然后使用临时表从主表中删除数据。

3）然后，您只需再次执行相同的操作，并且只需设置Cron作业

示例脚本文件

#!/bin/ksh ORAENV_ASK=NO export ORAENV_ASK ORACLE_SID=newsp1 inputFileBkUpDir=/usr/users/backup inputFileDir=/usr/users/file LogDir=/usr/users/log ORACLE_HOME=/u01/app/oracle/product/9.2.0.6 export ORACLE_SID export ORACLE_HOME export inputFileBkUpDir export inputFileDir export LogDir PATH=$PATH:/usr/local/bin export PATH . oraenv # Log File LOGFILE=$LogDir/EDI_file_`date +%y%m%d`.log; # Create backup directory if its not created if ! [ -d $inputFileBkUpDir ] then mkdir $inputFileBkUpDir fi if ! [ -d $LogDir ] then echo 'LogDir not exists' echo "Trying to create directory" mkdir $LogDir if [ $? -ne 0 ] then echo "Log Directory " $LogDir " creation problem\nCannot continue process" >> ${LOGFILE} exit fi echo 'after LogDir created' else chmod 777 $LogDir echo log permission changed of $LogDir fi #*********************************** FILE EXECUTION START *********************************************** echo "\n>>> ******Processing File - STARTED at `date '+%d-%m-%Y %T %Z'`******">> ${LOGFILE} sqlplus TEST_USER/PASS_USER << EOF set serveroutput on; spool /usr/users/spool.lst delete from new_t.data; commit; spool off exit EOF echo "\n>>> Check if EDI file has arrived - STARTED at `date '+%d-%m-%Y %T %Z'`">> ${LOGFILE} for entry in "$inputFileDir"/YOUR_FILE*.dat; do if [ -f "$entry" ];then echo "\n>>> Files present in input directory $inputFileDir">> ${LOGFILE} echo "\n>>> $entry" >> ${LOGFILE} echo "\n>>> Loading $entry file data for EDI DUMP\n" >>${LOGFILE} sqlldr TEST_USER/PASS_USER control=/usr/users/control.ctl data=$entry log=$LogDir/fileLoader.log echo 'Total number of Records Successfully Loaded \t\t\t\c'>>$LOGFILE; grep 'Rows successfully loaded' $LogDir/fileLoader.log | awk '{print $1}'>>$LOGFILE echo 'Rows not loaded due to data error \t\t\t\c'>>$LOGFILE; grep 'Rows not loaded due to data errors' $LogDir/fileLoader.log | awk '{print $1}'>>$LOGFILE echo 'Rows not loaded because all WHEN clauses were failed\t\t\t\c'>>$LOGFILE; grep 'Rows not loaded because all WHEN clauses were failed' $LogDir/fileLoader.log | awk '{print $1}'>>$LOGFILE echo 'Rows not loaded because all fields were null \t\t\t\c'>>$LOGFILE; grep 'Rows not loaded because all fields were null' $LogDir/fileLoader.log | awk '{print $1}'>>$LOGFILE echo "\n>>> Data loaded from $entry file" >>${LOGFILE} mv $entry $inputFileBkUpDir echo "\n>>> Moving $entry file to archive path $inputFileBkUpDir" >>${LOGFILE} else echo 'Files not present' >> ${LOGFILE} fi done echo "\n>>> ******Data Load Completed******" >>${LOGFILE} echo "\n>>> ******Processing Started FILE TO DELETE DATA******" >>${LOGFILE} sqlplus TEST_USER/PASS_USER << EOF set serveroutput on; spool /usr/users/spool.lst @/usr/users/Data_Processing.sql; spool off exit EOF echo "\n>>> ******Processing complete- Data DELETED******" >>${LOGFILE} echo "End of the script">> ${LOGFILE}

样本控制文件，用于设置如何从您的文件到TEMP表读取ID

LOAD DATA APPEND INTO TABLE COLSIMS.EDI_DATA_LOAD ( S_NUMBER POSITION(1:25), P_CODE POSITION(26:50), P_NUMBER POSITION(51:80), T_TIMESTAMP POSITION(406:417) date "YYMMDDHH24MISS", L_TIMESTAMP sysdate )

Answer 2

您可以将文件作为外部表加载

然后编写查询以使用外部表中的条目删除条目

例如

delete from yourtable where id in (select id from extTable)

外部表的一些文档：

http://docs.oracle.com/cd/B19306_01/server.102/b14215/et_concepts.htm

另一种方法是使用oracle / sql之外的脚本（例如excel）生成删除语句，然后执行删除语句

Answer 3

假设这些ID值在文件中每行存储为一个ID，并且ID值是数字，则应该启动以下内容：

DECLARE
  fHandle        UTL_FILE.FILE_TYPE;
  strBuffer      VARCHAR2(32767);
  nRows_deleted  NUMBER := 0;
BEGIN
  fHandle := UTL_FILE.FOPEN('some_directory', 'filename.dat', 'r');

  LOOP
    BEGIN
      UTL_FILE.GET_LINE(fHandle, strBuffer);
    EXCEPTION
      WHEN NO_DATA_FOUND THEN  -- end of file
        EXIT;                  -- exit the loop
    END;

    DELETE FROM SOME_TABLE
      WHERE ID = TO_NUMBER(strBuffer);

    nRows_deleted := nRows_deleted + SQL%ROWCOUNT;
  END LOOP;

  COMMIT;

  DBMS_OUTPUT.PUT_LINE('Changes committed');

  UTL_FILE.FCLOSE(fHandle);

  DBMS_OUTPUT.PUT_LINE('Completed successfully, ' || nRows_deleted || ' rows deleted');
EXCEPTION
  WHEN OTHERS THEN
    DBMS_OUTPUT.PUT_LINE('Error: ' || SQLCODE  || ' - ' || SQLERRM);
    ROLLBACK;
    DBMS_OUTPUT.PUT_LINE('All changes ROLLED BACK');
    RAISE;
END;

修改

作为备用选项，您可以定义外部表以允许将文件视为只读表：

CREATE TABLE DATA_FROM_FILE
  (ID     CHAR(10))
  ORGANIZATION EXTERNAL
    (TYPE ORACLE_LOADER
     DEFAULT DIRECTORY some_directory
     ACCESS PARAMETERS
       (RECORDS DELIMITED BY NEWLINE
        FIELDS (ID  CHAR(10))
       )
     LOCATION ('filename.dat'));

然后允许你做类似

的事情

DELETE FROM SOME_TABLE
  WHERE ID IN DATA_FROM_FILE;

分享并享受。

使用PL SQL删除

3 个答案:

修改