pears.NetProvTimesheetExpenseLineDelete [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.NetProvTimesheetExpenseLineDelete ======
<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"."NetProvTimesheetExpenseLineDelete"( in "pWebUserID" char(20),in "pTempProvTimesheetLineID" char(20) ) 
result( "pResult" char(255) ) 
begin
  if not "pTempProvTimesheetLineID" = any(select "TempProvTimeSheetlineID" from "tempprovtimesheetline" key join "tempprovtimesheet" key join "person" key join "iqxnetuserlink" where "iqxnetuserid" = "pWebUserID") then
    select '99:~Not able to delete line'
  end if;
  delete from "tempprovtimesheetline" where "TempProvTimesheetLineID" = "pTempProvTimesheetLineID";
  select '0:~Success'
end /* DOC
2016-11-11 PC delete an expense line from tempprovtimesheetline
IW-95
2018-07-25 PC include improved error handler

Inputs:
pWebUserID
pTempProvTimesheetID

Outputs:
pResult

Tests:
invalid pWebUserID
valid pWebUserID but invalid pTempProvTimesheetID
valid pWebUserID, pTempProvTimesheetID

*/
/* TEST

*/
go

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetProvTimesheetExpenseLineDelete" IS 
{create PROCEDURE pears."NetProvTimesheetExpenseLineDelete"( in pWebUserID char(20),in pTempProvTimesheetLineID char(20))
RESULT(pResult char(255)) 
BEGIN
	if pTempProvTimesheetLineID not in (select TempProvTimeSheetlineID from tempprovtimesheetline key join tempprovtimesheet key join person key join iqxnetuserlink where iqxnetuserid=pWebUserID) then
        select '99:~Not able to delete line';
    end if;
    delete from tempprovtimesheetline where TempProvTimesheetLineID=pTempProvTimesheetLineID;
    select '0:~Success';
END

/* DOC
2016-11-11 PC delete an expense line from tempprovtimesheetline
IW-95
2018-07-25 PC include improved error handler

Inputs:
    pWebUserID
    pTempProvTimesheetID

Outputs:
    pResult

Tests:
    invalid pWebUserID
    valid pWebUserID but invalid pTempProvTimesheetID
    valid pWebUserID, pTempProvTimesheetID

*/

/* TEST

*/
}
</code>