$type = "S";

##</code><code>##

$PP=$PP+1;

##</code><code>##

$PP++;