다른 저장 프로 시저의 루프에서 저장 프로 시저 호출

Question

비슷한 조회에 대한 응답을 검토했지만 proc가 작성된 스키마를 추가하여 해결할 수없는 또 다른 오류가 계속 발생합니다.

이

내가 실행하려고하고있는 코드입니다 : 그것은 단지 숙제의 유일한 때문에이 같은 사용자가 이전에 작성한 다른 프로 시저를 호출하려고 시도하고있는 LOOP 문 내부

create or replace procedure prcReturnDVD 
-- define the parameters that this proc will accept 
(memberid_in integer, dvd_in integer) 
is 
-- Define local variables 
    vNumRem number(2); 
BEGIN 
-- Update the rental table with the current date 
    update rental set rentalreturneddate = current_date where memberid = memberid_in and dvdid = dvd_in; 
-- update DVD quantityonhand to reflect the return 
    update dvd set dvdquantityonhand = dvdquantityonhand + 1 where dvdid = dvd_in; 
-- Check to see how many DVDs are available for rent for this member 
    select get_rentalsremaining(memberid_in) into vNumRem from dual; 
-- Evaluate the next action depending on number of remaining DVD rentals available 
    if vNumRem >= 1 then 
    -- need to write a for loop in order to cycle through the DVDs that need to be shipped out 
    while vNumRem >= 0 
    loop 
     SYSTEM.prcShipNextDVD(memberid_in); 
     vNumRem := vNumRem - 1; 
    end loop; 
    elsif vNumRem = 0 then 
    -- message that no rentals are allowed 
    dbms_output.put_line('No more rentals allowed.'); 
    end if; 

EXCEPTION 
    WHEN NO_DATA_FOUND THEN 
    dbms_output.put_line('No Data Returned, process failed.'); 
    WHEN TOO_MANY_ROWS THEN 
    dbms_output.put_line('Too many rows returned into variable, check data and try again.'); 
    WHEN OTHERS THEN 
    dbms_output.put_line('An unidentified error has occured. Please research issue with procedure.'); 
END; 
/

(나는 시스템을 사용하고 있습니다 할당하고 권한을 단순화) :

create or replace procedure prcShipNextDVD 
-- define the parameters that this proc will accept 
(memberid_in integer) 
is 
-- Define local variables 
    vCountOut number(2); 
    vAllowedOut number(2); 
    vNextDvd number(16); 
    vAddedInQueue date; 
    vPlaceInQueue number(5); 
BEGIN 
-- ensure the member is eligible to take out another DVD at this time 
-- See how many movies the member currently has out 
    select count(*) into vCountOut from rental where memberid = memberid_in and rentalreturneddate is null; 
-- See how many movies the member is allowed to have out 
    select membershiplimitpermonth into vAllowedOut from membership m, member p where m.membershipid = p.membershipid and p.memberid = memberid_in; 
    IF vCountOut < vAllowedOut then 
    -- If the number out currently is less than the number allowed out currently 
    -- Get next DVD in queue available for shipment 
    select get_nextdvd(memberid_in) into vNextDVD, datedaddedinqueue into vAddedInQueue, rentalpriority into vPlaceInQueue from rentalqueue where memberid = memberid_in; 
    -- create new record in rental table for this shipment 
    insert into rental (rentalid, memberid, dvdid, rentalrequestdate, rentalshippeddate) values (rental_seq.nextval, memberid_in, vNextDVD, vAddedInQueue, current_date); 
    -- decrement dvdquantityon hand in dvd table 
    update dvd set quantityonhand = quantityonhand - 1 where dvdid = vNextDVD; 
    -- remove dvd from queue 
    delete from rentalqueue where memberid = memberid_in and dvdid = vNextDVD ; 
    -- manage remaining rentalpriority records by decrementing them properly (like in 2.1) 
    update rentalqueue set rentalpriority = rentalpriority - 1 where memberid = memberid_in and rentalpriority >= vPlaceInQueue; 
    ELSE 
    -- If the member already has the maximum number of movies out at this time 
    RAISE_APPLICATION_ERROR(-20101, 'Maximum number of movies out reached. You are not allowed to check out another movie at this time.'); 
    END IF; 

EXCEPTION 
    WHEN NO_DATA_FOUND THEN 
    dbms_output.put_line('No Data Returned, process failed.'); 
    WHEN TOO_MANY_ROWS THEN 
    dbms_output.put_line('Too many rows returned into variable, check data and try again.'); 
    WHEN OTHERS THEN 
    dbms_output.put_line('An unidentified error has occured. Please research issue with procedure.'); 
END; 
/

나는 다음과 같은 오류가 발생하고 심지어 프로 시저 호출에 스키마 이름을 추가 한 후. 나는 또한 "실행"과 "호출"로 실행하려고했지만 제대로 작동하지 않는다는 것을 알고있다.

PROCEDURE PRCRETURNDVD compiled 
Errors: check compiler log 
19/7 PL/SQL: Statement ignored 
19/14 PLS-00905: object SYSTEM.PRCSHIPNEXTDVD is invalid 

내가 여기에 대해 잘못하고있는 것에 대한 다른 권장 사항은 무엇입니까?

내가 전화하는 절차에 문제가 있지만 컴파일이됩니다. (주석에 설명 된대로)

Answer 1

는 prcShipNextDVD에서 컴파일 오류를 수정합니다.

그런 다음 다른 저장 프로 시저의 호출이 작동합니다.