pears.NetOwnerDashboardDiaryNext

CREATE PROCEDURE "pears"."NetOwnerDashboardDiaryNext"( IN "pWebUserID" CHAR(20) ) 
RESULT( "nextevent" CHAR(100) ) 
BEGIN
  SELECT top 1
    "string"("d"."description",' @ ',"dateformat"("d"."diaryfrom",'hh:nnaa')) AS "nextevent"
    FROM "diary" AS "D"
      KEY JOIN "staff" AS "S"
      LEFT OUTER JOIN "iqxnetuser" AS "U"
    WHERE "U"."iqxnetuserid" = "pWebUserID"
    AND "dateformat"("d"."diaryfrom",'yyyy-mm-dd hh:nn:ss') >= "dateformat"("NOW"(),'yyyy-mm-dd hh:nn:ss')
    AND "dateformat"("d"."diaryfrom",'yyyy-mm-dd') = "dateformat"("NOW"(),'yyyy-mm-dd')
    ORDER BY "d"."diaryfrom" ASC
END /* DOC
2017-03-23 | gets the next diary event
*/
GO
 
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."NetOwnerDashboardDiaryNext" IS 
{CREATE PROCEDURE pears."NetOwnerDashboardDiaryNext"(IN pWebUserID CHAR(20))
RESULT(nextevent CHAR(100))
BEGIN
    SELECT
        TOP 1 
        string(d.description, ' @ ', dateformat(d.diaryfrom, 'hh:nnaa')) AS nextevent
    FROM
        diary D
        KEY JOIN staff S
        LEFT JOIN iqxnetuser U
    WHERE
        U.iqxnetuserid=pWebUserID
    AND
        dateformat(d.diaryfrom, 'yyyy-mm-dd hh:nn:ss') >= dateformat(NOW(), 'yyyy-mm-dd hh:nn:ss')
    AND
        dateformat(d.diaryfrom, 'yyyy-mm-dd') = dateformat(NOW(), 'yyyy-mm-dd')
    ORDER BY 
        d.diaryfrom ASC
END
 
/* DOC
    2017-03-23 | gets the next diary event
*/
}