// version 1.0.0 14Feb2018
import com.stata.sfi.*;
public class MyListJava {
    public static int myListJW(String[] args) {

// line will be displayed by Stata
        String line  ;

// Get number of variables in varlist specified to javacall
        int  nVariables = Data.getParsedVarCount();
// Get first observation specified by an in restriction
        long firstObs   = Data.getObsParsedIn1();
// Get last observation specified by an in restriction
        long lastObs    = Data.getObsParsedIn2();

// counter for numerber of obs in sample
        long nObs            = 0 ;
// Loop over observations
        for (long obs = firstObs; obs <= lastObs; obs++) {
            if (!Data.isParsedIfTrue(obs)) {
                        continue;
            }
// Increment counter
	    ++nObs ;
            line = "" ;
// Loop over variables
            for (int j = 1; j <= nVariables; j++) {   
                int varIndex = Data.mapParsedVarIndex(j);
                double value = Data.getNum(varIndex, obs);
                if (Data.isValueMissing(value)) {
                    line = "missing values encountered" ;
                    SFIToolkit.errorln(line);
                    return(416) ;
                }
                line += String.format("   %9s", 
                    SFIToolkit.formatValue(value,  "%9.0g") );
            }
            SFIToolkit.displayln(line);
        }
        SFIToolkit.displayln("First observation was             " + firstObs) ;
        SFIToolkit.displayln("Last observation was              " + lastObs) ;
        SFIToolkit.displayln("Number of observations listed was " + nObs) ;

        return(0) ; 
    }
}