Skip to content

Commit

Permalink
Better handling of generated INT routines in project folders (intersy…
Browse files Browse the repository at this point in the history
  • Loading branch information
isc-bsaviano authored Feb 22, 2024
1 parent 4abf622 commit 9ada3df
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion src/utils/FileProviderUtil.ts
Original file line number Diff line number Diff line change
Expand Up @@ -43,7 +43,8 @@ export async function projectContentsFromUri(uri: vscode.Uri, overrideFlat?: boo
"(pil.Type = 'CLS' AND ?||sod.Name = pil.Name||'.cls') OR (pil.Type = 'PKG' AND ?||sod.Name = pil.Name) OR " +
"((pil.Type = 'CLS' OR pil.Type = 'PKG') AND pil.Name %STARTSWITH ?||sod.Name||'.') " +
"WHERE pil.Type = 'CLS' OR pil.Type = 'PKG' " +
"UNION SELECT CASE WHEN $LENGTH(SUBSTR(sod.Name,?),'.') > 2 THEN $PIECE(SUBSTR(sod.Name,?),'.') ELSE SUBSTR(sod.Name,?) END Name, pil.Type FROM " +
'UNION SELECT CASE WHEN ($LENGTH(SUBSTR(sod.Name,?),\'.\') > 2 AND NOT (SUBSTR(sod.Name,?) %PATTERN \'.E1"."0.1"G"1N1".int"\')) ' +
"THEN $PIECE(SUBSTR(sod.Name,?),'.') ELSE SUBSTR(sod.Name,?) END Name, pil.Type FROM " +
"%Library.RoutineMgr_StudioOpenDialog(?,1,1,1,1,0,1) AS sod JOIN %Studio.Project_ProjectItemsList(?) AS pil ON " +
"pil.Type = 'MAC' AND sod.Name = pil.Name " +
"UNION SELECT sod.Name, pil.Type FROM " +
Expand All @@ -65,6 +66,7 @@ export async function projectContentsFromUri(uri: vscode.Uri, overrideFlat?: boo
l,
l,
l,
l,
`${folderDots}*.${["mac", "int", "inc", "bas", "mvi"].join(`,${folderDots}*.`)}`,
project,
folder + "*",
Expand Down

0 comments on commit 9ada3df

Please sign in to comment.