Journal 转为 PF

最新推荐文章于 2022-10-16 11:02:43 发布

JmLei

最新推荐文章于 2022-10-16 11:02:43 发布

阅读量909

点赞数 1

分类专栏： AS400/RPGLE/CL 文章标签： DSPJRN OUTFILE RPGIL

本文链接：https://blog.csdn.net/jmlei/article/details/51221612

版权

本文档详细介绍了如何使用CLLE程序将Journal文件转换为PF文件，涉及到DSPJRN OUTFILE命令和RPGIL语言的运用，为AS/400系统中的数据处理提供支持。

摘要由CSDN通过智能技术生成

CLLE

DSPJRN JRN(V810LIB/HPOJRN) FILE((V810LIB/HPO)) FROMTIME(042216 110000) 
ENTTYP(*RCD) OUTPUT(*OUTFILE) OUTFILFMT(*TYPE4) 
OUTFILE(DAVIDZHAO/HPOJRN160A) ENTDTALEN(1500)

     A*****************************************************************
     A*  FILE NAME       :  PLGHPO
     A*  FILE DESCRIPTION:  PRODUCTION LOG - HPO
     A*  CREATED DATE    :  20160422
     A*  CREATED BY      :  David Zhao
     A*
     A*  MODIFICATIONS:
     A*****************************************************************
     A*
     A                                      REF(HPO)
     A          R PLGHPOR
     A            P1DATE         8  0       TEXT('DATE')
     A                                      COLHDG('DATE')
     A            P1TIME         6  0       TEXT('TIME')
     A                                      COLHDG('TIME')
     A            P1JOB         10          TEXT('JOB')
     A                                      COLHDG('JOB')
     A            P1USER        10          TEXT('USER')
     A                                      COLHDG('USER')
     A            P1ENTT         2          TEXT('Enter Type')
     A                                      COLHDG('Enter Type')
     A            P1NBR          6  0       TEXT('JOB NUMBER')
     A                                      COLHDG('JOB NUMBER')
     A            P1PGM         10          TEXT('PROGRAM')
     A                                      COLHDG('PROGRAM')
     A            P1OBJ         10          TEXT('OBJECT')
     A                                      COLHDG('OBJECT')
     A            P1LIB         10          TEXT('LIBRARY')
     A                                      COLHDG('LIBRARY')
     A            P1MBR         10          TEXT('MEMBER')
     A                                      COLHDG('MEMBER')
     A
     A            PID       R               REFFLD(PID       )
     A            PORD      R               REFFLD(PORD      )
     A            PLINE     R               REFFLD(PLINE     )
     A            PPROD     R               REFFLD(PPROD     )
     A            PVEND     R               REFFLD(PVEND     )
     A            PQORD     R               REFFLD(PQORD     )
     A            PQREC     R               REFFLD(PQREC     )
     A            PDDTE     R               REFFLD(PDDTE     )
     A            PCLAS     R               REFFLD(PCLAS     )
     A            PSCST     R               REFFLD(PSCST     )
     A            PECST     R               REFFLD(PECST     )
     A            PACST     R               REFFLD(PACST     )
     A            PSTAT     R               REFFLD(PSTAT     )
     A            PLTDT     R               REFFLD(PLTDT     )
     A            PPRT      R               REFFLD(PPRT      )
     A            PLDTE     R               REFFLD(PLDTE     )
     A            PCQTY     R               REFFLD(PCQTY     )
     A            PCMT      R               REFFLD(PCMT      )
     A