====== pears.NetClientRequirementStatusFilter ====== Generated schema reference. Regenerate this page from the SQL unload; keep hand-maintained business notes in the narrative namespace. ===== Original SQL ===== create procedure "pears"."NetClientRequirementStatusFilter"( in "pWebUserID" char(20) ) result( "value" char(20),"descrip" char(50) ) // IQXNet begin select "status","name" from "status" where "type" = 'v' and "allowsetonweb" = 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 update values ('V','~','test','test',1); select * from NetClientRequirementStatusFilter(null); expect value=~,descrip=test; select * from NetClientRequirementStatusFilter('test.client'); expect value=~,descrip=test; */ go COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetClientRequirementStatusFilter" IS {create PROCEDURE pears."NetClientRequirementStatusFilter"(in pWebUserID char(20)) RESULT(value char(20),descrip char(50)) // IQXNet BEGIN select status,name from status where type='v' and allowsetonweb=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 update values ('V','~','test','test',1); select * from NetClientRequirementStatusFilter(null); expect value=~,descrip=test; select * from NetClientRequirementStatusFilter('test.client'); expect value=~,descrip=test; */ }