RE: Open query file question

[Lori Crane <lcrane@xxxxxxxxxx>]

How do I get them to run in the same activation group?



Lori, my guess is that they are not running in the same activation group.

Bob

Bob Slaney/Atlanta/IBM@IBMUS (Lotus Notes)
Internet id: rjslaney@us.ibm.com
VM id: DALVM1.RJSLANEY@VM

Tieline  445-7374 Direct (770)835-7374
FAX tie 445-7232 Direct (770)835-7232
IBM Learning Services
iSeries Courseware Developer
IBM Corp.
3200 Windy Hill Road
Atlanta, GA 30339
Internal Zip WG08C
----- Forwarded by Bob Slaney/Atlanta/IBM on 08/07/2002 09:57 AM -----


                      Lori Crane

                      <lcrane@emedco.co        To:
rpg400-l@midrange.com

                      m>                       cc:

                      Sent by:                 Subject:  Open query file
question
                      rpg400-l-admin@mi

                      drange.com





                      08/07/2002 09:39

                      AM

                      Please respond to

                      rpg400-l








Hello,

I have an open query file question.  I have created a CLLE pgm having the
following code(very simple select).  The open query seems to work because I
also created a copy from query file and the correct data resides in the
file.  The problem seems to be the pgm does not attach itself to the open
query file.  This is running on V5R1.  Does anyone have any suggestions?

 OVRDBF     FILE(ORD0100T) TOFILE(MKTLIB/ORD0100T)

 OPNQRYF    FILE((MKTLIB/ORD0100T)) OPTION(*ALL) +
              QRYSLT('OGITEM = ''EM75-SC''') +
              KEYFLD((OGSTOK) (OGCORD) (OGOLIN)) +
              SEQONLY(*NO) OPNSCOPE(*JOB)

CALL       PGM(MKTLIB/OB0500)

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