====== pears.NetOwnerCandidateBankEdit ======
Generated schema reference. Regenerate this page from the SQL unload; keep hand-maintained business notes in the narrative namespace.
===== Original SQL =====
create procedure "pears"."NetOwnerCandidateBankEdit"( in "pWebUserID" char(20),in "pPersonID" char(20) )
result( "PersonID" char(20),"ni" char(10),"BankName" char(30),"BankSortCode" char(8),"BankAcName" char(50),"BankAcNo" char(8),"UniqueTaxReference" char(20) )
begin
if((select "count"() from "person" where "person"."personid" = "pPersonID") = 0) then
select '','','','','','',''
else
select "person"."personid",
"person"."ni",
"Pay_Employee"."BankName",
"Pay_Employee"."BankSortCode",
"Pay_Employee"."BankAcName",
"string"("replicate"('*',"length"("bankacno")-2),"right"("bankacno",2)) as "BankAcNo",
"Pay_Employee"."UniqueTaxReference"
from "person"
key left outer join "Pay_Employee"
,"person"
where "person"."personid" = "pPersonID"
end if
end /* DOC
2018-05-07 PC IW-503 hide first characters of accouint code showing only last two
*/
go
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetOwnerCandidateBankEdit" IS
{create PROCEDURE pears."NetOwnerCandidateBankEdit"( in "pWebUserID" char(20),in "pPersonID" char(20) )
result( "PersonID" char(20),"ni" char(10),"BankName" char(30),"BankSortCode" char(8),"BankAcName" char(50),"BankAcNo" char(8),"UniqueTaxReference" char(20) )
begin
if((select "count"() from "person" where "person"."personid" = "pPersonID") = 0) then
select '','','','','','',''
else
select
"person"."personid",
"person"."ni",
"Pay_Employee"."BankName",
"Pay_Employee"."BankSortCode",
"Pay_Employee"."BankAcName",
string(replicate('*',length(bankacno)-2),right(bankacno,2)) as "BankAcNo"
,"Pay_Employee"."UniqueTaxReference"
from
"person"
key left outer join "Pay_Employee",
"person"
where
"person"."personid" = "pPersonID"
end if
end
/* DOC
2018-05-07 PC IW-503 hide first characters of accouint code showing only last two
*/
}