/** * from 8-character *DTS format to 17-character full date and time * * @param $dtsDateTime * @return bool */ public function dtsToYymmdd($dtsDateTime) { $inputFormat = "*DTS"; // special system format, returned by some APIs. $outputFormat = "*YYMD"; // 17 chars long $outputVarname = 'datetimeOut'; $apiPgm = 'QWCCVTDT'; $apiLib = 'QSYS'; $paramXml = "<parm io='in' comment='1. Input format'>\n <data var='formatIn' type='10A' comment='*DTS is system time stamp format'>{$inputFormat}</data>\n </parm>\n <parm io='in' comment='2. Input variable'>\n <data var='datetimeIn' type='8b' comment='*DTS format is type 8b (binary)'>{$dtsDateTime}</data>\n </parm>\n <parm io='in' comment='3. Output format'>\n <data var='formatOut' type='10A' comment='*YYMD means YYYYMMDDHHMMSSmmm (milliseconds)'>{$outputFormat}</data>\n </parm>\n <parm io='out' comment='4. Output variable'>\n <ds var='{$outputVarname}' comment='Data structure, total of 17 bytes, to split date/time into YYYYMMDD, HHMMSS, and microseconds, as indicated by *YYMD format'>\n <data var='date' type='8a' comment='YYYYMMDD' />\n <data var='time' type='6a' comment='HHMMSS' />\n <data var='microseconds' type='3a' comment='microsecs (3 digits)' />\n </ds>\n </parm>\n" . Toolkit::getErrorDataStructXml(5); // param number 5 // pass param xml directly in. $retPgmArr = $this->ToolkitSrvObj->PgmCall($apiPgm, $apiLib, $paramXml); if ($this->ToolkitSrvObj->getErrorCode()) { return false; } $retArr = $retPgmArr['io_param'][$outputVarname]; return $retArr; }
/** * close the list * * @return bool */ public function close() { // call QGYCLST, the "close list" api. $apiPgm = 'QGYCLST'; $apiLib = 'QSYS'; $requestHandle = $this->_requestHandle; $paramXml = "<parm io='in' comment='1. request handle'>\n <data var='requestHandle' comment='Request handle: binary/hex' type='4b'>{$requestHandle}</data>\n </parm>\n" . Toolkit::getErrorDataStructXml(2); // param number 2 // pass param xml directly in. $this->ToolkitSrvObj->PgmCall($apiPgm, $apiLib, $paramXml); // GUI0006 means end of list if ($this->ToolkitSrvObj->getErrorCode()) { return false; } else { return true; } }