RPG - 什么是+ =这里?

时间:2014-06-24 21:52:32

标签: ibm-midrange rpgle

你能解释一下这句话中+=的含义吗?

Eval      AssGr2Pun += FinQty#        

以下是上下文的其余代码:

 Exsr      FinItmTot                 
 Eval      AssGr2Pun += FinQty#      
 If        OrderAdd = 'N'            
 Eval      Gr2TPass += 1             
 Eval      OrderAdd = 'Y'            
 Endif                               
 Eval      AssGr2Pst += 1            
 When      OhReqd = Today            
 Exsr      FinItmTot                 
 Eval      AssGr2Tun += FinQty#      
 If        OrderAdd = 'N'            
 Eval      Gr2TTday += 1             
 Eval      OrderAdd = 'Y'            
 Endif                               
 Eval      AssGr2Tod += 1            
 When      OhReqd = Tomorrow         
 Exsr      FinItmTot               

2 个答案:

答案 0 :(得分:9)

这是assignment operator

其中< target > < 赋值运算符> < 表达>:

  • =表达式已分配给目标
  • + =表达式已添加到目标
  • - =从目标
  • 中减去表达式
  • * =目标乘以表达式
  • / =目标除以表达式
  • ** =为目标指定了提升到表达式
  • 的力量的目标

答案 1 :(得分:0)


此运算符也适用于char变量变量。

D wVar S 32740a变化

 /免费

   wVar ='我的名字';
   wVar + ='是';
   wVar + ='Charly';

   * INLR = *开;
 /最终免费

当然,这只是展示这种能力的一个例子。