×
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.
I think it's the type of Type-Model - ours is 1517-001, so it's interactive
feature 1517.
You can get it programatically with the MATMATR API (actually a sufraced MI
instruction). To get the actual limit, you might look at the MATRMD
(Materialize resource management data). There are options (x01 and x1E,
IIRC) that will give you the interactive limit. Take a look at
<http://publib.boulder.ibm.com/iseries/v5r1/ic2924/tstudio/tech_ref/mi/>
for information. C includes are located in QSYSINC/MIH.
These are MI instructions that IBM has made available to HLLs. You can use
them in RPG as well as C - just need to set up data structures to match.
They are read-only - no danger to your system. You are not programming IN
MI by using these instructions, rather, you are using MI functions in a
high-level language, just as any other API.
Actually, there is a version of this you can run in CLLE - it uses pointers
to both variables, so CL can call it. Here follows a little code to do it.
The size of the &Data variable is determined from information at the above
site, as well as the C include.
PGM
DCL VAR(&DATA) TYPE(*CHAR) LEN(2616)
DCL VAR(&OPTION) TYPE(*CHAR) LEN(2) VALUE(X'012C')
DCL VAR(&PROCFEAT) TYPE(*CHAR) LEN(4)
DCL VAR(&INTFEAT) TYPE(*CHAR) LEN(4)
CALLPRC PRC('_MATMATR1') PARM(&DATA &OPTION)
CHGVAR VAR(&PROCFEAT) VALUE(%SST(&DATA 2609 4))
CHGVAR VAR(&INTFEAT) VALUE(%SST(&DATA 2613 4))
ENDPGM
HTH
Vern
At 09:41 PM 3/29/2004 -0600, you wrote:
Is there a way to retrieve the Interactive Feature Code?
I know I can get the Processor Feature code from a system value, but I would
also like to find the Interactive Feature code.
If I do a DSPHDWRSC (*PRC), how do I determine the interactive feature code?
Thanks,
Bob
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.
midrange.com
