From 9de056a3fca66eee71b30aefe1c0fcfae0b2767a Mon Sep 17 00:00:00 2001 From: Allan Bowe Date: Tue, 12 Jul 2022 22:18:01 +0000 Subject: [PATCH] fix: prevent warning from _label_ variable with different lengths Closes #281 --- all.sas | 4 +++- base/mp_storediffs.sas | 4 +++- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/all.sas b/all.sas index 3f1afc1..05f71b0 100644 --- a/all.sas +++ b/all.sas @@ -11784,7 +11784,9 @@ run; %else %let vlist=%mf_getvarlist(&libds,dlm=%str(,),quote=DOUBLE); data &ds4; - length &inds_keep $41 tgtvar_nm $32; + length &inds_keep $41 tgtvar_nm $32 _label_ $256; + if _n_=1 then call missing(_label_); + drop _label_; set &ds2 &ds3 indsname=&inds_auto; tgtvar_nm=upcase(tgtvar_nm); diff --git a/base/mp_storediffs.sas b/base/mp_storediffs.sas index 96b645f..e3714aa 100644 --- a/base/mp_storediffs.sas +++ b/base/mp_storediffs.sas @@ -154,7 +154,9 @@ run; %else %let vlist=%mf_getvarlist(&libds,dlm=%str(,),quote=DOUBLE); data &ds4; - length &inds_keep $41 tgtvar_nm $32; + length &inds_keep $41 tgtvar_nm $32 _label_ $256; + if _n_=1 then call missing(_label_); + drop _label_; set &ds2 &ds3 indsname=&inds_auto; tgtvar_nm=upcase(tgtvar_nm);