Hi,
This may be an activation group issue.
If you use different activation groups and do not change the default value
of OVRSCOPE (override scope) which is *ACTGRP an override is only considered
within the same activation group.
Try to change the OVRSCOPE to either *JOB or *CALLLVL.
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im
Auftrag von derek gonsalves
Gesendet: Monday, June 30, 2008 14:37
An: rpg
Betreff: Problem with OVRDBF
Hi,
I am trying to override a file in my rpg program usig the QCMDEXC command,
While running in debug mode, the files do get overridden, and when i check
the job log(in debug mode) option 15- Display file overrides, if active , it
shows that my file has been overridden.
However , this is not true as records present in the overriden library are
not being fetched.
The code used is as follows
Field declarations
DQcmdCmd S 100 DOvrDBFPr
PR ExtPgm('QCMDEXC') DCmdString 100
Options(*Varsize) DCmdLength 15P 5 Const
$Ovrride Begsr
Eval QcmdCmd='OVRDBF FILE(Test1) TOFILE-
('+%TRIM(Lib_Name) +'/Test1) SHARE-
(*YES)'
CallP OvrDBFPr(QcmdCmd : %Len(QcmdCmd))
Endsr
Here Lib_Name is the name of the library name which the file has to
overriden with.
Any suggestions as to why records are not fetched from the overriden
library. Is ther any other way to check if it is pointing to the file in the
required library?
Thanks in advance for all your suggestions,
Derek
_________________________________________________________________
Do more with your photos with Windows Live Photo Gallery.
http://www.windowslive.com/share.html?ocid=TXT_TAGLM_Wave2_photos_022008
midrange.com
