cozTools Examples
This page is updated dynamically from our own IBM i system and represents a real-time list of examples.
We are making available example code to help you start using our products right away. The examples below are included in your Developer or Enterprise Edition of cozTools in the RPGSAMPLES and CLPSAMPLES source files to give you a handle on how to use specific features or leverage a set of tools to create something new. This list will grow as we add more examples.
Examples (Click to display code)
Powered by COZTOOLS find out more
Click on a name in the list to view its contents.
Source Viewer © 2004 Robert Cozzi, Jr. All rights reserved.
| Member | Last Modified | Views | Text |
| ADDLIBLE | 2013-03-19 22.03.15 | 3464 | Example ADDLIBLE and RMVLIBLE |
| CHANGEJOB | 2013-03-27 18.00.59 | 7470 | Example CHGJOB function |
| DB2LOCATE | 2013-03-23 07.55.17 | 3887 | Example DB2 I/O functions |
| DB2TOCSV | 2013-11-06 10.04.25 | 2767 | Example How to convert Database to CSV in RPG |
| DELAYME | 2013-03-25 14.05.47 | 3981 | Example DLYJOB - Most efficient Delay Job function |
| EDIT | 2013-07-26 11.44.21 | 2612 | Example Runtime %EDITC using ctEDIT |
| ENC_AES | 2013-10-28 17.12.26 | 2595 | Example AES Encryption functions |
| ENC_RC4 | 2013-10-28 17.08.23 | 2678 | Example RC4 Encryption functions |
| GETCALLER | 2013-03-27 08.42.59 | 2337 | Example getCallerPgmName() function |
| HASHPROOF | 2013-03-19 10.22.45 | 2585 | Example MD5 Hash Test written to joblog |
| HELLOWORLD | 2013-03-19 16.25.12 | 2554 | Example JobLog function of classic "Hello World" |
| IFSWRITE | 2013-07-31 15.45.21 | 2603 | Example ifsWrite - All-in-one IFS file writer |
| SENDESCMSG | 2013-05-23 10.41.02 | 2513 | Example SndEscMsg - Send Escape Message from RPG |
| SENDINQMSG | 2013-04-19 17.26.36 | 2288 | Example Send/Receive Inquiry Message from RPG |
| SENDMSGID | 2013-05-23 10.51.29 | 2869 | Example SndMsgID - Send Message usign MSGID |
| USERSPACE | 2013-03-19 22.08.23 | 3280 | Example Create User Space (CRTUSRSPACE) made easy! |
| XLATE | 2013-07-10 17.08.12 | 2605 | Example xLate to convert between upper/lower case |
Powered by COZTOOLS find out more
Click on a name in the list to view its contents.
Source Viewer © 2004 Robert Cozzi, Jr. All rights reserved.
| Member | Last Modified | Views | Text |
| CHGCASE | 2013-10-18 08.45.12 | 2691 | Example CLCONVERT with XLATE(*TOUPPER) |
| CHGCCSID | 2013-10-18 08.43.32 | 2520 | Example CLCONVERT with XLATE(*CCSID) |
| CHGJOBJOBD | 2013-12-20 12.53.09 | 2324 | Example CHGJOBA to change job using *JOBD |
| CHKJOB | 2013-12-18 11.23.31 | 2633 | Example CHKACTJOB (Check for Active Job by Name) |
| CLDATES | 2013-10-18 13.50.12 | 2515 | Example RTVDATE to return "relative" date value |
| EXITKEY | 2013-04-30 17.18.28 | 2313 | Example RTVEXITKEY to get Fn key used on IBM Dsply |
| GETCALLING | 2013-03-24 21.01.28 | 2368 | Example ->call GetCaller *PGM-->getCallerPgmName() |