Problem with submitting form
I have this plain HTML region that has a select box, something like :
<select name="requestType" id="sdfsdf">
<option value="01AX">Please select an option</option>
<option id="1D" value="D">Upgrade / Enhancement</option>
<option id="1E" value="E">BPR</option>
<option id="1F" value="F">Ad-Hoc Piece of Work</option>
</select>.
when I submit the form, I get a 'File Not found' error. But when I make it a 'multiple select', I'm able to submit the form.
<select multiple name="requestType" id="sdfsdf">
<option value="01AX">Please select an option</option>
<option id="1D" value="D">Upgrade / Enhancement</option>
<option id="1E" value="E">BPR</option>
<option id="1F" value="F">Ad-Hoc Piece of Work</option>
</select>.
any suggestions?
Thanks for the response Vikas. Unfortunately due to the nature of our form, we need to use Javascript to display options - it is not easy for us to use HTML DB native components in this instance.
Do you know if there is a workaround, or hidden tags that we can provide for the app server so that this will work?
Thanks,
Alex
Similar Messages
-
Further problem with submitting forms
I have a fillable pdf form which is submitted to an email address. This works OK in Acrobat with the email program being opened and an email with attachment created.
However, in Reader it gives an error message 'cannot launch program' and no email is created/sent. If I have the email program already opened, this error message doesn't appear but no email is created.
Any suggestions for a fix?
Acrobat 8 Pro 8.3.1
Reader X 10.1.3
Win 7 Ult 32
Thanks.- this is the problem in your interactive form.. Look at the fields and label in yout form which it has TypeLabel. and try to change it to valid name or something
-gopal -
Problems with Submitting a Adobe Livecycle Designer 8.0 created Form after Update to Adobe Prof. 8.1
Hi folks,
can someone tell me, which problem is it? Forms created in Livecycle Designer 8.0 with Adobe Prof. 8.0 don't have problem with submitting, but with Adobe Prof. 8.1.
Thanks for help or information in adv!Hello Mr Aandi Inston,
thanks for your quick answer! My problem is the following: The functionality email submitting in Livecycle 8.0 created form under Adobe Prof. 8.1 is malfunction when you open the form in Adobe Reader 8.x. There are non error messages to able to locate the problem. When you click the submit button, nothing is happen. Forms created before update adobe prof. 8.0 to 8.1 didn't have problem like this.
Normally, after clicking submit button ms outlook popup with suitable subject, attachment and so on. Executing the form in Adobe Prof. you wont have problem to submit form per email. Now I suppose that this problem is caused by updating???
Why do I claim it? After failed testing the modified form based on dynamic interactive template form "Purchase Order.pdf" from Designer 8.0 under different windows os and ms office versions I tried to test the above-named template, the same problem you will get: email submitting is malfunction!
I hope, my description will be detailed enough to you and I'm glad to hearing from you soon! -
Session problem with a form that calls psp web page.
Hi,
My unique form is based on table A.
Within the form I call a stored procedure, which insert data from A into tables B,C,D
And then within the same form I call a psp procedure using web.show_document('http://server:8080/plsql/psp_procedure?pvId=1001);
The plsql web page displays data from tables B,C,D for each single pvId.
The problem is:
If any commit is issued the psp web page contains no data from B,C,D.
I suppose I'm working with two different sessions, can I work within the same one?
ThanksHi,
I'd say the main problem is that you have both rows with the same name 'Rangée1'. This is not a good idea, especially as the first row is the repeatable row.
When objects have the same name, you can see the instances in the hierarchy, eg 'Rangée1[0]' and 'Rangée1[1]'. The instances use a zreo-based numbering system.
By the way you can also see it in the Object > Binding tab:
So that is when you have multiple objects with the same name.
The problem with your form is that when objects are repeated (add new instance button), then these new objects also have instances, eg 'Rangée1[0]', 'Rangée1[1]', 'Rangée1[2]', etc.
So the Acrobat gets confused ;-)
I have renamed the second row 'Rangée2'. That seems to have solved the problem.
Here is the form back to you: https://acrobat.com/#d=jcCs7X85xeRYQjvI2Yb*Cw
Good luck,
Niall -
Hi,
I am having problem with HR Forms. I am trying to edit renumeration statement form (Copy of the standard form, with custom infotype fileds).
One of the Single Fields was spelled wrongly, and I am trying to correct it. I went to the chnage screen, double clicked on the faulty field, changed its name, and pressed 'Transfer'. It asked for a customizing request, and saved it.
If I again go to PE51, and check the form, the changes I made are not reflecting. Why is this? can anybody help?
The field I require is P9001-ZCREWNO. But it takes only P9001-zcrew. Is there any limit of 5 characters on length of filed name? (All other changes are reflecting, only this particular change is not reflecting.)
Thanks
Krishna
Edited by: Krishna Kishor Kammaje on Jul 16, 2008 9:49 AMSameer,
Thanks for the reply. That is already done. I already have the field available in the F4 help of the 'Single Field.
The field name is ZCREWNO. But when I give this and save it, it says 'Saved'. But if I open again, the stored field name is actually ZCREW (That is only 5 characters). Because of this, the filed value is not getting populated.
In Pe51_checktab, filed name is ZCREWNO.
Thanks
Krishna
Edited by: Krishna Kishor Kammaje on Jul 16, 2008 11:19 AM -
Problem with multiple forms and subview
I have a problem when using NetBean Web Pack (JDK6, Net Beans 5.5, JSF 1.2).
1) I created a JSF page (hello.jsp) and a page fragment (header.jspf) inside Web Pack, and let the JSF page (hello.jsp) includes the page fragment.
2) The include instruction is outside of the "form" element id=main_form() of the first JSF page.
3) Inside the page fragment (header.jspf), I put a form (id=header_form) with some input fields inside the "subview" element.
4) When running the web application, the form and its children (id=header_form) inside the subview are not rendered.
It seems to be a problem with multiple forms on a page and the subview.
Do I use these JSF components incorrectly? Any advice?
ThanksThe forms are not nested.
hello.jsp
<webuijsf:body ...>
<!-- BEGIN: include header -->
<div style="margin: 0px 0px 10px 0px; left: 0px; top: 0px">
<jsp:directive.include file="Header.jspf"/>
</div>
<!-- END: include header -->
<webuijsf:form ...>
From above fragment, you can see the header.jspf is outside of the form element. -
Problems with Submitting the form
Hey Guys,
I have a form with 7 different fields. my form is connected with the database. once the user fills out the information and clicks on submit the entry should be saved in the database.
Everything is working fine. i can establish connection with the database. my only problem is that when i click on submit its not adding the entry in the database. I think i have problems with this command
<form method = "post" > . Any helpo will be really appreciated. I am posting some part of the code.
<%!
public void jspInit() {
try {
Class.forName("org.apache.derby.jdbc.ClientDriver");
System.out.println("JDBC driver loaded");
catch (ClassNotFoundException e) {
System.out.println(e.toString());
<body>
<%
String name, unit, title, supervisor, region, dept, date;
%>
<p align="center"><b><font size="5" face="Arial">LOGIN REQUEST FORM </font></b>
<form method="POST">
<p align="left"><b><font size="2">
</b>Name:<b> <input type="text" name="name" size="20"> </b>Title <b>
<input type="text" name="title" size="20"> </b> Dept <b>
<input type="text" name="dept" size="20"></b></font></p>
<p align="left"><font size="2"><b>
</b>Supervisor: <b> <input type="text" name="supervisor" size="20"> </b>Region<b>
<input type="text" name="region" size="20"> </b>Business Unit<b>
<input type="text" name="unit" size="20"></b></font></p>
<p align="left"><font size="2"><b> </b>
Effective Date:<b> <input type="text" name="date" size="20"></b></font></p>
<input type = "reset">
<input type = "submit">
<%
name = request.getParameter("name");
unit = request.getParameter("unit");
title = request.getParameter("title");
supervisor = request.getParameter("supervisor");
region = request.getParameter("region");
dept = request.getParameter("dept");
date = request.getParameter("date");
boolean error = false;
String message = null;
try {
Connection con = DriverManager.getConnection("jdbc:derby://localhost:1527/sample");
System.out.println("Connection Established");
Statement s = con.createStatement();
String sql = "SELECT name FROM users" +
"WHERE name='" + name + "'";
ResultSet rs = s.executeQuery(sql);
if(rs.next()) {
rs.close();
message = "The username <B>" + encodeHtmlTag(name) + "</B> has already been taken. Please select another name.";
error = true;
else {
rs.close();
sql = "INSERT INTO user" +
"(name, unit, title, supervisor, region, dept, date)" +
"VALUES" +
"('" + name + "'," + " '" + unit + "'," + " '" + title + "'," + " '" + supervisor + "',"
+ " '" + region + "'," + " '" + dept + "'," + " '" + date + "')";
int i = s.executeUpdate(sql);
if(i==1) {
message = "User Added";
s.close();
con.close();
catch(SQLException e) {
message = "Error " + e.toString();
catch(Exception e) {
message = "Error" + e.toString();
error = true;
%>
</form>
</body>
</html>Even if there was an exception being thrown, you wouldn't see it because you're catching it but not doing anything with the message:
catch(SQLException e) {
message = "Error " + e.toString();
catch(Exception e) {
message = "Error" + e.toString();
error = true;
}Try changing this part to:
catch(SQLException e) {
message = "Error " + e.toString();
e.printStackTrace();
catch(Exception e) {
message = "Error" + e.toString();
error = true;
e.printStackTrace();
} -
Hi-
I found a contact form for my Flash website but it's not working properly. It uses ActionScript 3 and PHP, both of which I don't know much about. Because of this, I can't pinpoint the problem or how to fix it. Here's what's going on:
1) Each field in the form only allows 3 characters and no special characters such as @ _ ! . , etc...
2) When the user goes to the next field in the form, the previous field appears blank but the when clicking on that again, the original text appears.
3) When submitting the form, it just keeps saying "in progress" and never shows the confirmation text nor does the email get sent. There is an HTML file included with this form but I am not sure if I need to put that in as I have embedded this form into an SWF file so I don't think I need that code but please let me know if I am wrong about this.
I am posting both the AS code and PHP code below.. if someone can help me figure this out I would greatly appreciate it. I am not sure which file the problem is in. If someone here doesn't know PHP then at least see the AS code and let me know if the problem is in that or not. That way I can pinpoint which file the problem is coming from and then seek further help if needed. To see the form in action, go here: http://www.poojasdesigns.com/ and click on "Contact Me".. here are the codes:
ActionScript 3.0
//presistant reference to this movie's mail timeline:
var mainTL:MovieClip = this;
//start off with submit button dimmed
submit_mc._alpha = 40;
//create the LoadVars objects which will be used later
//one to send the data...
var dataSender:LoadVars = new LoadVars();
//and one to recieve what comes back
var dataReceiver:LoadVars = new LoadVars();
create listener for Key Object
this is just a U.I. thing - "wakes up" the submit button
when all fields have at least some content
var formCheck:Object = new Object();
formCheck.onKeyUp = function() {
if (name_txt.text != '' &&
email_txt.text != '' &&
subject_txt.text != '' &&
message_txt.text != '') {
//clear any alert messages
alert_txt.text = '';
//enable the submit button
submit_mc._alpha = 100;
} else {
//remain disabled until all fields have content
submit_mc._alpha = 40;
Key.addListener(formCheck);
/*#######SET STYLES FOR TEXT FIELDS#######*/
//define styles for both normal and focussed
//set hex values here that work with your site's colors
var normal_border:Number = 0x000000;
var focus_border:Number = 0xFA8D00;
var normal_background:Number = 0xFFFFFF;
var focus_background:Number = 0xE9E3E3;
var normal_color:Number = 0xFFFFFF;
var focus_color:Number = 0x000000;
//create an array containing the fields we wish to have styles applied to
inputs=[name_txt,email_txt,subject_txt,message_txt];
a "for in" loop now iterates through each element in the "inputs" array
and applies our "normal" formatting to each input text field
for( var elem in inputs) {
inputs[elem].border = true;
inputs[elem].borderColor = normal_border;
inputs[elem].background = true;
inputs[elem].backgroundColor = normal_background;
inputs[elem].textColor = normal_color;
/*this takes care of applying the "normal" style to each of the four input fields;
the following TextField prototypes handle highlighting when an input field
gains focus and resetting to normal when a field loses focus*/
inputs[elem].onSetFocus = function() {
this.borderColor = focus_border;
this.backgroundColor = focus_background;
this.textColor = focus_color;
inputs[elem].onKillFocus = function() {
this.borderColor = normal_border;
this.backgroundColor = normal_background;
this.textColor = normal_color;
//finally: make the first field (name_txt) selected when the movie loads
Selection.setFocus(name_txt);
/*DEFINE SUBMIT BUTTON BEHAVIOR*/
submit_mc.onRelease = function() {
//final check to make sure fields are completed
if (name_txt.text != '' &&
email_txt.text != '' &&
subject_txt.text != '' &&
message_txt.text != '') {
alert_txt.text='';//clear any previous error messages or warnings
//advance playhead to frame 2 - the "processing" message
mainTL.play();
//assign properties to LoadVars object created previously
dataSender.name = name_txt.text;
dataSender.email = email_txt.text;
dataSender.subject = subject_txt.text;
dataSender.message = message_txt.text;
//callback function - how to handle what comes abck
dataReceiver.onLoad = function() {
if (this.response == "invalid") {
mainTL.gotoAndStop(1);
alert_txt.text = "Please verify your email address - it appears to be incorrect."
} else if (this.response == "passed") {
mainTL.gotoAndStop(4);
//now send data to script
NOTE: the line below presumes the Flash swf file and php script are in the
SAME DIRECTORY on your server. If this is not the case (if for example you
wish to put the php script along with other similar items in a "scripts"
directory) you MUST MODIFY THE PATH. Otherwise the Flash movie won't be
able to locate the php script.
dataSender.sendAndLoad("processEmail.php", dataReceiver, "POST");
} else {
//warning if they try to submit before completing
alert_txt.text = "Please fill out all the fields before submitting the form.";
PHP
<?php
//create short variable names
$name=$_POST['name'];
$email=$_POST['email'];
$subject=$_POST['subject'];
$message=$_POST['message'];
$name=trim($name);
$email=trim($email);
$subject=StripSlashes($subject);
$message=StripSlashes($message);
/*my email address - dummy address inserted for privacy in this forum*/
$toaddress='[email protected]';
if (preg_match ("/^[-_.[:alnum:]]+@((([[:alnum:]]|[[:alnum:]][[:alnum:]-]*[[:alnum:]])\.)+(ad|ae|aero|af|ag|ai|al|am|an|ao|aq|ar|arpa|as|at|au|aw|az|ba|bb|bd|be|bf|bg|bh|bi|biz|bj|bm|bn|bo|br|bs|bt|bv|bw|by|bz|ca|cc|cd|cf|cg|ch|ci|ck|cl|cm|cn|co|com|coop|cr|cs|cu|cv|cx|cy|cz|de|dj|dk|dm|do|dz|ec|edu|ee|eg|eh|er|es|et|eu|fi|fj|fk|fm|fo|fr|ga|gb|gd|ge|gf|gh|gi|gl|gm|gn|gov|gp|gq|gr|gs|gt|gu|gw|gy|hk|hm|hn|hr|ht|hu|id|ie|il|in|info|int|io|iq|ir|is|it|jm|jo|jp|ke|kg|kh|ki|km|kn|kp|kr|kw|ky|kz|la|lb|lc|li|lk|lr|ls|lt|lu|lv|ly|ma|mc|md|mg|mh|mil|mk|ml|mm|mn|mo|mp|mq|mr|ms|mt|mu|museum|mv|mw|mx|my|mz|na|name|nc|ne|net|nf|ng|ni|nl|no|np|nr|nt|nu|nz|om|org|pa|pe|pf|pg|ph|pk|pl|pm|pn|pr|pro|ps|pt|pw|py|qa|re|ro|ru|rw|sa|sb|sc|sd|se|sg|sh|si|sj|sk|sl|sm|sn|so|sr|st|su|sv|sy|sz|tc|td|tf|tg|th|tj|tk|tm|tn|to|tp|tr|tt|tv|tw|tz|ua|ug|uk|um|us|uy|uz|va|vc|ve|vg|vi|vn|vu|wf|ws|ye|yt|yu|za|zm|zw)$|(([0-9][0-9]?|[0-1][0-9][0-9]|[2][0-4][0-9]|[2][5][0-5])\.){3}([0-9][0-9]?|[0-1][0-9][0-9]|[2][0-4][0-9]|[2][5][0-5]))$/i", $email)) {
mail($toaddress,$subject,$message,"From: $name <$email>\r\nReply-To: $email\r\nReturn-Path: $email\r\n");
//clear the variables
$name='';
$email='';
$subject='';
$message='';
echo "response=passed";
else {
echo "response=invalid";
exit;
?>
Please let me know how to proceed. Thanks so much!
*Pooja*You say you don't know much about AS3, and that you have embedded this form into an swf. In what manner did you embed it, and what version of AS does the swf use? Have you tried using the form in the page that was provided as a standalone test to see if it works?
-
Hey All,
Has anyone ever experience a problem with maximizing or resizing their custom form? I have a rather large form that every time I try to maximize or resize causes Business One to hang and crash.
Any ideas what might be causing this?Hi Curtis,
Thanks for posting the solution... will keep it in mind!
Thanks,
Adele -
Problem with Migration Forms to Apex ...
Hello !!
I discovered Apex a few days ago, so I began with the Oracle tutorials, where I found the conversion from Forms to Apex : "Converting Your Oracle Forms Applications to Application Express 3.2".
I tried to do the same, with a Unix server and my laptop with Windows.
I downloaded the Forms which where on my Unix server on my laptop, and then converted them with frmf2xml.bat.
Then I created a project and uploaded only one Forms Module (_fmb.XML). After upload, the Percent Complete column is lower than 100%.
My problem is at the following step : "Generating Your Application Express Application".
When I click on "Create Application", select "Based on Migration Project" and then on "Next", I have one of the following errors :
- 1 error has occurred * The project, "Test Gestuser" does not contain any Blocks associated with database objects.
- 1 error has occurred * Database schema PROCIE does not contain the associated database objects for the project, login. Ensure the database schema associated with the project contains the database objects associated with the uploaded Forms Module .XML file(s)
I really don't understand these two errors, having yet checked all the possible error sources, user, schema, ... ?:|
I have probably forgotten to give some informations, so ask them ;)
Thanks for your help,
Pierre C.
Edited by: Pierre C. on 19 juin 2009 17:22I found the problem(s) ... but now I have another one !!
The problems are with the Forms : I opened them with Forms Builder and created a new Block with the assistant. Then I compared this block with another "normal" block : they haven't the same properties.
My block has an associated canvas and database source, whereas the other "normal" blocks haven't.
Where does the error come from ??
Is there something to do with Forms Builder ?
On my Unix server before downloading the forms ?
Another thing to do ??
Thanks,
Pierre C. -
Problem with a Form field, need help
I work for a small police agency and I am our IT guy. Most of my IT tasks have many been hardware and system software and networking. I have been trying to learn and teach myself programming. I also create forms for agency use. I have been working on a form and want to add increased functionality to allow our officers to issue a citation with the least amount of time spend on the form. One main issue is that we have to have a unique citation number. We have come up with a format that will specify as such: YYYY(Officer's 4 Digit ID Number)-(Auto Incrementing number). So, for instance, if this is my 55th citation issued and my ID number is 0100 the citation number would appear like this: 20120100-0055. The ID number will be entered by the officer earlier in the form. The problem I can't seem to vision around is how I will keep the number to increase by one and have it maintain that way. I want it to be form specific, because each officer has their own vehicle and MDT that the PDF will reside on at this time.
So far, what I have toyed with in the past 30 minutes is this:
var Ticker = 0001;
var Year = getFullYear();
var x = getField('OfcIDNo').value;
Eventually the form will be autocreated by a program that will be run from a centralized server. I have even thought about running the from from a server and taking all the data and INSERTing it into a SQL Server 2008 Express DB table on a server, but I'd still have to have the citation number created at the form as the officer fills in the data. The last four of the number doesn't have to reset when the year changes, but it would be a plus. Any information anyone can help with I would appreciate it.
Thanks in advanceSeems like it was too easy, is it safe to assume that javascript and javascript functioning in Adobe PDF is a bit different learning curve? That does help, the only thing that I'm missing is the Auto Incrementing 4 digit number. I was toying with assigning a variable in the globals that would auto increment but having problems with how I would execute it. Each copy of the form would be installed on each officers MDT so the number would be specific to that officer. The format will be YYYY"OFCIDNo"-####. I would like to assign the number to the global variable on the execution of the Print Dialog. This way the officer an clear the form if he/she needs to start over and then it stays whether or not they close the file and reopen it.
That syntax has been very helpful to get started.
Thank you,
David -
Problem with a form in the portal.
Hi Masters,
I'm getting this error in the portal when I'm executing a form. I'm the basis here but I need a hand because I can't find the solution to this. Thanks for the help!
com.sap.tc.webdynpro.services.exceptions.WDRuntimeException: Error during call to AdobeDocumentServer: Processing exception during a "Render" operation. Request start time: Tue Jul 24 11:12:58 VET 2007 com.adobe.ProcessingError: Invalid XDP error while configuring the XMLForm module. Please validate the form template and try again: com.adobe.document.xmlform.InvalidXDPException: IDL:com/adobe/document/xmlform/InvalidXDPException:1.0 Exception Stack Trace: com.adobe.ProcessingError: Invalid XDP error while configuring the XMLForm module. Please validate the form template and try again: com.adobe.document.xmlform.InvalidXDPException: IDL:com/adobe/document/xmlform/InvalidXDPException:1.0 at com.adobe.Render.execute(Unknown Source) at com.adobe.BaseADSRequest.doWork(Unknown Source) at com.adobe.AdobeDocumentServicesWorker.execute(Unknown Source) at com.adobe.AdobeDocumentServicesEJB.processRequest(Unknown Source) at com.adobe.AdobeDocumentServicesEJB.rpData(Unknown Source) at com.adobe.AdobeDocumentServicesLocalLocalObjectImpl0.rpData(AdobeDocumentServicesLocalLocalObjectImpl0.java:120) at sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method) at sun.reflect.NativeMethodAccessorImpl.invoke(NativeMethodAccessorImpl.java:39) at sun.reflect.DelegatingMethodAccessorImpl.invoke(DelegatingMethodAccessorImpl.java:25) at java.lang.reflect.Method.invoke(Method.java:324) at com.sap.engine.services.webservices.runtime.EJBImplementationContainer.invokeMethod(EJBImplementationContainer.java:126) atSounds like a problem with the privileges.
Try creating a new user, say user_temp, and grant the user Manage privilege to All Portal DB Providers and Manage to All Schemas.
Try creating a form after logging in as user_temp.
The minimum privileges required to create a Portal DB provider component is Create privilege on the Portal DB Providers and Manage on the Portal DB Provider schema. -
ORARRP Problem with Oracle Forms and Reports 10g
hi,
i have a problem with orarrp utility. the printeroutput is sometimes mirrored or only a blank sheet. is this a known problem? are there any workaraounds available? what can i do to fix the problem? please help me.
thanks very much
gunnar kieckHi Rajesh,
But i have not installed IAS at all. I have only Forms and Reports 10g and Oracle database installed. As you said it only save on IAS, but can we save it on local machine. Is there any other alternative.
Again my second issues is --> I want to remove Mail option and rename Cache option to PDF from Destype combo box which appears at run time.
Any idea how we can do this? -
Problems with ISR_MSSRCF_SRQ3 form, attribute EXT_KEY
Hello masters:
I have problems with the ISR_MSSRCF_SRQ3 form. The portal doesn't show the requisitions that I have been created before. I´m getting next error messages in transaction SLG1:
"Case ... does not exist. No number range interval has been specified fir yhe case type"
"No number range interval has been specified for the case type Attribute: EXT_KEY"
Does anybody know what I have to do?
Thanks in advance
Edited by: Rodrigo Arenas Arriola on Sep 2, 2009 3:57 AMIt was because there wasn't enough space within the form.
Thank you. -
We had to change the url of our forms last week and something, somewhere has gone horribly wrong and we're now experiencing various issues with multiple forms.
This form is perhaps the most complex of the lot and hopefully resolving this should allow me to patch the others up. On submitting the form found at http://www.southlanarkshire.gov.uk/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO I get a 404 page not found error with the URL: http://www.southlanarkshire.gov.uk/portal/pls/portal/slcinternet.XXSLC_CLUBS_SOCIETIES.add_page4
Below is the PL/SQL package that the form is submitted to as we step through (I've had to attach in chunks as it's over the 30000 character limit.
Any help is massively appreciated.
create or replace
PACKAGE BODY XXSLC_CLUBS_SOCIETIES AS
procedure intro (p_entry in varchar2 default null)
as
l_target_url varchar2(2000);
l_error_message varchar2(2000);
begin
if p_entry is null then
l_error_message := '0001,';
end if;
l_error_message := substr(l_error_message,1,length(l_error_message)-1);
if l_error_message is not null then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO';
owa_util.redirect_url(l_target_url || '?error_message=' || l_error_message);
else
if p_entry = 'I wish to submit a new entry' THEN
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P1';
elsif p_entry = 'I wish to update an existing entry' THEN
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_UPDATE_P1';
elsif p_entry = 'I wish to remove an existing entry' THEN
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_REMOVE';
end if;
end if;
owa_util.REDIRECT_URL(l_target_url || '?error_message=' || l_error_message);
end intro;
procedure add_page1 (p_request in number default null
,p_accept in varchar2 default null
,p_button in varchar2 default null)
as
l_error_message varchar2(2000);
l_target_url varchar(2000);
l_request number := p_request;
begin
if p_button = 'Next' then
if l_request is null then
select xxslc_clubs_seq.nextval
into l_request
from dual;
insert into XXSLC_CLUBS_TABLE (request, new_accept,DATE_ENTERED,MAX_PAGE)
values (l_request, p_accept,to_char(sysdate, 'dd/mm/yyyy'),'1');
commit;
else
update XXSLC_CLUBS_TABLE
set new_accept = p_accept
, max_page = '1'
where request = l_request;
commit;
end if;
if p_accept is null then
l_error_message := l_error_message || '0002,';
elsif p_accept = 'Decline' then
l_error_message := l_error_message || '0002,';
end if;
l_error_message := substr(l_error_message,1,length(l_error_message)-1);
if l_error_message is not null then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P1';
owa_util.redirect_url(l_target_url || '?error_message=' || l_error_message || '&request=' || l_request);
else
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P2';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
end if;
elsif p_button = 'Back' then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO';
owa_util.redirect_url(l_target_url);
end if;
end add_page1;
procedure add_page2 (p_request in number default null
,p_add_club in varchar2 default null
,p_add_club_website in varchar2 default null
,p_add_details in clob default null
,p_add_age_category in varchar2 default null
,p_button in varchar2 default null)
as
l_error_message varchar2(2000) := null;
l_request number := p_request;
l_target_url varchar2(2000);
l_count number := null;
begin
if p_button = 'Next' then
update XXSLC_CLUBS_TABLE
set ADD_CLUB=p_add_club
,ADD_CLUB_WEBSITE=p_add_club_website
,ADD_DETAILS=p_add_details
,ADD_AGE_CATEGORY=p_add_age_category
,MAX_PAGE = '2'
where request=l_request;
commit;
if p_add_club is null and p_add_details is null and p_add_age_category is null then
l_error_message := l_error_message || '0003,';
else
if p_add_club is null then
l_error_message := l_error_message || '0004,';
end if;
if p_add_details is null then
l_error_message := l_error_message || '0005,';
end if;
if p_add_age_category is null then
l_error_message := l_error_message || '0006,';
end if;
end if;
l_error_message := substr(l_error_message,1,length(l_error_message)-1);
if l_error_message is not null then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P2';
owa_util.redirect_url(l_target_url || '?error_message=' || l_error_message || '&request=' || l_request);
else
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P3';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
end if;
elsif p_button = 'Back' then
update XXSLC_CLUBS_TABLE
set ADD_CLUB=p_add_club
,ADD_CLUB_WEBSITE=p_add_club_website
,ADD_DETAILS=p_add_details
,ADD_AGE_CATEGORY=p_add_age_category
where request=l_request;
commit;
if p_add_club is null and p_add_details is null and p_add_age_category is null then
l_error_message := l_error_message || '0003,';
else
if p_add_club is null then
l_error_message := l_error_message || '0004,';
end if;
if p_add_details is null then
l_error_message := l_error_message || '0005,';
end if;
if p_add_age_category is null then
l_error_message := l_error_message || '0006,';
end if;
end if;
l_error_message := substr(l_error_message,1,length(l_error_message)-1);
if l_error_message is not null then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P2';
owa_util.redirect_url(l_target_url || '?error_message=' || l_error_message || '&request=' || l_request);
else
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P1';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
end if;
end if;
end add_page2;
procedure add_page3 (p_request in number default null
,p_add_title in varchar2 default null
,p_add_other in varchar2 default null
,p_add_forename in varchar2 default null
,p_add_surname in varchar2 default null
,p_add_address in varchar2 default null
,p_add_town_city in varchar2 default null
,p_add_postcode in varchar2 default null
,p_add_phone in varchar2 default null
,p_add_email in varchar2 default null
,p_add_position in varchar2 default null
,p_button in varchar2 default null)
as
l_add_title varchar2(2000) := p_add_title;
l_add_other varchar2(2000) := p_add_other;
l_add_forename varchar2(2000) := p_add_forename;
l_add_surname varchar2(2000) := p_add_surname;
l_add_address varchar2(2000) := p_add_address;
l_add_town_city varchar2(2000) := p_add_town_city;
l_add_postcode varchar2(2000) := p_add_postcode;
l_add_phone varchar2(2000) := p_add_phone;
l_add_email varchar2(2000) := p_add_email;
l_add_position varchar2(2000) := p_add_position;
l_phone_error varchar2(2000) := null;
l_email_error varchar2(2000) := null;
l_error_message varchar2(2000) := null;
l_seq_num number := null;
l_target_url varchar2(2000);
l_request number := p_request;
begin
if p_button = 'Next' then
update xxslc_clubs_table
set add_title =p_add_title
,add_other =p_add_other
,add_forename =p_add_forename
,add_surname =p_add_surname
,add_address =p_add_address
,add_town_city =p_add_town_city
,add_postcode =p_add_postcode
,add_phone =p_add_phone
,add_email =p_add_email
,add_position =p_add_position
,max_page = '3'
where request =l_request;
if p_add_title is null and p_add_forename is null and p_add_surname is null and p_add_phone is null and p_add_position is null then
l_error_message := l_error_message || '0003,';
else
if p_add_title is null then
l_error_message := l_error_message || '0008,';
elsif p_add_title = 'Other' and p_add_other is null then
l_error_message := l_error_message || '0009,';
end if;
if p_add_forename is null then
l_error_message := l_error_message || '0010,';
end if;
if p_add_surname is null then
l_error_message := l_error_message || '0011,';
end if;
If (p_add_phone is null and p_add_email is null) then
l_error_message := l_error_message || '0026,';
end if;
If p_add_phone is not null then
xxslc_val_consumer_tel_no(p_add_phone,l_phone_error);
if l_phone_error is not null then
l_error_message := l_error_message || '0013,';
end if;
end if;
/* if p_add_phone is null then
l_error_message := l_error_message || '0012,';
else
xxslc_val_consumer_tel_no(p_add_phone,l_phone_error);
if l_phone_error is not null then
l_error_message := l_error_message || '0013,';
end if;
end if;
if p_add_email is not null then
xxslc_val_email_add(p_add_email,l_email_error);
if l_email_error is not null then
l_error_message := l_error_message || '0014,';
end if;
end if;
if p_add_position is null then
l_error_message := l_error_message || '0015,';
end if;
end if;
l_error_message := substr(l_error_message,1,length(l_error_message)-1);
if l_error_message is not null then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P3';
owa_util.redirect_url(l_target_url || '?error_message=' || l_error_message || '&request=' || l_request);
else
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P4';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
end if;
elsif p_button = 'Back' then
update xxslc_clubs_table
set add_title =p_add_title
,add_other =p_add_other
,add_forename =p_add_forename
,add_surname =p_add_surname
,add_address =p_add_address
,add_town_city =p_add_town_city
,add_postcode =p_add_postcode
,add_phone =p_add_phone
,add_email =p_add_email
,add_position =p_add_position
where request =l_request;
if p_add_title is null and p_add_forename is null and p_add_surname is null and p_add_phone is null and p_add_position is null then
l_error_message := l_error_message || '0003,';
else
if p_add_title is null then
l_error_message := l_error_message || '0008,';
elsif p_add_title = 'Other' and p_add_other is null then
l_error_message := l_error_message || '0009,';
end if;
if p_add_forename is null then
l_error_message := l_error_message || '0010,';
end if;
if p_add_surname is null then
l_error_message := l_error_message || '0011,';
end if;
if (p_add_phone is null and p_add_email is null) then
l_error_message := l_error_message || '0026,';
end if;
if p_add_phone is not null then
xxslc_val_consumer_tel_no(p_add_phone,l_phone_error);
if l_phone_error is not null then
l_error_message := l_error_message || '0013,';
end if;
end if;
if p_add_email is not null then
xxslc_val_email_add(p_add_email,l_email_error);
if l_email_error is not null then
l_error_message := l_error_message || '0014,';
end if;
end if;
if p_add_position is null then
l_error_message := l_error_message || '0015,';
end if;
end if;
l_error_message := substr(l_error_message,1,length(l_error_message)-1);
if l_error_message is not null then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P3';
owa_util.redirect_url(l_target_url || '?error_message=' || l_error_message || '&request=' || l_request);
else
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P2';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
end if;
end if;
end add_page3;Edited by: Steven Grant on Jul 21, 2009 2:16 PMprocedure add_page4 (p_regular in varchar2 default null
,p_remove in varchar2 default null
,p_request in number default null
,p_button in varchar2 default null
,p_add_days in varchar2 default null)
as
l_regular varchar2(2000) := p_regular;
l_request number := p_request;
l_remove number := p_remove;
l_button varchar2(2000) := p_button;
l_add_days varchar2(2000) := p_add_days;
l_error_message varchar2(2000) := null;
v_mailhost varchar2(2000);
v_mail_conn utl_smtp.connection;
p_recipient varchar2(2000) := '[email protected]';
l_target_url varchar2(2000) := null;
l_count number := null;
cursor c_get_details is
select *
from xxslc_clubs_table
where request = l_request;
r_get_details c_get_details%rowtype;
cursor c_get_venue is
select *
from xxslc_clubs_table_add_venue
where request = l_request;
r_get_venue c_get_venue%rowtype;
begin
if l_button = 'Select' then
update xxslc_clubs_table
set add_venue = p_regular
where request = l_request;
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P4';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
elsif l_button = 'Add venue' then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_VENUE';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
elsif l_button = 'Remove venue' then
if l_remove is null then
l_error_message := l_error_message || '0023';
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P4';
owa_util.redirect_url(l_target_url || '?request=' || l_request || '&error_message=' || l_error_message);
else
delete
from xxslc_clubs_table_add_venue
where item_num = l_remove;
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P4';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
end if;
elsif l_button = 'Submit details' then
update XXSLC_CLUBS_TABLE
set MAX_PAGE = '4'
where request = l_request;
commit;
if p_regular = 'Yes' then
update XXSLC_CLUBS_TABLE
set MAX_PAGE = 'C'
where request = l_request;
commit;
select host_name
into v_mailhost
from v$instance;
/* v_mailhost := v_mailhost || '.southlanarkshire.gov.uk'; */
v_mailhost := 'southlanarkshire.gov.uk';
open c_get_details;
fetch c_get_details into r_get_details;
close c_get_details;
open c_get_venue;
fetch c_get_venue into r_get_venue;
close c_get_venue;
v_mail_conn := utl_smtp.open_connection(v_mailhost, 25);
utl_smtp.helo(v_mail_conn, v_mailhost);
utl_smtp.mail(v_mail_conn, 'Clubs@' || v_mailhost);
utl_smtp.rcpt(v_mail_conn, p_recipient);
utl_smtp.open_data(v_mail_conn);
utl_smtp.write_data (v_mail_conn, 'Subject:' ||'Clubs and societies - add an entry' || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Reference number: '|| l_request);
utl_smtp.write_data(v_mail_conn,utl_tcp.crlf || utl_tcp.crlf );
utl_smtp.write_data(v_mail_conn,'Club details' || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Club name: ' || r_get_details.add_club || utl_tcp.crlf );
utl_smtp.write_data(v_mail_conn,'Club website: ' || r_get_details.add_club_website || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Club details: ' || r_get_details.add_details || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Contact details ' || utl_tcp.crlf || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Title: ' || r_get_details.add_title || utl_tcp.crlf);
if r_get_details.add_other is not null then
utl_smtp.write_data(v_mail_conn,'Other title: ' || r_get_details.add_other || utl_tcp.crlf);
end if;
utl_smtp.write_data(v_mail_conn,'Forename: ' || r_get_details.add_forename || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Surname: ' || r_get_details.add_surname || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Address: ' || r_get_details.add_address || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Town/city: ' || r_get_details.add_town_city || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Postcode: ' || r_get_details.add_postcode || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Phone: ' || r_get_details.add_phone || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Email: ' || r_get_details.add_email || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Position within club: ' || r_get_details.add_position || utl_tcp.crlf || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Venue details ' || utl_tcp.crlf || utl_tcp.crlf);
select count(*)
into l_count
from xxslc_clubs_table_add_venue
where request = l_request;
if l_count > 0 then
for r_get_venue in c_get_venue loop
utl_smtp.write_data(v_mail_conn,'Name: ' || r_get_venue.add_v_name || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Address: ' || r_get_venue.add_v_address || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Town/city: ' || r_get_venue.add_v_town_city || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Postcode: ' || r_get_venue.add_v_postcode || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Phone: ' || r_get_venue.add_v_phone || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Email: ' || r_get_venue.add_v_email || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Website: ' || r_get_venue.add_v_website || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Area: ' || r_get_venue.add_v_area || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Meeting details: ' || r_get_venue.add_v_days || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn, utl_tcp.crlf);
end loop;
else
utl_smtp.write_data(v_mail_conn,'This club/society has no regular meeting place.' || utl_tcp.crlf);
end if;
utl_smtp.close_data(v_mail_conn);
utl_smtp.quit(v_mail_conn);
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_COMP';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
elsif p_regular = 'No' then
if l_add_days is null then
l_error_message := l_error_message || '0007,';
else
update XXSLC_CLUBS_TABLE
set ADD_DAYS = p_add_days,
MAX_PAGE = '4'
where request=l_request;
commit;
end if;
l_error_message := substr(l_error_message,1,length(l_error_message)-1);
if l_error_message is not null then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P4';
owa_util.redirect_url(l_target_url || '?error_message=' || l_error_message || '&request=' || l_request);
else
update XXSLC_CLUBS_TABLE
set MAX_PAGE = 'C'
where request = l_request;
commit;
select host_name
into v_mailhost
from v$instance;
/* v_mailhost := v_mailhost || '.southlanarkshire.gov.uk'; */
v_mailhost := 'southlanarkshire.gov.uk';
open c_get_details;
fetch c_get_details into r_get_details;
close c_get_details;
v_mail_conn := utl_smtp.open_connection(v_mailhost, 25);
utl_smtp.helo(v_mail_conn, v_mailhost);
utl_smtp.mail(v_mail_conn, 'Clubs@' || v_mailhost);
utl_smtp.rcpt(v_mail_conn, p_recipient);
utl_smtp.open_data(v_mail_conn);
utl_smtp.write_data (v_mail_conn, 'Subject:' ||'Clubs and societies - add an entry' || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Reference number: '|| l_request);
utl_smtp.write_data(v_mail_conn,utl_tcp.crlf || utl_tcp.crlf );
utl_smtp.write_data(v_mail_conn,'Club details' || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Club name: ' || r_get_details.add_club || utl_tcp.crlf );
utl_smtp.write_data(v_mail_conn,'Club website: ' || r_get_details.add_club_website || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Club details: ' || r_get_details.add_details || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Contact details ' || utl_tcp.crlf || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Title: ' || r_get_details.add_title || utl_tcp.crlf);
if r_get_details.add_other is not null then
utl_smtp.write_data(v_mail_conn,'Other title: ' || r_get_details.add_other || utl_tcp.crlf);
end if;
utl_smtp.write_data(v_mail_conn,'Forename: ' || r_get_details.add_forename || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Surname: ' || r_get_details.add_surname || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Address: ' || r_get_details.add_address || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Town/city: ' || r_get_details.add_town_city || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Postcode: ' || r_get_details.add_postcode || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Phone: ' || r_get_details.add_phone || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Email: ' || r_get_details.add_email || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Position within club: ' || r_get_details.add_position || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Meeting details: ' || r_get_details.add_days || utl_tcp.crlf || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Venue details ' || utl_tcp.crlf || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'This club/society has no regular meeting place.' || utl_tcp.crlf);
utl_smtp.close_data(v_mail_conn);
utl_smtp.quit(v_mail_conn);
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_COMP';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
end if;
end if;
end if;
end add_page4;
procedure add_venue (p_add_v_name in varchar2 default null
,p_add_v_address in varchar2 default null
,p_add_v_town_city in varchar2 default null
,p_add_v_postcode in varchar2 default null
,p_add_v_phone in varchar2 default null
,p_add_v_email in varchar2 default null
,p_add_v_website in varchar2 default null
,p_add_v_area in varchar2 default null
,p_add_v_days in varchar2 default null
,p_id in number default null
,p_request in number default null
,p_button in varchar2 default null)
as
l_add_v_name varchar2(2000) := p_add_v_name;
l_add_v_address varchar2(2000) := p_add_v_address;
l_add_v_town_city varchar2(2000) := p_add_v_town_city;
l_add_v_postcode varchar2(2000) := p_add_v_postcode;
l_add_v_phone varchar2(2000) := p_add_v_phone;
l_add_v_email varchar2(2000) := p_add_v_email;
l_add_v_website varchar2(2000) := p_add_v_website;
l_add_v_area varchar2(2000) := p_add_v_area;
l_add_v_days varchar2(2000) := p_add_v_days;
l_id number := p_id;
l_request number := p_request;
l_button varchar2(2000) := p_button;
l_error_message varchar2(2000) := null;
l_success_message varchar2(2000) := null;
l_phone_error varchar2(2000) := null;
l_email_error varchar2(2000) := null;
l_target_url varchar2(2000) := null;
begin
if l_button = 'Add venue' then
if l_id is null then
select xxslc_clubs_add_venue_seq.nextval
into l_id
from dual;
insert into xxslc_clubs_table_add_venue (add_v_name,add_v_address,add_v_town_city,add_v_postcode,add_v_phone,add_v_email,add_v_website,add_v_area,add_v_days, request,item_num)
values (p_add_v_name, p_add_v_address,p_add_v_town_city,p_add_v_postcode,p_add_v_phone,p_add_v_email,p_add_v_website,p_add_v_area,p_add_v_days,p_request,l_id);
else
update xxslc_clubs_table_add_venue
set add_v_name = p_add_v_name
,add_v_address = p_add_v_address
,add_v_town_city = p_add_v_town_city
,add_v_postcode = p_add_v_postcode
,add_v_phone = p_add_v_phone
,add_v_email = p_add_v_email
,add_v_website = p_add_v_website
,add_v_area = p_add_v_area
,add_v_days = p_add_v_days
,request = p_request
where item_num = l_id;
end if;
if p_add_v_name is null and p_add_v_address is null and p_add_v_town_city is null and p_add_v_postcode is null and p_add_v_area is null and p_add_v_days is null then
l_error_message := l_error_message || '0003,';
else
if p_add_v_name is null then
l_error_message := l_error_message || '0016,';
end if;
if p_add_v_address is null then
l_error_message := l_error_message || '0017,';
end if;
if p_add_v_town_city is null then
l_error_message := l_error_message || '0018,';
end if;
if p_add_v_postcode is null then
l_error_message := l_error_message || '0019,';
end if;
if p_add_v_phone is not null then
xxslc_val_consumer_tel_no(p_add_v_phone,l_phone_error);
if l_phone_error is not null then
l_error_message := l_error_message || '0020,';
end if;
end if;
if p_add_v_email is not null then
xxslc_val_email_add(p_add_v_email,l_email_error);
if l_email_error is not null then
l_error_message := l_error_message || '0021,';
end if;
end if;
if p_add_v_area is null then
l_error_message := l_error_message || '0022,';
end if;
if p_add_v_days is null then
l_error_message := l_error_message || '0007,';
end if;
end if;
l_error_message := substr(l_error_message,1,length(l_error_message)-1);
if l_error_message is not null then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_VENUE';
owa_util.redirect_url(l_target_url || '?error_message=' || l_error_message || '&request=' || l_request || '&id=' || l_id);
else
l_success_message := 'The venue has been successfully added.';
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_VENUE';
owa_util.redirect_url(l_target_url || '?request=' || l_request|| '&success_message=' || l_success_message);
end if;
elsif l_button = 'Return to form' then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_P4';
owa_util.redirect_url(l_target_url || '?error_message=' || l_error_message || '&request=' || l_request);
end if;
end add_venue;
procedure update_page1 (p_request in number default null
,p_accept in varchar2 default null
,p_button in varchar2 default null)
as
l_error_message varchar2(2000);
l_target_url varchar(2000);
l_request number := p_request;
begin
if p_button = 'Next' then
if l_request is null then
select xxslc_clubs_seq.nextval
into l_request
from dual;
insert into XXSLC_CLUBS_TABLE (request, update_accept)
values (l_request, p_accept);
commit;
else
update XXSLC_CLUBS_TABLE
set update_accept = p_accept
where request = l_request;
commit;
end if;
if p_accept is null then
l_error_message := l_error_message || '0002,';
elsif p_accept = 'Decline' then
l_error_message := l_error_message || '0002,';
end if;
l_error_message := substr(l_error_message,1,length(l_error_message)-1);
if l_error_message is not null then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_UPDATE_P1';
owa_util.redirect_url(l_target_url || '?error_message=' || l_error_message || '&request=' || l_request);
else
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_UPDATE_P2';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
end if;
elsif p_button = 'Back' then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO';
owa_util.redirect_url(l_target_url);
end if;
end update_page1;
procedure update_page2 (p_request in number default null
,p_upd_club in varchar2 default null
,p_upd_title in varchar2 default null
,p_upd_other in varchar2 default null
,p_upd_forename in varchar2 default null
,p_upd_surname in varchar2 default null
,p_upd_phone in varchar2 default null
,p_upd_email in varchar2 default null
,p_upd_position in varchar2 default null
,p_upd_details in varchar2 default null
,p_button in varchar2 default null)
as
l_error_message varchar2(2000) := null;
l_target_url varchar2(2000);
l_request number := p_request;
l_phone_error varchar2(2000) := null;
l_email_error varchar2(2000) := null;
v_mailhost varchar2(2000) := null;
v_mail_conn utl_smtp.connection;
p_recipient varchar2(2000) := '[email protected]';
begin
if p_button = 'Submit details' then
update XXSLC_CLUBS_TABLE
set add_club = p_upd_club
,add_title = p_upd_title
,add_other = p_upd_other
,add_forename = p_upd_forename
,add_surname = p_upd_surname
,add_phone = p_upd_phone
,add_email = p_upd_email
,add_position = p_upd_position
,update_details = p_upd_details
where request = l_request;
if p_upd_club is null and p_upd_title is null and p_upd_forename is null and p_upd_surname is null and p_upd_phone is null and p_upd_position is null then
l_error_message := l_error_message || '0003,';
else
if p_upd_club is null then
l_error_message := l_error_message || '0004,';
end if;
if p_upd_title is null then
l_error_message := l_error_message || '0008,';
elsif p_upd_title = 'Other' and p_upd_other is null then
l_error_message := l_error_message || '0009,';
end if;
if p_upd_forename is null then
l_error_message := l_error_message || '0010,';
end if;
if p_upd_surname is null then
l_error_message := l_error_message || '0011,';
end if;
if (p_upd_phone is null and p_upd_email is null) then
l_error_message := l_error_message || '0026,';
end if;
if p_upd_phone is not null then
xxslc_val_consumer_tel_no(p_upd_phone,l_phone_error);
if l_phone_error is not null then
l_error_message := l_error_message || '0013,';
end if;
end if;
if p_upd_email is not null then
xxslc_val_email_add(p_upd_email,l_email_error);
if l_email_error is not null then
l_error_message := l_error_message || '0014,';
end if;
end if;
if p_upd_position is null then
l_error_message := l_error_message || '0015,';
end if;
if p_upd_details is null then
l_error_message := l_error_message || '0025,';
end if;
end if;
l_error_message := substr(l_error_message,1,length(l_error_message)-1);
if l_error_message is not null then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_UPDATE_P2';
owa_util.redirect_url(l_target_url || '?error_message=' || l_error_message || '&request=' || l_request);
else
select host_name
into v_mailhost
from v$instance;
/* v_mailhost := v_mailhost || '.southlanarkshire.gov.uk'; */
v_mailhost := 'southlanarkshire.gov.uk';
v_mail_conn := utl_smtp.open_connection(v_mailhost, 25);
utl_smtp.helo(v_mail_conn, v_mailhost);
utl_smtp.mail(v_mail_conn, 'Clubs@' || v_mailhost);
utl_smtp.rcpt(v_mail_conn, p_recipient);
utl_smtp.open_data(v_mail_conn);
utl_smtp.write_data (v_mail_conn, 'Subject:' ||'Clubs and societies - update an entry' || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Reference number: '|| l_request);
utl_smtp.write_data(v_mail_conn,utl_tcp.crlf || utl_tcp.crlf );
utl_smtp.write_data(v_mail_conn,'Club details' || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Club name: ' || p_upd_club || utl_tcp.crlf || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Contact details ' || utl_tcp.crlf || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Title: ' || p_upd_title || utl_tcp.crlf);
if p_upd_other is not null then
utl_smtp.write_data(v_mail_conn,'Other title ' || p_upd_other || utl_tcp.crlf);
end if;
utl_smtp.write_data(v_mail_conn,'Forename: ' || p_upd_forename || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Surname: ' || p_upd_surname || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Phone: ' || p_upd_phone || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Email: ' || p_upd_email || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,'Position within club: ' || p_upd_position || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,utl_tcp.crlf || utl_tcp.crlf );
utl_smtp.write_data(v_mail_conn,'Update details' || utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn,utl_tcp.crlf);
utl_smtp.write_data(v_mail_conn, p_upd_details || utl_tcp.crlf || utl_tcp.crlf);
utl_smtp.close_data(v_mail_conn);
utl_smtp.quit(v_mail_conn);
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_UPDATE_COMP';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
end if;
elsif p_button = 'Back' then
l_target_url := '/portal/page/portal/EXTERNAL_WEBSITE_DEVELOPMENT/SLC_ONLINE_HOME/Do_it_online/ONLINE_FORMS/CLUBS_SOCIETIES_INTRO/CLUBS_SOCIETIES_UPDATE_P1';
owa_util.redirect_url(l_target_url || '?request=' || l_request);
end if;
end update_page2;Edited by: Steven Grant on Jul 21, 2009 2:16 PM
Maybe you are looking for
-
Dear Friends, I am getting error While using T code MRRL I have did Below configuration but still i am getting errror as "ERS settlement: No message was found for partner 102317/company code 9000" Configuration I did are:- ERS Settings 1) Vendor Mast
-
Some webcam drivers (Quicktime Components) no longer work in Snow Leopard
I have two webcams, both of which worked before the update to Snow Leopard, both of which no longer work. They are recognised by their own utility applications and I can see the video, but the QuickTime components used to transport this video to othe
-
Employee Discount and Loyalty Plan
Back in June of this year I contacted customer service to change my plan. I was told about the new Loyalty Plan. My concern was whether or not my employee discount would still apply. The customer service rep checked into it and told me yes. So I made
-
Can't create a digital signature with acrobat 8
We have acrobat 8. My husband has a digital signature but when I try to electronically sign, his digital signature pops up and does not give me the option to create my own. How can I create my own digital signature on this software?
-
Find and replace dialog not showing correct
After updating to Keynote 5.1 the Find dialog - Simple as well as Advanced - only shows a little more than two centimeters vertically from the top leaving the Replace field unaccessible. Any one else seing this? How can I get it right? It looks - and