для разрешения многозначного цикла используется но ошибка приходит

Question

ORA-06550: строка 10, столбец 89:
PLS-00103: обнаружен символ ";" при ожидании одного из следующих действий:

* & - + / в моде остаток rem .. || многосетевой день

    CREATE OR REPLACE PROCEDURE SALE
    (OUTLETID  IN number,itemCod IN number,START_Date IN DATE, END_DATE IN DATE,OUTLETID1  out number,itemCod1 out number,AMOUNT OUT NUMBER,Quantity OUT NUMBER,Entry_Date out date )IS 
    BEGIN 
      select l.OUTLET_ID,itemCode,
             Sum(Amount)Amount,sum(quantity)Quantity,
             i.Entry_Date  
    INTO OUTLETID1,itemCod1,
         AMOUNT,Quantity,
         Entry_Date 
    from IDSTRANSACTION i 
    join lup_outlet l on l.OUTLET_ID=i.outlet_id 
    JOIN LUP Z ON Z.ZONE_ID=L.ZONE_ID 
    join prod p on p.serial =itemCode 
    join lup_master m on  m.sup_id = p.Supplier_ID 
    where l.OUTLET_ID in (OUTLETID ) 
    and  itemCode in (itemCod) 
    and to_date(i.Entry_Date) between START_Date and END_DATE 
    group by l.OUTLET_ID,itemCode,i.Entry_Date
     END;
    ----------
    declare 
       var number; 
       var1 number; 
       var2 number;
       var3 number;
       var4 date;
    begin 
      for c in (SALE( OUTLETID  => 809,itemCod  => 128169, START_Date=>DATE '2018-01-01',end_Date=>DATE '2019-01-01',  AMOUNT => var,Quantity => var1,OUTLETID1 => var2,itemCod1 => var3,Entry_Date => var4));
     loop 
       var:=c.AMOUNT; 
       var1:=c.Quantity; 
       var2:=c.OUTLETID1; 
       var3:=c.itemCod1; 
       var4:=c.Entry_Date; 
       dbms_output.enable; 
       dbms_output.put_line(var); 
       dbms_output.enable;  
       dbms_output.put_line(var1);  
       dbms_output.enable;  
       dbms_output.put_line(var2);  
       dbms_output.enable;  
       dbms_output.put_line(var3); 
       dbms_output.enable;  
       dbms_output.put_line(var4);   
    end loop;
  End;

Answer 1

вам не хватает точки с запятой, и у вас есть дополнительная точка во второй процедуре, поэтому важно форматирование кода:

      CREATE OR REPLACE PROCEDURE sale (
        outletid     IN           NUMBER,
        itemcod      IN           NUMBER,
        start_date   IN           DATE,
        end_date     IN           DATE,
        outletid1    OUT          NUMBER,
        itemcod1     OUT          NUMBER,
        amount       OUT          NUMBER,
        quantity     OUT          NUMBER,
        entry_date   OUT          DATE
      ) IS
      BEGIN
        SELECT
          l.outlet_id,
          itemcode,
          SUM(amount) amount,
          SUM(quantity) quantity,
          i.entry_date
        INTO
          outletid1,
          itemcod1,
          amount,
          quantity,
          entry_date
        FROM
          idstransaction   i
          JOIN lup_outlet       l ON l.outlet_id = i.outlet_id
          JOIN lup              z ON z.zone_id = l.zone_id
          JOIN prod             p ON p.serial = itemcode
          JOIN lup_master       m ON m.sup_id = p.supplier_id
        WHERE
          l.outlet_id IN (
            outletid
          )
          AND itemcode IN (
            itemcod
          )
          AND TO_DATE(i.entry_date) BETWEEN start_date AND end_date
        GROUP BY
          l.outlet_id,
          itemcode,
          i.entry_date; -- THE SEMICOLON MISSING HERE

      END;
        ----------

      DECLARE
        var    NUMBER;
        var1   NUMBER;
        var2   NUMBER;
        var3   NUMBER;
        var4   DATE;
      begin for c
      in(sale(outletid => 809, itemcod => 128169, start_date => DATE '2018-01-01', end_date => DATE '2019-01-01', amount => var, quantity
      => var1, outletid1 => var2, itemcod1 => var3, entry_date => var4)) -- ; REMOVE THE SEMICOLON HERE

      LOOP
        var := c.amount;
        var1 := c.quantity;
        var2 := c.outletid1;
        var3 := c.itemcod1;
        var4 := c.entry_date;
        dbms_output.enable;
        dbms_output.put_line(var);
        dbms_output.enable;
        dbms_output.put_line(var1);
        dbms_output.enable;
        dbms_output.put_line(var2);
        dbms_output.enable;
        dbms_output.put_line(var3);
        dbms_output.enable;
        dbms_output.put_line(var4);
      END LOOP;

      end;

Answer 2

Я бы переписал это следующим образом:

• все в рамках SALE
  • его оператор SELECT будет использоваться в курсоре FOR loop
• нужны только IN параметры (потому что вы больше ничего не возвращаете)
  • добавьте к ним префикс p_, чтобы не было путаницы между их именами и именами столбцов
• вам не нужны переменные, которые вы объявили; ссылочные значения, возвращаемые курсором
• использовать псевдонимы таблиц при обращении к столбцу. Например, в sum(amount) - к какой таблице относится столбец amount? До тех пор, пока вы это знаете, у любого, кто унаследует ваш код, будет кошмар, пытающийся понять это
• i.entry_date похоже, что его тип данных DATE (да, это должно быть DATE). Если вы храните даты в столбцах varchar2 (или number?), Не делайте этого - переключитесь на DATE, если это возможно. Если нет, примените маску формата к функции to_date. Oracle будет пытаться неявно преобразовать один тип данных в другой, теперь он может даже работать, но - если среда изменится, такой код потерпит неудачу

---

create or replace procedure sale
  (p_outletid    in number,    --> use prefixes for parameters so that they ...
   p_itemcod     in number,    --> ... are easy to distinguish between column names
   p_start_date  in date, 
   p_end_date    in date,
  ) 
is 
begin           
  for c in (select l.outlet_id,
                   itemcode,               --> include table aliases, wherever they ...
                   sum(amount) amount,     --> ... are missing
                   sum(quantity) quantity,
                   i.entry_date  
            from idstransaction i 
              join lup_outlet l on l.outlet_id = i.outlet_id 
              join lup z on z.zone_id = l.zone_id 
              join prod p on p.serial = itemcode 
              join lup_master m on m.sup_id = p.supplier_id 
            where l.outlet_id = p_outletid
              and itemcode = p_itemcod 
              and to_date(i.entry_date) between p_start_date   --> if I.ENTRY_DATE is DATE, then ...
                                            and p_end_date     --> ... remove TO_DATE. Otherwise, ...
            group by l.outlet_id,                              --> ... apply correct format mask
                     itemcode,
                     i.entry_date
           )
  loop
    dbms_output.put_line(c.outlet_id); 
    dbms_output.put_line(c.itemcode);  
    dbms_output.put_line(c.amount);  
    dbms_output.put_line(c.quantity); 
    dbms_output.put_line(c.entry_date);   
  end loop;
end;