SASPAC/SAS_PACKAGES
1
0
Fork 0
mirror of https://github.com/yabwon/SAS_PACKAGES.git synced 2026-04-21 13:21:33 +00:00
Code Issues Packages Projects Releases Wiki Activity

SAS Packages Framework, version 20260205

Browse Source 
SAS Packages Framework, version 20260205

Change:
- a fix in %verifyPackage() to handle SAS packages bundles with long names (above 32 characters)
This commit is contained in:
Bart Jablonski
2026-02-05 16:03:51 +01:00
parent fcdb3709c4
commit 0a3226f4d0
23 changed files with 117 additions and 117 deletions
Download Patch File Download Diff File Expand all files Collapse all files
SPF/Macros/verifypackage.sas
+4 -4
View File
@@ -13,7 +13,7 @@
hashing_file() function, SAS 9.4M6 */
)/secure
/*** HELP END ***/
des = 'Macro to verify SAS package with the hash digest, version 20260202. Run %verifyPackage() for help info.'
des = 'Macro to verify SAS package with the hash digest, version 20260205. Run %verifyPackage() for help info.'
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
%do;
@@ -28,7 +28,7 @@ des = 'Macro to verify SAS package with the hash digest, version 20260202. Run %
%put ### This is short help information for the `verifyPackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to verify SAS package with it hash digest, version `20260202` #;
%put # Macro to verify SAS package with it hash digest, version `20260205` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -100,7 +100,7 @@ des = 'Macro to verify SAS package with the hash digest, version 20260202. Run %
%local _PackageFileref_ checkExist;
data _null_;
length packageName $ 32;
length packageName $ 140;
packageName = lowcase(symget("packageName"));
call symputX("_PackageFileref_", "P" !! put(MD5(strip(packageName)), hex7. -L), "L");
/*run;*/ /* <- comment out, because it can be 1 data step, not 2 */
@@ -146,7 +146,7 @@ des = 'Macro to verify SAS package with the hash digest, version 20260202. Run %
filename &_PackageFileref_. list;
data _null_;
length providedHash $ 128 packageName $ 32;
length providedHash $ 128 packageName $ 140;
providedHash = strip(symget("hash"));
packageName = strip(symget("packageName"));