Chinaunix首页 | 论坛 | 博客
  • 博客访问: 13600
  • 博文数量: 17
  • 博客积分: 0
  • 博客等级: 民兵
  • 技术积分: 10
  • 用 户 组: 普通用户
  • 注册时间: 2017-01-20 14:00
文章分类

全部博文(17)

文章存档

2017年(17)

我的朋友

分类: 信息化

2017-01-20 14:08:33

    *COPYRIGHT设置
    让我们从一个比较无聊的技术开始吧,哈哈。COPYRIGHT就是编译成目标后,可以用DSPPGM,DSPMOD等,翻到版权页,显示的字符串。这个要怎么弄呢?考虑到系统有很多程序,因此采用了设置包含源文件的方式实现。


    RPGLE
    应用程序:

  1. H/COPY DSCPPGM,HEAD

    HEAD源文件:
  1. HCOPYRIGHT('Firebird V2.1 corebanking system')
  2. HDATFMT(*ISO) TIMFMT(*ISO) DATEDIT(*YMD)


    C/C++
    应用程序:

  1. #include "dscppgm/cpyrgt_h"

     CPYRGT_H源文件:
  1. #ifndef CPYRGT_H
  2. #define CPYRGT_H
  3. #pragma comment(copyright,"Firebird V2.1 corebanking system")
  4. #endif



    CLLE
    应用程序:

  1. INCLUDE SRCMBR(CLHD) SRCFILE(DSCPPGM)


    CLHD源文件:

  1. COPYRIGHT TEXT('Firebird V2.1 corebanking system')



    但是,AS400的CL在COPYRIGHT处理上并不完美。RPG,C都可以设置DBCS中文字符串,CL带中文的话编译报错。DEBUG时,CL也会因为INCLUDE引入而导致没有普通视图。这一点,不知道高版本是否有改善,有环境的话可以测试验证一下。


阅读(509) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~