pears.NetDeleteWebReference [iqx]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

====== pears.NetDeleteWebReference ======
<WRAP center round info>
Generated schema reference. Regenerate this page from the SQL unload; keep hand-maintained business notes in the narrative namespace.
</WRAP>

===== Original SQL =====
<code sql>
create procedure "pears"."NetDeleteWebReference"( 
  in "pWebUserID" char(20),
  in "pReferenceRequestID" char(20),
  in "pPersonID" char(20) ) 
result( "pResult" char(250) ) 
begin
  delete from "ReferenceRequest"
    where "ReferenceRequestID" = "pReferenceRequestID" and "PersonID" = "pPersonID";
  select '0:~Success'
end /* DOC
2020-07-06 GJ Created
*/
go

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetDeleteWebReference" IS 
{create PROCEDURE pears."NetDeleteWebReference"( 
    IN pWebUserID char(20),
    IN pReferenceRequestID char(20),
	IN pPersonID CHAR(20)
) 
result( pResult char(250) ) 
BEGIN

    DELETE FROM ReferenceRequest
    WHERE ReferenceRequestID = pReferenceRequestID AND PersonID = pPersonID;
  
    SELECT '0:~Success';
END

/* DOC
2020-07-06 GJ Created
*/
}
</code>