SeanHoppe.com > CLEO Tips > Cleo EDI Integrator > EDI Integrator - Inbound 830 RPGLE Report

EDI Integrator - Inbound 830 RPGLE Report

16th November 2013

When an inbound 830 document is received we can use an EXTOL Integrator Message Class (TPMC) Exit Point CL to call an RPGLE program to create/email report.

This is a useful utility when capturing/processing an inbound 830 is not possible.

Inbound EDI TPMC exit point CL

Inbound EDI 830 RPGLE report program





Copyright 2013 @ www.seanhoppe.com


By: on
load('http://www.seanhoppe.com/EXTOL-Blog-Feed2/'); $feed2 = array(); foreach ($rss2->getElementsByTagName('item') as $node2) { $item2 = array ( 'title' => $node2->getElementsByTagName('title')->item(0)->nodeValue, 'desc' => $node2->getElementsByTagName('description')->item(0)->nodeValue, 'link' => $node2->getElementsByTagName('link')->item(0)->nodeValue, 'date' => $node2->getElementsByTagName('pubDate')->item(0)->nodeValue, ); array_push($feed2, $item2); } $limit2 = 5; $rss3 = new DOMDocument(); $rss3->load('http://www.ebithree.com/EBIThree-RSS/'); $feed3 = array(); foreach ($rss3->getElementsByTagName('item') as $node3) { $item3 = array ( 'title' => $node3->getElementsByTagName('title')->item(0)->nodeValue, 'link' => $node3->getElementsByTagName('link')->item(0)->nodeValue, ); array_push($feed3, $item3); } $limit3 = 5; $rss4 = new DOMDocument(); //$rss4->load('http://www.ebithree.com/EBIThree-RSS/'); $rss4->load('http://www.ebiworld.com/EBI-Feed/'); $feed4 = array(); foreach ($rss4->getElementsByTagName('item') as $node4) { $item4 = array ( 'title' => $node4->getElementsByTagName('title')->item(0)->nodeValue, 'link' => $node4->getElementsByTagName('link')->item(0)->nodeValue, ); array_push($feed4, $item4); } $limit4 = 5; echo ' '; ?>