UpdateSnapshot delphiAx Example
var
rest: TChilkatRest;
success: Integer;
authAws: TChilkatAuthAws;
json: TChilkatJsonObject;
sbRequestBody: TChilkatStringBuilder;
sbResponseBody: TChilkatStringBuilder;
respStatusCode: Integer;
jResp: TChilkatJsonObject;
AdministrativeActionType: WideString;
FailureDetailsMessage: WideString;
ProgressPercent: Integer;
RequestTime: Integer;
Status: WideString;
TargetFileSystemValuesCreationTime: Integer;
DNSName: WideString;
FileSystemId: WideString;
FileSystemType: WideString;
FileSystemTypeVersion: WideString;
KmsKeyId: WideString;
TargetFileSystemValuesLifecycle: WideString;
AutomaticBackupRetentionDays: Integer;
CopyTagsToBackups: Integer;
DailyAutomaticBackupStartTime: WideString;
DataCompressionType: WideString;
AutoImportPolicy: WideString;
ExportPath: WideString;
ImportedFileChunkSize: Integer;
ImportPath: WideString;
DataRepositoryConfigurationLifecycle: WideString;
DeploymentType: WideString;
DriveCacheType: WideString;
Destination: WideString;
Level: WideString;
MountName: WideString;
PerUnitStorageThroughput: Integer;
WeeklyMaintenanceStartTime: WideString;
OntapConfigurationAutomaticBackupRetentionDays: Integer;
OntapConfigurationDailyAutomaticBackupStartTime: WideString;
OntapConfigurationDeploymentType: WideString;
Iops: Integer;
Mode: WideString;
EndpointIpAddressRange: WideString;
InterclusterDNSName: WideString;
ManagementDNSName: WideString;
PreferredSubnetId: WideString;
ThroughputCapacity: Integer;
OntapConfigurationWeeklyMaintenanceStartTime: WideString;
OpenZFSConfigurationAutomaticBackupRetentionDays: Integer;
OpenZFSConfigurationCopyTagsToBackups: Integer;
CopyTagsToVolumes: Integer;
OpenZFSConfigurationDailyAutomaticBackupStartTime: WideString;
OpenZFSConfigurationDeploymentType: WideString;
DiskIopsConfigurationIops: Integer;
DiskIopsConfigurationMode: WideString;
RootVolumeId: WideString;
OpenZFSConfigurationThroughputCapacity: Integer;
OpenZFSConfigurationWeeklyMaintenanceStartTime: WideString;
OwnerId: WideString;
TargetFileSystemValuesResourceARN: WideString;
StorageCapacity: Integer;
StorageType: WideString;
VpcId: WideString;
ActiveDirectoryId: WideString;
AuditLogDestination: WideString;
FileAccessAuditLogLevel: WideString;
FileShareAccessAuditLogLevel: WideString;
WindowsConfigurationAutomaticBackupRetentionDays: Integer;
WindowsConfigurationCopyTagsToBackups: Integer;
WindowsConfigurationDailyAutomaticBackupStartTime: WideString;
WindowsConfigurationDeploymentType: WideString;
PreferredFileServerIp: WideString;
WindowsConfigurationPreferredSubnetId: WideString;
RemoteAdministrationEndpoint: WideString;
DomainName: WideString;
FileSystemAdministratorsGroup: WideString;
OrganizationalUnitDistinguishedName: WideString;
UserName: WideString;
WindowsConfigurationThroughputCapacity: Integer;
WindowsConfigurationWeeklyMaintenanceStartTime: WideString;
TargetSnapshotValues: WideString;
TargetVolumeValuesCreationTime: Integer;
TargetVolumeValuesFileSystemId: WideString;
TargetVolumeValuesLifecycle: WideString;
LifecycleTransitionReasonMessage: WideString;
TargetVolumeValuesName: WideString;
FlexCacheEndpointType: WideString;
JunctionPath: WideString;
OntapVolumeType: WideString;
SecurityStyle: WideString;
SizeInMegabytes: Integer;
StorageEfficiencyEnabled: Integer;
StorageVirtualMachineId: WideString;
StorageVirtualMachineRoot: Integer;
CoolingPeriod: Integer;
TieringPolicyName: WideString;
UUID: WideString;
CopyTagsToSnapshots: Integer;
OpenZFSConfigurationDataCompressionType: WideString;
CopyStrategy: WideString;
SnapshotARN: WideString;
ParentVolumeId: WideString;
ReadOnly: Integer;
RecordSizeKiB: Integer;
StorageCapacityQuotaGiB: Integer;
StorageCapacityReservationGiB: Integer;
VolumePath: WideString;
TargetVolumeValuesResourceARN: WideString;
TargetVolumeValuesVolumeId: WideString;
VolumeType: WideString;
j: Integer;
count_j: Integer;
strVal: WideString;
Key: WideString;
Value: WideString;
k: Integer;
count_k: Integer;
Clients: WideString;
json1: IChilkatJsonObject;
i1: Integer;
count_i1: Integer;
Id: Integer;
v_Type: WideString;
CreationTime: Integer;
Lifecycle: WideString;
Message: WideString;
Name: WideString;
ResourceARN: WideString;
SnapshotId: WideString;
VolumeId: WideString;
i: Integer;
count_i: Integer;
begin
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
rest := TChilkatRest.Create(Self);
authAws := TChilkatAuthAws.Create(Self);
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.ControlInterface);
// 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,1,1);
if (success <> 1) then
begin
Memo1.Lines.Add('ConnectFailReason: ' + IntToStr(rest.ConnectFailReason));
Memo1.Lines.Add(rest.LastErrorText);
Exit;
end;
// 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
json := TChilkatJsonObject.Create(Self);
json.UpdateString('ClientRequestToken','string');
json.UpdateString('Name','string');
json.UpdateString('SnapshotId','string');
// The JSON request body created by the above code:
// {
// "ClientRequestToken": "string",
// "Name": "string",
// "SnapshotId": "string"
// }
rest.AddHeader('Content-Type','application/x-amz-json-1.1');
rest.AddHeader('X-Amz-Target','AWSSimbaAPIService_v20180301.UpdateSnapshot');
sbRequestBody := TChilkatStringBuilder.Create(Self);
json.EmitSb(sbRequestBody.ControlInterface);
sbResponseBody := TChilkatStringBuilder.Create(Self);
success := rest.FullRequestSb('POST','/',sbRequestBody.ControlInterface,sbResponseBody.ControlInterface);
if (success <> 1) then
begin
Memo1.Lines.Add(rest.LastErrorText);
Exit;
end;
respStatusCode := rest.ResponseStatusCode;
Memo1.Lines.Add('response status code = ' + IntToStr(respStatusCode));
if (respStatusCode <> 200) then
begin
Memo1.Lines.Add('Response Header:');
Memo1.Lines.Add(rest.ResponseHeader);
Memo1.Lines.Add('Response Body:');
Memo1.Lines.Add(sbResponseBody.GetAsString());
Exit;
end;
jResp := TChilkatJsonObject.Create(Self);
jResp.LoadSb(sbResponseBody.ControlInterface);
// 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
CreationTime := jResp.IntOf('Snapshot.CreationTime');
Lifecycle := jResp.StringOf('Snapshot.Lifecycle');
Message := jResp.StringOf('Snapshot.LifecycleTransitionReason.Message');
Name := jResp.StringOf('Snapshot.Name');
ResourceARN := jResp.StringOf('Snapshot.ResourceARN');
SnapshotId := jResp.StringOf('Snapshot.SnapshotId');
VolumeId := jResp.StringOf('Snapshot.VolumeId');
i := 0;
count_i := jResp.SizeOfArray('Snapshot.AdministrativeActions');
while i < count_i do
begin
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 do
begin
jResp.J := j;
strVal := jResp.StringOf('Snapshot.AdministrativeActions[i].TargetFileSystemValues.AdministrativeActions[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetFileSystemValues.NetworkInterfaceIds');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('Snapshot.AdministrativeActions[i].TargetFileSystemValues.NetworkInterfaceIds[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.Endpoints.Intercluster.IpAddresses');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.Endpoints.Intercluster.IpAddresses[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.Endpoints.Management.IpAddresses');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.Endpoints.Management.IpAddresses[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.RouteTableIds');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('Snapshot.AdministrativeActions[i].TargetFileSystemValues.OntapConfiguration.RouteTableIds[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetFileSystemValues.SubnetIds');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('Snapshot.AdministrativeActions[i].TargetFileSystemValues.SubnetIds[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetFileSystemValues.Tags');
while j < count_j do
begin
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;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.Aliases');
while j < count_j do
begin
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;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.MaintenanceOperationsInProgress');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.MaintenanceOperationsInProgress[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DnsIps');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('Snapshot.AdministrativeActions[i].TargetFileSystemValues.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DnsIps[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetVolumeValues.AdministrativeActions');
while j < count_j do
begin
jResp.J := j;
strVal := jResp.StringOf('Snapshot.AdministrativeActions[i].TargetVolumeValues.AdministrativeActions[j]');
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.NfsExports');
while j < count_j do
begin
jResp.J := j;
k := 0;
count_k := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.NfsExports[j].ClientConfigurations');
while k < count_k do
begin
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 do
begin
json1.I := i1;
strVal := json1.StringOf('Options[i]');
i1 := i1 + 1;
end;
k := k + 1;
end;
j := j + 1;
end;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas');
while j < count_j do
begin
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;
j := 0;
count_j := jResp.SizeOfArray('Snapshot.AdministrativeActions[i].TargetVolumeValues.Tags');
while j < count_j do
begin
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;
i := i + 1;
end;
i := 0;
count_i := jResp.SizeOfArray('Snapshot.Tags');
while i < count_i do
begin
jResp.I := i;
Key := jResp.StringOf('Snapshot.Tags[i].Key');
Value := jResp.StringOf('Snapshot.Tags[i].Value');
i := i + 1;
end;
// 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"
// }
// }
