0

基本的に一連のデータベースにクエリを実行し、データを整理するイントラネット アプリがあります。これは ASP (私は知っています) で記述されており、Windows Server 2008 に移行すると、データが入力されなくなったフィールドが 1 つあります。そのページの他のすべてが正常に読み込まれるため、データベース接続が良好であることはわかっています。これは、その特定のクエリの構文に問題があり、TO_DATE を使用しているため、日付形式に関してサーバー 2003 と 2008 に違いがあると思われます。

'SQL TO PULL PROCESS GROUP
pgsql = "SELECT DISTINCT subsystem_process_group.subsystem_id, subsystem_process_group.process_group_id, "
pgsql = pgsql & "process_group.process_group_name, oncall_group_day.employee_nbr "
pgsql = pgsql & " FROM eco_admin.process_group, eco_admin.subsystem_process_group, eco_admin.oncall_group_day "
pgsql = pgsql & "WHERE ((process_group.process_group_id = subsystem_process_group.process_group_id) "
pgsql = pgsql & "AND (process_group.process_group_id = oncall_group_day.process_group_id(+)) "
pgsql = pgsql & "AND (ONCALL_GROUP_DAY.CALENDAR_DATE(+) = TO_DATE(SYSDATE)) "
pgsql = pgsql & "AND (oncall_group_day.oncall_member_role_code(+) = 'P" & hour(now) & "') "
pgsql = pgsql & "AND (subsystem_process_group.subsystem_id = " & request("id") & ")) " 

function get_name(emp_nbr)
    sql3 = "select LTRIM(RTRIM(INITCAP(COMMON_NAME))) COMMON_NAME, LTRIM(RTRIM(INITCAP(LAST_NAME))) last_name from (select EMPLOYEE_NBR,COMMON_NAME, LAST_NAME  from hrit_admin.employee union all  select   CONTRACT_RESOURCE_ID, COMMON_NAME, LAST_NAME  from   hrit_admin.contract_resource) a where employee_nbr = a.employee_nbr and employee_nbr = " & emp_nbr
    rs3.open sql3,conn
    get_name = rs3("COMMON_NAME") & " " & rs3("LAST_NAME")
    rs3.close
end function
4

0 に答える 0