Ibm midrange 使用一行设置%nullind rpg

Ibm midrange 使用一行设置%nullind rpg,ibm-midrange,rpgle,rpg,Ibm Midrange,Rpgle,Rpg,在RPG中有没有一种方法可以在一行中分配一个布尔值而不使用if语句 例如,在C中,您可以执行以下操作: bool x = (some condition = true); 在rpg中有没有类似的方法: %nullind(FIELD) = (FIELD==""); 这是正确的方法吗?唯一的方法是: *in01 = (Somevalue=AnotherValue); %nullind(field) = *in01; 而且 当我最初打开nullind时,是否必须关闭它才能将字段更新为非n

在RPG中有没有一种方法可以在一行中分配一个布尔值而不使用if语句

例如,在C中,您可以执行以下操作:

bool x = (some condition = true);
在rpg中有没有类似的方法:

 %nullind(FIELD) = (FIELD=="");
这是正确的方法吗?唯一的方法是:

 *in01 = (Somevalue=AnotherValue);
  %nullind(field) = *in01;
而且


当我最初打开nullind时,是否必须关闭它才能将字段更新为非null值?

是,将赋值指定给指示器类型变量N

*in01 = (somevalue = anothervalue);

是,将分配给指示器类型变量类型N

*in01 = (somevalue = anothervalue);

所以这仍然是两条以上的线,这是可以的。。它会是这样的:*inO1=SOMEVALUE=AnotherValue;%nullindfield=%in01;您是否尝试过这样做:%nullindfield=somevalue=anothervalue?所以这仍然是两条以上的线,这是可以的。。它会是这样的:*inO1=SOMEVALUE=AnotherValue;%nullindfield=%in01;您是否尝试过这样做:%nullindfield=somevalue=anothervalue?