create or replace function f_zzlr_getdictname (dictid in varchar2,dictval
return varchar2 is v_dictname varchar2(50); begin begin select aaa103 into v_dictname from aa10 where aaa100=dictid and aaa102=dictval; EXCEPTION WHEN Others Then in varchar2)
v_dictname := null; end; return v_dictname; end; /
@@一：SELECT…………. 一
--特殊工时审批-根据确认受理时间，获取预警信息,参数日期格式:yyyy-mm-dd --特殊工时审批-根据确认受理时间，获取预警信息,参数日期格式:yyyy-mm-dd CREATE OR REPLACE FUNCTION f_tsgssp_getEarlyWarningInfo ( pi_sj Varchar2 ) RETURN VARCHAR2 IS v_starday v_endday varchar2(10); varchar2(10);
v_workdaynum Number; v_earlyWarningInfo varchar2(100); Begin If pi_sj is not null and f_length(pi_sj) = 10 Then Begin v_workdaynum:=-1; Select pi_sj, to_char(Sysdate,'yyyy-mm-dd' ) into v_starday,v_endday From dual; WHILE v_starday <= v_endday LOOP If f_isWorkDay(v_starday) Then v_workdaynum:=v_workdaynum+1; End If; Select to_char(to_date(v_starday,'yyyy-mm-dd')+1,'yyyy-mm-dd' ) into v_starday From dual; END LOOP; CASE WHEN v_workdaynum<=5 THEN v_earlyWarningInfo:= null; WHEN v_workdaynum<=8 THEN v_earlyWarningInfo:='<img src=''../images/yellow.gif'' border=''0'' />'; WHEN v_workdaynum<=10 THEN v_earlyWarningInfo:='<img src=''../images/red.gif'' border=''0'' />'; ELSE END CASE; Exception When Others Then v_earlyWarningInfo := null; v_earlyWarningInfo:='<img src=''../images/redloop.gif'' border=''0'' />';
End; Else v_earlyWarningInfo := null; End If; return v_earlyWarningInfo; End f_tsgssp_getEarlyWarningInfo; /
@@ BEGIN IF WHILE---LOOP CASE EXCEPTION RETURN
--特殊工时审批-获取业申请信息列表中“审批结果”为“通过”的岗位名称，多个岗位名称以、 分隔。 CREATE OR REPLACE FUNCTION f_tsgssp_yes_fetchgwxx ( AAC002_ in varchar2,BZD115_ in varchar2 ) RETURN VARCHAR2 Is v_retrunInfo varchar2(3000); CURSOR AllBAE010 IS Begin select BAE010 from ZE08 where BFE086='01' and BZD115=BZD115_ and AAC002=AAC002_;
FOR BAE010 IN AllBAE010 Loop v_retrunInfo:=v_retrunInfo||BAE010.BAE010||'、'; End Loop; If instr(v_retrunInfo,'、')>0 Then v_retrunInfo:=substr(v_retrunInfo,0,length(v_retrunInfo)-1); End If; return v_retrunInfo; End f_tsgssp_yes_fetchgwxx; /
@@二：FOR---LOOP 二
CURSOR SELECT………….
Oracle 系列：Cursor 系列：
1，什么是游标？
①从表中检索出结果集，从中每次指向一条记录进行交互的机制。 ②关系数据库中的操作是在完整的行集合上执行的。 由 SELECT 语句返回的行集合包括满足该语句的 WHERE 子句所列条件的所有行。由该语句 返回完整的行集合叫做结果集。 应用程序，尤其是互动和在线应用程序，把完整的结果集作为一个单元处理并不总是有效 的。 这些应用程序需要一种机制来一次处理一行或连续的几行。而游标是对提供这一机制的结 果集的扩
