IDE для COBOL на Delphi — часть 2: GMP, улучшенная отладка и подсветка

[georgiy08]

Рекомендую добавить скриншоты демонстрирующие внешний вид программы, а также оформить README файл для большего привлечения внимания.

(А коммитам давать более ясное название, нежели просто v1.4)

[SpiderEkb]

Скажите, а чем это лучше Rocket COBOL для Visual Studio?

И тут еще такой момент - COBOL в большинстве случаев работает не на десктопах, а на "больших машинах". Серверах с совершенно другой архитектурой. А там процесс разработки несколько иной. Пишем на локалке, потом отправляем на сервер, там запускаем сборку (с получением ошибок и предупреждений обратно на локалку)... Отладка - тоже на сервере (с подключением локалки к серверу в режиме отладки).

Если интересно - можно попробовать взять VSCode, установить IBM i Development Pack (там есть в т.ч. и COBOL, зарегистрироваться на бесплатном публичном AS/400 сервере PUB400 и попробовать как все это работает на самом деле.

[SpiderEkb]

Например, сборка на нашем тестовом сервере с использованием нашей же системы сборки (на основе gradle) из VSCode выглядит в терминале примерно так:

PS C:\Users\***\GIT\vpom> chcp 65001
Active code page: 65001
PS C:\Users\***\GIT\vpom> gradle as400syncanddeploy -PreleaseFile="VPOM#170"
Starting a Gradle Daemon, 4 busy and 1 incompatible Daemons could not be reused, use --status for details

> Configure project :
Found config file source:  https://***/config_20241112152851.zip modified on 2024-11-12T16:28:51.358+0400
  setting.yml
Current plugin version: 1.1.55.6 created on 08/07/2025 11:35:03
Log location: C:\Users\***\GIT\vpom\2025-07-23_15-41-05.log
Temp files location: C:\Users\***\GIT\vpom\build
add folder <DTAQ>
add folder <USRIDX>
add folder <ERRORS>
add folder <CONTAIN>
Include packages for deploy ...
[buildinfo] Not using buildInfo properties file for this build.

> Task :as400generateMemberList   
Getting files list for release ...
 add file C:\Users\***\vpom\src\main\ERRORS\DSERR37.RPGLE
 add file C:\Users\***\GIT\vpom\src\main\ERRORS\RPGPSDS.RPGLE
 add file C:\Users\***\GIT\vpom\src\main\ERRORS\ONERROR.RPGLE
  git: ssh://git@***/vpom.git
Using enviroment from class: ***.gradle.as400pluginEnvironment.EQEnviroment
[maven][0][jar][0]pgm
srvpgm
cpysrc
command
display
printer
panelgroup
bnddir

> Task :as400validate
Validating project structure ...
OK
Validating data ...
Validation completed

> Task :as400connect
   ...
Connecting to server *** using credentials for ***
IBMi job: 441572/QUSER/QZRCSRVS
jobUserID: ***


> Task :as400enviroment
Calling RTVATTR        
Creating eviroment completed

> Task :as400sendFilesToServer
Previous copy failed or status unknown. Copying all
Add generated installer @CRVPOM to files list
Copy file C:\Users\***\GIT\vpom\src\main\ERRORS\DSERR37.RPGLE to member VPOMSRC170/DSERR37
Copy file C:\Users\***\GIT\vpom\src\main\ERRORS\RPGPSDS.RPGLE to member VPOMSRC170/RPGPSDS
Copy file C:\Users\***\GIT\vpom\src\main\ERRORS\ONERROR.RPGLE to member VPOMSRC170/ONERROR
Copy file C:\Users\***\GIT\vpom\src\main\@CRVPOM.CLLE to member VPOMSRC170/@CRVPOM

> Task :lockObjects
Allocating necessary objects for deploy ...
OK

> Task :as400disconnect
Disconnected on AS400  

> Task :as400result
BUILD SUCCESSFUL

BUILD SUCCESSFUL in 1m 4s
14 actionable tasks: 14 executed

По gradle скриптам автоматически создается программа инсталлятор которая собирает на сервере все объекты поставки.

Дальше - подключение к серверу, копирование туда всех объектов поставки (включая сгенерированный инсталлятор), компиляция инсталлятора и его запуск. Если будут ошибки - они отобразятся здесь же.

В принципе, плагины для VSCode позволяют работать с кодом прямо с сервера, без копирования его на локал.