Ibm midrange 使用一行设置%nullind rpg
在RPG中有没有一种方法可以在一行中分配一个布尔值而不使用if语句 例如,在C中,您可以执行以下操作: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
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?