Length of stmt on RUNSQL

V7R3:



According to IBM Wiki Run SQL (RUNSQL) - new command



"In other SQL interfaces, an SQL statement is limited to 2MB in length. The limit on this command is 5000 bytes."



I tried to stick a RUNSQL into a CLLE, it is big but nowhere near 5000 bytes.



When I tried to run it I got:



2 > call dehdev/apartwo

6400 - RUNSQL STMT('Create Table qtemp.apar02 AS (select DRDL02 "Network

ID", pran8 "Vendor Number", ABALPH "name", prkcoo "Company Number",

prdoco "PO Number", prdcto "Order Type", prsfxo "Order Suffix", prlnid

"Line Number", prnlin "Nbr of Lines", prrtby "Written by Program",

pritm "Item Number", prlocn "Location", prvrmk "Supplier Remark",

date(digits(decimal(PRtrdj+1900000,7,0))) "Order Date",

date(digits(decimal(prrcdj+1900000,7,0))) "Receipt Date", prvinv

"Invoice Number", prlnty "Line Type",

Value 'Create Tab' for STMT exceeds 1045 characters.



This is the entire 'thing':
VAR(&CLAWZ) VALUE('select DRDL02 "Network +
ID", pran8 "Vendor Number", ABALPH +
"name", prkcoo "Company Number", prdoco +
"PO Number", prdcto "Order Type", prsfxo +
"Order Suffix", prlnid "Line Number", +
prnlin "Nbr of Lines", prrtby "Written +
by Program", pritm "Item Number", prlocn +
"Location", prvrmk "Supplier Remark", +
date(digits(decimal(PRtrdj+1900000,7,0))) +
"Order Date", +
date(digits(decimal(prrcdj+1900000,7,0)))
"Receipt Date", prvinv "Invoice Number", +
prlnty "Line Type", prmcu "Business +
Unit", prco "Company", praid "Account +
ID", prani "Account Number", prsub +
"Subsidiary", prsbl "Subledger", prsblt +
"Subledger Type", prkco "Document +
Company", prdoc "Voucher Number", prdct +
"Document Type", +
date(digits(decimal(PRDGL+1900000,7,0))) +
"G/L Date", prprrc "Unit Cost", praopn +
"Amount Open", prarec "Amount Received", +
praclo "Amount Closed", pravco "Average +
Cost Difference", prvarc "Cost Variance", +
pruser "User ID", prpid "Program ID", +
prjobn "Work Station ID", prterm +
"Terminal ID", +
date(digits(decimal(PRupmj+1900000,7,0))) +
"Date Updated", prtday "Time Updated" +
from f43121 join F0101 on PRAN8 = ABAN8 +
join F0005 on DRSY = ''01'' and DRRT = +
''16'' and DRKY = '' '' || ABAC16 +
where prmatc = ''2'' and prpid = +
''P4314'' and PRDGL between 119210 and +
119210 order by DRDL02, pran8, prkcoo, +
prdoco ')

I cannot determine where I have gone wrong, but I have obviously.

Thanks in advance for any insights.

Thanks & Regards,
Danny Hayes
IT-Developer
Genuine Parts Company, APG IT
[APGIT_EmailHeader]
3100 Windy Hill Road
Atlanta, Georgia 30339
mailto:Danny_Hayes@xxxxxxxxx
(904) 502-2969

"People will forget what you said, people will forget what you did, but people will never forget how you made them feel." - Maya Angelou





"This email and any attachments, contain Genuine Parts Company confidential information that is proprietary, privileged, and protected by applicable laws. If you have received this message in error and are not the intended recipient, you should not retain, distribute, disclose or use any of this information and you should destroy this email, any attachments or copies therein forthwith. Please notify the sender immediately by email if you have received this email in error."