//
//Meta word(Language)  
//Set script varialbe Meta word.
//
//Quation 
//If set script variable, use extend function.
// 

//Syntax Set script varialbe
extend(name,varialbe);

//Syntax Call
variable=?name;

//
//Example
//

//Read data which is ancate of promotion of home.
Get dmdat500R.csv@;


//Define target variabele as probabilty level 0 or 1;
if(def == "good") {
  flag=1;
}
else {
  flag=0;
}





//Logit regression
logit flag by workspan homespan income amount;

 
//Get output of analysis
get freq@ana;

//Sort probability by descending
select flag pd;
sort -pd;

//Sumation of bad flag
accume bad;
bad=flag;


//Execution use expand Meta variable line no and sum of bad flag at last record.
if(# == LAST) {
  extend(alls,#);
  extend(defs,bad);
}

//Use Meta expand variable to calucurate effeciency by each reacod.
r_all=#/?alls;
r_bad=bad/?defs;

//View Effeciency of logit regression
plot line r_bad by r_all;