If you only get the query you use to get it, the usage is limited...
SQL_S00001
SELECT JOB_NAME, AUTHORIZATION_NAME, CLIENT_IP_ADDRESS, ELAPSED_CPU_TIME, ELAPSED_PAGE_FAULT_COUNT,
******** Fin de données ********
-----Message d'origine-----
De : Sean Courtney <scourtney@xxxxxxxxxxx>
Envoyé : mardi 12 septembre 2023 16:17
À : 'RPG programming on IBM i' <rpg400-l@xxxxxxxxxxxxxxxxxx>
Cc : Jean-Marc DUVAL <jean-marc.duval@xxxxxxxxxxx>
Objet : RE: How to retrieve an SQL statement into a variable in SQLRPGLE
ATTENTION : Ce message provient d'une source EXTERNE. Veuillez n'ouvrir les liens ou pièces jointes que si vous êtes sûr de l'expéditeur.
Hi Marc,
Use : QSYS2.ACTIVE_JOB_INFO()
You need to replace the value in JOB_NAME_FILTER with your jobname
SQL_STATEMENT_TEXT contains the SQL'S executed
SELECT JOB_NAME, AUTHORIZATION_NAME, CLIENT_IP_ADDRESS, ELAPSED_CPU_TIME, ELAPSED_PAGE_FAULT_COUNT, ELAPSED_TOTAL_DISK_IO_COUNT, SQL_STATEMENT_TEXT FROM TABLE(QSYS2.ACTIVE_JOB_INFO(JOB_NAME_FILTER =>'your Job name..*', DETAILED_INFO =>'ALL')) WHERE SQL_STATEMENT_TEXT <>' '
ORDER BY ELAPSED_CPU_TIME DESC
Mit freundlichen Grüßen / Kind regards / Bien à vous,
Seán
-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Jean-Marc DUVAL via RPG400-L
Sent: Tuesday, 12 September 2023 15:31
To: rpg400-l@xxxxxxxxxxxxxxxxxx
Cc: Jean-Marc DUVAL <jean-marc.duval@xxxxxxxxxxx>
Subject: How to retrieve an SQL statement into a variable in SQLRPGLE
Hi,
With a view to creating logs for my SQLRPGLE processing, I would like to know if there is a possibility of recovering the text of the query submitted into a character variable.
Thanks for ideas;
Cordialement,
Jean-Marc DUVAL
Pôle développement IT
Développeur IBM i consultant
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
https://urldefense.com/v3/__https://lists.midrange.com/mailman/listinfo/rpg400-l__;!!J76aczzK!07UsCLZF9LCLgn3HCDELo9HwpprkXIC-5XzVYHHK31ssTkjYTgRjvXhEb6gxgV0jsxdRg9LJHNLFTHtdYoToII4aaf-d$
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://urldefense.com/v3/__https://archive.midrange.com/rpg400-l__;!!J76aczzK!07UsCLZF9LCLgn3HCDELo9HwpprkXIC-5XzVYHHK31ssTkjYTgRjvXhEb6gxgV0jsxdRg9LJHNLFTHtdYoToIDTUakgD$ .
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
midrange.com
