论坛徽章:: 0

电梯直达

1楼 [收藏(0)] [报告]

发表于 2011-07-20 16:38 |只看该作者 |倒序浏览

本帖最后由 BPCS123 于 2011-07-20 16:39 编辑

想把MRP600 MRP500设定为自动运行,但是里面的参数(日期.场所)是怎么修改? BPCS 版本是6.0

怎么设定参数自动运行BPCS的 MRP600 & MRP500??

文库|博客

BPCS123

白手起家

论坛徽章:: 0

2楼 [报告]

发表于 2011-07-25 09:13 |只看该作者

回复 1# BPCS123

还在等待回答中。。。

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

BPCS123

白手起家

论坛徽章:: 0

3楼 [报告]

发表于 2011-07-28 11:58 |只看该作者

问题还是没有解决，期待中。

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

ChrisChang2003

白手起家

论坛徽章:: 0

4楼 [报告]

发表于 2011-09-30 15:19 |只看该作者

本帖最后由 ChrisChang2003 于 2011-10-06 14:25 编辑

你必須要有 BPCS 的 MRP500D & MRP600D 的原代碼才可以更改 ! 有了之後直接在 RPG 上更改默認值 !

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

ChrisChang2003

白手起家

论坛徽章:: 0

5楼 [报告]

发表于 2011-09-30 15:23 |只看该作者

本帖最后由 ChrisChang2003 于 2011-10-06 14:26 编辑

Columns . . . : 1  71          Browse                      DHSRC1/QRPGSRC
SEU==>                                                                MRP500D
FMT *  ..... *. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
0540.00    C*                                                             *
0541.00    C* XPSDTE = W1SDTE
0542.00    C                Z-ADD    W1SDTE       XPSDTE
0543.00 CC01 C                MOVE    UDATE       XPSDTE
0544.00  . C                MOVEL    '41'       XFAC
0545.00 CC01 C                MOVEL    'Y'          XCLEAR
0546.00    C*                                                             *
0547.00    C* If Multi-Facility, display Facility
0548.00    C*                                                             *
0549.00    C* IF W1MFAC = 'Y'
0550.00    C    W1MFAC       IFEQ    'Y'
0551.00    C* GRPATR FACILITY,*DS
0552.00    C                MOVE    'X'          #DS
0553.00    C                MOVEL    'FACILITY' FLDNAM
0554.00    C                Z-ADD    *ZERO       FLDINX
0555.00    C                MOVEL(P)  'PANEL01 ' FLDSCR
0556.00    C                EXSR    SATRIB

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

BPCS123

白手起家

论坛徽章:: 0

6楼 [报告]

发表于 2011-10-06 16:02 |只看该作者

你必須要有 BPCS 的 MRP500D & MRP600D 的原代碼才可以更改 ! 有了之後直接在 RPG 上更改默認值 !
ChrisChang2003 发表于 2011-09-30 15:19

谢谢,我们就是因为没有代码.
但是程序不能使用参数的形式吗? 就像CALL PGM(MRP500D) PARM('FAC')

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

ChrisChang2003

白手起家

论坛徽章:: 0

7楼 [报告]

发表于 2011-10-07 09:34 |只看该作者

Call MRP500D 有10個參數 !

DCL VAR(&

001) TYPE(*CHAR) LEN(1) /* W1RTM */
DCL VAR(&

002) TYPE(*CHAR) LEN(1) /* W1STS */
DCL VAR(&

003) TYPE(*CHAR) LEN(1) /* W1MFAC */
DCL VAR(&

004) TYPE(*CHAR) LEN(1) /* W1SIM */
DCL VAR(&

005) TYPE(*DEC) LEN(1) /* W1DFMT */
         DCL       VAR(&X005) TYPE(*DEC) LEN(15 5) /* W1DFMT */
         DCL       VAR(&

006) TYPE(*DEC) LEN(6) /* W1SDTE */
         DCL       VAR(&X006) TYPE(*DEC) LEN(15 5) /* W1SDTE */
         DCL       VAR(&

007) TYPE(*CHAR) LEN(1) /* W1TYPE */
DCL VAR(&

00

TYPE(*CHAR) LEN(3) /* W1FAC */
DCL VAR(&

009) TYPE(*CHAR) LEN(1) /* W1CLR */
DCL VAR(&

010) TYPE(*DEC) LEN(6) /* W1EDTE */
         DCL       VAR(&X010) TYPE(*DEC) LEN(15 5) /* W1EDTE */

CALL    PGM(MRP500D) PARM(&P001 &P002 &P00+
         3 &P004 &P005 &P006 &P007 &P008 &P009 &P010)

你自己寫一個 CL Program , 再絡上你需要的值就可以了!

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

BPCS123

白手起家

论坛徽章:: 0

8楼 [报告]

发表于 2011-10-07 17:21 |只看该作者

Call MRP500D 有10個參數 !

DCL VAR(&001) TYPE(*CHAR) LEN(1) /* W1RTM */ ...
ChrisChang2003 发表于 2011-10-07 09:34

能不能具体说明一下参数的对应画面上面的输入.并且希望有 MRP600的参数列表.严重谢谢..

MRP500

Type desired selection criteria, press Enter.


Planning Start Date (MMDDYY)    9/04/99 Blank=Facility Planning Date

Planning End Date (MMDDYY)    99/99/99

Net Change or Regenerative (N,R)  R

Facility                                  (**=All Facilities)

Clear Planned Order File (Y,N) N




Run Time Parameter             1    (0=Interactive 1=Batch)


F1=Help  F3=Exit

MRP600

Type desired selection criteria, press Enter.

Planning Start Date (MMDDYY)    9/04/99

Planning End Date                99/99/99

Net Change or Regenerative (N,R)  N

Rebuild All Requirements       1  0=No, 1=Yes

Facility                                  (**=All Facilities)





Run Time Parameter             1  (0=Interactive 1=Batch)


F1=Help  F3=Exit