0 Replies Latest reply: Aug 13, 2007 12:04 PM by 3004 RSS

    HFM Rules - Use of HS.Account.List(", ") causes application hang

    3004
      <p>The section below causes the application to "hang"even for a base entity. Are there anyone with some hints onwhy?</p><p> </p><p>The next problem is that I do not find another way to "killthe hanging" than to reboot the server. Is there any way tostop/restart / kill all processes towards one application? Thereare two applications in one cluster/server.</p><p> </p><p>If Scenario = "12mndR" Then<br><br>AccList =HS.Account.List("Balanse","[Base]")<br>For each Account in AccList<br><br>Dim balvar, periode, aar<br><br>balvar=0<br>periode= HS.Period.Number<br>aar=HS.Year.Member<br><br>WriteToFile("balvar: " & balvar)<br>WriteToFile("Entity#" & Entity & ",Account#" & Account & ", Custom#" &Custom1 & ", Scenario#" & Scenario & ",Custom2#" & Custom2)<br>WriteToFile("periode: " &periode)<br>WriteToFile("aar: " &aar)<br><br>' For x=0 To x=11<br>' WriteToFile("x: " &x)<br>' periode=periode-1<br>'<br>' If periode=1 Then<br>' aar=aar-1<br>' periode=12<br>' balvar=balvar HS.GetCell("A#Account.S#Virkelig.P#Des.Y#"&aar&"")<br> ' WriteToFile("balvartxt: " & balvar)<br>' WriteToFile("Entity#" & Entity & ",Account#" & Account)<br>' WriteToFile("periode: " &periode)<br>' WriteToFile("aar: " &aar)<br>' Else<br>' mnd=HS.Period.IDFromMember(periode)<br>' balvar=balvar "A#" & Account &".S#Virkelig.P#"&mnd&".Y#"&aar&""<br> ' 'balvar=balvar + HS.GetCell("A#" & Account &".S#Virkelig.P#Jun.Y#"&aar&"")<br>' WriteToFile("balvartxt: " & balvar)<br>' WriteToFile("Entity#" & Entity & ",Account#" & Account)<br>' WriteToFile("periode: " &periode)<br>' WriteToFile("aar: " &aar)<br>' End If 'If periode=1<br><br>' Next 'next x<br><br>HS.Exp "A#" &Account& "="&balvar&"/12"<br><br><br><br>Next ' next account<br><br><br>End IF 'Scenario = "12mndR"</p>