Subversion Repositories DevTools

Rev

Rev 5514 | Rev 5962 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5514 Rev 5956
Line 40... Line 40...
40 
Sub GetFormDetails ( nProd_id, nOs_id, nBaseEnvId, nBom_id, ByRef outobjDetails )
 40 
Sub GetFormDetails ( nProd_id, nOs_id, nBaseEnvId, nBom_id, ByRef outobjDetails )
41 
	Dim rsQry, query
 41 
	Dim rsQry, query
42
42
43 
	OraDatabase.Parameters.Add "BOM_ID", nBom_id,	ORAPARM_INPUT, ORATYPE_NUMBER
43 
	OraDatabase.Parameters.Add "BOM_ID", nBom_id,	ORAPARM_INPUT, ORATYPE_NUMBER
44
44
45
- 
 
46
- 
 
47
- 
 
48
- 
 
49 
	'/* Get Project Details */
 45 
	'/* Get Project Details */
50 
	query = _
 46 
	query = _
51 
	" SELECT proj.RM_PROJECTS_FK, bo.rtag_id_fk"&_
 47 
	" SELECT proj.RM_PROJECTS_FK, bo.rtag_id_fk"&_
52 
	"  FROM BOMS bo,"&_
 48 
	"  FROM BOMS bo,"&_
53 
	"  	   BRANCHES br,"&_
 49 
	"  	   BRANCHES br,"&_
Line 65... Line 61...
65 
	Else
 61 
	Else
66 
		Err.Raise 8, "Sub GetFormDetails", "Empty record set returned. nBom_id="& nBom_id
62 
		Err.Raise 8, "Sub GetFormDetails", "Empty record set returned. nBom_id="& nBom_id
67
63
68 
	End If
 64 
	End If
69
65
70 
	OraDatabase.Parameters.Remove "PROD_ID"
 - 
 
71 
	OraDatabase.Parameters.Remove "OS_ID"
 - 
 
72 
	OraDatabase.Parameters.Remove "BASE_ENV_ID"
 - 
 
73 
	OraDatabase.Parameters.Remove "BOM_ID"
 66 
	OraDatabase.Parameters.Remove "BOM_ID"
74
67
75 
	rsQry.Close
 68 
	rsQry.Close
76 
	Set rsQry = Nothing
 69 
	Set rsQry = Nothing
77 
End Sub
 70 
End Sub
Line 242... Line 235...
242 
			  OraDatabase.Parameters.Add "PROJ_ID",   objFormCollector.Item("rm_projects_fk"),	ORAPARM_INPUT, ORATYPE_NUMBER
235 
			  OraDatabase.Parameters.Add "PROJ_ID",   objFormCollector.Item("rm_projects_fk"),	ORAPARM_INPUT, ORATYPE_NUMBER
243 
			  OraDatabase.Parameters.Add "BRANCH_ID",   objFormCollector.Item("rtag_id_fk"),	ORAPARM_INPUT, ORATYPE_NUMBER
236 
			  OraDatabase.Parameters.Add "BRANCH_ID",   objFormCollector.Item("rtag_id_fk"),	ORAPARM_INPUT, ORATYPE_NUMBER
244 
		      OraDatabase.Parameters.Add "FILTER_ON",   0,	ORAPARM_INPUT, ORATYPE_NUMBER
237 
		      OraDatabase.Parameters.Add "FILTER_ON",   0,	ORAPARM_INPUT, ORATYPE_NUMBER
245
238
246 
			  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductVersionsList.sql"), ORADYN_DEFAULT )
 239 
			  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductVersionsList.sql"), ORADYN_DEFAULT )
- 
 
 240 
 
247 
			  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 241 
			  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
248 
			  %>
 242 
			  %>
249 
				<option value="<%=rsQry("pv_id")%>" <%=rsQry("selected")%>><%=rsQry("pkg_version")%></option>
 243 
				<option value="<%=rsQry("pv_id")%>" <%=rsQry("selected")%>><%=rsQry("pkg_version")%></option>
250 
			  <%
 244 
			  <%
251 
			  	rsQry.MoveNext
 245 
			  	rsQry.MoveNext
Line 407... Line 401...
407 
             </table>
 401 
             </table>
408 
			</td>
 402 
			</td>
409 
          </tr>
 403 
          </tr>
410 
         </table>
 404 
         </table>
411 
		<p>
 405 
		<p>
412 
		    <%
 406 
	    <%
413 
		OraDatabase.Parameters.Remove "PROD_ID"
 407 
        OraDatabase.Parameters.Remove "PKG_ID"
- 
 
 408 
        OraDatabase.Parameters.Remove "V_EXT"
414 
		OraDatabase.Parameters.Remove "OLD_PROD_ID"
 409 
        OraDatabase.Parameters.Remove "OLD_PROD_ID"
415 
		OraDatabase.Parameters.Remove "PKG_ID"
 410 
        OraDatabase.Parameters.Remove "PROJ_ID"
- 
 
 411 
        OraDatabase.Parameters.Remove "BRANCH_ID"
416 
		OraDatabase.Parameters.Remove "V_EXT"
 412 
        OraDatabase.Parameters.Remove "FILTER_ON"
417 
		%>
 413 
		%>
418 
</p>
 414 
</p>
419 
<!-- Realease Authorisation -------------------------------------------------------------------------------------------- -->
 415 
<!-- Realease Authorisation -------------------------------------------------------------------------------------------- -->
420 
		<SPAN class="body_colb">Release Authorisation </SPAN>
 416 
		<SPAN class="body_colb">Release Authorisation </SPAN>
421 
<%
 417 
<%