pears.NetGetWebEmail

CREATE PROCEDURE "pears"."NetGetWebEmail"( IN "pWebUserID" CHAR(20) ) 
RESULT( "email" CHAR(100) ) 
BEGIN
  SELECT "EmailAddress" AS "email"
    FROM "iqxnetuser"
    WHERE "IQXNetUserID" = "pWebUserID"
END /* DOC
2018-05-07 GJ Created
*/
GO
 
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetGetWebEmail" IS 
{CREATE PROCEDURE pears."NetGetWebEmail"( IN "pWebUserID" CHAR(20) )
RESULT( "email" CHAR(100) )
BEGIN 
    SELECT 
        EmailAddress AS email 
    FROM 
        iqxnetuser 
    WHERE IQXNetUserID = pWebUserID
END
/* DOC
2018-05-07 GJ Created
*/
}