From eff9d4b5e6f45d4dae6609cad04feb1e1a4321ff Mon Sep 17 00:00:00 2001 From: Tim Date: Thu, 3 Jul 2025 09:45:47 +0200 Subject: [PATCH 01/15] Changing date --- base/src/lgacdb01.cbl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index 22409bd0..df114620 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -1,7 +1,7 @@ PROCESS SQL ****************************************************************** * * - * (C) Copyright IBM Corp. 2011, 2021 * + * (C) Copyright IBM Corp. 2011, 2022 * * * * ADD Customer Details * * * From 37bf2dcf3c533c06c12acc512ab492fb1903d12e Mon Sep 17 00:00:00 2001 From: Tim Date: Thu, 3 Jul 2025 09:46:45 +0200 Subject: [PATCH 02/15] changing date --- base/src/lgacdb01.cbl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index df114620..3199ce4b 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -1,7 +1,7 @@ PROCESS SQL ****************************************************************** * * - * (C) Copyright IBM Corp. 2011, 2022 * + * (C) Copyright IBM Corp. 2011, 2023 * * * * ADD Customer Details * * * From 1a2f7a222d878aa8a8e27523eec89906ec7bc923 Mon Sep 17 00:00:00 2001 From: Tim Date: Thu, 3 Jul 2025 09:53:27 +0200 Subject: [PATCH 03/15] change --- base/src/lgacdb01.cbl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index 3199ce4b..59f97ba8 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -1,7 +1,7 @@ PROCESS SQL ****************************************************************** * * - * (C) Copyright IBM Corp. 2011, 2023 * + * (C) Copyright IBM Corp. 2011, 2025 * * * * ADD Customer Details * * * From 66199adc5315babb0768d05d1c34511d4ffbd022 Mon Sep 17 00:00:00 2001 From: Tim Date: Thu, 3 Jul 2025 10:36:03 +0200 Subject: [PATCH 04/15] test --- base/src/lgacdb01.cbl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index 59f97ba8..b9ac301d 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -1,7 +1,7 @@ PROCESS SQL ****************************************************************** * * - * (C) Copyright IBM Corp. 2011, 2025 * + * (C) Copyright IBM Corp. 2011, 2026 * * * * ADD Customer Details * * * From 0623895fde92e9848a96ac3eacb3dc0e0827db82 Mon Sep 17 00:00:00 2001 From: Tim Date: Thu, 3 Jul 2025 11:08:12 +0200 Subject: [PATCH 05/15] test --- base/src/lgacdb01.cbl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index b9ac301d..f960f1b3 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -1,7 +1,7 @@ PROCESS SQL ****************************************************************** * * - * (C) Copyright IBM Corp. 2011, 2026 * + * (C) Copyright IBM Corp. 2011, 2027 * * * * ADD Customer Details * * * From 635f37d49ea74f4c9a2a93fd134a2398ac832ef2 Mon Sep 17 00:00:00 2001 From: Tim Date: Thu, 3 Jul 2025 11:09:10 +0200 Subject: [PATCH 06/15] test test --- base/src/lgacdb01.cbl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index f960f1b3..b9ac301d 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -1,7 +1,7 @@ PROCESS SQL ****************************************************************** * * - * (C) Copyright IBM Corp. 2011, 2027 * + * (C) Copyright IBM Corp. 2011, 2026 * * * * ADD Customer Details * * * From a79ddbe56c5e7f2f45d7715f1e3734ab8345dceb Mon Sep 17 00:00:00 2001 From: Tim Date: Mon, 7 Jul 2025 05:43:34 +0200 Subject: [PATCH 07/15] another change --- base/src/lgacdb01.cbl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index b9ac301d..96067ac7 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -13,7 +13,7 @@ PROGRAM-ID. LGACDB01. ENVIRONMENT DIVISION. CONFIGURATION SECTION. - * + *t DATA DIVISION. WORKING-STORAGE SECTION. From 8224ec874e063aad85998daf2960fc59ae9276d3 Mon Sep 17 00:00:00 2001 From: Tim Date: Mon, 7 Jul 2025 06:31:13 +0200 Subject: [PATCH 08/15] Making change for IDz Class --- base/src/lgacdb01.cbl | 2 +- base/src/lgacus01.cbl | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index 96067ac7..71de4f7c 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -13,7 +13,7 @@ PROGRAM-ID. LGACDB01. ENVIRONMENT DIVISION. CONFIGURATION SECTION. - *t + *Tim is cool DATA DIVISION. WORKING-STORAGE SECTION. diff --git a/base/src/lgacus01.cbl b/base/src/lgacus01.cbl index 6b035b8a..19c71819 100644 --- a/base/src/lgacus01.cbl +++ b/base/src/lgacus01.cbl @@ -11,7 +11,7 @@ PROGRAM-ID. LGACUS01. ENVIRONMENT DIVISION. CONFIGURATION SECTION. - * + *Tim is really cool DATA DIVISION. WORKING-STORAGE SECTION. @@ -117,7 +117,7 @@ *----------------------------------------------------------------* * Call routine to Insert row in DB2 Customer table * PERFORM INSERT-CUSTOMER. - + *----------------------------------------------------------------* * EXEC CICS RETURN END-EXEC. From 1e4f249fa4800530e74e63aa895ca96b1d49e653 Mon Sep 17 00:00:00 2001 From: Tim Date: Fri, 29 Aug 2025 08:57:14 +0200 Subject: [PATCH 09/15] Example changes for CITI --- ...a4z-validate-assistant-20250806-121355.log | 26 ++++ ...a4z-validate-assistant-20250827-072656.log | 142 ++++++++++++++++++ .vscode/launch.json | 39 +++++ base/src/lgacdb01.cbl | 2 +- base/src/lgicdb01.cbl | 2 +- zapp.yaml | 16 ++ 6 files changed, 225 insertions(+), 2 deletions(-) create mode 100644 .validate/logs/ibm-wca4z-validate-assistant-20250806-121355.log create mode 100644 .validate/logs/ibm-wca4z-validate-assistant-20250827-072656.log create mode 100644 .vscode/launch.json create mode 100644 zapp.yaml diff --git a/.validate/logs/ibm-wca4z-validate-assistant-20250806-121355.log b/.validate/logs/ibm-wca4z-validate-assistant-20250806-121355.log new file mode 100644 index 00000000..dfa5a599 --- /dev/null +++ b/.validate/logs/ibm-wca4z-validate-assistant-20250806-121355.log @@ -0,0 +1,26 @@ +2025-08-06 14:13:55 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-08-06 14:13:55 - [INFO] - Z Validation Assistant tree view registered +2025-08-06 14:13:55 - [INFO] - Z Validation Assistant Extension terminal created +2025-08-06 14:13:55 - [INFO] - DEMO_MODE=false +2025-08-06 14:13:55 - [INFO] - DEMO_VALIDATION=false +2025-08-06 14:13:55 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-08-06 14:13:55 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-08-06 14:13:55 - [INFO] - DEMO_VALIDATION_REST=false +2025-08-06 14:13:55 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-06 14:13:56 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-06 14:13:56 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-06 14:13:56 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-08-06 14:13:56 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-08-06 14:13:56 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-08-06 14:13:56 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-08-06 14:13:56 - [INFO] - DEMO_VALIDATION_TDG=false +2025-08-06 14:13:56 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-08-06 14:13:56 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-08-06 14:13:56 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-08-06 14:13:56 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-08-06 14:13:56 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-08-06 14:13:56 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-08-06 14:13:56 - [INFO] - Z Validation Assistant demoHost()=false +2025-08-06 14:13:56 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-08-06 14:13:56 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-08-06 14:13:56 - [INFO] - Z Validation Assistant getDemoVersion()=2 diff --git a/.validate/logs/ibm-wca4z-validate-assistant-20250827-072656.log b/.validate/logs/ibm-wca4z-validate-assistant-20250827-072656.log new file mode 100644 index 00000000..00f36abe --- /dev/null +++ b/.validate/logs/ibm-wca4z-validate-assistant-20250827-072656.log @@ -0,0 +1,142 @@ +2025-08-27 09:26:56 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-08-27 09:26:56 - [INFO] - Z Validation Assistant tree view registered +2025-08-27 09:26:56 - [INFO] - Z Validation Assistant Extension terminal created +2025-08-27 09:26:56 - [INFO] - DEMO_MODE=false +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION=false +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_REST=false +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_TDG=false +2025-08-27 09:26:56 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-08-27 09:26:56 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-08-27 09:26:56 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-08-27 09:26:56 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-08-27 09:26:56 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-08-27 09:26:56 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-08-27 09:26:56 - [INFO] - Z Validation Assistant demoHost()=false +2025-08-27 09:26:56 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-08-27 09:26:56 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-08-27 09:26:56 - [INFO] - Z Validation Assistant getDemoVersion()=2 +2025-08-27 11:19:36 - [INFO] - Zowe team configuration profile data was changed +2025-08-27 11:19:36 - [INFO] - Restarting extension... +2025-08-27 11:19:36 - [INFO] - Extension has deactivated. +2025-08-27 11:19:36 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-08-27 11:19:36 - [INFO] - Z Validation Assistant tree view registered +2025-08-27 11:19:36 - [INFO] - Z Validation Assistant Extension terminal created +2025-08-27 11:19:36 - [INFO] - DEMO_MODE=false +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION=false +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_REST=false +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_TDG=false +2025-08-27 11:19:36 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-08-27 11:19:36 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-08-27 11:19:36 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-08-27 11:19:36 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-08-27 11:19:36 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-08-27 11:19:36 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-08-27 11:19:36 - [INFO] - Z Validation Assistant demoHost()=false +2025-08-27 11:19:36 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-08-27 11:19:36 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-08-27 11:19:36 - [INFO] - Z Validation Assistant getDemoVersion()=2 +2025-08-28 09:00:08 - [INFO] - Zowe team configuration profile data was changed +2025-08-28 09:00:08 - [INFO] - Restarting extension... +2025-08-28 09:00:08 - [INFO] - Extension has deactivated. +2025-08-28 09:00:08 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-08-28 09:00:08 - [INFO] - Z Validation Assistant tree view registered +2025-08-28 09:00:08 - [INFO] - Z Validation Assistant Extension terminal created +2025-08-28 09:00:08 - [INFO] - DEMO_MODE=false +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION=false +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_REST=false +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_TDG=false +2025-08-28 09:00:08 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-08-28 09:00:08 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-08-28 09:00:08 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-08-28 09:00:08 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-08-28 09:00:08 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-08-28 09:00:08 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-08-28 09:00:08 - [INFO] - Z Validation Assistant demoHost()=false +2025-08-28 09:00:08 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-08-28 09:00:08 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-08-28 09:00:08 - [INFO] - Z Validation Assistant getDemoVersion()=2 +2025-08-28 23:08:52 - [INFO] - Zowe team configuration profile data was changed +2025-08-28 23:08:52 - [INFO] - Restarting extension... +2025-08-28 23:08:52 - [INFO] - Extension has deactivated. +2025-08-28 23:08:52 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-08-28 23:08:52 - [INFO] - Z Validation Assistant tree view registered +2025-08-28 23:08:52 - [INFO] - Z Validation Assistant Extension terminal created +2025-08-28 23:08:52 - [INFO] - DEMO_MODE=false +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION=false +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_REST=false +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_TDG=false +2025-08-28 23:08:52 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-08-28 23:08:52 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-08-28 23:08:52 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-08-28 23:08:52 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-08-28 23:08:52 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-08-28 23:08:52 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-08-28 23:08:52 - [INFO] - Z Validation Assistant demoHost()=false +2025-08-28 23:08:52 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-08-28 23:08:52 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-08-28 23:08:52 - [INFO] - Z Validation Assistant getDemoVersion()=2 +2025-08-29 07:58:47 - [INFO] - Zowe team configuration profile data was changed +2025-08-29 07:58:47 - [INFO] - Restarting extension... +2025-08-29 07:58:47 - [INFO] - Extension has deactivated. +2025-08-29 07:58:47 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-08-29 07:58:47 - [INFO] - Z Validation Assistant tree view registered +2025-08-29 07:58:47 - [INFO] - Z Validation Assistant Extension terminal created +2025-08-29 07:58:47 - [INFO] - DEMO_MODE=false +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION=false +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_REST=false +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_TDG=false +2025-08-29 07:58:47 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-08-29 07:58:47 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-08-29 07:58:47 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-08-29 07:58:47 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-08-29 07:58:47 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-08-29 07:58:47 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-08-29 07:58:47 - [INFO] - Z Validation Assistant demoHost()=false +2025-08-29 07:58:47 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-08-29 07:58:47 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-08-29 07:58:47 - [INFO] - Z Validation Assistant getDemoVersion()=2 diff --git a/.vscode/launch.json b/.vscode/launch.json new file mode 100644 index 00000000..546aec74 --- /dev/null +++ b/.vscode/launch.json @@ -0,0 +1,39 @@ +{ + // Use IntelliSense to learn about possible attributes. + // Hover to view descriptions of existing attributes. + // For more information, visit: https://go.microsoft.com/fwlink/?linkid=830387 + "version": "0.2.0", + "configurations": [ + + { + "type": "zOpenDebug", + "request": "launch", + "name": "Z Open Debug: Connect to a parked debug session", + "connection": { + "type": "zowe", + "name": "" + } + }, + { + "type": "zOpenDebug", + "request": "launch", + "name": "Z Open Debug: Connect to a parked debug session", + "connection": { + "type": "zowe", + "name": "" + }, + "applicationLaunch": { + "commandLine": "" + } + }, + { + "type": "zOpenDebug", + "request": "attach", + "name": "Z Open Debug: List parked debug sessions", + "connection": { + "type": "zowe", + "name": "" + } + } + ] +} \ No newline at end of file diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index 71de4f7c..8206f9d1 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -325,4 +325,4 @@ END-EXEC END-IF END-IF. - EXIT. + EXIT. \ No newline at end of file diff --git a/base/src/lgicdb01.cbl b/base/src/lgicdb01.cbl index 5452727c..3e4c8f74 100644 --- a/base/src/lgicdb01.cbl +++ b/base/src/lgicdb01.cbl @@ -12,7 +12,7 @@ PROGRAM-ID. LGICDB01. ENVIRONMENT DIVISION. CONFIGURATION SECTION. - * + *SINGAPORE AND INDIA ARE COOL DATA DIVISION. WORKING-STORAGE SECTION. diff --git a/zapp.yaml b/zapp.yaml new file mode 100644 index 00000000..7752bf3c --- /dev/null +++ b/zapp.yaml @@ -0,0 +1,16 @@ +name: Generated ZAPP document +description: >- + CRRZG5299I Note that this default file will search all your local folders in + all your open VS Code workspaces and can be highly inefficient. Modify the + "locations" entries to be as specific as possible. Add a new entry of type + "MVS" to specify remote locations. See the user documentation for more + details: + https://ibm.github.io/zopeneditor-about/Docs/setting_propertygroup.html +author: IBM Z Open Editor +propertyGroups: + - name: search-all + libraries: + - name: syslib + type: local + locations: + - '**' From a5628d1785f905599b935f3671fbcaee0e2eba7e Mon Sep 17 00:00:00 2001 From: Tim Date: Thu, 11 Sep 2025 10:53:40 +0200 Subject: [PATCH 10/15] HSLU EXAMPLE --- ...a4z-validate-assistant-20250827-072656.log | 29 +++++++ ...a4z-validate-assistant-20250903-095412.log | 84 +++++++++++++++++++ ...a4z-validate-assistant-20250910-044947.log | 84 +++++++++++++++++++ base/src/lgacdb01.cbl | 2 +- base/src/lgacdb02.cbl | 4 + base/src/lgacvs01.cbl | 2 +- base/src/lgicdb01.cbl | 1 + 7 files changed, 204 insertions(+), 2 deletions(-) create mode 100644 .validate/logs/ibm-wca4z-validate-assistant-20250903-095412.log create mode 100644 .validate/logs/ibm-wca4z-validate-assistant-20250910-044947.log diff --git a/.validate/logs/ibm-wca4z-validate-assistant-20250827-072656.log b/.validate/logs/ibm-wca4z-validate-assistant-20250827-072656.log index 00f36abe..28dd0a89 100644 --- a/.validate/logs/ibm-wca4z-validate-assistant-20250827-072656.log +++ b/.validate/logs/ibm-wca4z-validate-assistant-20250827-072656.log @@ -140,3 +140,32 @@ 2025-08-29 07:58:47 - [INFO] - Z Validation Assistant demoProgramInfo()=false 2025-08-29 07:58:47 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false 2025-08-29 07:58:47 - [INFO] - Z Validation Assistant getDemoVersion()=2 +2025-08-29 08:59:07 - [INFO] - Zowe team configuration profile data was changed +2025-08-29 08:59:07 - [INFO] - Restarting extension... +2025-08-29 08:59:07 - [INFO] - Extension has deactivated. +2025-08-29 08:59:07 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-08-29 08:59:07 - [INFO] - Z Validation Assistant tree view registered +2025-08-29 08:59:07 - [INFO] - Z Validation Assistant Extension terminal created +2025-08-29 08:59:07 - [INFO] - DEMO_MODE=false +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION=false +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_REST=false +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_HOST=false +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_TDG=false +2025-08-29 08:59:07 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-08-29 08:59:07 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-08-29 08:59:07 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-08-29 08:59:07 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-08-29 08:59:07 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-08-29 08:59:07 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-08-29 08:59:07 - [INFO] - Z Validation Assistant demoHost()=false +2025-08-29 08:59:07 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-08-29 08:59:07 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-08-29 08:59:07 - [INFO] - Z Validation Assistant getDemoVersion()=2 diff --git a/.validate/logs/ibm-wca4z-validate-assistant-20250903-095412.log b/.validate/logs/ibm-wca4z-validate-assistant-20250903-095412.log new file mode 100644 index 00000000..cf8b4f0f --- /dev/null +++ b/.validate/logs/ibm-wca4z-validate-assistant-20250903-095412.log @@ -0,0 +1,84 @@ +2025-09-03 11:54:12 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-09-03 11:54:14 - [INFO] - Z Validation Assistant tree view registered +2025-09-03 11:54:14 - [INFO] - Z Validation Assistant Extension terminal created +2025-09-03 11:54:14 - [INFO] - DEMO_MODE=false +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION=false +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_REST=false +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_TDG=false +2025-09-03 11:54:14 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-09-03 11:54:14 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-09-03 11:54:14 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-09-03 11:54:14 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-09-03 11:54:14 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-09-03 11:54:14 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-09-03 11:54:14 - [INFO] - Z Validation Assistant demoHost()=false +2025-09-03 11:54:14 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-09-03 11:54:14 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-09-03 11:54:14 - [INFO] - Z Validation Assistant getDemoVersion()=2 +2025-09-05 16:15:14 - [INFO] - Zowe team configuration profile data was changed +2025-09-05 16:15:14 - [INFO] - Restarting extension... +2025-09-05 16:15:14 - [INFO] - Extension has deactivated. +2025-09-05 16:15:14 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-09-05 16:15:14 - [INFO] - Z Validation Assistant tree view registered +2025-09-05 16:15:14 - [INFO] - Z Validation Assistant Extension terminal created +2025-09-05 16:15:14 - [INFO] - DEMO_MODE=false +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION=false +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_REST=false +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_TDG=false +2025-09-05 16:15:14 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-09-05 16:15:14 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-09-05 16:15:14 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-09-05 16:15:14 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-09-05 16:15:14 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-09-05 16:15:14 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-09-05 16:15:14 - [INFO] - Z Validation Assistant demoHost()=false +2025-09-05 16:15:14 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-09-05 16:15:14 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-09-05 16:15:14 - [INFO] - Z Validation Assistant getDemoVersion()=2 +2025-09-05 21:48:55 - [INFO] - Zowe team configuration profile data was changed +2025-09-05 21:48:55 - [INFO] - Restarting extension... +2025-09-05 21:48:55 - [INFO] - Extension has deactivated. +2025-09-05 21:48:55 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-09-05 21:48:55 - [INFO] - Z Validation Assistant tree view registered +2025-09-05 21:48:55 - [INFO] - Z Validation Assistant Extension terminal created +2025-09-05 21:48:55 - [INFO] - DEMO_MODE=false +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION=false +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_REST=false +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_TDG=false +2025-09-05 21:48:55 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-09-05 21:48:55 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-09-05 21:48:55 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-09-05 21:48:55 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-09-05 21:48:55 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-09-05 21:48:55 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-09-05 21:48:55 - [INFO] - Z Validation Assistant demoHost()=false +2025-09-05 21:48:55 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-09-05 21:48:55 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-09-05 21:48:55 - [INFO] - Z Validation Assistant getDemoVersion()=2 diff --git a/.validate/logs/ibm-wca4z-validate-assistant-20250910-044947.log b/.validate/logs/ibm-wca4z-validate-assistant-20250910-044947.log new file mode 100644 index 00000000..1491aa8b --- /dev/null +++ b/.validate/logs/ibm-wca4z-validate-assistant-20250910-044947.log @@ -0,0 +1,84 @@ +2025-09-10 06:49:47 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-09-10 06:49:50 - [INFO] - Z Validation Assistant tree view registered +2025-09-10 06:49:50 - [INFO] - Z Validation Assistant Extension terminal created +2025-09-10 06:49:50 - [INFO] - DEMO_MODE=false +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION=false +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_REST=false +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_TDG=false +2025-09-10 06:49:50 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-09-10 06:49:50 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-09-10 06:49:50 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-09-10 06:49:50 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-09-10 06:49:50 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-09-10 06:49:50 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-09-10 06:49:50 - [INFO] - Z Validation Assistant demoHost()=false +2025-09-10 06:49:50 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-09-10 06:49:50 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-09-10 06:49:50 - [INFO] - Z Validation Assistant getDemoVersion()=2 +2025-09-10 13:57:40 - [INFO] - Zowe team configuration profile data was changed +2025-09-10 13:57:40 - [INFO] - Restarting extension... +2025-09-10 13:57:40 - [INFO] - Extension has deactivated. +2025-09-10 13:57:40 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-09-10 13:57:41 - [INFO] - Z Validation Assistant tree view registered +2025-09-10 13:57:41 - [INFO] - Z Validation Assistant Extension terminal created +2025-09-10 13:57:41 - [INFO] - DEMO_MODE=false +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION=false +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_REST=false +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_TDG=false +2025-09-10 13:57:41 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-09-10 13:57:41 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-09-10 13:57:41 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-09-10 13:57:41 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-09-10 13:57:41 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-09-10 13:57:41 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-09-10 13:57:41 - [INFO] - Z Validation Assistant demoHost()=false +2025-09-10 13:57:41 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-09-10 13:57:41 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-09-10 13:57:41 - [INFO] - Z Validation Assistant getDemoVersion()=2 +2025-09-11 10:38:30 - [INFO] - Zowe team configuration profile data was changed +2025-09-11 10:38:30 - [INFO] - Restarting extension... +2025-09-11 10:38:30 - [INFO] - Extension has deactivated. +2025-09-11 10:38:30 - [INFO] - Z Validation Assistant Version: 2.3.0 +2025-09-11 10:38:30 - [INFO] - Z Validation Assistant tree view registered +2025-09-11 10:38:30 - [INFO] - Z Validation Assistant Extension terminal created +2025-09-11 10:38:30 - [INFO] - DEMO_MODE=false +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION=false +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_VERSION=*not set* +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_DIR=*not set* +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_REST=false +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_HOST=false +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_JAVA=false +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_JUNIT=false +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_PROGRAMNAME=default RAEXPORT +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_DEMONAME=default demo +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_TDG=false +2025-09-11 10:38:30 - [INFO] - DEMO_VALIDATION_TDG_DO=false +2025-09-11 10:38:30 - [INFO] - VALIDATION_COMPDEFREMOVAL=true +2025-09-11 10:38:30 - [INFO] - VALIDATION_COMPDEFREMOVAL_TRIMLINECOLS=true +2025-09-11 10:38:30 - [INFO] - Z Validation Assistant isDemoMode()=false +2025-09-11 10:38:30 - [INFO] - Z Validation Assistant isDebugMode()=false +2025-09-11 10:38:30 - [INFO] - Z Validation Assistant ignoreSystemDemoMode()=false +2025-09-11 10:38:30 - [INFO] - Z Validation Assistant demoHost()=false +2025-09-11 10:38:30 - [INFO] - Z Validation Assistant demoProgramInfo()=false +2025-09-11 10:38:30 - [INFO] - Z Validation Assistant demoClassMethodInfo()=false +2025-09-11 10:38:30 - [INFO] - Z Validation Assistant getDemoVersion()=2 diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index 8206f9d1..d2c11d2b 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -210,7 +210,7 @@ Move LastCustNum To DB2-CUSTOMERNUM-INT End-If. - + MOVE 'Y' TO WS *================================================================* INSERT-CUSTOMER. *================================================================* diff --git a/base/src/lgacdb02.cbl b/base/src/lgacdb02.cbl index 0d59894d..54055aac 100644 --- a/base/src/lgacdb02.cbl +++ b/base/src/lgacdb02.cbl @@ -138,6 +138,8 @@ MOVE '00' TO D2-RETURN-CODE MOVE EIBCALEN TO WS-CALEN. SET WS-ADDR-DFHCOMMAREA TO ADDRESS OF DFHCOMMAREA. + + MOVE 'Y' TO WS-RESP. * Different types of security add Evaluate D2-REQUEST-ID @@ -154,6 +156,8 @@ * Return to caller EXEC CICS RETURN END-EXEC. + + MAINLINE-EXIT. EXIT. *----------------------------------------------------------------* diff --git a/base/src/lgacvs01.cbl b/base/src/lgacvs01.cbl index 3a26a074..c067e8c8 100644 --- a/base/src/lgacvs01.cbl +++ b/base/src/lgacvs01.cbl @@ -5,7 +5,7 @@ * ADD Customer * * * * VSAM KSDS Customer record ADD * - * * + * TOM LIECHTI ROCKS * ****************************************************************** IDENTIFICATION DIVISION. PROGRAM-ID. LGACVS01. diff --git a/base/src/lgicdb01.cbl b/base/src/lgicdb01.cbl index 3e4c8f74..1e75dfdb 100644 --- a/base/src/lgicdb01.cbl +++ b/base/src/lgicdb01.cbl @@ -162,6 +162,7 @@ MAINLINE-EXIT. EXIT. + *----------------------------------------------------------------* GET-CUSTOMER-INFO. From 39f417f09caf31a1a656ddcf8f81601a777067e8 Mon Sep 17 00:00:00 2001 From: Tim Date: Tue, 16 Sep 2025 14:44:30 +0200 Subject: [PATCH 11/15] september 16th test --- base/src/lgacdb01.cbl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index 71de4f7c..a2c328b7 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -6,7 +6,7 @@ * ADD Customer Details * * * * To add customer's name, address and date of birth to the * - * DB2 customer table creating a new customer entry. * + * DB2 customer table creating a new customer entry. 1 * * * ****************************************************************** IDENTIFICATION DIVISION. From 182ef8d9fb6228ce32a1841c170e864b54fe2041 Mon Sep 17 00:00:00 2001 From: Tim Date: Wed, 17 Sep 2025 07:32:43 +0200 Subject: [PATCH 12/15] Adding a note that bbq is delicious --- base/src/lgacdb01.cbl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index d2c11d2b..920da372 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -13,7 +13,7 @@ PROGRAM-ID. LGACDB01. ENVIRONMENT DIVISION. CONFIGURATION SECTION. - *Tim is cool + *NEW ZEALAND BARBECUE IS DELICIOUS DATA DIVISION. WORKING-STORAGE SECTION. From 36db6c4bfaf6c04763681b6c37a5258be90744d1 Mon Sep 17 00:00:00 2001 From: TimMcKeoun Date: Sun, 8 Feb 2026 17:35:24 +0100 Subject: [PATCH 13/15] test --- base/src/lgicdb01.cbl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/base/src/lgicdb01.cbl b/base/src/lgicdb01.cbl index 1e75dfdb..cd01cf78 100644 --- a/base/src/lgicdb01.cbl +++ b/base/src/lgicdb01.cbl @@ -3,7 +3,7 @@ * * * (C) Copyright IBM Corp. 2011, 2021 * * * - * Inquire Customer * + * Inquire Customer 3 * * * * Select customer details from DB2 table * * * @@ -52,7 +52,7 @@ 01 CA-ERROR-MSG. 03 FILLER PIC X(9) VALUE 'COMMAREA='. 03 CA-DATA PIC X(90) VALUE SPACES. - + *----------------------------------------------------------------* * Fields to be used to calculate if commarea is large enough 01 WS-COMMAREA-LENGTHS. @@ -162,7 +162,7 @@ MAINLINE-EXIT. EXIT. - + *----------------------------------------------------------------* GET-CUSTOMER-INFO. From a69c473df1cff0e2d0144d336b62eee65d16831e Mon Sep 17 00:00:00 2001 From: TimMcKeoun Date: Mon, 9 Feb 2026 07:38:20 +0100 Subject: [PATCH 14/15] Example for IDz Class Feburary 9th --- base/src/lgacdb01.cbl | 3 ++- base/src/lgdpvs01.cbl | 6 +++--- base/src/lgipvs01.cbl | 1 + 3 files changed, 6 insertions(+), 4 deletions(-) diff --git a/base/src/lgacdb01.cbl b/base/src/lgacdb01.cbl index 53a490af..63e51064 100644 --- a/base/src/lgacdb01.cbl +++ b/base/src/lgacdb01.cbl @@ -13,7 +13,7 @@ PROGRAM-ID. LGACDB01. ENVIRONMENT DIVISION. CONFIGURATION SECTION. - *NEW ZEALAND BARBECUE IS DELICIOUS + *NEW ZEALAND BARBECUE IS VERY DELICIOUS DATA DIVISION. WORKING-STORAGE SECTION. @@ -85,6 +85,7 @@ * Include copybook for defintion of customer details length + * THIS COPYBOOK IS VERY IMPORTANT COPY LGPOLICY. *----------------------------------------------------------------* diff --git a/base/src/lgdpvs01.cbl b/base/src/lgdpvs01.cbl index 3132bf3c..188e3d79 100644 --- a/base/src/lgdpvs01.cbl +++ b/base/src/lgdpvs01.cbl @@ -4,7 +4,7 @@ * * * DELETE Policy * * * - * VSAM KSDS Policy record DELETE * + * VSAM KSDS Policy record DELETE 2 * * * ****************************************************************** IDENTIFICATION DIVISION. @@ -106,8 +106,8 @@ * MOVE WS-DATE TO EM-DATE MOVE WS-TIME TO EM-TIME - Move CA-Customer-Num To EM-CUSNUM - Move CA-POLICY-NUM To EM-POLNUM + Move CA-Customer-Num To EM-CUSNUM + Move CA-POLICY-NUM To EM-POLNUM Move WS-RESP To EM-RespRC Move WS-RESP2 To EM-Resp2RC EXEC CICS LINK PROGRAM('LGSTSQ') diff --git a/base/src/lgipvs01.cbl b/base/src/lgipvs01.cbl index d6eb7088..20a83faf 100644 --- a/base/src/lgipvs01.cbl +++ b/base/src/lgipvs01.cbl @@ -34,6 +34,7 @@ 01 WS-RECV-LEN PIC S9(4) COMP Value 80. ****************************** + * TIM IS VERY COOL 01 WRITE-MSG. 03 WRITE-MSG-Text PIC X(11) Value 'Policy Key='. From 2c2a61fd01f92cf622e4a359600cb5bd599574db Mon Sep 17 00:00:00 2001 From: TimMcKeoun Date: Mon, 9 Feb 2026 07:47:48 +0100 Subject: [PATCH 15/15] Making a change in a branch on February 9th --- base/src/lgicvs01.cbl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/base/src/lgicvs01.cbl b/base/src/lgicvs01.cbl index df92b4d7..03144d24 100644 --- a/base/src/lgicvs01.cbl +++ b/base/src/lgicvs01.cbl @@ -17,7 +17,7 @@ PROGRAM-ID. LGICVS01. ENVIRONMENT DIVISION. CONFIGURATION SECTION. - * + *THIS IS A CHANGE MADE ON FEBRUARY 9TH DATA DIVISION. WORKING-STORAGE SECTION.