%@ LANGUAGE="VBScript" %> <% Set Connection = Server.CreateObject("ADODB.Connection") Connection.Mode = adModeRead Connection.Open phdb_rd SQLStmt = "select to_char(CREATION_DATE,'MM/DD/YYYY') CR_DATE, to_char(VALIDITY_DATE,'MM/DD/YYYY') VAL_DATE, " SQLStmt = SQLStmt & " FULL_VERSION, NAME, MAIN_VERSION, " SQLStmt = SQLStmt & " SURVEY_TYPE, ALIGN_TYPE, ALIGN_VERSION, VALID, DESCRIPTION " SQLStmt = SQLStmt & " from phoffline.geometries" SQLStmt = SQLStmt & " order by FULL_VERSION desc, VALID, CREATION_DATE desc" Set RS = Connection.Execute(SQLStmt) %>
PMC version | Name | Version | Survey type | Align type | Align version | Validity date | Description |
<%=ROUND(RS("FULL_VERSION"),3)%> | <%=RS("NAME")%> | <%=RS("MAIN_VERSION")%> | <%=RS("SURVEY_TYPE")%> | <%=RS("ALIGN_TYPE")%> | <%=RS("ALIGN_VERSION")%> | <%=RS("VAL_DATE")%> | <%=RS("DESCRIPTION")%> |