× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



In my understanding, when clearing an entire DS, the whole thing is 
treated like one big character field.  I'm not sure if INZ will help this 
or not.  I think that numeric subfields in a DS are initialized like 
character fields as well, unless the INZ keyword is used to initialize to 
zero instead of blank.

I'm not sure if this is your problem though ... I usually get a decimal 
data error when trying to compare a DS subfield that has been improperly 
initialized, not pointer errors.

Hope this helps,
Adam

rpg400-l-bounces@xxxxxxxxxxxx wrote on 07/06/2006 11:51:19 AM:

Michael,
It doesn't appear to be a problem with numeric fields but I will try 
adding 
the INZ to the DS.  I thought that the CLEAR opcode basically set all 
alpha 
fields to blanks and numeric fields to zeros.  Am I incorrect in this 
assumption?

Eric

----- Original Message ----- 
From: <Michael_Schutte@xxxxxxxxxxxx>
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Sent: Wednesday, June 07, 2006 5:21 AM
Subject: RE: Pointer not set for location referenced.


Eric, if you are still experiencing this problem... (my stab in the 
dark..)
I was thinking that it may have something to do with the passing of 
the
external database.  You are clearing before passing it.  But doesn't 
that
throw junk data into the numeric fields?  Are there numeric fields in 
that
external database?  I'm not sure if you are getting the same error 
message
that I received awhile ago but it sounds familiar.  Thoughts anyone?

D External   E DS         Inz

/Free

  Reset External;
  result = calledProc(external);

/End-Free

Michael Schutte




            "Eric Wolf"
            <eric_a_wolf@hotm
            ail.com> To
            Sent by:                  rpg400-l@xxxxxxxxxxxx
            rpg400-l-bounces@ cc
            midrange.com
Subject
                                      RE: Pointer not set for location
            06/06/2006 07:54          referenced.
            PM


            Please respond to
             RPG programming
             on the AS400 /
                 iSeries
            <rpg400-l@midrang
                 e.com>






  Scott,

  Since I know that I am not calling a RCLRSC, it would not surprise 
me it
  MAPICS is doing it somewhere in their job stream.  I will try 
changing
my
  program(s) to a named activation group and see if that solves the
  problem.

  Thanks...

  Eric



----------------------------------------------------------------------

    From:  Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>
    Reply-To:  RPG programming on the AS400 / iSeries
    <rpg400-l@xxxxxxxxxxxx>
    To:  RPG programming on the AS400 / iSeries 
<rpg400-l@xxxxxxxxxxxx>
    Subject:  RE: Pointer not set for location referenced.
    Date:  Tue, 6 Jun 2006 18:04:58 -0500 (CDT)
    >
    >Actually, *CALLER is much more likely to exhibit problems than a
named
    >activation group is.
    >
    >My guess (well, stab in the dark, really) as to what your problem
is...
    >You're running a servie program in *CALLER and calling it from 
the
    default
    >activation group.   Somewhere along the line, a program is doing 
a
    RCLRSC
    >command, and since RCLRSC doesn't understand service programs, 
it's
    >closing the files, but keeping the service program itself in
    memory.  When
    >it's used again, the srvpgm is horribly confused because nothing
    notified
    >it that the files were going to be closed.
    >
    >---
    >Scott Klement  http://www.scottklement.com
    >
    >
    >On Tue, 6 Jun 2006, Eric Wolf wrote:
    >
    > >   Eric,
    > >
    > >   For one of the programs, I am using a named activation 
group.
For
    the
    > >   modules that seem to be having the problem (which are in the
    service
    > >   program), I am using *CALLER with a Shared AG(*NO).
    > >
    > >   I was thinking along the same lines that maybe somewhere a
    RCLACTGRP was
    > >   being called but I not using that command anywhere.  We are
    running MAPICS
    > >   ERP software which (primarily) is not written in ILE.
    > >
    > >   I was thinking of changing the one program from the named AG 
to
    *CALLER.
    > >
    > >   Eric
    > >
    >--
    >This is the RPG programming on the AS400 / iSeries (RPG400-L) 
mailing
    list
    >To post a message email: RPG400-L@xxxxxxxxxxxx
    >To subscribe, unsubscribe, or change list options,
    >visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
    >or email: RPG400-L-request@xxxxxxxxxxxx
    >Before posting, please take a moment to review the archives
    >at http://archive.midrange.com/rpg400-l.
    >
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing 
list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.



-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing 
list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing 
list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


#####################################################################################
Attention:
The above message and/or attachment(s) is private and confidential and is 
intended 
only for the people for which it is addressed. If you are not named in the 
address 
fields, ignore the contents and delete all the material. Thank you. Have a nice 
day.

For more information on email virus scanning, security and content
management, please contact administrator@xxxxxxxxxxxx
#####################################################################################

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.