[Oorexx-devel] Question ad RexxQueryFunction()
Can the RexxQueryFunction(some-function-name)-API determine whether REXX_TYPED_ROUTNEs are loaded or not? ---rony -- The NEW KODAK i700 Series Scanners deliver under ANY circumstances! Your production scanning environment may not be a perfect world - but thanks to Kodak, there's a perfect scanner to get the job done! With the NEW KODAK i700 Series Scanner you'll get full speed at 300 dpi even with all image processing features enabled. http://p.sf.net/sfu/kodak-com ___ Oorexx-devel mailing list Oorexx-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/oorexx-devel
Re: [Oorexx-devel] Question ad RexxQueryFunction()
Followup question: as RexxQueryFunction() belongs to the pre-4.0 APIs it
is not aware of the REXX_TYPED_ROUTINEs that may have been registered
(as per the bug tracker comment).
Hence I came up with the following attempt to find out whether a routine
is loaded or not, but unfortunately it does not work.
Here is the attempted code (purpose: find out whether routines are
available or not):
RexxRoutine1(RexxStemObject, BsfQueryRegisteredFunctions,
OPTIONAL_RexxStemObject, stem) // 20090505, ---rgf
{
#ifdef RGF_INFO
fprintf(stderr, *** RGF_INFO: BsfQueryRegisteredFunctions() 1 ...\n);
fflush(stderr);
#endif
if (stem==NULL) // argument not given
{
stem=context-NewStem(BsfQueryRegisteredFunctions);
}
int32_t entries=sizeof(ApiFncTableOrdered)/sizeof(PSZ), i=0, j=0;
logical_t bExists=false;
// get the package from the caller context: stolen from Mark's
nutshell example my.data
RexxPackageObject pkg=(RexxPackageObject)
context-SendMessage0(context-GetCallerContext(),PACKAGE);
// RexxDirectoryObject rdo=context-GetPackagePublicRoutines(pkg); //
get all public routines
RexxDirectoryObject rdo=context-GetPackageRoutines(pkg); // get all
available routines
RexxObjectPtr logicalVal;
for (i=0; ientries; i++) // loop over all functions/routines
{
// query the directory whether it has the routine
logicalVal=context-SendMessage1(rdo, HASENTRY,
context-CString(ApiFncTableOrdered[i]));
if (context-ObjectToLogical(logicalVal, bExists)) // convert to
logical, save it in 'bExists'
{
fprintf(stderr, ... querying [%s], bExists=[%d]\n,
ApiFncTableOrdered[i], bExists);
fflush(stderr);
if (bExists)// is the routine available at the moment, if
so, save it in the stem
{
context-SetStemArrayElement(stem, ++j,
context-String(ApiFncTableOrdered[i]));
}
}
}
context-SetStemArrayElement(stem, 0, context-Int32ToObject(j)); //
set total numbers of entries
return stem;// return the stem object
}
What am I doing wrong?
How could one test whether REXX_TYPED_ROUTINES are registered or not?
---rony
P.S.: Maybe API functions Has[Public]Routine(CNAME name) [and
Has[Public]Class(CNAME className)] and versions for returning the
respective routine/class objects may proof helpful for the API coders?
--
The NEW KODAK i700 Series Scanners deliver under ANY circumstances! Your
production scanning environment may not be a perfect world - but thanks to
Kodak, there's a perfect scanner to get the job done! With the NEW KODAK i700
Series Scanner you'll get full speed at 300 dpi even with all image
processing features enabled. http://p.sf.net/sfu/kodak-com___
Oorexx-devel mailing list
Oorexx-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-devel
[Oorexx-devel] Could not find routine SYSFILETREE
Hi group, I just upgraded(?) to FC10. I installed the rexx rpm. Now when I run a proven script I get this: Could not find routine SYSFILETREE Where do I start to find the fix for this problem?? -- William Estrada mrumun...@popdial.com Mt-Umunhum-Wireless.net ( http://64.124.13.3 ) Ymessenger: MrUmunhum -- The NEW KODAK i700 Series Scanners deliver under ANY circumstances! Your production scanning environment may not be a perfect world - but thanks to Kodak, there's a perfect scanner to get the job done! With the NEW KODAK i700 Series Scanner you'll get full speed at 300 dpi even with all image processing features enabled. http://p.sf.net/sfu/kodak-com ___ Oorexx-devel mailing list Oorexx-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/oorexx-devel
Re: [Oorexx-devel] Could not find routine SYSFILETREE
On Thu, May 7, 2009 at 5:06 PM, William Estrada mrumun...@popdial.com wrote: I just upgraded(?) to FC10. I installed the rexx rpm. Now when I run a proven script I get this: Could not find routine SYSFILETREE Where do I start to find the fix for this problem?? William, exactly which rpm did you install? Did you get it from SourceForge, if so, what was the file name? -- Mark Miesfeld -- The NEW KODAK i700 Series Scanners deliver under ANY circumstances! Your production scanning environment may not be a perfect world - but thanks to Kodak, there's a perfect scanner to get the job done! With the NEW KODAK i700 Series Scanner you'll get full speed at 300 dpi even with all image processing features enabled. http://p.sf.net/sfu/kodak-com ___ Oorexx-devel mailing list Oorexx-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/oorexx-devel
Re: [Oorexx-devel] Could not find routine SYSFILETREE
On Thu, May 7, 2009 at 8:25 PM, Mark Miesfeld miesf...@gmail.com wrote: On Thu, May 7, 2009 at 5:06 PM, William Estrada mrumun...@popdial.com wrote: I just upgraded(?) to FC10. I installed the rexx rpm. Now when I run a proven script I get this: Could not find routine SYSFILETREE Where do I start to find the fix for this problem?? William, exactly which rpm did you install? Did you get it from SourceForge, if so, what was the file name? I just installed and tested both: ooRexx-4.0.0-4567.i386.rpm and ooRexx-4.0.0-4567.x86_64.rpm from SourceForge and did not have any problem with them. No problem with SysFileTree() either. So, yeah, we need a little more information. -- Mark Miesfeld -- The NEW KODAK i700 Series Scanners deliver under ANY circumstances! Your production scanning environment may not be a perfect world - but thanks to Kodak, there's a perfect scanner to get the job done! With the NEW KODAK i700 Series Scanner you'll get full speed at 300 dpi even with all image processing features enabled. http://p.sf.net/sfu/kodak-com ___ Oorexx-devel mailing list Oorexx-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/oorexx-devel
