免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
› 论坛 › 操作系统 › AS400 › 400的下拉菜单，谁需要？
12下一页
最近访问板块 发新帖
查看: 2738 | 回复: 11
打印 上一主题 下一主题

400的下拉菜单，谁需要？ [复制链接]

brent_wu

论坛徽章:
0
跳转到指定楼层
1楼 [收藏(0)] [报告]
发表于 2004-02-04 13:48 |只看该作者 |倒序浏览
当年测试一天的结果。
存在磁带上，现在找不到400恢复（因为恢复数据要领导同意）。
如果有人需要，可以冒险一下。
都是CU的兄弟，千万不要谈MONEY！！！
Ginger

论坛徽章:
0
2楼 [报告]
发表于 2004-02-04 13:56 |只看该作者

400的下拉菜单，谁需要？

能否说得具体点？

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

论坛徽章:
0
3楼 [报告]
发表于 2004-02-04 15:33 |只看该作者

400的下拉菜单，谁需要？

针对《取代磁带机自动备份》。
在400上做下拉菜单（受MIMIX启发），但测试了一天，没吃午饭，只要一顿午饭的MONEY，谁需要，与我联系。
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
brent_wu

论坛徽章:
0
4楼 [报告]
发表于 2004-02-04 15:37 |只看该作者

400的下拉菜单，谁需要？

不过我吃午饭很麻烦的！
要有鲍鱼、鱼翅、燕窝、海参、刺身、清蒸、红烧、清炖......
要不然我就......
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
andrewleading_h 该用户已被删除
5楼 [报告]
发表于 2004-02-04 15:40 |只看该作者
提示: 作者被禁止或删除 内容自动屏蔽
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
jj8610

论坛徽章:
0
6楼 [报告]
发表于 2004-02-04 15:53 |只看该作者

400的下拉菜单，谁需要？

My sample for 在400上做下拉菜单:

    5722WDS V5R1M0  010525                  SEU SOURCE LISTING                            04/02/04 15:44:02                 PAGE    1
   SOURCE FILE . . . . . . .  CANOLINK/QCLSRC
   MEMBER  . . . . . . . . .  CA100DF
   SEQNBR*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8 ...+... 9 ...+... 0
     100      A*****************************************************************                                         16/09/02
     200      A*PGM ID---CA100CL                                              */                                         16/09/02
     300      A*                                      */                                         
     400      A*****************************************************************                                         16/09/02
     500      A                                      DSPSIZ(24 80 *DS3                  -
     600      A                                             27 132 *DS4)
     700      A                                      CA03(03)
     800      A                                      ALTHELP
     900      A                                      HELP(01)
    1000      A                                      MNUCNL(CA12 12)
    1100      A                                                                                                          16/09/02
    1200      A*                                                                                                         16/09/02
    1300      A          R DUMMY                     ASSUME                                                              24/09/02
    1400      A                                  1  2' '                                                                 24/09/02
    1500      A*                                                                                                         16/09/02
    1600      A          R MNUBARR
    1700      A                                      MNUBAR
    1800      A                                      OVERLAY
    1900      A                                      MNUBARDSP(&OPTION)
    2000      A            SELEC          2Y 0B  1  2MNUBARSEP((*DSPATR RI) (*CHAR '=') -                                24/09/02
    2100                                             (*COLOR PNK))                                                       24/09/02
    2200      A                                      MNUBARCHC(1 PULL1 &MNUBAR1)                                         26/09/02
    2300      A                                      MNUBARCHC(2 PULL2 &MNUBAR2)                                         26/09/02
    2400      A                                      MNUBARCHC(3 PULL3 &MNUBAR3)                                         26/09/02
    2500      A                                      MNUBARCHC(4 PULL4 &MNUBAR4)                                         26/09/02
    2600      A                                      MNUBARCHC(5 PULL5 &MNUBAR5)                                         26/09/02
    2700      A                                      MNUBARCHC(6 PULLHELP &MNUBARH)                                      26/09/02
    2800      A                                      MNUBARCHC(7 PULLEXIT &MNUBARE)                                      26/09/02
    2900      A                                      CHCAVAIL((*COLOR BLU) (*DSPATR HI))                                 06/11/02
    3000      A                                      CHCSLT((*COLOR WHT) (*DSPATR HI))                                   06/11/02
    3100      A            OPTION         2S 0H
    3200      A            MNUBAR1       20A  P                                                                          26/09/02
    3300      A            MNUBAR2       20A  P                                                                          26/09/02
    3400      A            MNUBAR3       20A  P                                                                          26/09/02
    3500      A            MNUBAR4       20A  P                                                                          26/09/02
    3600      A            MNUBAR5       20A  P                                                                          26/09/02
    3700      A            MNUBARH       20A  P                                                                          26/09/02
    3800      A            MNUBARE       20A  P                                                                          26/09/02
    3900      A*                                                                                                         16/09/02
    4000      A          R PULL1
    4100      A                                      PULLDOWN(*SLTIND)
    4200      A                                      WDWBORDER((*COLOR BLU) (*DSPATR RI)-                                25/10/02
    4300      A                                       (*CHAR '===GGG=G'))                                                06/11/02
    4400      A            P1CHOI         2Y 0B  1  2SNGCHCFLD
    4500      A                                      CHECK(ER)
    4600      A                                      CHOICE(1 'CanoLink >;User Control')                                  01/10/02
    4700      A                                      CHOICE(2 'CanoLink >;Master File')                                   04/10/02
    4800      A                                      CHOICE(3 '>;Source Line Status Test')                                15/10/02
    4900      A                                      CHOICE(4 '>;Target Line Status Test')                                15/10/02
    5000      A                                      CHOICE(9 '>;Others')                                                 06/11/02
    5100      A                                      CHCUNAVAIL((*COLOR TRQ))                                            24/09/02
    5200      A*                                                                                                         16/09/02
    5300      A          R PULL2                     PULLDOWN
   5722WDS V5R1M0  010525                  SEU SOURCE LISTING                            04/02/04 15:44:02                 PAGE    2
   SOURCE FILE . . . . . . .  CANOLINK/QCLSRC
   MEMBER  . . . . . . . . .  CA100DF
   SEQNBR*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8 ...+... 9 ...+... 0
    5400      A                                      WDWBORDER((*DSPATR RI) +
    5500      A                                                (*COLOR YLW) +                                            25/10/02
    5600      A                                                (*CHAR '===III=I'))                                       06/11/02
    5700      A            P2CHOI         2Y 0B  1  2SNGCHCFLD
    5800      A                                      CHOICE(1 '>;Inbound Master Maint')                                   15/10/02
    5900      A                                      CHOICE(2 'Inbound Master >;List')                                    15/10/02
    6000      A                                      CHOICE(3 'Inbound >rocessing')                                     18/11/02
    6100      A                                      CHOICE(4 'Inbound >;FTP Com Log')                                    18/11/02
    6200      A                                      CHOICE(5 '>;Display CanoLink MSG')                                   18/11/02
    6300      A                                      CHOICE(9 '>;Others')                                                 06/11/02
    6400      A                                      CHECK(ER)
    6500      A                                      CHCUNAVAIL((*COLOR TRQ))                                            24/09/02
    6600      A*                                                                                                         16/09/02
    6700      A          R PULL3                     PULLDOWN
    6800      A                                      WDWBORDER((*DSPATR RI) +
    6900      A                                                (*COLOR WHT) +                                            25/10/02
    7000      A                                                (*CHAR '===OOO=O'))                                       06/11/02
    7100      A            P3CHOI         2Y 0B  1  2SNGCHCFLD
    7200      A                                      CHOICE(1 '>;Outbound Master Maint')                                  15/10/02
    7300      A                                      CHOICE(2 'Outbound Master >;List')                                   06/11/02
    7400      A                                      CHOICE(3 'Outbound >rocessing')                                    18/11/02
    7500      A                                      CHOICE(4 'Outbound >;FTP Com Log')                                   18/11/02
    7600      A                                      CHOICE(5 '>;Display CanoLink MSG')                                   18/11/02
    7700      A                                      CHOICE(9 'O>;thers')                                                 06/11/02
    7800      A                                      CHECK(ER)
    7900      A                                      CHCUNAVAIL((*COLOR TRQ))                                            24/09/02
    8000      A          R PULL4                     PULLDOWN                                                            17/09/02
    8100      A                                      WDWBORDER((*DSPATR RI) +                                            17/09/02
    8200      A                                                (*COLOR PNK) +                                            25/10/02
    8300      A                                                (*CHAR '===LLL=L'))                                       07/11/02
    8400      A            P4CHOI         2Y 0B  1  2SNGCHCFLD                                                           17/09/02
    8500      A                                      CHOICE(1 '>;ZZ System')                                              07/11/02
    8600      A                                      CHOICE(2 'CSPL Re>;gion System')                                     07/11/02
    8700      A                                      CHOICE(3 'CSPL >;RAMBO System')                                      07/11/02
    8800      A                                      CHOICE(4 'CSPL >;JDE System')                                        07/11/02
    8900      A                                      CHOICE(9 '>;Others')                                                 06/11/02
    9000      A                                      CHECK(ER)                                                           17/09/02
    9100      A                                      CHCUNAVAIL((*COLOR TRQ))                                            24/09/02
    9200      A*                                                                                                         16/09/02
    9300      A          R PULL5                     PULLDOWN                                                            26/09/02
    9400      A                                      WDWBORDER((*DSPATR RI) +                                            26/09/02
    9500      A                                                (*COLOR GRN) +                                            25/10/02
    9600      A                                                (*CHAR '===UUU=U'))                                       06/11/02
    9700      A            P5CHOI         2Y 0B  1  2SNGCHCFLD                                                           26/09/02
    9800      A                                      CHOICE(1 '>;OnLine Doc Editor')                                      26/09/02
    9900      A                                      CHOICE(2 'Work With RMT >;WTR')                                      07/11/02
   10000      A                                      CHOICE(3 'Utilize >;Spool Files')                                    07/11/02
   10100      A                                      CHOICE(4 'Showing Client >;IP')                                      07/11/02
   10200      A                                      CHOICE(9 '>;Others')                                                 06/11/02
   10300      A                                      CHECK(ER)                                                           26/09/02
   10400      A                                      CHCUNAVAIL((*COLOR TRQ))                                            26/09/02
   10500      A*                                                                                                         26/09/02
   10600      A          R PULLHELP                  PULLDOWN                                                            26/09/02
   5722WDS V5R1M0  010525                  SEU SOURCE LISTING                            04/02/04 15:44:02                 PAGE    3
   SOURCE FILE . . . . . . .  CANOLINK/QCLSRC
   MEMBER  . . . . . . . . .  CA100DF
   SEQNBR*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... 8 ...+... 9 ...+... 0
   10700      A                                      WDWBORDER((*DSPATR RI) +                                            26/09/02
   10800      A                                                (*COLOR BLU) +                                            25/10/02
   10900      A                                                (*CHAR '===HHH=H'))                                       06/11/02
   11000      A            CHCHELP        2Y 0B  1  2SNGCHCFLD                                                           26/09/02
   11100      A                                      CHOICE(1 '>;Help')                                                   26/09/02
   11200      A                                      CHOICE(2 '>;About')                                                  26/09/02
   11300      A                                      CHOICE(3 '>;License')                                                26/09/02
   11400      A                                      CHCACCEL(1 'F1')                                                    26/09/02
   11500      A                                      CHECK(ER)                                                           26/09/02
   11600      A                                      CHCUNAVAIL((*COLOR TRQ))                                            26/09/02
   11700      A          R PULLEXIT                  PULLDOWN                                                            26/09/02
   11800      A                                      WDWBORDER((*DSPATR RI) +                                            16/09/02
   11900      A                                                (*COLOR RED) +                                            25/10/02
   12000      A                                                (*CHAR '===QQQ=Q'))                                       19/11/02
   12100      A            CHCEXIT        2Y 0B  1  2SNGCHCFLD                                                           26/09/02
   12200      A                                      CHOICE(1 '>;Quit')                                                   16/09/02
   12300      A                                      CHOICE(2 '>;Sign Off')                                               17/09/02
   12400      A                                      CHOICE(3 '>;Exit Telnet')                                            17/09/02
   12500      A                                      CHCACCEL(1 'F3')                                                    16/09/02
   12600      A                                      CHECK(ER)                                                           16/09/02
   12700      A                                      CHCUNAVAIL((*COLOR TRQ))                                            24/09/02
   12800      A*                                                                                                         16/09/02
                                   * * * *  E N D  O F  S O U R C E  * * * *
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
blogliou

论坛徽章:
0
7楼 [报告]
发表于 2004-02-05 10:56 |只看该作者

400的下拉菜单，谁需要？

我的下拉菜单：

pull.JPG (44.71 KB, 下载次数: 48)

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

论坛徽章:
0
8楼 [报告]
发表于 2004-02-05 10:59 |只看该作者

400的下拉菜单，谁需要？

我的下拉菜单：[/img]

pull.JPG (44.71 KB, 下载次数: 40)

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

论坛徽章:
0
9楼 [报告]
发表于 2004-02-05 11:01 |只看该作者

400的下拉菜单，谁需要？

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

论坛徽章:
0
10楼 [报告]
发表于 2004-02-05 18:07 |只看该作者

400的下拉菜单，谁需要？

楼上的老大  强烈要求你放出代码
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
12下一页
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号：11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们：huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP