コード例 #1
0
ファイル: VarDefBase.java プロジェクト: charleso/naca
 public void getChildrenEncodingConvertiblePosition(
     VarDefEncodingConvertibleManager varDefEncodingConvertibleManager) {
   if (m_arrChildren != null) {
     int nNbChildren = m_arrChildren.size();
     for (int nChild = 0; nChild < nNbChildren; nChild++) {
       VarDefBase varDefChild = getChild(nChild);
       if (!varDefChild.isARedefine())
         varDefChild.getChildrenEncodingConvertiblePosition(varDefEncodingConvertibleManager);
     }
   } else // No child: We are a final node
   {
     if (!isARedefine() && isEbcdicAsciiConvertible()) {
       int nNbDim = getNbDim();
       if (nNbDim == 0) varDefEncodingConvertibleManager.add(this);
       else if (nNbDim == 1) {
         TempCache cache = TempCacheLocator.getTLSTempCache();
         int nNbX = getMaxIndexAtDim(0);
         for (int x = 0; x < nNbX; x++) {
           VarDefBuffer varDefItem = getCachedGetAt(cache, x + 1);
           if (varDefItem != null) varDefEncodingConvertibleManager.add(varDefItem);
           cache.resetTempVarIndex(varDefItem.getTypeId());
         }
       } else if (nNbDim == 2) {
         TempCache cache = TempCacheLocator.getTLSTempCache();
         int nNbY = getMaxIndexAtDim(1);
         int nNbX = getMaxIndexAtDim(0);
         for (int y = 0; y < nNbY; y++) {
           for (int x = 0; x < nNbX; x++) {
             VarDefBuffer varDefItem = getCachedGetAt(cache, y + 1, x + 1);
             if (varDefItem != null) varDefEncodingConvertibleManager.add(varDefItem);
             cache.resetTempVarIndex(varDefItem.getTypeId());
           }
         }
       } else if (nNbDim == 3) {
         TempCache cache = TempCacheLocator.getTLSTempCache();
         int nNbZ = getMaxIndexAtDim(2);
         int nNbY = getMaxIndexAtDim(1);
         int nNbX = getMaxIndexAtDim(0);
         for (int z = 0; z < nNbZ; z++) {
           for (int y = 0; y < nNbY; y++) {
             for (int x = 0; x < nNbX; x++) {
               VarDefBuffer varDefItem = getCachedGetAt(cache, z + 1, y + 1, x + 1);
               if (varDefItem != null) varDefEncodingConvertibleManager.add(varDefItem);
               cache.resetTempVarIndex(varDefItem.getTypeId());
             }
           }
         }
       }
     }
   }
 }
コード例 #2
0
ファイル: VarLevel.java プロジェクト: rplandgraf/naca
 public Var filler() {
   DeclareTypeG declareTypeG = TempCacheLocator.getTLSTempCache().getDeclareTypeG();
   declareTypeG.set(this);
   VarGroup var2G = new VarGroup(declareTypeG);
   var2G.declareAsFiller();
   return var2G;
 }
コード例 #3
0
ファイル: VarLevel.java プロジェクト: rplandgraf/naca
  public DeclareTypeX picX(int nLength) {
    DeclareTypeX declareTypeX = TempCacheLocator.getTLSTempCache().getDeclareTypeX();
    declareTypeX.set(this, nLength);
    if (m_bVariableLength) declareTypeX.setVariableLengthDeclaration();

    // DeclareTypeX varLevelX = new DeclareTypeX(this, nLength);
    return declareTypeX;
  }
コード例 #4
0
ファイル: VarLevel.java プロジェクト: rplandgraf/naca
 public VarGroup var() // Creates a group
     {
   DeclareTypeG declareTypeG = TempCacheLocator.getTLSTempCache().getDeclareTypeG();
   declareTypeG.set(this);
   if (m_bVariableLength) declareTypeG.setVariableLengthDeclaration();
   VarGroup var2G = new VarGroup(declareTypeG);
   return var2G;
 }
コード例 #5
0
ファイル: VarLevel.java プロジェクト: rplandgraf/naca
  // Screen resource management: No .var() to add
  // Map redefine management
  public MapRedefine redefinesMap(Form formRedefineOrigin) {
    DeclareTypeMapRedefine declareTypeMapRedefine =
        TempCacheLocator.getTLSTempCache().getDeclareTypeMapRedefine();
    declareTypeMapRedefine.set(this, formRedefineOrigin);

    MapRedefine var2MapRedefine = new MapRedefine(declareTypeMapRedefine);
    return var2MapRedefine;
  }
コード例 #6
0
ファイル: VarLevel.java プロジェクト: rplandgraf/naca
 public Edit edit() // Edit in a map redefine
     {
   TempCache tempCache = TempCacheLocator.getTLSTempCache();
   DeclareTypeEditInMapRedefine declareTypeEditInMapRedefine =
       tempCache.getDeclareTypeEditInMapRedefine();
   declareTypeEditInMapRedefine.set(this);
   EditInMapRedefine var2Edit = new EditInMapRedefine(declareTypeEditInMapRedefine);
   return var2Edit;
 }
コード例 #7
0
ファイル: CESMStart.java プロジェクト: rplandgraf/naca
 public void doStart() {
   if (!m_csTermID.equals("")) {
     assertIfFalse(m_Environment.getTerminalID().equals(m_csTermID));
     m_Environment.enqueueProgram(m_csTransID, m_data);
   } else {
     TempCache t = TempCacheLocator.getTLSTempCache();
     String csCurrentProgram = t.getProgramManager().getProgramName();
     m_Environment.StartAsynchronousProgram(
         m_csTransID, csCurrentProgram, m_data, m_nIntervalTimeSeconds);
   }
 }
コード例 #8
0
ファイル: VarDefBase.java プロジェクト: charleso/naca
 public String toString() {
   BaseProgramManager programManager = TempCacheLocator.getTLSTempCache().getProgramManager();
   if (programManager != null) {
     SharedProgramInstanceData s = programManager.getSharedProgramInstanceData();
     if (s != null) {
       return toDump(s);
     }
     return "Unknown SharedProgramInstanceData";
   }
   return "Unknown BaseProgramManager";
 }
コード例 #9
0
ファイル: VarLevel.java プロジェクト: rplandgraf/naca
 public DeclareTypeNumEdited pic9(String csFormat) {
   DeclareTypeNumEdited declareTypeNumEdited =
       TempCacheLocator.getTLSTempCache().getDeclareTypeNumEdited();
   declareTypeNumEdited.set(this, csFormat);
   return declareTypeNumEdited;
 }
コード例 #10
0
ファイル: VarLevel.java プロジェクト: rplandgraf/naca
 private DeclareType9 pic9Define(boolean bSigned, int nNbDigitInteger, int nNbDigitDecimal) {
   DeclareType9 declareType9 = TempCacheLocator.getTLSTempCache().getDeclareType9();
   declareType9.set(this, bSigned, nNbDigitInteger, nNbDigitDecimal);
   // DeclareType9 varLevel9 = new DeclareType9(this, bSigned, nNbDigitInteger, nNbDigitDecimal);
   return declareType9;
 }