odstable - Format wird nicht übernommen

[E_Berger]

Hallo zusammen,

Mit proc format erstelle ich ein individuelels Format, das ich final in meiner Ergebnistabelle haben möchte. Mit Proc Report geht das wunderbar mit ods excel durch bis zu der Exceldatei.

Proc odstabel ignoriert es. Hat jemand eine Idee?

proc format ;

value dezi0_fmt
. = ' — '
.a = ' • '
.b = ' X'
.c = ' /'
.d = ' '
0 = ' — '
other = [f16.0]
;
run;

data class;

format age weight height dezi0_fmt.;

set sashelp.class;

if _N_ = 2 then do;age =0;weight =0; height = 0;end;
if _N_ = 3 then age =.;
if _N_ = 4 then age =.b;
run;

title " " ;
footnote " ";
ods listing close;
ods html close;
ods excel file = "&M_output.class_TEST_b.xlsx"
options(
embedded_titles = "yes"
)

;

ods excel
options(
sheet_name="VGR-DL-Tab-05-A-Teil-1"
);

title1 bc=white j=l "Jahr: &M_jahr_ooc. Test";

proc odstable data=class;

column
age
sex
height
weight;

define age;
STYLE ={ tagattr='format:# ### ### ### ##0 ; - # ### ### ### ##0 ; "0 "' } ;
header='AGE OF STUDENT';
format=dezi0_fmt.;
end;

define sex;
header='GENDER';
style={fontsize=10pt just=l foreground=blue borderrightstyle=dashed};
end;

define weight;
header='WEIGHT';
format=dezi0_fmt.;
end;

define height;
header='HEIGHT';
STYLE ={ tagattr='format:# ### ### ### ##0 ; - # ### ### ### ##0 ; "0 "' } ;
format=dezi0_fmt.;

end;

run;

ods excel close;

lg

eric berger

[JosvanderVelden · Accepted solution]

Haben Sie diesen post gesehen?
https://communities.sas.com/t5/SAS-Procedures/How-to-retain-the-Variable-Format-when-PROC-EXPORT-TO-...

[Patrick]

Running your code under Windows with SAS9.4M7 appears to work for me.

proc format;
  value dezi0_fmt
    . = ' — '
    .a = ' • '
    .b = ' X'
    .c = ' /'
    .d = ' '
    0 = ' — '
    other = [f16.0]
  ;
run;

data class;
  format age weight height dezi0_fmt.;
  set sashelp.class;

  if _N_ = 2 then
    do;
      age =0;
      weight =0;
      height = 0;
    end;

  if _N_ = 3 then
    age =.;

  if _N_ = 4 then
    age =.b;
run;

%let M_output=c:\temp\;
%let M_jahr_ooc=xxx_;
title " ";
footnote " ";
ods listing close;
ods html close;

ods excel file = "&M_output.class_TEST_b.xlsx"
  options(
  embedded_titles = "yes"
  )
;
ods excel
  options(
  sheet_name="VGR-DL-Tab-05-A-Teil-1"
  );
title1 bc=white j=l "Jahr: &M_jahr_ooc. Test";

proc odstable data=class;
  column
    age
    sex
    height
    weight;
  define age;
    STYLE ={ tagattr='format:# ### ### ### ##0 ; - # ### ### ### ##0 ; "0 "' };
    header='AGE OF STUDENT';
    format=dezi0_fmt.;
  end;

  define sex;
    header='GENDER';
    style={fontsize=10pt just=l foreground=blue borderrightstyle=dashed};
  end;

  define weight;
    header='WEIGHT';
    format=dezi0_fmt.;
  end;

  define height;
    header='HEIGHT';
    STYLE ={ tagattr='format:# ### ### ### ##0 ; - # ### ### ### ##0 ; "0 "' };
    format=dezi0_fmt.;
  end;
run;

ods excel close;

[E_Berger]

Hallo Patrick,

das funktioniert. Vielen Dank! Das Problem waren die führenden blanks in dem Proc Format.

Eine andere Lösung, wenn man mit den führenden blanks im Proc Format arbeiten will,

ist die Angabe der Länge des Formats im define statement

define height;
header='HEIGHT';
STYLE ={ tagattr='format:# ### ### ### ##0 ; - # ### ### ### ##0 ; "0 "' };
format=dezi0_fmt16.;
end;

Gruß

eric berger

[Patrick]

@E_Berger Good that you've got a solution. As you can see in my environment things worked even with the leading blanks. The screenshot from the Excel I've posted had been created with the exact code I've posted.