Smart/400开发上手4: 调试Cobol代码 (DEBUG with QBATCH)

Step1:Compile Cobol source

CB TIM07 using *SRCDBG option
例如:CB MEMBER(TIM07) OPTION(*SRCDBG) WORKU(TIM003)

Step2:HOLD QBATCH & Submit Job

2.1 先HOLD住:
HLDJOBQ QBATCHGZ

2.2 Submit Job:
D》Batch Processing 》Schedule Submision》 提交启动Job

Step3:WRKJOBQ QBATCHGZ

3.1 :先选3 (选择一个状态为RLS的JOB,一般Number较大)
3.2 :后选5

3.3 :复制:
CALL PGM(BMANMTHRD) PARM('L2TIM6TEST' X'000000030F' 'P' X'001F')

Step4:启动调试

4.1 : RLSJOBQ QBATCHGZ

4.2 : STRISDB PGM(TIM07) INVPGM(*NO)

4.3 : 粘贴进命令行:
CALL PGM(BMANMTHRD) PARM('L2TIM6TEST' X'000000030F' 'P' X'001F')


Step5:成功进入调试,you will be free!

主要快捷键:
F3=Exit F5=Step F6=Break F11=Display variable
F12=Cancel F17=Run F23=Change variable
F4=Go to current F9=Retrieve F10=Actions
F13=Run to location F14=Program list F24=More keys

 

  • 0
    点赞
  • 4
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值