技術小貼士

          主要分為DB、OS和ERP三大塊

            BlogJava :: 首頁 :: 新隨筆 :: 聯系 :: 聚合  :: 管理 ::
            12 隨筆 :: 0 文章 :: 0 評論 :: 0 Trackbacks

          1、宏模塊
                ----------------------------------------------------------------------------------------
                (1) 宏定義:     
                      DEFINE  <macro>.
                           <宏敘述>.
                      END-OF-DEFINITION.

              (2) 宏使用:
                    <macro> [<p1> <p2>….]
                   *  <p1> 為傳入宏的參數值, 在參數間至少要給予一個空白


          2、包含子程序  
             ------------------------------------------------------------------
             語法:INCLUDE  <include program file>
                作用:用于共享數據項,比如全局變量


          3、子程序
             ------------------------------------------------------------------
             1、聲明:
                FORM  <subr>  [<pass>].
                               
          <subroutine statement block>
                      
          ENDFORM.

             2、調用:
                (1) 內部調用:PERFORM <subr> [<pass>] 

                      (2)   外部調用:
                    ① 調用另一程序
                       PERFORM  <subr>(<prog>) [<pass>] [IF FOUND] 
           
                    ② 調用另一專存放子程序的程序文件
                       PERFORM  (<fsubr>)  [IN  PROGRAM (<fprog>) [<pass>] [IF FOUND]

             * 參數傳遞
               ------------------------------------------------------------------
               (1) 地址傳遞:
                   FORM  <subr>  [USING <f1> <f2>…] [CHANGING <f1>…]
                            或
                            PERFORM  <subr>  [USING <f1> <f2>…] [CHANGING <f1>…]

               (2) 值傳遞:
                   FORM  <subr>  USING  VALUE(<f1>…)
                            或
                            PERFORM  <subr>  USING  <f1> 

                     (3)  傳入時值傳遞,傳出時改變返回參數值 
                   FORM  ….. CHANGING  VALUE(<f1>
                            或
                            PERFORM  …. CHANGING …. <f1>

             * Check控制:CHECK <Condition>,只有條件成立才繼續往下子程序敘述


          4、函數
             ------------------------------------------------------------------
             (1) 查看系統函數

             (2) 函數呼叫:
                 CALL  FUNCTION  <module>
                         IMPORTING   F1=a1….
                         EXPORTING   F1=a1….
                         CHANGING   F1=a1…
                         TABLES      F1=a1…
                         EXCEPTIONS  F1=a1…     
           

              


                  

          posted on 2005-11-21 23:50 行者 閱讀(219) 評論(0)  編輯  收藏

          只有注冊用戶登錄后才能發表評論。


          網站導航:
           
          主站蜘蛛池模板: 陆河县| 宽甸| 辽宁省| 体育| 灵丘县| 广德县| 义乌市| 嘉鱼县| 南通市| 淮阳县| 游戏| 永修县| 水城县| 东方市| 延庆县| 平谷区| 托克逊县| 安溪县| 东山县| 金湖县| 桃园市| 亚东县| 西平县| 武清区| 西畴县| 余江县| 迭部县| 樟树市| 台湾省| 湖北省| 平山县| 永嘉县| 芷江| 杭锦后旗| 永德县| 那曲县| 托克托县| 佛山市| 工布江达县| 十堰市| 南漳县|