pears.NetClientCandidateStatusUpdate

CREATE PROCEDURE "pears"."NetClientCandidateStatusUpdate"( IN "pWebUserID" CHAR(20) ) 
RESULT( "value" CHAR(20),"descrip" CHAR(50),"IsFinal" CHAR(1) ) 
// IQXNet
BEGIN
  SELECT "status","name","final" FROM "status" WHERE "type" = 'R' AND "allowsetonweb" = 1 ORDER BY "gridsortorder" ASC
END /* DOC
2016-12-08 PC supply a reason to update the progress of a candidate in a placement
 
Inputs:
pWebUserID
 
Outputs:
value
descrip
IsFinal
 
Tests:
valid pWebUserID
*/
/* TEST
call NetTestSetup('');
insert into status (type,status,allowsetonweb,name,final,help,publishtoweb) on existing update values ('R','~',1,'test',1,'test',1);
select top 1 * from NetClientCandidateStatusUpdate('test.client') where value='~';
expect value=~,descrip=test,IsFinal=1;
 
*/
GO
 
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetClientCandidateStatusUpdate" IS 
{CREATE PROCEDURE pears."NetClientCandidateStatusUpdate"(IN pWebUserID CHAR(20))
RESULT(VALUE CHAR(20),descrip CHAR(50),IsFinal CHAR(1))
// IQXNet
BEGIN
	SELECT STATUS,name,final FROM STATUS WHERE TYPE='R' AND allowsetonweb=1 ORDER BY gridsortorder
END
 
/* DOC
2016-12-08 PC supply a reason to update the progress of a candidate in a placement
 
Inputs:
    pWebUserID
 
Outputs:
    value
    descrip
    IsFinal
 
Tests:
    valid pWebUserID
*/
 
/* TEST
call NetTestSetup('');
insert into status (type,status,allowsetonweb,name,final,help,publishtoweb) on existing update values ('R','~',1,'test',1,'test',1);
select top 1 * from NetClientCandidateStatusUpdate('test.client') where value='~';
expect value=~,descrip=test,IsFinal=1;
 
*/
}