This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
WITH | |
under_comp(id, alias, level, sort) AS ( | |
select id, alias, 0 as level, cast(alias as varchar(max)) from cdmcomp where id = '16281-----SPPL-SPPL' | |
UNION ALL | |
SELECT cdmcomp.id, cdmcomp.alias, under_comp.level+1, sort + ':' + cdmcomp.alias | |
FROM cdmcomp JOIN under_comp ON cdmcomp.primComp=under_comp.id | |
) | |
SELECT | |
id, |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
SELECT execquery.last_execution_time AS [Date Time], execsql.text AS [Script] FROM sys.dm_exec_query_stats AS execquery | |
CROSS APPLY sys.dm_exec_sql_text(execquery.sql_handle) AS execsql | |
ORDER BY execquery.last_execution_time DESC |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
RepositorySpec allInstances do: [:spec | | |
| locator | | |
locator := spec fileSystemLocator. | |
(locator isVolumeRelative not and: [ locator drive asUppercase = (KernelLibrary getModuleFileName: nil) asFileSystemPath drive asUppercase ]) ifTrue: [ | |
locator absolute: #volumeRelative. | |
locator componentNames: (locator componentNames copyFrom: 2). | |
]. | |
]. | |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
x := 500. | |
path := 'c:\temp\360.exe'. | |
y := VirtualMachineConfiguration fromFile: path. | |
newSpace := y newSpaceBytes = 0 ifTrue: [ 256 * 1024 ] ifFalse: [ y newSpaceBytes ]. | |
flipSpace := y flipSpaceBytes = 0 ifTrue: [ 256 * 1024 ] ifFalse: [ y flipSpaceBytes ]. | |
padding := y paddingSizeBytes = 0 ifTrue: [ 32 * 1024 ] ifFalse: [ y paddingSizeBytes ]. | |
y arenaBytes: (x * 1024 * 1024 ). |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
ToolInterface current | |
browseReferencesTo: (TeamVInterface current definitionOfGlobalNamed: #OrderedCollection) | |
in: (TeamVInterface current clusterNamed: 'My Cluster'). |