Skip to content

Commit fdadefb

Browse files
authored
feat: CICS Perform System Command (#2699)
1 parent 43c0ddc commit fdadefb

File tree

7 files changed

+972
-4
lines changed

7 files changed

+972
-4
lines changed

clients/cobol-lsp-vscode-extension/syntaxes/CICS.tmLanguage.json

+1-1
Large diffs are not rendered by default.

server/engine/src/main/antlr4/org/eclipse/lsp/cobol/implicitDialects/cics/CICSLexer.g4

+42
Original file line numberDiff line numberDiff line change
@@ -90,6 +90,8 @@ APLTEXTST : A P L T E X T S T;
9090
APOST : A P O S T;
9191
APPEND : A P P E N D;
9292
APPENDCRLF : A P P E N D C R L F;
93+
APPID: A P P I D;
94+
APPIDLEN: A P P I D L E N;
9395
APPLDATA : A P P L D A T A;
9496
APPLICATION : A P P L I C A T I O N;
9597
APPLID : A P P L I D;
@@ -189,6 +191,8 @@ BUSY : B U S Y;
189191
BYTEOFFSET : B Y T E O F F S E T;
190192
CACHESIZE : C A C H E S I Z E;
191193
CADDRLENGTH : C A D D R L E N G T H;
194+
CALLER: C A L L E R;
195+
CALLERLENGTH: C A L L E R L E N G T H;
192196
CANCEL : C A N C E L;
193197
CAPDATAPRED : C A P D A T A P R E D;
194198
CAPINFOSRCE : C A P I N F O S R C E;
@@ -229,6 +233,7 @@ CICSSTATUS : C I C S S T A T U S;
229233
CICSSYS : C I C S S Y S;
230234
CICSTSLEVEL : C I C S T S L E V E L;
231235
CIDDOMAIN : C I D D O M A I N;
236+
CIPHER: C I P H E R;
232237
CIPHERS : C I P H E R S;
233238
CLASS : C L A S S;
234239
CLEAR : C L E A R;
@@ -278,6 +283,7 @@ COMTHREADS : C O M T H R E A D S;
278283
CONCURRENCY : C O N C U R R E N C Y;
279284
CONCURRENTST : C O N C U R R E N T S T;
280285
CONDITION : C O N D I T I O N;
286+
CONFIG: C O N F I G;
281287
CONFIGDATA1 : C O N F I G D A T A '1';
282288
CONFIGFILE : C O N F I G F I L E;
283289
CONFIRM : C O N F I R M;
@@ -410,6 +416,7 @@ DFHRESP : D F H R E S P;
410416
DFHVALUE : D F H V A L U E;
411417
DFLTUSER : D F L T U S E R;
412418
DH : D H;
419+
DIAGNOSTICS: D I A G N O S T I C S;
413420
DIGEST : D I G E S T;
414421
DIGESTTYPE : D I G E S T T Y P E;
415422
DIRMGR : D I R M G R;
@@ -473,6 +480,7 @@ DUMPDS : D U M P D S;
473480
DUMPID : D U M P I D;
474481
DUMPING : D U M P I N G;
475482
DUMPSCOPE : D U M P S C O P E;
483+
DUMPTYPE: D U M P T Y P E;
476484
DUPKEY : D U P K E Y;
477485
DUPREC : D U P R E C;
478486
DUPRES : D U P R E S;
@@ -504,6 +512,7 @@ ENCRYPTKEY : E N C R Y P T K E Y;
504512
ENCRYPTPTKT: E N C R Y P T P T K T;
505513
END : E N D;
506514
ENDACTIVITY : E N D A C T I V I T Y;
515+
ENDAFFINITY: E N D A F F I N I T Y;
507516
ENDBR : E N D B R;
508517
ENDBROWSE : E N D B R O W S E;
509518
ENDDATA : E N D D A T A;
@@ -676,6 +685,8 @@ GALOCATION : G A L O C A T I O N;
676685
GARBAGEINT : G A R B A G E I N T;
677686
GASET : G A S E T;
678687
GAUSECOUNT : G A U S E C O U N T;
688+
GATHER: G A T H E R;
689+
GATHERTYPE: G A T H E R T Y P E;
679690
GC : G C;
680691
GCDSASIZE : G C D S A S I Z E;
681692
GCHARS : G C H A R S;
@@ -699,6 +710,7 @@ GRNAME : G R N A M E;
699710
GROUPID : G R O U P I D;
700711
GRSTATUS : G R S T A T U S;
701712
GSDSASIZE : G S D S A S I Z E;
713+
GSKRESP: G S K R E S P;
702714
GTEQ : G T E Q;
703715
GTFSTATUS : G T F S T A T U S;
704716
GUDSASIZE : G U D S A S I Z E;
@@ -709,6 +721,7 @@ HEADER : H E A D E R;
709721
HEALTH : H E A L T H;
710722
HEALTHABSTIM : H E A L T H A B S T I M;
711723
HEALTHCHECK : H E A L T H C H E C K;
724+
HEAP: H E A P;
712725
HEX : H E X;
713726
HFORMST : H F O R M S T;
714727
HFS : H F S;
@@ -819,6 +832,7 @@ ITEMERR : I T E M E R R;
819832
ITEMNAME : I T E M N A M E;
820833
IUTYPE : I U T Y P E;
821834
I_CHAR : I;
835+
JAVACORE: J A V A C O R E;
822836
JAVAHOME : J A V A H O M E;
823837
JCT : J C T;
824838
JIDERR : J I D E R R;
@@ -832,11 +846,14 @@ JTYPEID : J T Y P E I D;
832846
JUSFIRST : J U S F I R S T;
833847
JUSLAST : J U S L A S T;
834848
JUSTIFY : J U S T I F Y;
849+
JVM: J V M;
850+
JVMACTION: J V M A C T I O N;
835851
JVMCLASS : J V M C L A S S;
836852
JVMENDPOINT : J V M E N D P O I N T;
837853
JVMPROFILE : J V M P R O F I L E;
838854
JVMPROGRAM : J V M P R O G R A M;
839855
JVMSERVER : J V M S E R V E R;
856+
JVMTYPE: J V M T Y P E;
840857
JWT : J W T;
841858
KATAKANA : K A T A K A N A;
842859
KATAKANAST : K A T A K A N A S T;
@@ -886,8 +903,10 @@ LENGTHLIST : L E N G T H L I S T;
886903
LERUNOPTS : L E R U N O P T S;
887904
LEVEL : L E V E L;
888905
LG : L G;
906+
LIBERTY: L I B E R T Y;
889907
LIBRARY : L I B R A R Y;
890908
LIBRARYDSN : L I B R A R Y D S N;
909+
LIBRTYACTION: L I B R T Y A C T I O N;
891910
LIGHTPEN : L I G H T P E N;
892911
LIGHTPENST : L I G H T P E N S T;
893912
LINAGE_COUNTER : L I N A G E MINUSCHAR C O U N T E R;
@@ -1090,10 +1109,12 @@ NOOPTIONS : N O O P T I O N S;
10901109
NOOUTCONVERT : N O O U T C O N V E R T;
10911110
NOPASSBKRD : N O P A S S B K R D;
10921111
NOPASSBKWR : N O P A S S B K W R;
1112+
NORESTART: N O R E S T A R T;
10931113
NOQUEUE : N O Q U E U E;
10941114
NOQUIESCE : N O Q U I E S C E;
10951115
NORMAL : N O R M A L;
10961116
NOSEQ : N O S E Q;
1117+
NOSDTRAN: N O S D T R A N;
10971118
NOSPACE : N O S P A C E;
10981119
NOSPIE : N O S P I E;
10991120
NOSPOOL : N O S P O O L;
@@ -1182,6 +1203,8 @@ ORGANIZATION : O R G A N I Z A T I O N;
11821203
ORGANIZATLEN : O R G A N I Z A T L E N;
11831204
ORGUNIT : O R G U N I T;
11841205
ORGUNITLEN : O R G U N I T L E N;
1206+
OSGI: O S G I;
1207+
OSGIACTION: O S G I A C T I O N;
11851208
OSGIBUNDLE : O S G I B U N D L E;
11861209
OSGIBUNDLEID : O S G I B U N D L E I D;
11871210
OSGISERVICE : O S G I S E R V I C E;
@@ -1241,6 +1264,7 @@ PCDSASIZE : P C D S A S I Z E;
12411264
PCT : P C T;
12421265
PENDSTATUS : P E N D S T A T U S;
12431266
PERFCLASS : P E R F C L A S S;
1267+
PERFORM: P E R F O R M;
12441268
PF1 : P F '1';
12451269
PF10 : P F '10';
12461270
PF11 : P F '11';
@@ -1286,6 +1310,8 @@ PIPLIST : P I P L I S T;
12861310
PLAN : P L A N;
12871311
PLANEXITNAME : P L A N E X I T N A M E;
12881312
PLATFORM : P L A T F O R M;
1313+
PLT: P L T;
1314+
PLTNAME: P L T N A M E;
12891315
PLTPIUSR : P L T P I U S R;
12901316
POINT : P O I N T;
12911317
POLICY : P O L I C Y;
@@ -1401,6 +1427,7 @@ REALM : R E A L M;
14011427
REALMLEN : R E A L M L E N;
14021428
REASON : R E A S O N;
14031429
REATTACH : R E A T T A C H;
1430+
REBUILD: R E B U I L D;
14041431
RECEIVE : R E C E I V E;
14051432
RECEIVECOUNT : R E C E I V E C O U N T;
14061433
RECEIVER : R E C E I V E R;
@@ -1419,6 +1446,8 @@ REDUCE : R E D U C E;
14191446
REENTPROTECT : R E E N T P R O T E C T;
14201447
REFPARMS : R E F P A R M S;
14211448
REFPARMSLEN : R E F P A R M S L E N;
1449+
REFRESH: R E F R E S H;
1450+
REFRESHPKGS: R E F R E S H P K G S;
14221451
REGIONSTAT : R E G I O N S T A T;
14231452
REGIONUSERID : R E G I O N U S E R I D;
14241453
RELATESINDEX : R E L A T E S I N D E X;
@@ -1452,6 +1481,8 @@ RESCLASS : R E S C L A S S;
14521481
RESCOUNT : R E S C O U N T;
14531482
RESET : R E S E T;
14541483
RESETBR : R E S E T B R;
1484+
RESETNOW: R E S E T N O W;
1485+
RESETTIME: R E S E T T I M E;
14551486
RESID : R E S I D;
14561487
RESIDENCY : R E S I D E N C Y;
14571488
RESIDERR : R E S I D E R R;
@@ -1531,6 +1562,7 @@ RX : R X;
15311562
RZ : R Z;
15321563
SADDRLENGTH : S A D D R L E N G T H;
15331564
SC : S C;
1565+
SCAN: S C A N;
15341566
SCANDELAY : S C A N D E L A Y;
15351567
SCHEDULER : S C H E D U L E R;
15361568
SCHEMALEVEL : S C H E M A L E V E L;
@@ -1568,6 +1600,7 @@ SERVER : S E R V E R;
15681600
SERVERADDR : S E R V E R A D D R;
15691601
SERVERADDRNU : S E R V E R A D D R N U;
15701602
SERVERCONV : S E R V E R C O N V;
1603+
SERVERDUMP: S E R V E R D U M P;
15711604
SERVERIPADDR : S E R V E R I P A D D R;
15721605
SERVERNAME : S E R V E R N A M E;
15731606
SERVERPORT : S E R V E R P O R T;
@@ -1602,6 +1635,7 @@ SJ : S J;
16021635
SJVM : S J V M;
16031636
SM : S M;
16041637
SNAMELENGTH : S N A M E L E N G T H;
1638+
SNAPTRACE: S N A P T R A C E;
16051639
SO : S O;
16061640
SOAPFAULT : S O A P F A U L T;
16071641
SOAPLEVEL : S O A P L E V E L;
@@ -1637,9 +1671,11 @@ SRVCONVERT : S R V C O N V E R T;
16371671
SRVCSTATUS : S R V C S T A T U S;
16381672
SRVRADDR6NU : S R V R A D D R '6' N U;
16391673
SRVRIPFAMILY : S R V R I P F A M I L Y;
1674+
SSL: S S L;
16401675
SSLCACHE : S S L C A C H E;
16411676
SSLTYPE : S S L T Y P E;
16421677
ST : S T;
1678+
STACKTRACE: S T A C K T R A C E;
16431679
STANDARD : S T A N D A R D;
16441680
STANDBYMODE : S T A N D B Y M O D E;
16451681
START : S T A R T;
@@ -1710,6 +1746,7 @@ SYNCONRETURN : S Y N C O N R E T U R N;
17101746
SYNCPOINT : S Y N C P O I N T;
17111747
SYNCPOINTST : S Y N C P O I N T S T;
17121748
SYSBUSY : S Y S B U S Y;
1749+
SYSDUMP: S Y S D U M P;
17131750
SYSDUMPCODE : S Y S D U M P C O D E;
17141751
SYSDUMPING : S Y S D U M P I N G;
17151752
SYSEIB : S Y S E I B;
@@ -1722,11 +1759,13 @@ SYSTEMSTATUS : S Y S T E M S T A T U S;
17221759
SZ : S Z;
17231760
S_CHAR : S;
17241761
TABLE : T A B L E;
1762+
TABLEMGR: T A B L E M G R;
17251763
TABLENAME : T A B L E N A M E;
17261764
TABLES : T A B L E S;
17271765
TABLESIZE : T A B L E S I Z E;
17281766
TAEXECUTABLE : T A E X E C U T A B L E;
17291767
TAG : T A G;
1768+
TAKEOVER: T A K E O V E R;
17301769
TALENGTH : T A L E N G T H;
17311770
TARGETCOUNT : T A R G E T C O U N T;
17321771
TASK : T A S K;
@@ -1793,6 +1832,7 @@ TIMER : T I M E R;
17931832
TIMERERR : T I M E R E R R;
17941833
TIMESEP : T I M E S E P;
17951834
TITLE : T I T L E;
1835+
TITLELENGTH: T I T L E L E N G T H;
17961836
TNADDR : T N A D D R;
17971837
TNIPFAMILY : T N I P F A M I L Y;
17981838
TNPORT : T N P O R T;
@@ -1819,6 +1859,7 @@ TRACING : T R A C I N G;
18191859
TRAILER : T R A I L E R;
18201860
TRAN : T R A N;
18211861
TRANCLASS : T R A N C L A S S;
1862+
TRANDUMP: T R A N D U M P;
18221863
TRANDUMPCODE : T R A N D U M P C O D E;
18231864
TRANDUMPING : T R A N D U M P I N G;
18241865
TRANISOLATE : T R A N I S O L A T E;
@@ -1951,6 +1992,7 @@ XCFGROUP : X C F G R O U P;
19511992
XCTL : X C T L;
19521993
XID : X I D;
19531994
XLNSTATUS : X L N S T A T U S;
1995+
XLT: X L T;
19541996
XM : X M;
19551997
XMLCONTAINER : X M L C O N T A I N E R;
19561998
XMLSCHEMA : X M L S C H E M A;

0 commit comments

Comments
 (0)