   (
nCOMPANY      in number,
nRN           in number
)
as
begin
/*     */
delete from CLNPSPFMWH
where PRN = nRN
and COMPANY = nCOMPANY;
/*if ( SQL%NOTFOUND ) then
P_EXCEPTION( 0,'  ( ) (RN: '||nvl(to_char(nRN),'<null>')||')  .' );
end if;*/
end;
