I don't understand what is this step: "The script gained from creating the table manually does not create a data table but a Life Distribution."
Here is an example of steps to get Pseudo Failure using scripting and get Survival Plot.
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Reliability/GaAs Laser.jmp" );
obj = dt << Degradation(
Y( :Current ),
Time( :Hours ),
Label( :Unit ),
Model Report(
Simple Linear Path( X Scale( Linear ), Y Scale( Linear ), Intercept( Common ), Slope( Different ) )
)
);
obj << Show Fitted Lines( 1 );
obj << Set Upper Spec Limit( 10 );//set pseudo failure threshold
pfailures = obj << Save Crossing Time;//get pseudo failure data in table
pobj = pfailures << run script("Life Distribution");//run the embedded script to analyze pseudo failure data
pobj << Show Survival Curve;//turn failure distribution curve to survival curve