Look in dtaara QUSRSYS/QSS1MRI. That should exist on the system.
On Thu, 2020-07-23 at 13:03 -0500, midrangel@xxxxxxxxxxxxxxxxx wrote:
V7R1 so most of the SQL functions won't be available. (at least the last
question was V7R1)
--
Jim Oberholtzer
Agile Technology Architects
-----Original Message-----
From: RPG400-L <
<mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx>
rpg400-l-bounces@xxxxxxxxxxxxxxxxxx
On Behalf Of Kevin
Bucknum
Sent: Thursday, July 23, 2020 1:00 PM
To:
<mailto:rpg400-l@xxxxxxxxxxxxxxxxxx>
rpg400-l@xxxxxxxxxxxxxxxxxx
Subject: Re: Retrieving system name, serial, or OS version from RPG?
Can you use sql?
SELECT CURRENT_CHARACTER_VALUE FROM qsys2.system_value_info WHERE
SYSTEM_VALUE_NAME = 'QSRLNBR'
On Thu, 2020-07-23 at 10:52 -0700, James H. H. Lampert wrote:
This may be something I used to know, but have forgotten.
I've retrieved information to identify a box via MI, and/or via system
API calls, but is there an *easy* way to retrieve at least one of the
three above-mentioned pieces of information (any one of them will tell
me what I need to know) from ILE RPG?
--
JHHL
[
<
https://www.medtronsoftware.com/img/MedtronMinilogo.bmp>
https://www.medtronsoftware.com/img/MedtronMinilogo.bmp
] Kevin Bucknum
Senior Programmer Analyst
MEDDATA / MEDTRON
120 Innwood Drive
Covington LA 70433
Local: 985-893-2550
Toll Free: 877-893-2550
<
https://www.medtronsoftware.com>
https://www.medtronsoftware.com
CONFIDENTIALITY NOTICE
This document and any accompanying this email transmission contain
confidential information, belonging to the sender that is legally
privileged. This information is intended only for the use of the individual
or entity named above. The authorized recipient of this information is
prohibited from disclosing this information to any other party and is
required to destroy the information after its stated need has been
fulfilled. If you are not the intended recipient, or the employee of agent
responsible to deliver it to the intended recipient, you are hereby notified
that any disclosure, copying, distribution or action taken in reliance on
the contents of these documents is STRICTLY PROHIBITED. If you have
received this email in error, please notify the sender immediately to
arrange for return or destruction of these documents.
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email:
<mailto:RPG400-L@xxxxxxxxxxxxxxxxxx>
RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or
change list options,
visit:
<
https://lists.midrange.com/mailman/listinfo/rpg400-l>
https://lists.midrange.com/mailman/listinfo/rpg400-l
or email:
<mailto:RPG400-L-request@xxxxxxxxxxxxxxxxxx>
RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
<
https://archive.midrange.com/rpg400-l>
https://archive.midrange.com/rpg400-l
.
Please contact
<mailto:support@xxxxxxxxxxxxxxxxxxxx>
support@xxxxxxxxxxxxxxxxxxxx
for any subscription related
questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
<
https://amazon.midrange.com>
https://amazon.midrange.com
[
https://www.medtronsoftware.com/img/MedtronMinilogo.bmp] Kevin Bucknum
Senior Programmer Analyst
MEDDATA / MEDTRON
120 Innwood Drive
Covington LA 70433
Local: 985-893-2550
Toll Free: 877-893-2550
https://www.medtronsoftware.com
CONFIDENTIALITY NOTICE
This document and any accompanying this email transmission contain confidential information, belonging to the sender that is legally privileged. This information is intended only for the use of the individual or entity named above. The authorized recipient of this information is prohibited from disclosing this information to any other party and is required to destroy the information after its stated need has been fulfilled. If you are not the intended recipient, or the employee of agent responsible to deliver it to the intended recipient, you are hereby notified that any disclosure, copying, distribution or action taken in reliance on the contents of these documents is STRICTLY PROHIBITED. If you have received this email in error, please notify the sender immediately to arrange for return or destruction of these documents.
midrange.com
