再推荐一个很烂的PL/SQL程序，供大家参考

moonsoft

最初由 lxm365 发布
[B]提交一个我自己写的报表程序。（这也是我第一次写PL/SQL程序）。
我知道我们公司的这些顾问还未改行，希望你们以后改改，要不改紧改行。 [/B]

很容易看明白

lxm365

恰恰是技术顾问也
要是业务顾问也就不勉强。

最初由 hphubei 发布
[B]那他到底是什么类型的顾问，技术顾问，业务顾问还是什么？ [/B]

hphubei

最初由 kunpeng_li 发布
[B]其实这些问题应该是他们老大的原因。刚工作的人多数是和他们老大学的。在学校的时候能知道什么呀，还不都是刚开始工作的时候老大给个例子照着做养成的呢。 [/B]

这个的影响是会比较大的

Harry_shan

顾问也是从初级到高级啊

zhongzhong12345

也很有個性!!!
恐怕也是這些顧問態度也很牛B, 否則也不會把他們的底給抖出來!!
你的 PL/SQL 程序很清晰,一遍就可以知道一個大概;  哪個顧問的確實很亂, 看了兩遍, 我沒有看出個所以然.

怎樣說這些顧問呢?!!!!  咳, 因為也有同感, 還是算了, 我心中的顧問形象早被這些傢伙破壞殆盡了.

windff

需要好的开发顾问可以找我们啊，我们这刚毕业半年的技术顾问代码写得也比他强多了

huangkungan

最初由 Harry_shan 发布
[B]顾问也是从初级到高级啊 [/B]

楼主要体谅一下别人.

也许再写个一二年，回过头时，才发现当初是多少的傻

kunpeng_li

PROCEDURE HTML_CELL
  (
    P_TEXT  IN VARCHAR2,
    P_ALIGN IN CHAR DEFAULT 'C'
  ) IS
  BEGIN
    CASE P_ALIGN
      WHEN 'C' THEN
        DBMS_OUTPUT.PUT_LINE('<TD class=xCenter>' ||
                             NVL(P_TEXT,
                                 '&nbsp') || '</TD>');
      WHEN 'R' THEN
        DBMS_OUTPUT.PUT_LINE('<TD class=xRight>' ||
                             NVL(P_TEXT,
                                 '&nbsp') || '</TD>');
      ELSE
        DBMS_OUTPUT.PUT_LINE '<TD class=xLeft>' || NVL(P_TEXT,
                                                       '&nbsp') || '</TD>');
    END CASE;
  END HTML_CELL;
为什么我在编译的时候不通过？

kunpeng_li

这个CASE语句是不是和其他的因素有关呢？

lxm365

在最后一个DBMS_OUTPUT.PUT_LINE 语句后少了一个括号。

最初由 kunpeng_li 发布
[B]PROCEDURE HTML_CELL
  (
    P_TEXT  IN VARCHAR2,
    P_ALIGN IN CHAR DEFAULT 'C'
  ) IS
  BEGIN
    CASE P_ALIGN
      WHEN 'C' THEN
        DBMS_OUTPUT.PUT_LINE('<TD class=xCenter>' ||
                             NVL(P_TEXT,
                                 '&nbsp') || '</TD>');
      WHEN 'R' THEN
        DBMS_OUTPUT.PUT_LINE('<TD class=xRight>' ||
                             NVL(P_TEXT,
                                 '&nbsp') || '</TD>');
      ELSE
        DBMS_OUTPUT.PUT_LINE '<TD class=xLeft>' || NVL(P_TEXT,
                                                       '&nbsp') || '</TD>');
    END CASE;
  END HTML_CELL;
为什么我在编译的时候不通过？ [/B]