so what is implied about "not present"?
Hi what I mean is that the field has not been included in the dds of the logical file
Thanks
Basilio MERLINO
Phone: +39-0690808577
Mobile: +39-3484152040
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of CRPence
Sent: giovedì 27 giugno 2013 16:45
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Trigger Issue
On 27 Jun 2013 07:52, Merlino, Basilio wrote:
Recently I've created SQL Triggers to record changes to the order
file. Trigger definition is:
create trigger ithttpobj/updtcord0f after update of dmcsck on
ibm_dat/snord0f referencing OLD row as r1 NEW row as r2 for each row
mode db2sql when (r1.dmcsck<>r2.dmcsck) insert into
ithttpdat/tcord0f(ORNORDINE , ORCDEALER , ordcancel , orfinvio ,
ordinvio) values(r1.DMFSCK , r1.dmcsck , current date ,
char('N') , char('0001-01-01') )
In some case I get an error that I haven't been able to figure out how
to solve.
Member QTRG000001 already exists in file QTRG000001 in library QTEMP.
SQL system error.
msgSQL0901 T/QDBUDR x/076C
Function check. SQL0901 unmonitored by QDBUDR at statement *N,
instruction X'076C'.
msgCPF9999 rcSQL0901
Failure for device or member SNORDLCK file SNORDLCK in library IBM_DAT
msgCPF5257 f/??? t/???
CPF5257 I/O error was detected in SNORDLCK
msgCPF????
The only "strange thing" is that in the logical file SNORDLCK the
field DMCSCK refer to the trigger update is not present
Huh? No DDL [nor DDS] was provided for any files, neither physical nor logical, but the "field DMCSCK is clearly referred to in the UPDATE trigger... so what is implied about "not present"?
Anybody have suggestions.
And this is related to RPG... How? My first suggestion would be to have not posted the discussion to a forum dedicated to RPG :-) My second suggestion is to report the issue to your service provider.
In the following thread I had a means to recreate what is probably the /same/ [likely defect] error, using some details provided by the OP in that thread. However I had stopped followup, after I encountered storage issues with my profile on the system I was using. Maybe I will look at that again, and finally generate my re-create script... so someone can submit that to IBM. Anyhow, read from that message of mine until the end of the thread to see if the origin of your issue might be similar to Michael's:
http://archive.midrange.com/midrange-l/201304/threads.html#00550
p.s. You may notice the "-- " followed by a newline in my message.
If your /signature line/ is followed by those same undelimited string of dash-dash-space-cr-lf characters, then that very long "confidentiality notice" will not be copied into the archived messages as seen here:
http://archive.midrange.com/rpg400-l/201306/msg00337.html
--
Regards, Chuck
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
***********************************************************************************************************
CONFIDENTIALITY NOTICE
This message is for the named person's use only. It may contain confidential, proprietary or legally privileged information.
If you receive this message in error, please immediately delete it and all copies of it from your system, destroy any hard copies of it and notify us by email to email.security@xxxxxxxxxxxxxxxxx with a copy of this message. You must not, directly or indirectly, use, disclose, distribute, print or copy any part of this message if you are not the intended recipient. NISSAN EUROPE and any of its subsidiaries each reserves the right to monitor all e-mail communications through its networks.
NISSAN EUROPE is neither liable for the proper, complete transmission of the information contained in this communication nor any delay in its receipt. This email was scanned for the presence of computer viruses. In the unfortunate event of infection NISSAN EUROPE does not accept liability.
Any views expressed in this message are those of the individual sender, except where the message states otherwise and the sender is authorised to state them.
***********************************************************************************************************
midrange.com
