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

Excellent question, I'll check that out! That might explain the null
response. The part that has us a bit confused is on the development box
this code works, in the production deployment it does not work.

I will go back and check the quotes to be sure.

An earlier suggestion that I check plugsize did not pan out to be the
problem.

Jim Oberholtzer
Chief Technical Architect
Agile Technology Architects

On 6/4/13 4:13 PM, Paul Therrien wrote:

>*This message was transferred with a trial version of CommuniGate(r) Pro*
>Do the single quotes need to surround the $cmdString?
>It doesn't appear that the $cmdString value has the single quotes embedded in it.
>
>
>Paul
>
>-----Original Message-----
>From:web400-bounces@xxxxxxxxxxxx [mailto:web400-bounces@xxxxxxxxxxxx] On Behalf Of Jim Oberholtzer
>Sent: Tuesday, June 04, 2013 2:55 PM
>To: Web Enabling the AS400 / iSeries
>Subject: [WEB400] Error on QSH call that I can't figure out
>
>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)
>

--