pears.NetOwnerContactSelect [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.NetOwnerContactSelect ======
<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"."NetOwnerContactSelect"( in "pWebUserID" char(20) ) 
result( "value" char(5),"name" char(25) ) 
begin
  if(select "count"() from "iqxnetuser" where "iqxnetuserid" = "pWebUserID") = 0 then
    select '',''
  else
    select 'L','Contact' as "name" union select '%','All' as "name" order by "name" asc
  --select companystatusid,name from companystatus union select '%','All' as name order by name
  end if
end /* DOC
2016-09-22 PC IW-4 provide filter dropdown for Contact status select box
2018-04-01 PC IW-465  Search Contacts - restrict to candidates of state L

tests:
null pWebUserID
invalid pWebUserID
valid pWebUserID
add test status with sort order 0
*/
/* TEST
call NetTestSetup('');
select string('!',value,'!'),string('!',name,'!') from NetOwnerContactSelect(null);
expect !!,!!;
select string('!',value,'!'),string('!',name,'!') from NetOwnerContactSelect('z99');
expect !!,!!;
select value,name from NetOwnerContactSelect('test.owner');
expect value=%,name=All;
expect value=L,name=Contact;

*/
go

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetOwnerContactSelect" IS 
{create PROCEDURE pears."NetOwnerContactSelect"(in pWebUserID char(20))
RESULT(value char(5),name char(25))
BEGIN
    if (select count(*) from iqxnetuser where iqxnetuserid=pWebUserID) = 0 then
        select '','';
    else
        select 'L','Contact' as name union select '%','All' as name order by name
        --select companystatusid,name from companystatus union select '%','All' as name order by name
    end if;
END

/* DOC
2016-09-22 PC IW-4 provide filter dropdown for Contact status select box
2018-04-01 PC IW-465  Search Contacts - restrict to candidates of state L

tests:
    null pWebUserID
    invalid pWebUserID
    valid pWebUserID
    add test status with sort order 0
*/

/* TEST
call NetTestSetup('');
select string('!',value,'!'),string('!',name,'!') from NetOwnerContactSelect(null);
expect !!,!!;
select string('!',value,'!'),string('!',name,'!') from NetOwnerContactSelect('z99');
expect !!,!!;
select value,name from NetOwnerContactSelect('test.owner');
expect value=%,name=All;
expect value=L,name=Contact;

*/
}
</code>