MPE::File MPE::File is a Perl extension for accessing MPE File intrinsics.
Download

MPE::File Ranking & Summary

MPE::File Tags

Perl module perl library MPE access MPE intrinsics MPE

MPE::File Description

MPE::File is a Perl extension for accessing MPE File intrinsics. MPE::File is a Perl extension for accessing MPE File intrinsics.SYNOPSIS use MPE::File; $file = MPE::File->new("FRED.PUB,old;acc=in") or die "Cannot open FRED.PUB: $MPE_errorn"; OR $file = MPE::File->hpfopen(2, "FRED.PUB", 3, 1, 11, 0) or die "Cannot open FRED.PUB: $MPE_errorn"; OR $file = MPE::File->fopen("FRED.PUB", 1, 0) or die "Cannot open FRED.PUB: $MPE_errorn"; $rec = $file->readrec(); # use this instead of fread $rec = $file->freadbykey($key, $keyloc); $rec = $file->freadlabel( ); $rec = $file->freaddir($lrecnum); $rec = $file->freadc(); $file->fread($buffer, $bufsize); $file->writerec($buffer, ) # use this instead of fwrite # (do not include 'n' at end of rec) $file->print($a, $b, $c); $file->printf($fmt, $a, $b, $c); # (do not include 'n' at end of rec) $file->fupdate($buffer); $file->fwritedir($buffer, $lrecnum); $file->fwritelabel ($buffer, ) $file->fwrite($buffer, $length, $controlcode) $file->fpoint($lrecnum); $file->fcontrol($itemnum, $item); $file->fdelete( ); $file->fsetmode($modeflags); $file->fremove(); $file->fgetkeyinfo($param, $control); $file->ffindbykey($value, $location, $length, $relop); $file->printfileinfo(); $rec = $file->iowait(); or $rec =iowait(0); then call lastwaitfilenum() to get file number $rec->mpe_fileno You'll need this to compare with lastwaitfilenum() mpeprint("rec"); Calls MPE intrinsic PRINT() (Perl print does not work right if stdout is circular file, msg file, ...) printop($msg); $rec = printopreply($msg); @info = $file->ffileinfo(1, 3, 7, 9); @info = flabelinfo("FRED.PUB", $mode, 1, 3, 7, 9); If there is an error, an empty list is returned and you can check $MPE_error and @MPE::File::itemerror for the error $errmsg = ferrmsg($fserrcode); hperrmsg($displaycode,...) Requirements: · Perl

MPE::File Related Software