调用程序与被调用程序的参数不一样也能CALL成功吗？

Question

0002.00      C           *ENTRY    PLIST                                       
0003.00      C                     PARM           @A1     1                     
0004.00      C                     PARM           @B1     10
××××××××
0005.00      C           PLY01     PLIST                                       
0006.00      C                     PARM           @A      4                     
0007.00      C                     PARM           @B      20

参数我是这样写的，可我STRISDB的时候竟然能过，我迷糊了，不知道是什么原因！！！求助！！！
有没有人遇到这样的情况？

这些我是在
iSeriesD.DFW.IBM.COM
23
WUSER
DEMO2PWD

这个上面试的

[ 本帖最后由 chen405 于 2009-7-27 15:46 编辑 ]

Answer 1

我想找出能使
0004.00      C                     CALL 'DEL010'  PLY01        1020            
20  打亮的情况可怎么都找不到,有人有遇到20指示器打亮的情况吗?
在资料里有这样一段话“当被调用程序是由LR指示器为ON时返回的RPG程序，这时指示器设为ON。”，这个指示器在75到76列上，自己没有找到这种情况。求助一下有知道能使这个指示器打亮的人帮忙举个例子。

Answer 2

原帖由 chen405 于 2009-7-27 16:24 发表
以前前辈们都是说必须两本程序定义一样的参数，自己做试验一下就颠覆了

前辈这么说是希望你养成良好的习惯。  你能自己去试试说明你有实践精神，比很多张口就问的年青人好。

Answer 3

以前前辈们都是说必须两本程序定义一样的参数，自己做试验一下就颠覆了

Answer 4

不会报错吗 ?

Answer 5

你要是参数没有被使用就是不传也没有问题。。。！
但是长度不一样可能会使得接受的数据不完整，，

Answer 6

本来是想调查 10 和 20 在什么时候会打亮的这样一弄自己迷糊了。

Answer 7

FMT *  ..... *. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7         
*************** Beginning of data *************************************
0001.00      C*                                                                 
0002.00      C                     MOVEL'ABCD'    @A                           
0003.00      C                     Z-ADD12        @B                           
0004.00      C                     CALL 'DEL010'  PLY01        1020            
0005.00      C           PLY01     PLIST                                       
0006.00      C                     PARM           @A      4                     
0007.00      C                     PARM           @B      20                    
0008.00      C                     SETON                     LR                 
0009.00      C                     RETRN                                                
****************** End of data ****************************************
FMT FX .....FFilenameIPEAF........L..I........Device+......KExit++Entry+A....U         
*************** Beginning of data *************************************
0001.00      FSETNAME UF  E                    DISK                             
0002.00      C           *ENTRY    PLIST                                       
0003.00      C                     PARM           @A1     1                     
0004.00      C                     PARM           @B1     10                    
0005.00      C*                                                                 
0006.00      C           3         SETLLSETL                                    
0007.00      C                     READ SETL                   2050            
0008.00      C*                                                                 
0009.00      C           *IN50     IFEQ *OFF                                    
0010.00      C           A001      DSPLY                                       
0011.00      C                     MOVEL'90'      A001                          
0012.00      C                     UPDATSETL                                    
0013.00      C                     ENDIF                                       
0014.00      C                     SETON                     LR                 
0015.00      C                     RETRN                                                
****************** End of data ****************************************
两本程序的全部

*ENTRY  的参数倒是没有用到

[ 本帖最后由 chen405 于 2009-7-27 15:58 编辑 ]

Answer 8

我给传参数了
C                     MOVEL'ABCD'    @A                           
C                     Z-ADD12           @B
我给传的是这2个参数

Answer 9

这样是可以的，，就算你call程序时，程序需要参数，但是你没有传参数，系统不会在调用时抱错，而是在用到这个*entry上的参数时才报错。。。。