RPG - 什么是+ =这里?

Ada*_*ams 0 rpgle ibm-midrange

你能解释一下+=这句话中的意思吗?

Eval      AssGr2Pun += FinQty#        
Run Code Online (Sandbox Code Playgroud)

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

 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               
Run Code Online (Sandbox Code Playgroud)

jam*_*man 9

这是一个赋值运算符.

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

  • =表达式已分配给目标
  • + =表达式被添加到目标
  • - =从目标中减去表达式
  • *=目标乘以表达式
  • / =目标除以表达式
  • **=将目标指定为表达式幂的目标