CreateSnapshot VB.NET Example
' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
Dim rest As New Chilkat.Rest
Dim success As Boolean
Dim authAws As New Chilkat.AuthAws
authAws.AccessKey = "AWS_ACCESS_KEY"
authAws.SecretKey = "AWS_SECRET_KEY"
' Don't forget to change the region to your particular region. (Also make the same change in the call to Connect below.)
authAws.Region = "us-west-2"
authAws.ServiceName = "fsx"
' SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
rest.SetAuthAws(authAws)
' URL: https://fsx.us-west-2.amazonaws.com/
' Use the same region as specified above.
success = rest.Connect("fsx.us-west-2.amazonaws.com",443,True,True)
If (success <> True) Then
Debug.WriteLine("ConnectFailReason: " & rest.ConnectFailReason)
Debug.WriteLine(rest.LastErrorText)
Exit Sub
End If
' The following code creates the JSON request body.
' The JSON created by this code is shown below.
' Use this online tool to generate code from sample JSON:
' Generate Code to Create JSON
Dim json As New Chilkat.JsonObject
json.UpdateString("ClientRequestToken","string")
json.UpdateString("Name","string")
json.UpdateString("Tags[0].Key","string")
json.UpdateString("Tags[0].Value","string")
json.UpdateString("VolumeId","string")
' The JSON request body created by the above code:
' {
' "ClientRequestToken": "string",
' "Name": "string",
' "Tags": [
' {
' "Key": "string",
' "Value": "string"
' }
' ],
' "VolumeId": "string"
' }
rest.AddHeader("Content-Type","application/x-amz-json-1.1")
rest.AddHeader("X-Amz-Target","AWSSimbaAPIService_v20180301.CreateSnapshot")
Dim sbRequestBody As New Chilkat.StringBuilder
json.EmitSb(sbRequestBody)
Dim sbResponseBody As New Chilkat.StringBuilder
success = rest.FullRequestSb("POST","/",sbRequestBody,sbResponseBody)
If (success <> True) Then
Debug.WriteLine(rest.LastErrorText)
Exit Sub
End If
Dim respStatusCode As Integer = rest.ResponseStatusCode
Debug.WriteLine("response status code = " & respStatusCode)
If (respStatusCode <> 200) Then
Debug.WriteLine("Response Header:")
Debug.WriteLine(rest.ResponseHeader)
Debug.WriteLine("Response Body:")
Debug.WriteLine(sbResponseBody.GetAsString())
Exit Sub
End If
Dim jResp As New Chilkat.JsonObject
jResp.LoadSb(sbResponseBody)
' The following code parses the JSON response.
' A sample JSON response is shown below the sample code.
' Use this online tool to generate parsing code from sample JSON:
' Generate Parsing Code from JSON
Dim AdministrativeActionType As String
Dim FailureDetailsMessage As String
Dim ProgressPercent As Integer
Dim RequestTime As Integer
Dim Status As String
Dim TargetFileSystemValuesCreationTime As Integer
Dim DNSName As String
Dim FileSystemId As String
Dim FileSystemType As String
Dim FileSystemTypeVersion As String
Dim KmsKeyId As String
Dim TargetFileSystemValuesLifecycle As String
Dim AutomaticBackupRetentionDays As Integer
Dim CopyTagsToBackups As Integer
Dim DailyAutomaticBackupStartTime As String
Dim DataCompressionType As String
Dim AutoImportPolicy As String
Dim ExportPath As String
Dim ImportedFileChunkSize As Integer
Dim ImportPath As String
Dim DataRepositoryConfigurationLifecycle As String
Dim DeploymentType As String
Dim DriveCacheType As String
Dim Destination As String
Dim Level As String
Dim MountName As String
Dim PerUnitStorageThroughput As Integer
Dim WeeklyMaintenanceStartTime As String
Dim OntapConfigurationAutomaticBackupRetentionDays As Integer
Dim OntapConfigurationDailyAutomaticBackupStartTime As String
Dim OntapConfigurationDeploymentType As String
Dim Iops As Integer
Dim Mode As String
Dim EndpointIpAddressRange As String
Dim InterclusterDNSName As String
Dim ManagementDNSName As String
Dim PreferredSubnetId As String
Dim ThroughputCapacity As Integer
Dim OntapConfigurationWeeklyMaintenanceStartTime As String
Dim OpenZFSConfigurationAutomaticBackupRetentionDays As Integer
Dim OpenZFSConfigurationCopyTagsToBackups As Integer
Dim CopyTagsToVolumes As Integer
Dim OpenZFSConfigurationDailyAutomaticBackupStartTime As String
Dim OpenZFSConfigurationDeploymentType As String
Dim DiskIopsConfigurationIops As Integer
Dim DiskIopsConfigurationMode As String
Dim RootVolumeId As String
Dim OpenZFSConfigurationThroughputCapacity As Integer
Dim OpenZFSConfigurationWeeklyMaintenanceStartTime As String
Dim OwnerId As String
Dim TargetFileSystemValuesResourceARN As String
Dim StorageCapacity As Integer
Dim StorageType As String
Dim VpcId As String
Dim ActiveDirectoryId As String
Dim AuditLogDestination As String
Dim FileAccessAuditLogLevel As String
Dim FileShareAccessAuditLogLevel As String
Dim WindowsConfigurationAutomaticBackupRetentionDays As Integer
Dim WindowsConfigurationCopyTagsToBackups As Integer
Dim WindowsConfigurationDailyAutomaticBackupStartTime As String
Dim WindowsConfigurationDeploymentType As String
Dim PreferredFileServerIp As String
Dim WindowsConfigurationPreferredSubnetId As String
Dim RemoteAdministrationEndpoint As String
Dim DomainName As String
Dim FileSystemAdministratorsGroup As String
Dim OrganizationalUnitDistinguishedName As String
Dim UserName As String
Dim WindowsConfigurationThroughputCapacity As Integer
Dim WindowsConfigurationWeeklyMaintenanceStartTime As String
Dim TargetSnapshotValues As String
Dim TargetVolumeValuesCreationTime As Integer
Dim TargetVolumeValuesFileSystemId As String
Dim TargetVolumeValuesLifecycle As String
Dim LifecycleTransitionReasonMessage As String
Dim TargetVolumeValuesName As String
Dim FlexCacheEndpointType As String
Dim JunctionPath As String
Dim OntapVolumeType As String
Dim SecurityStyle As String
Dim SizeInMegabytes As Integer
Dim StorageEfficiencyEnabled As Integer
Dim StorageVirtualMachineId As String
Dim StorageVirtualMachineRoot As Integer
Dim CoolingPeriod As Integer
Dim TieringPolicyName As String
Dim UUID As String
Dim CopyTagsToSnapshots As Integer
Dim OpenZFSConfigurationDataCompressionType As String
Dim CopyStrategy As String
Dim SnapshotARN As String
Dim ParentVolumeId As String
Dim ReadOnly As Integer
Dim RecordSizeKiB As Integer
Dim StorageCapacityQuotaGiB As Integer
Dim StorageCapacityReservationGiB As Integer
Dim VolumePath As String
Dim TargetVolumeValuesResourceARN As String
Dim TargetVolumeValuesVolumeId As String
Dim VolumeType As String
Dim j As Integer
Dim count_j As Integer
Dim strVal As String
Dim Key As String
Dim Value As String
Dim k As Integer
Dim count_k As Integer
Dim Clients As String
Dim json1 As Chilkat.JsonObject
Dim i1 As Integer
Dim count_i1 As Integer
Dim Id As Integer
Dim v_Type As String
Dim CreationTime As Integer = jResp.IntOf("Snapshot.CreationTime")
Dim Lifecycle As String = jResp.StringOf("Snapshot.Lifecycle")
Dim Message As String = jResp.StringOf("Snapshot.LifecycleTransitionReason.Message")
Dim Name As String = jResp.StringOf("Snapshot.Name")
Dim ResourceARN As String = jResp.StringOf("Snapshot.ResourceARN")
Dim SnapshotId As String = jResp.StringOf("Snapshot.SnapshotId")
Dim VolumeId As String = jResp.StringOf("Snapshot.VolumeId")
Dim i As Integer = 0
Dim count_i As Integer = jResp.SizeOfArray("Snapshot.AdministrativeActions")
While i < count_i
jResp.I = i
AdministrativeActionType = jResp.StringOf("Snapshot.AdministrativeActions[i].AdministrativeActionType")
FailureDetailsMessage = jResp.StringOf("Snapshot.AdministrativeActions[i].FailureDetails.Message")
ProgressPercent = jResp.IntOf("Snapshot.AdministrativeActions[i].ProgressPercent")
RequestTime = jResp.IntOf("Snapshot.AdministrativeActions[i].RequestTime")
Status = jResp.StringOf("Snapshot.AdministrativeActions[i].Status")
TargetFileSystemValuesCreationTime = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.CreationTime")
DNSName = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.DNSName")
FailureDetailsMessage = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.FailureDetails.Message")
FileSystemId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.FileSystemId")
FileSystemType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.FileSystemType")
FileSystemTypeVersion = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.FileSystemTypeVersion")
KmsKeyId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.KmsKeyId")
TargetFileSystemValuesLifecycle = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.Lifecycle")
AutomaticBackupRetentionDays = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.AutomaticBackupRetentionDays")
CopyTagsToBackups = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.CopyTagsToBackups")
DailyAutomaticBackupStartTime = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.DailyAutomaticBackupStartTime")
DataCompressionType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.DataCompressionType")
AutoImportPolicy = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.AutoImportPolicy")
ExportPath = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.ExportPath")
FailureDetailsMessage = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.FailureDetails.Message")
ImportedFileChunkSize = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.ImportedFileChunkSize")
ImportPath = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.ImportPath")
DataRepositoryConfigurationLifecycle = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.DataRepositoryConfiguration.Lifecycle")
DeploymentType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.DeploymentType")
DriveCacheType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.DriveCacheType")
Destination = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.LogConfiguration.Destination")
Level = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.LogConfiguration.Level")
MountName = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.MountName")
PerUnitStorageThroughput = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.PerUnitStorageThroughput")
WeeklyMaintenanceStartTime = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.LustreConfiguration.WeeklyMaintenanceStartTime")
OntapConfigurationAutomaticBackupRetentionDays = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.AutomaticBackupRetentionDays")
OntapConfigurationDailyAutomaticBackupStartTime = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.DailyAutomaticBackupStartTime")
OntapConfigurationDeploymentType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.DeploymentType")
Iops = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.DiskIopsConfiguration.Iops")
Mode = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.DiskIopsConfiguration.Mode")
EndpointIpAddressRange = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.EndpointIpAddressRange")
InterclusterDNSName = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.Endpoints.Intercluster.DNSName")
ManagementDNSName = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.Endpoints.Management.DNSName")
PreferredSubnetId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.PreferredSubnetId")
ThroughputCapacity = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.ThroughputCapacity")
OntapConfigurationWeeklyMaintenanceStartTime = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.WeeklyMaintenanceStartTime")
OpenZFSConfigurationAutomaticBackupRetentionDays = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OpenZFSConfiguration.AutomaticBackupRetentionDays")
OpenZFSConfigurationCopyTagsToBackups = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OpenZFSConfiguration.CopyTagsToBackups")
CopyTagsToVolumes = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OpenZFSConfiguration.CopyTagsToVolumes")
OpenZFSConfigurationDailyAutomaticBackupStartTime = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OpenZFSConfiguration.DailyAutomaticBackupStartTime")
OpenZFSConfigurationDeploymentType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OpenZFSConfiguration.DeploymentType")
DiskIopsConfigurationIops = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OpenZFSConfiguration.DiskIopsConfiguration.Iops")
DiskIopsConfigurationMode = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OpenZFSConfiguration.DiskIopsConfiguration.Mode")
RootVolumeId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OpenZFSConfiguration.RootVolumeId")
OpenZFSConfigurationThroughputCapacity = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OpenZFSConfiguration.ThroughputCapacity")
OpenZFSConfigurationWeeklyMaintenanceStartTime = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OpenZFSConfiguration.WeeklyMaintenanceStartTime")
OwnerId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OwnerId")
TargetFileSystemValuesResourceARN = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.ResourceARN")
StorageCapacity = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.StorageCapacity")
StorageType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.StorageType")
VpcId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.VpcId")
ActiveDirectoryId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.ActiveDirectoryId")
AuditLogDestination = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.AuditLogConfiguration.AuditLogDestination")
FileAccessAuditLogLevel = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.AuditLogConfiguration.FileAccessAuditLogLevel")
FileShareAccessAuditLogLevel = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.AuditLogConfiguration.FileShareAccessAuditLogLevel")
WindowsConfigurationAutomaticBackupRetentionDays = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.AutomaticBackupRetentionDays")
WindowsConfigurationCopyTagsToBackups = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.CopyTagsToBackups")
WindowsConfigurationDailyAutomaticBackupStartTime = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.DailyAutomaticBackupStartTime")
WindowsConfigurationDeploymentType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.DeploymentType")
PreferredFileServerIp = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.PreferredFileServerIp")
WindowsConfigurationPreferredSubnetId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.PreferredSubnetId")
RemoteAdministrationEndpoint = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.RemoteAdministrationEndpoint")
DomainName = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DomainName")
FileSystemAdministratorsGroup = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.FileSystemAdministratorsGroup")
OrganizationalUnitDistinguishedName = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.OrganizationalUnitDistinguishedName")
UserName = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.UserName")
WindowsConfigurationThroughputCapacity = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.ThroughputCapacity")
WindowsConfigurationWeeklyMaintenanceStartTime = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.WeeklyMaintenanceStartTime")
TargetSnapshotValues = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetSnapshotValues")
TargetVolumeValuesCreationTime = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.CreationTime")
TargetVolumeValuesFileSystemId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.FileSystemId")
TargetVolumeValuesLifecycle = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.Lifecycle")
LifecycleTransitionReasonMessage = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.LifecycleTransitionReason.Message")
TargetVolumeValuesName = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.Name")
FlexCacheEndpointType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.FlexCacheEndpointType")
JunctionPath = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.JunctionPath")
OntapVolumeType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.OntapVolumeType")
SecurityStyle = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.SecurityStyle")
SizeInMegabytes = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.SizeInMegabytes")
StorageEfficiencyEnabled = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.StorageEfficiencyEnabled")
StorageVirtualMachineId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.StorageVirtualMachineId")
StorageVirtualMachineRoot = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.StorageVirtualMachineRoot")
CoolingPeriod = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.TieringPolicy.CoolingPeriod")
TieringPolicyName = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.TieringPolicy.Name")
UUID = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.UUID")
CopyTagsToSnapshots = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.CopyTagsToSnapshots")
OpenZFSConfigurationDataCompressionType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.DataCompressionType")
CopyStrategy = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.OriginSnapshot.CopyStrategy")
SnapshotARN = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.OriginSnapshot.SnapshotARN")
ParentVolumeId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.ParentVolumeId")
ReadOnly = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.ReadOnly")
RecordSizeKiB = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.RecordSizeKiB")
StorageCapacityQuotaGiB = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.StorageCapacityQuotaGiB")
StorageCapacityReservationGiB = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.StorageCapacityReservationGiB")
VolumePath = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.VolumePath")
TargetVolumeValuesResourceARN = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.ResourceARN")
TargetVolumeValuesVolumeId = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.VolumeId")
VolumeType = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.VolumeType")
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetFileSystemValues.AdministrativeActions")
While j < count_j
jResp.J = j
strVal = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.AdministrativeActions[j]")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetFileSystemValues.NetworkInterfaceIds")
While j < count_j
jResp.J = j
strVal = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.NetworkInterfaceIds[j]")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.Endpoints.Intercluster.IpAddresses")
While j < count_j
jResp.J = j
strVal = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.Endpoints.Intercluster.IpAddresses[j]")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.Endpoints.Management.IpAddresses")
While j < count_j
jResp.J = j
strVal = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.Endpoints.Management.IpAddresses[j]")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.RouteTableIds")
While j < count_j
jResp.J = j
strVal = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.RouteTableIds[j]")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetFileSystemValues.SubnetIds")
While j < count_j
jResp.J = j
strVal = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.SubnetIds[j]")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetFileSystemValues.Tags")
While j < count_j
jResp.J = j
Key = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.Tags[j].Key")
Value = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.Tags[j].Value")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.Aliases")
While j < count_j
jResp.J = j
Lifecycle = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.Aliases[j].Lifecycle")
Name = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.Aliases[j].Name")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.MaintenanceOperationsInProgress")
While j < count_j
jResp.J = j
strVal = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.MaintenanceOperationsInProgress[j]")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DnsIps")
While j < count_j
jResp.J = j
strVal = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DnsIps[j]")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetVolumeValues.AdministrativeActions")
While j < count_j
jResp.J = j
strVal = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.AdministrativeActions[j]")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.NfsExports")
While j < count_j
jResp.J = j
k = 0
count_k = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.NfsExports[j].ClientConfigurations")
While k < count_k
jResp.K = k
Clients = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.NfsExports[j].ClientConfigurations[k].Clients")
json1 = jResp.ObjectOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.NfsExports[j].ClientConfigurations[k]")
i1 = 0
count_i1 = json1.SizeOfArray("Options")
While i1 < count_i1
json1.I = i1
strVal = json1.StringOf("Options[i]")
i1 = i1 + 1
End While
k = k + 1
End While
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas")
While j < count_j
jResp.J = j
Id = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[j].Id")
StorageCapacityQuotaGiB = jResp.IntOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[j].StorageCapacityQuotaGiB")
v_Type = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[j].Type")
j = j + 1
End While
j = 0
count_j = jResp.SizeOfArray("Snapshot.AdministrativeActions[i].TargetVolumeValues.Tags")
While j < count_j
jResp.J = j
Key = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.Tags[j].Key")
Value = jResp.StringOf("Snapshot.AdministrativeActions[i].TargetVolumeValues.Tags[j].Value")
j = j + 1
End While
i = i + 1
End While
i = 0
count_i = jResp.SizeOfArray("Snapshot.Tags")
While i < count_i
jResp.I = i
Key = jResp.StringOf("Snapshot.Tags[i].Key")
Value = jResp.StringOf("Snapshot.Tags[i].Value")
i = i + 1
End While
' A sample JSON response body parsed by the above code:
' {
' "Snapshot": {
' "AdministrativeActions": [
' {
' "AdministrativeActionType": "string",
' "FailureDetails": {
' "Message": "string"
' },
' "ProgressPercent": number,
' "RequestTime": number,
' "Status": "string",
' "TargetFileSystemValues": {
' "AdministrativeActions": [
' "AdministrativeAction"
' ],
' "CreationTime": number,
' "DNSName": "string",
' "FailureDetails": {
' "Message": "string"
' },
' "FileSystemId": "string",
' "FileSystemType": "string",
' "FileSystemTypeVersion": "string",
' "KmsKeyId": "string",
' "Lifecycle": "string",
' "LustreConfiguration": {
' "AutomaticBackupRetentionDays": number,
' "CopyTagsToBackups": boolean,
' "DailyAutomaticBackupStartTime": "string",
' "DataCompressionType": "string",
' "DataRepositoryConfiguration": {
' "AutoImportPolicy": "string",
' "ExportPath": "string",
' "FailureDetails": {
' "Message": "string"
' },
' "ImportedFileChunkSize": number,
' "ImportPath": "string",
' "Lifecycle": "string"
' },
' "DeploymentType": "string",
' "DriveCacheType": "string",
' "LogConfiguration": {
' "Destination": "string",
' "Level": "string"
' },
' "MountName": "string",
' "PerUnitStorageThroughput": number,
' "WeeklyMaintenanceStartTime": "string"
' },
' "NetworkInterfaceIds": [
' "string"
' ],
' "OntapConfiguration": {
' "AutomaticBackupRetentionDays": number,
' "DailyAutomaticBackupStartTime": "string",
' "DeploymentType": "string",
' "DiskIopsConfiguration": {
' "Iops": number,
' "Mode": "string"
' },
' "EndpointIpAddressRange": "string",
' "Endpoints": {
' "Intercluster": {
' "DNSName": "string",
' "IpAddresses": [
' "string"
' ]
' },
' "Management": {
' "DNSName": "string",
' "IpAddresses": [
' "string"
' ]
' }
' },
' "PreferredSubnetId": "string",
' "RouteTableIds": [
' "string"
' ],
' "ThroughputCapacity": number,
' "WeeklyMaintenanceStartTime": "string"
' },
' "OpenZFSConfiguration": {
' "AutomaticBackupRetentionDays": number,
' "CopyTagsToBackups": boolean,
' "CopyTagsToVolumes": boolean,
' "DailyAutomaticBackupStartTime": "string",
' "DeploymentType": "string",
' "DiskIopsConfiguration": {
' "Iops": number,
' "Mode": "string"
' },
' "RootVolumeId": "string",
' "ThroughputCapacity": number,
' "WeeklyMaintenanceStartTime": "string"
' },
' "OwnerId": "string",
' "ResourceARN": "string",
' "StorageCapacity": number,
' "StorageType": "string",
' "SubnetIds": [
' "string"
' ],
' "Tags": [
' {
' "Key": "string",
' "Value": "string"
' }
' ],
' "VpcId": "string",
' "WindowsConfiguration": {
' "ActiveDirectoryId": "string",
' "Aliases": [
' {
' "Lifecycle": "string",
' "Name": "string"
' }
' ],
' "AuditLogConfiguration": {
' "AuditLogDestination": "string",
' "FileAccessAuditLogLevel": "string",
' "FileShareAccessAuditLogLevel": "string"
' },
' "AutomaticBackupRetentionDays": number,
' "CopyTagsToBackups": boolean,
' "DailyAutomaticBackupStartTime": "string",
' "DeploymentType": "string",
' "MaintenanceOperationsInProgress": [
' "string"
' ],
' "PreferredFileServerIp": "string",
' "PreferredSubnetId": "string",
' "RemoteAdministrationEndpoint": "string",
' "SelfManagedActiveDirectoryConfiguration": {
' "DnsIps": [
' "string"
' ],
' "DomainName": "string",
' "FileSystemAdministratorsGroup": "string",
' "OrganizationalUnitDistinguishedName": "string",
' "UserName": "string"
' },
' "ThroughputCapacity": number,
' "WeeklyMaintenanceStartTime": "string"
' }
' },
' "TargetSnapshotValues": "Snapshot",
' "TargetVolumeValues": {
' "AdministrativeActions": [
' "AdministrativeAction"
' ],
' "CreationTime": number,
' "FileSystemId": "string",
' "Lifecycle": "string",
' "LifecycleTransitionReason": {
' "Message": "string"
' },
' "Name": "string",
' "OntapConfiguration": {
' "FlexCacheEndpointType": "string",
' "JunctionPath": "string",
' "OntapVolumeType": "string",
' "SecurityStyle": "string",
' "SizeInMegabytes": number,
' "StorageEfficiencyEnabled": boolean,
' "StorageVirtualMachineId": "string",
' "StorageVirtualMachineRoot": boolean,
' "TieringPolicy": {
' "CoolingPeriod": number,
' "Name": "string"
' },
' "UUID": "string"
' },
' "OpenZFSConfiguration": {
' "CopyTagsToSnapshots": boolean,
' "DataCompressionType": "string",
' "NfsExports": [
' {
' "ClientConfigurations": [
' {
' "Clients": "string",
' "Options": [
' "string"
' ]
' }
' ]
' }
' ],
' "OriginSnapshot": {
' "CopyStrategy": "string",
' "SnapshotARN": "string"
' },
' "ParentVolumeId": "string",
' "ReadOnly": boolean,
' "RecordSizeKiB": number,
' "StorageCapacityQuotaGiB": number,
' "StorageCapacityReservationGiB": number,
' "UserAndGroupQuotas": [
' {
' "Id": number,
' "StorageCapacityQuotaGiB": number,
' "Type": "string"
' }
' ],
' "VolumePath": "string"
' },
' "ResourceARN": "string",
' "Tags": [
' {
' "Key": "string",
' "Value": "string"
' }
' ],
' "VolumeId": "string",
' "VolumeType": "string"
' }
' }
' ],
' "CreationTime": number,
' "Lifecycle": "string",
' "LifecycleTransitionReason": {
' "Message": "string"
' },
' "Name": "string",
' "ResourceARN": "string",
' "SnapshotId": "string",
' "Tags": [
' {
' "Key": "string",
' "Value": "string"
' }
' ],
' "VolumeId": "string"
' }
' }
