I Have A Store Procedure To Update A Table Against Parametrised Variable Then How Can I Execute

Question

1.80/5 (2 votes)

See more:

SQL

CREATE OR REPLACE PROCEDURE EMPLOYEE_S_UPDATE (S_SALARY VARCHAR2)
AS
   F_NAME         VARCHAR2 (23);
   G_GENDER       VARCHAR (6);
   D_DEPARTMENT   VARCHAR2 (22);
   P_POSITION     VARCHAR2 (23);
BEGIN
   SELECT DEPARTMENT, FULL_NAME, GENDER, POSITION
     INTO D_DEPARTMENT, F_NAME, G_GENDER, P_POSITION
     FROM EMPLOYEE_S;
    --WHERE SALARY = S_SALARY;
   UPDATE EMPLOYEE_S
      SET DEPARTMENT = D_DEPARTMENT,
          FULL_NAME = F_NAME,
          GENDER = G_GENDER,
          POSITION = P_POSITION
    WHERE SALARY = S_SALARY;
   COMMIT;
END;

Posted 14-Aug-15 2:35am

Member 11909432

Updated 14-Aug-15 2:50am

Wendelius

v2

Add a Solution

3 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Wendelius · Answer 1 · 2015-08-14T02:52:00

Solution 1

Based on the tag you're using Perl. In that case you can use a question mark (?) as a place holder for the parameter and then use bind_param to set the value for the parameter before execute.

Have a look at:
- A Short Guide to DBI[^]
- 5.3. Binding Parameters to Statements [^]

Posted 14-Aug-15 2:52am

Wendelius

Updated 14-Aug-15 3:00am

v2

Arthur V. Ratz · Answer 2 · 2015-08-14T02:58:00

Solution 2

SQL

EXEC dbo.EMPLOYEE_S_UPDATE @S_SALARY = 10;

or

SQL

EXEC dbo.EMPLOYEE_S_UPDATE 10;

Posted 14-Aug-15 2:58am

Arthur V. Ratz

Arthur V. Ratz · Answer 3 · 2015-08-14T03:01:00

I suppose, that it should exactly work:

PERL

#!/usr/local/bin/perl
use DBI;
use DBD::ODBC;
my $dbh = DBI->connect("dbi:ODBC:dsnentry", '', '', {PrintError => 0})
+;
die "Unable for connect to server" unless $dbh;
$dbh->{odbc_SQL_ROWSET_SIZE} = 2;
$query="EXEC EMPLOYEE_S_UPDATE 10";
my $result=$dbh->prepare($query) or print "cannot prepare" ;
$result->{LongReadLen}=512*1024;
$result->{LongTruncOk}=1;
$result->execute() or print $result->errstr();