SAK }‘ŠÙ

SAK Streets ƒƒCƒ“ƒXƒgƒŠ[ƒg }‘ŠÙEƒJƒtƒF ˆê—— SAK Streets ŒŸõ
| VB | SQL | Perl | PHP | ASP | JSP | C | PC | HP | FAQ | ƒtƒŠ[ƒ\ƒtƒg |

SQL Šî‘b•Ò (‚»‚Ì‹ã) PL/SQL declareAbeginADBMS_SQLAdbms_output

ƒ†[ƒUŠÖ”‚É‚·‚é‚Ù‚Ç‚Å‚à‚È‚¢ƒVƒXƒeƒ€ŠJ”­Žž‚Ì SQL ‚ÍAPL/SQL ‚Æ‚·‚é‚Æ•Ö—˜
‚©‚à‚µ‚ê‚Ü‚¹‚ñB
Oracle ŒÅ—L‚Ì•”•ª‚ª‚ ‚é‚©‚à‚µ‚ê‚Ü‚¹‚ñBSQL-ServerAMDB ‚Å‚Í’ˆÓ‚Ì‚±‚ÆB

¡Šî–{Œ^

set serveroutput on;

declare
  cursor c1 is select * from sak.Žó’m
    where •i”Ô = 'a001' order by Žó’”Ô†;
  -- rec c1%rowtype;
begin
  dbms_output.put_line ('start...');
  for rec in c1 loop
    dbms_output.put_line (rec.Žó’”Ô† || ' ' || rec.•i”Ô);
  end loop;
  dbms_output.put_line ('end');
exception
  when OTHERS then
    dbms_output.put_line ('** ƒGƒ‰[ **');
end;
/

¡“®“I SQL

declare
  tbl in varchar2 default 'sak.test';
  cid integer;
begin
  cid := DBMS_SQL.OPEN_CURSOR;
  DBMS_SQL.PARSE(cid, 'create table ' || tbl || ' (ƒf[ƒ^ number(9))', dbms_sql.v7);
  DBMS_SQL.CLOSE_CURSOR(cid);
  dbms_output.put_line ('end');
exception
  when OTHERS then
    dbms_output.put_line ('** ƒGƒ‰[ **');
end;
/

¡SQL Šî‘b•ÒŽ‘—¿
¡SQL Šî‘bŽÀ’n•ÒŽ‘—¿
¡SQL ƒ`ƒ…[ƒjƒ“ƒO•ÒŽ‘—¿
¡Oracle PL/SQL •ÒŽ‘—¿
¡PostgreSQL •ÒAJAVA ServletAJSP •ÒŽ‘—¿
¡MySQL •ÒŽ‘—¿
| VB | SQL | Perl | PHP | ASP | JSP | C | PC | HP | FAQ | ƒtƒŠ[ƒ\ƒtƒg |

SAK Streets ƒƒCƒ“ƒXƒgƒŠ[ƒg }‘ŠÙEƒJƒtƒF ˆê—— SAK Streets ŒŸõ



Copyright (C) 1999-2024 Y.SAK