(1)定義-- 10進数→n進数CREATE OR REPLACE FUNCTION DecToNshin(    dec_num IN NUMBER,    n_shin IN NUMBER)RETURN VARCHAR2(32)IS    ltr CHAR(36);    w_dec_num NUMBER;    amari NUMBER;    w_DecToNshin VARCHAR2(32);BEGIN    ltr := '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ';    w_DecToNshin := '';    w_dec_num := dec_num;    WHILE w_dec_num >= n_shin LOOP        amari := mod(w_dec_num, n_shin);        -- 剰余         w_DecToNshin := substr(ltr, amari+1, 1) || w_DecToNshin;        w_dec_num := w_dec_num / n_shin;    END LOOP;    w_DecToNshin := substr(ltr, w_dec_num+1, 1) || w_DecToNshin;    RETURN w_DecToNshin;END;/(2)実行SELECT DecToNshin(100, 16);
(1)定義create function dbo.DecToNshin(@dec_num       int, @n_shin        smallint) returns varchar(32)---- 10進数→n進数--begin declare @ltr          char(36) declare @w_dec_num    int declare @amari        int declare @w_DecToNshin varchar(32) set @ltr='0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ' set @w_DecToNshin='' set @w_dec_num=@dec_num while @w_dec_num>=@n_shin  begin   set @amari=@w_dec_num%@n_shin             -- 剰余   set @w_DecToNshin=substring(@ltr,@amari+1,1)+@w_DecToNshin   -- +:文字連結   set @w_dec_num=@w_dec_num/@n_shin  end set @w_DecToNshin=substring(@ltr,@w_dec_num+1,1)+@w_DecToNshin return @w_DecToNshinend(2)実行select dbo.DecToNshin(100,16)
(1)定義create or replace function DecToNshin(dec_num       int, n_shin        int) returns varchar(32) as $$---- 10進数→n進数--declare ltr          char(36) default '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'; w_dec_num    int; amari        int; w_DecToNshin varchar(32);begin w_DecToNshin:=''; w_dec_num:=dec_num; while w_dec_num>=n_shin loop  amari:=w_dec_num%n_shin;            -- 剰余  w_DecToNshin:=substr(ltr,amari+1,1)||w_DecToNshin;  w_dec_num:=w_dec_num/n_shin; end loop;  w_DecToNshin:=substr(ltr,w_dec_num+1,1)||w_DecToNshin; return w_DecToNshin;end;$$ language 'plpgsql';(2)実行select DecToNshin(100,16);(3)削除仮に削除する場合も、引数の宣言が必要である。drop function DecToNshin(dec_num       int, n_shin        int);
(1)定義drop procedure if exists DecToNshin;   -- 存在したら削除delimiter //                           -- 終端記号の変更create procedure DecToNshin(in dec_num int, in n_shin tinyint, out w_DecToNshin varchar(32))---- 10進数→n進数--begin declare ltr          char(36) default '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'; declare w_dec_num    int; declare amari        int; set w_DecToNshin=''; set w_dec_num=dec_num; while w_dec_num>=n_shin do  set amari=mod(w_dec_num,n_shin);  set w_DecToNshin=concat(substr(ltr,amari+1,1),w_DecToNshin);  set w_dec_num=w_dec_num div n_shin; end while;  set w_DecToNshin=concat(substr(ltr,w_dec_num+1,1),w_DecToNshin);end;//delimiter ;                            -- 終端記号を元に戻す(2)実行CALL DecToNshin(100,16,@RSLT);         -- 100を16進数にすると？SELECT @RSLT;                          -- 結果の表示
ルイジアナ州。リアムは歌手になる夢を叶えるべく、婚約者のジョジーを置き去りにして都会へと向かった。それから8年後、リアムはカントリー歌手として見事成功を収めていた。ニューオーリンズでのコンサートを終えたリアムの元に、メイソンが自動車事故で亡くなったとの知らせが飛び込んできた。メイソンはジョジーとの婚約を取り持ってくれた人間の一人であった。リアムは故郷に帰ってメイソンの葬儀に参列した。リアムは目立たないようにしていたのだが、運悪くジョジーに見つかってしまった。メイソンの埋葬が終わった後、ジョジーはリアムにパンチを食らわせた。リアムは父親（ブライアン）の元に滞在することとなったが、ブライアンはリアムに対して冷淡な態度を取った。有名になってから一度も連絡をよこさなかった息子に腹を立てていたためである。久しぶりに町を見て回っていると、リアムはジョジーに会った。彼女は花屋の経営で生計を立てているのだという。リアムはジョジーに7歳の娘（ビリー）がいることを知って驚愕したが、しかもその父親は自分であった。リアムが町を出た半月後に妊娠が判明したため、ジョジーは何とかしてリアムと連絡を取ろうとしたが、事情を知らなかったリアムは電話を無視してしまったのである。懇願の末、リアムはビリーと対面することができた。リアムにあった瞬間、ビリーは彼が自分の父親であることを見抜いた。その様子を見たジョジーは大層驚いた。ビリーの協力の下、リアムはジョジーと復縁するべく奮闘していくのだった。