求个函数，在线等啊

Question

本人想写个函数！~自动生成排产单。格式是0707A，如果当月15号后就是0707B，请问怎么写，谢谢！~我这样写对 吗？create or replace function OQC_PAICHANDAN
return varchar2 is r_num varchar2(40);
PRAGMA AUTONOMOUS_TRANSACTION ;
begin
select to_char(sysdate,'yymmdd') from dual
if dd<15  then
r_num=(select to_char(sysdate,'yymm') from dual)+A
else 
r_num=(select to_char(sysdate,'yymm') from dual)+B
end if;
RETURN r_num;
end;

Answer 1

create or replace function OQC_PAICHANDAN
return varchar2 is r_num varchar2(10);
PRAGMA AUTONOMOUS_TRANSACTION;
dd varchar2(2);
ym varchar(6);
begin
select to_char(sysdate,'dd') into dd,to_char(sysdate,'yyyymm') into ym from dual;
if dd<15  then
r_num:= ym || 'A';
else 
r_num:= ym || 'B';
end if;
RETURN r_num;
end OQC_PAICHANDAN;

Answer 2

一起给你个select语句select insert_date,to_char(insert_date,'yymm') || decode(CEIL(to_char(insert_date,'dd')/15),1,'A',2,'B','B') from 表名

Answer 3

.....自己分析一下吧。去找点函数看看。
SELECT insert_date,DECODE(TO_CHAR(insert_date,'YYYYMMDD'),TO_CHAR(next_day(TO_DATE(TO_CHAR(TO_DATE(insert_date),'YYYYMM')||'10'),1),'YYYYMMDD'),TO_CHAR(insert_date,'YYMM')||'A',insert_date) FROM 表

Answer 4

就是说一个月的中旬的第一个星期天变成B，怎么实现啊1~？=================================================================早说撒，用sql ...select insert_date,
       decode(insert_date,decode(to_char(last_day(insert_date) - round(extract(day from last_day(insert_date))/2),'D'),
              '1',last_day(insert_date) - round(extract(day from last_day(insert_date))/2),
              next_day(last_day(insert_date) - round(extract(day from last_day(insert_date))/2),1)),to_char(insert_date,'yymm')||'B',to_char(insert_date,'yymm')||'A') new_insert_date from table_name;