Compare commits

..

105 Commits

Author SHA1 Message Date
Bart Jablonski
8d8186fc78 Merge pull request #116 from yabwon/main
SAS Packages Framework, version 20251017
2025-10-19 21:54:35 +02:00
Bart Jablonski
b4b319a2e0 SAS Packages Framework, version 20251017
SAS Packages Framework, version 20251017

Changes:
- New parameters `workInTestResults=` and `testWorkPath=` added to the `%generatePackage()` macro.
- Documentation updated.
2025-10-19 21:36:03 +02:00
Bart Jablonski
1d83c65a9b Merge pull request #114 from yabwon/main
pull request
2025-09-09 22:46:31 +02:00
Bart Jablonski
e8d1269f6c Merge pull request #113 from yabwon/main
The BasePlus package [ver. 2.3.1]
2025-08-05 14:19:19 -04:00
Bart Jablonski
ba34a71ffe Merge pull request #112 from yabwon/main
SAS Packages Framework, version 20250729
2025-07-29 05:52:46 -04:00
Bart Jablonski
ff758fc2cc Merge pull request #111 from yabwon/main
SAS Packages Framework, version 20250728
2025-07-28 05:53:45 -04:00
Bart Jablonski
35b30ca45e Merge pull request #110 from yabwon/main
SAS Packages Framework, version 20250710
2025-07-10 08:04:33 -04:00
Bart Jablonski
bfdede5dd4 Merge pull request #109 from yabwon/main
update README.md
2025-06-11 13:32:59 -04:00
Bart Jablonski
856c73758f Merge pull request #108 from yabwon/main
SAS Packages Framework, version 20241207
2024-12-07 23:13:42 +01:00
Bart Jablonski
104c38ab2c Merge pull request #107 from yabwon/main
SAS Packages Framework, version 20241129
2024-11-29 17:08:10 +01:00
Bart Jablonski
9a7b81c2ad Merge pull request #106 from yabwon/main
SAS Packages Framework, version 20241102
2024-11-02 22:24:21 +01:00
Bart Jablonski
a56da0fa4f Merge pull request #105 from yabwon/main
SAS Packages Framework, version 20241027
2024-10-28 10:34:16 +01:00
Bart Jablonski
edeb1729b5 Merge pull request #104 from yabwon/main
SAS Packages Framework, version `20241014`
2024-10-14 21:44:37 +02:00
Bart Jablonski
9b2ec979e4 Merge pull request #103 from yabwon/main
SAS Packages Framework, version 20240927
2024-09-27 11:27:06 +02:00
Bart Jablonski
efda10b412 Merge pull request #102 from yabwon/main
The BasePlus package [ver. 2.0.1]
2024-07-24 08:11:27 +02:00
Bart Jablonski
78a79d1fc7 Merge pull request #101 from yabwon/main
The BasePlus package [ver. 2.0.0]
2024-07-23 22:17:14 +02:00
Bart Jablonski
e61a9689df Merge pull request #100 from yabwon/main
The BasePlus package [ver. 1.43.0]
2024-07-22 09:06:08 +02:00
Bart Jablonski
044019608f Merge pull request #99 from yabwon/main
The BasePlus package [ver. 1.42.1]
2024-07-19 10:30:22 +02:00
Bart Jablonski
fedf5b894d Merge pull request #98 from yabwon/main
SAS Packages Framework, version `20240711`
2024-07-11 14:59:42 +02:00
Bart Jablonski
3c30e7d17c Merge pull request #97 from yabwon/main
The BasePlus package [ver. 1.42.0]
2024-07-10 23:09:57 +02:00
Bart Jablonski
a99b75ffe9 Merge pull request #96 from yabwon/main
The BasePlus package [ver. 1.40.0]
2024-06-06 22:23:23 +02:00
Bart Jablonski
e7357877f0 Merge pull request #95 from yabwon/main
SAS Packages Framework, version `20240529`
2024-05-29 16:39:15 +02:00
Bart Jablonski
05946c92ce Merge pull request #94 from yabwon/main
SAS Packages Framework, version 20240423
2024-04-23 11:33:44 +02:00
Bart Jablonski
b3b36174af Merge pull request #93 from yabwon/main
SAS Packages Framework, version 20240415
2024-04-15 19:33:16 +02:00
Bart Jablonski
62fd354c6d SAS Packages Framework, version 20240415
SAS Packages Framework, version 20240415

Features:

- In the `%generatePackage()` macro, when `markdownDoc=` parameters is used, package files can be "excluded" from being used to produce documentation markdown file.

- Documentation updated.
2024-04-15 19:24:07 +02:00
Bart Jablonski
7f97b47a21 Merge pull request #92 from yabwon/main
The BasePlus package [ver. 1.38.0]
2024-03-12 14:48:52 +01:00
Bart Jablonski
340d13e56f Merge pull request #91 from yabwon/main
The BasePlus package [ver. 1.37.0]
2024-03-09 13:57:50 +01:00
Bart Jablonski
d68697ea77 Merge pull request #90 from yabwon/main
SAS Packages Framework, version 20231210
2023-12-12 11:54:30 +01:00
Bart Jablonski
9bb8354faa Merge pull request #88 from yabwon/main
The macroArray package [ver. 1.2.6]
2023-12-01 12:56:02 +01:00
Bart Jablonski
d0ff15fe80 Merge pull request #87 from yabwon/main
SAS Packages Framework, version `20231123`
2023-11-29 17:07:12 +01:00
Bart Jablonski
fe70185832 Merge pull request #86 from yabwon/main
The BasePlus package [ver. 1.35.0]
2023-11-14 14:45:52 +01:00
Bart Jablonski
83bef9fe30 Merge pull request #85 from yabwon/main
The BasePlus package [ver. 1.35.0]
2023-11-14 14:38:31 +01:00
Bart Jablonski
fd0a67de4e Merge pull request #84 from yabwon/main
SAS Packages Framework, version `20231107`
2023-11-07 12:41:48 +01:00
Bart Jablonski
60405c2226 Merge pull request #83 from yabwon/main
The BasePlus package [ver. 1.32.0]
2023-10-26 13:49:52 +02:00
Bart Jablonski
b6c554d994 Merge pull request #82 from yabwon/main
SAS Packages Framework version 20231024
2023-10-24 14:52:38 +02:00
Bart Jablonski
b7ce4778bb Merge pull request #81 from yabwon/main
SAS Packages Framework version 20231009
2023-10-09 18:06:42 +02:00
Bart Jablonski
956cfce026 Merge pull request #80 from yabwon/main
The BasePlus package [ver. 1.30.0]
2023-09-19 17:45:24 +02:00
Bart Jablonski
2c1a7eacc3 Merge pull request #79 from yabwon/main
The macroArray package [ver. 1.1.0]
2023-09-06 23:11:22 +02:00
Bart Jablonski
1a6f0c0013 Merge pull request #78 from yabwon/main
SAS Packages Framework, version `20230904`
2023-09-04 16:44:32 +02:00
Bart Jablonski
8a30b5a918 Merge pull request #77 from yabwon/main
The BasePlus package [ver. 1.29.0]
2023-08-24 11:33:19 +02:00
Bart Jablonski
b209d022b3 Merge pull request #76 from yabwon/main
The GSM package [ver. 0.21.0]
2023-07-27 11:15:52 +02:00
Bart Jablonski
680c021f72 Merge pull request #75 from yabwon/main
The BasePlus package [ver. 1.26.1]
2023-06-02 11:43:43 +02:00
Bart Jablonski
ad15aa0e3b Merge pull request #74 from yabwon/main
The BasePlus package [ver. 1.26.0]
2023-06-01 17:51:17 +02:00
Bart Jablonski
b78dac17e7 Merge pull request #73 from yabwon/main
The BasePlus package [ver. 1.26.0]
2023-06-01 17:05:47 +02:00
Bart Jablonski
974f617772 Merge pull request #72 from yabwon/main
The BasePlus package [ver. 1.24.2]
2023-05-26 11:19:27 +02:00
Bart Jablonski
5550b0d1de Merge pull request #71 from yabwon/main
SAS Packages Framework, version 20230520
2023-05-20 17:37:21 +02:00
Bart Jablonski
0979066509 Merge pull request #70 from yabwon/main
pull request
2023-05-03 23:06:54 +02:00
Bart Jablonski
344619d195 Merge pull request #69 from yabwon/main
The BasePlus package [ver. 1.20.0]
2023-04-17 14:58:51 +02:00
Bart Jablonski
a7c6a670bf Merge pull request #68 from yabwon/main
SAS Packages Framework, version 20230411
2023-04-11 18:41:16 +02:00
Bart Jablonski
01513d9cdb Merge pull request #67 from yabwon/main
Pull request
2023-04-02 18:37:25 +02:00
Bart Jablonski
62ad0c1045 Merge pull request #66 from yabwon/main
SAS Packages Framework, version 20230207
2023-02-07 18:09:36 +01:00
Bart Jablonski
be6d41ae7d Merge pull request #65 from yabwon/main
SAS Packages Framework, version 20230112
2023-01-12 17:30:31 +01:00
Bart Jablonski
c92edcbbd6 Merge pull request #64 from yabwon/main
SAS Packages Framework, version 20221215
2022-12-15 18:09:02 +01:00
Bart Jablonski
b6f9a65f5f Merge pull request #63 from yabwon/main
SAS Packages Framework, version 20221212
2022-12-12 23:45:30 +01:00
Bart Jablonski
d8451c08bc Merge pull request #62 from yabwon/main
SAS Packages Framework, version 20221125
2022-11-26 23:53:51 +01:00
Bart Jablonski
565d7d3f6e Merge pull request #61 from yabwon/main
SAS Packages Framework, version 20221121
2022-11-21 14:31:45 +01:00
Bart Jablonski
f2a72739c7 Merge pull request #60 from yabwon/main
Bunch of small updates
2022-11-13 20:20:30 +01:00
Bart Jablonski
394aaab3be Merge pull request #59 from yabwon/main
SAS Packages Framework, version 20221112
2022-11-12 17:31:22 +01:00
Bart Jablonski
88e97ecd7f Merge pull request #58 from yabwon/main
SAS Packages Framework, version 20221107
2022-11-07 10:48:49 +01:00
Bart Jablonski
ebcad71357 Merge pull request #57 from yabwon/main
SAS Packages Framework, ver. 20221022
2022-10-22 22:19:56 +02:00
Bart Jablonski
e9e3518b6a Merge pull request #56 from yabwon/main
SAS Packages Framework, version 20221002
2022-10-01 12:15:38 +02:00
Bart Jablonski
e17c325e5c Merge pull request #55 from yabwon/main
SAS Packages Framework, version 20221001
2022-10-01 01:11:49 +02:00
Bart Jablonski
6891d9d4c6 Merge pull request #54 from yabwon/main
**SAS Packages Framework**, version 20220930.
2022-09-30 20:42:38 +02:00
Bart Jablonski
1f093a749b Merge pull request #53 from yabwon/main
SAS Packages Framework, version 20220925, extension
2022-09-28 22:45:35 +02:00
Bart Jablonski
9331fa488d Merge pull request #52 from yabwon/main
SAS Packages Framework, version 20220925
2022-09-25 19:17:41 +02:00
Bart Jablonski
6194dcb2a0 Merge pull request #51 from yabwon/main
pull request
2022-08-30 19:18:39 +02:00
Bart Jablonski
bbd018bf61 Merge pull request #49 from yabwon/main
The SAS Packages Framework, version 20220830:
2022-08-30 19:07:19 +02:00
Bart Jablonski
f3b3b55dba Merge pull request #48 from yabwon/main
Innitiative to add SAS Packages Framework to SAS Base/Viya
2022-05-31 21:55:22 +02:00
Bart Jablonski
bd3a78adfd Merge pull request #47 from yabwon/main
The BasePlus package [ver. 1.17]
2022-05-11 23:48:25 +02:00
Bart Jablonski
6487d74aaf Merge pull request #46 from yabwon/main
The BasePlus package [ver. 1.16]
2022-05-09 19:07:45 +02:00
Bart Jablonski
4c734caeec Merge pull request #45 from yabwon/main
The BasePlus package [ver. 1.15]
2022-05-08 19:18:26 +02:00
Bart Jablonski
11400fe51d Merge pull request #44 from yabwon/main
**SAS Packages Framework**, version 20220420
2022-04-20 22:40:24 +02:00
Bart Jablonski
6e5d4c3872 Merge pull request #43 from yabwon/main
The GSM package [ver. 0.20]
2022-04-06 18:15:35 +02:00
Bart Jablonski
3ccf2490e1 Merge pull request #42 from yabwon/main
The GSM package [ver. 0.19]
2022-03-13 20:45:35 +01:00
Bart Jablonski
9273e80a16 Merge pull request #41 from yabwon/main
The GSM package [ver. 0.18]
2022-03-07 16:46:02 +01:00
Bart Jablonski
5cbe17b513 Merge pull request #40 from yabwon/main
pull request
2022-02-17 14:25:47 +01:00
Bart Jablonski
21a713ced7 Merge pull request #39 from yabwon/main
**SAS Packages Framework**, version 20220113
2022-01-13 17:01:35 +01:00
Bart Jablonski
0af4000d33 Merge pull request #38 from yabwon/main
BasePlus package [ver. 1.14]
2022-01-11 14:10:58 +01:00
Bart Jablonski
ae423c362b Merge pull request #37 from yabwon/main
BasePlus package [ver. 1.13]
2022-01-11 11:07:18 +01:00
Bart Jablonski
705a600534 Merge pull request #36 from yabwon/main
Package MacroArray, version 0.9
2021-12-28 18:34:13 +01:00
Bart Jablonski
2137c04534 Merge pull request #35 from yabwon/main
pull request
2021-12-16 10:41:37 +01:00
Bart Jablonski
49bcb64e51 Merge pull request #34 from yabwon/main
SAS Packages Framework, version 220211216
2021-12-16 10:19:42 +01:00
Bart Jablonski
8bdf820958 Merge pull request #31 from yabwon/main
Package BasePlus, version 1.12
2021-11-23 12:52:43 +01:00
Bart Jablonski
2045048ff3 Merge pull request #30 from yabwon/main
Package BasePlus, version 1.11
2021-11-19 17:09:53 +01:00
Bart Jablonski
f4007a22df Merge pull request #29 from yabwon/main
Package BasePlus, version 1.1
2021-11-14 16:14:43 +01:00
Bart Jablonski
96952896a2 Merge pull request #28 from yabwon/main
Package BasePlus, version 1.0
2021-11-13 22:55:51 +01:00
Bart Jablonski
f886a42b77 Merge pull request #27 from yabwon/main
pull request
2021-11-12 13:59:57 +01:00
Bart Jablonski
612e955983 Merge pull request #26 from yabwon/main
Package GSM, version 0.16
2021-11-12 11:14:29 +01:00
Bart Jablonski
907ad0865d Merge pull request #25 from yabwon/main
SAS Packages Framework, version 20211111
2021-11-10 20:25:29 +01:00
Bart Jablonski
9d37f157c7 Merge pull request #24 from yabwon/main
**GSM** (Generate Secure Macros) package, version 0.15
2021-11-05 13:50:47 +01:00
Bart Jablonski
f5159f9557 Merge pull request #23 from yabwon/main
BasePlus, version 0.994
2021-10-05 12:09:11 +02:00
Bart Jablonski
033961fba2 Merge pull request #22 from yabwon/main
pull request
2021-10-01 21:23:48 +02:00
Bart Jablonski
1e31a9cec4 Merge pull request #21 from yabwon/main
pull request
2021-08-18 23:02:20 +02:00
Bart Jablonski
9f8560aa61 Merge pull request #20 from yabwon/main
pull request
2021-07-19 13:02:42 +02:00
Bart Jablonski
4599a6e06d Merge pull request #19 from yabwon/main
**SAS Packages Framework**, version 20210528
2021-05-28 14:54:27 +02:00
Bart Jablonski
28c8afac49 Merge pull request #18 from yabwon/main
pull request
2021-05-20 15:43:02 +02:00
Bart Jablonski
aac8a3ca0a Merge pull request #17 from yabwon/main
pull request
2021-05-16 21:46:47 +02:00
yabwon
82bb81624f Merge branch 'master' of https://github.com/yabwon/SAS_PACKAGES 2021-03-30 22:44:25 +02:00
Bart Jablonski
9bccf5b9f5 Merge pull request #16 from yabwon/main
pull reques
2021-03-30 22:43:03 +02:00
yabwon
cad068d931 Final version of SGF2021 article
Final version of SGF2021 article
2021-03-30 22:39:17 +02:00
Bart Jablonski
b9c280d983 Merge pull request #15 from yabwon/main
*SAS Packages Framework*, version 20210204
2021-02-04 13:44:09 +01:00
Bart Jablonski
ca72c14569 Merge pull request #14 from yabwon/main
pull request
2021-02-03 21:21:59 +01:00
Bart Jablonski
aa84650b42 Merge pull request #13 from yabwon/main
pull request
2021-01-22 17:00:32 +01:00
Bart Jablonski
60354ce484 Merge pull request #12 from yabwon/main
pull request
2021-01-17 21:13:38 +01:00
Bart Jablonski
793d0c7d6a Merge pull request #11 from yabwon/main
pull request
2021-01-09 21:03:09 +01:00
16 changed files with 667 additions and 451 deletions

View File

@@ -17,7 +17,7 @@ Don't forget to give the repository a **STAR** and become [stargazer](https://gi
### Current version:
**The latest version** of the **SAS Packages Framework** is **`20250729`**.
**The latest version** of the **SAS Packages Framework** is **`20251017`**.
---

View File

@@ -6,7 +6,7 @@
when empty the "packages" value is used */
)/secure
/*** HELP END ***/
des = 'Macro to list directories pointed by "packages" fileref, version 20250729. Run %extendPackagesFileref(HELP) for help info.'
des = 'Macro to list directories pointed by "packages" fileref, version 20251017. Run %extendPackagesFileref(HELP) for help info.'
;
%if %QUPCASE(&packages.) = HELP %then
@@ -22,7 +22,7 @@ des = 'Macro to list directories pointed by "packages" fileref, version 20250729
%put ### This is short help information for the `extendPackagesFileref` macro #;
%put #-----------------------------------------------------------------------------------------#;;
%put # #;
%put # Macro to list directories pointed by 'packages' fileref, version `20250729` #;
%put # Macro to list directories pointed by 'packages' fileref, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;

View File

@@ -3,7 +3,7 @@
Macro to generate SAS packages.
Version 20250729
Version 20251017
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -20,30 +20,36 @@
filesLocation /* location of package files
e.g. /path/to/package/files/locatiion or C:\my\package\files */
/* testing options: */
,testPackage=Y /* indicator if tests should be executed,
default value Y means "execute tests" */
,packages= /* location of other packages if there are
dependencies in loading, must be a single directory
if more than one are provided only the first is used */
,testResults= /* location where tests results should be stored,
if null (the default) the WORK is used */
,sasexe= /* a DIRECTORY where the SAS binary is located,
if null (the default) then the !SASROOT is used */
,sascfgFile= /* a FILE with testing session configuration parameters
if null (the default) then no config file is pointed
during the SAS invocation,
if set to DEF then the !SASROOT/sasv9.cfg is used */
,delTestWork=1 /* indicates if `WORK` directories generated by user tests
should be deleted, i.e. the (NO)WORKTERM option is set,
default value 1 means "delete tests work" */
,markdownDoc=0 /* indicates if a markdown file with documentation
be generated from help info blocks */
,easyArch=0 /* when creating documentation file indicates if a copy of
the zip and markdown files with the version number in the
file name be created */
,testPackage=Y /* indicator if tests should be executed,
default value Y means "execute tests" */
,packages= /* location of other packages if there are
dependencies in loading, must be a single directory
if more than one are provided only the first is used */
,testResults= /* location where tests results should be stored,
if null (the default) the WORK is used */
,workInTestResults=0 /* indicates if WORK directories for tests should located
in the same place as results */
,testWorkPath= /* location where tests SAS sessions' work directories
should be stored, if null (the default) the main SAS
session WORK is used. Takes precedence over workInTestResults= */
,sasexe= /* a DIRECTORY where the SAS binary is located,
if null (the default) then the !SASROOT is used */
,sascfgFile= /* a FILE with testing session configuration parameters
if null (the default) then no config file is pointed
during the SAS invocation,
if set to DEF then the !SASROOT/sasv9.cfg is used */
,delTestWork=1 /* indicates if `WORK` directories generated by user tests
should be deleted, i.e. the (NO)WORKTERM option is set,
default value 1 means "delete tests work" */
/* documentation options: */
,markdownDoc=0 /* indicates if a markdown file with documentation
be generated from help info blocks */
,easyArch=0 /* when creating documentation file indicates if a copy of
the zip and markdown files with the version number in the
file name be created */
)/ secure minoperator
/*** HELP END ***/
des = 'Macro to generate SAS packages, version 20250729. Run %generatePackage() for help info.'
des = 'Macro to generate SAS packages, version 20251017. Run %generatePackage() for help info.'
;
%if (%superq(filesLocation) = ) OR (%qupcase(&filesLocation.) = HELP) %then
%do;
@@ -54,75 +60,87 @@ des = 'Macro to generate SAS packages, version 20250729. Run %generatePackage()
;
options NOnotes NOsource ls=MAX ps=MAX msglevel=N;
%put ;
%put #################################################################################;
%put ### This is short help information for the `generatePackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to generate SAS packages, version `20250729` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
%put # data, etc.) wrapped up together and embedded inside the zip. #;
%put # #;
%put # The `%nrstr(%%generatePackage())` macro generates SAS packages. #;
%put # It wraps-up the package content, i.e. macros, functions, formats, etc., #;
%put # into the zip file and generate all metadata content required by other #;
%put # macros from the SAS Packages Framework. #;
%put # #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Visit: `https://github.com/yabwon/SAS_PACKAGES/tree/main/SPF/Documentation` #;
%put # to read about the details of package generation process. #;
%put # Tutorials available at: `https://github.com/yabwon/HoW-SASPackages` #;
%put # #;
%put #### Parameters: #;
%put # #;
%put # 1. `filesLocation=` Location of package files, example value: #;
%put # `%nrstr(%%sysfunc(pathname(work))/packagename)`. #;
%put # Default use case: #;
%put # `%nrstr(%%generatePackage(filesLocation=/path/to/packagename))` #;
%put # If empty displays this help information. #;
%put # #;
%put # Testing parameters: #;
%put # #;
%put # - `testPackage=` Indicator if tests should be executed. #;
%put # Default value: `Y`, means "execute tests" #;
%put # #;
%put # - `packages=` Location of other packages for testing #;
%put # if there are dependencies in loading the package. #;
%put # Has to be a single directory, if more than one are #;
%put # provided than only the first is used. #;
%put # If path to location contains spaces it should be quoted! #;
%put # #;
%put # - `testResults=` Location where tests results should be stored, #;
%put # if null (the default) then the session WORK is used. #;
%put # #;
%put # - `sasexe=` Location of a DIRECTORY where the SAS binary is located, #;
%put # if null (the default) then the `!SASROOT` is used. #;
%put # #;
%put # - `sascfgFile=` Location of a FILE with testing session configuration #;
%put # parameters, if null (the default) then no config file #;
%put # is pointed during the SAS invocation, #;
%put # if set to `DEF` then the `!SASROOT/sasv9.cfg` is used. #;
%put # #;
%put # - `delTestWork=` Indicates if `WORK` directories generated by user tests #;
%put # should be deleted, i.e. the (NO)WORKTERM option is set. #;
%put # The default value: `1` means "delete tests work". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put # - `markdownDoc=` Indicates if a markdown file with documentation #;
%put # be generated from help information blocks. #;
%put # The default value: `0` means "do not generate the file". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put # - `easyArch=` When creating documentation file (`markdownDoc=1`) #;
%put # indicates if a copy of the zip and markdown files #;
%put # with the version number in the file name be created #;
%put # The default value: `0` means "do not create files". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put #-------------------------------------------------------------------------------#;
%put #################################################################################;
%put ######################################################################################;
%put ### This is short help information for the `generatePackage` macro #;
%put #------------------------------------------------------------------------------------#;
%put # #;
%put # Macro to generate SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
%put # data, etc.) wrapped up together and embedded inside the zip. #;
%put # #;
%put # The `%nrstr(%%generatePackage())` macro generates SAS packages. #;
%put # It wraps-up the package content, i.e. macros, functions, formats, etc., #;
%put # into the zip file and generate all metadata content required by other #;
%put # macros from the SAS Packages Framework. #;
%put # #;
%put #------------------------------------------------------------------------------------#;
%put # #;
%put # Visit: `https://github.com/yabwon/SAS_PACKAGES/tree/main/SPF/Documentation` #;
%put # to read about the details of package generation process. #;
%put # Tutorials available at: `https://github.com/yabwon/HoW-SASPackages` #;
%put # #;
%put #### Parameters: #;
%put # #;
%put # 1. `filesLocation=` Location of package files, example value: #;
%put # `%nrstr(%%sysfunc(pathname(work))/packagename)`. #;
%put # Default use case: #;
%put # `%nrstr(%%generatePackage(filesLocation=/path/to/packagename))` #;
%put # If empty displays this help information. #;
%put # #;
%put # Testing parameters: #;
%put # #;
%put # - `testPackage=` Indicator if tests should be executed. #;
%put # Default value: `Y`, means "execute tests" #;
%put # #;
%put # - `packages=` Location of other packages for testing #;
%put # if there are dependencies in loading the package. #;
%put # Has to be a single directory, if more than one are #;
%put # provided than only the first is used. #;
%put # If path to location contains spaces it should be quoted! #;
%put # #;
%put # - `testResults=` Location where tests results should be stored, #;
%put # if null (the default) then the session WORK is used. #;
%put # #;
%put # - `workInTestResults=` Indicates if WORK directories for test sessions should #;
%put # be located in the same place as results. #;
%put # The default value: `0` means "do not do this". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put # - `testWorkPath=` Points a location where tests sessions work directories #;
%put # should be stored. By default it is null what means that #;
%put # a sub-directory of the main SAS session WORK is used. #;
%put # Takes precedence over `workInTestResults=`. #;
%put # #;
%put # - `sasexe=` Location of a DIRECTORY where the SAS binary is located, #;
%put # if null (the default) then the `!SASROOT` is used. #;
%put # #;
%put # - `sascfgFile=` Location of a FILE with testing session configuration #;
%put # parameters, if null (the default) then no config file #;
%put # is pointed during the SAS invocation, #;
%put # if set to `DEF` then the `!SASROOT/sasv9.cfg` is used. #;
%put # #;
%put # - `delTestWork=` Indicates if `WORK` directories generated by user tests #;
%put # should be deleted, i.e. the (NO)WORKTERM option is set. #;
%put # The default value: `1` means "delete tests work". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put # Documentation parameters: #;
%put # #;
%put # - `markdownDoc=` Indicates if a markdown file with documentation #;
%put # be generated from help information blocks. #;
%put # The default value: `0` means "do not generate the file". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put # - `easyArch=` When creating documentation file (`markdownDoc=1`) #;
%put # indicates if a copy of the zip and markdown files #;
%put # with the version number in the file name be created #;
%put # The default value: `0` means "do not create files". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put #------------------------------------------------------------------------------------#;
%put ######################################################################################;
%put ;
options &options_tmp.;
%GOTO ENDofgeneratePackage;
@@ -873,7 +891,7 @@ title6 "MD5 hashed fileref of package lowcase name: &_PackageFileref_.";
title8 "Required SAS packages: %qsysfunc(compress(%superq(packageReqPackages),%str(%'%")))" ; /* " */
%end;
footnote1 "SAS Packages Framework, version 20250729";
footnote1 "SAS Packages Framework, version 20251017";
proc print
data = &filesWithCodes.(drop=base folderRef fileRef rc folderid _abort_ fileId additionalContent)
@@ -941,27 +959,27 @@ run;
file &zipReferrence.(license.sas) encoding = &packageEncoding.;
length packageAuthor $ 1024;
packageAuthor = symget('packageAuthor');
put " ";
put "Copyright (c) since %sysfunc(today(),year4.) " packageAuthor ;
put " ";
put "Permission is hereby granted, free of charge, to any person obtaining a copy ";
put 'of this software and associated documentation files (the "Software"), to deal ';
put "in the Software without restriction, including without limitation the rights ";
put "to use, copy, modify, merge, publish, distribute, sublicense, and/or sell ";
put "copies of the Software, and to permit persons to whom the Software is ";
put "furnished to do so, subject to the following conditions: ";
put " ";
put "The above copyright notice and this permission notice shall be included ";
put "in all copies or substantial portions of the Software. ";
put " ";
put 'THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR ';
put "IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, ";
put "FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE ";
put "AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER ";
put "LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, ";
put "OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE ";
put "SOFTWARE. ";
put " ";
put " ";
put "Copyright (c) since %sysfunc(today(),year4.) " packageAuthor ;
put " ";
put "Permission is hereby granted, free of charge, to any person obtaining a copy";
put 'of this software and associated documentation files (the "Software"), to deal';
put "in the Software without restriction, including without limitation the rights";
put "to use, copy, modify, merge, publish, distribute, sublicense, and/or sell";
put "copies of the Software, and to permit persons to whom the Software is";
put "furnished to do so, subject to the following conditions:";
put " ";
put "The above copyright notice and this permission notice shall be included";
put "in all copies or substantial portions of the Software.";
put " ";
put 'THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR';
put "IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,";
put "FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE";
put "AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER";
put "LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,";
put "OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE";
put "SOFTWARE.";
put " ";
run;
%end;
@@ -1697,7 +1715,7 @@ data _null_;
%end;
put +(-1) '`.;''' /
' !! '' %put The macro generated: '' !! put(dtCASLudf, E8601DT19.-L) !! ";"' /
' !! '' %put with the SAS Packages Framework version 20250729.;''' /
' !! '' %put with the SAS Packages Framework version 20251017.;''' /
' !! '' %put ****************************************************************************;''' /
' !! '' %GOTO theEndOfTheMacro;''' /
' !! '' %end;''' ;
@@ -1862,7 +1880,7 @@ data _null_;
%end;
put +(-1) '`.; '' !!' /
''' %put The macro generated: ''' " !! put(dtIML, E8601DT19.-L) !! " '''; '' !!' /
''' %put with the SAS Packages Framework version 20250729.; '' !! ' /
''' %put with the SAS Packages Framework version 20251017.; '' !! ' /
''' %put ****************************************************************************; '' !! ' /
''' %GOTO theEndOfTheMacro; '' !! ' /
''' %end; '' !! ' /
@@ -2669,7 +2687,7 @@ data _null_;
%end;
put 'put " " / @3 "--------------------------------------------------------------------" / " ";'
/ 'put @3 "*SAS package generated by SAS Package Framework, version `20250729`*";'
/ 'put @3 "*SAS package generated by SAS Package Framework, version `20251017`*";'
/ 'put " " / @3 "--------------------------------------------------------------------";';
put 'run; ' /;
@@ -3224,16 +3242,57 @@ options DLCREATEDIR; /* turns-on creation of subdirectories by libname */
/* temporary location for tests results is WORK unless developer provide &testResults. */
%local testPackageTimesamp;
%let testPackageTimesamp = %sysfunc(lowcase(&packageName._%sysfunc(datetime(),b8601dt15.)));
%if %qsysfunc(fileexist(%bquote(&testResults.))) %then
%if %qsysfunc(fileexist(%superq(testResults))) %then
%do;
libname TEST "&testResults./test_&testPackageTimesamp.";
%end;
%else
%do;
%if NOT %sysevalf(%superq(testResults)=,boolean) %then
%do;
%put WARNING: The testResults path:;
%put WARNING- %superq(testResults);
%put WARNING- does not exist. WORK will be used.;
%put WARNING- ;
%end;
libname TEST "&SASWORK./test_&testPackageTimesamp.";
%end;
/* test work points to the SAS session work */
libname TESTWORK "&SASWORK./testwork_&testPackageTimesamp.";
/* test WORK points to the SAS session WORK or to directory pointed by the developer */
%if %qsysfunc(fileexist(%superq(testWorkPath))) %then
%do;
libname TESTWORK "&testWorkPath./testwork_&testPackageTimesamp.";
%put NOTE- ;
%PUT NOTE: WORK libname directories from test SAS sessions will not be deleted.;
%if %sysevalf(1=%superq(workInTestResults),boolean) %then
%do;
%put NOTE- Parameter workInTestResults is ignored;
%end;
%put NOTE- ;
%let delTestWork=0;
%end;
%else %if %sysevalf(1=%superq(workInTestResults),boolean) %then
%do;
libname TESTWORK "%sysfunc(pathname(TEST))";
%put NOTE- ;
%PUT NOTE: WORK libname directories from test SAS sessions will be located in the;
%PUT NOTE- same directory where test resulrs are stored, and will not be deleted.;
%put NOTE- ;
%let delTestWork=0;
%end;
%else
%do;
%if NOT %sysevalf(%superq(testWorkPath)=,boolean) %then
%do;
%put WARNING: The testWorkPath path:;
%put WARNING- %superq(testWorkPath);
%put WARNING- does not exist. WORK will be used.;
%put WARNING- ;
%end;
libname TESTWORK "&SASWORK./testwork_&testPackageTimesamp.";
%end;
%local dirForTest dirForTestWork;
%let dirForTest = %sysfunc(pathname(TEST));
%let dirForTestWork = %sysfunc(pathname(TESTWORK));
@@ -3247,7 +3306,7 @@ filename currdir ".";
filename currdir list;
/* if your package uses any other packages this points to their location */
/* test if packages fileref exists and, if do, use it */
/* test if packages fileref exists and, if it does, use it */
/* if no one is provided the filesLocation is used as a replacement */
%if %bquote(&packages.)= %then %let packages=%sysfunc(pathname(packages));
%if %bquote(&packages.)= %then %let packages=&filesLocation.;
@@ -3273,9 +3332,9 @@ options NOquotelenmax;
data _null_;
file "./loading.sas";
put "proc printto";
put "log = '&dirForTest./loading.log0'";
put "; run;";
put "proc printto"
/ "log = '&dirForTest./loading.log0'"
/ "; run;";
put "filename packages '&packages.';" /;
@@ -3285,18 +3344,18 @@ data _null_;
put '%include packages(loadpackage.sas);' / ; /* for older versions when the SPFinit.sas did not exist */
/* load */
put '%loadpackage'"(&packageName.,";
put " path=&filesLocation.)" /;
put '%loadpackage'"(&packageName.,";
put " path=&filesLocation., lazyData=*)" /;
put '%loadpackage'"(&packageName.,"
/ " path=&filesLocation.)" /;
put '%loadpackage'"(&packageName.,"
/ " path=&filesLocation., lazyData=*)" /;
/* help */
put '%helpPackage'"(&packageName.,";
put " path=&filesLocation.)" /;
put '%helpPackage'"(&packageName.,*,";
put " path=&filesLocation.)" /;
put '%helpPackage'"(&packageName.,License,";
put " path=&filesLocation.)" /;
put '%helpPackage'"(&packageName.,"
/ " path=&filesLocation.)" /;
put '%helpPackage'"(&packageName.,*,"
/ " path=&filesLocation.)" /;
put '%helpPackage'"(&packageName.,License,"
/ " path=&filesLocation.)" /;
/* preview */
put '%previewPackage'"(&packageName.,";
@@ -3316,10 +3375,9 @@ data _null_;
when (upcase(type) in ("LAZYDATA")) /* the "DATA" type will pop-up during deletion */
do;
if 1 = FIRST.type then
put "data _null_; " ;
put " if not exist('" fileshortUP "') then " /
" put 'WARNING: Dataset " fileshortUP "does not exist!'; "
;
put "data _null_; "
/ " if not exist('" fileshortUP "') then "
/ " put 'WARNING: Dataset " fileshortUP "does not exist!'; " ;
if 1 = LAST.type then
put "run; ";
end;
@@ -3327,10 +3385,9 @@ data _null_;
when (upcase(type) =: "MACRO")
do;
if 1 = FIRST.type then
put "data _null_; " ;
put ' if not input(resolve(''%SYSMACEXIST(' fileshortUP ')''), best.) then ' /
" put 'WARNING: Macro " fileshortUP "does not exist!'; "
;
put "data _null_; "
/ ' if not input(resolve(''%SYSMACEXIST(' fileshortUP ')''), best.) then '
/ " put 'WARNING: Macro " fileshortUP "does not exist!'; " ;
if 1 = LAST.type then
put "run; ";
@@ -3348,19 +3405,23 @@ data _null_;
end;
/* unload */
put '%unloadPackage'"(&packageName.,";
put " path=&filesLocation.) " /;
put '%unloadPackage'"(&packageName.,"
/ " path=&filesLocation.) " /;
/* additional content */
put '%loadPackageAddCnt'"(&packageName.,";
put " path=&filesLocation.) " /;
put '%loadPackageAddCnt'"(&packageName.,"
/ " path=&filesLocation.) " /;
put "filename packages '&filesLocation.';" /
'%listPackages() ' /;
put "filename packages '&filesLocation.';"
/ '%listPackages() ' /;
/* check if work should be deleted after test is done */
delTestWork = input(symget('delTestWork'), ?? best32.);
if 0 = delTestWork then
put "options NOWORKTERM;"/;
put "proc printto";
put "; run;";
put "proc printto"
/ "; run;";
stop;
run;
@@ -3471,6 +3532,28 @@ data _null_;
file "./autoexec.sas";
/* check if work should be deleted after test is done */
delTestWork = input(symget('delTestWork'), ?? best32.);
if not(delTestWork in (0 1)) then
do;
putlog "WARNING: [&sysmacroname.] The `delTestWork` parameter is invalid.";
putlog "WARNING- [&sysmacroname.] Default value (1) is set.";
delTestWork = 1;
end;
if 0 = delTestWork then
do;
put "libname _ '&dirForTest.';" /
"data TESTWORK_&t.;" /
" length testName $ 128 testWork $ 2048;" /
" testNumber=&t.; testName='&&TEST_&t..';" /
" testWork = pathname('WORK');" /
"run;" /
"proc append base=_.TESTWORK data=TESTWORK_&t.; run;" /
"proc delete data=TESTWORK_&t.; run;" /
"libname _ clear;" ;
end;
put "proc printto";
put "log = '&dirForTest./&&TEST_&t...log0'";
put "; run;";
@@ -3487,15 +3570,6 @@ data _null_;
put '%loadpackage'"(&packageName.,";
put " path=&filesLocation., lazyData=*)" /;
/* check if work should be deleted after test is done */
delTestWork = input(symget('delTestWork'), ?? best32.);
if not(delTestWork in (0 1)) then
do;
putlog "WARNING: [&sysmacroname.] The `delTestWork` parameter is invalid.";
putlog "WARNING- [&sysmacroname.] Default value (1) is set.";
delTestWork = 1;
end;
if 0 = delTestWork then
put "options NOWORKTERM;"/;
@@ -3572,12 +3646,13 @@ options &notesSourceOptions.;
data test.tests_summary;
length testName $ 128;
do _N_ = 0 to &numberOfTests.;
testName = symget(cats("TEST_", _N_));
systask = coalesce(input(symget(cats("SASSTAT", _N_)), ?? best32.), -1);
sysrc = coalesce(input(symget(cats("TESTRC_", _N_)), ?? best32.), -1);
error = coalesce(input(symget(cats("TESTE_", _N_)), ?? best32.), -1);
warning = coalesce(input(symget(cats("TESTW_", _N_)), ?? best32.), -1);
do testNumber = 0 to &numberOfTests.;
testName = symget(cats("TEST_", testNumber));
systask = coalesce(input(symget(cats("SASSTAT", testNumber)), ?? best32.), -1);
sysrc = coalesce(input(symget(cats("TESTRC_", testNumber)), ?? best32.), -1);
error = coalesce(input(symget(cats("TESTE_", testNumber)), ?? best32.), -1);
warning = coalesce(input(symget(cats("TESTW_", testNumber)), ?? best32.), -1);
output;
end;
run;
@@ -3585,10 +3660,29 @@ title1 "Summary of tests.";
title2 "details can be found in:";
title3 "%sysfunc(pathname(TEST))";
footnote;
proc print data = test.tests_summary;
proc print data = test.tests_summary(drop=testNumber);
run;
title;
%if 0=&delTestWork. %then
%do;
data test.tests_summary;
merge
test.tests_summary
%if %sysfunc(EXIST(test.testwork)) %then
%do; test.testwork %end;
%else
%do; %PUT INFO: Cannot add work path location info.; %end;
;
by testNumber;
run;
%if %sysfunc(EXIST(test.testwork)) %then
%do;
proc delete data=test.testwork;
run;
%end;
%end;
/*%put _local_;*/
%put NOTE: Changing current folder to:;
@@ -3707,7 +3801,7 @@ data &filesWithCodes.markdown;
%end;
put " " / "--------------------------------------------------------------------" / " "
/ "*SAS package generated by SAS Package Framework, version `20250729`*"
/ "*SAS package generated by SAS Package Framework, version `20251017`*"
/ " " / "--------------------------------------------------------------------" / " ";
put "# The `&packageName.` package content";

View File

@@ -28,7 +28,7 @@
*/
)/secure
/*** HELP END ***/
des = 'Macro to get help about SAS package, version 20250729. Run %helpPackage() for help info.'
des = 'Macro to get help about SAS package, version 20251017. Run %helpPackage() for help info.'
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
%do;
@@ -43,7 +43,7 @@ des = 'Macro to get help about SAS package, version 20250729. Run %helpPackage()
%put ### This is short help information for the `helpPackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to get help about SAS packages, version `20250729` #;
%put # Macro to get help about SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;

View File

@@ -1,5 +1,5 @@
/*+installPackage+*/
/* Macros to install SAS packages, version 20250729 */
/* Macros to install SAS packages, version 20251017 */
/* A SAS package is a zip file containing a group of files
with SAS code (macros, functions, data steps generating
data, etc.) wrapped up together and %INCLUDEed by
@@ -26,7 +26,7 @@
/secure
minoperator
/*** HELP END ***/
des = 'Macro to install SAS package, version 20250729. Run %%installPackage() for help info.'
des = 'Macro to install SAS package, version 20251017. Run %%installPackage() for help info.'
;
%if (%superq(packagesNames) = ) OR (%qupcase(&packagesNames.) = HELP) %then
%do;
@@ -41,7 +41,7 @@ des = 'Macro to install SAS package, version 20250729. Run %%installPackage() fo
%put ### This is short help information for the `installPackage` macro #;
%put #--------------------------------------------------------------------------------------------#;;
%put # #;
%put # Macro to install SAS packages, version `20250729` #;
%put # Macro to install SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;

View File

@@ -3,7 +3,7 @@
Macro to list SAS packages in packages folder.
Version 20250729
Version 20251017
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -23,7 +23,7 @@
%macro listPackages()
/secure PARMBUFF
des = 'Macro to list SAS packages from `packages` fileref, type %listPackages(HELP) for help, version 20250729.'
des = 'Macro to list SAS packages from `packages` fileref, type %listPackages(HELP) for help, version 20251017.'
;
%if %QUPCASE(&SYSPBUFF.) = %str(%(HELP%)) %then
%do;
@@ -38,7 +38,7 @@ des = 'Macro to list SAS packages from `packages` fileref, type %listPackages(HE
%put ### This is short help information for the `listPackages` macro #;
%put #-----------------------------------------------------------------------------------------#;;
%put # #;
%put # Macro to list available SAS packages, version `20250729` #;
%put # Macro to list available SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;

View File

@@ -36,7 +36,7 @@
*/
)/secure
/*** HELP END ***/
des = 'Macro to load SAS package, version 20250729. Run %loadPackage() for help info.'
des = 'Macro to load SAS package, version 20251017. Run %loadPackage() for help info.'
minoperator
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
@@ -52,7 +52,7 @@ minoperator
%put ### This is short help information for the `loadPackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to *load* SAS packages, version `20250729` #;
%put # Macro to *load* SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;

View File

@@ -19,7 +19,7 @@
is provided in required version */
)/secure
/*** HELP END ***/
des = 'Macro to load additional content for a SAS package, version 20250729. Run %loadPackageAddCnt() for help info.'
des = 'Macro to load additional content for a SAS package, version 20251017. Run %loadPackageAddCnt() for help info.'
minoperator
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
@@ -35,7 +35,7 @@ minoperator
%put ### This is short help information for the `loadPackageAddCnt` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to *load* additional content for a SAS package, version `20250729` #;
%put # Macro to *load* additional content for a SAS package, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -291,6 +291,8 @@ minoperator
set WORK.__&_TargetFileref_._zip___ end = EOF;
wc = countw(file,"/\");
put wc= file=;
length libText pathname_f $ 8192;
libText = pathname("outData", "L");
@@ -309,15 +311,24 @@ minoperator
end;
pathname_f = pathname("f");
rc1 = filename("in", strip(pathname_f), "zip", "member='" !! strip(file) !! "' lrecl=1 recfm=n");
length rc1msg $ 8192;
rc1 = filename("in", strip(pathname_f), "zip", "member='" !! strip(file) !! "' lrecl=1 recfm=n");
rc1msg = sysmsg();
rc2 = filename("out", catx("/", libText, scan(file, j , "/\")), "disk", "lrecl=1 recfm=n");
length fileNameOutPath $ 8192;
fileNameOutPath = catx("/", libText, scan(file, j , "/\"));
/* check for Windows */
if lengthn(fileNameOutPath)>260 then
if symget('SYSSCP')='WIN' then
put "INFO: Pathname plus filename length exceeds 260. Under Windows family OS it may cause problems.";
length rc2msg $ 8192;
rc2 = filename("out", fileNameOutPath, "disk", "lrecl=1 recfm=n");
rc2msg = sysmsg();
rc3 = fcopy("in", "out");
length rc3msg $ 8192;
rc3 = fcopy("in", "out");
rc3msg = sysmsg();
loadingProblem + (rc3 & 1);
@@ -325,7 +336,7 @@ minoperator
if rc3 then
do;
put "ERROR: Cannot extract: " file;
put (rc1 rc2 rc3) (=);
put "ERROR-" (rc1 rc2 rc3) (=);
put (rc1msg rc2msg rc3msg) (/);
put "ERROR-";
end;

View File

@@ -11,7 +11,7 @@
*/
)/secure
/*** HELP END ***/
des = 'Macro to load multiple SAS packages at one run, version 20250729. Run %loadPackages() for help info.'
des = 'Macro to load multiple SAS packages at one run, version 20251017. Run %loadPackages() for help info.'
parmbuff
;
%if (%superq(packagesNames) = ) OR (%qupcase(&packagesNames.) = HELP) %then
@@ -27,7 +27,7 @@ parmbuff
%put ### This is short help information for the `loadPackageS` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro wrapper for the loadPackage macro, version `20250729` #;
%put # Macro wrapper for the loadPackage macro, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;

View File

@@ -23,7 +23,7 @@
*/
)/secure
/*** HELP END ***/
des = 'Macro to preview content of a SAS package, version 20250729. Run %previewPackage() for help info.'
des = 'Macro to preview content of a SAS package, version 20251017. Run %previewPackage() for help info.'
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
%do;
@@ -38,7 +38,7 @@ des = 'Macro to preview content of a SAS package, version 20250729. Run %preview
%put ### This is short help information for the `previewPackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to get preview of a SAS packages, version `20250729` #;
%put # Macro to get preview of a SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;

View File

@@ -8,7 +8,7 @@
,nobs=0 /* technical parameter */
)
/*** HELP START ***/
/ des = 'Utility macro to split "one big" code into multiple files for a SAS package, version 20250729. Run %splitCodeForPackage() for help info.'
/ des = 'Utility macro to split "one big" code into multiple files for a SAS package, version 20251017. Run %splitCodeForPackage() for help info.'
;
/*%macro _();%mend _;*/
%if (%superq(codeFile) = ) OR (%qupcase(&codeFile.) = HELP) %then
@@ -25,7 +25,7 @@
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Utility macro to *split* single file with SAS package code into multiple #;
%put # files with separate snippets, version `20250729` #;
%put # files with separate snippets, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -107,7 +107,6 @@
%GOTO ENDofsplitCodeForPackage;
%end;
%local options_tmp2 ;
%let options_tmp2 = ls=%sysfunc(getoption(ls)) ps=%sysfunc(getoption(ps))
%sysfunc(getoption(notes)) %sysfunc(getoption(source))
@@ -173,7 +172,6 @@ options nomprint nosymbolgen nomlogic notes source ls=MAX ps=MAX msglevel=N ;
call symputX('packagePath',packagePath,"L");
run;
data w.files;
stop;
run;
@@ -199,7 +197,7 @@ options nomprint nosymbolgen nomlogic notes source ls=MAX ps=MAX msglevel=N ;
line = left(lowcase(_infile_));
block=scan(line,1," ");
if block in (
if block in (
'/*##$##-code-block-start-##$##'
'/*##$##-code-block-end-##$##'
);
@@ -403,7 +401,7 @@ options nomprint nosymbolgen nomlogic notes source ls=MAX ps=MAX msglevel=N ;
*/
if firstLine[j] then
do;
put '/* File generated with help of SAS Packages Framework, version 20250729. */';
put '/* File generated with help of SAS Packages Framework, version 20251017. */';
firstLine[j]=0;
end;
put _infile_;
@@ -419,5 +417,4 @@ options &options_tmp2.;
%ENDofsplitCodeForPackage:
%mend splitCodeForPackage;
/**/

View File

@@ -20,7 +20,7 @@
*/
)/secure
/*** HELP END ***/
des = 'Macro to unload SAS package, version 20250729. Run %unloadPackage() for help info.'
des = 'Macro to unload SAS package, version 20251017. Run %unloadPackage() for help info.'
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
%do;
@@ -35,7 +35,7 @@ des = 'Macro to unload SAS package, version 20250729. Run %unloadPackage() for h
%put ### This is short help information for the `unloadPackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to unload SAS packages, version `20250729` #;
%put # Macro to unload SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;

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 20250729. Run %verifyPackage() for help info.'
des = 'Macro to verify SAS package with the hash digest, version 20251017. 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 20250729. Run %
%put ### This is short help information for the `verifyPackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to verify SAS package with it hash digest, version `20250729` #;
%put # Macro to verify SAS package with it hash digest, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;

View File

@@ -1,7 +1,7 @@
---
# SAS Packages Framework, version `20250729`
# SAS Packages Framework, version `20251017`
---
@@ -25,13 +25,13 @@
## This is short SAS Packages Framework help information <a name="helpinfo"></a>
A **SAS package** is an automatically generated, single, stand alone *zip* file containing organised and ordered code structures, created by the developer and extended with additional automatically generated "driving" files (i.e. description, metadata, load, unload, and help files).
A **SAS package** is an automatically generated, single, stand alone *zip* file containing organized and ordered code structures, created by the developer and extended with additional automatically generated "driving" files (i.e. description, metadata, load, unload, and help files).
The *purpose of a package* is to be a simple, and easy to access, code sharing medium, which will allow: on the one hand, to separate the code complex dependencies created by the developer from the user experience with the final product and, on the other hand, reduce developer's and user's unnecessary frustration related to a remote deployment process.
In this repository we are presenting the **SAS Packages Framework** which allows to develop and use SAS packages. The latest version of SPF is **`20250729`**.
In this repository we are presenting the **SAS Packages Framework** which allows to develop and use SAS packages. The latest version of SPF is **`20251017`**.
**To get started with SAS Packages** try this [**`Getting Started with SAS Packages`**](https://github.com/yabwon/SAS_PACKAGES/blob/main/SPF/Documentation/Getting_Started_with_SAS_Packages.pdf "Getting Started with SAS Packages") presentation (see the `./SPF/Documentation` directory).
**To get started with SAS Packages** try this [**`Introduction to SAS Packages`**](https://youtube.com/playlist?list=PLeMzGEImIT5eV13IGXQIgWmTFCJt_cLZG&si=ElQm0_ifq76mvUbq "Introduction to SAS Packages video series") video series or [**`Getting Started with SAS Packages`**](https://github.com/yabwon/SAS_PACKAGES/blob/main/SPF/Documentation/Getting_Started_with_SAS_Packages.pdf "Getting Started with SAS Packages") presentation (see the `./SPF/Documentation` directory).
**The documentation and more advance reading** would be the [**`SAS(r) packages - the way to share (a how to)- Paper 4725-2020 - extended.pdf`**](https://github.com/yabwon/SAS_PACKAGES/blob/main/SPF/Documentation/SAS(r)%20packages%20-%20the%20way%20to%20share%20(a%20how%20to)-%20Paper%204725-2020%20-%20extended.pdf "SAS packages - the way to share") article (see the `./SPF/Documentation` directory).
@@ -52,7 +52,7 @@ them using the SPF can be found [**HERE**](https://github.com/yabwon/HoW-SASPack
## This is short help information for the `installPackage` macro <a name="installpackage"></a>
--------------------------------------------------------------------------------------------
Macro to install SAS packages, version `20250729`
Macro to install SAS packages, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -180,7 +180,7 @@ filename packages "C:/SAS_PACKAGES";
## This is short help information for the `helpPackage` macro <a name="helppackage"></a>
-------------------------------------------------------------------------------
Macro to get help about SAS packages, version `20250729`
Macro to get help about SAS packages, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -258,7 +258,7 @@ filename packages "C:/SAS_PACKAGES"; %* setup a directory for packages;
## This is short help information for the `loadPackage` macro <a name="loadpackage"></a>
-------------------------------------------------------------------------------
Macro to *load* SAS packages, version `20250729`
Macro to *load* SAS packages, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -416,7 +416,7 @@ If created, those macros are automatically deleted when the `%unloadPackage()` m
## This is short help information for the `loadPackageS` macro <a name="loadpackages"></a>
-------------------------------------------------------------------------------
Macro wrapper for the loadPackage macro, version `20250729`
Macro wrapper for the loadPackage macro, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -467,7 +467,7 @@ filename packages "C:/SAS_PACKAGES"; %* setup a directory for packages;
## This is short help information for the `unloadPackage` macro <a name="unloadpackage"></a>
-------------------------------------------------------------------------------
Macro to unload SAS packages, version `20250729`
Macro to unload SAS packages, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -534,7 +534,7 @@ filename packages "C:/SAS_PACKAGES"; %* setup a directory for packages;
## This is short help information for the `listPackages` macro <a name="listpackages"></a>
-----------------------------------------------------------------------------------------
Macro to list available SAS packages, version `20250729`
Macro to list available SAS packages, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -577,7 +577,7 @@ filename packages "C:/SAS_PACKAGES"; %* setup a directory for packages;
## This is short help information for the `verifyPackage` macro <a name="verifypackage"></a>
-------------------------------------------------------------------------------
Macro to verify SAS package with it hash digest, version `20250729`
Macro to verify SAS package with it hash digest, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -631,7 +631,7 @@ filename packages "C:/SAS_PACKAGES"; %* set-up a directory for packages;
## This is short help information for the `previewPackage` macro <a name="previewpackage"></a>
-------------------------------------------------------------------------------
Macro to get preview of a SAS packages, version `20250729`
Macro to get preview of a SAS packages, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -700,7 +700,7 @@ filename packages "C:/SAS_PACKAGES"; %* setup a directory for packages;
## This is short help information for the `generatePackage` macro <a name="generatepackage"></a>
-------------------------------------------------------------------------------
Macro to generate SAS packages, version `20250729`
Macro to generate SAS packages, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -718,49 +718,61 @@ filename packages "C:/SAS_PACKAGES"; %* setup a directory for packages;
### Parameters:
1. `filesLocation=` Location of package files, example value:
`%sysfunc(pathname(work))/packagename`.
Default use case:
`%generatePackage(filesLocation=/path/to/packagename)`
If empty displays this help information.
1. `filesLocation=` Location of package files, example value:
`%sysfunc(pathname(work))/packagename`.
Default use case:
`%generatePackage(filesLocation=/path/to/packagename)`
If empty displays this help information.
Testing parameters:
- `testPackage=` Indicator if tests should be executed.
Default value: `Y`, means "execute tests"
- `testPackage=` Indicator if tests should be executed.
Default value: `Y`, means "execute tests"
- `packages=` Location of other packages for testing
if there are dependencies in loading the package.
Has to be a single directory, if more than one are
provided than only the first is used.
If path to location contains spaces it should be quoted!
- `packages=` Location of other packages for testing
if there are dependencies in loading the package.
Has to be a single directory, if more than one are
provided than only the first is used.
If path to location contains spaces it should be quoted!
- `testResults=` Location where tests results should be stored,
if null (the default) then the session WORK is used.
- `testResults=` Location where tests results should be stored,
if null (the default) then the session WORK is used.
- `sasexe=` Location of a DIRECTORY where the SAS binary is located,
if null (the default) then the `!SASROOT` is used.
- `workInTestResults=` Indicates if WORK directories for test sessions should
be located in the same place as results.
The default value: `0` means "do not do this".
Available values are `0` and `1`.
- `sascfgFile=` Location of a FILE with testing session configuration
parameters, if null (the default) then no config file
is pointed during the SAS invocation,
if set to `DEF` then the `!SASROOT/sasv9.cfg` is used.
- `testWorkPath=` Points a location where tests sessions work directories
should be stored. By default it is null what means that
a sub-directory of the main SAS session WORK is used.
Takes precedence over `workInTestResults=`.
- `delTestWork=` Indicates if `WORK` directories generated by user tests
should be deleted, i.e. the (NO)WORKTERM option is set.
The default value: `1` means "delete tests work".
Available values are `0` and `1`.
- `sasexe=` Location of a DIRECTORY where the SAS binary is located,
if null (the default) then the `!SASROOT` is used.
- `markdownDoc=` Indicates if a markdown file with documentation
be generated from help information blocks.
The default value: `0` means "do not generate the file".
Available values are `0` and `1`.
- `sascfgFile=` Location of a FILE with testing session configuration
parameters, if null (the default) then no config file
is pointed during the SAS invocation,
if set to `DEF` then the `!SASROOT/sasv9.cfg` is used.
- `easyArch=` When creating documentation file (`markdownDoc=1`)
indicates if a copy of the zip and markdown files
with the version number in the file name be created
The default value: `0` means "do not create files".
Available values are `0` and `1`.
- `delTestWork=` Indicates if `WORK` directories generated by user tests
should be deleted, i.e. the (NO)WORKTERM option is set.
The default value: `1` means "delete tests work".
Available values are `0` and `1`.
Documentation parameters:
- `markdownDoc=` Indicates if a markdown file with documentation
be generated from help information blocks.
The default value: `0` means "do not generate the file".
Available values are `0` and `1`.
- `easyArch=` When creating documentation file (`markdownDoc=1`)
indicates if a copy of the zip and markdown files
with the version number in the file name be created
The default value: `0` means "do not create files".
Available values are `0` and `1`.
-------------------------------------------------------------------------------
@@ -915,7 +927,7 @@ All files have to have `.sas` extension. Other files are ignored.
## This is short help information for the `extendPackagesFileref` macro <a name="extendpackagesfileref"></a>
-----------------------------------------------------------------------------------------
Macro to list directories pointed by 'packages' fileref, version `20250729`
Macro to list directories pointed by 'packages' fileref, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -957,7 +969,7 @@ filename packages ("D:/NEW_DIR" %extendPackagesFileref()); %* add new directory;
## This is short help information for the `loadPackageAddCnt` macro <a name="loadpackageaddcnt"></a>
-------------------------------------------------------------------------------
Macro to load *additional content* for a SAS package, version `20250729`
Macro to load *additional content* for a SAS package, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -1051,7 +1063,7 @@ filename packages "C:/SAS_PACKAGES"; %* setup a directory for packages;
-------------------------------------------------------------------------------
Utility macro to *split* single file with SAS package code into multiple
files with separate snippets, version `20250729`
files with separate snippets, version `20251017`
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating

View File

@@ -42,7 +42,7 @@
- to unload, or
- to generate SAS packages.
Version 20250729.
Version 20251017.
See examples below.
A SAS package is a zip file containing a group of files
@@ -91,7 +91,7 @@
*/
)/secure
/*** HELP END ***/
des = 'Macro to load SAS package, version 20250729. Run %loadPackage() for help info.'
des = 'Macro to load SAS package, version 20251017. Run %loadPackage() for help info.'
minoperator
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
@@ -107,7 +107,7 @@ minoperator
%put ### This is short help information for the `loadPackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to *load* SAS packages, version `20250729` #;
%put # Macro to *load* SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -384,7 +384,7 @@ minoperator
*/
)/secure
/*** HELP END ***/
des = 'Macro to unload SAS package, version 20250729. Run %unloadPackage() for help info.'
des = 'Macro to unload SAS package, version 20251017. Run %unloadPackage() for help info.'
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
%do;
@@ -399,7 +399,7 @@ des = 'Macro to unload SAS package, version 20250729. Run %unloadPackage() for h
%put ### This is short help information for the `unloadPackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to unload SAS packages, version `20250729` #;
%put # Macro to unload SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -552,7 +552,7 @@ des = 'Macro to unload SAS package, version 20250729. Run %unloadPackage() for h
*/
)/secure
/*** HELP END ***/
des = 'Macro to get help about SAS package, version 20250729. Run %helpPackage() for help info.'
des = 'Macro to get help about SAS package, version 20251017. Run %helpPackage() for help info.'
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
%do;
@@ -567,7 +567,7 @@ des = 'Macro to get help about SAS package, version 20250729. Run %helpPackage()
%put ### This is short help information for the `helpPackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to get help about SAS packages, version `20250729` #;
%put # Macro to get help about SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -710,7 +710,7 @@ TODO:
*/
/*+installPackage+*/
/* Macros to install SAS packages, version 20250729 */
/* Macros to install SAS packages, version 20251017 */
/* A SAS package is a zip file containing a group of files
with SAS code (macros, functions, data steps generating
data, etc.) wrapped up together and %INCLUDEed by
@@ -737,7 +737,7 @@ TODO:
/secure
minoperator
/*** HELP END ***/
des = 'Macro to install SAS package, version 20250729. Run %%installPackage() for help info.'
des = 'Macro to install SAS package, version 20251017. Run %%installPackage() for help info.'
;
%if (%superq(packagesNames) = ) OR (%qupcase(&packagesNames.) = HELP) %then
%do;
@@ -752,7 +752,7 @@ des = 'Macro to install SAS package, version 20250729. Run %%installPackage() fo
%put ### This is short help information for the `installPackage` macro #;
%put #--------------------------------------------------------------------------------------------#;;
%put # #;
%put # Macro to install SAS packages, version `20250729` #;
%put # Macro to install SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -1404,7 +1404,7 @@ des = 'Macro to install SAS package, version 20250729. Run %%installPackage() fo
Macro to list SAS packages in packages folder.
Version 20250729
Version 20251017
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -1424,7 +1424,7 @@ des = 'Macro to install SAS package, version 20250729. Run %%installPackage() fo
%macro listPackages()
/secure PARMBUFF
des = 'Macro to list SAS packages from `packages` fileref, type %listPackages(HELP) for help, version 20250729.'
des = 'Macro to list SAS packages from `packages` fileref, type %listPackages(HELP) for help, version 20251017.'
;
%if %QUPCASE(&SYSPBUFF.) = %str(%(HELP%)) %then
%do;
@@ -1439,7 +1439,7 @@ des = 'Macro to list SAS packages from `packages` fileref, type %listPackages(HE
%put ### This is short help information for the `listPackages` macro #;
%put #-----------------------------------------------------------------------------------------#;;
%put # #;
%put # Macro to list available SAS packages, version `20250729` #;
%put # Macro to list available SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -1591,7 +1591,7 @@ options ls = &ls_tmp. ps = &ps_tmp. &notes_tmp. &source_tmp.;
Macro to generate SAS packages.
Version 20250729
Version 20251017
A SAS package is a zip file containing a group
of SAS codes (macros, functions, data steps generating
@@ -1608,30 +1608,36 @@ options ls = &ls_tmp. ps = &ps_tmp. &notes_tmp. &source_tmp.;
filesLocation /* location of package files
e.g. /path/to/package/files/locatiion or C:\my\package\files */
/* testing options: */
,testPackage=Y /* indicator if tests should be executed,
default value Y means "execute tests" */
,packages= /* location of other packages if there are
dependencies in loading, must be a single directory
if more than one are provided only the first is used */
,testResults= /* location where tests results should be stored,
if null (the default) the WORK is used */
,sasexe= /* a DIRECTORY where the SAS binary is located,
if null (the default) then the !SASROOT is used */
,sascfgFile= /* a FILE with testing session configuration parameters
if null (the default) then no config file is pointed
during the SAS invocation,
if set to DEF then the !SASROOT/sasv9.cfg is used */
,delTestWork=1 /* indicates if `WORK` directories generated by user tests
should be deleted, i.e. the (NO)WORKTERM option is set,
default value 1 means "delete tests work" */
,markdownDoc=0 /* indicates if a markdown file with documentation
be generated from help info blocks */
,easyArch=0 /* when creating documentation file indicates if a copy of
the zip and markdown files with the version number in the
file name be created */
,testPackage=Y /* indicator if tests should be executed,
default value Y means "execute tests" */
,packages= /* location of other packages if there are
dependencies in loading, must be a single directory
if more than one are provided only the first is used */
,testResults= /* location where tests results should be stored,
if null (the default) the WORK is used */
,workInTestResults=0 /* indicates if WORK directories for tests should located
in the same place as results */
,testWorkPath= /* location where tests SAS sessions' work directories
should be stored, if null (the default) the main SAS
session WORK is used. Takes precedence over workInTestResults= */
,sasexe= /* a DIRECTORY where the SAS binary is located,
if null (the default) then the !SASROOT is used */
,sascfgFile= /* a FILE with testing session configuration parameters
if null (the default) then no config file is pointed
during the SAS invocation,
if set to DEF then the !SASROOT/sasv9.cfg is used */
,delTestWork=1 /* indicates if `WORK` directories generated by user tests
should be deleted, i.e. the (NO)WORKTERM option is set,
default value 1 means "delete tests work" */
/* documentation options: */
,markdownDoc=0 /* indicates if a markdown file with documentation
be generated from help info blocks */
,easyArch=0 /* when creating documentation file indicates if a copy of
the zip and markdown files with the version number in the
file name be created */
)/ secure minoperator
/*** HELP END ***/
des = 'Macro to generate SAS packages, version 20250729. Run %generatePackage() for help info.'
des = 'Macro to generate SAS packages, version 20251017. Run %generatePackage() for help info.'
;
%if (%superq(filesLocation) = ) OR (%qupcase(&filesLocation.) = HELP) %then
%do;
@@ -1642,75 +1648,87 @@ des = 'Macro to generate SAS packages, version 20250729. Run %generatePackage()
;
options NOnotes NOsource ls=MAX ps=MAX msglevel=N;
%put ;
%put #################################################################################;
%put ### This is short help information for the `generatePackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to generate SAS packages, version `20250729` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
%put # data, etc.) wrapped up together and embedded inside the zip. #;
%put # #;
%put # The `%nrstr(%%generatePackage())` macro generates SAS packages. #;
%put # It wraps-up the package content, i.e. macros, functions, formats, etc., #;
%put # into the zip file and generate all metadata content required by other #;
%put # macros from the SAS Packages Framework. #;
%put # #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Visit: `https://github.com/yabwon/SAS_PACKAGES/tree/main/SPF/Documentation` #;
%put # to read about the details of package generation process. #;
%put # Tutorials available at: `https://github.com/yabwon/HoW-SASPackages` #;
%put # #;
%put #### Parameters: #;
%put # #;
%put # 1. `filesLocation=` Location of package files, example value: #;
%put # `%nrstr(%%sysfunc(pathname(work))/packagename)`. #;
%put # Default use case: #;
%put # `%nrstr(%%generatePackage(filesLocation=/path/to/packagename))` #;
%put # If empty displays this help information. #;
%put # #;
%put # Testing parameters: #;
%put # #;
%put # - `testPackage=` Indicator if tests should be executed. #;
%put # Default value: `Y`, means "execute tests" #;
%put # #;
%put # - `packages=` Location of other packages for testing #;
%put # if there are dependencies in loading the package. #;
%put # Has to be a single directory, if more than one are #;
%put # provided than only the first is used. #;
%put # If path to location contains spaces it should be quoted! #;
%put # #;
%put # - `testResults=` Location where tests results should be stored, #;
%put # if null (the default) then the session WORK is used. #;
%put # #;
%put # - `sasexe=` Location of a DIRECTORY where the SAS binary is located, #;
%put # if null (the default) then the `!SASROOT` is used. #;
%put # #;
%put # - `sascfgFile=` Location of a FILE with testing session configuration #;
%put # parameters, if null (the default) then no config file #;
%put # is pointed during the SAS invocation, #;
%put # if set to `DEF` then the `!SASROOT/sasv9.cfg` is used. #;
%put # #;
%put # - `delTestWork=` Indicates if `WORK` directories generated by user tests #;
%put # should be deleted, i.e. the (NO)WORKTERM option is set. #;
%put # The default value: `1` means "delete tests work". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put # - `markdownDoc=` Indicates if a markdown file with documentation #;
%put # be generated from help information blocks. #;
%put # The default value: `0` means "do not generate the file". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put # - `easyArch=` When creating documentation file (`markdownDoc=1`) #;
%put # indicates if a copy of the zip and markdown files #;
%put # with the version number in the file name be created #;
%put # The default value: `0` means "do not create files". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put #-------------------------------------------------------------------------------#;
%put #################################################################################;
%put ######################################################################################;
%put ### This is short help information for the `generatePackage` macro #;
%put #------------------------------------------------------------------------------------#;
%put # #;
%put # Macro to generate SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
%put # data, etc.) wrapped up together and embedded inside the zip. #;
%put # #;
%put # The `%nrstr(%%generatePackage())` macro generates SAS packages. #;
%put # It wraps-up the package content, i.e. macros, functions, formats, etc., #;
%put # into the zip file and generate all metadata content required by other #;
%put # macros from the SAS Packages Framework. #;
%put # #;
%put #------------------------------------------------------------------------------------#;
%put # #;
%put # Visit: `https://github.com/yabwon/SAS_PACKAGES/tree/main/SPF/Documentation` #;
%put # to read about the details of package generation process. #;
%put # Tutorials available at: `https://github.com/yabwon/HoW-SASPackages` #;
%put # #;
%put #### Parameters: #;
%put # #;
%put # 1. `filesLocation=` Location of package files, example value: #;
%put # `%nrstr(%%sysfunc(pathname(work))/packagename)`. #;
%put # Default use case: #;
%put # `%nrstr(%%generatePackage(filesLocation=/path/to/packagename))` #;
%put # If empty displays this help information. #;
%put # #;
%put # Testing parameters: #;
%put # #;
%put # - `testPackage=` Indicator if tests should be executed. #;
%put # Default value: `Y`, means "execute tests" #;
%put # #;
%put # - `packages=` Location of other packages for testing #;
%put # if there are dependencies in loading the package. #;
%put # Has to be a single directory, if more than one are #;
%put # provided than only the first is used. #;
%put # If path to location contains spaces it should be quoted! #;
%put # #;
%put # - `testResults=` Location where tests results should be stored, #;
%put # if null (the default) then the session WORK is used. #;
%put # #;
%put # - `workInTestResults=` Indicates if WORK directories for test sessions should #;
%put # be located in the same place as results. #;
%put # The default value: `0` means "do not do this". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put # - `testWorkPath=` Points a location where tests sessions work directories #;
%put # should be stored. By default it is null what means that #;
%put # a sub-directory of the main SAS session WORK is used. #;
%put # Takes precedence over `workInTestResults=`. #;
%put # #;
%put # - `sasexe=` Location of a DIRECTORY where the SAS binary is located, #;
%put # if null (the default) then the `!SASROOT` is used. #;
%put # #;
%put # - `sascfgFile=` Location of a FILE with testing session configuration #;
%put # parameters, if null (the default) then no config file #;
%put # is pointed during the SAS invocation, #;
%put # if set to `DEF` then the `!SASROOT/sasv9.cfg` is used. #;
%put # #;
%put # - `delTestWork=` Indicates if `WORK` directories generated by user tests #;
%put # should be deleted, i.e. the (NO)WORKTERM option is set. #;
%put # The default value: `1` means "delete tests work". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put # Documentation parameters: #;
%put # #;
%put # - `markdownDoc=` Indicates if a markdown file with documentation #;
%put # be generated from help information blocks. #;
%put # The default value: `0` means "do not generate the file". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put # - `easyArch=` When creating documentation file (`markdownDoc=1`) #;
%put # indicates if a copy of the zip and markdown files #;
%put # with the version number in the file name be created #;
%put # The default value: `0` means "do not create files". #;
%put # Available values are `0` and `1`. #;
%put # #;
%put #------------------------------------------------------------------------------------#;
%put ######################################################################################;
%put ;
options &options_tmp.;
%GOTO ENDofgeneratePackage;
@@ -2461,7 +2479,7 @@ title6 "MD5 hashed fileref of package lowcase name: &_PackageFileref_.";
title8 "Required SAS packages: %qsysfunc(compress(%superq(packageReqPackages),%str(%'%")))" ; /* " */
%end;
footnote1 "SAS Packages Framework, version 20250729";
footnote1 "SAS Packages Framework, version 20251017";
proc print
data = &filesWithCodes.(drop=base folderRef fileRef rc folderid _abort_ fileId additionalContent)
@@ -2529,27 +2547,27 @@ run;
file &zipReferrence.(license.sas) encoding = &packageEncoding.;
length packageAuthor $ 1024;
packageAuthor = symget('packageAuthor');
put " ";
put "Copyright (c) since %sysfunc(today(),year4.) " packageAuthor ;
put " ";
put "Permission is hereby granted, free of charge, to any person obtaining a copy ";
put 'of this software and associated documentation files (the "Software"), to deal ';
put "in the Software without restriction, including without limitation the rights ";
put "to use, copy, modify, merge, publish, distribute, sublicense, and/or sell ";
put "copies of the Software, and to permit persons to whom the Software is ";
put "furnished to do so, subject to the following conditions: ";
put " ";
put "The above copyright notice and this permission notice shall be included ";
put "in all copies or substantial portions of the Software. ";
put " ";
put 'THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR ';
put "IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, ";
put "FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE ";
put "AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER ";
put "LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, ";
put "OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE ";
put "SOFTWARE. ";
put " ";
put " ";
put "Copyright (c) since %sysfunc(today(),year4.) " packageAuthor ;
put " ";
put "Permission is hereby granted, free of charge, to any person obtaining a copy";
put 'of this software and associated documentation files (the "Software"), to deal';
put "in the Software without restriction, including without limitation the rights";
put "to use, copy, modify, merge, publish, distribute, sublicense, and/or sell";
put "copies of the Software, and to permit persons to whom the Software is";
put "furnished to do so, subject to the following conditions:";
put " ";
put "The above copyright notice and this permission notice shall be included";
put "in all copies or substantial portions of the Software.";
put " ";
put 'THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR';
put "IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,";
put "FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE";
put "AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER";
put "LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,";
put "OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE";
put "SOFTWARE.";
put " ";
run;
%end;
@@ -3285,7 +3303,7 @@ data _null_;
%end;
put +(-1) '`.;''' /
' !! '' %put The macro generated: '' !! put(dtCASLudf, E8601DT19.-L) !! ";"' /
' !! '' %put with the SAS Packages Framework version 20250729.;''' /
' !! '' %put with the SAS Packages Framework version 20251017.;''' /
' !! '' %put ****************************************************************************;''' /
' !! '' %GOTO theEndOfTheMacro;''' /
' !! '' %end;''' ;
@@ -3450,7 +3468,7 @@ data _null_;
%end;
put +(-1) '`.; '' !!' /
''' %put The macro generated: ''' " !! put(dtIML, E8601DT19.-L) !! " '''; '' !!' /
''' %put with the SAS Packages Framework version 20250729.; '' !! ' /
''' %put with the SAS Packages Framework version 20251017.; '' !! ' /
''' %put ****************************************************************************; '' !! ' /
''' %GOTO theEndOfTheMacro; '' !! ' /
''' %end; '' !! ' /
@@ -4257,7 +4275,7 @@ data _null_;
%end;
put 'put " " / @3 "--------------------------------------------------------------------" / " ";'
/ 'put @3 "*SAS package generated by SAS Package Framework, version `20250729`*";'
/ 'put @3 "*SAS package generated by SAS Package Framework, version `20251017`*";'
/ 'put " " / @3 "--------------------------------------------------------------------";';
put 'run; ' /;
@@ -4812,16 +4830,57 @@ options DLCREATEDIR; /* turns-on creation of subdirectories by libname */
/* temporary location for tests results is WORK unless developer provide &testResults. */
%local testPackageTimesamp;
%let testPackageTimesamp = %sysfunc(lowcase(&packageName._%sysfunc(datetime(),b8601dt15.)));
%if %qsysfunc(fileexist(%bquote(&testResults.))) %then
%if %qsysfunc(fileexist(%superq(testResults))) %then
%do;
libname TEST "&testResults./test_&testPackageTimesamp.";
%end;
%else
%do;
%if NOT %sysevalf(%superq(testResults)=,boolean) %then
%do;
%put WARNING: The testResults path:;
%put WARNING- %superq(testResults);
%put WARNING- does not exist. WORK will be used.;
%put WARNING- ;
%end;
libname TEST "&SASWORK./test_&testPackageTimesamp.";
%end;
/* test work points to the SAS session work */
libname TESTWORK "&SASWORK./testwork_&testPackageTimesamp.";
/* test WORK points to the SAS session WORK or to directory pointed by the developer */
%if %qsysfunc(fileexist(%superq(testWorkPath))) %then
%do;
libname TESTWORK "&testWorkPath./testwork_&testPackageTimesamp.";
%put NOTE- ;
%PUT NOTE: WORK libname directories from test SAS sessions will not be deleted.;
%if %sysevalf(1=%superq(workInTestResults),boolean) %then
%do;
%put NOTE- Parameter workInTestResults is ignored;
%end;
%put NOTE- ;
%let delTestWork=0;
%end;
%else %if %sysevalf(1=%superq(workInTestResults),boolean) %then
%do;
libname TESTWORK "%sysfunc(pathname(TEST))";
%put NOTE- ;
%PUT NOTE: WORK libname directories from test SAS sessions will be located in the;
%PUT NOTE- same directory where test resulrs are stored, and will not be deleted.;
%put NOTE- ;
%let delTestWork=0;
%end;
%else
%do;
%if NOT %sysevalf(%superq(testWorkPath)=,boolean) %then
%do;
%put WARNING: The testWorkPath path:;
%put WARNING- %superq(testWorkPath);
%put WARNING- does not exist. WORK will be used.;
%put WARNING- ;
%end;
libname TESTWORK "&SASWORK./testwork_&testPackageTimesamp.";
%end;
%local dirForTest dirForTestWork;
%let dirForTest = %sysfunc(pathname(TEST));
%let dirForTestWork = %sysfunc(pathname(TESTWORK));
@@ -4835,7 +4894,7 @@ filename currdir ".";
filename currdir list;
/* if your package uses any other packages this points to their location */
/* test if packages fileref exists and, if do, use it */
/* test if packages fileref exists and, if it does, use it */
/* if no one is provided the filesLocation is used as a replacement */
%if %bquote(&packages.)= %then %let packages=%sysfunc(pathname(packages));
%if %bquote(&packages.)= %then %let packages=&filesLocation.;
@@ -4861,9 +4920,9 @@ options NOquotelenmax;
data _null_;
file "./loading.sas";
put "proc printto";
put "log = '&dirForTest./loading.log0'";
put "; run;";
put "proc printto"
/ "log = '&dirForTest./loading.log0'"
/ "; run;";
put "filename packages '&packages.';" /;
@@ -4873,18 +4932,18 @@ data _null_;
put '%include packages(loadpackage.sas);' / ; /* for older versions when the SPFinit.sas did not exist */
/* load */
put '%loadpackage'"(&packageName.,";
put " path=&filesLocation.)" /;
put '%loadpackage'"(&packageName.,";
put " path=&filesLocation., lazyData=*)" /;
put '%loadpackage'"(&packageName.,"
/ " path=&filesLocation.)" /;
put '%loadpackage'"(&packageName.,"
/ " path=&filesLocation., lazyData=*)" /;
/* help */
put '%helpPackage'"(&packageName.,";
put " path=&filesLocation.)" /;
put '%helpPackage'"(&packageName.,*,";
put " path=&filesLocation.)" /;
put '%helpPackage'"(&packageName.,License,";
put " path=&filesLocation.)" /;
put '%helpPackage'"(&packageName.,"
/ " path=&filesLocation.)" /;
put '%helpPackage'"(&packageName.,*,"
/ " path=&filesLocation.)" /;
put '%helpPackage'"(&packageName.,License,"
/ " path=&filesLocation.)" /;
/* preview */
put '%previewPackage'"(&packageName.,";
@@ -4904,10 +4963,9 @@ data _null_;
when (upcase(type) in ("LAZYDATA")) /* the "DATA" type will pop-up during deletion */
do;
if 1 = FIRST.type then
put "data _null_; " ;
put " if not exist('" fileshortUP "') then " /
" put 'WARNING: Dataset " fileshortUP "does not exist!'; "
;
put "data _null_; "
/ " if not exist('" fileshortUP "') then "
/ " put 'WARNING: Dataset " fileshortUP "does not exist!'; " ;
if 1 = LAST.type then
put "run; ";
end;
@@ -4915,10 +4973,9 @@ data _null_;
when (upcase(type) =: "MACRO")
do;
if 1 = FIRST.type then
put "data _null_; " ;
put ' if not input(resolve(''%SYSMACEXIST(' fileshortUP ')''), best.) then ' /
" put 'WARNING: Macro " fileshortUP "does not exist!'; "
;
put "data _null_; "
/ ' if not input(resolve(''%SYSMACEXIST(' fileshortUP ')''), best.) then '
/ " put 'WARNING: Macro " fileshortUP "does not exist!'; " ;
if 1 = LAST.type then
put "run; ";
@@ -4936,19 +4993,23 @@ data _null_;
end;
/* unload */
put '%unloadPackage'"(&packageName.,";
put " path=&filesLocation.) " /;
put '%unloadPackage'"(&packageName.,"
/ " path=&filesLocation.) " /;
/* additional content */
put '%loadPackageAddCnt'"(&packageName.,";
put " path=&filesLocation.) " /;
put '%loadPackageAddCnt'"(&packageName.,"
/ " path=&filesLocation.) " /;
put "filename packages '&filesLocation.';" /
'%listPackages() ' /;
put "filename packages '&filesLocation.';"
/ '%listPackages() ' /;
/* check if work should be deleted after test is done */
delTestWork = input(symget('delTestWork'), ?? best32.);
if 0 = delTestWork then
put "options NOWORKTERM;"/;
put "proc printto";
put "; run;";
put "proc printto"
/ "; run;";
stop;
run;
@@ -5059,6 +5120,28 @@ data _null_;
file "./autoexec.sas";
/* check if work should be deleted after test is done */
delTestWork = input(symget('delTestWork'), ?? best32.);
if not(delTestWork in (0 1)) then
do;
putlog "WARNING: [&sysmacroname.] The `delTestWork` parameter is invalid.";
putlog "WARNING- [&sysmacroname.] Default value (1) is set.";
delTestWork = 1;
end;
if 0 = delTestWork then
do;
put "libname _ '&dirForTest.';" /
"data TESTWORK_&t.;" /
" length testName $ 128 testWork $ 2048;" /
" testNumber=&t.; testName='&&TEST_&t..';" /
" testWork = pathname('WORK');" /
"run;" /
"proc append base=_.TESTWORK data=TESTWORK_&t.; run;" /
"proc delete data=TESTWORK_&t.; run;" /
"libname _ clear;" ;
end;
put "proc printto";
put "log = '&dirForTest./&&TEST_&t...log0'";
put "; run;";
@@ -5075,15 +5158,6 @@ data _null_;
put '%loadpackage'"(&packageName.,";
put " path=&filesLocation., lazyData=*)" /;
/* check if work should be deleted after test is done */
delTestWork = input(symget('delTestWork'), ?? best32.);
if not(delTestWork in (0 1)) then
do;
putlog "WARNING: [&sysmacroname.] The `delTestWork` parameter is invalid.";
putlog "WARNING- [&sysmacroname.] Default value (1) is set.";
delTestWork = 1;
end;
if 0 = delTestWork then
put "options NOWORKTERM;"/;
@@ -5160,12 +5234,13 @@ options &notesSourceOptions.;
data test.tests_summary;
length testName $ 128;
do _N_ = 0 to &numberOfTests.;
testName = symget(cats("TEST_", _N_));
systask = coalesce(input(symget(cats("SASSTAT", _N_)), ?? best32.), -1);
sysrc = coalesce(input(symget(cats("TESTRC_", _N_)), ?? best32.), -1);
error = coalesce(input(symget(cats("TESTE_", _N_)), ?? best32.), -1);
warning = coalesce(input(symget(cats("TESTW_", _N_)), ?? best32.), -1);
do testNumber = 0 to &numberOfTests.;
testName = symget(cats("TEST_", testNumber));
systask = coalesce(input(symget(cats("SASSTAT", testNumber)), ?? best32.), -1);
sysrc = coalesce(input(symget(cats("TESTRC_", testNumber)), ?? best32.), -1);
error = coalesce(input(symget(cats("TESTE_", testNumber)), ?? best32.), -1);
warning = coalesce(input(symget(cats("TESTW_", testNumber)), ?? best32.), -1);
output;
end;
run;
@@ -5173,10 +5248,29 @@ title1 "Summary of tests.";
title2 "details can be found in:";
title3 "%sysfunc(pathname(TEST))";
footnote;
proc print data = test.tests_summary;
proc print data = test.tests_summary(drop=testNumber);
run;
title;
%if 0=&delTestWork. %then
%do;
data test.tests_summary;
merge
test.tests_summary
%if %sysfunc(EXIST(test.testwork)) %then
%do; test.testwork %end;
%else
%do; %PUT INFO: Cannot add work path location info.; %end;
;
by testNumber;
run;
%if %sysfunc(EXIST(test.testwork)) %then
%do;
proc delete data=test.testwork;
run;
%end;
%end;
/*%put _local_;*/
%put NOTE: Changing current folder to:;
@@ -5295,7 +5389,7 @@ data &filesWithCodes.markdown;
%end;
put " " / "--------------------------------------------------------------------" / " "
/ "*SAS package generated by SAS Package Framework, version `20250729`*"
/ "*SAS package generated by SAS Package Framework, version `20251017`*"
/ " " / "--------------------------------------------------------------------" / " ";
put "# The `&packageName.` package content";
@@ -5573,7 +5667,7 @@ TODO: (in Polish)
*/
)/secure
/*** HELP END ***/
des = 'Macro to load multiple SAS packages at one run, version 20250729. Run %loadPackages() for help info.'
des = 'Macro to load multiple SAS packages at one run, version 20251017. Run %loadPackages() for help info.'
parmbuff
;
%if (%superq(packagesNames) = ) OR (%qupcase(&packagesNames.) = HELP) %then
@@ -5589,7 +5683,7 @@ parmbuff
%put ### This is short help information for the `loadPackageS` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro wrapper for the loadPackage macro, version `20250729` #;
%put # Macro wrapper for the loadPackage macro, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -5687,7 +5781,7 @@ parmbuff
hashing_file() function, SAS 9.4M6 */
)/secure
/*** HELP END ***/
des = 'Macro to verify SAS package with the hash digest, version 20250729. Run %verifyPackage() for help info.'
des = 'Macro to verify SAS package with the hash digest, version 20251017. Run %verifyPackage() for help info.'
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
%do;
@@ -5702,7 +5796,7 @@ des = 'Macro to verify SAS package with the hash digest, version 20250729. Run %
%put ### This is short help information for the `verifyPackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to verify SAS package with it hash digest, version `20250729` #;
%put # Macro to verify SAS package with it hash digest, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -5884,7 +5978,7 @@ des = 'Macro to verify SAS package with the hash digest, version 20250729. Run %
*/
)/secure
/*** HELP END ***/
des = 'Macro to preview content of a SAS package, version 20250729. Run %previewPackage() for help info.'
des = 'Macro to preview content of a SAS package, version 20251017. Run %previewPackage() for help info.'
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
%do;
@@ -5899,7 +5993,7 @@ des = 'Macro to preview content of a SAS package, version 20250729. Run %preview
%put ### This is short help information for the `previewPackage` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to get preview of a SAS packages, version `20250729` #;
%put # Macro to get preview of a SAS packages, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -6031,7 +6125,7 @@ des = 'Macro to preview content of a SAS package, version 20250729. Run %preview
when empty the "packages" value is used */
)/secure
/*** HELP END ***/
des = 'Macro to list directories pointed by "packages" fileref, version 20250729. Run %extendPackagesFileref(HELP) for help info.'
des = 'Macro to list directories pointed by "packages" fileref, version 20251017. Run %extendPackagesFileref(HELP) for help info.'
;
%if %QUPCASE(&packages.) = HELP %then
@@ -6047,7 +6141,7 @@ des = 'Macro to list directories pointed by "packages" fileref, version 20250729
%put ### This is short help information for the `extendPackagesFileref` macro #;
%put #-----------------------------------------------------------------------------------------#;;
%put # #;
%put # Macro to list directories pointed by 'packages' fileref, version `20250729` #;
%put # Macro to list directories pointed by 'packages' fileref, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -6149,7 +6243,7 @@ filename packages list;
is provided in required version */
)/secure
/*** HELP END ***/
des = 'Macro to load additional content for a SAS package, version 20250729. Run %loadPackageAddCnt() for help info.'
des = 'Macro to load additional content for a SAS package, version 20251017. Run %loadPackageAddCnt() for help info.'
minoperator
;
%if (%superq(packageName) = ) OR (%qupcase(&packageName.) = HELP) %then
@@ -6165,7 +6259,7 @@ minoperator
%put ### This is short help information for the `loadPackageAddCnt` macro #;
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Macro to *load* additional content for a SAS package, version `20250729` #;
%put # Macro to *load* additional content for a SAS package, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -6421,6 +6515,8 @@ minoperator
set WORK.__&_TargetFileref_._zip___ end = EOF;
wc = countw(file,"/\");
put wc= file=;
length libText pathname_f $ 8192;
libText = pathname("outData", "L");
@@ -6439,15 +6535,24 @@ minoperator
end;
pathname_f = pathname("f");
rc1 = filename("in", strip(pathname_f), "zip", "member='" !! strip(file) !! "' lrecl=1 recfm=n");
length rc1msg $ 8192;
rc1 = filename("in", strip(pathname_f), "zip", "member='" !! strip(file) !! "' lrecl=1 recfm=n");
rc1msg = sysmsg();
rc2 = filename("out", catx("/", libText, scan(file, j , "/\")), "disk", "lrecl=1 recfm=n");
length fileNameOutPath $ 8192;
fileNameOutPath = catx("/", libText, scan(file, j , "/\"));
/* check for Windows */
if lengthn(fileNameOutPath)>260 then
if symget('SYSSCP')='WIN' then
put "INFO: Pathname plus filename length exceeds 260. Under Windows family OS it may cause problems.";
length rc2msg $ 8192;
rc2 = filename("out", fileNameOutPath, "disk", "lrecl=1 recfm=n");
rc2msg = sysmsg();
rc3 = fcopy("in", "out");
length rc3msg $ 8192;
rc3 = fcopy("in", "out");
rc3msg = sysmsg();
loadingProblem + (rc3 & 1);
@@ -6455,7 +6560,7 @@ minoperator
if rc3 then
do;
put "ERROR: Cannot extract: " file;
put (rc1 rc2 rc3) (=);
put "ERROR-" (rc1 rc2 rc3) (=);
put (rc1msg rc2msg rc3msg) (/);
put "ERROR-";
end;
@@ -6523,7 +6628,7 @@ minoperator
,nobs=0 /* technical parameter */
)
/*** HELP START ***/
/ des = 'Utility macro to split "one big" code into multiple files for a SAS package, version 20250729. Run %splitCodeForPackage() for help info.'
/ des = 'Utility macro to split "one big" code into multiple files for a SAS package, version 20251017. Run %splitCodeForPackage() for help info.'
;
/*%macro _();%mend _;*/
%if (%superq(codeFile) = ) OR (%qupcase(&codeFile.) = HELP) %then
@@ -6540,7 +6645,7 @@ minoperator
%put #-------------------------------------------------------------------------------#;
%put # #;
%put # Utility macro to *split* single file with SAS package code into multiple #;
%put # files with separate snippets, version `20250729` #;
%put # files with separate snippets, version `20251017` #;
%put # #;
%put # A SAS package is a zip file containing a group #;
%put # of SAS codes (macros, functions, data steps generating #;
@@ -6622,7 +6727,6 @@ minoperator
%GOTO ENDofsplitCodeForPackage;
%end;
%local options_tmp2 ;
%let options_tmp2 = ls=%sysfunc(getoption(ls)) ps=%sysfunc(getoption(ps))
%sysfunc(getoption(notes)) %sysfunc(getoption(source))
@@ -6688,7 +6792,6 @@ options nomprint nosymbolgen nomlogic notes source ls=MAX ps=MAX msglevel=N ;
call symputX('packagePath',packagePath,"L");
run;
data w.files;
stop;
run;
@@ -6714,7 +6817,7 @@ options nomprint nosymbolgen nomlogic notes source ls=MAX ps=MAX msglevel=N ;
line = left(lowcase(_infile_));
block=scan(line,1," ");
if block in (
if block in (
'/*##$##-code-block-start-##$##'
'/*##$##-code-block-end-##$##'
);
@@ -6918,7 +7021,7 @@ options nomprint nosymbolgen nomlogic notes source ls=MAX ps=MAX msglevel=N ;
*/
if firstLine[j] then
do;
put '/* File generated with help of SAS Packages Framework, version 20250729. */';
put '/* File generated with help of SAS Packages Framework, version 20251017. */';
firstLine[j]=0;
end;
put _infile_;
@@ -6934,5 +7037,4 @@ options &options_tmp2.;
%ENDofsplitCodeForPackage:
%mend splitCodeForPackage;
/**/