NOT TESTED!!
<!--show_randomize_IWR.cfm --->
<!-- In this file some insert and select queries are also there --->
<body>
[COLOR=red]
<cfif not isdefined("URL.Status")>
<cfinclude template="show_GetSubject_IWR.cfm">
</cfif>
<cfif isdefined("URL.Status") and URL.Status EQ "1">
<cfinclude template="show_DOB.cfm">
<cfelse>
<cflocation url="error.cfm">
</cfif>
[/color]
</body>
<!---show_Get_subject_IWR.cfm--->
<head>
<script type="text/javascript">
function go()
{
return document.getElementById("subject_id").value;
}
</script>
</head>
<body>
<cfform name="get_subject_IWR" action="Get_Subject_Insert_IWR.cfm" method="get" target="show">
<cfoutput query="subject_select">
<option value="#subject_select.subject_id#">#subject_select.subject_id# </cfoutput>
</select
<cfoutput>
<cfoutput>
<input type=submit SIZE="20" READONLY VALUE="Confirm" align="center" onclick="return (confirm('#MsgArray_MULTI_USE[12]#'+go()));">
</cfoutput>
</cfoutput>
</cfform>
</body>
<!---Get_Subject_Insert_IWR.cfm--->
<cflock scope="application" type="readonly" throwontimeout="no" timeout="60">
<cfset dsname = Application.dsname>
<cfset dslogin = Application.dslogin>
<cfset dspassword = Application.dspassword>
<cfset schema = Application.schema>
</cflock>
<cfquery name="Get_Subject_insert" datasource="#dsname#" username="#dslogin#" password="#dspassword#">
insert into #schema#.transaction_log(SESSION_ID,SCHEMA,TRANSACTION_NAME,USER_ID,SITE_ID,NPARM1,CPARM1)
values(#client.session_id#,'#SCHEMA#','GET_SUBJECT',#client.user_id#,#client.site_id#,#url.subject_id#,'#url.function#')
</cfquery>
<cfquery name="Get_Subject_select" datasource="#dsname#" username="#dslogin#" password="#dspassword#">
select cparm1,result from current_transaction
where session_id=#client.session_id# and transaction_name='GET_SUBJECT'
</cfquery>
[COLOR=red]<cflocation url="show_randomize_IWR.cfm?Status=1">[/color]