Add tests for bracket usage and introduce stat procedure

Signed-off-by: worksofliam <mrliamallan@live.co.uk>

Author: worksofliam

tests/rpgle/stat.rpgleinc

@@ -0,0 +1,3 @@
+     D stat            PR            10I 0 ExtProc('stat')
+     D  filename                    *   value
+     D  buf                            *   value

tests/suite/linter.test.ts

@@ -3541,4 +3541,42 @@ test('issue_358_no_reference_2', async () => {
       expect(parm.name.toUpperCase()).toBe(lines.substring(ref.offset.start, ref.offset.end).toUpperCase());
     }
   }
+});
+
+test('issue_361_bracket_usage', async () => {
+  const lines = [
+    `**FREE`,
+    `/copy stat`,
+    ``,
+    `EXEC SQL`,
+    `  DECLARE UserInput CURSOR FOR`,
+    `    SELECT field FROM file`,
+    `    WHERE  field = :code`,
+    `    ORDER BY field ASC;`,
+    ``,
+    `EXEC SQL`,
+    `  OPEN UserInput;`,
+    ``,
+    `EXEC SQL`,
+    `  FETCH NEXT FROM UserInput INTO :MyRpgVar`,
+    `   For Read Only With NC;`,
+    ``,
+    `Dow SQLSTATE = '00000';`,
+    `  EXEC SQL`,
+    `    FETCH NEXT FROM UserInput INTO :MyRpgVar;`,
+    `ENDDO;`,
+    ``,
+    `EXEC SQL`,
+    `  CLOSE UserInput;`,
+  ].join(`\n`);
+
+  const cache = await parser.getDocs(uri, lines, { ignoreCache: true, collectReferences: true, withIncludes: true });
+
+  expect(cache.includes.length).toBe(1);
+  
+  const { errors } = Linter.getErrors({ uri, content: lines }, {
+    RequiresParameter: true
+  });
+
+  expect(errors.length).toBe(0);
 });