M/VisualSapfor
1
1
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

++

Browse Source 
распределение в json, еще нашел внесенный переходом баг с отображением массивов текущего файла.
This commit is contained in:
02090095
2025-05-18 18:12:30 +03:00
parent cba4425cd7
commit 41ce6527d5
9 changed files with 66 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/_VisualDVM/ProjectData/SapforData/Arrays/AlignRule.java
View File

@@ -41,10 +41,8 @@ public class AlignRule {
}
public void Init(){
//--
if (packedAlignArrayAddress !=null)
alignArray_address = new BigInteger(packedAlignArrayAddress);
if (packedAlignWithAddress !=null)
alignWith_address = new BigInteger(packedAlignWithAddress);
alignArray_address = new BigInteger(packedAlignArrayAddress);
alignWith_address = new BigInteger(packedAlignWithAddress);
//--
packedAlignArrayAddress = null;
packedAlignWithAddress = null;

7
src/_VisualDVM/ProjectData/SapforData/Arrays/ProjectArray.java
View File

@@ -154,15 +154,18 @@ public class ProjectArray extends DBObject {
//короткое имя+ функция/модуль/комон+ размерность
UniqKey = shortName + locName + dimSize;
if (packedAddress != null) address = new BigInteger(packedAddress);
for (ArrayDecl arrayDecl : declPlaces)
for (ArrayDecl arrayDecl : declPlaces) {
arrayDecl.arrayName = shortName;
arrayDecl.file = Utils_.toW(arrayDecl.file);
arrayDecl.messages_presence = "OK";
}
//-- полей нет в json поэтому они null
regIDs = new Vector<>();
dimensions = new Vector<>();
links = new LinkedHashMap<>();
ac_current = new LinkedHashMap<>();
ac_new = new LinkedHashMap<>();
//--
//--FileForm
}
public static String fill_binary(int d, String binary) {
int delta = Math.abs(binary.length() - d);