Run time error was encountered. The system error returned was -S-

[Wei_tamu]

Hi,

I got this rum time error when I run score. I tried to use the first data set to predict one variable for the second data set. 

 I could find any clue from the SAS scripts as below. Has anyone encountered this problem? How to figure it out? 

*------------------------------------------------------------*
User: Ting
Date: November 05, 2018
Time: 17:31:52
Site: 70080787
Platform: X64_10HOME
Maintenance Release: 9.04.01M5P091317
EM Version: 14.3
*
MPRINT(EM_DIAGRAM): data _null_;
MPRINT(EM_DIAGRAM): call symput('NLDATE', strip(put(date(), NLDATE.)));
MPRINT(EM_DIAGRAM): call symput('NLTIME', strip(put(datetime(), NLTIME.)));
MPRINT(EM_DIAGRAM): run;
MPRINT(EM_DIAGRAM): data _null_;
MPRINT(EM_DIAGRAM): nldate= sasmsg("sashelp.dmine", "log_date_note", 'N', "November 05, 2018" );
MPRINT(EM_DIAGRAM): nltime= sasmsg("sashelp.dmine", "log_time_note", 'N', "17:31:51" );
MPRINT(EM_DIAGRAM): put "*------------------------------------------------------------*";
MPRINT(EM_DIAGRAM): put "* Training Log";
MPRINT(EM_DIAGRAM): put nldate;
MPRINT(EM_DIAGRAM): put nltime;
MPRINT(EM_DIAGRAM): put "*------------------------------------------------------------*";
MPRINT(EM_DIAGRAM): run;
*------------------------------------------------------------*
* Training Log
Date: November 05, 2018
Time: 17:31:51
*------------------------------------------------------------*
MPRINT(EM_DIAGRAM): filename O0B3HI25 "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\EMTRAIN.out" encoding="UTF-8" NOBOM;
MPRINT(EM_DIAGRAM): proc printto print=O0B3HI25 new;
MPRINT(EM_DIAGRAM): run;
MPRINT(EM_DIAGRAM): filename _LOG "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\EMLOG.log" encoding="UTF-8" NOBOM;
MPRINT(EM_DIAGRAM): data _null_;
MPRINT(EM_DIAGRAM): call symput('NLDATE', strip(put(date(), NLDATE.)));
MPRINT(EM_DIAGRAM): call symput('NLTIME', strip(put(datetime(), NLTIME.)));
MPRINT(EM_DIAGRAM): run;
MPRINT(EM_DIAGRAM): data _null_;
MPRINT(EM_DIAGRAM): nldate= sasmsg("sashelp.dmine", "log_date_note", 'N', "November 05, 2018" );
MPRINT(EM_DIAGRAM): nltime= sasmsg("sashelp.dmine", "log_time_note", 'N', "17:31:51" );
MPRINT(EM_DIAGRAM): file _LOG;
MPRINT(EM_DIAGRAM): put "*------------------------------------------------------------*";
MPRINT(EM_DIAGRAM): put "User: Ting";
MPRINT(EM_DIAGRAM): put nldate;
MPRINT(EM_DIAGRAM): put nltime;
MPRINT(EM_DIAGRAM): put "Site: 70080787";
MPRINT(EM_DIAGRAM): put "Platform: X64_10HOME";
MPRINT(EM_DIAGRAM): put "Maintenance Release: 9.04.01M5P091317";
MPRINT(EM_DIAGRAM): put "EM Version: 14.3";
MPRINT(EM_DIAGRAM): put "* ";
MPRINT(EM_DIAGRAM): run;
MPRINT(EM_DIAGRAM): filename _LOGIN "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\EMTRAIN.log" encoding="UTF-8" NOBOM;
MPRINT(EM_COPYFILE): data _null_;
MPRINT(EM_COPYFILE): length line $20000;
MPRINT(EM_COPYFILE): file _LOG MOD lrecl=20000;
MPRINT(EM_COPYFILE): fid=fopen("_LOGIN",'i',20000,'v');
MPRINT(EM_COPYFILE): if fid > 0 then do;
MPRINT(EM_COPYFILE): do while(^fread(fid));
MPRINT(EM_COPYFILE): rlen = frlen(fid);
MPRINT(EM_COPYFILE): rc= fget(fid,line,20000);
MPRINT(EM_COPYFILE): start = length(line)-length(left(line))+1;
MPRINT(EM_COPYFILE): line=strip(line);
MPRINT(EM_COPYFILE): put @start line;
MPRINT(EM_COPYFILE): end;
MPRINT(EM_COPYFILE): if fid > 0 then rc=fclose(fid);
MPRINT(EM_COPYFILE): end;
MPRINT(EM_COPYFILE): run;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): filename _LOGIN;
MPRINT(EM_DIAGRAM): data _null_;
MPRINT(EM_DIAGRAM): file _LOG mod;
MPRINT(EM_DIAGRAM): put _page_;
MPRINT(EM_DIAGRAM): run;
MPRINT(EM_DIAGRAM): filename _LOGIN "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\EMSCORE.log" encoding="UTF-8" NOBOM;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): data _null_;
MPRINT(EM_DIAGRAM): file _LOG mod;
MPRINT(EM_DIAGRAM): put _page_;
MPRINT(EM_DIAGRAM): run;
MPRINT(EM_DIAGRAM): filename _LOGIN "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\EMREPORT.log" encoding="UTF-8" NOBOM;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): filename _LOGIN;
MPRINT(EM_DIAGRAM): filename _LOG;
MPRINT(EM_DIAGRAM): filename _OUT "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\EMOUTPUT.out" encoding="UTF-8" NOBOM;
MPRINT(EM_DIAGRAM): data _null_;
MPRINT(EM_DIAGRAM): call symput('NLDATE', strip(put(date(), NLDATE.)));
MPRINT(EM_DIAGRAM): call symput('NLTIME', strip(put(datetime(), NLTIME.)));
MPRINT(EM_DIAGRAM): run;
MPRINT(EM_DIAGRAM): data _null_;
MPRINT(EM_DIAGRAM): nldate= sasmsg("sashelp.dmine", "log_date_note", 'N', "November 05, 2018" );
MPRINT(EM_DIAGRAM): nltime= sasmsg("sashelp.dmine", "log_time_note", 'N', "17:31:51" );
MPRINT(EM_DIAGRAM): file _OUT;
MPRINT(EM_DIAGRAM): put "*------------------------------------------------------------*";
MPRINT(EM_DIAGRAM): put "User: Ting";
MPRINT(EM_DIAGRAM): put nldate;
MPRINT(EM_DIAGRAM): put nltime;
MPRINT(EM_DIAGRAM): put "*------------------------------------------------------------*";
MPRINT(EM_DIAGRAM): put "* Training Output";
MPRINT(EM_DIAGRAM): put "*------------------------------------------------------------*";
MPRINT(EM_DIAGRAM): run;
MPRINT(EM_DIAGRAM): filename _OUTIN "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\EMTRAIN.out" encoding="UTF-8" NOBOM;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_COPYFILE): data _null_;
MPRINT(EM_COPYFILE): length line $20000;
MPRINT(EM_COPYFILE): file _OUT MOD lrecl=20000;
MPRINT(EM_COPYFILE): fid=fopen("_OUTIN",'i',20000,'v');
MPRINT(EM_COPYFILE): if fid > 0 then do;
MPRINT(EM_COPYFILE): do while(^fread(fid));
MPRINT(EM_COPYFILE): rlen = frlen(fid);
MPRINT(EM_COPYFILE): rc= fget(fid,line,20000);
MPRINT(EM_COPYFILE): start = length(line)-length(left(line))+1;
MPRINT(EM_COPYFILE): line=strip(line);
MPRINT(EM_COPYFILE): put @start line;
MPRINT(EM_COPYFILE): end;
MPRINT(EM_COPYFILE): if fid > 0 then rc=fclose(fid);
MPRINT(EM_COPYFILE): end;
MPRINT(EM_COPYFILE): run;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): filename _OUTIN;
MPRINT(EM_DIAGRAM): data _null_;
MPRINT(EM_DIAGRAM): file _OUT mod;
MPRINT(EM_DIAGRAM): put _page_;
MPRINT(EM_DIAGRAM): put // "*------------------------------------------------------------*";
MPRINT(EM_DIAGRAM): put "* Score Output";
MPRINT(EM_DIAGRAM): put "*------------------------------------------------------------*";
MPRINT(EM_DIAGRAM): run;
MPRINT(EM_DIAGRAM): filename _OUTIN "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\EMSCORE.out" encoding="UTF-8" NOBOM;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): filename _OUTIN;
MPRINT(EM_DIAGRAM): data _null_;
MPRINT(EM_DIAGRAM): file _OUT mod;
MPRINT(EM_DIAGRAM): put _page_;
MPRINT(EM_DIAGRAM): put // "*------------------------------------------------------------*";
MPRINT(EM_DIAGRAM): put "* Report Output";
MPRINT(EM_DIAGRAM): put "*------------------------------------------------------------*";
MPRINT(EM_DIAGRAM): run;
MPRINT(EM_DIAGRAM): filename _OUTIN "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\EMREPORT.out" encoding="UTF-8" NOBOM;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): filename _OUTIN;
MPRINT(EM_DIAGRAM): filename _OUT;
MPRINT(EM_DIAGRAM): filename _emtool_ 'C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\EMRUNSTATUS.xml' encoding="UTF-8" NOBOM;
58591 proc freq data=EMWS4.Score_VariableSet noprint;
MPRINT(EM_DIAGRAM): proc freq data=EMWS4.Score_VariableSet noprint;
58592 table ROLE*LEVEL/out=WORK.ScoreMETA;
MPRINT(EM_DIAGRAM): table ROLE*LEVEL/out=WORK.ScoreMETA;
58593 run;
MPRINT(EM_DIAGRAM): run;

NOTE: There were 2 observations read from the data set EMWS4.SCORE_VARIABLESET.
NOTE: The data set WORK.SCOREMETA has 2 observations and 4 variables.
NOTE: PROCEDURE FREQ used (Total process time):
real time 0.01 seconds
cpu time 0.01 seconds


58594 proc print data=WORK.ScoreMETA label noobs;
MPRINT(EM_DIAGRAM): proc print data=WORK.ScoreMETA label noobs;
58595 var ROLE LEVEL COUNT;
MPRINT(EM_DIAGRAM): var ROLE LEVEL COUNT;
58596 label ROLE = "%sysfunc(sasmsg(sashelp.dmine, meta_role_vlabel, NOQUOTE))" LEVEL = "%sysfunc(sasmsg(sashelp.dmine, meta_level_vlabel, NOQUOTE))" COUNT = "%sysfunc(sasmsg(sashelp.dmine, rpt_count_vlabel, NOQUOTE))";
MPRINT(EM_DIAGRAM): label ROLE = "Role" LEVEL = "Measurement Level" COUNT = "Frequency Count";
58597 title9 ' ';
MPRINT(EM_DIAGRAM): title9 ' ';
58598 title10 "%sysfunc(sasmsg(sashelp.dmine, rpt_varSummary_title , NOQUOTE))";
MPRINT(EM_DIAGRAM): title10 "Variable Summary";
MPRINT(EM_DIAGRAM): run;
58599 run;

NOTE: There were 2 observations read from the data set WORK.SCOREMETA.
NOTE: The PROCEDURE PRINT printed page 37.
NOTE: PROCEDURE PRINT used (Total process time):
real time 0.00 seconds
cpu time 0.00 seconds


58600 title10;
MPRINT(EM_DIAGRAM): title10;
58601 %let groupid =;
58602 %let endGroupid =;
58603 %let prescoreid =;
58604 %let idsTable =;
58605 %let hpdmTable =;
58606 %let lasthptm =;
58607 %let lastTm =;
58608 data _null_;
MPRINT(EM_DIAGRAM): data _null_;
58609 set EMWS4.HPDMForest_EMINFO;
MPRINT(EM_DIAGRAM): set EMWS4.HPDMForest_EMINFO;
58610 where upcase(key) in('LASTHPTM', 'LASTTMNODE', 'IDSTABLE', 'HPDMSAMPLE', 'PRESCORECODE','ENDGROUP', 'GROUPINFO', 'BOOSTINFO', 'BAGINFO', 'TARGETINFO', 'INDEXINFO');
MPRINT(EM_DIAGRAM): where upcase(key) in('LASTHPTM', 'LASTTMNODE', 'IDSTABLE', 'HPDMSAMPLE', 'PRESCORECODE','ENDGROUP', 'GROUPINFO', 'BOOSTINFO', 'BAGINFO', 'TARGETINFO', 'INDEXINFO');
58611 select(upcase(key));
MPRINT(EM_DIAGRAM): select(upcase(key));
58612 when('LASTHPTM') call symput('lasthptm', DATA);
MPRINT(EM_DIAGRAM): when('LASTHPTM') call symput('lasthptm', DATA);
58613 when('LASTTMNODE') call symput('lastTm', DATA);
MPRINT(EM_DIAGRAM): when('LASTTMNODE') call symput('lastTm', DATA);
58614 when('IDSTABLE') call symput('idsTable', DATA);
MPRINT(EM_DIAGRAM): when('IDSTABLE') call symput('idsTable', DATA);
58615 when('HPDMSAMPLE') call symput('hpdmSample', DATA);
MPRINT(EM_DIAGRAM): when('HPDMSAMPLE') call symput('hpdmSample', DATA);
58616 when('PRESCORECODE') call symput('prescoreId', DATA);
MPRINT(EM_DIAGRAM): when('PRESCORECODE') call symput('prescoreId', DATA);
58617 when('ENDGROUP') call symput('endGroupId', DATA);
MPRINT(EM_DIAGRAM): when('ENDGROUP') call symput('endGroupId', DATA);
58618 otherwise call symput('groupId', DATA);
MPRINT(EM_DIAGRAM): otherwise call symput('groupId', DATA);
58619 end;
MPRINT(EM_DIAGRAM): end;
58620 run;
MPRINT(EM_DIAGRAM): run;

NOTE: There were 1 observations read from the data set EMWS4.HPDMFOREST_EMINFO.
WHERE UPCASE(key) in ('BAGINFO', 'BOOSTINFO', 'ENDGROUP', 'GROUPINFO', 'HPDMSAMPLE', 'IDSTABLE', 'INDEXINFO', 'LASTHPTM', 'LASTTMNODE', 'PRESCORECODE', 'TARGETINFO');
NOTE: DATA statement used (Total process time):
real time 0.00 seconds
cpu time 0.01 seconds


Executing SASHELP.EMCORE.EMINFOITERATOR.SCL _INIT >>
Executing SASHELP.EMCORE.EMINFOITERATOR.SCL setMetaData >>
NOTE: There were 1 observations read from the data set EMWS4.HPDMFOREST_EMINFO.
WHERE (TARGET='INDEX1') and (KEY='MODEL');
NOTE: The data set WORK.EMINFO4387FTG2 has 1 observations and 3 variables.
Executing SASHELP.EMCORE.EMINFOITERATOR.SCL NUMELEMENTS >>
Executing SASHELP.EMCORE.EMINFOITERATOR.SCL _term >>
Executing SASHELP.EMCORE.EMINFOITERATOR.SCL _INIT >>
Executing SASHELP.EMCORE.EMINFOITERATOR.SCL setMetaData >>
NOTE: There were 1 observations read from the data set EMWS4.HPDMFOREST_EMINFO.
WHERE (TARGET='INDEX1') and (KEY='DECMETA');
NOTE: The data set WORK.EMINFO4064BB18 has 1 observations and 3 variables.
Executing SASHELP.EMCORE.EMINFOITERATOR.SCL next >>
Executing SASHELP.EMCORE.EMINFOITERATOR.SCL next >>
Executing SASHELP.EMCORE.EMINFOITERATOR.SCL _term >>
58621 %let em_rootkey=;
58622 %let em_keytype=;
58623 %let em_keylen=;
58624 data _null_;
MPRINT(EM_DIAGRAM): data _null_;
58625 set EMWS4.Ids_cmeta_data;
MPRINT(EM_DIAGRAM): set EMWS4.Ids_cmeta_data;
58626 where role='KEY';
MPRINT(EM_DIAGRAM): where role='KEY';
58627 call symput('em_rootkey', strip(NAME));
MPRINT(EM_DIAGRAM): call symput('em_rootkey', strip(NAME));
58628 call symput('em_keytype', strip(TYPE));
MPRINT(EM_DIAGRAM): call symput('em_keytype', strip(TYPE));
58629 call symput('em_rootlen', strip(put(length, best.)));
MPRINT(EM_DIAGRAM): call symput('em_rootlen', strip(put(length, best.)));
58630 run;
MPRINT(EM_DIAGRAM): run;

NOTE: There were 0 observations read from the data set EMWS4.IDS_CMETA_DATA.
WHERE role='KEY';
NOTE: DATA statement used (Total process time):
real time 0.00 seconds
cpu time 0.00 seconds


astorecount=0
astorecount=1
58631 %em_copyfile(infref=#LN01107, outfref=#LN01105, append=Y);
MPRINT(EM_DIAGRAM):
MPRINT(EM_COPYFILE): data _null_;
MPRINT(EM_COPYFILE): length line $20000;
MPRINT(EM_COPYFILE): file #LN01105 MOD lrecl=20000;
MPRINT(EM_COPYFILE): fid=fopen("#LN01107",'i',20000,'v');
MPRINT(EM_COPYFILE): if fid > 0 then do;
MPRINT(EM_COPYFILE): do while(^fread(fid));
MPRINT(EM_COPYFILE): rlen = frlen(fid);
MPRINT(EM_COPYFILE): rc= fget(fid,line,20000);
MPRINT(EM_COPYFILE): start = length(line)-length(left(line))+1;
MPRINT(EM_COPYFILE): line=strip(line);
MPRINT(EM_COPYFILE): put @start line;
MPRINT(EM_COPYFILE): end;
MPRINT(EM_COPYFILE): if fid > 0 then rc=fclose(fid);
MPRINT(EM_COPYFILE): end;
MPRINT(EM_COPYFILE): run;

NOTE: The file #LN01105 is:
Filename=C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\eppostcode.sas,
RECFM=V,LRECL=20000,File Size (bytes)=0,
Last Modified=05Nov2018:17:31:51,
Create Time=03Nov2018:17:57:06

NOTE: 25 records were written to the file #LN01105.
The minimum record length was 4.
The maximum record length was 63.
NOTE: DATA statement used (Total process time):
real time 0.00 seconds
cpu time 0.00 seconds


MPRINT(EM_DIAGRAM): ;

58632 %em_copyfile(infref=#LN01111, outfref=#LN01109, append=Y);
MPRINT(EM_DIAGRAM):
MPRINT(EM_COPYFILE): data _null_;
MPRINT(EM_COPYFILE): length line $20000;
MPRINT(EM_COPYFILE): file #LN01109 MOD lrecl=20000;
MPRINT(EM_COPYFILE): fid=fopen("#LN01111",'i',20000,'v');
MPRINT(EM_COPYFILE): if fid > 0 then do;
MPRINT(EM_COPYFILE): do while(^fread(fid));
MPRINT(EM_COPYFILE): rlen = frlen(fid);
MPRINT(EM_COPYFILE): rc= fget(fid,line,20000);
MPRINT(EM_COPYFILE): start = length(line)-length(left(line))+1;
MPRINT(EM_COPYFILE): line=strip(line);
MPRINT(EM_COPYFILE): put @start line;
MPRINT(EM_COPYFILE): end;
MPRINT(EM_COPYFILE): if fid > 0 then rc=fclose(fid);
MPRINT(EM_COPYFILE): end;
MPRINT(EM_COPYFILE): run;

NOTE: The file #LN01109 is:
Filename=C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\eppostcode.sas,
RECFM=V,LRECL=20000,File Size (bytes)=636,
Last Modified=05Nov2018:17:31:51,
Create Time=03Nov2018:17:57:06

NOTE: 77 records were written to the file #LN01109.
The minimum record length was 3.
The maximum record length was 43.
NOTE: DATA statement used (Total process time):
real time 0.00 seconds
cpu time 0.00 seconds


MPRINT(EM_DIAGRAM): ;

58633 %em_copyfile(infref=#LN01114, outfref=#LN01113, append=Y);
MPRINT(EM_DIAGRAM):
MPRINT(EM_COPYFILE): data _null_;
MPRINT(EM_COPYFILE): length line $20000;
MPRINT(EM_COPYFILE): file #LN01113 MOD lrecl=20000;
MPRINT(EM_COPYFILE): fid=fopen("#LN01114",'i',20000,'v');
MPRINT(EM_COPYFILE): if fid > 0 then do;
MPRINT(EM_COPYFILE): do while(^fread(fid));
MPRINT(EM_COPYFILE): rlen = frlen(fid);
MPRINT(EM_COPYFILE): rc= fget(fid,line,20000);
MPRINT(EM_COPYFILE): start = length(line)-length(left(line))+1;
MPRINT(EM_COPYFILE): line=strip(line);
MPRINT(EM_COPYFILE): put @start line;
MPRINT(EM_COPYFILE): end;
MPRINT(EM_COPYFILE): if fid > 0 then rc=fclose(fid);
MPRINT(EM_COPYFILE): end;
MPRINT(EM_COPYFILE): run;

NOTE: The file #LN01113 is:
Filename=C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\eppostcode.sas,
RECFM=V,LRECL=20000,File Size (bytes)=2006,
Last Modified=05Nov2018:17:31:51,
Create Time=03Nov2018:17:57:06

NOTE: 19 records were written to the file #LN01113.
The minimum record length was 1.
The maximum record length was 64.
NOTE: DATA statement used (Total process time):
real time 0.00 seconds
cpu time 0.00 seconds


MPRINT(EM_DIAGRAM): ;

58634 filename _afrf "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\HPDMForest\score.sasast";
MPRINT(EM_DIAGRAM): filename _afrf "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\HPDMForest\score.sasast";
58635 filename _scafrf "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\score.sasast";
MPRINT(EM_DIAGRAM): filename _scafrf "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\score.sasast";
58636 %em_CopybinaryFile(infref=_afrf, outfref=_scafrf, returnName=_brc);
NOTE: EM_COPYBINARYFILE start 05NOV2018:17:31:51
NOTE: EM_COPYBINARYFILE infref=_afrf C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\HPDMForest\score.sasast
NOTE: EM_COPYBINARYFILE outfref=_scafrf C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\score.sasast
MPRINT(EM_COPYBINARYFILE): data _null_;
MPRINT(EM_COPYBINARYFILE): length msg $1024 rec $ 16392 outfmt $32;
MPRINT(EM_COPYBINARYFILE): fid_in = fopen("_afrf", 'S', 16392, 'B');
MPRINT(EM_COPYBINARYFILE): if fid_in <= 0 then do;
MPRINT(EM_COPYBINARYFILE): msg = sysmsg();
MPRINT(EM_COPYBINARYFILE): putlog "ERROR: EM_COPYBINARYFILE open failed for _afrf";
MPRINT(EM_COPYBINARYFILE): putlog msg;
MPRINT(EM_COPYBINARYFILE): call symputx("_brc",8);
MPRINT(EM_COPYBINARYFILE): stop;
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): fid_out = fopen("_scafrf", 'O', 16392, 'B');
MPRINT(EM_COPYBINARYFILE): if fid_out <= 0 then do;
MPRINT(EM_COPYBINARYFILE): msg = sysmsg();
MPRINT(EM_COPYBINARYFILE): putlog "ERROR: EM_COPYBINARYFILE open failed for _scafrf";
MPRINT(EM_COPYBINARYFILE): putlog msg;
MPRINT(EM_COPYBINARYFILE): call symputx("_brc",8);
MPRINT(EM_COPYBINARYFILE): stop;
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): bytesProcessed = 0;
MPRINT(EM_COPYBINARYFILE): do while( ^fread(fid_in));
MPRINT(EM_COPYBINARYFILE): call missing(outfmt, rec);
MPRINT(EM_COPYBINARYFILE): rcGet = fget(fid_in, rec, 16392);
MPRINT(EM_COPYBINARYFILE): fcolIn = fcol(fid_in);
MPRINT(EM_COPYBINARYFILE): if (fColIn - 16392) = 1 then do;
MPRINT(EM_COPYBINARYFILE): fmtLength = 16392;
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): else do;
MPRINT(EM_COPYBINARYFILE): fmtLength = fColIn - 1;
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): outfmt = '$char'!!strip(put(fmtLength, best.))!!'.';
MPRINT(EM_COPYBINARYFILE): rcPut = fput(fid_out, putc(rec, outfmt));
MPRINT(EM_COPYBINARYFILE): rcWrite = fwrite(fid_out);
MPRINT(EM_COPYBINARYFILE): bytesProcessed + fmtLength;
MPRINT(EM_COPYBINARYFILE): maxRc = max(rcGet, rcPut, rcWrite);
MPRINT(EM_COPYBINARYFILE): if maxRc > 0 then do;
MPRINT(EM_COPYBINARYFILE): putlog "ERROR: EM_COPYBINARYFILE checklog " rcGet= rcPut= rcWrite=;
MPRINT(EM_COPYBINARYFILE): call symputx("_brc", 8);
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): putlog "NOTE: EM_COPYBINARYFILE processed " bytesProcessed "bytes";
MPRINT(EM_COPYBINARYFILE): rcInC = fclose(fid_in);
MPRINT(EM_COPYBINARYFILE): rcOutC = fclose(fid_out);
MPRINT(EM_COPYBINARYFILE): maxRc = max(rcInC, rcOutC);
MPRINT(EM_COPYBINARYFILE): if maxRc > 0 then do;
MPRINT(EM_COPYBINARYFILE): putlog "ERROR: EM_COPYBINARYFILE checklog " rcInC= rcOutC=;
MPRINT(EM_COPYBINARYFILE): call symputx("_brc", 8);
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): else do;
MPRINT(EM_COPYBINARYFILE): call symputx("_brc", 0);
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): run;

NOTE: EM_COPYBINARYFILE processed 158910023 bytes
NOTE: DATA statement used (Total process time):
real time 0.20 seconds
cpu time 0.18 seconds


MPRINT(EM_DIAGRAM): ;
58637 filename _afrf;
MPRINT(EM_DIAGRAM): filename _afrf;
NOTE: Fileref _AFRF has been deassigned.
58638 filename _scafrf;
MPRINT(EM_DIAGRAM): filename _scafrf;
NOTE: Fileref _SCAFRF has been deassigned.
58639 filename _ofrf "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\HPDMForest\OUTMDLFILE.bin";
MPRINT(EM_DIAGRAM): filename _ofrf "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\HPDMForest\OUTMDLFILE.bin";
58640 filename _scofrf "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\OUTMDLFILE.bin";
MPRINT(EM_DIAGRAM): filename _scofrf "C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\OUTMDLFILE.bin";
58641 %em_CopybinaryFile(infref=_ofrf, outfref=_scofrf, returnName=_brc);
NOTE: EM_COPYBINARYFILE start 05NOV2018:17:31:52
NOTE: EM_COPYBINARYFILE infref=_ofrf C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\HPDMForest\OUTMDLFILE.bin
NOTE: EM_COPYBINARYFILE outfref=_scofrf C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\Score\OUTMDLFILE.bin
MPRINT(EM_COPYBINARYFILE): data _null_;
MPRINT(EM_COPYBINARYFILE): length msg $1024 rec $ 16392 outfmt $32;
MPRINT(EM_COPYBINARYFILE): fid_in = fopen("_ofrf", 'S', 16392, 'B');
MPRINT(EM_COPYBINARYFILE): if fid_in <= 0 then do;
MPRINT(EM_COPYBINARYFILE): msg = sysmsg();
MPRINT(EM_COPYBINARYFILE): putlog "ERROR: EM_COPYBINARYFILE open failed for _ofrf";
MPRINT(EM_COPYBINARYFILE): putlog msg;
MPRINT(EM_COPYBINARYFILE): call symputx("_brc",8);
MPRINT(EM_COPYBINARYFILE): stop;
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): fid_out = fopen("_scofrf", 'O', 16392, 'B');
MPRINT(EM_COPYBINARYFILE): if fid_out <= 0 then do;
MPRINT(EM_COPYBINARYFILE): msg = sysmsg();
MPRINT(EM_COPYBINARYFILE): putlog "ERROR: EM_COPYBINARYFILE open failed for _scofrf";
MPRINT(EM_COPYBINARYFILE): putlog msg;
MPRINT(EM_COPYBINARYFILE): call symputx("_brc",8);
MPRINT(EM_COPYBINARYFILE): stop;
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): bytesProcessed = 0;
MPRINT(EM_COPYBINARYFILE): do while( ^fread(fid_in));
MPRINT(EM_COPYBINARYFILE): call missing(outfmt, rec);
MPRINT(EM_COPYBINARYFILE): rcGet = fget(fid_in, rec, 16392);
MPRINT(EM_COPYBINARYFILE): fcolIn = fcol(fid_in);
MPRINT(EM_COPYBINARYFILE): if (fColIn - 16392) = 1 then do;
MPRINT(EM_COPYBINARYFILE): fmtLength = 16392;
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): else do;
MPRINT(EM_COPYBINARYFILE): fmtLength = fColIn - 1;
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): outfmt = '$char'!!strip(put(fmtLength, best.))!!'.';
MPRINT(EM_COPYBINARYFILE): rcPut = fput(fid_out, putc(rec, outfmt));
MPRINT(EM_COPYBINARYFILE): rcWrite = fwrite(fid_out);
MPRINT(EM_COPYBINARYFILE): bytesProcessed + fmtLength;
MPRINT(EM_COPYBINARYFILE): maxRc = max(rcGet, rcPut, rcWrite);
MPRINT(EM_COPYBINARYFILE): if maxRc > 0 then do;
MPRINT(EM_COPYBINARYFILE): putlog "ERROR: EM_COPYBINARYFILE checklog " rcGet= rcPut= rcWrite=;
MPRINT(EM_COPYBINARYFILE): call symputx("_brc", 8);
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): putlog "NOTE: EM_COPYBINARYFILE processed " bytesProcessed "bytes";
MPRINT(EM_COPYBINARYFILE): rcInC = fclose(fid_in);
MPRINT(EM_COPYBINARYFILE): rcOutC = fclose(fid_out);
MPRINT(EM_COPYBINARYFILE): maxRc = max(rcInC, rcOutC);
MPRINT(EM_COPYBINARYFILE): if maxRc > 0 then do;
MPRINT(EM_COPYBINARYFILE): putlog "ERROR: EM_COPYBINARYFILE checklog " rcInC= rcOutC=;
MPRINT(EM_COPYBINARYFILE): call symputx("_brc", 8);
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): else do;
MPRINT(EM_COPYBINARYFILE): call symputx("_brc", 0);
MPRINT(EM_COPYBINARYFILE): end;
MPRINT(EM_COPYBINARYFILE): run;

NOTE: EM_COPYBINARYFILE processed 159840040 bytes
NOTE: DATA statement used (Total process time):
real time 0.18 seconds
cpu time 0.18 seconds


MPRINT(EM_DIAGRAM): ;
58642 filename _ofrf;
MPRINT(EM_DIAGRAM): filename _ofrf;
NOTE: Fileref _OFRF has been deassigned.
58643 filename _scofrf;
MPRINT(EM_DIAGRAM): filename _scofrf;
NOTE: Fileref _SCOFRF has been deassigned.
MPRINT(EM_DIAGRAM): data EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): set EMWS4.Ids2_DATA;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * EM SCORE CODE;
MPRINT(EM_DIAGRAM): * EM Version: 14.3;
MPRINT(EM_DIAGRAM): * SAS Release: 9.04.01M5P091317;
MPRINT(EM_DIAGRAM): * Host: DESKTOP-R6P0B3P;
MPRINT(EM_DIAGRAM): * Encoding: utf-8;
MPRINT(EM_DIAGRAM): * Locale: en_US;
MPRINT(EM_DIAGRAM): * Project Path: C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4;
MPRINT(EM_DIAGRAM): * Project Name: DIAMOND;
MPRINT(EM_DIAGRAM): * Diagram Id: EMWS4;
MPRINT(EM_DIAGRAM): * Diagram Name: scoring;
MPRINT(EM_DIAGRAM): * Generated by: Ting;
MPRINT(EM_DIAGRAM): * Date: 05NOV2018:17:31:51;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * EM SCORE CODE;
MPRINT(EM_DIAGRAM): * EM Version: 14.3;
MPRINT(EM_DIAGRAM): * SAS Release: 9.04.01M5P091317;
MPRINT(EM_DIAGRAM): * Host: DESKTOP-R6P0B3P;
MPRINT(EM_DIAGRAM): * Encoding: utf-8;
MPRINT(EM_DIAGRAM): * Locale: en_US;
MPRINT(EM_DIAGRAM): * Project Path: C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4;
MPRINT(EM_DIAGRAM): * Project Name: DIAMOND;
MPRINT(EM_DIAGRAM): * Diagram Id: EMWS4;
MPRINT(EM_DIAGRAM): * Diagram Name: scoring;
MPRINT(EM_DIAGRAM): * Generated by: Ting;
MPRINT(EM_DIAGRAM): * Date: 05NOV2018:10:06:40;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * EM SCORE CODE;
MPRINT(EM_DIAGRAM): * EM Version: 14.3;
MPRINT(EM_DIAGRAM): * SAS Release: 9.04.01M5P091317;
MPRINT(EM_DIAGRAM): * Host: DESKTOP-R6P0B3P;
MPRINT(EM_DIAGRAM): * Encoding: utf-8;
MPRINT(EM_DIAGRAM): * Locale: en_US;
MPRINT(EM_DIAGRAM): * Project Path: C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4;
MPRINT(EM_DIAGRAM): * Project Name: DIAMOND;
MPRINT(EM_DIAGRAM): * Diagram Id: EMWS4;
MPRINT(EM_DIAGRAM): * Diagram Name: scoring;
MPRINT(EM_DIAGRAM): * Generated by: Ting;
MPRINT(EM_DIAGRAM): * Date: 03NOV2018:18:20:29;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * EM SCORE CODE;
MPRINT(EM_DIAGRAM): * EM Version: 14.3;
MPRINT(EM_DIAGRAM): * SAS Release: 9.04.01M5P091317;
MPRINT(EM_DIAGRAM): * Host: DESKTOP-R6P0B3P;
MPRINT(EM_DIAGRAM): * Encoding: utf-8;
MPRINT(EM_DIAGRAM): * Locale: en_US;
MPRINT(EM_DIAGRAM): * Project Path: C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4;
MPRINT(EM_DIAGRAM): * Project Name: DIAMOND;
MPRINT(EM_DIAGRAM): * Diagram Id: EMWS4;
MPRINT(EM_DIAGRAM): * Diagram Name: scoring;
MPRINT(EM_DIAGRAM): * Generated by: Ting;
MPRINT(EM_DIAGRAM): * Date: 03NOV2018:18:18:00;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * EM SCORE CODE;
MPRINT(EM_DIAGRAM): * EM Version: 14.3;
MPRINT(EM_DIAGRAM): * SAS Release: 9.04.01M5P091317;
MPRINT(EM_DIAGRAM): * Host: DESKTOP-R6P0B3P;
MPRINT(EM_DIAGRAM): * Encoding: utf-8;
MPRINT(EM_DIAGRAM): * Locale: en_US;
MPRINT(EM_DIAGRAM): * Project Path: C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4;
MPRINT(EM_DIAGRAM): * Project Name: DIAMOND;
MPRINT(EM_DIAGRAM): * Diagram Id: EMWS4;
MPRINT(EM_DIAGRAM): * Diagram Name: scoring;
MPRINT(EM_DIAGRAM): * Generated by: Ting;
MPRINT(EM_DIAGRAM): * Date: 03NOV2018:17:57:07;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Input Data Source;
MPRINT(EM_DIAGRAM): * TYPE: SAMPLE;
MPRINT(EM_DIAGRAM): * NODE: Ids;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Metadata Node;
MPRINT(EM_DIAGRAM): * TYPE: UTILITY;
MPRINT(EM_DIAGRAM): * NODE: Meta;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Extension Class;
MPRINT(EM_DIAGRAM): * TYPE: MODEL;
MPRINT(EM_DIAGRAM): * NODE: HPDMForest;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_HPFST_SCORE): options validvarname=V7;
MPRINT(EM_HPFST_SCORE): proc hp4score data=EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): id _ALL_;
MPRINT(EM_HPFST_SCORE): score file="C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\HPDMForest\OUTMDLFILE.bin" out=EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): PERFORMANCE DETAILS;
MPRINT(EM_HPFST_SCORE): run;
ERROR: Score input variable In_carat not found in the data set.
WARNING: The data set EMWS4.SCORE_SCORE may be incomplete. When this step was stopped there were 0 observations and 0 variables.
WARNING: Data set EMWS4.SCORE_SCORE was not replaced because this step was stopped.
MPRINT(EM_HPFST_SCORE): options validvarname=V7;
MPRINT(EM_HPFST_SCORE): data EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): set EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *Computing Classification Vars: INDEX1;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): length _format200 $200;
MPRINT(EM_DIAGRAM): drop _format200;
MPRINT(EM_DIAGRAM): _format200= ' ' ;
MPRINT(EM_DIAGRAM): length _p_ 8;
MPRINT(EM_DIAGRAM): _p_= 0 ;
MPRINT(EM_DIAGRAM): drop _p_ ;
MPRINT(EM_DIAGRAM): if P_INDEX11 - _p_ > 1e-8 then do ;
MPRINT(EM_DIAGRAM): _p_= P_INDEX11 ;
MPRINT(EM_DIAGRAM): _format200='1';
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): if P_INDEX10 - _p_ > 1e-8 then do ;
MPRINT(EM_DIAGRAM): _p_= P_INDEX10 ;
MPRINT(EM_DIAGRAM): _format200='0';
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): I_INDEX1=dmnorm(_format200,32);
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): length U_INDEX1 8;
MPRINT(EM_DIAGRAM): label U_INDEX1 = 'Unnormalized Into: INDEX1';
MPRINT(EM_DIAGRAM): format U_INDEX1 BEST12.;
MPRINT(EM_DIAGRAM): if I_INDEX1='1' then U_INDEX1=1;
MPRINT(EM_DIAGRAM): if I_INDEX1='0' then U_INDEX1=0;
MPRINT(EM_DIAGRAM): data EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): set EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Model Compare Class;
MPRINT(EM_DIAGRAM): * TYPE: ASSESS;
MPRINT(EM_DIAGRAM): * NODE: MdlComp;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): drop _temp_;
MPRINT(EM_DIAGRAM): if (P_INDEX11 ge 1) then do;
MPRINT(EM_DIAGRAM): _temp_ = dmran(1234);
MPRINT(EM_DIAGRAM): b_INDEX1 = floor(1 + 9*_temp_);
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.99) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 10;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else do;
MPRINT(EM_DIAGRAM): _temp_ = dmran(1234);
MPRINT(EM_DIAGRAM): b_INDEX1 = floor(11 + 10*_temp_);
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Score Node;
MPRINT(EM_DIAGRAM): * TYPE: ASSESS;
MPRINT(EM_DIAGRAM): * NODE: Score;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * Score: Creating Fixed Names;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): LABEL EM_SEGMENT = 'Segment';
MPRINT(EM_DIAGRAM): EM_SEGMENT = b_INDEX1;
MPRINT(EM_DIAGRAM): LENGTH EM_EVENTPROBABILITY 8;
MPRINT(EM_DIAGRAM): LABEL EM_EVENTPROBABILITY = 'Probability for level 1 of INDEX1';
MPRINT(EM_DIAGRAM): EM_EVENTPROBABILITY = P_INDEX11;
MPRINT(EM_DIAGRAM): LENGTH EM_PROBABILITY 8;
MPRINT(EM_DIAGRAM): LABEL EM_PROBABILITY = 'Probability of Classification';
MPRINT(EM_DIAGRAM): EM_PROBABILITY = max( P_INDEX11 , P_INDEX10 );
MPRINT(EM_DIAGRAM): LENGTH EM_CLASSIFICATION
MPRINT(DMNORLEN): $32
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): LABEL EM_CLASSIFICATION = "Prediction for INDEX1";
MPRINT(EM_DIAGRAM): EM_CLASSIFICATION = I_INDEX1;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Input Data Source;
MPRINT(EM_DIAGRAM): * TYPE: SAMPLE;
MPRINT(EM_DIAGRAM): * NODE: Ids;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Metadata Node;
MPRINT(EM_DIAGRAM): * TYPE: UTILITY;
MPRINT(EM_DIAGRAM): * NODE: Meta;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Extension Class;
MPRINT(EM_DIAGRAM): * TYPE: MODEL;
MPRINT(EM_DIAGRAM): * NODE: HPDMForest;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_HPFST_SCORE): options validvarname=V7;
MPRINT(EM_HPFST_SCORE): proc hp4score data=EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): id _ALL_;
MPRINT(EM_HPFST_SCORE): score file="C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\HPDMForest\OUTMDLFILE.bin" out=EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): PERFORMANCE DETAILS;
MPRINT(EM_HPFST_SCORE): run;
ERROR: Score input variable In_carat not found in the data set.
WARNING: The data set EMWS4.SCORE_SCORE may be incomplete. When this step was stopped there were 0 observations and 0 variables.
WARNING: Data set EMWS4.SCORE_SCORE was not replaced because this step was stopped.
MPRINT(EM_HPFST_SCORE): options validvarname=V7;
MPRINT(EM_HPFST_SCORE): data EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): set EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *Computing Classification Vars: INDEX1;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): length _format200 $200;
MPRINT(EM_DIAGRAM): drop _format200;
MPRINT(EM_DIAGRAM): _format200= ' ' ;
MPRINT(EM_DIAGRAM): length _p_ 8;
MPRINT(EM_DIAGRAM): _p_= 0 ;
MPRINT(EM_DIAGRAM): drop _p_ ;
MPRINT(EM_DIAGRAM): if P_INDEX11 - _p_ > 1e-8 then do ;
MPRINT(EM_DIAGRAM): _p_= P_INDEX11 ;
MPRINT(EM_DIAGRAM): _format200='1';
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): if P_INDEX10 - _p_ > 1e-8 then do ;
MPRINT(EM_DIAGRAM): _p_= P_INDEX10 ;
MPRINT(EM_DIAGRAM): _format200='0';
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): I_INDEX1=dmnorm(_format200,32);
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): length U_INDEX1 8;
MPRINT(EM_DIAGRAM): label U_INDEX1 = 'Unnormalized Into: INDEX1';
MPRINT(EM_DIAGRAM): format U_INDEX1 BEST12.;
MPRINT(EM_DIAGRAM): if I_INDEX1='1' then U_INDEX1=1;
MPRINT(EM_DIAGRAM): if I_INDEX1='0' then U_INDEX1=0;
MPRINT(EM_DIAGRAM): data EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): set EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Model Compare Class;
MPRINT(EM_DIAGRAM): * TYPE: ASSESS;
MPRINT(EM_DIAGRAM): * NODE: MdlComp;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): drop _temp_;
MPRINT(EM_DIAGRAM): if (P_INDEX11 ge 1) then do;
MPRINT(EM_DIAGRAM): _temp_ = dmran(1234);
MPRINT(EM_DIAGRAM): b_INDEX1 = floor(1 + 9*_temp_);
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.99) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 10;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else do;
MPRINT(EM_DIAGRAM): _temp_ = dmran(1234);
MPRINT(EM_DIAGRAM): b_INDEX1 = floor(11 + 10*_temp_);
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Score Node;
MPRINT(EM_DIAGRAM): * TYPE: ASSESS;
MPRINT(EM_DIAGRAM): * NODE: Score;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * Score: Creating Fixed Names;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): LABEL EM_SEGMENT = 'Segment';
MPRINT(EM_DIAGRAM): EM_SEGMENT = b_INDEX1;
MPRINT(EM_DIAGRAM): LENGTH EM_EVENTPROBABILITY 8;
MPRINT(EM_DIAGRAM): LABEL EM_EVENTPROBABILITY = 'Probability for level 1 of INDEX1';
MPRINT(EM_DIAGRAM): EM_EVENTPROBABILITY = P_INDEX11;
MPRINT(EM_DIAGRAM): LENGTH EM_PROBABILITY 8;
MPRINT(EM_DIAGRAM): LABEL EM_PROBABILITY = 'Probability of Classification';
MPRINT(EM_DIAGRAM): EM_PROBABILITY = max( P_INDEX11 , P_INDEX10 );
MPRINT(EM_DIAGRAM): LENGTH EM_CLASSIFICATION
MPRINT(DMNORLEN): $32
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): LABEL EM_CLASSIFICATION = "Prediction for INDEX1";
MPRINT(EM_DIAGRAM): EM_CLASSIFICATION = I_INDEX1;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Input Data Source;
MPRINT(EM_DIAGRAM): * TYPE: SAMPLE;
MPRINT(EM_DIAGRAM): * NODE: Ids;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Metadata Node;
MPRINT(EM_DIAGRAM): * TYPE: UTILITY;
MPRINT(EM_DIAGRAM): * NODE: Meta;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Extension Class;
MPRINT(EM_DIAGRAM): * TYPE: MODEL;
MPRINT(EM_DIAGRAM): * NODE: HPDMForest;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_HPFST_SCORE): options validvarname=V7;
MPRINT(EM_HPFST_SCORE): proc hp4score data=EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): id _ALL_;
MPRINT(EM_HPFST_SCORE): score file="C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\HPDMForest\OUTMDLFILE.bin" out=EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): PERFORMANCE DETAILS;
MPRINT(EM_HPFST_SCORE): run;
ERROR: Score input variable In_carat not found in the data set.
WARNING: The data set EMWS4.SCORE_SCORE may be incomplete. When this step was stopped there were 0 observations and 0 variables.
WARNING: Data set EMWS4.SCORE_SCORE was not replaced because this step was stopped.
MPRINT(EM_HPFST_SCORE): options validvarname=V7;
MPRINT(EM_HPFST_SCORE): data EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): set EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *Computing Classification Vars: INDEX1;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): length _format200 $200;
MPRINT(EM_DIAGRAM): drop _format200;
MPRINT(EM_DIAGRAM): _format200= ' ' ;
MPRINT(EM_DIAGRAM): length _p_ 8;
MPRINT(EM_DIAGRAM): _p_= 0 ;
MPRINT(EM_DIAGRAM): drop _p_ ;
MPRINT(EM_DIAGRAM): if P_INDEX11 - _p_ > 1e-8 then do ;
MPRINT(EM_DIAGRAM): _p_= P_INDEX11 ;
MPRINT(EM_DIAGRAM): _format200='1';
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): if P_INDEX10 - _p_ > 1e-8 then do ;
MPRINT(EM_DIAGRAM): _p_= P_INDEX10 ;
MPRINT(EM_DIAGRAM): _format200='0';
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): I_INDEX1=dmnorm(_format200,32);
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): length U_INDEX1 8;
MPRINT(EM_DIAGRAM): label U_INDEX1 = 'Unnormalized Into: INDEX1';
MPRINT(EM_DIAGRAM): format U_INDEX1 BEST12.;
MPRINT(EM_DIAGRAM): if I_INDEX1='1' then U_INDEX1=1;
MPRINT(EM_DIAGRAM): if I_INDEX1='0' then U_INDEX1=0;
MPRINT(EM_DIAGRAM): data EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): set EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Model Compare Class;
MPRINT(EM_DIAGRAM): * TYPE: ASSESS;
MPRINT(EM_DIAGRAM): * NODE: MdlComp;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): drop _temp_;
MPRINT(EM_DIAGRAM): if (P_INDEX11 ge 1) then do;
MPRINT(EM_DIAGRAM): _temp_ = dmran(1234);
MPRINT(EM_DIAGRAM): b_INDEX1 = floor(1 + 9*_temp_);
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.99) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 10;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else do;
MPRINT(EM_DIAGRAM): _temp_ = dmran(1234);
MPRINT(EM_DIAGRAM): b_INDEX1 = floor(11 + 10*_temp_);
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Score Node;
MPRINT(EM_DIAGRAM): * TYPE: ASSESS;
MPRINT(EM_DIAGRAM): * NODE: Score;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * Score: Creating Fixed Names;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): LABEL EM_SEGMENT = 'Segment';
MPRINT(EM_DIAGRAM): EM_SEGMENT = b_INDEX1;
MPRINT(EM_DIAGRAM): LENGTH EM_EVENTPROBABILITY 8;
MPRINT(EM_DIAGRAM): LABEL EM_EVENTPROBABILITY = 'Probability for level 1 of INDEX1';
MPRINT(EM_DIAGRAM): EM_EVENTPROBABILITY = P_INDEX11;
MPRINT(EM_DIAGRAM): LENGTH EM_PROBABILITY 8;
MPRINT(EM_DIAGRAM): LABEL EM_PROBABILITY = 'Probability of Classification';
MPRINT(EM_DIAGRAM): EM_PROBABILITY = max( P_INDEX11 , P_INDEX10 );
MPRINT(EM_DIAGRAM): LENGTH EM_CLASSIFICATION
MPRINT(DMNORLEN): $32
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): LABEL EM_CLASSIFICATION = "Prediction for INDEX1";
MPRINT(EM_DIAGRAM): EM_CLASSIFICATION = I_INDEX1;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Input Data Source;
MPRINT(EM_DIAGRAM): * TYPE: SAMPLE;
MPRINT(EM_DIAGRAM): * NODE: Ids;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Metadata Node;
MPRINT(EM_DIAGRAM): * TYPE: UTILITY;
MPRINT(EM_DIAGRAM): * NODE: Meta;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Extension Class;
MPRINT(EM_DIAGRAM): * TYPE: MODEL;
MPRINT(EM_DIAGRAM): * NODE: HPDMForest;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_HPFST_SCORE): options validvarname=V7;
MPRINT(EM_HPFST_SCORE): proc hp4score data=EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): id _ALL_;
MPRINT(EM_HPFST_SCORE): score file="C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\HPDMForest\OUTMDLFILE.bin" out=EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): PERFORMANCE DETAILS;
MPRINT(EM_HPFST_SCORE): run;
ERROR: Score input variable In_carat not found in the data set.
WARNING: The data set EMWS4.SCORE_SCORE may be incomplete. When this step was stopped there were 0 observations and 0 variables.
WARNING: Data set EMWS4.SCORE_SCORE was not replaced because this step was stopped.
MPRINT(EM_HPFST_SCORE): options validvarname=V7;
MPRINT(EM_HPFST_SCORE): data EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): set EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *Computing Classification Vars: INDEX1;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): length _format200 $200;
MPRINT(EM_DIAGRAM): drop _format200;
MPRINT(EM_DIAGRAM): _format200= ' ' ;
MPRINT(EM_DIAGRAM): length _p_ 8;
MPRINT(EM_DIAGRAM): _p_= 0 ;
MPRINT(EM_DIAGRAM): drop _p_ ;
MPRINT(EM_DIAGRAM): if P_INDEX11 - _p_ > 1e-8 then do ;
MPRINT(EM_DIAGRAM): _p_= P_INDEX11 ;
MPRINT(EM_DIAGRAM): _format200='1';
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): if P_INDEX10 - _p_ > 1e-8 then do ;
MPRINT(EM_DIAGRAM): _p_= P_INDEX10 ;
MPRINT(EM_DIAGRAM): _format200='0';
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): I_INDEX1=dmnorm(_format200,32);
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): length U_INDEX1 8;
MPRINT(EM_DIAGRAM): label U_INDEX1 = 'Unnormalized Into: INDEX1';
MPRINT(EM_DIAGRAM): format U_INDEX1 BEST12.;
MPRINT(EM_DIAGRAM): if I_INDEX1='1' then U_INDEX1=1;
MPRINT(EM_DIAGRAM): if I_INDEX1='0' then U_INDEX1=0;
MPRINT(EM_DIAGRAM): data EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): set EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Model Compare Class;
MPRINT(EM_DIAGRAM): * TYPE: ASSESS;
MPRINT(EM_DIAGRAM): * NODE: MdlComp;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): drop _temp_;
MPRINT(EM_DIAGRAM): if (P_INDEX11 ge 1) then do;
MPRINT(EM_DIAGRAM): _temp_ = dmran(1234);
MPRINT(EM_DIAGRAM): b_INDEX1 = floor(1 + 9*_temp_);
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.99) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 10;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else do;
MPRINT(EM_DIAGRAM): _temp_ = dmran(1234);
MPRINT(EM_DIAGRAM): b_INDEX1 = floor(11 + 10*_temp_);
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Score Node;
MPRINT(EM_DIAGRAM): * TYPE: ASSESS;
MPRINT(EM_DIAGRAM): * NODE: Score;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * Score: Creating Fixed Names;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): LABEL EM_SEGMENT = 'Segment';
MPRINT(EM_DIAGRAM): EM_SEGMENT = b_INDEX1;
MPRINT(EM_DIAGRAM): LENGTH EM_EVENTPROBABILITY 8;
MPRINT(EM_DIAGRAM): LABEL EM_EVENTPROBABILITY = 'Probability for level 1 of INDEX1';
MPRINT(EM_DIAGRAM): EM_EVENTPROBABILITY = P_INDEX11;
MPRINT(EM_DIAGRAM): LENGTH EM_PROBABILITY 8;
MPRINT(EM_DIAGRAM): LABEL EM_PROBABILITY = 'Probability of Classification';
MPRINT(EM_DIAGRAM): EM_PROBABILITY = max( P_INDEX11 , P_INDEX10 );
MPRINT(EM_DIAGRAM): LENGTH EM_CLASSIFICATION
MPRINT(DMNORLEN): $32
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): LABEL EM_CLASSIFICATION = "Prediction for INDEX1";
MPRINT(EM_DIAGRAM): EM_CLASSIFICATION = I_INDEX1;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Input Data Source;
MPRINT(EM_DIAGRAM): * TYPE: SAMPLE;
MPRINT(EM_DIAGRAM): * NODE: Ids;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Metadata Node;
MPRINT(EM_DIAGRAM): * TYPE: UTILITY;
MPRINT(EM_DIAGRAM): * NODE: Meta;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Extension Class;
MPRINT(EM_DIAGRAM): * TYPE: MODEL;
MPRINT(EM_DIAGRAM): * NODE: HPDMForest;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_HPFST_SCORE): options validvarname=V7;
MPRINT(EM_HPFST_SCORE): proc hp4score data=EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): id _ALL_;
MPRINT(EM_HPFST_SCORE): score file="C:\Users\yi123\OneDrive\Documents\My SAS Files\9.4\DIAMOND\Workspaces\EMWS4\HPDMForest\OUTMDLFILE.bin" out=EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): PERFORMANCE DETAILS;
MPRINT(EM_HPFST_SCORE): run;
ERROR: Score input variable In_carat not found in the data set.
WARNING: The data set EMWS4.SCORE_SCORE may be incomplete. When this step was stopped there were 0 observations and 0 variables.
WARNING: Data set EMWS4.SCORE_SCORE was not replaced because this step was stopped.
MPRINT(EM_HPFST_SCORE): options validvarname=V7;
MPRINT(EM_HPFST_SCORE): data EMWS4.Score_SCORE;
MPRINT(EM_HPFST_SCORE): set EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *Computing Classification Vars: INDEX1;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): length _format200 $200;
MPRINT(EM_DIAGRAM): drop _format200;
MPRINT(EM_DIAGRAM): _format200= ' ' ;
MPRINT(EM_DIAGRAM): length _p_ 8;
MPRINT(EM_DIAGRAM): _p_= 0 ;
MPRINT(EM_DIAGRAM): drop _p_ ;
MPRINT(EM_DIAGRAM): if P_INDEX11 - _p_ > 1e-8 then do ;
MPRINT(EM_DIAGRAM): _p_= P_INDEX11 ;
MPRINT(EM_DIAGRAM): _format200='1';
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): if P_INDEX10 - _p_ > 1e-8 then do ;
MPRINT(EM_DIAGRAM): _p_= P_INDEX10 ;
MPRINT(EM_DIAGRAM): _format200='0';
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): I_INDEX1=dmnorm(_format200,32);
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): length U_INDEX1 8;
MPRINT(EM_DIAGRAM): label U_INDEX1 = 'Unnormalized Into: INDEX1';
MPRINT(EM_DIAGRAM): format U_INDEX1 BEST12.;
MPRINT(EM_DIAGRAM): if I_INDEX1='1' then U_INDEX1=1;
MPRINT(EM_DIAGRAM): if I_INDEX1='0' then U_INDEX1=0;
MPRINT(EM_DIAGRAM): data EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): set EMWS4.Score_SCORE;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Model Compare Class;
MPRINT(EM_DIAGRAM): * TYPE: ASSESS;
MPRINT(EM_DIAGRAM): * NODE: MdlComp;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): drop _temp_;
MPRINT(EM_DIAGRAM): if (P_INDEX11 ge 1) then do;
MPRINT(EM_DIAGRAM): _temp_ = dmran(1234);
MPRINT(EM_DIAGRAM): b_INDEX1 = floor(1 + 2*_temp_);
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.9997771769767) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 3;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.9977625955933) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 4;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.99183813999439) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 5;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.98240546793376) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 6;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.97804472277529) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 7;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.95868068687359) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 8;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.73234250117679) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 9;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.46329218954741) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 10;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.28697574351841) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 11;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.1529078992291) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 12;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.07757857005975) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 13;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.04055316338619) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 14;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.02699968711616) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 15;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.02117164257023) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 16;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.01749949698189) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 17;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.01338219006409) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 18;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else if (P_INDEX11 ge 0.00527180239032) then do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 19;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): else do;
MPRINT(EM_DIAGRAM): b_INDEX1 = 20;
MPRINT(EM_DIAGRAM): end;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * TOOL: Score Node;
MPRINT(EM_DIAGRAM): * TYPE: ASSESS;
MPRINT(EM_DIAGRAM): * NODE: Score;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): * Score: Creating Fixed Names;
MPRINT(EM_DIAGRAM): *------------------------------------------------------------*;
MPRINT(EM_DIAGRAM): LABEL EM_SEGMENT = 'Segment';
MPRINT(EM_DIAGRAM): EM_SEGMENT = b_INDEX1;
MPRINT(EM_DIAGRAM): LENGTH EM_EVENTPROBABILITY 8;
MPRINT(EM_DIAGRAM): LABEL EM_EVENTPROBABILITY = 'Probability for level 1 of INDEX1';
MPRINT(EM_DIAGRAM): EM_EVENTPROBABILITY = P_INDEX11;
MPRINT(EM_DIAGRAM): LENGTH EM_PROBABILITY 8;
MPRINT(EM_DIAGRAM): LABEL EM_PROBABILITY = 'Probability of Classification';
MPRINT(EM_DIAGRAM): EM_PROBABILITY = max( P_INDEX11 , P_INDEX10 );
MPRINT(EM_DIAGRAM): LENGTH EM_CLASSIFICATION
MPRINT(DMNORLEN): $32
MPRINT(EM_DIAGRAM): ;
MPRINT(EM_DIAGRAM): LABEL EM_CLASSIFICATION = "Prediction for INDEX1";
MPRINT(EM_DIAGRAM): EM_CLASSIFICATION = I_INDEX1;
MPRINT(EM_DIAGRAM): run;
*------------------------------------------------------------*
*
* ERROR: Run time error was encountered. The system error returned was -S-.
* Please report unresolved problems to Technical Support.
*
*------------------------------------------------------------*
MPRINT(EM_DIAGRAM): proc printto;
MPRINT(EM_DIAGRAM): run;

[FreelanceReinh]

Hi @Wei_tamu and welcome to the SAS Support Communities!

The following error message occurs five times in your log:

ERROR: Score input variable In_carat not found in the data set.

My interpretation is: Variable In_carat is a model variable in OUTMDLFILE.bin, but PROC HP4SCORE cannot find this variable in the input dataset EMWS4.Score_SCORE and hence fails. Possible reason: You use EMWS4.Score_SCORE both as input and output dataset of the procedure, i.e., the input dataset will be overwritten if the procedure runs successfully. In the "Getting started" example in the documentation it looks like the output dataset has a different structure than the input dataset. In particular, it doesn't seem to contain the model variables. (I cannot test this because I don't have a licence for EM.)

I'd use a different dataset name in the OUT= option of PROC HP4SCORE and make sure that In_carat is contained in EMWS4.Score_SCORE.