private static CallTargetParameter CreateCallTargetParameter(ParameterDescriptionEntry param) { var symbolReference = new SymbolReference(param.DataName); var storageArea = new DataOrConditionStorageArea(symbolReference); var callParameter = new CallTargetParameter { StorageArea = storageArea }; return(callParameter); }
public static StorageArea CreateReceivingStorageArea(SymbolDefinition symbol) { if (symbol == null) { return(null); } var storage = new DataOrConditionStorageArea(new SymbolReference(symbol)); return(storage); }
public static string ToCobol85(this DataOrConditionStorageArea sa) { var str = new StringBuilder(); str.Append(sa.SymbolReference); if (sa.Subscripts != null) { foreach (var subscript in sa.Subscripts) { str.Append('(').Append(subscript).Append(')'); } } return(str.ToString()); }