Back

Create OE Shipment + Invoice

OESHIH, OESHID, OETERMS, OECOINS, OESHIR, OESHIHO, OESHIDL, OESHIDS, OESHIDO, OESHIDD, OESHIDDS, OESHIDDL, OESHIDB, OESHIH, OESHID, OECOINS, OETERMS, OESHIR, OESHIHO, OESHID, OESHIH, OESHIDO, OESHIDB, OESHIDD, OESHIDS, OESHIDL, OETERMS, OESHIH, OECOINS, OESHIH, OESHID, OESHIR, OESHIH, OESHIHO, OESHIH, OESHIDL, OESHID, OESHIDS, OESHID, OESHIDO, OESHID, OESHIDD, OESHID, OESHIDDS, OESHIDDL, OESHIDDS, OESHIDD, OESHIDDL, OESHIDD, OESHIDB, OESHID, OESHIH, OESHID, OESHIH, OESHIH, OESHIH, OESHIH, OESHIH, OESHIH, OESHIH, OESHIH, OESHIH, OESHIH, OESHID, OESHID, OESHID, OESHID, OESHID, OESHID, OESHID, OESHID, OESHID, OESHID, OESHID, OESHID, OESHID, OESHID, OESHID, OESHIH, OESHIH, OESHIH, OESHIH, OESHIH

---

  // TODO: To increase efficiency, comment out any unused DB links.
using(HuAPConnection Connection = new HuAPConnection())
using(HuView OESHIH = Connection.GetView("OE0692"))
using(HuView OESHID = Connection.GetView("OE0691"))
using(HuView OETERMS = Connection.GetView("OE0745"))
using(HuView OECOINS = Connection.GetView("OE0190"))
using(HuView OESHIR = Connection.GetView("OE0694"))
using(HuView OESHIHO = Connection.GetView("OE0704"))
using(HuView OESHIDL = Connection.GetView("OE0708"))
using(HuView OESHIDS = Connection.GetView("OE0709"))
using(HuView OESHIDO = Connection.GetView("OE0702"))
using(HuView OESHIDD = Connection.GetView("OE0703"))
using(HuView OESHIDDS = Connection.GetView("OE0706"))
using(HuView OESHIDDL = Connection.GetView("OE0707"))
using(HuView OESHIDB = Connection.GetView("OE0705"))
{
	OESHIH.Compose(OESHID,null,OECOINS,OETERMS,OESHIR,OESHIHO);
	OESHID.Compose(OESHIH,null,OESHIDO,OESHIDB,OESHIDD,OESHIDS,OESHIDL);
	OETERMS.Compose(OESHIH);
	OECOINS.Compose(OESHIH,OESHID);
	OESHIR.Compose(OESHIH);
	OESHIHO.Compose(OESHIH);
	OESHIDL.Compose(OESHID,null);
	OESHIDS.Compose(OESHID,null);
	OESHIDO.Compose(OESHID);
	OESHIDD.Compose(OESHID,OESHIDDS,null,OESHIDDL);
	OESHIDDS.Compose(OESHIDD,null);
	OESHIDDL.Compose(OESHIDD,null);
	OESHIDB.Compose(OESHID);
	OESHIH["DRIVENBYUI"] = "1";  // Driven by UI
	OESHID["DRIVENBYUI"] = "1";  // Driven by UI
	OESHIH.Cancel();
	OESHIH.Init();
	OESHIH["PROCESSCMD"] = "1";  // Process OIP Command
	OESHIH.Process();
	OESHIH["CUSTOMER"] = "1200";  // Customer Number
	OESHIH["PROCESSCMD"] = "1";  // Process OIP Command
	OESHIH.Process();
	OESHIH["ORDNUMBER"] = "ORD000000000069";  // Order Number
	OESHIH["SHIP1ORDER"] = "1";  // Generate Ship. from Single Order
	OESHIH.Process();
	OESHID["LINENUM"] = "-1";  // Line Number
	OESHID["LINENUM"] = "-1";  // Line Number
	OESHID.Read();
	OESHID["QTYSHIPPED"] = "5.0000";  // Quantity Shipped
	OESHID.Update();
	OESHID["LINENUM"] = "-1";  // Line Number
	OESHID.Read();
	OESHID["QTYSHIPPED"] = "3.0000";  // Quantity Shipped
	OESHID.Update();
	OESHID["LINENUM"] = "-2";  // Line Number
	OESHID.Read();
	OESHID["QTYSHIPPED"] = "2.0000";  // Quantity Shipped
	OESHID.Update();
	OESHID["LINENUM"] = "-2";  // Line Number
	OESHID.Read();
	OESHIH["CREATEINV"] = "1";  // Create Invoice from Shipment
	OESHIH["OECOMMAND"] = "4";  // Process O/E Command
	OESHIH.Process();
	OESHIH.Insert();
	OESHIH.Read();
}

---