RPGIV编程技巧（2）MEMBER问题：RPG源代码库看不到源代码

RPGIV编程技巧（2）MEMBER问题：RPG源代码库看不到源代码

 

Track(181818724) 22:27:08
  我们主机上有些RPGLE看不到源代码，但通过OVRDBF后就可以看到
厦门★passthru(448081936) 22:28:21
  ovrdbf与看rpgle源代码没有任何关系呀，
Track(181818724) 22:29:15
  用5进去后只看到H表里的内容
厦门★passthru(448081936) 22:29:24
  你这些没有办法看不到rpgle源代码的程序，是否可以debug？
Track(181818724) 22:29:37
  不行
Track(181818724) 22:30:52
  我用CA又可以把这个源代码DOWN下来
厦门★passthru(448081936) 22:30:57
  确信在ovrdbf之后，就可以看到这些rpgle原代吗？是怎么看到的？
Track(181818724) 22:31:07
  确信！
厦门★passthru(448081936) 22:31:18
  是怎么看到的？
Track(181818724) 22:32:15
  我通过OVRDBF,把这个MEMBER，指向到别一个FILE，再用SQL里把它输出到FILE，就可以看到了
厦门★passthru(448081936) 22:33:46
  这个member是什么？
Track(181818724) 22:34:00
  RPGLE
Track(181818724) 22:35:21
  OVRDBF FILE(OVR1) TOFILE(TRZHONGS/QRPGLESRC) MBR(DQUYRPG)
云风(48698398) 22:36:22
  用程序看的src？
Track(181818724) 22:36:30
  上面的“DQUYRPG”就是一个MEMBER,
Track(181818724) 22:36:33
  SOURCE
厦门★passthru(448081936) 22:37:17
  呵呵，这个OVR1不能打开吗？
Track(181818724) 22:38:53
  这样转了后，用SQL，按F13，把它输出到*FILE,再SELECT * FROM OVR1  用5去看OVR1，代码就出来了
厦门★passthru(448081936) 22:39:39
  你直接用dfu打开ovr1看看
Track(181818724) 22:40:18
  DFU？
Track(181818724) 22:42:38
  DFU是什么啊
Mike(764837038) 22:43:21
  你好，DFU意思为Data File Utility(数据文件输入及数据文件显示工具)。
厦门★passthru(448081936) 22:43:52
  对，就是这个
厦门★passthru(448081936) 22:44:08
  呵呵，我还认为我搞错了。
Track(181818724) 22:44:17
  这个怎么来打开呢
厦门★passthru(448081936) 22:45:30
  STRDFU
Track(181818724) 22:46:30
  试式。。
Track(181818724) 22:47:23
  现在还试不了，连不到主机
Track(181818724) 22:47:49
  这有没有可能是被隐藏起来了？
Track(181818724) 22:48:33
  应该不会是删掉了吧
厦门★passthru(448081936) 22:49:40
  我在想，你的问题可以能是pf（OVR1）中没有加入member DQUYRPG的问题，因为这个pf的member属性被改了，必需指定member名才能打开。
厦门★passthru(448081936) 22:50:58
  即OVR1 pf的member属性被改了
厦门★passthru(448081936) 22:53:33
  bpcs中很多保护措施，都是在调用rpg程序之前，用cl处理，在rpg使用的文件中加入指定的member。这样才能正常使用rpg程序，否则就报错。
Track(181818724) 22:54:02
  我们这个主机在日本，这个机器上很多FILE下的MEMBER都看不到SOURCE，包括有些DSPF，用17都不给看
厦门★passthru(448081936) 22:57:00
  写个cl，读出要查看pf的member list。如果没有你的用户id member，把这个pf的member数+1，把你的usrid加入到这个pf member list，然后用sql就可以打开看到你面的内容了。
厦门★passthru(448081936) 22:57:44
  或用ovrdbf方法
厦门★passthru(448081936) 22:59:06
  或，直接用strsql用指定member DQUYRPG打开OVR1.
厦门★passthru(448081936) 22:59:53
  呵呵，小把戏。
Track(181818724) 23:00:23
 ，嗯，下去试试看
Track(181818724) 23:02:34
  可能是对某些用户的限制，上次看到小日本用他自己的用户就可以看到
厦门★passthru(448081936) 23:03:03
  ovrdbf的目的：1）使用一个pf的记录格式；2）指定一个member。通常member都是系统默认的。
厦门★passthru(448081936) 23:03:57
  因为，这些用户的usrid是已经加入在这个pf的member list中了。
Track(181818724) 23:04:28
  嗯，原来是这样
厦门★passthru(448081936) 23:06:44
  按我上面讲的cl程序处理步骤，把自己的usrid加入。嘿嘿，让小日本也知道，中国也有这方面的高手。