技術小貼士

          主要分為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 行者 閱讀(221) 評論(0)  編輯  收藏

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


          網站導航:
           
          主站蜘蛛池模板: 淅川县| 博野县| 江永县| 宁海县| 绍兴市| 格尔木市| 铜梁县| 金华市| 桓台县| 巢湖市| 镇平县| 陆川县| 大荔县| 吉木萨尔县| 宜昌市| 凌云县| 镇平县| 汝州市| 华蓥市| 靖安县| 日照市| 贵阳市| 资兴市| 凤凰县| 龙岩市| 北安市| 博湖县| 长宁县| 德安县| 长白| 遂川县| 清苑县| 贵港市| 中宁县| 天门市| 大关县| 漳平市| 增城市| 扶绥县| 香格里拉县| 涿州市|