public VarLevel occursDependingRecord(int nNbOccurs, Var varOccurs) {
BaseProgramManager pm = getProgramManager();
if (pm.isFirstInstance()) {
m_OccursDef = new OccursDefRecordDependingVar(nNbOccurs, varOccurs);
}
return this;
}
public VarLevelGroup valueLowValue() {
BaseProgramManager pm = getProgramManager();
if (pm.isFirstInstance())
m_InitialValue = new CInitialValue(CobolConstant.LowValue.getValue(), true);
VarLevelGroup varLevelGroup = new VarLevelGroup(this);
return varLevelGroup;
}
public VarLevel occursDepending(int nNbOccurs, Var varOccurs) {
BaseProgramManager pm = getProgramManager();
if (pm.isFirstInstance()) // || pm.isLinkageSectionCurrent())
{
if (varOccurs.isBufferComputed()) occurs(varOccurs);
else occurs(nNbOccurs);
}
m_bVariableLength = true;
return this;
}
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";
}
public Edit editOccurs(int nNbOccurs, String csName) {
// remonter au dernier precedent de nivwau >= niveau courant
// si c'est un edit occurs; il faut completer son tableau d'items
BaseProgramManager pm = getProgramManager();
if (pm.isFirstInstance()) m_OccursDef = new OccursDef(nNbOccurs);
Edit varEdit = edit();
if (pm.isFirstInstance()) {
this.getProgramManager()
.getSharedProgramInstanceData()
.setVarFullName(varEdit.getVarDef().getId(), csName);
// varEdit.m_varDef.setFullName(csName);
}
return varEdit;
}
public VarLevelGroup valueAll(String cs) {
BaseProgramManager pm = getProgramManager();
if (pm.isFirstInstance()) m_InitialValue = new CInitialValue(cs, true);
VarLevelGroup varLevelGroup = new VarLevelGroup(this);
return varLevelGroup;
}
public VarLevel occurs(Var varOccurs) {
BaseProgramManager pm = getProgramManager();
if (pm.isFirstInstance()) // || pm.isLinkageSectionCurrent())
m_OccursDef = new OccursDefVar(varOccurs);
return this;
}
