zOs/SQL/BIPLALS3
$#@
$=dbSys=dbaf
call sqlConnect $dbSys
$;
$<A540769.WK.SQL(BIPLALS2)
$@for li $@[
col = word($li, 1)
call sqlExecute 1, 'insert into oa1p.tBiPlanCol' ,
"(col, installFr) values ('"col"', '01.01.2000')"
$]
call sqlCommit
call sqlDisconnect
$#out 20130531 08:11:27
$#out 20130531 08:10:35
*** run error ***
SQLCODE = -803: AN INSERTED OR UPDATED VALUE IS INVALID
BECAUSE INDEX IN INDEX SPACE IBIPLANC CONSTRAINS COLUMNS OF THE
TABLE SO NO TWO ROWS CAN CONTAIN DUPLICATE VALUES IN THOSE COLUMNS.
RID OF EXISTING ROW IS X'0000000201'.
stmt = insert into oa1p.tBiPlanCol (col, installFr) values ('COL', '01.01.2000')
$#out 20130531 08:09:34
*** run error ***
SQLCODE = -517: CURSOR C1 CANNOT BE USED BECAUSE ITS
STATEMENT NAME DOES NOT IDENTIFY A PREPARED SELECT STATEMENT
stmt = open c1
$#out 20130531 08:08:42
*** run error ***
SQLCODE = -204: OA1P.TBIPLACOL IS AN UNDEFINED NAME
stmt = prepare s1 into :M.SQL.1.D from :src
with into :M.SQL.1.D = M.SQL.1.D
from :src = insert into oa1p.tBiPlaCol (col, installFr) values ('COL', '01.
$#out 20130531 08:08:26
*** run error ***
SQLCODE = -204: OA1P.TBIPLACOL IS AN UNDEFINED NAME
stmt = prepare s1 into :M.SQL.1.D from :src
with into :M.SQL.1.D = M.SQL.1.D
from :src = insert into oa1p.tBiPlaCol (col, installFr) values ('COL', '01.
$#out 20130531 08:08:05
*** run error ***
SQLCODE = -104: ILLEGAL SYMBOL "'COL'". SOME SYMBOLS THAT
MIGHT BE LEGAL ARE: SELECT (
src insert into oa1p.tBiPlaCol (col, installFr) ('COL', '01.01.2000')
> >>>pos 46 of 65>>>
stmt = prepare s1 into :M.SQL.1.D from :src
with into :M.SQL.1.D = M.SQL.1.D
from :src = insert into oa1p.tBiPlaCol (col, installFr) ('COL', '01.01.2000
$#out 20130531 08:06:59
*** run error ***
no class found for object insert into oa1p.tBiPlaCol (col, installFr) ('COL', '0
$#out 20130531 07:55:59