감사합니다.
tk 님이 쓰신 글 :
: 저도 필요해서 그냥 함 만들어본 프로시져 입니다.
: 파이어버드,인터베이스 프로시져 는 테이블 형태로도 인식하더군요
: 즉 left outer join REF_STR( '6',0,9) 이런식으로요
:
:
: CREATE PROCEDURE REF_STR (
: IG VARCHAR(8),
: SS CHAR(1),
: VL INTEGER
: ) RETURNS (
: RT VARCHAR(12)
: ) AS
: declare variable tki integer;
: declare variable tks varchar(8);
: begin
: tki =0;
: tks ='';
: while (tki < (:vl - strlen(:ig) ) ) do
: begin
: tki = tki + 1;
: tks = tks || :ss;
: end
: rt = tks || :ig;
:
: suspend;
: end
: 위처럼 프로시저 생성후
: select * from REF_STR( '6',0,9)
:
: REF_STR( '6',0,9)
: '6'이란 변수를 9자리까지 0으로 채우는 프로시져 입니다.
:
|