Chilkat Online Tools

DescribeFileSystems delphiDll Example

Amazon FSx

var
rest: HCkRest;
success: Boolean;
authAws: HCkAuthAws;
json: HCkJsonObject;
sbRequestBody: HCkStringBuilder;
sbResponseBody: HCkStringBuilder;
respStatusCode: Integer;
jResp: HCkJsonObject;
CreationTime: Integer;
DNSName: PWideChar;
Message: PWideChar;
FileSystemId: PWideChar;
FileSystemType: PWideChar;
FileSystemTypeVersion: PWideChar;
KmsKeyId: PWideChar;
Lifecycle: PWideChar;
AutomaticBackupRetentionDays: Integer;
CopyTagsToBackups: Integer;
DailyAutomaticBackupStartTime: PWideChar;
DataCompressionType: PWideChar;
AutoImportPolicy: PWideChar;
ExportPath: PWideChar;
FailureDetailsMessage: PWideChar;
ImportedFileChunkSize: Integer;
ImportPath: PWideChar;
DataRepositoryConfigurationLifecycle: PWideChar;
DeploymentType: PWideChar;
DriveCacheType: PWideChar;
Destination: PWideChar;
Level: PWideChar;
MountName: PWideChar;
PerUnitStorageThroughput: Integer;
WeeklyMaintenanceStartTime: PWideChar;
OntapConfigurationAutomaticBackupRetentionDays: Integer;
OntapConfigurationDailyAutomaticBackupStartTime: PWideChar;
OntapConfigurationDeploymentType: PWideChar;
Iops: Integer;
Mode: PWideChar;
EndpointIpAddressRange: PWideChar;
InterclusterDNSName: PWideChar;
ManagementDNSName: PWideChar;
PreferredSubnetId: PWideChar;
ThroughputCapacity: Integer;
OntapConfigurationWeeklyMaintenanceStartTime: PWideChar;
OpenZFSConfigurationAutomaticBackupRetentionDays: Integer;
OpenZFSConfigurationCopyTagsToBackups: Integer;
CopyTagsToVolumes: Integer;
OpenZFSConfigurationDailyAutomaticBackupStartTime: PWideChar;
OpenZFSConfigurationDeploymentType: PWideChar;
DiskIopsConfigurationIops: Integer;
DiskIopsConfigurationMode: PWideChar;
RootVolumeId: PWideChar;
OpenZFSConfigurationThroughputCapacity: Integer;
OpenZFSConfigurationWeeklyMaintenanceStartTime: PWideChar;
OwnerId: PWideChar;
ResourceARN: PWideChar;
StorageCapacity: Integer;
StorageType: PWideChar;
VpcId: PWideChar;
ActiveDirectoryId: PWideChar;
AuditLogDestination: PWideChar;
FileAccessAuditLogLevel: PWideChar;
FileShareAccessAuditLogLevel: PWideChar;
WindowsConfigurationAutomaticBackupRetentionDays: Integer;
WindowsConfigurationCopyTagsToBackups: Integer;
WindowsConfigurationDailyAutomaticBackupStartTime: PWideChar;
WindowsConfigurationDeploymentType: PWideChar;
PreferredFileServerIp: PWideChar;
WindowsConfigurationPreferredSubnetId: PWideChar;
RemoteAdministrationEndpoint: PWideChar;
DomainName: PWideChar;
FileSystemAdministratorsGroup: PWideChar;
OrganizationalUnitDistinguishedName: PWideChar;
UserName: PWideChar;
WindowsConfigurationThroughputCapacity: Integer;
WindowsConfigurationWeeklyMaintenanceStartTime: PWideChar;
j: Integer;
count_j: Integer;
AdministrativeActionType: PWideChar;
ProgressPercent: Integer;
RequestTime: Integer;
Status: PWideChar;
TargetFileSystemValues: PWideChar;
TargetSnapshotValuesCreationTime: Integer;
TargetSnapshotValuesLifecycle: PWideChar;
LifecycleTransitionReasonMessage: PWideChar;
Name: PWideChar;
TargetSnapshotValuesResourceARN: PWideChar;
SnapshotId: PWideChar;
VolumeId: PWideChar;
TargetVolumeValuesCreationTime: Integer;
TargetVolumeValuesFileSystemId: PWideChar;
TargetVolumeValuesLifecycle: PWideChar;
TargetVolumeValuesName: PWideChar;
FlexCacheEndpointType: PWideChar;
JunctionPath: PWideChar;
OntapVolumeType: PWideChar;
SecurityStyle: PWideChar;
SizeInMegabytes: Integer;
StorageEfficiencyEnabled: Integer;
StorageVirtualMachineId: PWideChar;
StorageVirtualMachineRoot: Integer;
CoolingPeriod: Integer;
TieringPolicyName: PWideChar;
UUID: PWideChar;
CopyTagsToSnapshots: Integer;
OpenZFSConfigurationDataCompressionType: PWideChar;
CopyStrategy: PWideChar;
SnapshotARN: PWideChar;
ParentVolumeId: PWideChar;
ReadOnly: Integer;
RecordSizeKiB: Integer;
StorageCapacityQuotaGiB: Integer;
StorageCapacityReservationGiB: Integer;
VolumePath: PWideChar;
TargetVolumeValuesResourceARN: PWideChar;
TargetVolumeValuesVolumeId: PWideChar;
VolumeType: PWideChar;
k: Integer;
count_k: Integer;
strVal: PWideChar;
Key: PWideChar;
Value: PWideChar;
json1: HCkJsonObject;
i1: Integer;
count_i1: Integer;
Clients: PWideChar;
j1: Integer;
count_j1: Integer;
Id: Integer;
v_Type: PWideChar;
NextToken: PWideChar;
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 := CkRest_Create();

authAws := CkAuthAws_Create();
CkAuthAws_putAccessKey(authAws,'AWS_ACCESS_KEY');
CkAuthAws_putSecretKey(authAws,'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.)
CkAuthAws_putRegion(authAws,'us-west-2');
CkAuthAws_putServiceName(authAws,'fsx');
// SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
CkRest_SetAuthAws(rest,authAws);

// URL: https://fsx.us-west-2.amazonaws.com/
// Use the same region as specified above.
success := CkRest_Connect(rest,'fsx.us-west-2.amazonaws.com',443,True,True);
if (success <> True) then
  begin
    Memo1.Lines.Add('ConnectFailReason: ' + IntToStr(CkRest_getConnectFailReason(rest)));
    Memo1.Lines.Add(CkRest__lastErrorText(rest));
    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 := CkJsonObject_Create();
CkJsonObject_UpdateString(json,'FileSystemIds[0]','string');
CkJsonObject_UpdateInt(json,'MaxResults',123);
CkJsonObject_UpdateString(json,'NextToken','string');

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

// {
//   "FileSystemIds": [
//     "string"
//   ],
//   "MaxResults": number,
//   "NextToken": "string"
// }

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

sbRequestBody := CkStringBuilder_Create();
CkJsonObject_EmitSb(json,sbRequestBody);
sbResponseBody := CkStringBuilder_Create();
success := CkRest_FullRequestSb(rest,'POST','/',sbRequestBody,sbResponseBody);
if (success <> True) then
  begin
    Memo1.Lines.Add(CkRest__lastErrorText(rest));
    Exit;
  end;
respStatusCode := CkRest_getResponseStatusCode(rest);
Memo1.Lines.Add('response status code = ' + IntToStr(respStatusCode));
if (respStatusCode <> 200) then
  begin
    Memo1.Lines.Add('Response Header:');
    Memo1.Lines.Add(CkRest__responseHeader(rest));
    Memo1.Lines.Add('Response Body:');
    Memo1.Lines.Add(CkStringBuilder__getAsString(sbResponseBody));
    Exit;
  end;

jResp := CkJsonObject_Create();
CkJsonObject_LoadSb(jResp,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

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

        k := 0;
        count_k := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].AdministrativeActions[j].TargetSnapshotValues.Tags');
        while k < count_k do
          begin
            CkJsonObject_putK(jResp,k);
            Key := CkJsonObject__stringOf(jResp,'FileSystems[i].AdministrativeActions[j].TargetSnapshotValues.Tags[k].Key');
            Value := CkJsonObject__stringOf(jResp,'FileSystems[i].AdministrativeActions[j].TargetSnapshotValues.Tags[k].Value');
            k := k + 1;
          end;

        k := 0;
        count_k := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].AdministrativeActions[j].TargetVolumeValues.AdministrativeActions');
        while k < count_k do
          begin
            CkJsonObject_putK(jResp,k);
            strVal := CkJsonObject__stringOf(jResp,'FileSystems[i].AdministrativeActions[j].TargetVolumeValues.AdministrativeActions[k]');
            k := k + 1;
          end;

        k := 0;
        count_k := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.NfsExports');
        while k < count_k do
          begin
            CkJsonObject_putK(jResp,k);

            json1 := CkJsonObject_ObjectOf(jResp,'FileSystems[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.NfsExports[k]');
            i1 := 0;
            count_i1 := CkJsonObject_SizeOfArray(json1,'ClientConfigurations');
            while i1 < count_i1 do
              begin
                CkJsonObject_putI(json1,i1);
                Clients := CkJsonObject__stringOf(json1,'ClientConfigurations[i].Clients');
                j1 := 0;
                count_j1 := CkJsonObject_SizeOfArray(json1,'ClientConfigurations[i].Options');
                while j1 < count_j1 do
                  begin
                    CkJsonObject_putJ(json1,j1);
                    strVal := CkJsonObject__stringOf(json1,'ClientConfigurations[i].Options[j]');
                    j1 := j1 + 1;
                  end;

                i1 := i1 + 1;
              end;

            CkJsonObject_Dispose(json1);
            k := k + 1;
          end;

        k := 0;
        count_k := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas');
        while k < count_k do
          begin
            CkJsonObject_putK(jResp,k);
            Id := CkJsonObject_IntOf(jResp,'FileSystems[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[k].Id');
            StorageCapacityQuotaGiB := CkJsonObject_IntOf(jResp,'FileSystems[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[k].StorageCapacityQuotaGiB');
            v_Type := CkJsonObject__stringOf(jResp,'FileSystems[i].AdministrativeActions[j].TargetVolumeValues.OpenZFSConfiguration.UserAndGroupQuotas[k].Type');
            k := k + 1;
          end;

        k := 0;
        count_k := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].AdministrativeActions[j].TargetVolumeValues.Tags');
        while k < count_k do
          begin
            CkJsonObject_putK(jResp,k);
            Key := CkJsonObject__stringOf(jResp,'FileSystems[i].AdministrativeActions[j].TargetVolumeValues.Tags[k].Key');
            Value := CkJsonObject__stringOf(jResp,'FileSystems[i].AdministrativeActions[j].TargetVolumeValues.Tags[k].Value');
            k := k + 1;
          end;

        j := j + 1;
      end;

    j := 0;
    count_j := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].NetworkInterfaceIds');
    while j < count_j do
      begin
        CkJsonObject_putJ(jResp,j);
        strVal := CkJsonObject__stringOf(jResp,'FileSystems[i].NetworkInterfaceIds[j]');
        j := j + 1;
      end;

    j := 0;
    count_j := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].OntapConfiguration.Endpoints.Intercluster.IpAddresses');
    while j < count_j do
      begin
        CkJsonObject_putJ(jResp,j);
        strVal := CkJsonObject__stringOf(jResp,'FileSystems[i].OntapConfiguration.Endpoints.Intercluster.IpAddresses[j]');
        j := j + 1;
      end;

    j := 0;
    count_j := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].OntapConfiguration.Endpoints.Management.IpAddresses');
    while j < count_j do
      begin
        CkJsonObject_putJ(jResp,j);
        strVal := CkJsonObject__stringOf(jResp,'FileSystems[i].OntapConfiguration.Endpoints.Management.IpAddresses[j]');
        j := j + 1;
      end;

    j := 0;
    count_j := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].OntapConfiguration.RouteTableIds');
    while j < count_j do
      begin
        CkJsonObject_putJ(jResp,j);
        strVal := CkJsonObject__stringOf(jResp,'FileSystems[i].OntapConfiguration.RouteTableIds[j]');
        j := j + 1;
      end;

    j := 0;
    count_j := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].SubnetIds');
    while j < count_j do
      begin
        CkJsonObject_putJ(jResp,j);
        strVal := CkJsonObject__stringOf(jResp,'FileSystems[i].SubnetIds[j]');
        j := j + 1;
      end;

    j := 0;
    count_j := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].Tags');
    while j < count_j do
      begin
        CkJsonObject_putJ(jResp,j);
        Key := CkJsonObject__stringOf(jResp,'FileSystems[i].Tags[j].Key');
        Value := CkJsonObject__stringOf(jResp,'FileSystems[i].Tags[j].Value');
        j := j + 1;
      end;

    j := 0;
    count_j := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].WindowsConfiguration.Aliases');
    while j < count_j do
      begin
        CkJsonObject_putJ(jResp,j);
        Lifecycle := CkJsonObject__stringOf(jResp,'FileSystems[i].WindowsConfiguration.Aliases[j].Lifecycle');
        Name := CkJsonObject__stringOf(jResp,'FileSystems[i].WindowsConfiguration.Aliases[j].Name');
        j := j + 1;
      end;

    j := 0;
    count_j := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].WindowsConfiguration.MaintenanceOperationsInProgress');
    while j < count_j do
      begin
        CkJsonObject_putJ(jResp,j);
        strVal := CkJsonObject__stringOf(jResp,'FileSystems[i].WindowsConfiguration.MaintenanceOperationsInProgress[j]');
        j := j + 1;
      end;

    j := 0;
    count_j := CkJsonObject_SizeOfArray(jResp,'FileSystems[i].WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DnsIps');
    while j < count_j do
      begin
        CkJsonObject_putJ(jResp,j);
        strVal := CkJsonObject__stringOf(jResp,'FileSystems[i].WindowsConfiguration.SelfManagedActiveDirectoryConfiguration.DnsIps[j]');
        j := j + 1;
      end;

    i := i + 1;
  end;

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

// {
//   "FileSystems": [
//     {
//       "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"
//       }
//     }
//   ],
//   "NextToken": "string"
// }

CkRest_Dispose(rest);
CkAuthAws_Dispose(authAws);
CkJsonObject_Dispose(json);
CkStringBuilder_Dispose(sbRequestBody);
CkStringBuilder_Dispose(sbResponseBody);
CkJsonObject_Dispose(jResp);