====== pears.NetOwnerRequirementStatusFilter ======
<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"."NetOwnerRequirementStatusFilter"( in "pWebUserID" char(20) ) 
result( "value" char(20),"descrip" char(50) ) 
// IQXNet
begin
  select "status","name" from "status" where "type" = 'v' and "publishtoweb" = 1 order by "gridsortorder" asc
end /* DOC
2016-12-08 PC supply a reason for filtering the Requirement List

Inputs:
pWebUserID

Outputs:
value
descrip

Tests:
invalid pWebUserID
valid pWebUserID
*/
/* TEST
call NetTestSetup('');
insert into status (type,status,name,help,allowsetonweb) on existing skip values ('V','~','test','test',1);
select * from NetOwnerRequirementStatusFilter(null) order by Value;
expect value=C,descrip=Current;
select * from NetOwnerRequirementStatusFilter('test.client');
expect value=C,descrip=Current;

*/
go

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetOwnerRequirementStatusFilter" IS 
{create PROCEDURE pears."NetOwnerRequirementStatusFilter"(in pWebUserID char(20))
RESULT(value char(20),descrip char(50))
// IQXNet
BEGIN
	select status,name from status where type='v' and publishtoweb=1 order by gridsortorder;
END

/* DOC
2016-12-08 PC supply a reason for filtering the Requirement List

Inputs:
    pWebUserID

Outputs:
    value
    descrip
    
Tests:
    invalid pWebUserID
    valid pWebUserID
*/

/* TEST
call NetTestSetup('');
insert into status (type,status,name,help,allowsetonweb) on existing skip values ('V','~','test','test',1);
select * from NetOwnerRequirementStatusFilter(null) order by Value;
expect value=C,descrip=Current;
select * from NetOwnerRequirementStatusFilter('test.client');
expect value=C,descrip=Current;

*/
}
</code>