|
Please help! I am trying to read an externally described file and automatically place the retrieved record into a local data structure. The following code generates this compile error: *RNF5155 20 1 The Result-Field operand is not allowed for specified operation. I found this in the Websphere RPG manual for the READ command: "READ{(EN)} name {data-structure}" "If name refers to an externally-described file or a record format from an externally described file, the data structure must be a data structure defined with EXTNAME(...:*INPUT) or LIKEREC(...:*INPUT)." and believe I am doing this in the first 'D' spec listed below. Can anyone help tell me what I am doing wrong here? TIA Tim Kredlo Code____________________________________________________ FOpenSO_P IF E K Disk ... ... D SoRecP E DS ExtName(OpenSO_P:*Input) D Qualified D Inz D SoArry Overlay(SoRecP:1) D Dim(128) D Like(A1) ... ... /Free SetLL *Start OpenSO_P; DoU %Eof(OpenSO_P); Read OpenSO_P SoRecP; ( I have also tried: "Read OpenSO_P OPENSORP;" with same error.) (And: When I do : "Read OpenSO_P;" I get no records) .... more code in here .... EndDo; /End-Free Code from DDS for externally described file Openso_P: A REF(@FLDREF) A R OPENSORP A R CODE A R SOSO## A ... Some more fields A K SOSO## A K SOREC#
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.