Permalink
Browse files

version 3.02 to 3.10

Minor fix to incorrect pDebug param in some processes. Addition of some new processes including creation and deletion of cell security cubes.
  • Loading branch information...
lotsaram committed Oct 25, 2017
1 parent c01d7f3 commit 68faddd024dab139feb9c473ef347d8f6fe02c76
Showing with 3,634 additions and 365 deletions.
  1. +167 −0 Bedrock.Chore.DayInMonth.Run.pro
  2. +3 −3 Bedrock.Chore.DayOfWeek.Run.pro
  3. +170 −0 Bedrock.Chore.TimeOfDay.Run.pro
  4. +4 −4 Bedrock.Cube.Clone.pro
  5. +819 −0 Bedrock.Cube.Create.pro
  6. +195 −0 Bedrock.Cube.Data.Clear.All.pro
  7. +3 −3 Bedrock.Cube.Data.Clear.pro
  8. +161 −17 Bedrock.Cube.Data.Copy.pro
  9. +469 −19 Bedrock.Cube.Data.Export.pro
  10. +22 −11 Bedrock.Cube.Data.ImportFromFile.pro
  11. +4 −4 Bedrock.Cube.Data.ViewExportToFile.pro
  12. +3 −3 Bedrock.Cube.Delete.pro
  13. +25 −13 Bedrock.Cube.Dimension.Replace.pro
  14. +201 −0 Bedrock.Cube.Rule.ProcessFeeders.pro
  15. +9 −2 Bedrock.Cube.Rule.Unload.pro
  16. +3 −3 Bedrock.Cube.View.Create.pro
  17. +3 −3 Bedrock.Cube.View.Delete.pro
  18. +19 −11 Bedrock.Cube.View.Publish.pro
  19. +3 −3 Bedrock.Cube.ViewAndSubsets.Create.pro
  20. +3 −3 Bedrock.Cube.ViewAndSubsets.Delete.pro
  21. +3 −3 Bedrock.Dim.AllConsols.Delete.pro
  22. +3 −3 Bedrock.Dim.AllElements.Delete.pro
  23. +2 −2 Bedrock.Dim.Attr.Delete.pro
  24. +21 −13 Bedrock.Dim.Attr.ImportFromFile.pro
  25. +2 −2 Bedrock.Dim.Attr.Insert.pro
  26. +3 −3 Bedrock.Dim.Attr.SwapAlias.pro
  27. +16 −5 Bedrock.Dim.Clone.pro
  28. +9 −2 Bedrock.Dim.CloneFromSubset.Flat.pro
  29. +21 −8 Bedrock.Dim.CloneFromSubset.pro
  30. +3 −3 Bedrock.Dim.Consol.Create.Leaf.pro
  31. +3 −3 Bedrock.Dim.Create.pro
  32. +3 −3 Bedrock.Dim.Destroy.pro
  33. +3 −3 Bedrock.Dim.Element.Component.Add.pro
  34. +3 −3 Bedrock.Dim.Element.Component.Delete.pro
  35. +34 −15 Bedrock.Dim.Element.Create.pro
  36. +3 −3 Bedrock.Dim.Element.Delete.pro
  37. +3 −3 Bedrock.Dim.Element.Move.pro
  38. +3 −3 Bedrock.Dim.EmptyConsols.Delete.pro
  39. +19 −11 Bedrock.Dim.Export.pro
  40. +18 −10 Bedrock.Dim.Hierarchy.Create.FromAttribute.pro
  41. +4 −4 Bedrock.Dim.Hierarchy.Unwind.All.pro
  42. +4 −4 Bedrock.Dim.Hierarchy.Unwind.Consolidation.pro
  43. +5 −5 Bedrock.Dim.Import.pro
  44. +54 −22 Bedrock.Dim.Sub.Clone.pro
  45. +2 −2 Bedrock.Dim.Sub.Create.All.pro
  46. +2 −2 Bedrock.Dim.Sub.Create.Attribute.All.pro
  47. +2 −2 Bedrock.Dim.Sub.Create.Attribute.Leaf.pro
  48. +7 −14 Bedrock.Dim.Sub.Create.ByElement.pro
  49. +3 −3 Bedrock.Dim.Sub.Create.ByLevel.pro
  50. +14 −7 Bedrock.Dim.Sub.Create.ByMDX.pro
  51. +2 −2 Bedrock.Dim.Sub.Create.Consolidation.All.pro
  52. +2 −2 Bedrock.Dim.Sub.Create.Consolidation.Leaf.pro
  53. +2 −2 Bedrock.Dim.Sub.Create.Leaf.pro
  54. +3 −3 Bedrock.Dim.Sub.Create.Orphans.pro
  55. +3 −3 Bedrock.Dim.Sub.Create.TopLevelHierarchy.pro
  56. +12 −5 Bedrock.Dim.Sub.Create.pro
  57. +233 −0 Bedrock.Dim.Sub.Delete.SubsetDestroy.pro
  58. +36 −15 Bedrock.Dim.Sub.Delete.pro
  59. +3 −3 Bedrock.Dim.Sub.Exclude.pro
  60. +4 −4 Bedrock.Dim.Sub.ExportToFile.pro
  61. +3 −3 Bedrock.Security.Client.Create.pro
  62. +3 −3 Bedrock.Security.Client.Delete.pro
  63. +3 −3 Bedrock.Security.Client.Group.Assign.pro
  64. +3 −3 Bedrock.Security.Client.Password.Reset.pro
  65. +2 −2 Bedrock.Security.ClientGroupSetup.pro
  66. +297 −0 Bedrock.Security.Cube.CellSecurity.Create.pro
  67. +254 −0 Bedrock.Security.Cube.CellSecurity.Destroy.pro
  68. +3 −3 Bedrock.Security.Group.Create.pro
  69. +3 −3 Bedrock.Security.Group.Delete.pro
  70. +3 −3 Bedrock.Security.Object.Assign.pro
  71. +3 −3 Bedrock.Security.Refresh.pro
  72. +3 −3 Bedrock.Server.DataDir.Backup.pro
  73. +3 −3 Bedrock.Server.DataDir.ListContents.pro
  74. +156 −0 Bedrock.Server.DeleteAllPersistentFeeders.pro
  75. +16 −8 Bedrock.Server.LogFile.Delete.pro
  76. +3 −3 Bedrock.Server.SaveDataAll.pro
  77. +16 −13 Bedrock.Server.Wait.pro
  78. +2 −2 Bedrock.Server.WriteToMessageLog.pro
@@ -0,0 +1,167 @@
601,100
602,"Bedrock.Chore.DayInMonth.Run"
562,"NULL"
586,
585,
564,
565,"bmaiKP0ujPW^`QNl5`sXIVDmX5=S>C:4kWWB8SN2@WujsTUMqN:=9b5_`zQ27qE0P_ynjmb9h01m9r447eysUI<x3W`V@?]PLd=gIf^]<_>rv3irfIi`qH2hk3MW]ykV?siLRAni3T^Q7BFed=S@6qbrBT5;LLKhbSqX@n7]pJvNk8z@CCe=uzO_Hc9HALs>fwoIDEdN"
559,1
928,0
593,
594,
595,
597,
598,
596,
800,
801,
566,0
567,","
588,"."
589,
568,""""
570,
571,
569,0
592,0
599,1000
560,3
pDays
pDelimiter
pDebug
561,3
2
2
1
590,3
pDays,""
pDelimiter,"&"
pDebug,0
637,3
pDays,"Delimited string of days in month as dd e.g. 1 & 2 & 30 & 31"
pDelimiter,""
pDebug,"Debug Mode"
577,0
578,0
579,0
580,0
581,0
582,0
603,0
572,64
#****Begin: Generated Statements***
#****End: Generated Statements****
####################################################################################
##~~Copyright bedrocktm1.org 2011 www.bedrocktm1.org/how-to-licence.php Ver 3.1.0~~##
#####################################################################################
# This process will quit a chore if the day of the month does not validate against the parameter.
### Constants ###
cProcess = 'Bedrock.Chore.DayInMonth.Run';
cTimeStamp = TimSt( Now, '\Y\m\d\h\i\s' );
sRandomInt = NumberToString( INT( RAND( ) * 1000 ));
cDebugFile = GetProcessErrorFileDirectory | cProcess | '.' | cTimeStamp | '.' | sRandomInt ;
### Initialise Debug ###
If( pDebug >= 1 );
# Set debug file name
sDebugFile = cDebugFile | 'Prolog.debug';
# Log start time
AsciiOutput( sDebugFile, 'Process Started: ' | TimSt( Now, '\d-\m-\Y \h:\i:\s' ) );
# Log parameters
AsciiOutput( sDebugFile, 'Parameters: pDays: ' | pDays );
AsciiOutput( sDebugFile, ' pDelimiter: ' | pDelimiter );
AsciiOutput( sDebugFile, '' );
EndIf;
################################
##~~ Check whether to run: do not run during overnight batch window
sDay = TIMST(NOW, '\d');
bQuit = 0;
IF( Scan( sDay, pDays ) = 0 & Scan( pDelimiter | sDay, pDays ) = 0 & Scan( sDay | pDelimiter, pDays ) = 0 & Scan( pDelimiter |' '| sDay, pDays ) = 0 & Scan( sDay |' '| pDelimiter, pDays ) = 0 );
# could not find the day in the list of acceptable days
bQuit = 1;
Else;
# day is within the list of run params are, proceed as normal
EndIF;
If( pDebug >= 1 );
AsciiOutput( sDebugFile, 'The day of the month is: ' | sDay );
EndIf;
If( bQuit = 1 );
If( pDebug >= 1 );
AsciiOutput( sDebugFile, 'Chore will quit.' );
# Log finish time
AsciiOutput( sDebugFile, 'Process Finished: ' | TimSt( Now, '\d-\m-\Y \h:\i:\s' ) );
EndIf;
If( pDebug <= 1 );
ChoreQuit;
EndIf;
EndIf;
573,3
#****Begin: Generated Statements***
#****End: Generated Statements****
574,3
#****Begin: Generated Statements***
#****End: Generated Statements****
575,3
#****Begin: Generated Statements***
#****End: Generated Statements****
576,CubeAction=1511 DataAction=1503 CubeLogChanges=0
930,0
638,1
804,0
1217,0
900,
901,
902,
938,0
937,
936,
935,
934,
932,0
933,0
903,
906,
929,
907,
908,
904,0
905,0
909,0
911,
912,
913,
914,
915,
916,
917,0
918,1
919,0
920,50000
921,""
922,""
923,0
924,""
925,""
926,""
927,""
@@ -1,4 +1,4 @@
601,100
601,100
602,"Bedrock.Chore.DayOfWeek.Run"
562,"NULL"
586,
@@ -60,7 +60,7 @@ pWednesday,"(1) Run Chore on Wednesday"
pThursday,"(1) Run Chore on Thursday"
pFriday,"(1) Run Chore on Friday"
pSaturday,"(1) Run Chore on Saturday"
pDebug,"Debug Mode."
pDebug,"Debug Mode"
577,0
578,0
579,0
@@ -75,7 +75,7 @@ pDebug,"Debug Mode."
####################################################################################
##~~Copyright bedrocktm1.org 2011 www.bedrocktm1.org/how-to-licence.php Ver 2.0.2~~##
##~~Copyright bedrocktm1.org 2011 www.bedrocktm1.org/how-to-licence.php Ver 3.1.0~~##
#####################################################################################
# This process will quit a chore if the day of the week index does not validate against the week parameter.
@@ -0,0 +1,170 @@
601,100
602,"Bedrock.Chore.TimeOfDay.Run"
562,"NULL"
586,
585,
564,
565,"qQJN=D7XtdwC49UAja;bC8:1q\_P?[@r5upyWiau>wpEUj[Ij<TP^;<vkaEBPra6GJbzCsc[W=UEI1e>BI3uoBFu2_m>2kRn\pk]NVdCyPy7DStjzOeCa2DZDGrs0YleUp6xaGMYhnWx<8yrErfYR4l0yedNU>6`=QK^AxEs=wQa?2@MWcV_?9Z[2`12AFZg=ZQnoCK4"
559,1
928,0
593,
594,
595,
597,
598,
596,
800,
801,
566,0
567,","
588,"."
589,
568,""""
570,
571,
569,0
592,0
599,1000
560,3
pStartTime
pEndTime
pDebug
561,3
1
1
1
590,3
pStartTime,7
pEndTime,22
pDebug,0
637,3
pStartTime,"Time to start running chore from in 24 hr time (at start of hour)"
pEndTime,"Time to finish chore being able to start in 24 hr time (at end of hour)"
pDebug,"Debug Mode"
577,0
578,0
579,0
580,0
581,0
582,0
603,0
572,67
#****Begin: Generated Statements***
#****End: Generated Statements****
####################################################################################
##~~Copyright bedrocktm1.org 2011 www.bedrocktm1.org/how-to-licence.php Ver 3.1.0~~##
#####################################################################################
# This process will quit a chore if the day of the week index does not validate against the week parameter.
### Constants ###
cProcess = 'Bedrock.Chore.TimeOfDay.Run';
cTimeStamp = TimSt( Now, '\Y\m\d\h\i\s' );
sRandomInt = NumberToString( INT( RAND( ) * 1000 ));
cDebugFile = GetProcessErrorFileDirectory | cProcess | '.' | cTimeStamp | '.' | sRandomInt ;
### Initialise Debug ###
If( pDebug >= 1 );
# Set debug file name
sDebugFile = cDebugFile | 'Prolog.debug';
# Log start time
AsciiOutput( sDebugFile, 'Process Started: ' | TimSt( Now, '\d-\m-\Y \h:\i:\s' ) );
# Log parameters
AsciiOutput( sDebugFile, 'Parameters: pStarttime: ' | NumberToString ( pStarttime) );
AsciiOutput( sDebugFile, ' pEndtime: ' | NumberToString ( pEndtime) );
AsciiOutput( sDebugFile, '' );
EndIf;
################################
##~~ Check whether to run: do not run during overnight batch window
sMinute = TIMST(NOW, '\h:\i:00');
vTimeNow = StringToNumber(SubSt(sMinute, 1, 2));
bQuit = 0;
IF( pStartTime = 0 % pEndTime = 0 % pEndTime <= pStartTime );
# time exclusion parameters are incorrect so we ignire them
ElseIF( vTimeNow < pStartTime % vTimeNow > pEndTime );
# exclusion params are OK and we are in the exclusion zone do not execute Data tab, proceed directly to Epilog
bQuit = 1;
Else;
# exclusion params are OK and we are not in the exclusion zone, proceed as normal
EndIF;
If( pDebug >= 1 );
AsciiOutput( sDebugFile, 'Time is: ' | sMinute );
EndIf;
If( bQuit = 1 );
If( pDebug >= 1 );
AsciiOutput( sDebugFile, 'Chore will quit.' );
# Log finish time
AsciiOutput( sDebugFile, 'Process Finished: ' | TimSt( Now, '\d-\m-\Y \h:\i:\s' ) );
EndIf;
If( pDebug <= 1 );
ChoreQuit;
EndIf;
EndIf;
573,3
#****Begin: Generated Statements***
#****End: Generated Statements****
574,3
#****Begin: Generated Statements***
#****End: Generated Statements****
575,3
#****Begin: Generated Statements***
#****End: Generated Statements****
576,CubeAction=1511 DataAction=1503 CubeLogChanges=0
930,0
638,1
804,0
1217,0
900,
901,
902,
938,0
937,
936,
935,
934,
932,0
933,0
903,
906,
929,
907,
908,
904,0
905,0
909,0
911,
912,
913,
914,
915,
916,
917,0
918,1
919,0
920,50000
921,""
922,""
923,0
924,""
925,""
926,""
927,""
View
@@ -1,4 +1,4 @@
601,100
601,100
602,"Bedrock.Cube.Clone"
562,"VIEW"
586,"Bedrock Test"
@@ -254,7 +254,7 @@ VarType=32 ColType=827
#####################################################################################
##~~Copyright bedrocktm1.org 2011 www.bedrocktm1.org/how-to-licence.php Ver 3.0.2~~##
##~~Copyright bedrocktm1.org 2011 www.bedrocktm1.org/how-to-licence.php Ver 3.1.0~~##
#####################################################################################
# This process replicates an existing cube.
@@ -508,7 +508,7 @@ EndIf;
#####################################################################################
##~~Copyright bedrocktm1.org 2011 www.bedrocktm1.org/how-to-licence.php Ver 3.0.2~~##
##~~Copyright bedrocktm1.org 2011 www.bedrocktm1.org/how-to-licence.php Ver 3.1.0~~##
#####################################################################################
@@ -737,7 +737,7 @@ EndIf;
#####################################################################################
##~~Copyright bedrocktm1.org 2011 www.bedrocktm1.org/how-to-licence.php Ver 3.0.2~~##
##~~Copyright bedrocktm1.org 2011 www.bedrocktm1.org/how-to-licence.php Ver 3.1.0~~##
#####################################################################################
Oops, something went wrong.

0 comments on commit 68faddd

Please sign in to comment.