Re: Error on QSH call that I can't figure out

[Jim Oberholtzer <midrangel@xxxxxxxxxxxxxxxxx>]

Most of the spool files we are after are under a page in length, but 
I'll check out that parameter.

Thanks.

Jim Oberholtzer
Chief Technical Architect
Agile Technology Architects

On 6/4/13 3:12 PM, Bdietz400 wrote:
> Is it a large spool file?  I had the similar problem when I played around with my php-wrksplf and changed it to use the toolkit.
>
> I had to change the "plugsize" to a larger value.
>
> Look toward the bottom.
> http://174.79.32.155/wiki/index.php/XMLService/XMLSERVICEFaster
>
>
>
> --
> Bryan
>
>
> On Jun 4, 2013, at 3:54 PM, Jim Oberholtzer<midrangel@xxxxxxxxxxxxxxxxx>  wrote:
>
> > >Folks:  In the following code (PHP), we are attempting to pull in a
> > >spool file into the variable $result so we can format it and put it up
> > >on a web page.  If we run the command via the PHP code we get a null in
> > >$result.  If we run the command ( signed on as the same user ) from the
> > >command line it works.
> > >
> > >QSH CMD('catsplf -j 026555/KATTANASIO/H512D QPJOBLOG 2')
> > >
> > >I checked to see if the user profile had *SPLCTL and it does.
> > >
> > >Any Idea what might be going on?
> > >
> > >
> > >function i5_spool_get_data($spoolName, $jobName, $userName, $jobNumber,
> > >$spoolNumber, $fileName = '', $connection = null)
> > >{
> > >     if (!$connection = verifyConnection($connection)) {
> > >         return false;
> > >     }
> > >
> > >     if (!is_numeric($spoolNumber)) {
> > >         // could be *NEXT or other misguided parameter. Use a '1' for
> > >compatibility.
> > >         $connection->logThis("Spool file number value '$spoolNumber' is
> > >unsupported. Please supply a number. The value '1' will be used.");
> > >         $spoolNumber = 1;
> > >     }
> > >
> > >    $cmdString = "catsplf -j {$jobNumber}/{$userName}/{$jobName}
> > >{$spoolName} {$spoolNumber}";
> > >**********************
> > >call making the trouble below!
> > >************************
> > >     //full command will look like "QSH CMD('catsplf -j
> > >{$jobNumber}/{$userName}/{$jobName} {$spoolName} {$spoolNumber}')";
> > >     $result = $connection->qshellCommand($cmdString);
> > >
> > >     // if no error, we expect an array.
> > >     if (is_array($result)) {
> > >         // consolidate into a string with 0D0A separators
> > >         $resultString = trim(implode("\r\n", $result));
> > >
> > >         // if fileName provided, try to write data to the IFS file
> > >(return true if successful or false).
> > >         // otherwise simply return the string.
> > >         if ($fileName) {
> > >
> > >             $bytesWritten = file_put_contents($fileName, $resultString);
> > >             if ($bytesWritten) {
> > >                 // good! Wrote OK
> > >                 return true;
> > >             } else {
> > >                 // bad! Could not write file. Old toolkit used CPF9898
> > >so let's also use it.
> > >                 i5CpfError('CPF9898', "Could not write to file
> > >'$fileName'.");
> > >                 return false;
> > >             } //(if bytesWritten)
> > >
> > >
> > >         } else {
> > >             // no IFS filename provided. Return string to caller.
> > >             return $resultString;
> > >         } //(if $fileName)
> > >
> > >     } else {
> > >         // not an array. Probably a "false."
> > >         // Report the error.
> > >         $errMsg = $connection->getErrorMsg();
> > >         if (empty($errMsg)) {
> > >             $errMsg = 'Could not read spooled file. Check user
> > >permissions or see error code for details.';
> > >         }
> > >         i5CpfError($connection->getErrorCode(), $errMsg);
> > >         return false;
> > >     } //(if is_array)
> > >
> > >
> > >} //(i5_spool_get_data)
> > >
> > >-- 
> > >
> > >Jim Oberholtzer
> > >Chief Technical Architect
> > >Agile Technology Architects
> > >