Changeset 596 for GPL/trunk/tools

Timestamp:

Apr 3, 2017, 3:44:44 PM (9 years ago)

Author:

David Azarewicz

Message:

Bldlvl update

File:

• GPL/trunk/tools/AddToFile.cmd (modified) (3 diffs)

GPL/trunk/tools/AddToFile.cmd

@@ -11 +11 @@
 call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
 call SysLoadFuncs
-parse arg OutFile','String','Function','Parm1','Parm2','Parm3','Parm4;
+parse arg OutFile','String','Function','Parm1','Parm2','Parm3','Parm4','Parm5;
 
 if (OutFile='') then do
@@ -33 +33 @@
   rc=LineOut(MyFile, '--- AddToFile.cmd '||MyCmd);
   call 'AddToFile.cmd' MyCmd;
-  MyCmd=MyFile||',option description,BLDLEVEL,Vendor,1.2.3,Description,Fixpack';
+  MyCmd=MyFile||',option description,BLDLEVEL,Vendor,1.2.3,Description,Fixpack,Asd';
   rc=LineOut(MyFile, '--- AddToFile.cmd '||MyCmd);
   call 'AddToFile.cmd' MyCmd;
@@ -100 +100 @@
     end
 
-    NewStr='@#'||Parm1||':'||Parm2||'#@##1## '||ProjString||'::::'||ProjVersion||'::'||Parm4||'@@'||Parm3;
+    NewStr='@#'||Parm1||':'||Parm2||'#@##1## '||ProjString||':'||Parm5||':::'||ProjVersion||'::'||Parm4||'@@'||Parm3;
     if (Type='2') then do
       /*OutStr=String||' "@#'||Parm1||':'||Parm2||'#@##1## '||ProjString||'::::'||ProjVersion||'::'||Parm4||'@@'||Parm3||'"';*/