====== pears.IQXNetSetPassword ======
<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"."IQXNetSetPassword"( 
  /* Application Maintained Function / Procedure - DO NOT EDIT*/
  in "pIQXNetUserID" char(20),in "pPWD" char(50),in "pKey" char(50) ) 
begin
  update "IQXNetUser" set "password" = "encrypt"("pPWD","pKey"),"PasswordSet" = (if "length"("trim"("isnull"("pPWD",''))) = 0 then 0 else 1 endif) where "IQXNetUserID" = "pIQXNetUserID"
end
go

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."IQXNetSetPassword" IS 
{create procedure IQXNetSetPassword 

/* Application Maintained Function / Procedure - DO NOT EDIT*/

(in pIQXNetUserID char(20),in pPWD char(50),in pKey char(50))
begin
  update IQXNetUser set password = encrypt(pPWD,pKey),PasswordSet=(if length(trim(isnull(pPWD,'')))=0 then 0 else 1 endif) where IQXNetUserID = pIQXNetUserID
end
}
</code>