pears.NetGetWebReferences [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.NetGetWebReferences ======
<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"."NetGetWebReferences"( 
  in "pWebUserID" char(20),
  in "pPersonID" char(20) ) 
result( 
  "ReferenceRequestID" char(20),
  "RefereeAddressName" char(60),
  "RefereePosition" char(40),
  "CompanyName" char(60),
  "Email" char(250) ) 
begin
  select "ReferenceRequestID",
    "RefereeAddressName",
    "RefereePosition",
    "CompanyName",
    "Email"
    from "ReferenceRequest"
    where "PersonID" = "pPersonID"
    and "WhenSent" is null
    order by "WhenCreated" asc
end /* DOC
2020-07-06 GJ Created
*/
go

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetGetWebReferences" IS 
{create PROCEDURE pears."NetGetWebReferences"( 
    IN pWebUserID char(20),
	IN pPersonID CHAR(20)
) 
result( 
    ReferenceRequestID char(20),
    RefereeAddressName char(60),
    RefereePosition char(40),
    CompanyName char(60),
    Email char(250)
) 
BEGIN
    SELECT
        ReferenceRequestID,
        RefereeAddressName,
        RefereePosition,
        CompanyName,
        Email
    FROM
        ReferenceRequest
    WHERE
        PersonID = pPersonID
        AND WhenSent is null
    ORDER BY
        WhenCreated
END

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