▼ I got an answer to this question ▼ CREATE OR REPLACE PROCEDURE DDCKPAY_SP (pledgeId IN DD_PLEDGE.IDPLEDGE%TYPE, payAmt
Posted: Mon Jul 11, 2022 9:55 am
▼ I got an answer to this question ▼
CREATE OR REPLACE PROCEDURE DDCKPAY_SP (pledgeId INDD_PLEDGE.IDPLEDGE%TYPE, payAmt IN OUT DD_PLEDGE.PLEDGEAMT%TYPE,pledgeTable OUT DD_PLEDGE%ROWTYPE)ISBEGINSELECT *INTO pledgeTableFROM DD_PLEDGEWHERE IDPLEDGE = pledgeIDAND PAYMONTHS >0;IF SQL%NOTFOUND THENDBMS_OUTPUT.PUT_LINE('No Data was found');END IF;END;
DECLAREpayAmt DD_PLEDGE.PLEDGEAMT%TYPE := 20;pledgeTable DD_PLEDGE%ROWTYPE;actual_payamt NUMBER (8,2);BEGINDDCKPAY_SP (104,payAmt,pledgeTable); --change id to testactual_payamt:= (pledgeTable.pledgeamt/pledgeTable.paymonths);IF payAmt != actual_payamt THENRAISE_APPLICATION_ERROR(-20050, 'The given information does notmatch');ELSEDBMS_OUTPUT.PUT_LINE('Bingo!');END IF;END;
Can I just get screenshots to this question? it doesn'twork on my laptop
CREATE OR REPLACE PROCEDURE DDCKPAY_SP (pledgeId INDD_PLEDGE.IDPLEDGE%TYPE, payAmt IN OUT DD_PLEDGE.PLEDGEAMT%TYPE,pledgeTable OUT DD_PLEDGE%ROWTYPE)ISBEGINSELECT *INTO pledgeTableFROM DD_PLEDGEWHERE IDPLEDGE = pledgeIDAND PAYMONTHS >0;IF SQL%NOTFOUND THENDBMS_OUTPUT.PUT_LINE('No Data was found');END IF;END;
DECLAREpayAmt DD_PLEDGE.PLEDGEAMT%TYPE := 20;pledgeTable DD_PLEDGE%ROWTYPE;actual_payamt NUMBER (8,2);BEGINDDCKPAY_SP (104,payAmt,pledgeTable); --change id to testactual_payamt:= (pledgeTable.pledgeamt/pledgeTable.paymonths);IF payAmt != actual_payamt THENRAISE_APPLICATION_ERROR(-20050, 'The given information does notmatch');ELSEDBMS_OUTPUT.PUT_LINE('Bingo!');END IF;END;
Can I just get screenshots to this question? it doesn'twork on my laptop