Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
44 commits
Select commit Hold shift + click to select a range
bc174d0
WI #1911 Try to reduce ReSharper warnings, fix typos
fm-117 Jun 8, 2021
9a5d946
WI #1911 Make PictureValidator readonly, add DECIMAL POINT IS COMMA s…
fm-117 Jun 8, 2021
bd5641a
WI #1911 Fix more typos
fm-117 Jun 8, 2021
eb34c19
WI #1911 Split into multiple files, clean up Character class
fm-117 Jun 11, 2021
516cc24
WI #1911 More clean-up
fm-117 Jun 11, 2021
fb54ff2
WI #1911 Move validation message templates closer to usage
fm-117 Jun 14, 2021
5162a0d
WI #1911 Delete State class
fm-117 Jun 14, 2021
1f85057
WI #1911 Use array for character sequence earlier
fm-117 Jun 15, 2021
9cbc597
WI #1911 Prepare Context class deletion
fm-117 Jun 15, 2021
b2be3d9
WI #1911 Introduce Result class
fm-117 Jun 15, 2021
3b894b0
WI #1911 Add AdjustCategory step at validation end
fm-117 Jun 15, 2021
897b782
WI #1911 Delete Context class
fm-117 Jun 15, 2021
2f132cc
WI #1911 Refactor PictureType class
fm-117 Jun 18, 2021
ed23abd
WI #1911 Integrate PictureValidator into CodeElement phase
fm-117 Jun 18, 2021
c5f78b1
WI #1911 Improve validation messages
fm-117 Jun 18, 2021
3fd89da
WI #1911 Keep only a single usage of PictureValidator
fm-117 Jun 18, 2021
71d8aac
WI #1911 Remove validation messages from result, remove caching
fm-117 Jun 18, 2021
e2adbab
Merge branch 'develop' into 1911_IntegrateNewPictureValidator
fm-117 Jun 21, 2021
c88ed08
WI #1911 Review changes
fm-117 Jun 23, 2021
32a9a35
Merge branch 'develop' into 1911_IntegrateNewPictureValidator
fm-117 Jun 23, 2021
b6f6897
Merge branch 'develop' into 1911_IntegrateNewPictureValidator
fm-117 Jun 24, 2021
05ee375
WI #1987 Add currency descriptors into MultilineScanState
fm-117 Jun 24, 2021
fd5f23f
WI #1987 Add SpecialNamesContext class
fm-117 Jun 24, 2021
c1ef94e
WI #1987 Integrate SpecialNames context
fm-117 Jun 24, 2021
20b7808
WI #1987 Check for duplicates symbols
fm-117 Jun 24, 2021
9e9d6bd
WI #1987 Fix bugs, add unit test
fm-117 Jun 25, 2021
430844d
WI #1987 Use first capital letter for every error message
fm-117 Jun 28, 2021
4a2b2e1
WI #1987 Single CurrencyDescriptor support
mayanje Jun 29, 2021
131022c
WI #1987 Potential currency signs support
fm-117 Jun 29, 2021
7320453
WI #1987 Add size computation for currency symbols/signs
fm-117 Jun 29, 2021
16ff122
WI #1987 Add CurrencyDescriptor in result
fm-117 Jun 29, 2021
b4cc36c
WI #1987 Integrate currency descriptors in CodeElementChecker
fm-117 Jun 29, 2021
d704e36
WI #1987 Refactoring part 1
fm-117 Jun 29, 2021
a0143f4
WI #1987 Refactoring part 2
fm-117 Jun 30, 2021
a5ea51a
WI #1987 Add final unit test
fm-117 Jun 30, 2021
5a63db8
WI #1987 Fix bug on multiple currency smbols in a picture
fm-117 Jul 2, 2021
81fa3c8
Merge pull request #1996 from TypeCobolTeam/1987_ImproveCurrencySignS…
fm-117 Jul 13, 2021
0a1c0eb
WI #1911 Fix decimal point is comma swapping mechanism
fm-117 Jul 16, 2021
9f0b865
WI #1911 Add picture representation check
fm-117 Jul 21, 2021
678f16c
WI #1911 Change PictureCategory enum
fm-117 Jul 23, 2021
8845c75
WI #1911 Rewrite automata
fm-117 Jul 30, 2021
e7a796d
Merge branch 'develop' into 1911_IntegrateNewPictureValidator
fm-117 Jul 30, 2021
996efb4
WI #1911 Remove invalid check
fm-117 Jul 30, 2021
96f2f1a
WI #1911 Add summary for Char2SC and SC2String
fm-117 Aug 3, 2021
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@
WORKING-STORAGE SECTION.
01 MyPicVar PIC X(10).
01 MyGroup.
05 MyValue PIC 2.
05 MyValue PIC 9(2).
01 StringArray.
05 OCCURS 10 INDEXED BY StringIdx.
10 Pnt POINTER.
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -6,7 +6,7 @@
WORKING-STORAGE SECTION.
01 MyPicVar PIC X(10).
01 MyGroup.
05 MyValue PIC 2.
05 MyValue PIC 9(2).
01 StringArray.
05 OCCURS 10 INDEXED BY StringIdx.
10 Pnt POINTER.
Expand Down
6 changes: 3 additions & 3 deletions TypeCobol.Analysis.Test/BasicCfgInstrs/CfgInNestedPrg2.cbl
Original file line number Diff line number Diff line change
Expand Up @@ -19,9 +19,9 @@
02 zres pic s9(12)v999.
WORKING-STORAGE SECTION.
01 tabind.
02 ind pic 1 occurs 99.
77 ef pic 1 value "1".
77 fct3 pic 1 value "1".
02 ind pic X occurs 99.
77 ef pic X value "1".
77 fct3 pic X value "1".
PROCEDURE DIVISION.
open i-o VUE.
move zero to fct1 fct2 zres.
Expand Down
6 changes: 3 additions & 3 deletions TypeCobol.Analysis.Test/BasicCfgInstrs/CfgInStackedPrg1.cbl
Original file line number Diff line number Diff line change
Expand Up @@ -45,9 +45,9 @@
02 zres pic s9(12)v999.
WORKING-STORAGE SECTION.
01 tabind.
02 ind pic 1 occurs 99.
77 ef pic 1 value "1".
77 fct3 pic 1 value "1".
02 ind pic X occurs 99.
77 ef pic X value "1".
77 fct3 pic X value "1".
PROCEDURE DIVISION.
open i-o VUE.
move zero to fct1 fct2 zres.
Expand Down
2 changes: 1 addition & 1 deletion TypeCobol.Analysis.Test/BasicCfgInstrs/IfThen0.cbl
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@

DATA DIVISION.
WORKING-STORAGE SECTION.
01 A PIC P(2) VALUE 10.
01 A PIC 9(2) VALUE 10.
PROCEDURE DIVISION.
IF A = 10 THEN
DISPLAY "A = 10"
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -14,9 +14,9 @@
02 zres pic s9(12)v999.
WORKING-STORAGE SECTION.
01 tabind.
02 ind pic 1 occurs 99.
77 ef pic 1 value "1".
77 fct3 pic 1 value "1".
02 ind pic X occurs 99.
77 ef pic X value "1".
77 fct3 pic X value "1".
PROCEDURE DIVISION.
open i-o VUE.
move zero to fct1 fct2 zres.
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -7,15 +7,15 @@
"initialize": "{\"jsonrpc\":\"2.0\",\"id\":\"0\",\"method\":\"initialize\",\"params\":{\"processId\":-1,\"rootPath\":\"C:\\\\Users\\\\COLLARBE\\\\Source\\\\Repos\\\\TypeCobol\\\\bin\\\\EI_Debug\",\"rootUri\":\"file:/C:/Users/COLLARBE/Source/Repos/TypeCobol/bin/EI_Debug/\",\"capabilities\":{\"workspace\":{\"applyEdit\":true,\"didChangeConfiguration\":{\"dynamicRegistration\":true},\"didChangeWatchedFiles\":{\"dynamicRegistration\":false},\"symbol\":{\"dynamicRegistration\":true},\"executeCommand\":{\"dynamicRegistration\":true}},\"textDocument\":{\"synchronization\":{\"willSave\":true,\"willSaveWaitUntil\":true,\"dynamicRegistration\":true},\"completion\":{\"completionItem\":{\"snippetSupport\":true},\"dynamicRegistration\":true},\"hover\":{\"dynamicRegistration\":true},\"signatureHelp\":{\"dynamicRegistration\":true},\"references\":{\"dynamicRegistration\":true},\"documentHighlight\":{\"dynamicRegistration\":true},\"documentSymbol\":{\"dynamicRegistration\":true},\"formatting\":{\"dynamicRegistration\":true},\"rangeFormatting\":{\"dynamicRegistration\":true},\"onTypeFormatting\":{\"dynamicRegistration\":true},\"definition\":{\"dynamicRegistration\":true},\"codeAction\":{\"dynamicRegistration\":true},\"codeLens\":{\"dynamicRegistration\":true},\"documentLink\":{\"dynamicRegistration\":true},\"rename\":{\"dynamicRegistration\":true}}},\"trace\":\"off\"}}",
"initialize_result": "{\"jsonrpc\":\"2.0\",\"id\":\"0\",\"result\":{\"capabilities\":{\"textDocumentSync\":2,\"hoverProvider\":true,\"completionProvider\":{\"resolveProvider\":false,\"triggerCharacters\":[\"::\"]},\"signatureHelpProvider\":{\"triggerCharacters\":[]},\"definitionProvider\":true,\"referencesProvider\":false,\"documentHighlightProvider\":false,\"documentSymbolProvider\":false,\"workspaceSymbolProvider\":false,\"codeActionProvider\":false,\"documentFormattingProvider\":false,\"documentRangeFormattingProvider\":false,\"renameProvider\":false}}}",
"did_change_configuation": "{\"jsonrpc\":\"2.0\",\"method\":\"workspace/didChangeConfiguration\",\"params\":{\"settings\":[\"C:\\\\Users\\\\COLLARBE\\\\Source\\\\Repos\\\\TypeCobol\\\\bin\\\\EI_Debug\\\\TypeCobol.CLI.exe\",\"-1\",\"-e\",\"rdz\",\"-y\",\"C:\\\\Users\\\\COLLARBE\\\\Source\\\\Repos\\\\TypeCobol\\\\TypeCobol.LanguageServer.Test\\\\LSRTests\\\\DefaultIntrinsic.txt\",\"-md\",\"30\"]}}",
"didOpen": "{\"jsonrpc\":\"2.0\",\"method\":\"textDocument/didOpen\",\"params\":{\"textDocument\":{\"uri\":\"file:/C:/Users/COLLARBE/AppData/Local/Temp/tcbl/PROCCALL1017554363682126440.cee\",\"languageId\":\"__lsp4j_TypeCobol\",\"version\":0,\"text\":\" IDENTIFICATION DIVISION.\\r\\n PROGRAM-ID. TestingPgm.\\r\\n\\r\\n DATA DIVISION.\\r\\n WORKING-STORAGE SECTION.\\r\\n 01 W-Date TYPE DATE.\\r\\n 01 W-Bool TYPE Bool.\\r\\n 01 W-Numeric PIC 9(10).\\r\\n 01 W-Alphabetic PIC A(10).\\r\\n 01 W-Alphanum PIC X(10).\\r\\n 01 W-OutDate TYPE Date.\\r\\n 01 TestLevel.\\r\\n 88 TestLevel88 VALUE 1.\\r\\n 01 Level1.\\r\\n 05 Level2.\\r\\n 06 VarLevel2 PIC 10.\\r\\n 05 Level2-2.\\r\\n 06 VarLevel2-2 PIC 10.\\r\\n 05 MyBool TYPE BOOL.\\r\\n PROCEDURE DIVISION.\\r\\n\\r\\n\\r\\n .\\r\\n END PROGRAM TestingPgm.\"}}}",
"didOpen": "{\"jsonrpc\":\"2.0\",\"method\":\"textDocument/didOpen\",\"params\":{\"textDocument\":{\"uri\":\"file:/C:/Users/COLLARBE/AppData/Local/Temp/tcbl/PROCCALL1017554363682126440.cee\",\"languageId\":\"__lsp4j_TypeCobol\",\"version\":0,\"text\":\" IDENTIFICATION DIVISION.\\r\\n PROGRAM-ID. TestingPgm.\\r\\n\\r\\n DATA DIVISION.\\r\\n WORKING-STORAGE SECTION.\\r\\n 01 W-Date TYPE DATE.\\r\\n 01 W-Bool TYPE Bool.\\r\\n 01 W-Numeric PIC 9(10).\\r\\n 01 W-Alphabetic PIC A(10).\\r\\n 01 W-Alphanum PIC X(10).\\r\\n 01 W-OutDate TYPE Date.\\r\\n 01 TestLevel.\\r\\n 88 TestLevel88 VALUE 1.\\r\\n 01 Level1.\\r\\n 05 Level2.\\r\\n 06 VarLevel2 PIC X(10).\\r\\n 05 Level2-2.\\r\\n 06 VarLevel2-2 PIC X(10).\\r\\n 05 MyBool TYPE BOOL.\\r\\n PROCEDURE DIVISION.\\r\\n\\r\\n\\r\\n .\\r\\n END PROGRAM TestingPgm.\"}}}",
"messages": [
{
"category": 1,
"message": "{\"jsonrpc\":\"2.0\",\"method\":\"textDocument/publishDiagnostics\",\"params\":{\"uri\":\"file:///C:/Users/COLLARBE/AppData/Local/Temp/tcbl/PROCCALL1017554363682126440.cee\",\"diagnostics\":[]}}"
},
{
"category": 0,
"message": "{\"jsonrpc\":\"2.0\",\"method\":\"textDocument/didSave\",\"params\":{\"textDocument\":{\"version\":0,\"uri\":\"file:/C:/Users/COLLARBE/AppData/Local/Temp/tcbl/PROCCALL1017554363682126440.cee\"},\"text\":\" IDENTIFICATION DIVISION.\\r\\n PROGRAM-ID. TestingPgm.\\r\\n\\r\\n DATA DIVISION.\\r\\n WORKING-STORAGE SECTION.\\r\\n 01 W-Date TYPE DATE.\\r\\n 01 W-Bool TYPE Bool.\\r\\n 01 W-Numeric PIC 9(10).\\r\\n 01 W-Alphabetic PIC A(10).\\r\\n 01 W-Alphanum PIC X(10).\\r\\n 01 W-OutDate TYPE Date.\\r\\n 01 TestLevel.\\r\\n 88 TestLevel88 VALUE 1.\\r\\n 01 Level1.\\r\\n 05 Level2.\\r\\n 06 VarLevel2 PIC 10.\\r\\n 05 Level2-2.\\r\\n 06 VarLevel2-2 PIC 10.\\r\\n 05 MyBool TYPE BOOL.\\r\\n PROCEDURE DIVISION.\\r\\n\\r\\n\\r\\n\\r\\n\\r\\n\\r\\n .\\r\\n END PROGRAM TestingPgm.\"}}"
"message": "{\"jsonrpc\":\"2.0\",\"method\":\"textDocument/didSave\",\"params\":{\"textDocument\":{\"version\":0,\"uri\":\"file:/C:/Users/COLLARBE/AppData/Local/Temp/tcbl/PROCCALL1017554363682126440.cee\"},\"text\":\" IDENTIFICATION DIVISION.\\r\\n PROGRAM-ID. TestingPgm.\\r\\n\\r\\n DATA DIVISION.\\r\\n WORKING-STORAGE SECTION.\\r\\n 01 W-Date TYPE DATE.\\r\\n 01 W-Bool TYPE Bool.\\r\\n 01 W-Numeric PIC 9(10).\\r\\n 01 W-Alphabetic PIC A(10).\\r\\n 01 W-Alphanum PIC X(10).\\r\\n 01 W-OutDate TYPE Date.\\r\\n 01 TestLevel.\\r\\n 88 TestLevel88 VALUE 1.\\r\\n 01 Level1.\\r\\n 05 Level2.\\r\\n 06 VarLevel2 PIC X(10).\\r\\n 05 Level2-2.\\r\\n 06 VarLevel2-2 PIC X(10).\\r\\n 05 MyBool TYPE BOOL.\\r\\n PROCEDURE DIVISION.\\r\\n\\r\\n\\r\\n\\r\\n\\r\\n\\r\\n .\\r\\n END PROGRAM TestingPgm.\"}}"
},
{
"category": 1,
Expand Down Expand Up @@ -75,7 +75,7 @@
},
{
"category": 2,
"message": "{\"jsonrpc\":\"2.0\",\"id\":\"57\",\"result\":[{\"label\":\"W-Date (DATE) (W-Date)\",\"kind\":6,\"insertText\":\"W-Date\"},{\"label\":\"W-Bool (BOOL) (W-Bool)\",\"kind\":6,\"insertText\":\"W-Bool\"},{\"label\":\"W-Numeric (Numeric) (W-Numeric)\",\"kind\":6,\"insertText\":\"W-Numeric\"},{\"label\":\"W-Alphabetic (Alphabetic) (W-Alphabetic)\",\"kind\":6,\"insertText\":\"W-Alphabetic\"},{\"label\":\"W-Alphanum (Alphanumeric) (W-Alphanum)\",\"kind\":6,\"insertText\":\"W-Alphanum\"},{\"label\":\"W-OutDate (DATE) (W-OutDate)\",\"kind\":6,\"insertText\":\"W-OutDate\"},{\"label\":\"TestLevel (Alphanumeric) (TestLevel)\",\"kind\":6,\"insertText\":\"TestLevel\"},{\"label\":\"Level1 (Alphanumeric) (Level1)\",\"kind\":6,\"insertText\":\"Level1\"},{\"label\":\"Level2 (Alphanumeric) (Level1::Level2)\",\"kind\":6,\"insertText\":\"Level1::Level2\"},{\"label\":\"VarLevel2 (NumericEdited) (Level1::Level2::VarLevel2)\",\"kind\":6,\"insertText\":\"Level1::Level2::VarLevel2\"},{\"label\":\"Level2-2 (Alphanumeric) (Level1::Level2-2)\",\"kind\":6,\"insertText\":\"Level1::Level2-2\"},{\"label\":\"VarLevel2-2 (NumericEdited) (Level1::Level2-2::VarLevel2-2)\",\"kind\":6,\"insertText\":\"Level1::Level2-2::VarLevel2-2\"},{\"label\":\"MyBool (BOOL) (Level1::MyBool)\",\"kind\":6,\"insertText\":\"Level1::MyBool\"}]}"
"message": "{\"jsonrpc\":\"2.0\",\"id\":\"57\",\"result\":[{\"label\":\"W-Date (DATE) (W-Date)\",\"kind\":6,\"insertText\":\"W-Date\"},{\"label\":\"W-Bool (BOOL) (W-Bool)\",\"kind\":6,\"insertText\":\"W-Bool\"},{\"label\":\"W-Numeric (Numeric) (W-Numeric)\",\"kind\":6,\"insertText\":\"W-Numeric\"},{\"label\":\"W-Alphabetic (Alphabetic) (W-Alphabetic)\",\"kind\":6,\"insertText\":\"W-Alphabetic\"},{\"label\":\"W-Alphanum (Alphanumeric) (W-Alphanum)\",\"kind\":6,\"insertText\":\"W-Alphanum\"},{\"label\":\"W-OutDate (DATE) (W-OutDate)\",\"kind\":6,\"insertText\":\"W-OutDate\"},{\"label\":\"TestLevel (Alphanumeric) (TestLevel)\",\"kind\":6,\"insertText\":\"TestLevel\"},{\"label\":\"Level1 (Alphanumeric) (Level1)\",\"kind\":6,\"insertText\":\"Level1\"},{\"label\":\"Level2 (Alphanumeric) (Level1::Level2)\",\"kind\":6,\"insertText\":\"Level1::Level2\"},{\"label\":\"VarLevel2 (Alphanumeric) (Level1::Level2::VarLevel2)\",\"kind\":6,\"insertText\":\"Level1::Level2::VarLevel2\"},{\"label\":\"Level2-2 (Alphanumeric) (Level1::Level2-2)\",\"kind\":6,\"insertText\":\"Level1::Level2-2\"},{\"label\":\"VarLevel2-2 (Alphanumeric) (Level1::Level2-2::VarLevel2-2)\",\"kind\":6,\"insertText\":\"Level1::Level2-2::VarLevel2-2\"},{\"label\":\"MyBool (BOOL) (Level1::MyBool)\",\"kind\":6,\"insertText\":\"Level1::MyBool\"}]}"
},
{
"category": 0,
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -7,15 +7,15 @@
"initialize": "{\"jsonrpc\":\"2.0\",\"id\":\"0\",\"method\":\"initialize\",\"params\":{\"processId\":-1,\"rootPath\":\"C:\\\\Users\\\\COLLARBE\\\\Source\\\\Repos\\\\TypeCobol\\\\bin\\\\EI_Debug\",\"rootUri\":\"file:/C:/Users/COLLARBE/Source/Repos/TypeCobol/bin/EI_Debug/\",\"capabilities\":{\"workspace\":{\"applyEdit\":true,\"didChangeConfiguration\":{\"dynamicRegistration\":true},\"didChangeWatchedFiles\":{\"dynamicRegistration\":false},\"symbol\":{\"dynamicRegistration\":true},\"executeCommand\":{\"dynamicRegistration\":true}},\"textDocument\":{\"synchronization\":{\"willSave\":true,\"willSaveWaitUntil\":true,\"dynamicRegistration\":true},\"completion\":{\"completionItem\":{\"snippetSupport\":true},\"dynamicRegistration\":true},\"hover\":{\"dynamicRegistration\":true},\"signatureHelp\":{\"dynamicRegistration\":true},\"references\":{\"dynamicRegistration\":true},\"documentHighlight\":{\"dynamicRegistration\":true},\"documentSymbol\":{\"dynamicRegistration\":true},\"formatting\":{\"dynamicRegistration\":true},\"rangeFormatting\":{\"dynamicRegistration\":true},\"onTypeFormatting\":{\"dynamicRegistration\":true},\"definition\":{\"dynamicRegistration\":true},\"codeAction\":{\"dynamicRegistration\":true},\"codeLens\":{\"dynamicRegistration\":true},\"documentLink\":{\"dynamicRegistration\":true},\"rename\":{\"dynamicRegistration\":true}}},\"trace\":\"off\"}}",
"initialize_result": "{\"jsonrpc\":\"2.0\",\"id\":\"0\",\"result\":{\"capabilities\":{\"textDocumentSync\":2,\"hoverProvider\":true,\"completionProvider\":{\"resolveProvider\":false,\"triggerCharacters\":[\"::\"]},\"signatureHelpProvider\":{\"triggerCharacters\":[]},\"definitionProvider\":true,\"referencesProvider\":false,\"documentHighlightProvider\":false,\"documentSymbolProvider\":false,\"workspaceSymbolProvider\":false,\"codeActionProvider\":false,\"documentFormattingProvider\":false,\"documentRangeFormattingProvider\":false,\"renameProvider\":false}}}",
"did_change_configuation": "{\"jsonrpc\":\"2.0\",\"method\":\"workspace/didChangeConfiguration\",\"params\":{\"settings\":[\"C:\\\\Users\\\\COLLARBE\\\\Source\\\\Repos\\\\TypeCobol\\\\bin\\\\EI_Debug\\\\TypeCobol.CLI.exe\",\"-1\",\"-e\",\"rdz\",\"-y\",\"C:\\\\Users\\\\COLLARBE\\\\Source\\\\Repos\\\\TypeCobol\\\\TypeCobol.LanguageServer.Test\\\\LSRTests\\\\DefaultIntrinsic.txt\",\"-md\",\"30\",\"-cob\"]}}",
"didOpen": "{\"jsonrpc\":\"2.0\",\"method\":\"textDocument/didOpen\",\"params\":{\"textDocument\":{\"uri\":\"file:/C:/Users/COLLARBE/AppData/Local/Temp/tcbl/PROCCALL1017554363682126440.cee\",\"languageId\":\"__lsp4j_TypeCobol\",\"version\":0,\"text\":\" IDENTIFICATION DIVISION.\\r\\n PROGRAM-ID. TestingPgm.\\r\\n\\r\\n DATA DIVISION.\\r\\n WORKING-STORAGE SECTION.\\r\\n 01 W-Date PIC 9(8).\\r\\n 01 W-Bool PIC 9.\\r\\n 01 W-Numeric PIC 9(10).\\r\\n 01 W-Alphabetic PIC A(10).\\r\\n 01 W-Alphanum PIC X(10).\\r\\n 01 W-OutDate PIC 9(8).\\r\\n 01 TestLevel.\\r\\n 88 TestLevel88 VALUE 1.\\r\\n 01 Level1.\\r\\n 05 Level2.\\r\\n 06 VarLevel2 PIC 10.\\r\\n 05 Level2-2.\\r\\n 06 VarLevel2-2 PIC 10.\\r\\n 05 MyBool PIC 9.\\r\\n PROCEDURE DIVISION.\\r\\n\\r\\n\\r\\n .\\r\\n END PROGRAM TestingPgm.\"}}}",
"didOpen": "{\"jsonrpc\":\"2.0\",\"method\":\"textDocument/didOpen\",\"params\":{\"textDocument\":{\"uri\":\"file:/C:/Users/COLLARBE/AppData/Local/Temp/tcbl/PROCCALL1017554363682126440.cee\",\"languageId\":\"__lsp4j_TypeCobol\",\"version\":0,\"text\":\" IDENTIFICATION DIVISION.\\r\\n PROGRAM-ID. TestingPgm.\\r\\n\\r\\n DATA DIVISION.\\r\\n WORKING-STORAGE SECTION.\\r\\n 01 W-Date PIC 9(8).\\r\\n 01 W-Bool PIC 9.\\r\\n 01 W-Numeric PIC 9(10).\\r\\n 01 W-Alphabetic PIC A(10).\\r\\n 01 W-Alphanum PIC X(10).\\r\\n 01 W-OutDate PIC 9(8).\\r\\n 01 TestLevel.\\r\\n 88 TestLevel88 VALUE 1.\\r\\n 01 Level1.\\r\\n 05 Level2.\\r\\n 06 VarLevel2 PIC X(10).\\r\\n 05 Level2-2.\\r\\n 06 VarLevel2-2 PIC X(10).\\r\\n 05 MyBool PIC 9.\\r\\n PROCEDURE DIVISION.\\r\\n\\r\\n\\r\\n .\\r\\n END PROGRAM TestingPgm.\"}}}",
"messages": [
{
"category": 1,
"message": "{\"jsonrpc\":\"2.0\",\"method\":\"textDocument/publishDiagnostics\",\"params\":{\"uri\":\"file:///C:/Users/COLLARBE/AppData/Local/Temp/tcbl/PROCCALL1017554363682126440.cee\",\"diagnostics\":[]}}"
},
{
"category": 0,
"message": "{\"jsonrpc\":\"2.0\",\"method\":\"textDocument/didSave\",\"params\":{\"textDocument\":{\"version\":0,\"uri\":\"file:/C:/Users/COLLARBE/AppData/Local/Temp/tcbl/PROCCALL1017554363682126440.cee\"},\"text\":\" IDENTIFICATION DIVISION.\\r\\n PROGRAM-ID. TestingPgm.\\r\\n\\r\\n DATA DIVISION.\\r\\n WORKING-STORAGE SECTION.\\r\\n 01 W-Date PIC 9(8).\\r\\n 01 W-Bool PIC 9.\\r\\n 01 W-Numeric PIC 9(10).\\r\\n 01 W-Alphabetic PIC A(10).\\r\\n 01 W-Alphanum PIC X(10).\\r\\n 01 W-OutDate PIC 9(8).\\r\\n 01 TestLevel.\\r\\n 88 TestLevel88 VALUE 1.\\r\\n 01 Level1.\\r\\n 05 Level2.\\r\\n 06 VarLevel2 PIC 10.\\r\\n 05 Level2-2.\\r\\n 06 VarLevel2-2 PIC 10.\\r\\n 05 MyBool PIC 9.\\r\\n PROCEDURE DIVISION.\\r\\n\\r\\n\\r\\n\\r\\n\\r\\n\\r\\n .\\r\\n END PROGRAM TestingPgm.\"}}"
"message": "{\"jsonrpc\":\"2.0\",\"method\":\"textDocument/didSave\",\"params\":{\"textDocument\":{\"version\":0,\"uri\":\"file:/C:/Users/COLLARBE/AppData/Local/Temp/tcbl/PROCCALL1017554363682126440.cee\"},\"text\":\" IDENTIFICATION DIVISION.\\r\\n PROGRAM-ID. TestingPgm.\\r\\n\\r\\n DATA DIVISION.\\r\\n WORKING-STORAGE SECTION.\\r\\n 01 W-Date PIC 9(8).\\r\\n 01 W-Bool PIC 9.\\r\\n 01 W-Numeric PIC 9(10).\\r\\n 01 W-Alphabetic PIC A(10).\\r\\n 01 W-Alphanum PIC X(10).\\r\\n 01 W-OutDate PIC 9(8).\\r\\n 01 TestLevel.\\r\\n 88 TestLevel88 VALUE 1.\\r\\n 01 Level1.\\r\\n 05 Level2.\\r\\n 06 VarLevel2 PIC X(10).\\r\\n 05 Level2-2.\\r\\n 06 VarLevel2-2 PIC X(10).\\r\\n 05 MyBool PIC 9.\\r\\n PROCEDURE DIVISION.\\r\\n\\r\\n\\r\\n\\r\\n\\r\\n\\r\\n .\\r\\n END PROGRAM TestingPgm.\"}}"
},
{
"category": 1,
Expand Down Expand Up @@ -75,7 +75,7 @@
},
{
"category": 2,
"message": "{\"jsonrpc\":\"2.0\",\"id\":\"57\",\"result\":[{\"label\":\"W-Date (Numeric) (W-Date)\",\"kind\":6,\"insertText\":\"W-Date\"},{\"label\":\"W-Bool (Numeric) (W-Bool)\",\"kind\":6,\"insertText\":\"W-Bool\"},{\"label\":\"W-Numeric (Numeric) (W-Numeric)\",\"kind\":6,\"insertText\":\"W-Numeric\"},{\"label\":\"W-Alphabetic (Alphabetic) (W-Alphabetic)\",\"kind\":6,\"insertText\":\"W-Alphabetic\"},{\"label\":\"W-Alphanum (Alphanumeric) (W-Alphanum)\",\"kind\":6,\"insertText\":\"W-Alphanum\"},{\"label\":\"W-OutDate (Numeric) (W-OutDate)\",\"kind\":6,\"insertText\":\"W-OutDate\"},{\"label\":\"TestLevel (Alphanumeric) (TestLevel)\",\"kind\":6,\"insertText\":\"TestLevel\"},{\"label\":\"Level1 (Alphanumeric) (Level1)\",\"kind\":6,\"insertText\":\"Level1\"},{\"label\":\"Level2 (Alphanumeric) (Level2)\",\"kind\":6,\"insertText\":\"Level2\"},{\"label\":\"VarLevel2 (NumericEdited) (VarLevel2)\",\"kind\":6,\"insertText\":\"VarLevel2\"},{\"label\":\"Level2-2 (Alphanumeric) (Level2-2)\",\"kind\":6,\"insertText\":\"Level2-2\"},{\"label\":\"VarLevel2-2 (NumericEdited) (VarLevel2-2)\",\"kind\":6,\"insertText\":\"VarLevel2-2\"},{\"label\":\"MyBool (Numeric) (MyBool)\",\"kind\":6,\"insertText\":\"MyBool\"}]}"
"message": "{\"jsonrpc\":\"2.0\",\"id\":\"57\",\"result\":[{\"label\":\"W-Date (Numeric) (W-Date)\",\"kind\":6,\"insertText\":\"W-Date\"},{\"label\":\"W-Bool (Numeric) (W-Bool)\",\"kind\":6,\"insertText\":\"W-Bool\"},{\"label\":\"W-Numeric (Numeric) (W-Numeric)\",\"kind\":6,\"insertText\":\"W-Numeric\"},{\"label\":\"W-Alphabetic (Alphabetic) (W-Alphabetic)\",\"kind\":6,\"insertText\":\"W-Alphabetic\"},{\"label\":\"W-Alphanum (Alphanumeric) (W-Alphanum)\",\"kind\":6,\"insertText\":\"W-Alphanum\"},{\"label\":\"W-OutDate (Numeric) (W-OutDate)\",\"kind\":6,\"insertText\":\"W-OutDate\"},{\"label\":\"TestLevel (Alphanumeric) (TestLevel)\",\"kind\":6,\"insertText\":\"TestLevel\"},{\"label\":\"Level1 (Alphanumeric) (Level1)\",\"kind\":6,\"insertText\":\"Level1\"},{\"label\":\"Level2 (Alphanumeric) (Level2)\",\"kind\":6,\"insertText\":\"Level2\"},{\"label\":\"VarLevel2 (Alphanumeric) (VarLevel2)\",\"kind\":6,\"insertText\":\"VarLevel2\"},{\"label\":\"Level2-2 (Alphanumeric) (Level2-2)\",\"kind\":6,\"insertText\":\"Level2-2\"},{\"label\":\"VarLevel2-2 (Alphanumeric) (VarLevel2-2)\",\"kind\":6,\"insertText\":\"VarLevel2-2\"},{\"label\":\"MyBool (Numeric) (MyBool)\",\"kind\":6,\"insertText\":\"MyBool\"}]}"
},
{
"category": 0,
Expand Down
Loading