SELECT T1.SLCSTN,; T1.SLONO,; T1.SLPTNO,; T1.SLPTD1,; T1.SLORQY,; T1.SLSHQO,; T1.SLSHQS,; T1.SLUNPR,; T1.SLLNST,; T1.SLEXPR,; T1.SLRQDT,; T1.SLPRDT,; T1.SLUNPO,; T1.SLRLNO,; T1.SLUNQY,; T1.SLLNNO,; T2.SHCSPO,; T2.SHORCL,; T2.SHORDT,; T2.SHALBO,; T2.SHSLNM,; T2.SHSLA1,; T2.SHSLA2,; T2.SHSLA3,; T2.SHSLCI,; T2.SHSLST,; T2.SHSLZP,; T2.SHRLNO,; T2.SHSHNM,; T2.SHHLDC,; T2.SHSTCN,; T3.WBBLT1,; T3.WBBLT4,; T3.WBBOSQ,; T3.WBRSOQ,; T4.SLMONO,; T5.HSTDT,; T5.HDUEDT,; T5.HCLSDT,; T6.ACBAC; FROM AADAT80/OP100M2 T1,; AADAT80/OP100M1 T2,; AADAT80/IC140M T3,; AADAT80/EC200M T4,; AADAT80/IC100M T5,; AADAT80/DE100M T6; WHERE T1.SLONO = T2.SHONO; and T1.SLRLNO = T2.SHRLNO; and T1.SLWHS = T3.WBWHNO; AND T1.SLPTNO = T3.WBPPN; and T1.SLONO = T4.SPONO; and T1.SLRLNO = T4.SPRLNO; and T1.SLLNNO = T4.SPLNNO; and T4.SLMONO = T5.HZORNO; and T1.SLPTNO = T6.IZPN; and T1.SLLNST <> 'C' ; and T6.PMPLNT = 'GSO'; ORDER BY T1.SLPTNO,; T1.SLPRDT,; T1.SLONO,; T1.SLRLNO; into cursor NewQuery