Chinaunix首页 | 论坛 | 博客
  • 博客访问: 308352
  • 博文数量: 40
  • 博客积分: 1
  • 博客等级: 民兵
  • 技术积分: 670
  • 用 户 组: 普通用户
  • 注册时间: 2011-07-31 11:19
个人简介

从事银行核心系统设计开发的程序猿

文章存档

2019年(1)

2018年(4)

2017年(11)

2016年(6)

2015年(18)

分类: 信息化

2015-05-31 15:31:01

    *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引入而导致没有普通视图。这一点,不知道高版本是否有改善,有环境的话可以测试验证一下。


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