Re: your mail

[Scott Klement <klemscot@xxxxxxxxxxxx>]

I don't know about the others on the list, but it would help me greatly
if you'd post your code so that we can see exactly what you're doing,
and perhaps try to re-create the problem...

Or, if you prefer, just post the DDS for the work files, and the 
parts of RPGA that are relevant to input from that file (F spec, input
specs, data structures if you're using them, read statements, etc)

Thanks


On Tue, 16 May 2000, Schlemme, Michael C. wrote:

> SOS !!!!!
> 
> 
> This is a repost, specifically to Barbara Morris, Jon Paris, Gary Guthrie,
> Mike Cravitz, all other heavies !!
> 
> Please help.
> 
> 
> Dear list,
> 
> I've having a problem, and I need suggestions.  Here are the facts:
> 
> 1.  CL program A (called CLA) creates a single work file (called WFx).
>      A.  WFx will be 1 of 6 different formats (called WF1, WF2, etc) based
> on logic in CLA.
> 
> 2.  RPGLE program A (called RPGA) uses FileA as it's main file.  
>      A.  FileA is, in reality, externally defined, containing 20 fields with
> a length of 3155.  FileA is, 
>           however, internally defined in RPGA, with a length specified as
> 3155.
> 
> 3.  CLA overrides FileA to WFx LvlChk(*No) and calls RPGA.  4 of the
> possible 6 WFx's process
>      normally, but with 2 WFx's, RPGA gives me the following messages:
> 
>      - Space offset X'00000F80' is outside current limit for object WF4
>        QTEMP     WF4.
>      - Function check. MCH0601 unmonitored by RPGA at statement 0000000668,
>        instruction X'0000'.                                                
>      - Pointer or parameter error (C G D F). 
> 
>      The 'Pointer or parameter error' happens at the 'Read FileA' statement
> of RPGA.
> 
> 4.  I've checked the obvious things (at least obvious to me).  I've made
> sure none of the WFx's
>      records formats are larger than FileA, overrides are in effect when the
> program was called, etc.
> 
> 
> Any ideas ?
> 
> 
> Thanks,
> 
> 
> Mike Schlemme                                  
> 
> 
> 

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---