Help for this page

Select Code to Download

Select or download this

sub TSM_Enquire {
  my $Record, $Slot, $Type, $Label;
...
  close(IN);
  close(OUT);
}

Select or download this

<snip>
3584LIB1       922ABL        Private        Data        1,036
...
3584LIB1       CLNI88        Cleaner                    1,026
3584LIB1       CLNI89        Cleaner                    1,038
</snip>