View Create via Prozess in TM1

 

 

 

#****Begin: Generated Statements***

 

#System-Subsets und -Views erneuern, um diese für die automatische Aktualisierung fehlerfrei verwenden zu können:

 

#Löschen bestehender, ggf. durch User veränderte System-Views

IF( ViewExists(‘P01 Erfolgsplan’, ‘P01 Export System’) = 1);

ViewDestroy(‘P01 Erfolgsplan’, ‘P01 Export System’);

ENDIF;

 

 

#Löschen bestehender, ggf. durch User veränderter System-Subsets

IF( SubsetExists(‘Planversionen’, ‘Planversionen Export System’) = 1);

SubsetDestroy(‘Planversionen’, ‘Planversionen Export System’);

ENDIF;

IF( SubsetExists(‘Kostenstellen’, ‘Kostenstellen Export System’) = 1);

SubsetDestroy(‘Kostenstellen’, ‘Kostenstellen Export System’);

ENDIF;

IF( SubsetExists(‘Kostentraeger’, ‘Kostentraeger Export System’) = 1);

SubsetDestroy(‘Kostentraeger’, ‘Kostentraeger Export System’);

ENDIF;

IF( SubsetExists(‘Erfolgskonten’, ‘Erfolgskonten Export System’) = 1);

SubsetDestroy(‘Erfolgskonten’, ‘Erfolgskonten Export System’);

ENDIF;

IF( SubsetExists(‘Zeit Planung’, ‘Zeit Planung Export System’) = 1);

SubsetDestroy(‘Zeit Planung’, ‘Zeit Planung Export System’);

ENDIF;

IF( SubsetExists(‘Kennzahlen Erfolgsplan’, ‘Kennzahlen Erfolgsplan Export System’) = 1);

SubsetDestroy(‘Kennzahlen Erfolgsplan’, ‘Kennzahlen Erfolgsplan Export System’);

ENDIF;

 

#Neuerstellung der System-Subsets. Als Label wird automatisch der ‘Unveränderliche Name’ verwendet. Dieser ist für alle Prozesse, die System-Subsets verwenden, erforderlich.

#nur aktualisierte Planversionen

SubsetCreateByMDX(‘Planversionen Export System’, ‘TM1FILTERBYLEVEL( DESCENDANTS( {[Planversionen].[PV901], [Planversionen].[PV902]} ), 0 )’, ‘Planversionen’);

SubsetCreateByMDX(‘Kostenstellen Export System’, ‘TM1FILTERBYLEVEL({TM1SUBSETALL([Kostenstellen])},0)’, ‘Kostenstellen’);

SubsetCreateByMDX(‘Kostentraeger Export System’, ‘TM1FILTERBYLEVEL({TM1SUBSETALL([Kostentraeger])},0)’, ‘Kostentraeger’);

SubsetCreateByMDX(‘Erfolgskonten Export System’, ‘TM1FILTERBYLEVEL({TM1SUBSETALL([Erfolgskonten])},0)’, ‘Erfolgskonten’);

#nur Monate, die für Umlageberechnung vorgesehen sind

SubsetCreateByMDX(‘Zeit Planung Export System’, ‘FILTER(TM1FILTERBYLEVEL({DESCENDANTS([Zeit Planung].[Kalenderzeit])}, 0), [Zeit Planung].[IstUmlageZuBerechnen] = -1)’, ‘Zeit Planung’);

SubsetCreateByMDX(‘Kennzahlen Erfolgsplan Export System’, ‘{[Kennzahlen Erfolgsplan].[Saldo_Ist],[Kennzahlen Erfolgsplan].[Saldo_Plan]}’, ‘Kennzahlen Erfolgsplan’);

 

#Neuerstellung der System-Views unter Verwendung der System-Subsets.

ViewCreate(‘P01 Erfolgsplan’, ‘P01 Export System’);

ViewColumnDimensionSet(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Kostenstellen’, 1);

ViewRowDimensionSet(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Kennzahlen Erfolgsplan’, 1);

ViewTitleDimensionSet(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Planversionen’);

ViewTitleDimensionSet(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Erfolgskonten’);

ViewTitleDimensionSet(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Kostentraeger’);

ViewTitleDimensionSet(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Zeit Planung’);

 

#Zuweisen der System-Subsets zu den neu ertellten System-Views

ViewSubsetAssign(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Planversionen’, ‘Planversionen Export System’);

ViewSubsetAssign(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Kostentraeger’, ‘Kostentraeger Export System’);

ViewSubsetAssign(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Kostenstellen’, ‘Kostenstellen Export System’);

ViewSubsetAssign(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Erfolgskonten’, ‘Erfolgskonten Export System’);

ViewSubsetAssign(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Zeit Planung’, ‘Zeit Planung Export System’);

ViewSubsetAssign(‘P01 Erfolgsplan’, ‘P01 Export System’, ‘Kennzahlen Erfolgsplan’, ‘Kennzahlen Erfolgsplan Export System’);

 

#Start des Hauptprozesses

ExecuteProcess(‘E TM1P01Erfolgsplan P01’);