пятница, 28 марта 2014 г.

BI IP

7.3

Конвертнул кубик с помощью программы SAP_CONVERT_NORMAL_TRANS в транзационный. Но система всё равно не видела его правильно. Пришлось достать из мультика, активировать и затащить снова - тогда всё нормализовалось.

Понадобилось запустить функцию планирования при старте рабочей книги.
После некоторого "исследования" получилась такая схема.

2 кнопка - Расчет и Reset

Для глобальной переменной пришлось создать отдельный модуль
Option Explicit
Public pRun As Integer



и код
'----------------------------------------------------------------------------------------
'--- Call-Back Macro: Executed on Refresh for each Table Item
'----------------------------------------------------------------------------------------
Sub CallBack(ParamArray varname())
  'varname(0): BExExcelItem.DataProvider.Name
  'varname(1): BExExcelItem.Range
  'varname(2): BExExcelItem.Name
 
  If pRun = 0 Then
    'hide activity
    Application.Interactive = False
    Application.EnableEvents = False
    Application.DisplayAlerts = False
    Application.ScreenUpdating = False
    
    'reset previous result
    'pRun = pRun + 1
    'Application.Run ("test.xlsm!Sheet2.BUTTON_40_Click")
    
    'calculate
    pRun = 2
    'Application.Run ("test.xlsm!Sheet2.BUTTON_38_Click")
    Call ThisWorkbook.Sheets(2).BUTTON_38_Click
    
    pRun = 0
    Application.Interactive = True
    Application.EnableEvents = True
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
    Exit Sub 'we don't need update screen
      
  ElseIf pRun = 1 Then
    Exit Sub 'we don't need update screen
    
  Else       'update screen
    pRun = 0 'if button pressed
  End If
 
  'Remember current EnableEvents setting and set to False (disable)!

Комментариев нет: