1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221
| %macro tracer_graphes(min_ech, max_ech, grad_ech, FICH, YIELD, TYPE_DATE, TITRE);
/* -------------------------------------------------------------------
Sort data set RDMTSSMF.RDMT_DE_LOW_GRADE
------------------------------------------------------------------- */
PROC SORT
DATA=&FICH.(FIRSTOBS=1 WHERE=(Product NOT IN ('ARTEMIS 37x44','ARTEMIS 37x44 LL')) KEEP=&TYPE_DATE. &YIELD. Product 'Draw Plant'n)
OUT=WORK.SORTTempTableSorted
;
BY 'Draw Plant'n &TYPE_DATE.;
RUN;
goptions reset=All;
/* End of custom user code */
SYMBOL11
INTERPOL=JOIN
HEIGHT=10pt
VALUE=NONE
LINE=1
WIDTH=2
CV = _STYLE_
mode=include
;
SYMBOL1
INTERPOL=JOIN
HEIGHT=10pt
VALUE=NONE
CO=BLACK
LINE=41
WIDTH=3
CI=BLACK
CV = _STYLE_
mode=include
;
SYMBOL12
INTERPOL=JOIN
HEIGHT=10pt
VALUE=NONE
LINE=1
WIDTH=2
CV = _STYLE_
mode=include
;
SYMBOL2
INTERPOL=JOIN
HEIGHT=12pt
VALUE=PLUS
CV=CXFF9900
CO=CXFF9900
LINE=1
WIDTH=2
CI=CXFF9900
mode=include
;
SYMBOL3
INTERPOL=JOIN
HEIGHT=10pt
VALUE=SQUARE
CV=CX993300
CO=CX993300
LINE=1
WIDTH=2
CI=CX993300
mode=include
;
SYMBOL4
INTERPOL=JOIN
HEIGHT=12pt
VALUE=TRIANGLE
CV=CX00CCFF
CO=CX00CCFF
LINE=1
WIDTH=2
CI=CX00CCFF
mode=include
;
SYMBOL5
INTERPOL=JOIN
HEIGHT=12pt
VALUE=DIAMOND
CV=CX3366FF
CO=CX3366FF
LINE=1
WIDTH=2
CI=CX3366FF
mode=include
;
SYMBOL6
INTERPOL=JOIN
HEIGHT=12pt
VALUE=X
CV=MAGENTA
CO=MAGENTA
LINE=1
WIDTH=2
CI=MAGENTA
mode=include
;
SYMBOL7
INTERPOL=JOIN
HEIGHT=12pt
VALUE=DOT
CV=CXA800A8
CO=CXA800A8
LINE=1
WIDTH=2
CI=CXA800A8
mode=include
;
SYMBOL8
INTERPOL=JOIN
HEIGHT=12pt
VALUE=STAR
CV=CX339966
CO=CX339966
LINE=1
WIDTH=2
CI=CX339966
mode=include
;
SYMBOL9
INTERPOL=JOIN
HEIGHT=12pt
VALUE=DIAMOND
CV=CX99CC00
CO=CX99CC00
LINE=1
WIDTH=2
CI=CX99CC00
mode=include
;
SYMBOL10
INTERPOL=JOIN
HEIGHT=10pt
VALUE=NONE
CO=RED
LINE=1
WIDTH=3
CI=RED
CV = _STYLE_
mode=include
;
Legend1
FRAME
;
Axis1
STYLE=1
WIDTH=1
ORDER=(&min_ech. TO &max_ech. BY &grad_ech.)
MINOR=NONE
LABEL=NONE
;
Axis2
STYLE=1
WIDTH=1
MINOR=NONE
VALUE=(HEIGHT=8pt )
;
goptions hsize=8IN vsize=6IN;
TITLE;
TITLE1 &TITRE.;
FOOTNOTE;
FOOTNOTE1 "Generated by the SAS System (&_SASSERVERNAME, &SYSSCPL) on %TRIM(%QSYSFUNC(DATE(), NLDATE20.)) at %TRIM(%SYSFUNC(TIME(), TIMEAMPM12.))";
PROC GPLOT DATA = WORK.SORTTempTableSorted
NOCACHE UNIFORM
;
PLOT &YIELD. * &TYPE_DATE. =Product
/
GRID
VAXIS=AXIS1
HAXIS=AXIS2
FRAME SKIPMISS
LHREF=1
CHREF=BLACK
AUTOHREF
LVREF=1
CVREF=BLACK
AUTOVREF
LEGEND=LEGEND1
;
BY 'Draw Plant'n;
/* -------------------------------------------------------------------
End of task code
------------------------------------------------------------------- */
RUN; QUIT;
%mend tracer_graphes;
%tracer_graphes(0, 0.05, 0.002, FICH=RDMTSSMF.RDMT_DE_LOWG, YIELD=YIELD_LOW_GRADE, TYPE_DATE=Deposition_Date, TITRE="Rate of Low Grade");
%tracer_graphes(0.6, 1, 0.02, FICH=RDMTSSMF.RDMT_DE_CLADU3S, YIELD=YIELD_CLAD_UPPER_3S, TYPE_DATE=Deposition_Date, TITRE="YIELD Cladding Upper 3 sigma");
%tracer_graphes(0, 0.6, 0.05, FICH=RDMTSSMF.RDMT_DE_NBNC, YIELD=YIELD_NBN_CORNER, TYPE_DATE=Deposition_Date, TITRE="YIELD NBN Corner");
%tracer_graphes(0.1, 0.96, 0.02, FICH=RDMTSSMF.RDMT_DE_NBNM, YIELD=YIELD_NBN_MIDDLE, TYPE_DATE=Deposition_Date, TITRE="YIELD NBN Middle");
%tracer_graphes(0.5, 1, 0.02, FICH=RDMTSSMF.RDMT_DE_SANT, YIELD=YIELD_SANTANDER, TYPE_DATE=Deposition_Date, TITRE="YIELD SANTANDER");
%tracer_graphes(0, 0.05, 0.002, FICH=RDMTSSMF.RDMT_STOCK_LOWG, YIELD=YIELD_LOW_GRADE, TYPE_DATE=Shipping_Date, TITRE="Rate of Low Grade");
%tracer_graphes(0.6, 1, 0.02, FICH=RDMTSSMF.RDMT_STOCK_CLADU3S, YIELD=YIELD_CLAD_UPPER_3S, TYPE_DATE=Shipping_Date, TITRE="YIELD Cladding Upper 3 sigma");
%tracer_graphes(0, 0.6, 0.05, FICH=RDMTSSMF.RDMT_STOCK_NBNC, YIELD=YIELD_NBN_CORNER, TYPE_DATE=Shipping_Date, TITRE="YIELD NBN Corner");
%tracer_graphes(0.1, 0.96, 0.02, FICH=RDMTSSMF.RDMT_STOCK_NBNM, YIELD=YIELD_NBN_MIDDLE, TYPE_DATE=Shipping_Date, TITRE="YIELD NBN Middle");
%tracer_graphes(0.5, 1, 0.02, FICH=RDMTSSMF.RDMT_STOCK_SANT, YIELD=YIELD_SANTANDER, TYPE_DATE=Shipping_Date, TITRE="YIELD SANTANDER");
TITLE; FOOTNOTE;
GOPTIONS RESET = SYMBOL;%SYMDEL _CLIENTTASKFILTER; |
Partager