2005-02-02 日的学习内容

 王处开始教我学习aix

先 看看自己的情况

对unix基本上属于什么都不知道  要从0开始的  好在我们这里有好几台小机可供我学习使用。还有很多现在正在使用的4gl程序可以看。不过还是感觉有吃力毕竟windows系统以外的什么东西我没学过。数据库也基本上是0知道。   要用心了

根据王处的指导先从一个简单的4gl程序开始

GLOBALS 'sdsglb.4gl'
     DEFINE    io_fonly                 RECORD
               trandate                                DATE,
               termno                                  char(06)
                                END     RECORD

     DEFINE    wk_date                                 DATE,
               wk_time                                 CHAR(08),
               prt_time                                CHAR(06),
               wk_cnt                                  INTEGER,
               sr2                                     DECIMAL(11,2),
               prt_file                                CHAR(14)

     DEFINE    sr1                      RECORD
               logdate                                 DATE,
               logmcno                                 CHAR(6),
               trno                                    CHAR(6),
               datatype                                CHAR(1),
               taxpay                                  DECIMAL(11,2)
                         END  RECORD
########################################################################
#    main                                                              #
########################################################################
MAIN
"slr0179.4gl" 194 lines, 6518 characters