pears.NetOwnerEmployeeDetails

CREATE PROCEDURE "pears"."NetOwnerEmployeeDetails"( IN "pWebUserID" CHAR(20),IN "pEmployeeID" CHAR(20) ) 
RESULT( "ObjID" CHAR(20),"Forenames" CHAR(50),"Surname" CHAR(50),"Salutation" CHAR(50),"Direct_Phone" CHAR(250),"Mobile" CHAR(250),"Email" CHAR(250),"Direct_Fax" CHAR(250),"Position" CHAR(100),"Department" CHAR(100),"Notes" CHAR(100) ) 
BEGIN
  DECLARE "divid" CHAR(20);
  SET "divid" = (SELECT FIRST "staff"."divisionid" FROM "iqxnetuser" KEY JOIN "staff" WHERE "iqxnetuser"."iqxnetuserid" = "pwebuserid");
  IF "divid" IS NULL THEN
    RETURN
  END IF;
  IF "isnull"("pEmployeeID",'') = '' THEN
    SELECT '','','','','','','','','','',''
  ELSE
    SELECT FIRST
      "Person"."personid" AS "ObjID",
      "Person"."forenames" AS "Forenames",
      "Person"."surname" AS "Surname",
      "Person"."salutation" AS "Salutation",
      "getphone"('CP','Direct Telephone',"pEmployeeID") AS "Direct_Phone",
      "getphone"('CP','Mobile',"pEmployeeID") AS "Mobile",
      "getphone"('CP','E-mail',"pEmployeeID") AS "Email",
      "getphone"('CP','Direct Fax',"pEmployeeID") AS "Direct_Fax",
      "employment"."position" AS "Position",
      "employment"."department" AS "Department",
      "employment"."note" AS "Notes"
      FROM "Person" KEY JOIN "employment" KEY JOIN "company"
      WHERE "Person"."personid" = "pEmployeeID" AND "company"."divisionid" = "divid"
  END IF
END
GO
 
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetOwnerEmployeeDetails" IS 
{CREATE PROCEDURE pears."NetOwnerEmployeeDetails"( IN "pWebUserID" CHAR(20),IN "pEmployeeID" CHAR(20) ) 
RESULT( "ObjID" CHAR(20),"Forenames" CHAR(50),"Surname" CHAR(50),"Salutation" CHAR(50),"Direct_Phone" CHAR(250),"Mobile" CHAR(250),"Email" CHAR(250),"Direct_Fax" CHAR(250),"Position" CHAR(100),"Department" CHAR(100),"Notes" CHAR(100) ) 
BEGIN
  DECLARE "divid" CHAR(20);
  SET "divid" = (SELECT FIRST "staff"."divisionid" FROM "iqxnetuser" KEY JOIN "staff" WHERE "iqxnetuser"."iqxnetuserid" = "pwebuserid");
  IF "divid" IS NULL THEN
    RETURN
  END IF;
  IF "isnull"("pEmployeeID",'') = '' THEN
    SELECT '','','','','','','','','','',''
  ELSE
    SELECT FIRST
      "Person"."personid" AS "ObjID",
      "Person"."forenames" AS "Forenames",
      "Person"."surname" AS "Surname",
      "Person"."salutation" AS "Salutation",
      "getphone"('CP','Direct Telephone',"pEmployeeID") AS "Direct_Phone",
      "getphone"('CP','Mobile',"pEmployeeID") AS "Mobile",
      "getphone"('CP','E-mail',"pEmployeeID") AS "Email",
      "getphone"('CP','Direct Fax',"pEmployeeID") AS "Direct_Fax",
      "employment"."position" AS "Position",
      "employment"."department" AS "Department",
      "employment"."note" AS "Notes"
      FROM "Person" KEY JOIN "employment" KEY JOIN "company"
      WHERE "Person"."personid" = "pEmployeeID" AND "company"."divisionid" = "divid"
  END IF
END
}