Bob Cozzi bobcozzi
🏠
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| -- ------------------------------------------------------- -- | |
| -- OBJECT_STATS Table Function for V7R3+ Features on V7R2 -- | |
| -- (c) Copyright 2023 - R. Cozzi Jr. All rights reserved. -- | |
| -- Reproduction in whole or part is permitted provided this -- | |
| -- copyright information is included. -- | |
| -- ------------------------------------------------------- -- | |
| -- This Table function returns information on IBM i V7R2 -- | |
| -- that was not included until V7R3 including: -- | |
| -- New Columns: -- |
bobcozzi
/ GETOSVER.RPGLE
Last active
January 31, 2024 15:47
How to obtain the IBM i version at runing in an RPG iV routine
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| // Code segment: Retrieve IBM i VRM (Version, Release Modification) | |
| // This code shows you how to setup/prototype the CEEGPID API | |
| // in RPG IV, and then call it to retrieve the IBM i version. | |
| // Note that CEExxxx APIs are high-speed APIs and their code | |
| // is embedded or "inlined" into your program. So there | |
| // is no overhead for the call to these APIs. | |
| // Written June 1996 by R. Cozzi, Jr. | |
| // Converted to RPG IV free format August 2018 |