Project

General

Profile

sys_error.patch

Greg Shah, 11/27/2020 10:36 AM

Download (5.61 KB)

View differences:

src/com/goldencode/p2j/oo/lang/ProError.java
126 126
   }
127 127

  
128 128
   /**
129
    * Explicit constructor used by sub-classes.
130
    * 
131
    * @param    _msg
132
    *           The message.
133
    * @param    _num
134
    *           The message number.
135
    */
136
   protected ProError (character _msg, integer _num)
137
   {
138
      addMessage(_msg, _num);
139
   }
140
   
141
   /**
142
    * Explicit constructor used by sub-classes.
143
    * 
144
    * @param    _msg
145
    *           The message.
146
    * @param    _num
147
    *           The message number.
148
    */
149
   protected ProError (String _msg, int _num)
150
   {
151
      addMessage(new character(_msg), new integer(_num));
152
   }
153
   
154
   /**
129 155
    * The 'execute' method.  No-op, but it must exist.
130 156
    */
131 157
   public void __lang_ProError_execute__()
src/com/goldencode/p2j/oo/lang/SoapFaultError.java
66 66
package com.goldencode.p2j.oo.lang;
67 67

  
68 68
import com.goldencode.p2j.util.*;
69
import com.goldencode.p2j.oo.lang.*;
70 69

  
71 70
import static com.goldencode.p2j.util.BlockManager.*;
72 71
import static com.goldencode.p2j.report.ReportConstants.*;
......
81 80
public final class SoapFaultError
82 81
extends com.goldencode.p2j.oo.lang.SysError
83 82
{
84
   private handle soapFault = UndoableFactory.handle();
83
   private handle soapFault = TypeFactory.handle();
85 84

  
86
   public void __lang_SoapFaultError_execute__()
85
   protected SoapFaultError()
87 86
   {
88
      externalProcedure(SoapFaultError.this, new Block((Body) () -> 
89
      {
90
         {
91
         }
92
      }));
93
   }
94

  
95
   @LegacySignature(type = Type.CONSTRUCTOR)
96
   @LegacyResourceSupport(supportLvl = CVT_LVL_FULL|RT_LVL_STUB)
97
   public void __lang_SoapFaultError_constructor__()
98
   {
99
      internalProcedure(this, "__lang_SoapFaultError_constructor__", new Block((Body) () -> 
100
      {
101
         __lang_SysError_constructor__();
102
      }));
87
      super();
103 88
   }
104 89

  
105 90
   @LegacySignature(type = Type.GETTER, name = "SoapFault")
src/com/goldencode/p2j/oo/lang/SysError.java
68 68
package com.goldencode.p2j.oo.lang;
69 69

  
70 70
import static com.goldencode.p2j.report.ReportConstants.*;
71
import static com.goldencode.p2j.util.BlockManager.externalProcedure;
72
import static com.goldencode.p2j.util.BlockManager.internalProcedure;
73 71

  
74 72
import com.goldencode.p2j.util.*;
75
import com.goldencode.p2j.util.InternalEntry.Type;
76 73

  
77 74
/**
78 75
 * Implementation of the Progress.Lang.SysError builtin class.
......
83 80
extends ProError
84 81
{
85 82
   /**
86
    * The 'execute' method.  No-op, but it must exist.
83
    * Implicit constructor used by sub-classes.
87 84
    */
88
   public void __lang_SysError_execute__()
85
   protected SysError()
89 86
   {
90
      externalProcedure(this, new Block((Body) () -> 
91
      {
92
      }));
93
   }
94

  
95
   /**
96
    * Implicit, no parameter, method associated with the implicit legacy constructor for the
97
    * <code>Progress.Lang.SysError</code> class.
98
    */
99
   @LegacySignature(type = Type.CONSTRUCTOR)
100
   @LegacyResourceSupport(supportLvl = CVT_LVL_FULL|RT_LVL_BASIC)
101
   public void __lang_SysError_constructor__()
102
   {
103
      internalProcedure(this, "__lang_SysError_constructor__", new Block((Body) () -> 
104
      {
105
         __lang_ProError_constructor__();
106
      }));
87
      
107 88
   }
108 89
   
109 90
   /**
......
115 96
    * @param    _num
116 97
    *           The message number.
117 98
    */
118
   @LegacySignature(type = Type.CONSTRUCTOR, parameters = 
99
   protected SysError (character _msg, integer _num)
119 100
   {
120
      @LegacyParameter(name = "msg",  type = "CHARACTER", mode = "INPUT"),
121
      @LegacyParameter(name = "num",  type = "INTEGER", mode = "INPUT"),
122
   })
123
   @LegacyResourceSupport(supportLvl = CVT_LVL_FULL|RT_LVL_FULL)
124
   public void __lang_SysError_constructor__(character _msg, integer _num)
101
      this(_msg.getValue(), _num.intValue());
102
   }
103
   
104
   /**
105
    * Explicit method associated with a legacy constructor for the
106
    * <code>Progress.Lang.SysError</code> class.
107
    * 
108
    * @param    _msg
109
    *           The message.
110
    * @param    _num
111
    *           The message number.
112
    */
113
   protected SysError (String _msg, int _num)
125 114
   {
126
      character msg = TypeFactory.initInput(_msg);
127
      integer num = TypeFactory.initInput(_num);
128
      internalProcedure(this, "__lang_SysError_constructor__", new Block((Body) () -> 
129
      {
130
         msg.assign(ErrorManager.buildErrorText(num.intValue(), msg.getValue(), false, false));
131
         __lang_ProError_constructor__(msg, num);
132
      }));
115
      super(ErrorManager.buildErrorText(_num, _msg, false, false), _num);
133 116
   }
134 117
   
135 118
   /**
......
142 125
    */
143 126
   public static object<? extends SysError> newInstance(character msg, integer num)
144 127
   {
145
      return ObjectOps.newInstance(SysError.class, "II", msg, num);
128
      return newInstance(msg.getValue(), num.intValue());
146 129
   }
147 130
   
148 131
   /**
......
155 138
    */
156 139
   public static object<? extends SysError> newInstance(String msg, int num)
157 140
   {
158
      return ObjectOps.newInstance(SysError.class, "II", msg, num);
141
      return new object(new SysError(msg, num));
159 142
   }
160 143

  
144
   @Override
145
   public boolean isTracked()
146
   {
147
      return false;
148
   }
161 149
}