CREATE OR REPLACE TRIGGER AT_PUNCHING_ID_SEQ_TRG
BEFORE
INSERT
ON BF503_BRSHDR_TRN
REFERENCING NEW AS NEW OLD AS OLD
FOR EACH ROW
Begin
SELECT seq_at_punc.NEXTVAL INTO :NEW.ID FROM DUAL;
End;
/
CREATE OR REPLACE TRIGGER xx_purinv.pi_po_hdr_email_trg
AFTER
UPDATE
ON xx_purinv.pi_po_hdr
REFERENCING NEW AS NEW OLD AS OLD
FOR EACH ROW
Declare
p_errno varchar2(1000);
p_errmsg varchar2(1000);
Begin
If Nvl(:old.trans_approved, 'N') = 'N' And Nvl(:new.trans_approved, 'N') = 'Y' Then
Begin
xx_all.automails_pos_pkg.PUR_PODOC_MAILSENDMAIL_REP(:old.comp_code, 'narendrae@kk.com',:old.unit_code, 'PO',:old.finyr_code,null,null,'N','Test',:old.po_cntrl_no,:old.po_cntrl_no,'SATHGURU' , p_errno, p_errmsg);
Exception
When Others Then
raise_application_error('-20101','Error while triggereing Email '||p_errno||':p_errno p_errmsg :'||p_errmsg);
End;
End If;
End;
