pears.NetDivisionList [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.NetDivisionList ======
<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"."NetDivisionList"( in "pWebUserID" char(20) ) 
result( "DivisionID" char(20),"DivisionName" char(60) ) 
// IQXWeb
begin
  select top 10000
    "DivisionID",
    "isnull"("WebDescription","name") as "DivisionName"
    from "division"
    where "publishtoweb" = 1
    order by "DivisionName" asc
end /*DOC
2017-08-09 PC create a list of divisions which are attached to departments which are enabled for web
2017-10-31 PC modify name to refer to web description column
2018-02-20 PC key join changed to left outer join, refer to VHS
2018-05-03 VHS/MHS remove deparment dependency. Departments chosen after division
*/
go

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetDivisionList" IS 
{create PROCEDURE pears."NetDivisionList"(in pWebUserID char(20))
RESULT(DivisionID char(20),DivisionName char(60))
// IQXWeb
BEGIN
	select top 10000 
        DivisionID,
        isnull(WebDescription,name) as DivisionName
    from 
        division
    where 
        publishtoweb=1
    order by 
        DivisionName
END

/*DOC
2017-08-09 PC create a list of divisions which are attached to departments which are enabled for web
2017-10-31 PC modify name to refer to web description column
2018-02-20 PC key join changed to left outer join, refer to VHS
2018-05-03 VHS/MHS remove deparment dependency. Departments chosen after division
*/
}
</code>