IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

EYECACHER in code PL1


IBM Mainframe Forums -> PL/I & Assembler
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
robert-ohlen

New User


Joined: 01 Jun 2007
Posts: 11
Location: Soiron

PostPosted: Wed Jan 30, 2008 6:11 pm
Reply with quote

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?
Back to top
View user's profile Send private message
robert-ohlen

New User


Joined: 01 Jun 2007
Posts: 11
Location: Soiron

PostPosted: Mon Feb 18, 2008 4:14 pm
Reply with quote

Thanks, i found. I will used the parameter COPYRIGHT of compiler
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> PL/I & Assembler

 


Similar Topics
Topic Forum Replies
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
No new posts VSAM return code 23 - for a Random read COBOL Programming 4
No new posts Monitoring production job progress. N... JCL & VSAM 4
Search our Forums:

Back to Top