Skip to content

Instantly share code, notes, and snippets.

View bobcozzi's full-sized avatar

Bob Cozzi bobcozzi

View GitHub Profile
@bobcozzi
bobcozzi / objstats72.sql
Last active February 15, 2024 14:10
OBJECT_STATISTICS Enhanced for V7R2
-- ------------------------------------------------------- --
-- 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
bobcozzi / GETOSVER.RPGLE
Last active January 31, 2024 15:47
How to obtain the IBM i version at runing in an RPG iV routine
// 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