pears.NetCandidatePersonID

CREATE PROCEDURE "pears"."NetCandidatePersonID"( IN "pWebUserID" CHAR(20) ) 
RESULT( "PersonID" CHAR(20) ) 
// IQXWeb
BEGIN
  SELECT "NetCandidateValidPersonID"("pWebUserID",NULL) AS "PersonID" WHERE "PersonID" IS NOT NULL
END /* DOC
2016-12-02 PC test and doc
2018-10-22 MHS IW-456 multi-cand fix and tests
 
Inputs:
pWebUserID
 
Outputs:
PersonID
 
Tests:
invalid pWebUserID
valid pWebUserID
 
*/
/* TEST
call NetTestSetup('');
select * from NetCandidatePersonID(null);
expect EOF;
select * from NetCandidatePersonID('test.candidate');
expect PersonID=TEST;
 
*/
GO
 
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetCandidatePersonID" IS 
{CREATE PROCEDURE pears."NetCandidatePersonID"( IN pWebUserID CHAR(20) ) 
RESULT( PersonID CHAR(20) ) 
// IQXWeb
BEGIN
  SELECT NetCandidateValidPersonID(pWebUserID,NULL) AS PersonID WHERE PersonID IS NOT NULL;
END
 
/* DOC
2016-12-02 PC test and doc
2018-10-22 MHS IW-456 multi-cand fix and tests
 
Inputs:
    pWebUserID
 
Outputs:
    PersonID
 
Tests:
    invalid pWebUserID
    valid pWebUserID
 
*/
 
/* TEST
call NetTestSetup('');
select * from NetCandidatePersonID(null);
expect EOF;
select * from NetCandidatePersonID('test.candidate');
expect PersonID=TEST;
 
*/
}