Current List of Build Platforms
| PLATFORM NAME |
ALLOW USE |
DESCRIPTION |
MACHTYPES |
Edit |
<%
Dim rsQry
Dim bp_id
Dim bp_name
Dim description, active, activeChecked
DIM Query
Query = "SELECT" &_
" bp.bp_id," &_
" bp_name," &_
" bp_active," &_
" bp_description," &_
" LISTAGG(gbe_value, ', ') within group (order by gbe_value) as machTypes" &_
" FROM" &_
" build_platforms bp," &_
" gbe_machtype gbe," &_
" build_platforms_config bpc" &_
" WHERE" &_
" gbe.gbe_id(+) = bpc.gbe_id" &_
" AND bpc.bp_id(+) = bp.bp_id" &_
" GROUP BY bp.bp_id, bp_name, bp_active, bp_description" &_
" ORDER BY upper(bp.bp_name)"
Set rsQry = OraDatabase.DbCreateDynaset( Query, ORADYN_DEFAULT )
While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
bp_id = rsQry("bp_id")
bp_name = rsQry("bp_name")
active = rsQry("bp_active")
If active = "Y" Then activeChecked = "checked" Else activeChecked = ""
description = rsQry("bp_description")
%>
|
<%=bp_name%>
|
> |
<%=description%> |
<%=rsQry("machTypes")%> |
<%
BuildJsButton bCanEdit, "btnEdit", "Edit Build Platform", "src='icons/i_edit.gif'"
BuildJsButton bCanEdit, "btnDel ", "Delete Build Platform", "src='icons/i_remove.gif'"
%>
|
<%
rsQry.MoveNext()
Wend
rsQry.Close()
Set rsQry = nothing
%>
|
<% BuildEditButtonRaw bCanEdit, "Add Build Platform", "Insert New Build Platform",TRUE, _
"src='icons/btn_add.gif' width='13' height='13' align='absmiddle' border='0' hspace='3'", _
"MM_openVixIFrame('wAddBuildPlatform.asp','Add Build Platform')"%>
|
<%=objPMod.ComposeHiddenTags()%>
<%Call objFormComponent.FormEnd()%>
|