一天时间排序从4:00开发

这么烦的需求,

SELECT  *  FROM [www_tvmenu_com].[web427247].[GL_PROGRAM]
order by  
case   when (datepart(Hour,GP_DATE) - 4 )   < 0  then datepart(Hour,GP_DATE)  +   24   else  datepart(Hour,GP_DATE) end,datepart(minute,GP_DATE)

写出来效率太低，不知道有什么好的办法