Chilkat Online Tools

ReleaseFileSystemNfsV3Locks delphiAx Example

Amazon FSx

var
rest: TChilkatRest;
success: Integer;
authAws: TChilkatAuthAws;
json: TChilkatJsonObject;
sbRequestBody: TChilkatStringBuilder;
sbResponseBody: TChilkatStringBuilder;
respStatusCode: Integer;
jResp: TChilkatJsonObject;
AdministrativeActionType: WideString;
ProgressPercent: Integer;
RequestTime: Integer;
Status: WideString;
TargetFileSystemValues: WideString;
TargetSnapshotValuesCreationTime: Integer;
TargetSnapshotValuesLifecycle: WideString;
LifecycleTransitionReasonMessage: WideString;
Name: WideString;
TargetSnapshotValuesResourceARN: WideString;
SnapshotId: WideString;
VolumeId: WideString;
TargetVolumeValuesCreationTime: Integer;
TargetVolumeValuesFileSystemId: WideString;
TargetVolumeValuesLifecycle: 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;
DNSName: WideString;
Message: WideString;
FileSystemId: WideString;
FileSystemType: WideString;
FileSystemTypeVersion: WideString;
KmsKeyId: WideString;
Lifecycle: WideString;
AutomaticBackupRetentionDays: Integer;
CopyTagsToBackups: Integer;
DailyAutomaticBackupStartTime: WideString;
DataCompressionType: WideString;
AutoImportPolicy: WideString;
ExportPath: WideString;
FailureDetailsMessage: 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;
ResourceARN: 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;
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('FileSystemId','string');

// The JSON request body created by the above code:

// {
//   "ClientRequestToken": "string",
//   "FileSystemId": "string"
// }

rest.AddHeader('Content-Type','application/x-amz-json-1.1');
rest.AddHeader('X-Amz-Target','AWSSimbaAPIService_v20180301.ReleaseFileSystemNfsV3Locks');

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('FileSystem.CreationTime');
DNSName := jResp.StringOf('FileSystem.DNSName');
Message := jResp.StringOf('FileSystem.FailureDetails.Message');
FileSystemId := jResp.StringOf('FileSystem.FileSystemId');
FileSystemType := jResp.StringOf('FileSystem.FileSystemType');
FileSystemTypeVersion := jResp.StringOf('FileSystem.FileSystemTypeVersion');
KmsKeyId := jResp.StringOf('FileSystem.KmsKeyId');
Lifecycle := jResp.StringOf('FileSystem.Lifecycle');
AutomaticBackupRetentionDays := jResp.IntOf('FileSystem.LustreConfiguration.AutomaticBackupRetentionDays');
CopyTagsToBackups := jResp.IntOf('FileSystem.LustreConfiguration.CopyTagsToBackups');
DailyAutomaticBackupStartTime := jResp.StringOf('FileSystem.LustreConfiguration.DailyAutomaticBackupStartTime');
DataCompressionType := jResp.StringOf('FileSystem.LustreConfiguration.DataCompressionType');
AutoImportPolicy := jResp.StringOf('FileSystem.LustreConfiguration.DataRepositoryConfiguration.AutoImportPolicy');
ExportPath := jResp.StringOf('FileSystem.LustreConfiguration.DataRepositoryConfiguration.ExportPath');
FailureDetailsMessage := jResp.StringOf('FileSystem.LustreConfiguration.DataRepositoryConfiguration.FailureDetails.Message');
ImportedFileChunkSize := jResp.IntOf('FileSystem.LustreConfiguration.DataRepositoryConfiguration.ImportedFileChunkSize');
ImportPath := jResp.StringOf('FileSystem.LustreConfiguration.DataRepositoryConfiguration.ImportPath');
DataRepositoryConfigurationLifecycle := jResp.StringOf('FileSystem.LustreConfiguration.DataRepositoryConfiguration.Lifecycle');
DeploymentType := jResp.StringOf('FileSystem.LustreConfiguration.DeploymentType');
DriveCacheType := jResp.StringOf('FileSystem.LustreConfiguration.DriveCacheType');
Destination := jResp.StringOf('FileSystem.LustreConfiguration.LogConfiguration.Destination');
Level := jResp.StringOf('FileSystem.LustreConfiguration.LogConfiguration.Level');
MountName := jResp.StringOf('FileSystem.LustreConfiguration.MountName');
PerUnitStorageThroughput := jResp.IntOf('FileSystem.LustreConfiguration.PerUnitStorageThroughput');
WeeklyMaintenanceStartTime := jResp.StringOf('FileSystem.LustreConfiguration.WeeklyMaintenanceStartTime');
OntapConfigurationAutomaticBackupRetentionDays := jResp.IntOf('FileSystem.OntapConfiguration.AutomaticBackupRetentionDays');
OntapConfigurationDailyAutomaticBackupStartTime := jResp.StringOf('FileSystem.OntapConfiguration.DailyAutomaticBackupStartTime');
OntapConfigurationDeploymentType := jResp.StringOf('FileSystem.OntapConfiguration.DeploymentType');
Iops := jResp.IntOf('FileSystem.OntapConfiguration.DiskIopsConfiguration.Iops');
Mode := jResp.StringOf('FileSystem.OntapConfiguration.DiskIopsConfiguration.Mode');
EndpointIpAddressRange := jResp.StringOf('FileSystem.OntapConfiguration.EndpointIpAddressRange');
InterclusterDNSName := jResp.StringOf('FileSystem.OntapConfiguration.Endpoints.Intercluster.DNSName');
ManagementDNSName := jResp.StringOf('FileSystem.OntapConfiguration.Endpoints.Management.DNSName');
PreferredSubnetId := jResp.StringOf('FileSystem.OntapConfiguration.PreferredSubnetId');
ThroughputCapacity := jResp.IntOf('FileSystem.OntapConfiguration.ThroughputCapacity');
OntapConfigurationWeeklyMaintenanceStartTime := jResp.StringOf('FileSystem.OntapConfiguration.WeeklyMaintenanceStartTime');
OpenZFSConfigurationAutomaticBackupRetentionDays := jResp.IntOf('FileSystem.OpenZFSConfiguration.AutomaticBackupRetentionDays');
OpenZFSConfigurationCopyTagsToBackups := jResp.IntOf('FileSystem.OpenZFSConfiguration.CopyTagsToBackups');
CopyTagsToVolumes := jResp.IntOf('FileSystem.OpenZFSConfiguration.CopyTagsToVolumes');
OpenZFSConfigurationDailyAutomaticBackupStartTime := jResp.StringOf('FileSystem.OpenZFSConfiguration.DailyAutomaticBackupStartTime');
OpenZFSConfigurationDeploymentType := jResp.StringOf('FileSystem.OpenZFSConfiguration.DeploymentType');
DiskIopsConfigurationIops := jResp.IntOf('FileSystem.OpenZFSConfiguration.DiskIopsConfiguration.Iops');
DiskIopsConfigurationMode := jResp.StringOf('FileSystem.OpenZFSConfiguration.DiskIopsConfiguration.Mode');
RootVolumeId := jResp.StringOf('FileSystem.OpenZFSConfiguration.RootVolumeId');
OpenZFSConfigurationThroughputCapacity := jResp.IntOf('FileSystem.OpenZFSConfiguration.ThroughputCapacity');
OpenZFSConfigurationWeeklyMaintenanceStartTime := jResp.StringOf('FileSystem.OpenZFSConfiguration.WeeklyMaintenanceStartTime');
OwnerId := jResp.StringOf('FileSystem.OwnerId');
ResourceARN := jResp.StringOf('FileSystem.ResourceARN');
StorageCapacity := jResp.IntOf('FileSystem.StorageCapacity');
StorageType := jResp.StringOf('FileSystem.StorageType');
VpcId := jResp.StringOf('FileSystem.VpcId');
ActiveDirectoryId := jResp.StringOf('FileSystem.WindowsConfiguration.ActiveDirectoryId');
AuditLogDestination := jResp.StringOf('FileSystem.WindowsConfiguration.AuditLogConfiguration.AuditLogDestination');
FileAccessAuditLogLevel := jResp.StringOf('FileSystem.WindowsConfiguration.AuditLogConfiguration.FileAccessAuditLogLevel');
FileShareAccessAuditLogLevel := jResp.StringOf('FileSystem.WindowsConfiguration.AuditLogConfiguration.FileShareAccessAuditLogLevel');
WindowsConfigurationAutomaticBackupRetentionDays := jResp.IntOf('FileSystem.WindowsConfiguration.AutomaticBackupRetentionDays');
WindowsConfigurationCopyTagsToBackups := jResp.IntOf('FileSystem.WindowsConfiguration.CopyTagsToBackups');
WindowsConfigurationDailyAutomaticBackupStartTime := jResp.StringOf('FileSystem.WindowsConfiguration.DailyAutomaticBackupStartTime');
WindowsConfigurationDeploymentType := jResp.StringOf('FileSystem.WindowsConfiguration.DeploymentType');
PreferredFileServerIp := jResp.StringOf('FileSystem.WindowsConfiguration.PreferredFileServerIp');
WindowsConfigurationPreferredSubnetId := jResp.StringOf('FileSystem.WindowsConfiguration.PreferredSubnetId');
RemoteAdministrationEndpoint := jResp.StringOf('FileSystem.WindowsConfiguration.RemoteAdministrationEndpoint');
DomainName := jResp.StringOf('FileSystem.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DomainName');
FileSystemAdministratorsGroup := jResp.StringOf('FileSystem.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.FileSystemAdministratorsGroup');
OrganizationalUnitDistinguishedName := jResp.StringOf('FileSystem.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.OrganizationalUnitDistinguishedName');
UserName := jResp.StringOf('FileSystem.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.UserName');
WindowsConfigurationThroughputCapacity := jResp.IntOf('FileSystem.WindowsConfiguration.ThroughputCapacity');
WindowsConfigurationWeeklyMaintenanceStartTime := jResp.StringOf('FileSystem.WindowsConfiguration.WeeklyMaintenanceStartTime');
i := 0;
count_i := jResp.SizeOfArray('FileSystem.AdministrativeActions');
while i < count_i do
  begin
    jResp.I := i;
    AdministrativeActionType := jResp.StringOf('FileSystem.AdministrativeActions[i].AdministrativeActionType');
    FailureDetailsMessage := jResp.StringOf('FileSystem.AdministrativeActions[i].FailureDetails.Message');
    ProgressPercent := jResp.IntOf('FileSystem.AdministrativeActions[i].ProgressPercent');
    RequestTime := jResp.IntOf('FileSystem.AdministrativeActions[i].RequestTime');
    Status := jResp.StringOf('FileSystem.AdministrativeActions[i].Status');
    TargetFileSystemValues := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetFileSystemValues');
    TargetSnapshotValuesCreationTime := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetSnapshotValues.CreationTime');
    TargetSnapshotValuesLifecycle := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetSnapshotValues.Lifecycle');
    LifecycleTransitionReasonMessage := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetSnapshotValues.LifecycleTransitionReason.Message');
    Name := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetSnapshotValues.Name');
    TargetSnapshotValuesResourceARN := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetSnapshotValues.ResourceARN');
    SnapshotId := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetSnapshotValues.SnapshotId');
    VolumeId := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetSnapshotValues.VolumeId');
    TargetVolumeValuesCreationTime := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.CreationTime');
    TargetVolumeValuesFileSystemId := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.FileSystemId');
    TargetVolumeValuesLifecycle := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.Lifecycle');
    LifecycleTransitionReasonMessage := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.LifecycleTransitionReason.Message');
    TargetVolumeValuesName := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.Name');
    FlexCacheEndpointType := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.FlexCacheEndpointType');
    JunctionPath := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.JunctionPath');
    OntapVolumeType := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.OntapVolumeType');
    SecurityStyle := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.SecurityStyle');
    SizeInMegabytes := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.SizeInMegabytes');
    StorageEfficiencyEnabled := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.StorageEfficiencyEnabled');
    StorageVirtualMachineId := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.StorageVirtualMachineId');
    StorageVirtualMachineRoot := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.StorageVirtualMachineRoot');
    CoolingPeriod := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.TieringPolicy.CoolingPeriod');
    TieringPolicyName := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.TieringPolicy.Name');
    UUID := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OntapConfiguration.UUID');
    CopyTagsToSnapshots := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.CopyTagsToSnapshots');
    OpenZFSConfigurationDataCompressionType := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.DataCompressionType');
    CopyStrategy := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.OriginSnapshot.CopyStrategy');
    SnapshotARN := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.OriginSnapshot.SnapshotARN');
    ParentVolumeId := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.ParentVolumeId');
    ReadOnly := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.ReadOnly');
    RecordSizeKiB := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.RecordSizeKiB');
    StorageCapacityQuotaGiB := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.StorageCapacityQuotaGiB');
    StorageCapacityReservationGiB := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.StorageCapacityReservationGiB');
    VolumePath := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.VolumePath');
    TargetVolumeValuesResourceARN := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.ResourceARN');
    TargetVolumeValuesVolumeId := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.VolumeId');
    VolumeType := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.VolumeType');
    j := 0;
    count_j := jResp.SizeOfArray('FileSystem.AdministrativeActions[i].TargetSnapshotValues.AdministrativeActions');
    while j < count_j do
      begin
        jResp.J := j;
        strVal := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetSnapshotValues.AdministrativeActions[j]');
        j := j + 1;
      end;

    j := 0;
    count_j := jResp.SizeOfArray('FileSystem.AdministrativeActions[i].TargetSnapshotValues.Tags');
    while j < count_j do
      begin
        jResp.J := j;
        Key := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetSnapshotValues.Tags[j].Key');
        Value := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetSnapshotValues.Tags[j].Value');
        j := j + 1;
      end;

    j := 0;
    count_j := jResp.SizeOfArray('FileSystem.AdministrativeActions[i].TargetVolumeValues.AdministrativeActions');
    while j < count_j do
      begin
        jResp.J := j;
        strVal := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.AdministrativeActions[j]');
        j := j + 1;
      end;

    j := 0;
    count_j := jResp.SizeOfArray('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.NfsExports');
    while j < count_j do
      begin
        jResp.J := j;
        k := 0;
        count_k := jResp.SizeOfArray('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.NfsExports[j].ClientConfigurations');
        while k < count_k do
          begin
            jResp.K := k;
            Clients := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.NfsExports[j].ClientConfigurations[k].Clients');

            json1 := jResp.ObjectOf('FileSystem.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('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas');
    while j < count_j do
      begin
        jResp.J := j;
        Id := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[j].Id');
        StorageCapacityQuotaGiB := jResp.IntOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[j].StorageCapacityQuotaGiB');
        v_Type := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[j].Type');
        j := j + 1;
      end;

    j := 0;
    count_j := jResp.SizeOfArray('FileSystem.AdministrativeActions[i].TargetVolumeValues.Tags');
    while j < count_j do
      begin
        jResp.J := j;
        Key := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.Tags[j].Key');
        Value := jResp.StringOf('FileSystem.AdministrativeActions[i].TargetVolumeValues.Tags[j].Value');
        j := j + 1;
      end;

    i := i + 1;
  end;

i := 0;
count_i := jResp.SizeOfArray('FileSystem.NetworkInterfaceIds');
while i < count_i do
  begin
    jResp.I := i;
    strVal := jResp.StringOf('FileSystem.NetworkInterfaceIds[i]');
    i := i + 1;
  end;

i := 0;
count_i := jResp.SizeOfArray('FileSystem.OntapConfiguration.Endpoints.Intercluster.IpAddresses');
while i < count_i do
  begin
    jResp.I := i;
    strVal := jResp.StringOf('FileSystem.OntapConfiguration.Endpoints.Intercluster.IpAddresses[i]');
    i := i + 1;
  end;

i := 0;
count_i := jResp.SizeOfArray('FileSystem.OntapConfiguration.Endpoints.Management.IpAddresses');
while i < count_i do
  begin
    jResp.I := i;
    strVal := jResp.StringOf('FileSystem.OntapConfiguration.Endpoints.Management.IpAddresses[i]');
    i := i + 1;
  end;

i := 0;
count_i := jResp.SizeOfArray('FileSystem.OntapConfiguration.RouteTableIds');
while i < count_i do
  begin
    jResp.I := i;
    strVal := jResp.StringOf('FileSystem.OntapConfiguration.RouteTableIds[i]');
    i := i + 1;
  end;

i := 0;
count_i := jResp.SizeOfArray('FileSystem.SubnetIds');
while i < count_i do
  begin
    jResp.I := i;
    strVal := jResp.StringOf('FileSystem.SubnetIds[i]');
    i := i + 1;
  end;

i := 0;
count_i := jResp.SizeOfArray('FileSystem.Tags');
while i < count_i do
  begin
    jResp.I := i;
    Key := jResp.StringOf('FileSystem.Tags[i].Key');
    Value := jResp.StringOf('FileSystem.Tags[i].Value');
    i := i + 1;
  end;

i := 0;
count_i := jResp.SizeOfArray('FileSystem.WindowsConfiguration.Aliases');
while i < count_i do
  begin
    jResp.I := i;
    Lifecycle := jResp.StringOf('FileSystem.WindowsConfiguration.Aliases[i].Lifecycle');
    Name := jResp.StringOf('FileSystem.WindowsConfiguration.Aliases[i].Name');
    i := i + 1;
  end;

i := 0;
count_i := jResp.SizeOfArray('FileSystem.WindowsConfiguration.MaintenanceOperationsInProgress');
while i < count_i do
  begin
    jResp.I := i;
    strVal := jResp.StringOf('FileSystem.WindowsConfiguration.MaintenanceOperationsInProgress[i]');
    i := i + 1;
  end;

i := 0;
count_i := jResp.SizeOfArray('FileSystem.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DnsIps');
while i < count_i do
  begin
    jResp.I := i;
    strVal := jResp.StringOf('FileSystem.WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DnsIps[i]');
    i := i + 1;
  end;

// A sample JSON response body parsed by the above code:

// {
//   "FileSystem": {
//     "AdministrativeActions": [
//       {
//         "AdministrativeActionType": "string",
//         "FailureDetails": {
//           "Message": "string"
//         },
//         "ProgressPercent": number,
//         "RequestTime": number,
//         "Status": "string",
//         "TargetFileSystemValues": "FileSystem",
//         "TargetSnapshotValues": {
//           "AdministrativeActions": [
//             "AdministrativeAction"
//           ],
//           "CreationTime": number,
//           "Lifecycle": "string",
//           "LifecycleTransitionReason": {
//             "Message": "string"
//           },
//           "Name": "string",
//           "ResourceARN": "string",
//           "SnapshotId": "string",
//           "Tags": [
//             {
//               "Key": "string",
//               "Value": "string"
//             }
//           ],
//           "VolumeId": "string"
//         },
//         "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,
//     "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"
//     }
//   }
// }