robert-ohlen
New User
Joined: 01 Jun 2007 Posts: 11 Location: Soiron
|
|
|
|
I would like to put an EYECACHER in my PL1 source to quickly find when, with which version ... An object was compiled.
I propose this:
Code: |
%DECLARE COMP_TIME CHAR;
%COMP_TIME=QUOTE(COMPILETIME);
%DECLARE SYS_PARM CHAR;
%SYS_PARM =QUOTE(SYSVERSION);
DCL $#à(4) CHAR(36) STATIC ABNORMAL INIT(
('*'!!(8)' '!!'SOCIETY COMPILATION'!!(7)' '!!'*'),
('* '!!PROCEDURENAME()!!' *'),
('* '!!SYS_PARM!!' *'),
('* '!!COMP_TIME!!' *')); |
What do you think about? |
|