for my $acc (@acc) {
...
if ($current_status->{"curr_parent_id"} != 0) {
    print "Refusing to modify the status of demstock $acc. It has already been moved<br>\n";
    next;
}
...