DROP PROCEDURE IF EXISTS `XofferCommon`.`getCdpc`;<br>
DELIMITER $$<br>
CREATE PROCEDURE `XofferCommon`.`getCdpc` (IN in_city_ID INT, OUT out_country_id INT, OUT out_district_id INT, OUT out_provence_id INT, OUT out_city_id INT)<br>
BEGIN<br>
DECLARE city_ID INT DEFAULT in_city_ID;<br>
SELECT t.Id, d.Id, p.Id, c.Id INTO out_country_id, out_district_id, out_provence_id, out_city_id FROM ((tblCity AS c INNER JOIN tblProvence AS p ON c.tblProvence_Id = p.ID) INNER JOIN tblDistrict AS d ON p.tblDistrict_Id = d.ID) INNER JOIN tblCountry AS t ON -d.tblCountry_Id = t.ID WHERE c.id = city_ID;<br>
END$$<br>
DELIMITER ;<br><br> …我正在使用形成数据包内容的函数(A).该函数接受任意数量的参数.我希望实现另一个函数(B),它形成由(A)形成的最后一个数据包.我希望通过运行(A)与我上次使用的相同参数(A)来实现这一点.诀窍是(A)使用类似的东西接受未知数量的参数
proc example {first {second ""} args}
是否有任何简单的方法可以快速保存所有参数,然后在以后再次使用相同的参数调用(A)？
我正在使用oracle 11g.我试图使用该命令在包内运行一个过程
execute package.procedure
但我一直得到例外
ERROR at line 1:
ORA-06550: line 1, column 12:
PLS-00302: component 'package' must be declared
ORA-06550: line 1, column 7:
PL/SQL: Statement ignored
我创建的包和包体如下.我在这里尝试做的是创建一个包,用于每次执行时创建表.所以我写了下面的脚本.
- - -包
create or replace package pack1 as
end pack1 ;
/
------包体
create or replace package body pack1 as
procedure proc1
is
begin
execute immediate 'create table bcd(bc date)';
end ;
procedure proc2
is
begin
execute immediate 'create table bcde(bc number(12,0)) as select country_id from countries';
end ;
end …我正在学习Scheme并使用一些例子来看看这些东西在起作用.
我正在使用Eclipse的Chicken解释器.
尝试运行以下代码时:
(define (bottles n)
(if (= n 0)
'burp
(begin (verse n)
(bottles (- n 1)))))
(define (verse n)
(show (cons n '(bottles of beer on the wall)))
(show (cons n '(bottles of beer)))
(show '(if one of those bottles should happen to fall))
(show (cons (- n 1) '(bottles of beer on the wall)))
(show '()))
(bottles 3)
我收到以下错误:
#;1> #;2> Note: the following toplevel variables are referenced but unbound:
verse (in bottles)
#;3> #;3> Note: the …我需要弄清楚如何使用void类型函数来更改另一个函数中的值,所以我正在尝试编写一个练习程序,它使用一个过程将一个整数从5更改为4然后打印新的整数(应该是4).
#include <stdio.h>
#include <stdlib.h>
void change(int x)
{
x = 4;
}
int main(int argc, char **argv)
{
int z = 5;
change(z);
printf("%d\n",z);
return 0;
}
最后打印5个.我可以告诉你这里的范围存在某种问题,但我无法弄清楚如何解决它.我也无法在程序中打印,因此解决方案是不可能的.我真的很感激任何帮助!
我的学习mysql和我的问题是检查我在这里做错了什么:
我正在尝试制作一个sql程序来检查用户输入的第一个数字是奇数还是偶数但是我在第9行附近获得语法错误'; //'
这是sql:
MYSQL>
DELIMITER //
CREATE PROCEDURE num()
BEGIN
IF (SELECT LEFT(num,1))=1 OR (SELECT LEFT(num,1))=3 OR (SELECT LEFT(num,1))=5 OR (SELECT LEFT(num,1))=7 THEN
SELECT 'number is odd';
ELSEIF (SELECT LEFT(num,1))=2 OR (SELECT LEFT(num,1))=4 OR (SELECT LEFT(num,1))=6 OR (SELECT LEFT(num,1))=8 THEN
SELECT 'number is even';
END IF;
END;//
以下是用于测试的CALL:
MYSQL> CALL num(3123123123)
有任何想法吗？
我有一个程序可以为我做一些错误检查，并从不同的程序调用。我希望能够做的是，如果输入了不正确的数据并且错误检查过程发现了这一点，那么我想停止调用错误检查过程的过程。即如果错误检查程序是
sub errorCheck
和主要程序是
sub main
和主要调用错误检查。当发现错误时，我希望 sub errorCheck 停止 main。我曾尝试使用 exit sub 但这仅退出 errorCheck sub 而不是 main
和帮助会很好谢谢
我想为我的oracle DB创建一个脚本,它会丢弃表.如果表不存在,脚本将不会退出失败,只需打印文本:" 不存在 ".
该脚本如下:
BEGIN
EXECUTE IMMEDIATE 'DROP TABLE mytable';
DBMS_Output.Put_Line(' table dropped');
EXCEPTION WHEN OTHERS THEN
IF SQLCODE = -942 THEN
DBMS_Output.Put_Line(' table not exists');
ELSE
DBMS_Output.Put_Line(' Unknown exception while dropping table');
RAISE;
END IF;
END;
我想在一个脚本中删除很多表,我不想多次写这些行.
有没有办法,把它写入获取参数(表名)的过程或函数,并在该脚本中调用此过程？
也许是这样的:
drop_table_procedure('mytableA');
drop_table_procedure('mytableB');
或者可能是一个过程,它获取一个未定义的大小列表(如在java:String ...表名中):
drop_tables_procedure('mytableA','mytableB');
请举个例子.谢谢!
我想用一些选项创建 tcl 过程。我知道带有参数和可选参数的过程，但不知道选项。例如，如果我以以下三种方式调用我的过程 arith（-add 表示加法，-sub 表示减法）：
1) arith 10 5
2) arith -add 10 5 or arith 10 5 -add
3) arith -sub 10 5 or arith 10 5 -sub
分别输出应该是1) 15 (默认应该加), 2) 15, 3) 5
如何在Tcl中编写此程序？我是 tcl 的新手，请给我推荐一些关于 Tcl 的在线材料或书籍。
我正在尝试将XML文件的信息保存在数据库表中，我正在使用以下过程：
create or replace PROCEDURE P_FILEUPLOAD_XML (P_CMTT_CODE IN NUMBER DEFAULT 15, P_TEXT IN VARCHAR2, P_TEXT_NAR IN VARCHAR2, P_PATH IN VARCHAR2, P_FILENAME IN VARCHAR2, P_RET_VAL OUT NUMBER) IS
GRUPO VARCHAR2(20);
l_dir CONSTANT VARCHAR2(35) := P_PATH;
l_fil CONSTANT VARCHAR2(30) := P_FILENAME;
l_loc BFILE; -- Pointer to the BFILE
l_ret BOOLEAN := FALSE; -- Return value
l_pos NUMBER := 1; -- Current position in the file (file begins at position 1)
l_sum number default 8000; -- Amount of characters have been …