diff --git a/.github/workflows/test.yaml b/.github/workflows/test.yaml new file mode 100644 index 0000000..dfc3e09 --- /dev/null +++ b/.github/workflows/test.yaml @@ -0,0 +1,54 @@ +--- + +name: Test + +on: + pull_request: + types: + - synchronize + - opened + - reopened + - ready_for_review + +jobs: + test: + if: github.event.pull_request.draft == false + + runs-on: ubuntu-20.04 + + steps: + - uses: actions/checkout@v2 + with: + fetch-depth: 0 + + # Github actions L1 cache + - name: stack home cache + id: cache-home-stack + uses: actions/cache@v2 + with: + path: | + /github/home/.stack + key: ${{ runner.os }}-home-stack-${{ hashFiles('stack.yaml.lock') }} + restore-keys: | + ${{ runner.os }}-home-stack- + + - name: stack work cache + uses: actions/cache@v2 + id: cache-stack-work + with: + path: | + **/.stack-work + key: ${{ runner.os }}-stack-work-${{ hashFiles('stack.yaml.lock') }}-${{ hashFiles('aws-ec2-knownhosts.cabal') }} + restore-keys: | + ${{ runner.os }}-stack-work-${{ hashFiles('stack.yaml.lock') }}- + ${{ runner.os }}-stack-work- + + # Build + - name: stack build + run: | + stack build --test --bench --no-run-tests --no-run-benchmarks --ghc-options="+RTS -A256m -I0 -RTS" --no-interleaved-output + + # Test + - name: stack test + run: | + stack test --ghc-options="+RTS -A256m -I0 -RTS" --no-interleaved-output diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..4c9e245 --- /dev/null +++ b/.gitignore @@ -0,0 +1,23 @@ +dist +dist-* +cabal-dev +*.o +*.hi +*.hie +*.chi +*.chs.h +*.dyn_o +*.dyn_hi +.hpc +.hsenv +.cabal-sandbox/ +cabal.sandbox.config +*.prof +*.aux +*.hp +*.eventlog +.stack-work/ +cabal.project.local +cabal.project.local~ +.HTF/ +.ghc.environment.* diff --git a/README.md b/README.md index f2c9bdb..e2451b3 100644 --- a/README.md +++ b/README.md @@ -1 +1,6 @@ # cqg-api-client + +This repo contains Haskell packages for working with CQG's APIs: + +- [CQG CMS API](https://partners.cqg.com/api-resources/cms-api) +- [CQG Web API](https://partners.cqg.com/api-resources/web-api) (_not yet implemented_) diff --git a/cqg-cms-api-proto/CHANGELOG.md b/cqg-cms-api-proto/CHANGELOG.md new file mode 100644 index 0000000..ec8eae6 --- /dev/null +++ b/cqg-cms-api-proto/CHANGELOG.md @@ -0,0 +1,11 @@ +# Changelog for `cqg-cms-api-proto` + +All notable changes to this project will be documented in this file. + +The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/), +and this project adheres to the +[Haskell Package Versioning Policy](https://pvp.haskell.org/). + +## Unreleased + +## 0.1.0.0 - YYYY-MM-DD diff --git a/cqg-cms-api-proto/LICENSE b/cqg-cms-api-proto/LICENSE new file mode 100644 index 0000000..8b13789 --- /dev/null +++ b/cqg-cms-api-proto/LICENSE @@ -0,0 +1 @@ + diff --git a/cqg-cms-api-proto/README.md b/cqg-cms-api-proto/README.md new file mode 100644 index 0000000..0e9d6ec --- /dev/null +++ b/cqg-cms-api-proto/README.md @@ -0,0 +1 @@ +# cqg-cms-api-proto diff --git a/cqg-cms-api-proto/Setup.hs b/cqg-cms-api-proto/Setup.hs new file mode 100644 index 0000000..9a994af --- /dev/null +++ b/cqg-cms-api-proto/Setup.hs @@ -0,0 +1,2 @@ +import Distribution.Simple +main = defaultMain diff --git a/cqg-cms-api-proto/cqg-cms-api-proto.cabal b/cqg-cms-api-proto/cqg-cms-api-proto.cabal new file mode 100644 index 0000000..9fcc5fd --- /dev/null +++ b/cqg-cms-api-proto/cqg-cms-api-proto.cabal @@ -0,0 +1,68 @@ +cabal-version: 1.12 + +-- This file has been generated from package.yaml by hpack version 0.36.0. +-- +-- see: https://github.com/sol/hpack + +name: cqg-cms-api-proto +version: 0.1.0.0 +synopsis: Haskell modules generated from Protobuf definitions of the CQG CMS API +description: Please see the README on GitHub at +category: Web +author: Bitnomial +maintainer: Bitnomial +copyright: 2024 Bitnomial, Inc +license: AllRightsReserved +license-file: LICENSE +build-type: Simple +extra-source-files: + README.md + CHANGELOG.md + proto/CMS/api_limit_1.proto + proto/CMS/cmsapi_1.proto + proto/CMS/common_1.proto + proto/CMS/location_1.proto + proto/CMS/log_event_1.proto + proto/CMS/login_1.proto + proto/CMS/metadata_1.proto + proto/CMS/order_1.proto + proto/CMS/session_context_1.proto + proto/CMS/traderouting_1.proto + proto/common/decimal.proto + proto/common/shared_1.proto + +library + exposed-modules: + Proto.CMS.ApiLimit1 + Proto.CMS.ApiLimit1_Fields + Proto.CMS.Cmsapi1 + Proto.CMS.Cmsapi1_Fields + Proto.CMS.Common1 + Proto.CMS.Common1_Fields + Proto.CMS.Location1 + Proto.CMS.Location1_Fields + Proto.CMS.LogEvent1 + Proto.CMS.LogEvent1_Fields + Proto.CMS.Login1 + Proto.CMS.Login1_Fields + Proto.CMS.Metadata1 + Proto.CMS.Metadata1_Fields + Proto.CMS.Order1 + Proto.CMS.Order1_Fields + Proto.CMS.SessionContext1 + Proto.CMS.SessionContext1_Fields + Proto.CMS.Traderouting1 + Proto.CMS.Traderouting1_Fields + Proto.Common.Decimal + Proto.Common.Decimal_Fields + Proto.Common.Shared1 + Proto.Common.Shared1_Fields + other-modules: + Paths_cqg_cms_api_proto + hs-source-dirs: + src + ghc-options: -Wall -Wcompat -Wincomplete-record-updates -Wincomplete-uni-patterns -Wmissing-home-modules -Wpartial-fields -Wredundant-constraints -Wno-unused-do-bind -Wunused-packages -funbox-strict-fields -fwrite-ide-info + build-depends: + base >=4.7 && <5 + , proto-lens-runtime + default-language: Haskell2010 diff --git a/cqg-cms-api-proto/generate.sh b/cqg-cms-api-proto/generate.sh new file mode 100755 index 0000000..2400f6b --- /dev/null +++ b/cqg-cms-api-proto/generate.sh @@ -0,0 +1,25 @@ +#! /usr/bin/env nix-shell +#! nix-shell -i bash +# nixos-24.05 as of 2024-06-01 +#! nix-shell -I nixpkgs=https://github.com/NixOS/nixpkgs/archive/805a384895c696f802a9bf5bf4720f37385df547.tar.gz +#! nix-shell -p curl +#! nix-shell -p unzip +#! nix-shell -p protobuf +#! nix-shell -p haskellPackages.proto-lens-protoc +# +# This script will download and regenerate the CQG CMS API Protobuf files. + +# Make sure shellcheck understands that this is a Bash script. +# shellcheck shell=bash + +set -eumo pipefail + +shopt -s globstar + +rm -rf proto/* +curl 'https://partners.cqg.com/cms/protocol/production/CMS.zip' > proto/CMS.zip +unzip proto/CMS.zip -d proto/ +rm proto/CMS.zip + +rm -rf src/* +protoc --plugin=protoc-gen-haskell="$(which proto-lens-protoc)" --haskell_out=src/ --proto_path=proto proto/**/*.proto diff --git a/cqg-cms-api-proto/package.yaml b/cqg-cms-api-proto/package.yaml new file mode 100644 index 0000000..477a3e2 --- /dev/null +++ b/cqg-cms-api-proto/package.yaml @@ -0,0 +1,39 @@ +name: "cqg-cms-api-proto" +version: "0.1.0.0" +maintainer: "Bitnomial " +license: "AllRightsReserved" +author: "Bitnomial" +copyright: "2024 Bitnomial, Inc" + +extra-source-files: + - README.md + - CHANGELOG.md + - proto/**/*.proto + +synopsis: "Haskell modules generated from Protobuf definitions of the CQG CMS API" +category: "Web" + +# To avoid duplicated efforts in documentation and dealing with the +# complications of embedding Haddock markup inside cabal files, it is +# common to point users to the README.md file. +description: "Please see the README on GitHub at " + +dependencies: + - base >= 4.7 && < 5 + - proto-lens-runtime + +ghc-options: + - -Wall + - -Wcompat + - -Wincomplete-record-updates + - -Wincomplete-uni-patterns + - -Wmissing-home-modules + - -Wpartial-fields + - -Wredundant-constraints + - -Wno-unused-do-bind + - -Wunused-packages + - -funbox-strict-fields + - -fwrite-ide-info + +library: + source-dirs: src diff --git a/cqg-cms-api-proto/proto/CMS/api_limit_1.proto b/cqg-cms-api-proto/proto/CMS/api_limit_1.proto new file mode 100644 index 0000000..e9c9e21 --- /dev/null +++ b/cqg-cms-api-proto/proto/CMS/api_limit_1.proto @@ -0,0 +1,85 @@ +// CQG Customer Management System API user limit protocol + +syntax = "proto2"; + +package api_limit_1; + +import "common/shared_1.proto"; + +// Type of limit. +enum ApiLimitType +{ + // Limit type unspecifed and must be ignored. + API_LIMIT_TYPE_UNSPECIFIED = 0; + + // Maximum number of messages per period. + // Messages exceeding the limit are rejected. + API_LIMIT_TYPE_CLIENT_MESSAGES_RATE = 1; +} + +// Request for API limit. +message ApiLimitRequestEntry +{ + // [required] Limit type. + // This field is associated with ApiLimitType enum type. + optional uint32 limit_type = 1; + + // Name of entity to request limit for. Set of possible values depends on limit_type: + // - API_LIMIT_CLIENT_MESSAGES_RATE: Full name of a client message (e.g. information_request.user_info_request). + // + // If not set, then all configured limits of requested type will be returned. + optional string entity_name = 2; +} + +// Request for API limits. +message ApiLimitRequest +{ + // Limits to request. + // If empty, all configured types of limits will be returned. + repeated ApiLimitRequestEntry limits = 1; +} + +// Status of limit entry in result message. +enum ApiLimitEntryStatusCode +{ + // Entry not specified and must be ignored. + API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED = 0; + + // Value is populated. + API_LIMIT_ENTRY_STATUS_CODE_SUCCESS = 1; + + // Limit type was not found. + API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND = 2; +} + +// Information about a limit set for current session of CMS API user. +message ApiLimitEntry +{ + // Limit type. + // This field is associated with ApiLimitType enum type. + optional uint32 limit_type = 1; + + // Name of entity this limit relates to. For more details see entity_name in ApiLimitRequestEntry. + // If not set, then this will be a default limit for all entities of the same limit type. + optional string entity_name = 2; + + // Result status of the requested limit. + // This field is associated with ApiLimitEntryStatusCode enum type. + optional uint32 status_code = 3; + + // Limit value. + optional uint32 value = 4; + + // Populated if the limit is a rate = value / period_sec. + optional uint32 period_sec = 5; + + // Limit description. + optional shared_1.Text description = 6; +} + +// Result of ApiLimitRequest. +message ApiLimitResult +{ + // Output entries. + repeated ApiLimitEntry limit_entries = 1; +} diff --git a/cqg-cms-api-proto/proto/CMS/cmsapi_1.proto b/cqg-cms-api-proto/proto/CMS/cmsapi_1.proto new file mode 100644 index 0000000..f36b111 --- /dev/null +++ b/cqg-cms-api-proto/proto/CMS/cmsapi_1.proto @@ -0,0 +1,853 @@ +// CQG Customer Management System API Protocol. +// +// Protocol time attributes are 64-bit signed integers that contain offset in milliseconds from 01.01.1970 (unix timestamp). +// +// The following attributes are used in comments to describe fields specifics: +// 1. [immutable] - field is ignored via any operation message. +// 2. [obsolete] - field is obsolete and candidate for remove in some next protocol version. +// 3. [required] - field is required for any operation message, even if it is marked as optional. +// Attribute can be additionally amended with operation name it is applied for. For example: +// [required-create] - field is required for the create message only. +// [required-update] - field is required for the update message only. +// 4. [erasable] - field number can be provided in the cleared_fields to reset the value during update operation. +// +// Protocol constants: +// DEFAULT_RESULT_RECORDS_NUMBER = 1000. +// +// Last changes were made on 21 Feb 2024 +// Version 1.36 + +syntax = "proto2"; + +import "common/shared_1.proto"; +import "CMS/common_1.proto"; +import "CMS/traderouting_1.proto"; +import "CMS/metadata_1.proto"; +import "CMS/log_event_1.proto"; +import "CMS/session_context_1.proto"; +import "CMS/login_1.proto"; +import "CMS/location_1.proto"; + +package cmsapi_1; + +enum ProtocolVersion +{ + // Major number change is required for backward incompatible protocol versions (new 'proto' file is necessary) + PROTOCOL_VERSION_MAJOR = 1; + // Minor number is increased for backward compatible protocol versions when new messages and/ or fields are + // added without removing/ changing any existing messages and fields (new 'proto' file is not created) + PROTOCOL_VERSION_MINOR = 36; +} + +////------------------------------------------ +//// Client Messages + +// Rate of incoming requests (sum of different requests within messages) is limited, +// use session_context_scope_request.api_limit_request to get limits of the current session. +// In addition, users should keep no more than 100 pending requests at any time. +// Significantly exceeding the limit of pending requests will result in the rejection of new requests. +// NOTE: All the limits mentioned in this protocol are not guaranteed; they are given for reference only +// and are subject to change without prior notice. +// Delay may occur and be different because of the overall load of the system. +// Pending requests are queued and executed as soon as the system state allows it. +message ClientMessage +{ + // Session related messages. + // Only one session related message is expected in ClientMessage (it should not be combined with other messages). + optional common_1.Logon logon = 1; + optional common_1.Logoff logoff = 2; + optional common_1.RestoreOrJoinSession restore_or_join_session = 7; + + // Information request. + repeated InformationRequest information_request = 3; + + // Search request. + repeated SearchRequest search_request = 4; + + // Operation request. + repeated OperationRequest operation_request = 5; + + // Trade routing related operations. + repeated traderouting_1.TradeRoutingRequest trade_routing_request = 6; + + // Ping request initiated by client. + optional Ping ping = 9; + + // Pong message in response to server Ping. + optional Pong pong = 10; + + // Request to cancel previously deferred request + optional CancelDeferredRequest cancel_deferred_request = 11; + + repeated metadata_1.MetadataScopeRequest metadata_request = 12; + + // Requests related to configuration/information of current session. + repeated session_context_1.SessionContextScopeRequest session_context_scope_request = 13; + + // Location management requests. + repeated location_1.LocationScopeRequest location_scope_request = 14; + + // Reserved for internal use. + extensions 100 to 199; +} + +// Information request message. +// One of the operational request fields is expected. +message InformationRequest +{ + // Request identifier. + // It should be unique to match with operation result. + required uint32 id = 1; + + // Request of user information. + optional common_1.UserInfoRequest user_info_request = 2; + + // Request of user's entitlements. + optional common_1.EntityDataRequest login_entitlement_service_request = 3; + + // Request of entitlement categories. + optional common_1.EntitlementCategoryListRequest entitlement_category_list_request = 4; + + // Request of entitlement service information. + optional common_1.EntitlementServiceRequest entitlement_service_request = 5; + + // Request of profile information. + optional ProfileRequest profile_request = 6; + + // Request for all services list. + optional common_1.EntitlementServiceListRequest entitlement_service_list_request = 7; + + // Request of unique username + optional GetUniqueUsernameRequest get_unique_username_request = 8; + + // Customer to sales series links request. + optional common_1.CustomerSalesSeriesAuthorizationListRequest customer_sales_series_authorization_list_request = 9; + + // Login additional settings request. + optional common_1.LoginSettingsRequest login_settings_request = 10; + + // Requests login's member ids. + // Supported login domains: trade-routing. + optional common_1.LoginExchangeMemberIdListRequest login_exchange_member_id_list_request = 11; + + // Get a list of lookup properties. + // Lookup Property types are defined by CommonLookupPropertyType enum. + optional common_1.LookupPropertyListRequest lookup_property_list_request = 12; + + // Get list of authentication partners. + optional AuthPartnerListRequest auth_partner_list_request = 13; + + // Request of login billing custom data. + optional common_1.LoginBillingCustomDataRequest login_billing_custom_data_request = 14; + + // Request of trading features. + optional common_1.TradingFeaturesRequest trading_features_request = 15; +} + +// Request message to search for information. +// One optional field is expected. +// By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records. +// Set parameter top to a larger number to receive more. +message SearchRequest +{ + // Request identifier. + // It should be unique to match with operation result. + required uint32 id = 1; + + // Optionally restrict matched results by returning the first 'top' records. + optional uint32 top = 2; + + // Search for users. + optional common_1.UserSearchRequest user_search_request = 3; + + // Search for profiles. + optional ProfileSearchRequest profile_search_request = 4; + + // [obsolete] Use ProfileSearchRequest instead. + optional common_1.SalesSeriesSearchRequest obsolete_sales_series_search_request = 5 [deprecated=true]; + + // Determines whether removed entities are included in search result. + optional bool include_removed = 6 [default = false]; + + // Search for log events. + optional log_event_1.EventLogSearchRequest event_log_search_request = 7; +} + +// Operation request message. +// One of the request fields is expected. +// Create operations ignore entity id fields (set it to an empty string). +// Update operations use entity id fields as a key to update corresponding entities. +// Also update operations have optional original entity fields (last know information before changes). +// If the original entity is specified then it is used to identify which fields are updated and +// which stay untouched so to update only fields that are different from the provided original. +// Update operation does not fail if some of the updated fields have been changed already. +// This means that if two clients change the same entity field at the same time then the last one is set +// but if two clients change different fields of this entity at the same time then both changes are applied. +message OperationRequest +{ + // Request identifier. + // It should be unique to match with operation result. + required uint32 id = 1; + + // Clone template or regular user. + // Supported login domains: trade-routing. + optional common_1.CloneUser clone_user = 2; + + // Create profile. + optional CreateProfile create_profile = 3; + + // Update profile. + optional UpdateProfile update_profile = 4; + + // Remove profile. + optional RemoveProfile remove_profile = 5; + + // Create user. + optional common_1.CreateUser create_user = 6; + + // Update user. + optional common_1.UpdateUser update_user = 7; + + // Remove user. + optional common_1.RemoveUser remove_user = 8; + + // [re-]link login to a profile. + // Supported profile types: admin, customer. + optional LinkLoginToProfile link_user_to_profile = 9; + + // Modify the list of user entitlement services. + optional login_1.ModifyLoginEntitlementService modify_login_entitlement_service = 10; + + // Send welcome e-mail to profile. + // Supported profile types: admin, customer. + optional SendWelcomeEmail send_welcome_email = 11; + + // Restore user. + optional common_1.RestoreUser restore_user = 12; + + // Restore profile. + optional RestoreProfile restore_profile = 13; + + // Update customer to sales series authorization list operation. + optional common_1.UpdateCustomerSalesSeriesAuthorizationList update_customer_sales_series_authorization_list = 14; + + // Update login exchange member id list. + // Supported login domains: trade-routing. + optional common_1.UpdateLoginExchangeMemberIdList update_login_exchange_member_id_list = 15; + + // Update Login settings. + optional common_1.UpdateLoginSettings update_login_settings = 16; + + // Activate login operation. + // Supported login domains: trade-routing. + optional common_1.ActivateLogin activate_login = 17; + + // Deactivate login operation. + // Supported login domains: trade-routing. + optional common_1.DeactivateLogin deactivate_login = 18; + + // Send credential reset email. + // Supported login domains: trade-routing, admin. + optional SendCredentialResetEmail send_credential_reset_email = 19; + + // Generate a service security token for a special AuthServer operation. + // Supported login domains: trade-routing, admin. + optional GenerateServiceSecurityToken generate_service_security_token = 20; + + // Erases current credentials of specified types. + // Supported login domains: trade-routing, admin. + optional common_1.EraseCurrentCredentials erase_current_credentials = 21; + + // Supported login domains: trade-routing, admin. + optional TerminateLoginSession terminate_login_session = 22; + + // Update login billing custom data. + // Supported login domains: trade-routing. + optional common_1.UpdateLoginBillingCustomData update_login_billing_custom_data = 23; +} + +// Request used to cancel previously sent request that was deferred in Waiting Queue +// Only next requests can be deferred and canceled: +// cmsapi.InformationRequest +// cmsapi.OperationRequest +// cmsapi.SearchRequest +// trapi.TradeRoutingRequest +// Requests cancelation is available only if client was logged on or join session +// with subscribe_on_request_status_change flag set to true. +// If request with this tracking_number is not present in Waiting Queue or it was initiated from +// another connection than it will not be canceled +message CancelDeferredRequest +{ + // Request identifier + // it should be unique to match with operation result + optional uint32 id = 1; + + // Tracking Number of request to be canceled from Waiting Queue + optional uint64 tracking_number = 2; +} + +////------------------------------------------ +//// Server Messages. + +// Server to Client message. +message ServerMessage +{ + // Session level messages results. + optional common_1.LogonResult logon_result = 1; + optional common_1.LoggedOff logged_off = 2; + optional common_1.RestoreOrJoinSessionResult restore_or_join_session_result = 8; + + // Result of information request. + repeated InformationResult information_result = 3; + + // Result of search request. + repeated SearchResult search_result = 4; + + // Result of operation request. + repeated OperationResult operation_result = 5; + + // Trade routing operation results. + repeated traderouting_1.TradeRoutingResult trade_routing_result = 6; + + // Message from server. + repeated common_1.UserMessage user_message = 7; + + // Ping request. + optional Ping ping = 10; + + // Pong message in response to client Ping request. + optional Pong pong = 11; + + // Result of cancel_deferred_request + optional CancelDeferredRequestResult cancel_deferred_request_result = 12; + + repeated metadata_1.MetadataScopeResult metadata_result = 13; + + // Result of session_context_scope_request. + repeated session_context_1.SessionContextScopeResult session_context_scope_result = 14; + + // Location management results. + repeated location_1.LocationScopeResult location_scope_result = 15; + + // Reserved for internal use. + extensions 100 to 199; +} + +// Result of information request. +// Information is filtered according to permissions of logged-in user (or 'on-behalf-of' user). +message InformationResult +{ + // ID of a corresponding request. + required uint32 request_id = 1; + + // Operation status. + // This field is associated with common_1.OperationStatus enum. + required uint32 operation_status = 2; + + // Failure details. + optional shared_1.Text error_message = 3; + + // User information. + optional common_1.User user = 4; + + // List of user entitlement services. + repeated login_1.LoginEntitlementService login_entitlement_service = 5; + + // Entitlement categories list. + repeated common_1.EntitlementCategory entitlement_category = 6; + + // Entitlement service list. + repeated common_1.EntitlementService entitlement_service = 7; + + // Profile. + optional common_1.Profile profile = 8; + + // Get unique username result + optional UniqueUsernameResult unique_username_result = 9; + + // Customer to sales series authorization list result message. + optional common_1.CustomerSalesSeriesAuthorizationListResult customer_sales_series_authorization_list_result = 10; + + // Result of LoginSettingsRequest. + optional common_1.LoginSettingsResult login_settings_result = 11; + + // Result of LoginExchangeMemberIdListRequest + optional common_1.LoginExchangeMemberIdListResult login_exchange_member_id_list_result = 12; + + // Result of lookup_property_list_request. + optional common_1.LookupPropertyListResult lookup_property_list_result = 13; + + // Result of AuthPartnerListRequest. + optional AuthPartnerListResult auth_partner_list_result = 14; + + // Result of LoginBillingCustomDataRequest. + optional common_1.LoginBillingCustomDataResult login_billing_custom_data_result = 15; + + // Request tracking number generated by CMS API + // Used by client to cancel deferred request + optional uint64 tracking_number = 16; + + // Result of TradingFeaturesRequest. + optional common_1.TradingFeaturesResult trading_features_result = 17; +} + +// Search operation result. +message SearchResult +{ + // ID of a corresponding request. + required uint32 request_id = 1; + + // Operation status. + // This field is associated with common_1.OperationStatus enum. + required uint32 operation_status = 2; + + // This flag is set to True if all search results are sent + // and nothing was filtered out by 'top' parameter. + optional bool is_complete = 3 [default = true]; + + // Failure details. + optional shared_1.Text error_message = 4; + + // User search result records. + repeated common_1.UserSearchResultRecord user_record = 5; + + // Profile search result records. + repeated ProfileSearchResultRecord profile_record = 6; + + // [obsolete] Use ProfileSearchResultRecord instead. + repeated common_1.SalesSeriesSearchResultRecord obsolete_sales_series_record = 7 [deprecated=true]; + + // Request tracking number generated by CMS API + // Used by client to cancel deferred request + optional uint64 tracking_number = 8; + + // Log event search result records. + repeated log_event_1.EventLogSearchResultRecord event_log_record = 9; +} + +// Result of operation request. +message OperationResult +{ + // ID of a corresponding request. + required uint32 request_id = 1; + + // Operation status. + // This field is associated with common_1.OperationStatus enum. + required uint32 operation_status = 2; + + // Failure details. + optional shared_1.Text error_message = 3; + + // Clone user result. + optional common_1.CloneUserResult clone_user_result = 4; + + // Create profile result. + optional CreateProfileResult create_profile_result = 5; + + // Update profile result. + optional UpdateProfileResult update_profile_result = 6; + + // Remove profile result. + optional RemoveProfileResult remove_profile_result = 7; + + // Create user result. + optional common_1.CreateUserResult create_user_result = 8; + + // Update user result. + optional common_1.UpdateUserResult update_user_result = 9; + + // Remove user result. + optional common_1.RemoveUserResult remove_user_result = 10; + + // [re-]link login to profile result. + optional LinkLoginToProfileResult link_login_to_profile_result = 11; + + // Modify user entitlement service result. + optional login_1.ModifyLoginEntitlementServiceResult modify_login_entitlement_service_result = 12; + + // Send welcome e-mail result. + optional SendWelcomeEmailResult send_welcome_email_result = 13; + + // Restore user result. + optional common_1.RestoreUserResult restore_user_result = 14; + + // Restore profile result. + optional RestoreProfileResult restore_profile_result = 15; + + // Result of customer to sales series authorization list update. + optional common_1.UpdateCustomerSalesSeriesAuthorizationListResult update_customer_sales_series_authorization_list_result = 16; + + // Result of UpdateLoginExchangeMemberIdList. + optional common_1.UpdateLoginExchangeMemberIdListResult update_login_exchange_member_id_list_result = 17; + + // Result of UpdateLoginSettings. + optional common_1.UpdateLoginSettingsResult update_login_settings_result = 18; + + // Result of ActivateLogin + optional common_1.ActivateLoginResult activate_login_result = 19; + + // Result of DeactivateLogin + optional common_1.DeactivateLoginResult deactivate_login_result = 20; + + // Result of send credential reset email. + optional SendCredentialResetEmailResult send_credential_reset_email_result = 21; + + // Result of generate a service security token for a special AuthServer operation. + optional GenerateServiceSecurityTokenResult generate_service_security_token_result = 22; + + // Result of EraseCurrentCredentials. + optional common_1.EraseCurrentCredentialsResult erase_current_credentials_result = 23; + + optional TerminateLoginSessionResult terminate_login_session_result = 24; + + // Result of UpdateLoginBillingCustomData. + optional common_1.UpdateLoginBillingCustomDataResult update_login_billing_custom_data_result = 25; + + // Request tracking number generated by CMS API + // Used by client to cancel deferred request + optional uint64 tracking_number = 26; +} + +// Send welcome e-mail operation. +message SendWelcomeEmail +{ + // [obsolete] Use profile_id instead. + optional string obsolete_customer_id = 1 [deprecated=true]; + + // Optional list of logins to be included into this e-mail. + // All profile's system logins are included if omitted. + repeated string login_id = 2; + + // Profile id of a recipient. + // Supported profiles + optional string profile_id = 3; +} + +// Result of send welcome e-mail operation. +message SendWelcomeEmailResult +{ +} + +// Send credential reset e-mail to a profile. +message SendCredentialResetEmail +{ + // [obsolete] Use profile_id instead. + optional string obsolete_customer_id = 1 [deprecated=true]; + + // [required] A login linked to a profile for which the reset is requested. + // Only trade-routing logins are supported now. + optional string login_id = 2; + + // List of special operations that are requested for this login. + // This filed is associated with common_1.AuthServerSpecialOperation enum. + repeated uint32 operation = 3; + + // Profile id of a recipient. + optional string profile_id = 4; +} + +// Result of send e-mail operation. +message SendCredentialResetEmailResult +{ +} + +message GenerateServiceSecurityToken +{ + // [required] Generate SST for this login. + // Only trade-routing logins are supported now. + optional string login_id = 1; + + // List of special operations that are requested for this login. + // This filed is associated with common_1.AuthServerSpecialOperation enum. + repeated uint32 operation = 2; +} + +message GenerateServiceSecurityTokenResult +{ + // Generated token. + optional string security_token = 1; + + // URL that can be visited by a client to execute special operations using + // generated token. + optional string url = 2; +} + +// Ping request which can be initiated by any side to ensure connection is alive. +// Both client and server sides must respond such request with Pong. +message Ping +{ + // Token routed back in Pong response. + optional string token = 1; + + // UTC time when this request was composed. Used for network latency diagnostics. + required sint64 ping_utc_time = 2; +} + +// Pong response which must be sent in response on Ping request. +message Pong +{ + // Token passed in Ping request. + optional string token = 1; + + // Corresponding value from Ping request. + required sint64 ping_utc_time = 2; + + // UTC time when this response was composed. + required sint64 pong_utc_time = 3; +} + +// Request for list of authentication partners. +message AuthPartnerListRequest +{ +} + +// Reply to AuthPartnerListRequest. +message AuthPartnerListResult +{ + repeated AuthPartner auth_partner = 1; +} + +// Information about authentication partner. +message AuthPartner +{ + // Partner's ID. + optional string id = 1; + + // Partner's display name. + optional string display_name = 2; + + // List of brokerage (FCM) IDs the partner enabled for. + repeated string brokerage_id = 3; + + // Logout endpoint URI for this partner. + optional string logout_endpoint_uri = 4; + + // Logout endpoint parameters for this partner. + optional string logout_endpoint_parameters = 5; +} + +// Create profile operation. +message CreateProfile +{ + // [required] Profile to create. + optional common_1.Profile profile = 1; +} + +// Update profile operation. +message UpdateProfile +{ + // [required] Profile to update. + optional common_1.Profile profile = 1; + + // [obsolete] Use only profile field with changed fields only instead. + optional common_1.Profile obsolete_original_profile = 2 [deprecated=true]; +} + +// Remove profile operation. +message RemoveProfile +{ + // [obsolete] Use profile_id instead. + optional string obsolete_customer_id = 1 [deprecated=true]; + + // Profile identifier to remove. + optional string profile_id = 2; +} + +// Restore profile operation. +message RestoreProfile +{ + // [obsolete] Use profile_id instead. + optional string obsolete_customer_id = 1 [deprecated=true]; + + // Profile identifier to remove. + optional string profile_id = 2; +} + +// Result of create profile operation. +message CreateProfileResult +{ + // [obsolete] Use profile_id instead. + optional string obsolete_customer_id = 1 [deprecated=true]; + + // Assigned profile id, if succeded. + optional string profile_id = 2; +} + +// Result of update profile operation. +message UpdateProfileResult +{ +} + +// Result of remove profile operation. +message RemoveProfileResult +{ +} + +// Result of restore profile operation. +message RestoreProfileResult +{ +} + +// Request of profile information. +message ProfileRequest +{ + // [obsolete] Use profile_id instead. + optional string obsolete_customer_id = 1 [deprecated=true]; + + // ID of a requested profile. + optional string profile_id = 2; +} + +// Link user to a profile operation. +message LinkLoginToProfile +{ + // [required] Login id to link. + optional string login_id = 1; + + // [obsolete] Use profile_id instead. + optional string obsolete_customer_id = 2 [deprecated=true]; + + // Profile id. + // Supported profile types: admin, customer. + optional string profile_id = 3; +} + +// Result of [re-]link login to a profile operation. +message LinkLoginToProfileResult +{ +} + +// Request of unique username. +message GetUniqueUsernameRequest +{ + // [obsolete] Use profile_id instead. + optional string obsolete_customer_id = 1 [deprecated=true]; + + // Profile id username created for + optional string profile_id = 2; +} + +// Result of unique username request. +message UniqueUsernameResult +{ + // username, if succeeded. + optional string username = 1; +} + +// Request to search profiles. +message ProfileSearchRequest +{ + // List of possible search refine criteria. + enum SearchCriteria + { + // Search by customer id. + CUSTOMER_ID = 1; + + // Search by profile name. + NAME = 2; + + // Search by first name. + FIRST_NAME = 3; + + // Search by last name. + LAST_NAME = 4; + + // Search by brokerage id. + LINKED_BROKERAGE_ID = 5; + + // Profile sales series number. + NUMBER = 6; + + PROFILE_ID = 7; + + // This field is associated with common_1.ProfileType enum type. + // LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY or IN rule and in all match mode. + PROFILE_TYPE = 8; + } + + // [obsolete] Use search_options field instead. + optional string obsolete_text = 1 [deprecated=true]; + + // [obsolete] Use search_options field instead. + repeated uint32 obsolete_search_criteria = 2 [deprecated=true]; + + // List of search options. Each option has its own search text, criteria and matching rule. + repeated common_1.SearchOption search_options = 3; + + // Indicates, whether all criteria must match at once. + // By default any criteria must match. + optional bool all_match_mode = 4 [default = false]; +} + +message ProfileSearchResultRecord +{ + // Associated Customer identifier. + optional string customer_id = 1; + + // Profile name. + optional string name = 2; + + // Profile's brokerage name. + optional string linked_brokerage_name = 3; + + // Contact first name. + optional string first_name = 4; + + // Contact last name. + optional string last_name = 5; + + // Profile's linked brokerage id. + optional string linked_brokerage_id = 6; + + // Removed flag. + optional bool removed = 7; + + // [obsolete] Authentication system of login must be used instead. + // Profile's authentication system. + // LookupPropertyListRequest { property_type = CommonLookupPropertyType.AUTHENTICATION_SYSTEM } + optional string obsolete_authentication_system = 8 [deprecated = true]; + + // Profile's main type. + // This field is associated with Customer.ProfileType enum type. + optional uint32 profile_type = 9; + + // Sales series profile number. + optional string number = 10; + + // Associated Sales Series identifier. + optional string sales_series_id = 11; + + // Profile identifier. + optional string profile_id = 12; +} + +// Result of CancelDeferredRequest +message CancelDeferredRequestResult +{ + // ID of a corresponding request + optional uint32 request_id = 1; + + // Operation status. + // this field is associated with common_1.OperationStatus enum + optional uint32 operation_status = 2; + + // Failure details + optional shared_1.Text error_message = 3; +} + +// Terminates all open sessions of login. +// When there are no sessions does nothing. +message TerminateLoginSession +{ + // [required] Login identifier. + // Supported login domains: trade-routing, admin + optional string login_id = 1; + + // Specific login session identifiers to terminate. + // If not provided, all active sessions of the login will be terminated. + repeated string session_ids = 2; +} + +message TerminateLoginSessionResult +{ +} diff --git a/cqg-cms-api-proto/proto/CMS/common_1.proto b/cqg-cms-api-proto/proto/CMS/common_1.proto new file mode 100644 index 0000000..3598541 --- /dev/null +++ b/cqg-cms-api-proto/proto/CMS/common_1.proto @@ -0,0 +1,1702 @@ +// CQG common messages in API Protocols +// +// Last changes were made on 15 Feb 2024 +// Version 1.59 + +syntax = "proto2"; + +import "common/shared_1.proto"; + +package common_1; + +////------------------------------------------ +//// Messages + +// Message from server. +message UserMessage +{ + // Type of the message. + enum MessageType + { + // Critical error message. + CRITICAL_ERROR = 1; + + // Warning. + WARNING = 2; + + // General information. + INFO = 3; + + // This message shouldn't be visible for users, only dumped into a log file. + LOG = 4; + } + // This field is associated with MessageType enum type. + required uint32 message_type = 1; + + // Information about source of the message. + optional string source = 2; + + // Message subject. + optional string subject = 3; + + // Message text. + required shared_1.Text text = 4; + + // Optional time when this message is expired, it should be hidden from user after this time (UTC). + optional sint64 expiration_utc_time = 5; +} + + +// Logon to the system and open a new session. +message Logon +{ + // Session settings for additional functionality. + enum SessionSetting + { + // Allows restoring session in case of an accidental disconnect (see RestoreOrJoinSession message). + // If the setting is not specified then termination of the last connection also terminates the session without ability to restore it. + // For security reasons clients should not specify this setting without using the restore session functionality. + ALLOW_SESSION_RESTORE = 1; + + // Allows other new connections to join the session (see RestoreOrJoinSession message) and work concurrently. + // If the setting is not specified then the session can have only one connection at each moment and a new connection pushes the old one out (if the session restore is allowed). + // For security reasons clients should not specify this setting without using join session functionality. + ALLOW_SESSION_JOIN = 2; + } + + // [required] Current protocol version that is used by a client. Client has to fill it with values from ProtocolVersion enum. + optional uint32 protocol_version_minor = 1; + optional uint32 protocol_version_major = 2; + + // Username. + // Ignored when access_token is provided. + optional string user_name = 3; + + // User password. + // Ignored when access_token is provided. + optional string password = 4; + + // Identifier of a client application as assigned by CQG. + // Ignored when access_token is provided. + optional string client_app_id = 5; + + // Version of a client application. + optional string client_version = 6; + + // List of settings for a new session. + // This field is associated with SessionSetting enum type. + repeated uint32 session_settings = 7; + + // Optional field that indicates if possible concurrent sessions for this user should be forcedly dropped. + // If it is set to false then Logon may fail with corresponding error message. + // If it is omitted or set to true then concurrent sessions for this user will be dropped. + optional bool drop_concurrent_session = 8; + + // Private label name. + // Ignored when access_token is provided. + optional string private_label = 9; + + // Access token from CQG auth server. + optional string access_token = 10; + + // Indicates that CMS API must notify client with additional requests statuses: + // ACCEPTED, QUEUED, IN_PROCESSING, CANCELED + optional bool subscribe_on_request_status_change = 11 [default = false]; +} + +// Client request to restore session because of accidental disconnect or join the same session. +// In non-trusted mode, this operation is possible only from the same IP address. +// Permissions to use this functionality is regulated by ALLOW_SESSION_RESTORE/ALLOW_SESSION_JOIN session settings +// which are specified in Logon message. +message RestoreOrJoinSession +{ + // Type of operation on user session. + enum OperationType + { + // Restore session. + RESTORE = 1; + + // Join session. + JOIN = 2; + } + + // Token of the session to restore or join, it has limited lifetime after disconnect. + required string session_token = 1; + + // Identifier of the client application as assigned by CQG. + required string client_app_id = 2; + + // Can be used by trusted clients (components connected in trust mode) to specify real client IP they act on behalf of. + optional string client_ip_address = 3; + + // Indicates that CMS API must notify client with additional requests statuses: + // ACCEPTED, QUEUED, IN_PROCESSING, CANCELED + optional bool subscribe_on_request_status_change = 4 [default = false]; + + // This field is associated with OperationType enum. + optional uint32 operation_type = 5; +} + +// Logoff session. +message Logoff +{ +} + +message Credentials +{ + // User name to login. + required string user_name = 1; + + // User password. + optional string password = 2; +} + +// Result of the Logon operation. +message LogonResult +{ + // Current protocol version of the server. For information only. + required uint32 protocol_version_minor = 1; + required uint32 protocol_version_major = 2; + + // Operation status. + // This field is associated with OperationStatus enum. + required uint32 operation_status = 3; + + // Message in case of logon failure. + optional shared_1.Text error_message = 4; + + // Token of a new session if logon succeeded. + optional string session_token = 5; +} + +// Result of session restore or join attempt. +message RestoreOrJoinSessionResult +{ + // This field is associated with OperationStatus enum. + required uint32 operation_status = 1; + + // Message in case of failure. + optional shared_1.Text error_message = 2; +} + +// Server notification about closing user's session, +// server closes connection after this message. +message LoggedOff +{ + // Logoff reason. + optional shared_1.Text reason = 2; +} + +// Request of entitlement categories. +message EntitlementCategoryListRequest +{ +} + +// Request of entitlement service information. +message EntitlementServiceRequest +{ + // Id of the requested service. + required uint32 entitlement_service_id = 1; +} + +// Request of entitlement service list +// available for the current session login. +message EntitlementServiceListRequest +{ + // Optional list of brokerage IDs. If it is not specified all brokerages for current session will be used. + repeated string brokerage_id = 1; + + // Indicates that CMS API must return retired services as well. + // By default retired services are not returned. + optional bool include_retired = 2 [default = false]; +} + +// Entitlement Service details. +message EntitlementService +{ + // Service authorization type. + enum AuthorizationType + { + DISABLE_ONLY = 1; + VIEW_ONLY = 2; + ENABLE_ONLY = 3; + FULL_CONTROL = 4; + } + + // Special service options. + enum ServiceOption + { + ONLY_FOR_TRADERS = 1; + FREE_FOR_TRADERS = 2; + } + + // Identifier. + required uint32 id = 1; + + // Name. + required shared_1.Text name = 2; + + // List of assigned entitlement category IDs. + repeated uint32 category_id = 3; + + // Service prices. + repeated Price price = 4; + + // Description. + required shared_1.Text description = 5; + + // Authorization Type. + // This field is associated with EntitlementService.AuthorizationType enum type. + required uint32 authorization_type = 6; + + // List of this service constraints. + repeated EntitlementConstraint constraint = 7; + + // [obsolete] Indicates if a separate agreement is required according to + // original service provider rules (False if omitted). + optional bool obsolete_agreement_required = 8 [deprecated=true]; + + // [obsolete] Optional agreement text. + optional shared_1.Text obsolete_agreement = 9 [deprecated=true]; + + // Optional link of a service to a subscriber type. + // The service is allowed for any subscriber type if omitted. + // This field is associated with User.SubscriberType enum type. + optional uint32 subscriber_type = 10; + + // Indicates whether billing brokerage is mandatory in order to enable the service for a login. + optional bool billing_brokerage_required = 11; + + // Login domains. + // This field is associated with LoginDomain enum type. + repeated uint32 login_domains = 12; + + // Special options. + // This field is associated with EntitlementService.ServiceOption enum type. + repeated uint32 options = 13; + + // Included items. + repeated EntitlementServiceItem items = 14; + + // Indicates whether brokerage can be assigned for the services in for a login. + optional bool brokerage_assignable = 15; + + // Indicates whether service requires explicit brokerage authorization in order to be available for brokerage logins. + optional bool brokerage_authorization_required = 16; + + // Service will be added to newly created login by default. + optional bool default = 17; + + // Service is visible by CQG admins only. + optional bool visible_by_cqg_only = 18; + + // Entitlement Service Contract requirement. This value is corresponding appropriate INFO value for entitlement contract type. + optional string contract_type = 19; +} + +// Entitlement item description. +message EntitlementServiceItem +{ + // Entitlement Item ID. + optional string id = 1; + + // Entitlement Item Type ID. + optional EntitlementServiceItemType type = 2; + + // Item name. + optional shared_1.Text name = 3; +} + +// Entitlement item type. +message EntitlementServiceItemType +{ + // Type ID in INFO DB (INFO Value). + optional string id = 1; + + // Type name. + optional shared_1.Text name = 2; + + // Type description. + optional shared_1.Text description = 3; + + // Determines whether item type is exchange (market data). + optional bool is_market_data = 4; +} + +// Price as currency and value. +message Price +{ + // Currency code (real currency code is ISO 4217 based. + required string currency = 1; + + // Price value in a specified currency. + required double value = 2; +} + +// Category of entitlement. +message EntitlementCategory +{ + // Category ID. + required uint32 id = 1; + + // Category name. + required shared_1.Text name = 2; + + // List of sub-categories. + repeated EntitlementCategory sub_category = 3; + + // Indicates whether brokerage can be assigned for the services in the catogory for a login. + optional bool brokerage_assignable = 4; +} + +// Entitlement constraint +message EntitlementConstraint +{ + // Constraint type. + enum Type + { + // The services in the constraint are mutually exclusive. + EXCLUDE = 1; + + // Warning constraints are used where two services would normally not be allowed together + // because one is a subset of the other, but we can't use the exclude constraint because + // we need to allow the user to try out a version of the more extensive service. + WARNING = 2; + + // One of the services is mandatory within constraint group but only one service + // from the group can be selected at the same time (if enforced for this user). + MANDATORY_ONLY_ONE = 3; + + // Only one service from the group can be selected at the same time. + PICK_ONE = 4; + + // Only service in whitelist works with particular product service. + PRODUCT_WHITELIST = 5; + + // Constraint to show that all service entitlement items are implicitly included in ref-service + INCLUDE_ITEMS = 6; + } + // This field is associated with EntitlementConstraint.Type enum type. + required uint32 constraint_type = 1; + + // Referenced service id. + optional uint32 ref_service_id = 2; + + // Constraint group name for some constraint types. + optional string constraint_group = 3; +} + +// Request of user information. +message UserInfoRequest +{ + // User ID to request user information. + required string user_id = 4; +} + +// User information. +message User +{ + // Subscriber Type. + enum SubscriberType + { + // Professional subscriber. + PRO = 0; + + // Non-professional subscriber. + NON_PRO = 1; + } + + // Defines classes of login. + enum LoginClass + { + // Regular login for trading. + REGULAR = 1; + + // Fix direct access login. + FIX_DIRECT = 2; + + // Order handler login. + ORDER_HANDLER = 3; + + // Template login for cloning only. + TEMPLATE = 4; + } + + // List of field ids to clear during update operation. + repeated uint32 cleared_fields = 23; + + // [required-update] User Identifier. + // The value is ignored for CreateUser operation. + optional string id = 1; + + // [required-create] User name (max length = 32). + optional string user_name = 2; + + // [obsolete] User first name (max length = 20). + optional string obsolete_first_name = 3 [deprecated=true]; + + // [obsolete] User last name (max length = 25). + optional string obsolete_last_name = 4 [deprecated=true]; + + // [obsolete] User e-mail (max length = 60). + optional string obsolete_email = 5 [deprecated=true]; + + // [immutable-update] Linked customer id. + // Use profile_id instead. + optional string customer_id = 6; + + // [required-create] Subscriber Type. PRO by default when created. + // This field is associated with User.SubscriberType enum type. + // Supported login domains: system, trade-routing. + optional uint32 subscriber_type = 7; + + // Date till the user is alive and then the user will be removed. + // Datetime format is used but only date part is used, time part is ignored. + // Supported login domains: system. + optional sint64 removal_date = 8; + + // [immutable] Identifier of CQG System user. + optional string system_id = 9; + + // [immutable] Identifier of Trade Routing user. + optional string trader_id = 10; + + // [immutable] List of enforced mandatory constraint group names. + repeated string enforced_constraint_group = 11; + + // [immutable] Billing currency code (ISO 4217) + optional string currency = 12; + + // [required-create][immutable-update] Login domain. + // This field is associated with LoginDomain enum type. + optional uint32 domain = 13; + + // [immutable] Removed flag. + optional bool removed = 14; + + // [immutable-update] Login class. + // If not provided during create, default used - regular class. + // This field is associated with User.LoginClass enum type. + // Supported login domains: trade-routing. + optional uint32 class = 15; + + // [immutable] Indicates whether login is used for demo access. + // It cannot be used during login creation and cannot be changed for existing login. + // Supported login domains: trade-routing. + optional bool is_temporary = 16; + + // [immutable] Determines, whether login can be used for trading. + // Supported login domains: trade-routing. + optional bool is_active = 17; + + // [immutable] Date and Time, when login is deactivated and can't be used for trading. + // Supported login domains: trade-routing. + optional sint64 expiration_time = 18; + + // [immutable] Identifier of CAST user. + optional string cast_user_id = 19; + + // Admin login's scope. + // Supported login domains: admin. + // This field is associated with AdminLoginScope enum. + optional uint32 scope = 20; + + // Enforce IP whitelist check. + // Supported login domains: admin, trade-routing. + optional bool enforce_ip_whitelist = 21; + + // [erasable] IP addresses whitelist in CIDR notation. + // Supported login domains: admin, trade-routing. + repeated string ip_whitelist = 22; + + // 23 is used for cleared_fields. + + // [immutable-update][required-create] Owner profile id. + // Has priority over customer_id. + // Supported profile types: admin, customer. + optional string profile_id = 24; +} + +// Additional login settings. +message LoginSettings +{ + // Defines actions on login session disconnect. + enum DisconnectAction + { + // No specific action. + NOTHING = 1; + + // Cancel orders. + CANCEL = 2; + + // Suspend orders. + SUSPEND = 3; + } + + // List of field ids to clear during update operation. + repeated uint32 cleared_fields = 7; + + // [required] Login Identifier. + optional string login_id = 1; + + // Preferred connection point. + // The values are associated with location_1.ConnectionPointListRequest. + // In update operation if connection point requires brokerage authorization, + // then brokerage of login's customer profile must be authorized on this connection point. + optional string preferred_connection_point_id = 2; + + // [erasable] Possible concurrent sessions number per one IP. + // View and modify access to this field is limited for Admin users. + optional uint32 concurrent_sessions_number = 3; + + // Determines whether password never expires. + optional bool password_never_expires = 4; + + // [obsolete] Strategies can be executed through this login. + optional bool obsolete_is_strategy_runner = 5 [deprecated=true]; + + // [immutable] This can be used in case when preferred_connection_point_id is missing in connection points list. + optional string preferred_connection_point_name = 6; + + // [erasable] Linked login for operations on behave of. + // In case of admin login, this linked login can be only order-handler trade-routing login, + // which is used for order operations going to exchange. + // In case of trade-routing login, this linked login can be only admin login, + // which is used for operations in CMS API. + optional string linked_login_id = 8; + + // Parameters of external authentication, if any. + // Supported login domains: trade-routing. + optional ExternalAuth external_auth = 9; + + // Per-user override of limit of allowed logons per day. Zero or absent field + // mean no override. + optional uint32 daily_logon_limit = 10; + + // [immutable] Number of performed logons for current day. Absent field means zero. + // Note: This property is intentionally mutable, allowing reset of the logon counter by FCMs/ops. + // Note: day boundary is 00:00 UTC. + optional uint32 daily_logon_count = 11; + + // Authentication system identifier. + // LookupPropertyListRequest { property_type = CommonLookupPropertyType.AUTHENTICATION_SYSTEM } + // Supported login domains: trade-routing, admin. + optional string authentication_system = 12; + + // [immutable] Determines whether login is allowed to exceed account authorizations limit. + optional bool allow_exceed_account_limit = 13; + + // This field is associated with LoginSettings.DisconnectActions enum type. + // Supported login domains: trade-routing. + optional uint32 on_session_disconnect_action = 14; + + // Timeout in seconds. If the login reconnects during this period, orders won't be canceled/suspended. + // Applied only if on_session_disconnect_action field does not equal to NOTHING. + // Supported login domains: trade-routing. + optional uint32 reconnect_timeout_after_disconnect = 15; + + // Time zone in IANA (Olson) format: "Area/Location". See https://www.iana.org/time-zones + // Sets preferred time zone for date/time in notification messages. + optional string time_zone = 16; +} + +// Request to search for a user. +message UserSearchRequest +{ + // List of possible search refine criteria. + enum SearchCriteria + { + // Search by user_id. + // With 'CONTAINS' rule, minimal query text length is limited with 3 symbols. + USER_ID = 1; + + // Search by user name. + // With 'CONTAINS' rule, minimal query text length is limited with 3 symbols. + USER_NAME = 4; + + // Search by profile sales series number. + PROFILE_SALES_SERIES_NUMBER = 5; + + // Search by profile sales series name. + PROFILE_SALES_SERIES_NAME = 6; + + // Search by sales series ID. + // Use PROFILE_SALES_SERIES_ID instead. + SALES_SERIES_ID = 7; + + // Search by customer ID for all linked users. + // With 'CONTAINS' rule, minimal query text length is limited with 3 symbols. + // In case of system logins, only EXACT_EQUALITY rule is used, regardless provided rule in request. + // Use PROFILE_ID instead. + CUSTOMER_ID = 8; + + // Search by authorized brokerage id. + // Supported login domains: admin. + BROKERAGE_ID = 9; + + // Search by authorized brokerage name. + // Supported login domains: admin. + BROKERAGE_NAME = 10; + + // Login class. + // Supported login domains: trade-routing. + // This field is associated with User.LoginClass enum type. + // LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode. + CLASS = 11; + + // Login domain. + // This field is associated with LoginDomain enum type. + // LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode. + LOGIN_DOMAIN = 12; + + // Search by profile (customer/admin) ID for all linked users. + // With 'CONTAINS' rule, minimal query text length is limited with 3 symbols. + // In case of system logins, only EXACT_EQUALITY rule is used, regardless provided rule in request. + PROFILE_ID = 13; + + // Search by profile sales series ID. + PROFILE_SALES_SERIES_ID = 14; + + // Search by assigned authentication partner identifier + // Supported login domain: trade-routing. + AUTH_PARTNER_ID = 15; + + // Search by id of user (username) registered for authentication partner + // Supported login domain: trade-routing. + EXTERNAL_USER_ID = 16; + + // Search by assigned authentication partner name + // Supported login domain: trade-routing. + AUTH_PARTNER_NAME = 17; + } + + // [obsolete] Text to search. + optional string obsolete_text = 1 [deprecated=true]; + + // [obsolete] List of search options. + // This field is associated with SearchCriteria enum type. + // Empty list means search by any possible options. + repeated uint32 obsolete_search_criteria = 2 [deprecated = true]; + + // List of search options. Each option has its own search text, criteria and matching rule. + repeated SearchOption search_options = 3; + + // Indicates, whether all criteria must match at once. + // By default any criteria must match. + optional bool all_match_mode = 4 [default = false]; +} + +// User search result record. +message UserSearchResultRecord +{ + // User identifier. + required string user_id = 1; + + // User name. + required string user_name = 2; + + // Customer's first name. + optional string first_name = 3; + + // Customer's last name. + optional string last_name = 4; + + // Customer id. + // Use profile_id instead. + optional string customer_id = 5; + + // Customer name. + optional string customer_name = 6; + + // Customer's brokerage name. + optional string customer_brokerage_name = 7; + + // Removed flag. + optional bool removed = 8; + + // User class. + // This field is associated with User.LoginClass enum type. + optional uint32 class = 9; + + // Temporary user for demo access. + optional bool is_temporary = 10; + + // Owner profile id. + optional string profile_id = 11; + + // Parameters of external authentication, if any. + optional ExternalAuth external_auth = 12; +} + +// Clone traderouting login. +// When target_profile_id is provided, new user will be linked with it, +// otherwise new customer profile will be created. +message CloneUser +{ + // [required] Source user identifier. + optional string source_user_id = 1; + + // [required] New user username (max length = 32). + optional string new_user_username = 2; + + // [obsolete] New user first name (max length = 20). + optional string obsolete_new_user_first_name = 3 [deprecated=true]; + + // [obsolete] New user last name (max length = 25). + optional string obsolete_new_user_last_name = 4 [deprecated=true]; + + // [obsolete] New user address. + optional Address obsolete_new_user_address = 5 [deprecated=true]; + + // Contact information of new customer profile that will be linked with new login. + // Mutually exclusive with target_profile_id. + optional ContactInformation new_user_contact_information = 6; + + // [obsolete] New user middle initial (max length = 1). + optional string obsolete_new_user_middle_initial = 7 [deprecated=true]; + + // Existing customer profile that new login will be linked with. + // Mutually exclusive with new_user_contact_information. + optional string target_profile_id = 8; + + // This flag if set to true prohibit to send welcome email for cloned trader. + optional bool no_welcome_email = 9; + + // Brokerage_id for new customer profile. If not provided it is copied from customer profile of source user. + // Mutually exclusive with target_profile_id. + optional string new_profile_brokerage_id = 10; +} + +message CloneUserResult +{ + // New traderouting login identifier. + required string new_user_id = 1; + + // New linked customer profile identifier. + optional string new_profile_id = 2; +} + +// Address information. +message Address +{ + // List of possible validation statuses of an address. + enum AddressStatus + { + INVALID = 0; + VALID = 1; + NO_VALIDATION = 2; + NEW = 3; + } + + // List of field ids to clear. Erasable fields must be defined in a message where Address is used. + repeated uint32 cleared_fields = 9; + + // Country code (ISO 3166 based) (max length = 2). + optional string country = 1; + + // State code (ISO 3166 based) (max length = 2). + optional string state = 2; + + // City (max length = 25). + optional string city = 3; + + // ZIP/Postal code (max length = 9). + optional string zip = 4; + + // Address line 1 (max length = 58). + optional string address = 5; + + // Address line 2 (max length = 58). + optional string address_2 = 6; + + // Name of address for its identification. + optional string name = 7; + + // Validation status of the address. + // This field is associated with Address.AddressStatus enum type. + optional uint32 address_status = 8; + + // 9 is used for cleared_fields. +} + +// Contact information. +message ContactInformation +{ + // List of e-mail addresses. + // Maximum allowed size is 2 elements. + repeated Email email = 1; + + // List of phones. + // Maximum allowed size is 3 elements. + repeated Phone phone = 2; + + // List of faxes. + // Maximum allowed size is 1 element. + repeated Phone fax = 3; + + // Contact first name (max length = 20). + optional string first_name = 4; + + // Contact last name (max length = 25). + optional string last_name = 5; + + // Mail address information. + // Maximum allowed size is 1 element. + repeated Address address = 6; +} + +// e-mail address information. +message Email +{ + // e-mail (max length = 60). + // It should be valid email address according to RFC 5322 standard or single period '.'. + required string email = 1; +} + +// Phone information. +message Phone +{ + // Phone number (max length = 20). + required string number = 1; +} + +// Create user operation. +message CreateUser +{ + // User to create. + required User user = 1; +} + +// Update user operation. +message UpdateUser +{ + // [required] User to update. + // Only fields for update must be provided. + optional User user = 1; + + // [obsolete] Use only user field instead. + optional User obsolete_original_user = 2 [deprecated = true]; +} + +// Remove user operation. +message RemoveUser +{ + // User identifier to remove. + required string id = 1; +} + +// Restore user operation. +message RestoreUser +{ + // User identifier to restore. + required string id = 1; +} + +// Result of create user operation. +message CreateUserResult +{ + // Assigned user id, if succeeded. + optional string id = 1; +} + +// Result of update user operation. +message UpdateUserResult +{ +} + +// Result of restore user operation. +message RestoreUserResult +{ +} + +// Result of remove user operation. +message RemoveUserResult +{ +} + +// This entity is used as a common list of name - value pairs for different fields. +message LookupProperty +{ + // The value is associated with Lookup Property type enum defined within the request scope. + required uint32 type = 1; + + // Property Value. + // This value must be provided as corresponding field value (usually _id) in specific message. + required string value = 2; + + // Property Name. + required shared_1.Text name = 3; + + // Optional property description. + optional shared_1.Text description = 4; +} + +// Get a list of lookup properties. +message LookupPropertyListRequest +{ + // List of property types to request. + // Empty list means all types are requested. + // The values are associated with Lookup Property type enum defined within the request scope. + repeated uint32 property_type = 1; +} + +// Result of a list of lookup properties request. +message LookupPropertyListResult +{ + // List of requested lookup properties. + repeated LookupProperty lookup_property = 1; +} + +// Search for sales series. +message SalesSeriesSearchRequest +{ + // List of possible search refine criteria. + enum SearchCriteria + { + // Search by sales series ID. + ID = 1; + + // Search by sales series number. + NUMBER = 2; + + // Search by sales series name. + NAME = 3; + + // Search by brokerage id. + BROKERAGE_ID = 4; + + FIRST_NAME = 5; + + LAST_NAME = 6; + } + + // [obsolete] Text to search. + optional string obsolete_text = 1 [deprecated = true]; + + // [obsolete] List of search options. + // This field is associated with SearchCriteria enum type. + // Empty list means search by any possible options. + repeated uint32 obsolete_search_criteria = 2 [deprecated=true]; + + // List of search options. Each option has its own search text, criteria and matching rule. + repeated SearchOption search_options = 3; + + // Indicates, whether all criteria must match at once. + // By default any criteria must match. + optional bool all_match_mode = 4 [default = false]; +} + +// Represents single found sales series. +message SalesSeriesSearchResultRecord +{ + optional string sales_series_id = 1; + + optional string sales_series_name = 2; + + optional string sales_series_number = 3; + + optional string brokerage_id = 4; + + optional string brokerage_name = 5; + + optional bool removed = 6; +} + +// Common tuple message of string values. +message Tuple +{ + optional string first = 1; + optional string second = 2; + optional string third = 3; +} + +// Customer to sales series authorization list request message. +// By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records. +// Set parameter top to a larger number to receive more. +// Either customer_id or sales_series_id or profile_id or profile_sales_series_id is required (mutually exclusive). +message CustomerSalesSeriesAuthorizationListRequest +{ + // Customer ID. + // Use profile_id instead. + optional string customer_id = 1; + + // Sales series ID. + // Use profile_sales_series_id instead. + optional string sales_series_id = 2; + + // optionally restrict results by returning the first 'top' records. + optional uint32 top = 3; + + // Profile ID. + // Has priority over customer_id. + // Supported types: customer, admin. + optional string profile_id = 4; + + // Profile sales series ID. + // Has priority over sales_series_id. + optional string profile_sales_series_id = 5; +} + +// Update customer to sales series authorization list operation. +message UpdateCustomerSalesSeriesAuthorizationList +{ + // Links to add. + // Authorization is added if it does not exist with this customer and sales series id. + repeated CustomerSalesSeriesLink links_to_set = 1; + + // Links to remove. First - customer id (profile id), second - sales series id (profile sales series id). + repeated Tuple links_to_remove = 2; +} + +// Customer to sales series authorization list result message. +message CustomerSalesSeriesAuthorizationListResult +{ + // List of customer to sales series authorization links. + repeated CustomerSalesSeriesLink customer_sales_series_links = 1; + + // This flag is set to true if all results are sent + // and nothing was filtered out by 'top' parameter. + optional bool is_complete = 2 [default = true]; +} + +// Result of customer to sales series authorization list updation. +message UpdateCustomerSalesSeriesAuthorizationListResult +{ + // If message is received then authorizations were updated successfully. +} + +// Customer to sales series authorization link. +message CustomerSalesSeriesLink +{ + // Customer ID. + // Use profile_id instead. + optional string customer_id = 1; + + // Sales series ID. + // Use profile_sales_series_id instead. + optional string sales_series_id = 2; + + // [immutable] Sales series name. + optional string sales_series_name = 3; + + // [immutable] Sales series number. + optional string sales_series_number = 4; + + // [required] Main profile id. + // Has priority over customer_id. + // Supported types: customer, admin. + optional string profile_id = 5; + + // [required] Sales series profile id. + // Has priority over sales_series_id. + optional string profile_sales_series_id = 6; +} + +// Login additional settings request. +message LoginSettingsRequest +{ + // [required] Login identifier. + optional string login_id = 1; +} + +// Result of LoginSettingsRequest. +message LoginSettingsResult +{ + // Login settings. + optional LoginSettings login_settings = 1; +} + +// Update Login settings. +message UpdateLoginSettings +{ + // [required] Login settings. + optional LoginSettings login_settings = 1; +} + +// Result of UpdateLoginSettings. +message UpdateLoginSettingsResult +{ + // If message is received then operation was successfully. +} + +// Requests login's member ids. +message LoginExchangeMemberIdListRequest +{ + // [required] Login identifier. + optional string login_id = 1; +} + +// Requests login's member ids. +message LoginExchangeMemberIdListResult +{ + // Member ids. + repeated LoginExchangeMemberId login_member_ids = 1; +} + +// Login member id. +message LoginExchangeMemberId +{ + // [required] Login identifier. + optional string login_id = 1; + + // [required] Exchange identifier. + // LookupPropertyListRequest { property_type = CommonLookupPropertyType.EXCHANGE } + optional string exchange_id = 2; + + // [required] Exchange member identifier. + optional string member_id = 3; +} + +// Update login exchange member id list. +message UpdateLoginExchangeMemberIdList +{ + // [required] Login id to update member ids. + optional string login_id = 1; + + // Member ids to add or change. + repeated LoginExchangeMemberId member_ids_to_set = 2; + + // Member ids to remove from login. + // First - login id [required], second - exchange id [required]. + repeated common_1.Tuple member_ids_to_remove = 3; +} + +// Result of UpdateLoginExchangeMemberIdList. +message UpdateLoginExchangeMemberIdListResult +{ + // If message is received then operation was successfully. +} + +// Activate login operation. +message ActivateLogin +{ + // [required] Login identifier to activate. + optional string login_id = 1; +} + +// Deactivate login operation. +message DeactivateLogin +{ + // [required] Login identifier to deactivate. + optional string login_id = 1; + + // Date and time when login will be deactivated. + optional sint64 expiration_time = 2; + + // Flag to show that event subscription must be removed. + // Could be set only on immediate deactivation (absent expiration_time). + optional bool clean_up_event_subscriptions = 3 [default = false]; +} + +// Result of ActivateLogin +message ActivateLoginResult +{ +} + +// Result of DeactivateLogin +message DeactivateLoginResult +{ +} + +// Erases current credentials of specified types. +message EraseCurrentCredentials +{ + // [required] Login identifier. + optional string login_id = 1; + + // List of credentials to erase. + // This filed is associated with common_1.CredentialType enum. + repeated uint32 credential_types = 2; +} + +// Result of EraseCurrentCredentials +message EraseCurrentCredentialsResult +{ +} + +// Represents search option for search requests. +message SearchOption +{ + enum MatchingRule + { + CONTAINS = 0; + STARTS_WITH = 1; + ENDS_WITH = 2; + EXACT_EQUALITY = 3; + + // Only criteria marked as supported for this rule can be used with. + // Format: value1,value2. Where each value matches by EXACT_EQUALITY. + // Searches records that match any of these values. + IN_MATCHING_RULE = 4; + } + + // [required] Text to search. + // Empty text is prohibited. + optional string text = 1; + + // Search criteria. + // For each type of search request corresponding enum values should be used. + // Empty means search by any possible criterion. + // Regardless 'all match mode' set on search request level, criteria given here match between each other with 'any' mode. + repeated uint32 criteria = 2; + + // Comparing matching rule. Associated with MatchingRule enum. + // By default all matching rules are used in the following order: EXACT_EQUALITY, STARTS_WITH, ENDS_WITH, CONTAINS. + optional uint32 matching_rule = 3; +} + + +////------------------------------------------ +//// Enumerations + +// Operation result enum. +enum OperationStatus +{ + // Successful result. + SUCCESS = 1; + + // Failed result. + FAILURE = 2; + + // Request accepted by CMS API and will be scheduled for processing + ACCEPTED = 3; + + // Request was defered in CMS API Waiting Queue + QUEUED = 4; + + // Request processing started by CMS API + IN_PROCESSING = 5; + + // Request was cancelled from Waiting Queue + CANCELED = 6; +} + +// Domain of the login information +enum LoginDomain +{ + // CQG Gateway login domain. + CQG_TRADE_ROUTING = 2; + + // CQG System (IC, QTrader, etc.) login domain. + CQG_SYSTEM = 3; + + // CQG Admin (CMS, CAST, CAST2) login domain. + CQG_ADMIN = 4; +} + +// Types of common lookup properties. +enum CommonLookupPropertyType +{ + AUTHENTICATION_SYSTEM = 201; + + CONNECTION_POINT = 202; + + EXCHANGE = 203; + + COUNTRY = 204; + + REGION = 205; + + LOG_EVENT_TYPE = 206; + + REGEX_VALIDATION_RULE = 207; +} + +// List of allowed AuthServer special service operations. +enum AuthServerSpecialOperation +{ + // Complete regular logon that was previously failed due to required operations + // exist for logon. This operation is enabled only for SSTs returned by AuthServer + // in LogonResult when logon fails with one of following codes: + // - PASSWORD_EXPIRED; + // - UNSIGNED_AGREEMENT; + // - OPERATIONS_REQUIRED; + // - SECOND_FACTOR_INIT_REQUIRED. + COMPLETE_LOGON = 0; + + // Set static password without providing old static password. + SET_PASSWORD = 1; + + // Setup new second factor regardless if it is set already. + SETUP_SECOND_FACTOR = 2; + + // Change expired static password. + CHANGE_EXPIRED_PASSWORD = 3; + + // Sign agreement(s). + SIGN_AGREEMENT = 4; + + // Verify user's phone number. + VERIFY_PHONE = 5; + + // Pass certification request. + PASS_CERTIFICATION = 6; +} + +// List of credential types. +enum CredentialType +{ + STATIC_PASSWORD = 1; + SECOND_FACTOR = 2; +} + +// List of possible entities. +enum EntityType +{ + ENTITY_TYPE_ACCOUNT = 1; + ENTITY_TYPE_ORDER = 2; + ENTITY_TYPE_LOGIN = 3; + ENTITY_TYPE_PROFILE = 4; + ENTITY_TYPE_LEGAL_DOCUMENT = 5; +} + +enum LogonResultCode +{ + //// success codes + // User is logged in to the system. + LOGON_SUCCESS = 0; + + //// failure codes (100+) + // General failure. + LOGON_FAILURE = 101; + + // One-time password is required for this user but it was not sent, repeat logon + // with one-time password. + NO_ONETIME_PASSWORD = 103; + + // User password is expired, only change password operation is allowed. + PASSWORD_EXPIRED = 104; + + // The negotiation rules for LogonRoutineClient have been violated, e.g. user has specified several fields at once in one message. + ROUTINE_ERROR = 105; + + // Some fields in LogonInit have wrong values. + WRONG_PARAMETERS = 106; + + // User has been locked out by the system. + USER_AUTO_LOCKOUT = 107; + + // User has been locked out by admins. + USER_MANUAL_LOCKOUT = 108; + + // Second factor authentication is required from this user, but it is not initialised, initialize and repeat logon + SECOND_FACTOR_INIT_REQUIRED = 109; + + // Client application version isn't supported, the client application must be upgraded. + INCOMPATIBLE_CLIENT = 110; + + // There is unsigned/rejected agreement(s) that denies logon. + UNSIGNED_AGREEMENT = 111; + + // User exceeded allowed number of logons. + TOO_MANY_LOGONS = 112; + + // Verification of user's phone number is required. + PHONE_VERIFICATION_REQUIRED = 113; + + // No resources granted to the user. + ACCESS_DENIED = 114; +} + +// Represents admin login scope. +enum AdminLoginScope +{ + CQG = 1; + BROKERAGE = 2; + SALES_REP = 3; + TRADER = 4; +} + +// Represents common message of id and name. +message NamedEntity +{ + // Identifier. + optional string id = 1; + + // Name. + optional shared_1.Text name = 2; +} + +// Represents template message for adding/removing links between entities. +message UpdateEntityLinks +{ + // Links to add. Tuple.First, Tuple.Second are [required]. + repeated Tuple links_to_set = 1; + + // Links to remove. Tuple.First, Tuple.Second are [required]. + repeated Tuple links_to_remove = 2; +} + +// Result of update entity links operation. +message UpdateEntityLinksResult +{ + // If message is received then links was updated successfully. +} + +// Represents template message for requesting linked entities for some entity. +// By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records. +// Set parameter top to a larger number to receive more. +message LinkedEntityListRequest +{ + // Entity identifier. + optional string id = 1; + + // optionally restrict results by returning the first 'top' records. + optional uint32 top = 2; +} + +// Result of linked entities request operation. +message LinkedEntityListResult +{ + repeated NamedEntity entities = 1; + + // This flag is set to true if all results are sent + // and nothing was filtered out by 'top' parameter. + optional bool is_complete = 2 [default = true]; +} + +// Common message for sales series list result. +message SalesSeriesListResult +{ + repeated SalesSeriesInfo sales_series = 1; + + // This flag is set to true if all results are sent + // and nothing was filtered out by 'top' parameter. + optional bool is_complete = 2 [default = true]; +} + +// Represents sales series. +message SalesSeriesInfo +{ + // Sales series ID. + optional string id = 1; + + // Sales series name. + optional string sales_series_name = 2; + + // Sales series number. + optional string sales_series_number = 3; + + // Sales series profile id. + optional string profile_id = 4; +} + +// Authentication activity types. +enum AuthActivityType +{ + // Login. + LOGIN = 1; + + // Password change. + PASSWORD_CHANGE = 2; + + // Clear lockout (from CAST). + CLEAR_LOCKOUT = 3; + + // Change 2FA + CHANGE_2FA = 4; + + // Erase 2FA + ERASE_2FA = 5; + + // Erase password + ERASE_PASSWORD = 6; +} + +// Parameters of external authentication. +message ExternalAuth +{ + // [required] ID of external authentication partner, if any. + optional string partner_id = 1; + + // [required] Username as registered by authentication partner, if any (max length = 255). + // UTF8 encoding string. + optional string username = 2; +} + +// Request for update login billing custom data. +message UpdateLoginBillingCustomData +{ + // [required] Login identifier. + optional string login_id = 1; + + // [required] Login billing custom data. + repeated LoginBillingCustomData login_billing_custom_data = 2; +} + +// Result of UpdateLoginBillingCustomData. +message UpdateLoginBillingCustomDataResult +{ +} + +message LoginBillingCustomData +{ + // [required-update] Account identifier. + optional string account_id = 1; + + // Billing custom data. + // Maximum count is 3 (max length = 256). + repeated string billing_custom_data = 2; +} + +// Request of login billing custom data. +message LoginBillingCustomDataRequest +{ + // [required] Login identifier. + optional string login_id = 1; +} + +// Result of LoginBillingCustomDataRequest. +message LoginBillingCustomDataResult +{ + // Login billing custom data. + repeated LoginBillingCustomData login_billing_custom_data = 1; +} + +message TradingFeaturesRequest +{ +} + +message TradingFeaturesResult +{ + repeated TradingInterfaceElement trading_interface_elements = 1; +} + +message TradingInterfaceElement +{ + // ID of the trading interface element. + optional string id = 1; + + // Name of trading interface element. + optional shared_1.Text name = 2; + + // Indicates if trading interface is not allowed to be enabled + // and can be only disabled. + optional bool disable_only = 3; +} + +// Profile information. +message Profile +{ + // List of field ids to clear during update operation. + repeated uint32 cleared_fields = 9; + + // [immutable] Associated customer. + // [required-update] for customer and admin profile type and profile_id is not provided. + // Use profile_id instead. + optional string customer_id = 1; + + // [required-create] Profile legal type. + // Profile of admin profile type can be only Individual. + // This field is associated with common_1.LegalType enum type. + // Supported profile type: customer, admin. + optional uint32 legal_type = 2; + + // Profile name (max length = 32). + // [required-create] for customer/admin and non-Individual legal types. + // [immutable] for Individual legal type. + optional string name = 3; + + // Profile contact information. + optional ContactInformation contact_information = 4; + + // Brokerage ID. + // [erasable] only for admin profile type. + // [required-create] for customer and sales series profile type. + optional string linked_brokerage_id = 5; + + // [immutable] Removed flag. + optional bool removed = 6; + + // [obsolete] Authentication system of login (LoginSettings.authentication_system field) must be used instead. + // Profile's authentication system. + // LookupPropertyListRequest { property_type = CommonLookupPropertyType.AUTHENTICATION_SYSTEM } + optional string obsolete_authentication_system = 7 [deprecated = true]; + + // Profile type - represents main type of profile. + // This field is associated with ProfileType enum type. + // [immutable] for sales series profile type. + optional uint32 profile_type = 8 [default = 1]; + + // 9 is used for cleared_fields. + + // [required-update] Profile identifier. + // For backward compatibility if customer_id is given, it isn't required during update. + // Has priority over customer_id + optional string profile_id = 11; + + // [immutable] Associated sales series id. + optional string sales_series_id = 12; + + // Unique number (max length = 16). + // [required-create] for sales series profile type. + optional string number = 13; + + // Determines, whether profile is simplified, used for cases of auto-generation. + // Only name is required in this case during creation. + optional bool simplified = 14; +} + +// Generic message to retrieve data. +message DataRequest +{ +} + +// Generic message to retrieve data associated with some entity. +message EntityDataRequest +{ + // [required] Entity identifier. + optional string entity_id = 1; +} + +message EntitiesDataRequest +{ + // [required] Entities identifiers. + repeated string entity_id = 1; +} + +// List of possible profile legal types. +enum LegalType +{ + // Individual. + INDIVIDUAL = 1; + + // Joint-stock company. + JOINT = 2; + + // Limited partnership. + LIMITED = 3; + + // Trust company. + TRUST = 4; + + // Corporate group. + CORPORATE = 5; + + // General partnership. + PARTNERSHIP = 6; +} + +enum ProfileType +{ + PROFILE_TYPE_CUSTOMER = 1; + PROFILE_TYPE_ADMIN = 2; + PROFILE_TYPE_BROKERAGE = 3; + PROFILE_TYPE_SUBSCRIBER = 4; + PROFILE_TYPE_SALES_SERIES = 5; +} + +enum InternalEntityType +{ + INTERNAL_ENTITY_TYPE_ACCOUNT = 1; + INTERNAL_ENTITY_TYPE_ORDER = 2; + INTERNAL_ENTITY_TYPE_TRADER = 3; + INTERNAL_ENTITY_TYPE_CUSTOMER = 4; + INTERNAL_ENTITY_TYPE_SYSTEM = 5; + INTERNAL_ENTITY_TYPE_CAST_USER = 6; + INTERNAL_ENTITY_TYPE_SALES_SERIES = 7; + INTERNAL_ENTITY_TYPE_FCM = 8; + INTERNAL_ENTITY_TYPE_ROUTE_GROUP = 9; + INTERNAL_ENTITY_TYPE_EXCHANGE = 10; + INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE = 11; +} diff --git a/cqg-cms-api-proto/proto/CMS/location_1.proto b/cqg-cms-api-proto/proto/CMS/location_1.proto new file mode 100644 index 0000000..6913daf --- /dev/null +++ b/cqg-cms-api-proto/proto/CMS/location_1.proto @@ -0,0 +1,69 @@ +// CMS API Location entity Protocol. + +syntax = "proto2"; + +package location_1; + +import "common/shared_1.proto"; +import "CMS/common_1.proto"; + +message LocationScopeRequest +{ + // [required] Request identifier. + // It should be unique to match with operation result. + optional uint32 id = 1; + + // Request for connection points. + optional ConnectionPointListRequest connection_point_list_request = 2; +} + +message LocationScopeResult +{ + // ID of a corresponding request. + optional uint32 request_id = 1; + + // Request tracking number generated by CMS API + // Used by client to cancel deferred request + optional uint64 tracking_number = 2; + + // Operation status. + // This field is associated with common_1.OperationStatus enum. + optional uint32 operation_status = 3; + + // Failure details. + optional shared_1.Text error_message = 4; + + // Available connection point list. + optional ConnectionPointListResult connection_point_list_result = 5; +} + +// Get a list of connection points. +message ConnectionPointListRequest +{ + // Brokerages to which connection points with brokerage_authorization_required must have authorization. + // If not provided all connection points available to current admin login will be returned. + repeated string brokerage_ids = 1; +} + +message ConnectionPointListResult +{ + repeated ConnectionPoint connection_points = 1; +} + +message ConnectionPoint +{ + // [required] Connection Point id. + optional string id = 1; + + // [required] Connection Point Name. + optional shared_1.Text name = 2; + + // [required] Corresponding location id. + optional string trade_location_id = 3; + + // [required] Flag, indicating if connection point requires brokerage authorization. + optional bool brokerage_authorization_required = 4; + + // Brokerages which have authorization for connection point, which requires authorization. + repeated string authorized_brokerage_ids = 5; +} \ No newline at end of file diff --git a/cqg-cms-api-proto/proto/CMS/log_event_1.proto b/cqg-cms-api-proto/proto/CMS/log_event_1.proto new file mode 100644 index 0000000..604b24a --- /dev/null +++ b/cqg-cms-api-proto/proto/CMS/log_event_1.proto @@ -0,0 +1,87 @@ +// CQG Customer Management System API log event extend protocol. + +syntax = "proto2"; + +package log_event_1; + +import "CMS/common_1.proto"; + +message EventLogSearchRequest +{ + // List of possible search refine criteria. + // All criteria only one per search option and with exact_equality matching rule. + enum SearchCriteria + { + EVENT_ID = 1; + + // LookupPropertyListRequest { property_type = CommonLookupPropertyType.LOG_EVENT_TYPE } + // Can be used with MatchingRule.IN. + EVENT_TYPE_ID = 2; + + EVENT_GROUP_ID = 3; + + // This field is associated with common_1.EntityType enum type. + ENTITY_TYPE_ID = 4; + + ENTITY_ID = 5; + + // Unix timestamp (UTC). + FROM_DATE = 6; + + // Unix timestamp (UTC). + TO_DATE = 7; + } + + // Optionally restrict matched results by returning the first 'top' records. + optional uint32 top = 1; + + // List of search options. Each option has its own search text, criteria and matching rule. + repeated common_1.SearchOption search_options = 2; +} + +message EventLogSearchResult +{ + // List of found event logs. + repeated EventLogSearchResultRecord event_log_record = 1; + + // This flag is set to true if all results are sent + // and nothing was filtered out by 'top' parameter. + optional bool is_complete = 2 [default = true]; +} + +message EventLogSearchResultRecord +{ + // Event id. + optional string event_id = 1; + + // Event group id. + optional string event_group_id = 2; + + // Event group name; + optional string event_group_name = 3; + + // Event type id. + optional string event_type_id = 4; + + // Event type name. + optional string event_type_name = 5; + + // Event time in UTC. + optional sint64 event_time = 6; + + // Login id. + optional string login_id = 7; + + // Login name (if current session login is authorized on this login). + optional string login_name = 8; + + // Entity type id. + // This field is associated with common_1.EntityType enum type. + optional string entity_type_id = 9; + + // Target entity id. + optional string entity_id = 10; + + // Log text. + optional string text = 11; +} diff --git a/cqg-cms-api-proto/proto/CMS/login_1.proto b/cqg-cms-api-proto/proto/CMS/login_1.proto new file mode 100644 index 0000000..5baa562 --- /dev/null +++ b/cqg-cms-api-proto/proto/CMS/login_1.proto @@ -0,0 +1,82 @@ +// CMS API Login entity Protocol. + +syntax = "proto2"; + +package login_1; + +// Service assigned to a login. +message LoginEntitlementService +{ + // [required] ID of a login. + optional string login_id = 1; + + // [required] Assigned service ID. + optional uint32 entitlement_service_id = 2; + + // [immutable] Time when this entitlement was enabled or is planned to enabled for the login. + optional sint64 from_utc_time = 3; + + // [obsolete] Time when this entitlement is planned to be disabled for the login. + optional sint64 _obsolete_to_utc_time = 4 [deprecated=true]; + + // ID of brokerage who is responsible for billing of the service. + optional string billing_brokerage_id = 5; + + // Brokerages assigned to Entitlement service (only for products). + repeated AssignedBrokerage assigned_brokerages = 6; + + // Determines, whether service is active. + optional bool active = 7; +} + +// Brokerage assigned to Entitlement service. +message AssignedBrokerage +{ + // [required] Brokerage ID. + optional string brokerage_id = 1; + + // If True - brokerage is charged for service not by price, but by usage; otherwise - by price, as usual. + optional bool waive_base_charge = 2; +} + +// Service with an optional restriction period. +message RestrictedEntitlementService +{ + // [required] Service ID. + optional uint32 entitlement_service_id = 1; + + // [immutable] Time when this entitlement was enabled or is planned to enabled for the login. + optional sint64 from_utc_time = 2; + + // [obsolete] Time when this entitlement is planned to be disabled for the login. + optional sint64 _obsolete_to_utc_time = 3 [deprecated=true]; + + // ID of brokerage who will pay for the service usage. + optional string billing_brokerage_id = 4; + + // All brokerages assigned to Entitlement service (only for products). + repeated AssignedBrokerage assigned_brokerages = 5; +} + +// Modify login entitlement services operation. +message ModifyLoginEntitlementService +{ + // [required] Login id to modify the list of services. + optional string login_id = 1; + + // Services to add. + // Services to change restriction periods, billing brokerage or assigned brokerages. + repeated RestrictedEntitlementService entitlement_service_to_set = 2; + + // Services to remove. + repeated uint32 entitlement_service_id_to_remove = 3; +} + +// Result of modify login entitlement service operation. +message ModifyLoginEntitlementServiceResult +{ + // [obsolete] List of login entitlement services after modification. + repeated RestrictedEntitlementService _obsolete_restricted_entitlement_service = 1 [deprecated=true]; +} + + diff --git a/cqg-cms-api-proto/proto/CMS/metadata_1.proto b/cqg-cms-api-proto/proto/CMS/metadata_1.proto new file mode 100644 index 0000000..4b5f406 --- /dev/null +++ b/cqg-cms-api-proto/proto/CMS/metadata_1.proto @@ -0,0 +1,104 @@ +// CQG Customer Management System API Markets metadata extend protocol. + +syntax = "proto2"; + +package metadata_1; + +import "common/shared_1.proto"; +import "CMS/common_1.proto"; + +message MetadataScopeRequest +{ + // [required] Request identifier. + // It should be unique to match with request result. + optional uint32 id = 1; + + // Allows to search supported contracts. + optional ContractSearchRequest contract_search_request = 2; +} + +message MetadataScopeResult +{ + // ID of a corresponding request. + optional uint32 request_id = 1; + + // Request tracking number generated by CMS API + // Used by client to cancel deferred request + optional uint64 tracking_number = 2; + + // Operation status. + // This field is associated with common_1.OperationStatus enum. + optional uint32 operation_status = 3; + + // Failure details. + optional shared_1.Text error_message = 4; + + optional ContractSearchResult contract_search_result = 5; +} + +message ContractSearchRequest +{ + // List of possible search refine criteria. + enum SearchCriteria + { + // Display name (like EPZ16). + CONTRACT_NAME = 1; + + FUNGIBLE_COMMODITY_ID = 2; + + INSTRUMENT_TYPE_ID = 3; + + CONTRACT_ID = 4; + + COMMODITY_ID = 5; + } + + // Optionally restrict matched results by returning the first 'top' records. + optional uint32 top = 1; + + // List of search options. Each option has its own search text, criteria and matching rule. + repeated common_1.SearchOption search_options = 2; + + // Indicates, whether all criteria must match at once. + // By default any criteria must match. + optional bool all_match_mode = 3 [default = false]; + + // Indicates weather include tradable contracts or not. + // By default, only tradable contracts are returned. + optional bool include_non_tradable = 4 [default = false]; +} + +message ContractSearchResult +{ + // List of found contracts. + repeated ContractSearchResultRecord contract_record = 1; + + // This flag is set to true if all results are sent + // and nothing was filtered out by 'top' parameter. + optional bool is_complete = 2 [default = true]; +} + +// Information about one of the found contracts. +message ContractSearchResultRecord +{ + optional string contract_id = 1; + + // Short (display) version of the name. + // Example: EPZ16 + optional string contract_name = 2; + + // Example: F.US.EP.Z16 + optional string contract_full_name = 3; + + // XBit. + optional string commodity_id = 4; + + // Instrument type. + optional string instrument_type_id = 5; + + // Fungible commodity id. + optional string fungible_commodity_id = 6; + + // Contract description. + optional string description = 7; +} \ No newline at end of file diff --git a/cqg-cms-api-proto/proto/CMS/order_1.proto b/cqg-cms-api-proto/proto/CMS/order_1.proto new file mode 100644 index 0000000..af4e439 --- /dev/null +++ b/cqg-cms-api-proto/proto/CMS/order_1.proto @@ -0,0 +1,107 @@ +// CQG Customer Management System API Orders management protocol. + +syntax = "proto2"; + +package order_1; + +// CMS message for BatchOrdersOperation +message BatchOrdersOperation +{ + // [required] Main criteria to search orders for cancel. + optional BatchOrdersOperationCriteria batch_orders_operation_criteria = 1; + + // [required] Secondary criteria to search orders for cancel. + optional BatchOrdersOperationSecondaryCriteria batch_orders_operation_secondary_criteria = 2; +} + +// CMS message for BatchOrdersOperationCriteria. +// Set of criteria to search orders for cancel. +// Either brokerage_ids or profile_ids with sales series profiles is required. +message BatchOrdersOperationCriteria +{ + // ID of Brokerage to limit scope by accounts of this Brokerage. + // [required] for cqg/brokerage scope. + repeated string brokerage_ids = 1; + + // ID of different profile types to limit scope by these profiles. + // Supported profile types: admin, customer, sales series. + // [required] for sales series scope. + repeated string profile_ids = 2; + + // ID of Account to limit scope by this Account. + repeated string account_ids = 3; + + // Login identifier to limit scope by orders, initiated by this login. + // Supported login domains: trade-routing. + repeated string login_ids = 4; + + // ID of RouteGroup to limit scope of orders by this RouteGroup. + repeated string route_group_ids = 5; + + // ID of gateway route to limit scope by this Route. + repeated string route_codes = 6; + + // ID of Contract to limit scope of orders by this Contract. + repeated string contract_ids = 7; + + // ID of MiFID CQG Algorithm to cancel orders initiated by this Algorithm. + repeated string internal_algorithms_ids = 8; + + // ID of MiFID External Algorithm to cancel orders initiated by this Algorithm. + repeated string external_algorithms_ids = 9; +} + +// Set of order criteria to search orders for cancel. +message BatchOrdersOperationSecondaryCriteria +{ + // Order operation type enum. + enum OrderOperationType + { + // Send cancel request. + CANCEL = 1; + + // Reflect order as canceled without sending real cancel request to exchange. + REFLECT_AS_CANCELED = 2; + } + + // Specifies whether only order(s) expiring during the current/nearest session should be considered. + optional bool current_day_only = 1 [default = false]; + + // Specifies whether only externally reported orders that were created via dedicated reporting session (not a regular CQG session) should be considered. + optional bool inactive_exchange_reported_orders_only = 2 [default = false]; + + // Specifies state of orders to be cancelled. True - cancel only parked orders, False - cancel working and parked orders. + optional bool parked_only = 3 [default = false]; + + // Specifies side of orders to cancel. + // This field is associated with OrderChain.Side enum type. + // If this field wasn't provided it's interpreted as 'Both' option. + optional uint32 side = 4; + + // [required] Order operation type that needs to be performed. + // This field is associated with OrderOperationType enum. + optional uint32 order_operation_type = 5; +} + +message BatchOrdersOperationResult +{ + // Operation unique identifier, by which all cancel requests can be found then. + optional string batch_request_guid = 1; + + // In case of successful operation contains result of each risk server instance. + repeated BatchOrdersOperationActionResult risk_instances_results = 2; +} + +// The result of the batch orders operation for a specific risk server instance. +message BatchOrdersOperationActionResult +{ + // Risk server instance identifier. + // LookupPropertyListRequest { property_type = traderouting_1.TradeRoutingLookupPropertyType.RISK_SERVER_INSTANCE } + optional string risk_server_instance_id = 1; + + // Determines count of processed orders on current risk instance. + optional uint32 processed_orders_count = 2; + + // In case of failure action contains error message. + optional string result_description = 3; +} \ No newline at end of file diff --git a/cqg-cms-api-proto/proto/CMS/session_context_1.proto b/cqg-cms-api-proto/proto/CMS/session_context_1.proto new file mode 100644 index 0000000..47c8a85 --- /dev/null +++ b/cqg-cms-api-proto/proto/CMS/session_context_1.proto @@ -0,0 +1,38 @@ +// CQG Customer Management System API protocol for current session configuration/information. + +syntax = "proto2"; + +package session_context_1; + +import "CMS/api_limit_1.proto"; +import "common/shared_1.proto"; + +message SessionContextScopeRequest +{ + // [required] Request identifier. + // It should be unique to match with request result. + optional uint32 id = 1; + + // CMS API session limits request. + optional api_limit_1.ApiLimitRequest api_limit_request = 2; +} + +message SessionContextScopeResult +{ + // [required] ID of a corresponding request. + optional uint32 request_id = 1; + + // [required] Operation status. + // This field is associated with common_1.OperationStatus enum. + optional uint32 operation_status = 2; + + // Failure details. + optional shared_1.Text error_message = 3; + + // Request tracking number generated by CMS API + // Used by client to cancel deferred request + optional uint64 tracking_number = 4; + + // CMS API session limits result. + optional api_limit_1.ApiLimitResult api_limit_result = 5; +} diff --git a/cqg-cms-api-proto/proto/CMS/traderouting_1.proto b/cqg-cms-api-proto/proto/CMS/traderouting_1.proto new file mode 100644 index 0000000..538a67f --- /dev/null +++ b/cqg-cms-api-proto/proto/CMS/traderouting_1.proto @@ -0,0 +1,4713 @@ +// CQG Messages that are related to CQG trade routing system (CQG Gateway) +// +// Protocol time attributes are 64-bit signed integers (sint64) that contain offset in milliseconds from 01.01.1970 (i.e. unix timestamp). +// +// Last changes were made on 01 Feb 2024 +// Version 1.83 + +syntax = "proto2"; + +import "common/shared_1.proto"; +import "common/decimal.proto"; +import "CMS/common_1.proto"; +import "CMS/order_1.proto"; + +package traderouting_1; + +////------------------------------------------ +//// Client Messages + +// Request related to trade routing. +// Only one optional field is expected. +message TradeRoutingRequest +{ + // ID of a request. + required uint32 id = 1; + + // Request related to trade routing accounts. + optional AccountScopeRequest account_scope_request = 2; + + // Request related to trade routing orders. + optional OrderScopeRequest order_scope_request = 3; + + // Get a list of related to trade routing lookup properties. + // Lookup property types are defined in TradeRoutingLookupPropertyType enum. + optional common_1.LookupPropertyListRequest lookup_property_list_request = 4; +} + +// Request related to trade routing accounts. +// Only one optional field is expected. +message AccountScopeRequest +{ + // Get information about an account. + optional AccountInfoRequest account_info_request = 1; + + // Get balance records for an account. + optional BalanceRecordsRequest balance_records_request = 2; + + // Create new balance record. + optional CreateBalanceRecord create_balance_record = 3; + + // Update existing balance record. + optional UpdateBalanceRecord update_balance_record = 4; + + // Get account risk parameters. + optional AccountRiskParametersRequest account_risk_parameters_request = 5; + + // Update account's risk parameters. + // [obsolete] Use UpdateAccountRiskParameters instead. + optional UpdateRiskParameters obsolete_update_risk_parameters = 6 [deprecated = true]; + + // Search account information. + optional AccountSearchRequest account_search_request = 7; + + // Get enabled account's routes. + optional AccountRouteListRequest account_route_list_request = 8; + + // Get account to user authorization list. + optional AccountUserAuthorizationListRequest account_user_authorization_list_request = 9; + + // Get account settings. + optional AccountSettingsRequest account_settings_request = 10; + + // Get list of exchange groups and commodities that are potentially available for the account. + // List of enabled exchange groups and commodities along with other settings is requested by account_market_limits_request. + optional AccountAvailableExchangeGroupsRequest account_available_exchange_groups_request = 11; + + // Get account market limits. + // Account risk parameters with limits enforcement settings is requested by account_risk_parameters_request. + optional AccountMarketLimitsRequest account_market_limits_request = 12; + + // Gets account positions data without trades matching. + // It includes 'start of day' positions (statement already run). + // And current day fills (orders filled during current trading period and statement hasn't been run yet). + // Currency fills are included in current day fills. + optional AccountPositionsRequest account_positions_request = 13; + + // Get account equity based on most recent statement data. + optional AccountEquityRequest account_equity_request = 14; + + // Get current account collateral (margin details). + optional AccountCollateralRequest account_collateral_request = 15; + + // Create new account and clone configuration from the existing one. + optional CloneAccount clone_account = 16; + + // Update general information of account. + optional UpdateAccount update_account = 17; + + // Update specific account settings. + optional UpdateAccountSettings update_account_settings = 18; + + // Get account group information. + optional AccountGroupRequest account_group_request = 19; + + // Update account risk parameters. + optional UpdateAccountRiskParameters update_account_risk_parameters = 20; + + // Request of all routes available for the account. + optional AccountAvailableRouteListRequest account_available_route_list_request = 21; + + // Update account routes list. + optional UpdateAccountRouteList update_account_route_list = 22; + + // Update account market limits. + optional UpdateAccountMarketLimits update_account_market_limits = 23; + + // Create account. + optional CreateAccount create_account = 24; + + // [obsolete] This operation is no longer supported. + optional AccountClusterRequest obsolete_account_cluster_request = 25 [deprecated = true]; + + // [obsolete] This operation is no longer supported. + optional CreateAccountCluster obsolete_create_account_cluster = 26 [deprecated = true]; + + // [obsolete] This operation is no longer supported. + optional UpdateAccountCluster obsolete_update_account_cluster = 27 [deprecated = true]; + + // [obsolete] This operation is no longer supported. + optional UpdateAccountClusterPriceOffsets obsolete_update_account_cluster_price_offsets = 28 [deprecated = true]; + + // Restore account. + optional RestoreAccount restore_account = 29; + + // Account type overrides per exchange list. + optional AccountTypeOverrideListRequest account_type_override_list_request = 30; + + // Update account type overrides list. + optional UpdateAccountTypeOverrideList update_account_type_override_list = 31; + + // Update account to user authorization list. + optional UpdateAccountUserAuthorizationList update_account_user_authorization_list = 32; + + // Remove account. + optional RemoveAccount remove_account = 33; + + // Gets available to account list of Service Groups according to enabled routes. + optional AccountAvailableServiceGroupListRequest account_available_service_group_list_request = 34; + + // Gets account's enabled Service Groups. + optional AccountServiceGroupListRequest account_service_group_list_request = 35; + + // Updates list of account's enabled Service Groups. + optional UpdateAccountServiceGroupList update_account_service_group_list = 36; + + // Gets billable exchanges available to the current admin login. + optional BillableExchangeListRequest billable_exchange_list_request = 37; + + // Creates new account group with master and sub accounts. + optional CreateAccountGroup create_account_group = 38; + + // Updates existing account group. + optional UpdateAccountGroup update_account_group = 39; + + // Removes existing account group. + optional RemoveAccountGroup remove_account_group = 40; + + // Deletes specific positions data or all positions data on specific account. + // It only deletes data of statement positions, does not do real positions liquidation on exchange. + optional DeleteAccountPositions delete_account_positions = 41; + + // Requests trading features for the account. + optional AccountTradingFeaturesRequest account_trading_features_request = 42; + + // Updates account's trading features. + optional UpdateAccountTradingFeatures update_account_trading_features = 43; +} + +// Request related to trade routing orders. +// Only one optional field is expected. +message OrderScopeRequest +{ + // Get order details. + optional OrderDetailsRequest order_details_request = 1; + + // Add fill to the existing order. + optional AddFill add_fill = 2; + + // Create new external order. + optional CreateExternalOrder create_external_order = 3; + + // Search order requests information. + optional OrderSearchRequest order_search_request = 4; + + // Requests tree with related order chains for synthetic or synthetic strategy orders. + optional RelatedOrderTreeRequest related_order_tree_request = 5; + + // Compound orders tree. + optional CompoundOrderTreeRequest compound_order_tree_request = 6; + + // Order strategy tree, describing synthetic strategy. + optional SyntheticStrategyTreeRequest synthetic_strategy_tree_request = 7; + + // Cancel order operation. + optional CancelOrder cancel_order = 8; + + // Reflect order as canceled without sending real cancel request to exchange. + optional ReflectAsCanceledOrder reflect_as_canceled_order = 9; + + // Cancel whole tree of compound orders. + optional CancelCompoundOrderTree cancel_compound_order_tree = 10; + + optional ConfirmOrderSentToExchange confirm_order_sent_to_exchange = 11; + + optional ActivateOrder activate_order = 12; + + optional CorrectFill correct_fill = 13; + + optional CancelFill cancel_fill = 14; + + // Exclude order from (or include order to) risk calculation. + optional IgnoreOrder ignore_order = 15; + + // Cancels all orders satisfying the given criteria. + optional order_1.BatchOrdersOperation batch_orders_operation = 16; +} + +// Order details request message. +// Get information about an order chain. +// By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records. +// Set parameter order_requests_top to a larger number to receive more. +message OrderDetailsRequest +{ + // ID of the account that was used to place the order. + // Has priority over trade_location_id. + optional sint32 account_id = 1; + + // [required] Server order identifier (one of order ID within order chain). + optional string order_id = 2; + + // Trade location identifier. + optional string trade_location_id = 3; + + // Optionally restrict order requests in the chain by returning 'top' ones of the last submitted. + optional uint32 order_requests_top = 4; +} + +// Add fill message. +// Fills may only be added to single leg (outright) orders. +// Server automatically creates an order and matching leg fill. +// Either account_id or trade_location_id is required. +// Either price or display_price is required. +message AddFill +{ + // Identifier of a trade routing account that is used to add a fill. + // Has priority over trade_location_id. + optional sint32 account_id = 1; + + // [required] Order identifier assigned by server after last modification. + optional string order_id = 2; + + // [obsolete] Use quantity field instead. + optional uint32 obsolete_quantity = 3 [deprecated = true]; + + // Price at which the lots were bought or sold. + // Correct price format. + // Has priority over display_price. + optional double price = 4; + + // UTC time of the fill (offset in milliseconds from 01.01.1970). + optional sint64 fill_utc_time = 5; + + // Flag that trade was aggressive (Fixed Income specific order modifier; true by default). + optional bool is_aggressive = 6; + + // Price of the single fill to apply to the order. + // Display price format for the order's contract. + optional sint64 display_price = 7; + + // Order fill open/close type. + // This field is associated with OrderChain.OpenCloseType enum type. + optional uint32 open_close_type = 8; + + // Order fill speculation type. + // This field is associated with OrderChain.SpeculationType enum type. + optional uint32 speculation_type = 9; + + // Trade location. + optional string trade_location_id = 10; + + // [required] Quantity of bought or sold lots depending on order side. + optional cqg.Decimal quantity = 11; + + // Flag for wait replication from local to central. + optional bool sync = 12 [default = false]; +} + +// Create external order and fill message. +// Only single leg (outright) orders are supported. +// Server automatically creates an order and matching leg fill. +// Either fill_price or display_fill_price is required. +// Either limit_price or display_limit_price is required for limit and stop-limit orders. +// Either stop_price or display_stop_price is required for stop and stop-limit orders. +message CreateExternalOrder +{ + // [required] Account ID. + optional sint32 account_id = 1; + + // [required] User ID. + optional string user_id = 2; + + // [required] Full contract symbol. + optional string contract_symbol = 3; + + // Order side. + // [required] This field is associated with OrderChain.Side enum type. + optional uint32 side = 4; + + // Order type. + // [required] This field is associated with OrderChain.OrderType enum type. + optional uint32 order_type = 5; + + // Limit price of the order. + // Correct price format. + // Has priority over display_limit_price. + optional double limit_price = 6; + + // Stop price of the order. + // Correct price format. + // Has priority over display_stop_price. + optional double stop_price = 7; + + // [obsolete] Use fill_quantity field instead. + optional uint32 obsolete_fill_quantity = 8 [deprecated = true]; + + // Price of the single fill to apply to the order. + // CQG correct price format for the order's contract. + // Has priority over display_fill_price. + optional double fill_price = 9; + + // UTC time of the fill. + optional sint64 fill_utc_time = 10; + + // Limit price of the order (required for limit and stop-limit orders). + // Display price format. + optional sint64 display_limit_price = 11; + + // Stop price of the order (required for stop and stop-limit orders). + // Display price format. + optional sint64 display_stop_price = 12; + + // Price of the single fill to apply to the order. + // Display price format for the order's contract. + optional sint64 display_fill_price = 13; + + // Order open/close type. + // This field is associated with OrderChain.OpenCloseType enum type. + optional uint32 open_close_type = 14; + + // Order speculation type. + // This field is associated with OrderChain.SpeculationType enum type. + optional uint32 speculation_type = 15; + + // Flag that trade was aggressive (null by default). + optional bool fill_is_aggressive = 16; + + // [required] Quantity of the single fill to apply to the order. + optional cqg.Decimal fill_quantity = 17; + + // Flag for wait replication from local to central. + optional bool sync = 18 [default = false]; +} + +// Order search request message. +// Server returns a list of found order request records. +// By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records. +// Set parameter top to a larger number to receive more. +message OrderSearchRequest +{ + // [obsolete] Text to search. + optional string obsolete_text = 1 [deprecated = true]; + + // List of possible search refine criteria. + enum SearchCriteria + { + // Search by order request id. + ORDER_ID = 1; + + // Search by client order ID. + CLIENT_ORDER_ID = 2; + + // Search by order ticket number + // (order identifier assigned by execution system). + TICKET_NUMBER = 3; + + // Search by order contract. + CONTRACT = 4; + + // Search by account id. + ACCOUNT_ID = 5; + + // Search by account name. + ACCOUNT_NAME = 6; + + // Search by brokerage account number. + BROKERAGE_NUMBER = 7; + + // Search by user name. + USER_NAME = 8; + + // Search by customer last name. + CUSTOMER_LAST_NAME = 9; + + // Search by customer first name. + CUSTOMER_FIRST_NAME = 10; + + // Search by user id. + USER_ID = 11; + + // Search by route order id + // (numeric id assigned withing order route). + ROUTE_ORDER_ID = 12; + + // Search by route client order id + // (route order id transformed to meet execution system format rules). + ROUTE_CLIENT_ORDER_ID = 13; + + // Search by order GUID. + ORDER_GUID = 14; + + // Fill care order id. + FILL_CARE_ORDER_ID = 15; + + // Chain order id. + CHAIN_ORDER_ID = 16; + + // Search by sales series number. + SALES_SERIES_NUMBER = 17; + + // Search by sales series name. + SALES_SERIES_NAME = 18; + + // Search by sales series ID. + // Use PROFILE_SALES_SERIES_ID instead. + SALES_SERIES_ID = 19; + + // Search by exchange name. + EXCHANGE_NAME = 20; + + // Search by route code. + ROUTE_CODE = 21; + + // Search by route name. + ROUTE_NAME = 22; + + // Search by profile sales series ID. + PROFILE_SALES_SERIES_ID = 23; + + // Search by batch request GUID. + BATCH_REQUEST_GUID = 24; + + // Order Chain status. + // This criterion is associated with OrderChain.Status enum type. + CHAIN_ORDER_STATUS_ID = 25; + + // Order request state. + // This criterion is associated with OrderRequest.State enum type. + ORDER_STATE_ID = 26; + } + + // [obsolete] List of search options. + // This field is associated with SearchCriteria enum type. + // Empty list means search by any possible options. + repeated uint32 obsolete_search_criteria = 2 [deprecated = true]; + + // optionally restrict matched results by returning the first 'top' records. + optional uint32 top = 3; + + // Trade location. + optional string trade_location_id = 4; + + // Archived orders only. + optional bool archived = 5; + + // List of search options. Each option has its own search text, criteria and matching rule. + repeated common_1.SearchOption search_options = 6; + + // Indicates, whether all criteria must match at once. + // By default any criteria must match. + optional bool all_match_mode = 7 [default = false]; +} + +// Requests tree with related order chains for synthetic or synthetic strategy orders. +// By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records. +// Set parameter order_requests_top to a larger number to receive more. +message RelatedOrderTreeRequest +{ + // [required] Identifier of any order chain in a tree. + optional string chain_order_id = 1; + + // Trade location. + optional string trade_location_id = 2; + + // Optionally restrict order requests in the chains by returning 'top' ones of the last submitted. + optional uint32 order_requests_top = 3; + + // Optionally restrict matched results by returning the first 'top' records (sorted by leg path). + optional uint32 top = 4; +} + +// Compound orders tree. +// By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records. +// Set parameter order_requests_top/top to a larger number to receive more. +message CompoundOrderTreeRequest +{ + // [required] Identifier of compound tree. + optional string compound_tree_id = 1; + + // Trade location. + optional string trade_location_id = 2; + + // Optionally restrict order requests in the chains by returning 'top' ones of the last submitted. + optional uint32 order_requests_top = 3; + + // optionally restrict matched results by returning the first 'top' records. + optional uint32 top = 4; +} + +// Order strategy tree, describing synthetic strategy. +message SyntheticStrategyTreeRequest +{ + // [required] Identifier of root synthetic strategy order chain. + optional string root_chain_order_id = 1; + + // Trade location. + optional string trade_location_id = 2; +} + +// Cancel order operation. +// Either account_id or trade_location_id is required. +message CancelOrder +{ + // [required] Chain order identifier. + optional string chain_order_id = 1; + + // ID of the account that was used to place the order. + // Has priority over trade_location_id. + optional sint32 account_id = 2; + + // Trade location. + optional string trade_location_id = 3; + + // Flag for wait replication from local to central. + optional bool sync = 4 [default = false]; +} + +// Reflect order as canceled without sending real cancel request to exchange. +// Either account_id or trade_location_id is required. +message ReflectAsCanceledOrder +{ + // [required] Chain order identifier. + optional string chain_order_id = 1; + + // ID of the account that was used to place the order. + // Has priority over trade_location_id. + optional sint32 account_id = 2; + + // Trade location. + optional string trade_location_id = 3; + + // Flag for wait replication from local to central. + optional bool sync = 4 [default = false]; +} + +// Cancel whole tree of compound orders. +// Either account_id or trade_location_id is required. +message CancelCompoundOrderTree +{ + // [required] Compound tree identifier. + optional string compound_tree_id = 1; + + // ID of the account that was used to place the tree. + // Has priority over trade_location_id. + optional sint32 account_id = 2; + + // Trade location. + optional string trade_location_id = 3; + + // Flag for wait replication from local to central. + optional bool sync = 4 [default = false]; +} + +// Either account_id or trade_location_id is required. +message ConfirmOrderSentToExchange +{ + // [required] Chain order identifier. + optional string chain_order_id = 1; + + // ID of the account that was used to place the order. + // Has priority over trade_location_id. + optional string account_id = 2; + + // Trade location. + optional string trade_location_id = 3; + + // [required] New route order id. + optional string new_route_order_id = 4; + + // Flag for wait replication from local to central. + optional bool sync = 5 [default = false]; +} + +// Either account_id or trade_location_id is required. +message ActivateOrder +{ + // [required] Chain order identifier. + optional string chain_order_id = 1; + + // ID of the account that was used to place the order. + // Has priority over trade_location_id. + optional string account_id = 2; + + // Trade location. + optional string trade_location_id = 3; + + // Flag for wait replication from local to central. + optional bool sync = 4 [default = false]; +} + +// Either account_id or trade_location_id is required. +message CorrectFill +{ + enum FillType + { + FILL_TYPE_ORDER_FILL = 1; + FILL_TYPE_LEG_FILL = 2; + } + + // [required] Trade routing order fill/leg fill unique identifier. + optional string id = 1; + + // Associated with CorrectFill.FillType enum. + // If ommited, FILL_TYPE_ORDER_FILL type is used. + optional uint32 fill_type = 2; + + // ID of the account that was used to place the order. + // Has priority over trade_location_id. + optional string account_id = 3; + + // Trade location identifier. + optional string trade_location_id = 4; + + // [required] Quantity of bought or sold lots depending on order side. + optional cqg.Decimal quantity = 5; + + // [required] Price of the single fill to apply to the order. + // Display price format for the order's contract. + optional sint64 display_price = 6; + + // Flag for wait replication from local to central. + optional bool sync = 7 [default = false]; +} + +// Either account_id or trade_location_id is required. +message CancelFill +{ + // [required] Trade routing order fill/leg fill unique identifier. + optional string id = 1; + + // Associated with CorrectFill.FillType enum. + // If ommited, FILL_TYPE_ORDER_FILL type is used. + optional uint32 fill_type = 2; + + // ID of the account that was used to place the order. + // Has priority over trade_location_id. + optional string account_id = 3; + + // Trade location. + optional string trade_location_id = 4; + + // Busting a fill means that the quantity remaining on the order will not be adjusted. + // For example, on an order for 5 with 2 fills busting the fills keeps the quantity remaining at 3 instead of restoring it to 5. + // In case of fill_type = FILL_TYPE_FILL_LEG, bust mode is always used. + optional bool bust = 5; + + // Flag for wait replication from local to central. + optional bool sync = 6 [default = false]; +} + +// Exclude order from (or include order to) risk calculation. +message IgnoreOrder +{ + // [required] Chain order identifier. + optional string chain_order_id = 1; + + // ID of the account that was used to place the order. + // Has priority over trade_location_id. + optional string account_id = 2; + + // Trade location. + optional string trade_location_id = 3; + + // [required] true = ignore order, false = stop ignoring order. + optional bool action = 4; +} + +// Account information request message. +// Server returns matching account if exactly one account matches supplied criteria. +// Either account_id or brokerage_account_number is required. +message AccountInfoRequest +{ + // Trade routing account identifier. + // Has priority over brokerage_account_number. + optional sint32 account_id = 1; + + // Brokerage account number. + optional string brokerage_account_number = 2; +} + +// Balance records request message. +// Server returns balance records that matches supplied criteria. +message BalanceRecordsRequest +{ + // [required] Gateway account identifier. + // If supplied, balance_id should not be supplied. + optional sint32 account_id = 1; + + // Currency code (real currency code is ISO 4217 based. + // If supplied, only balance records of this currency are returned. + // Can be supplied only with account_id. + optional string currency = 2; + + // Trade routing balance identifier. + // If supplied, only the balance record with this ID is returned. + // If supplied, account_id and currency should not be supplied. + optional sint32 balance_id = 3; +} + +// Create balance record message. +// Add a new balance record for the specified account. +message CreateBalanceRecord +{ + // [required] Trade routing account identifier. + optional sint32 account_id = 1; + + // [required] Currency code (real currency code is ISO 4217 based. + optional string currency = 2; + + // [required] End cash balance. + optional double end_cash_balance = 3; + + // Cash value of collateral. + optional double collateral = 4; + + // Regulated. + optional bool regulated = 5 [default = true]; + + // Statement date, could be present or future (UTC). + // Datetime format is used but only date part is used, time part is ignored. + optional sint64 as_of_date = 6; +} + +// Update balance record message. +message UpdateBalanceRecord +{ + // [required] Trade routing balance record identifier. + required sint32 balance_id = 1; + + // End cash balance. + optional double end_cash_balance = 2; + + // Cash value of collateral. + // If not supplied, any existing collateral value is not changed. + optional double collateral = 3; +} + +// Account search request message. +// Server returns a list of found account records. +// By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records. +message AccountSearchRequest +{ + // [obsolete] Text to search. + optional string obsolete_text = 1 [deprecated = true]; + + enum AccountGroupRole + { + MASTER = 2; + SUB = 3; + } + + // List of possible search refine criteria. + enum SearchCriteria + { + // Search by account id. + ACCOUNT_ID = 1; + + // Search by account name. + ACCOUNT_NAME = 2; + + // Search by brokerage account number. + BROKERAGE_NUMBER = 3; + + // Search by profile sales series number. + PROFILE_SALES_SERIES_NUMBER = 4; + + // Search by profile sales series name. + PROFILE_SALES_SERIES_NAME = 5; + + // Search by sales series ID. + // Use PROFILE_SALES_SERIES_ID instead. + SALES_SERIES_ID = 6; + + // Search by customer ID. + // Use PROFILE_ID instead. + CUSTOMER_ID = 7; + + // Search by profile name. + PROFILE_NAME = 8; + + // [obsolete] Search by account cluster. + // This criteria is no longer supported. + OBSOLETE_ACCOUNT_CLUSTER_ID = 9; + + // LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode. + RISK_SERVER_INSTANCE_ID = 10; + + ACCOUNT_GROUP_ID = 11; + + // This field is associated with AccountSearchRequest.AccountGroupRole enum type. + // LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode. + ACCOUNT_GROUP_ROLE = 12; + + BROKERAGE_ID = 13; + + // This field is associated with Account.Class enum type. + // LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode. + ACCOUNT_CLASS = 14; + + // Can be 0 (false) or 1 (true). + // LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode. + IS_COLLECTION = 15; + + // Can be 0 (false) or 1 (true). + // LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode. + IS_IN_ACCOUNT_GROUP = 16; + + // Search by profile (customer/admin) ID. + PROFILE_ID = 17; + + // Search by profile sales series ID. + PROFILE_SALES_SERIES_ID = 18; + } + + // [obsolete] List of search options. + // This field is associated with SearchCriteria enum type. + // Empty list means search by any possible options. + repeated uint32 obsolete_search_criteria = 2 [deprecated = true]; + + // Optionally restrict matched results by returning the first 'top' records. + optional uint32 top = 3; + + // Determines whether removed entities are included in search result. + // For clients that use protocol version under 1.19 it is 'true' by default. + optional bool include_removed = 4 [default = false]; + + // List of search options. Each option has its own search text, criteria and matching rule. + repeated common_1.SearchOption search_options = 5; + + // Indicates, whether all criteria must match at once. + // By default any criteria must match. + optional bool all_match_mode = 6 [default = false]; + + // Determines whether accounts from mapped sales series profiles are included in search result. + // Available only for Brokerage scope admin logins with appropriate permissions. + optional bool include_accounts_from_mapped_sales_series = 7 [default = false]; +} + +// Get list of routes enabled for the account. +message AccountRouteListRequest +{ + // Account ID to get list of routes. + required sint32 account_id = 1; +} + +// Account to user authorization list request message. +// Either account_id (to request a list of users for an account) +// or user_id (to request a list or accounts for a user) or both is required. +message AccountUserAuthorizationListRequest +{ + // Account ID. + optional sint32 account_id = 1; + + // User ID. + optional string user_id = 2; + + // optionally restrict results by returning the first 'top' records. + optional uint32 top = 3; + + // Includes also implicit authorization (via brokerage or sales series direct authority). + optional bool include_implicit_authorization = 4; +} + +// Account settings request message. +message AccountSettingsRequest +{ + // Account ID to get account settings. + required sint32 account_id = 1; +} + +// Account risk parameters request message. +message AccountRiskParametersRequest +{ + // Account ID to get risk parameters. + required sint32 account_id = 1; +} + +// Update account risk parameters message. +// [obsolete] Use UpdateAccountRiskParameters instead. +message UpdateRiskParameters +{ + // Trade routing account identifier. + required sint32 account_id = 1; + + // Allow positions to be closed only. + optional bool liquidation_only = 2; + + // Allow futures trading. + optional bool allow_futures = 3; + + // Allow options trading. + // The value is associated with AccountRiskParameters.OptionsTrading enum. + optional uint32 allow_options = 4; + + // Additional credit available to satisfy margin requirements. + // Can be set only if Margin Subsystem is enabled for the account. + optional double allowable_margin_credit = 5; +} + +// Account potentially available exchange groups and commodities request message. +message AccountAvailableExchangeGroupsRequest +{ + // Account ID to get exchange groups. + required sint32 account_id = 1; +} + +// Account market limits request message. +message AccountMarketLimitsRequest +{ + // Account ID to get limits. + required sint32 account_id = 1; +} + +// Account positions request message. +message AccountPositionsRequest +{ + // [required] Account ID to get positions. + optional sint32 account_id = 1; + + // Group positions by contract or fungible contract. + // By default grouping is by fungible contract. + optional bool group_by_contract = 2; +} + +// Account equity request message. +message AccountEquityRequest +{ + // Account ID. + required sint32 account_id = 1; + + // Currency code of requested equity values (ISO 4217 based). + // Defaults to account’s currency if omitted. + optional string currency = 2; +} + +// Account collateral request message. +message AccountCollateralRequest +{ + // Account ID. + required sint32 account_id = 1; +} + +// Clone account message. +// Information that is cloned: +// - account customer (if new_account_user_id is not provided); +// - account settings; +// - account routing options; +// - account risk parameters; +// - account market limits and allowable markets; +// - list of authorized traders. +message CloneAccount +{ + // Account which configuration will be copied. + required sint32 source_account_id = 1; + + // Name of the new account (max length = 64). + required string new_account_name = 2; + + // Brokerage number of the new account (max length = 256). + required string new_account_brokerage_number = 3; + + // ID of a user (trader) which customer is used for the new account. + // This user will be authorized on the new account. + // If not specified then the source account customer will be used. + optional string new_account_user_id = 4; + + // This field is associated with Account.Class enum. + optional uint32 new_account_class = 5; +} + +// Updates general information of account. +message UpdateAccount +{ + // [required] Account information to update. + // Only fields for update must be provided. + // Fields that cannot be changed with this update message (see fields comments) are ignored. + optional Account account = 1; + + // [obsolete] Use only account field instead. + optional Account obsolete_original_account = 2 [deprecated = true]; +} + +// [obsolete] Requests account cluster by its identifier. +message AccountClusterRequest +{ + // [required] Account cluster id. + optional string account_cluster_id = 1; +} + +// [obsolete] Creates account cluster. +message CreateAccountCluster +{ + // [required] Account cluster to create. + optional AccountCluster obsolete_account_cluster = 1 [deprecated = true]; +} + +// [obsolete] Updates account cluster. +message UpdateAccountCluster +{ + // [required] Account cluster to update. + optional AccountCluster obsolete_account_cluster = 1 [deprecated = true]; + + // Original account cluster information. + // When provided, only fields that are different from the original account cluster are changed; + // otherwise account cluster is applied as provided in account cluster fields. + optional AccountCluster obsolete_original_account_cluster = 2 [deprecated = true]; +} + +// [obsolete] Updates account cluster price offsets. +message UpdateAccountClusterPriceOffsets +{ + // [required] Account cluster id. + optional string account_cluster_id = 1; + + // Price offsets to create or update. + // Price offsets will be created if they do not exist or updated otherwise. + repeated AccountClusterPriceOffset offsets_to_set = 2; + + // Price offsets to remove. + repeated AccountClusterPriceOffset offsets_to_remove = 3; +} + +message UpdateAccountSettings +{ + // Account settings to update. + // Only fields for update must be provided. + optional AccountSettings settings = 1; + + // [obsolete] Use only settings field instead. + optional AccountSettings obsolete_original_settings = 2 [deprecated = true]; +} + +// Either account_id or account_group_id is required (mutually exclusive). +message AccountGroupRequest +{ + // Account id to get group information for, if it is related to any. + optional string account_id = 1; + + // Account group id. + optional string account_group_id = 2; +} + +// Update risk parameters. +message UpdateAccountRiskParameters +{ + // [required] Account id. + // Must be provided instead of risk_parameters.obsolete_account_id. + optional string account_id = 3; + + // [required] Risk parameters to update. + // Only fields for update must be provided. + optional RiskParameters risk_parameters = 1; + + // [obsolete] Use only risk_parameters field instead. + optional RiskParameters obsolete_original_risk_parameters = 2 [deprecated = true]; +} + +// Update account route list. +message UpdateAccountRouteList +{ + // [required] Account id to update routes. + optional string account_id = 1; + + // Routes to add or change. + repeated AccountRouteRecord routes_to_set = 2; + + // Route codes to remove from account. + repeated string route_codes_to_remove = 3; +} + +// Update account market limits. +// How to use this message: +// - only provided data is updated - records/levels (like exchange, commodity..) +// and limits inside of them are not changed if not provided explicitly; +// - if you want to clear (set to default) group of limits (entire level, exchange, commodity..), +// including trading authority (allowed_trade) you can use cleared_fields of corresponding message. +message UpdateAccountMarketLimits +{ + // [required] account id to update market limits. + optional string account_id = 1; + + // [required] market limits to update. + // Only fields for update must be provided. + optional MarketLimits market_limits = 2; + + // [obsolete] Use only market_limits field instead. + optional MarketLimits obsolete_original_market_limits = 3 [deprecated = true]; +} + +// Request of all routes available for the account. +message AccountAvailableRouteListRequest +{ + // [required] Account identifier. + optional string account_id = 1; +} + +// Creates a new GW Account. +message CreateAccount +{ + // [required] Account to create. + optional Account account = 1; +} + +////------------------------------------------ +//// Server Messages + +// Result of TradeRoutingRequest. +message TradeRoutingResult +{ + // ID of a corresponding request. + required uint32 request_id = 1; + + // Operation status. + // This field is associated with OperationStatus enum. + required uint32 operation_status = 2; + + // Error details if operation failed. + optional shared_1.Text error_message = 3; + + // Result of accounts related request. + optional AccountScopeResult account_scope_result = 4; + + // Result of orders related request. + optional OrderScopeResult order_scope_result = 5; + + // Result of lookup_property_list_request. + optional common_1.LookupPropertyListResult lookup_property_list_result = 6; + + // Request tracking number generated by CMS API + // Used by client to cancel deferred request + optional uint64 tracking_number = 7; +} + +// Result of accounts related request. +message AccountScopeResult +{ + // Result of account information request. + optional AccountInfoResult account_info_result = 1; + + // Result of balance records request. + optional BalanceRecordsResult balance_records_result = 2; + + // Result of balance record creation. + optional CreateBalanceRecordResult create_balance_record_result = 3; + + // Result of balance record update. + optional UpdateBalanceRecordResult update_balance_record_result = 4; + + // Result of account risk parameters request. + optional AccountRiskParametersResult account_risk_parameters_result = 5; + + // Result of account's risk parameters update. + optional UpdateRiskParametersResult update_risk_parameters_result = 6; + + // Result of account search request. + optional AccountSearchResult account_search_result = 7; + + // Result of account routes list request. + optional AccountRouteListResult account_route_list_result = 8; + + // Result of account to user authorization list request. + optional AccountUserAuthorizationListResult account_user_authorization_list_result = 9; + + // Result of account settings request. + optional AccountSettingsResult account_settings_result = 10; + + // Result of AccountAvailableExchangeGroupsRequest. + optional AccountExchangeGroupsResult account_exchange_groups_result = 11; + + // Result of account market limits request. + optional AccountMarketLimitsResult account_market_limits_result = 12; + + // Result of positions request. + optional AccountPositionsResult account_positions_result = 13; + + // Result of equity request. + optional AccountEquityResult account_equity_result = 14; + + // Result of collateral request. + optional AccountCollateralResult account_collateral_result = 15; + + // Result of clone account request. + optional CloneAccountResult clone_account_result = 16; + + // Result of UpdateAccount. + optional UpdateAccountResult update_account_result = 17; + + // Result of UpdateAccountSettings. + optional UpdateAccountSettingsResult update_account_settings_result = 18; + + // Result of AccountGroupRequest. + optional AccountGroupResult account_group_result = 19; + + // Result of UpdateAccountRiskParameters. + optional UpdateAccountRiskParametersResult update_account_risk_parameters_result = 20; + + // Result of AccountAvailableRouteListRequest. + optional AccountAvailableRouteListResult account_available_route_list_result = 21; + + // Result of UpdateAccountRouteList. + optional UpdateAccountRouteListResult update_account_route_list_result = 22; + + // Result of UpdateAccountMarketLimits. + optional UpdateAccountMarketLimitsResult update_account_market_limits_result = 23; + + // Result of CreateAccount. + optional CreateAccountResult create_account_result = 24; + + // [obsolete] This operation is no longer supported. + optional AccountClusterResult obsolete_account_cluster_result = 25 [deprecated = true]; + + // [obsolete] This operation is no longer supported. + optional CreateAccountClusterResult obsolete_create_account_cluster_result = 26 [deprecated = true]; + + // [obsolete] This operation is no longer supported. + optional UpdateAccountClusterResult obsolete_update_account_cluster_result = 27 [deprecated = true]; + + // [obsolete] This operation is no longer supported. + optional UpdateAccountClusterPriceOffsetsResult obsolete_update_account_cluster_price_offsets_result = 28 [deprecated = true]; + + // Result of RestoreAccount. + optional RestoreAccountResult restore_account_result = 29; + + // Result of AccountTypeOverrideListRequest. + optional AccountTypeOverrideListResult account_type_override_list_result = 30; + + // Result of UpdateAccountTypeOverrideList. + optional UpdateAccountTypeOverrideListResult update_account_type_override_list_result = 31; + + // Result of UpdateAccountUserAuthorizationList. + optional UpdateAccountUserAuthorizationListResult update_account_user_authorization_list_result = 32; + + // Result of RemoveAccount. + optional RemoveAccountResult remove_account_result = 33; + + // Result of AccountAvailableServiceGroupListRequest. + optional AccountAvailableServiceGroupListResult account_available_service_group_list_result = 34; + + // Result of AccountServiceGroupListRequest. + optional AccountServiceGroupListResult account_service_group_list_result = 35; + + // Result of UpdateAccountServiceGroupList. + optional UpdateAccountServiceGroupListResult update_account_service_group_list_result = 36; + + // Result of BillableExchangeListRequest. + optional BillableExchangeListResult billable_exchange_list_result = 37; + + // Result of CreateAccountGroup. + optional CreateAccountGroupResult create_account_group_result = 38; + + // Result of AccountTradingFeaturesRequest. + optional AccountTradingFeaturesResult account_trading_features_result = 39; +} + +// Result of orders related request. +message OrderScopeResult +{ + // Result of order details request. + optional OrderDetailsResult order_details_result = 1; + + // Result of fill adding. + optional AddFillResult add_fill_result = 2; + + // Result of external order creation. + optional CreateExternalOrderResult create_external_order_result = 3; + + // Result of order search request. + optional OrderSearchResult order_search_result = 4; + + // Result of RelatedOrderTreeRequest. + optional RelatedOrderTreeResult related_order_tree_result = 5; + + // Result of CompoundOrderTreeRequest. + optional CompoundOrderTreeResult compound_order_tree_result = 6; + + // Result of SyntheticStrategyTreeRequest. + optional SyntheticStrategyTreeResult synthetic_strategy_tree_result = 7; + + // Result of CancelOrder. + optional CancelOrderResult cancel_order_result = 8; + + // Result of ReflectAsCanceledOrder. + optional ReflectAsCanceledOrderResult reflect_as_canceled_order_result = 9; + + // Result of CancelCompoundOrderTreeRequest. + optional CancelCompoundOrderTreeResult cancel_compound_order_tree_result = 10; + + // Result of a BatchOrdersOperation operation. + optional order_1.BatchOrdersOperationResult batch_orders_operation_result = 11; +} + +// Order details request result message. +message OrderDetailsResult +{ + // Trade routing order chain. + required OrderChain order_chain = 1; + + // This flag is set to true if all order requests in the chain are sent. + optional bool is_complete = 2 [default = true]; +} + +// Add fill result message. +message AddFillResult +{ +} + +// Create order result message. +message CreateExternalOrderResult +{ + // Chain order ID of created order. + optional string order_id = 3; + + // Trade location of newly created order. + optional string trade_location_id = 4; +} + +// Order search request message. +message OrderSearchResult +{ + // List of found orders. + repeated OrderSearchResultRecord order_record = 1; + + // This flag is set to true if all search results are sent + // and nothing was filtered out by 'top' parameter. + optional bool is_complete = 2 [default = true]; +} + +// Result of RelatedOrderTreeRequest. +message RelatedOrderTreeResult +{ + // Root order with children. + optional RelatedOrder related_order = 1; + + // This flag is set to true if all orders in the tree are sent. + optional bool is_complete = 2 [default = true]; +} + +// Result of CompoundOrderTreeRequest. +message CompoundOrderTreeResult +{ + // Root compound order with children. + optional CompoundOrder compound_order = 1; + + // This flag is set to true if all orders in the tree are sent. + optional bool is_complete = 2 [default = true]; +} + +// Result of SyntheticStrategyTreeRequest. +message SyntheticStrategyTreeResult +{ + // First level strategy order legs. + repeated StrategyLeg legs = 1; + + // Strategy contract name. + optional string strategy_name = 2; +} + +// Result of CancelOrder. +message CancelOrderResult +{ +} + +// Result of ReflectAsCanceledOrder +message ReflectAsCanceledOrderResult +{ +} + +// Result of CancelCompoundOrderTreeRequest. +message CancelCompoundOrderTreeResult +{ +} + +// Account information request result message. +message AccountInfoResult +{ + // Trade routing account. + required Account account = 1; +} + +// Balance records request result message. +message BalanceRecordsResult +{ + // Balance records. + repeated BalanceRecord balance_record = 1; +} + +// Create balance record result message. +message CreateBalanceRecordResult +{ + // Created account balance record id. + required sint32 balance_record_id = 3; +} + +// Update balance record result message. +message UpdateBalanceRecordResult +{ +} + +// Account search result message. +message AccountSearchResult +{ + // List of found accounts. + repeated AccountSearchResultRecord account_record = 1; + + // This flag is set to true if all results are sent + // and nothing was filtered out by 'top' parameter. + optional bool is_complete = 2 [default = true]; +} + +// Account routes result message. +message AccountRouteListResult +{ + // List of enabled account routes. + repeated AccountRouteRecord account_route_record = 1; +} + +// Account to user authorization list result message. +message AccountUserAuthorizationListResult +{ + // list of account to user authorization links. + repeated AccountUserLink account_user_link = 1; + + // This flag is set to true if all results are sent + // and nothing was filtered out by 'top' parameter. + optional bool is_complete = 2 [default = true]; +} + +// Account settings result message. +message AccountSettingsResult +{ + // Account settings. + required AccountSettings account_settings = 1; +} + +// Account risk parameters result message. +message AccountRiskParametersResult +{ + // Account risk parameters. + optional RiskParameters account_risk_parameters = 1; +} + +// Update account's risk parameters result message. +message UpdateRiskParametersResult +{ +} + +// Account exchange groups result message. +message AccountExchangeGroupsResult +{ + // List of exchange groups available for the account. + repeated ExchangeGroup exchange_group = 1; + + // Dictionary of instrument types that are used in the exchange group's commodities above. + repeated InstrumentType instrument_type = 2; +} + +// Account market limits result message. +message AccountMarketLimitsResult +{ + // Account market limits. + // Should be used together with the account_exchange_groups_result: + // - send account_available_exchange_groups_request to retrieve currently available markets. + // - ignore all the fields in account_market_limits_result which do not belong to available markets in account_exchange_groups_result. + + required MarketLimits account_market_limits = 1; +} + +// Account positions result message. +message AccountPositionsResult +{ + // Account per contract positions. + // If some contract has both long and short positions then there are two separate records for + // this contract. + repeated ContractPosition contract_position = 1; +} + +// Account equity result message. +message AccountEquityResult +{ + // Account equity. + required Equity equity = 1; +} + +// Account collateral result message. +message AccountCollateralResult +{ + // Account collateral. + required Collateral collateral = 1; +} + +// Clone account result message. +message CloneAccountResult +{ + // ID of the newly created account. + required sint32 new_account_id = 1; +} + +// Result of account general information update. +message UpdateAccountResult +{ + // If message is received then account was updated successfully. +} + +// Result of account settings update. +message UpdateAccountSettingsResult +{ + // If message is received then settings were updated successfully. +} + +// Result of AccountGroupRequest. +message AccountGroupResult +{ + // If provided account is not related to any group then empty. + optional AccountGroup acount_group = 1; +} + +// Result of UpdateAccountRiskParameters. +message UpdateAccountRiskParametersResult +{ + // If message is received then parameters were updated successfully. +} + +// Result of AccountAvailableRouteListRequest. +message AccountAvailableRouteListResult +{ + // List of available routes. + repeated AvailableRoute routes = 1; +} + +// Result of UpdateAccountRouteList. +message UpdateAccountRouteListResult +{ + // If message is received then routes were updated successfully. +} + +// Result of UpdateAccountMarketLimits. +message UpdateAccountMarketLimitsResult +{ + // If message is received then limits were updated successfully. +} + +// Result of CreateAccount. +message CreateAccountResult +{ + // Id of newly created account, if succeeded. + optional string id = 1; +} + +// [obsolete] Result of account cluster request. +message AccountClusterResult +{ + // Account cluster. + optional AccountCluster obsolete_account_cluster = 1 [deprecated = true]; + + // Account cluster price offsets. + repeated AccountClusterPriceOffset obsolete_account_cluster_price_offsets = 2 [deprecated = true]; +} + +// [obsolete] Result of account cluster creation. +message CreateAccountClusterResult +{ + // Id of newly created account cluster if succeeded. + optional string id = 1; +} + +// [obsolete] Result of account cluster update. +message UpdateAccountClusterResult +{ + // If message is received then update is successful. +} + +// [obsolete] Result of account cluster price offsets update. +message UpdateAccountClusterPriceOffsetsResult +{ + // If message is received then update is successful. +} + +////------------------------------------------ +//// Common Messages + +// Trade routing order chain. +// Order chain attributes reflect current order chain status. +message OrderChain +{ + // Order side enum. + enum Side + { + // Describes purchasing side of a trade. + BUY = 1; + + // Describes selling side of a trade. + SELL = 2; + } + + // Order type enum. + enum OrderType + { + // Market order, buy or sell at the best available opposite price. + MKT = 1; + + // Limit order, buy or sell at price that is the same or better than specified limit price. + LMT = 2; + + // Stop order, order becomes a market order when market reaches order's stop price. + // (which is on opposite side of market). + STP = 3; + + // Stop-limit order, order becomes a limit order when market reaches order's stop price. + STL = 4; + + // Cross order, prearranged trades with either a counterparty within the trading firm itself + // or with a specified counterparty outside the firm. These orders are executed on exchange. + CROSS = 5; + } + + // Order execution instruction. + enum ExecInstruction + { + // All or None (fill order only completely). + AON = 1; + + // Iceberg (show only part of order size). + ICEBERG = 2; + + // Quantity triggered (aka DOM Triggered, honor additional quantity threshold for triggering). + QT = 3; + + // Trailing order (price of the order is following market one direction by specific offset). + TRAIL = 4; + + // Funari (Limit order becomes a Market on Close). + FUNARI = 5; + + // Market if Touched (Limit order becomes a Market when market reaches order's limit price). + MIT = 6; + + // Market Limit Market is a limit order that is used to place a buy order above the best offer + // to fill by the best offer or a sell order below the best bid to fill by the best bid. + MLM = 7; + + // Market with Leftover as Limit + // (market order then unexecuted quantity becomes limit order at last price). + MTL = 8; + + // An auction order is an order to buy or sell in the market at the Calculated Opening Price (COP) + // (Unmatched auction orders are converted to limit orders on the market open). + AUCTION = 9; + + // Post Only Orders are only accepted as passive limit orders. + POSTONLY = 10; + + //[obsolete] This execution instruction is no longer supported. + OBSOLETE_DISCRETION = 11; + + // At Any Price Orders are US-Style Market Orders. + AT_ANY_PRICE = 12; + + // Prearranged Limit Order. + LIMIT_PREARRANGED_TRANSACTION = 13; + + // Nasdaq Nordic Equities On-Exchange Trade Reporting. + NNE_CROSS = 14; + + // Nasdaq Nordic Equities Off-Exchange (APA) Trade Reporting. + NNE_APA = 15; + + // Nasdaq Nordic Derivatives On-Exchange Outright Trade Reporting. + NND_CROSSO = 16; + + // Nasdaq Nordic Derivatives On-Exchange Combination Trade Reporting. + NND_CROSSC = 17; + + // Internal Cross Only (This order type is used by OTC to pull up to order size quantity from the exchange on the opposite side). + ICO = 18; + } + + // Order duration. + enum Duration + { + // Day order. Order is working through the current trading day only. + DAY = 1; + + // Good Til Canceled. Order is working until canceled or until the contract is no longer available for trading. + GTC = 2; + + // Good Til Date. Order is working until the end of the nearest trading day for the contract on + // or before the date specified in the order. + GTD = 3; + + // Good Til Time. Order is working until the specified time. + GTT = 4; + + // Fill and Kill. Immediately fill as many as possible and cancel the rest. + FAK = 5; + + // Fill Or Kill. Immediately fill this order completely or cancel. + FOK = 6; + + // At The Open. Buy or sell at the very beginning of the trading day. + ATO = 7; + + // At The Close. Buy or sell at the close of the market, or as near to the closing price as possible. + ATC = 8; + } + + // Current order chain status. + enum Status + { + // This status is used for internal Gateway transactions. + UNDEFINED = 0; + + // Original order is sent to execution system. + IN_TRANSIT = 1; + + // Order is rejected. + REJECTED = 2; + + // Order is acknowledged by execution and perhaps partially filled. + WORKING = 3; + + // Order is expired. + EXPIRED = 4; + + // Cancel request is sent to execution system. + IN_CANCEL = 5; + + // Modify request is sent to execution system. + IN_MODIFY = 6; + + // Order is canceled. + CANCELLED = 7; + + // Order is completely filled by execution system. + FILLED = 8; + + // Order is waiting submission to execution system. + SUSPENDED = 9; + + // Order may be canceled because a disconnection occurred. + DISCONNECTED = 10; + + // Order will be placed at a specified time (waiting for execution system to start accepting orders). + ACTIVE_AT = 11; + + // Cross order sent to exchange and waiting approval from exchange and/or counterparties. + APPROVE_REQUIRED = 12; + + // Cross order is approved by exchange and counterparties. + APPROVED = 13; + + //Cross order is rejected by one of counterparties. + APPROVE_REJECTED = 14; + + //Cross order is completely executed on exchange. It is the final state of cross order. + MATCHED = 15; + + //Cross order/leg is executed on exchange, + //this is transit state until all transactions for trades/breaks are received. + PART_MATCHED = 16; + + //Cross order was executed on exchange, but now + //all its trades/legs have been broken by the exchange. + TRADE_BROKEN = 17; + } + + // Order or fill open/close type enum. + enum OpenCloseType + { + // Opening new current day position. + OPEN = 1; + + // Closing (current day only if instrument uses explicit close). + CLOSE = 2; + + // Closing previous day (if instrument uses explicit close). + CLOSE_PREVIOUS = 3; + } + + // Order or fill speculation type enum. + enum SpeculationType + { + // Speculation. + SPECULATION = 1; + + // Hedge. + HEDGE = 2; + + // Arbitrage. + ARBITRAGE = 3; + } + + // Identifier of an order chain (it is equal to the order_id of the first request in the chain). + required string chain_order_id = 1; + + // Order identifier of the last not rejected order request (except rejected initial place request) + // which defines the current status of the chain. + required string order_id = 2; + + // Account ID that was used to create the chain. + required sint32 chain_orig_account_id = 4; + + // Time when order was submitted to execution system (UTC). + required sint64 submitted_utc_time = 5; + + // Full contract symbol. + required string contract_symbol = 6; + + // Order side. + // This field is associated with OrderChain.Side enum type. + required uint32 side = 7; + + // [obsolete] Use size field instead. + optional uint32 obsolete_size = 8 [deprecated = true]; + + // Order limit price. + // Correct price format. + optional double limit_price = 9; + + // Order stop price. + // Correct price format. + optional double stop_price = 10; + + // List of execution instructions. + // This field is associated with OrderChain.ExecInstruction enum type. + repeated uint32 exec_instruction = 11; + + // Order duration. + // This field is associated with OrderChain.Duration enum type. + required uint32 duration = 12; + + // Date for GTD (local to exchange, date only value in time format) when the order should expire. + optional sint64 good_thru_date = 13; + + // Date and time for GTT order (UTC) when the order should expire. + optional sint64 good_thru_utc_time = 14; + + // Order status. + // This field is associated with OrderChain.Status enum type. + required uint32 status = 15; + + // Order type. + // This field is associated with OrderChain.OrderType enum type. + required uint32 order_type = 16; + + // List of order requests in the chain. + repeated OrderRequest order_request = 17; + + // Order fills. + repeated OrderFill order_fill = 18; + + // The values are associated with a lookup property with ORDER_CLASS type. + repeated string order_classes = 19; + + // Order limit price. + // Display price format. + optional sint64 display_limit_price = 20; + + // Order stop price. + // Display price format. + optional sint64 display_stop_price = 21; + + // Account name provided to exchange. + optional string execution_account_name = 22; + + // Trailing specific information. + optional OrderTrailing trailing = 23; + + // Specific order sizes. + optional OrderSizes sizes = 24; + + // Full list of accounts towards exchange. + repeated ChainAccount accounts = 25; + + // Associated compound orders tree identifier. + optional string compound_tree_id = 26; + + // In case of some synthetics. + optional string root_chain_order_id = 27; + + // Order can be checked for any reason. + optional bool checked = 28; + + // Strategy trading expression. + optional string trading_expression = 29; + + // Order's contract legs + repeated OrderContractLeg legs = 30; + + // Full contract description. + // Formula in case of strategy. + optional string contract_description = 31; + + // Additional user defined attributes. + // First - name, second - value. + repeated common_1.Tuple user_attributes = 32; + + // Client-side determined algo strategy. + optional string client_algo_strategy = 33; + + // Gateway-side algo strategy. + optional string algo_strategy = 34; + + // Actual order route. + optional OrderRoute route = 35; + + // Order chain expiration time. + optional sint64 expiration_time = 36; + + // Order open/close type. + // This field is associated with OrderChain.OpenCloseType enum type. + optional uint32 open_close_type = 37; + + // Order speculation type. + // This field is associated with OrderChain.SpeculationType enum type. + optional uint32 speculation_type = 38; + + // Archived order. + optional bool archived = 39; + + // Current order request at exchange. + optional string order_id_at_exchange = 40; + + // [obsolete] This operation is no longer supported + optional uint32 obsolete_discretionary_offset = 41 [deprecated = true]; + + // Total positive size of the order. + optional cqg.Decimal size = 42; + + // Order extended side. + // This field is associated with ExtendedSide enum type. + optional uint32 extended_side = 43; + + // Identifies a brokerage that lended an equity being sold short. + // (max length = 64). + optional string locate_id = 44; + + // Exchange extra values. + // First - name, second - value. + repeated common_1.Tuple exchange_extra_values = 45; + + // Flag for ignore order chain risk calculation + optional bool is_excluded_from_risk_calculation = 46; +} + +// Represents account in the chain of accounts. +message ChainAccount +{ + // Account identifier. + optional string account_id = 1; + + // Account name. + optional string account_name = 2; + + // Brokerage account number. + optional string brokerage_account_number = 3; +} + +// Represents route through which order is executed. +message OrderRoute +{ + // Route unique code. + optional string code = 1; + + // Route name. + optional string name = 2; + + // Route order id. + optional string order_id = 3; +} + +// Represents order's contract leg. +message OrderContractLeg +{ + // Leg number. + optional uint32 number = 1; + + // [obsolete] Use size field instead. + optional uint32 obsolete_size = 2 [deprecated = true]; + + // Order side. + // This field is associated with OrderChain.Side enum type. + optional uint32 side = 3; + + // Full contract symbol. + optional string contract_symbol = 4; + + // Total positive size of the leg. + optional cqg.Decimal size = 5; + + // Order extended side. + // This field is associated with ExtendedSide enum type. + optional uint32 extended_side = 6; + + // Identifies a brokerage that lended an equity being sold short. + // (max length = 64) + optional string locate_id = 7; +} + +// Account and user information associated with an order request. +message AccountAndUserInfo +{ + // Trade routing account identifier. + required sint32 account_id = 1; + + // Associated user information. Contains either user_name that initiated the order request on + // this account or Brokerage name of the next omnibus account in the chain. + required string user_info = 2; + + // Reject details for rejected order request. + optional string reject_details = 3; + + // Additional internal reject details for rejected order request. + optional string reject_details_internal = 4; + + // ID of a user who placed the order. + optional string user_id = 5; + + // User name. + optional string user_name = 6; + + // Account name. + optional string account_name = 7; + + // Brokerage account number. + optional string brokerage_account_number = 8; +} + +// Trade routing order request. +// Attributes of the order request (place, replace or cancel) allow to track order changes during the its lifetime. +message OrderRequest +{ + // Type of order request in order chain. + enum RequestType + { + // New order place request. + PLACE = 1; + + // Replace order request. + REPLACE = 2; + + // Cancel order request. + CANCEL = 3; + } + + // State of order request. + enum State + { + // Order is waiting for trading session start time for activation. + ACTIVE_AT = 1; + + // Order request is suspended. + SUSPENDED = 2; + + // Order request is sent to an execution system and is waiting for acknowledgment. + PENDING = 3; + + // Order request is working at an execution system. + WORKING = 4; + + // Order request is replaced with a new one. + REPLACED = 5; + + // Order request is cancelled. + CANCELLED = 6; + + // Order request is rejected. + REJECTED = 7; + + // Order request is filled. + FILLED = 8; + + // Order request is expired. + EXPIRED = 9; + + // Order request is matched. + MATCHED = 10; + } + + // Order request identifier assigned by server. + required string order_id = 1; + + // Time when order request was submitted to execution system (UTC). + required sint64 submitted_utc_time = 2; + + // Type of the request. + // This field is associated with OrderRequest.RequestType enum type. + required uint32 request_type = 3; + + // Order type. + // This field is associated with OrderChain.OrderType enum type. + optional uint32 order_type = 4; + + // [obsolete] Use size field instead. + optional uint32 obsolete_size = 6 [deprecated = true]; + + // Order limit price. + // Correct price format. + optional double limit_price = 7; + + // Order stop price. + // Correct price format. + optional double stop_price = 8; + + // Order duration. + // This field is associated with OrderChain.Duration enum type. + optional uint32 duration = 9; + + // Date for GTD (local to exchange, date only value in time format) when the order should expire. + optional sint64 good_thru_date = 10; + + // Date and time for GTT order (UTC) when the order should expire. + optional sint64 good_thru_utc_time = 11; + + // Current order request state. + // This field is associated with OrderRequest.State enum type. + required uint32 state = 12; + + // ID of order request that this request was applied to (for cancel and replace requests only). + optional string link_order_id = 13; + + // List of [last] transactions. + // All available transactions are sent. + repeated OrderTransactionStatus transaction_status = 14; + + // List of accounts associated with an order request with user information. + repeated AccountAndUserInfo account_and_user_info = 15; + + // Order limit price. + // Display price format. + optional sint64 display_limit_price = 16; + + // Order stop price. + // Display price format. + optional sint64 display_stop_price = 17; + + // Trailing specific information. + optional OrderTrailing trailing = 19; + + // Specific order sizes. + optional OrderSizes sizes = 20; + + // Ticket number. + optional string ticket_number = 21; + + // Request comments. + optional string comments = 22; + + // The values are associated with a lookup property with ORDER_CLASS type. + repeated string order_classes = 23; + + // Native order type. + optional uint32 native_order_type = 24; + + // Activation time. + optional sint64 activation_time = 25; + + // Park time. + optional sint64 suspension_time = 26; + + // Expiration time. + optional sint64 expiration_time = 27; + + // Routes. + repeated OrderRoute routes = 28; + + // Client regulation algorithm. + optional string client_regulatory_algorithm_id = 29; + + // Effective regulation algorithm. + optional string effective_regulatory_algorithm_id = 30; + + // Operational details. + optional OperationalDetails operational_details = 34; + + // Specific instructions. + optional string instructions = 35; + + // Client extra values. + // First - name, second - value. + repeated common_1.Tuple client_extra_values = 36; + + // Route client order ID. + optional string route_client_order_id = 37; + + // [obsolete] This operation is no longer supported. + optional uint32 obsolete_discretionary_offset = 38 [deprecated = true]; + + // List of execution instructions. + // This field is associated with OrderChain.ExecInstruction enum type. + repeated uint32 exec_instruction = 39; + + // Positive size of the order request. + optional cqg.Decimal size = 40; + + // Actual execution source code that is sent to an exchange. + optional string execution_source_code = 41; + + // Order extended side. + // This field is associated with ExtendedSide enum type. + optional uint32 extended_side = 42; + + // Identifies a brokerage that lended an equity being sold short. + // (max length = 64) + optional string locate_id = 43; +} + +// Represents order sizes. +message OrderSizes +{ + // [obsolete] Use trigger_size field instead. + optional uint32 obsolete_trigger_size = 1 [deprecated = true]; + + // [obsolete] Use visible_size field instead. + optional uint32 obsolete_visible_size = 2 [deprecated = true]; + + // [obsolete] Use min_visible_size field instead. + optional uint32 obsolete_min_visible_size = 3 [deprecated = true]; + + // [obsolete] Use remaining_size field instead. + optional uint32 obsolete_remaining_size = 4 [deprecated = true]; + + // Trigger size. (DOM Threshold). + optional cqg.Decimal trigger_size = 5; + + // Visible size. Iceberg. + optional cqg.Decimal visible_size = 6; + + // Minimum visible size. Iceberg. + optional cqg.Decimal min_visible_size = 7; + + // Remaining size of chain (set only for chain). + optional cqg.Decimal remaining_size = 8; +} + +// Represents order trailing information. +message OrderTrailing +{ + // Trailing type. + enum TrailType + { + BEST_BID = 1; + BEST_ASK = 2; + LAST_TRADE = 3; + } + + // This field is associated with TrailType enum type. + optional uint32 trail_type = 1; + + // Trail offset. + // Correct format. + optional double offset = 2; + + // Trail stop price. + // Correct format. + optional double stop_price = 3; + + // Trail limit price. + // Correct format. + optional double limit_price = 4; + + // Trail offset. + // Display format. + optional sint64 display_offset = 5; + + // Trail stop price. + // Display format. + optional sint64 display_stop_price = 6; + + // Trail limit price. + // Display format. + optional sint64 display_limit_price = 7; + + // Prices update time. + optional sint64 update_time = 8; +} + +// Operational details. +message OperationalDetails +{ + // Client-side order id. + optional string client_order_id = 1; + + // Unique client guid. + optional string client_guid = 2; + + // Client unique system id. + // Hidden for Sale Series scope. + optional string client_system_id = 3; + + // Client ip address. + optional string client_ip = 4; + + // Client application version. + optional string client_version = 5; + + // Trade location. + optional string trade_location_id = 6; + + // Product to which client application belongs. + // Can be used to obtain IDs of CAT, PL and Platform. + optional string product_id = 7; + + // Client application name. + optional string client_app_type_name = 8; + + // Name of the platform to which client application belongs. + optional string platform_name = 9; + + // Client application private label name. + optional string private_label_name = 10; + + // Identifies effective operator, used to identify specific message originator (desk, trader, etc.). + // (max length = 64) + optional string operator_id = 11; + + // Identifies client-supplied operator, used to identify specific message originator (desk, trader, etc.). + // (max length = 64) + optional string sender_operator_id = 12; + + // Identifies client-supplied location, used to identify specific message originator's location (i.e. geographic location and/or desk, trader). + // (max length = 12) + optional string sender_location_id = 13; + + // [required] Identifies effective originator location. + // (max length = 12) + optional string originator_location_id = 14; +} + +// Status of a specific transaction. +// All attributes are at the transaction moment. +message OrderTransactionStatus +{ + // Status of the transaction. + enum Status + { + // This status is used for internal Gateway transactions. + UNDEFINED = 0; + + // Original order is sent to execution system. + IN_TRANSIT = 1; + + // Original order is rejected (exception). + REJECTED = 2; + + // Order is acknowledged by execution system. + ACK_PLACE = 3; + + // Order is expired (exception). + EXPIRED = 4; + + // Cancel request is sent to execution system. + IN_CANCEL = 5; + + // Cancel is acknowledged by execution system. + ACK_CANCEL = 6; + + // Cancel request is rejected (exception). + REJECT_CANCEL = 7; + + // Modify request is sent to execution system. + IN_MODIFY = 8; + + // Modify is acknowledged by execution system. + ACK_MODIFY = 9; + + // Modify request is rejected (exception). + REJECT_MODIFY = 10; + + // Fill event is received from execution system. + FILL = 11; + + // Order is suspended. + SUSPEND = 12; + + // Referenced fill is corrected. + FILL_CORRECT = 13; + + // Referenced fill is canceled (exception). + FILL_CANCEL = 14; + + // Referenced fill is busted (exception). + FILL_BUST = 15; + + // Acknowledgment that order will activate at specified time. + ACTIVEAT = 16; + + // Order may be canceled because a disconnect occurred (exception). + DISCONNECT = 17; + + // Synthetic order was sent to the actual execution system. + SYNTHETIC_ACTIVATED = 18; + + // Order status and/ or attributes are updated. + UPDATE = 19; + + // Synthetic strategy execution failed. + SYNTHETIC_FAILED = 20; + + // Synthetic strategy order has at least one overfilled leg. + SYNTHETIC_OVERFILL = 21; + + // Hanging quantity update for the synthetic strategy order. + SYNTHETIC_HANG = 22; + + // Cross order is acknowledged by exchange but waiting for approval from counter-parties. + APPROVING = 23; + + // Cross order is waiting for approval from the client (i.e. from the side/participant that received this transaction). + APPROVE_REQUESTED = 24; + + // The exchange approved the cross order. + APPROVED_BY_EXCHANGE = 25; + + // Cross order is rejected by one of its participants. + REJECTED_BY_USER = 26; + + // Cross order is completely executed on exchange, this is the final state of the cross order. + MATCHED = 27; + + // Previously matched cross order/leg have been amended by the exchange. + TRADE_AMENDED = 28; + + // Cross order has a previously executed trade/leg broken by exchange; + // this is analogous to bust on a regular order. + TRADE_BROKEN = 29; + } + + // This field is associated with Status enum type. + required uint32 status = 1; + + // Order transaction identifier, unique within order chain. + required uint64 trans_id = 2; + + // Transaction time assigned by server (UTC). + required sint64 trans_utc_time = 3; + + // Order request state at the transaction moment. + // This field is associated with OrderRequest.State enum type. + required uint32 order_state = 4; + + // Order chain status at the transaction moment. + // This field is associated with OrderChain.Status enum type. + required uint32 order_chain_status = 5; + + // Additional transaction comments. + optional string text_message = 6; + + // [obsolete] This operation is no longer supported. + optional uint32 obsolete_new_discretionary_offset = 7 [deprecated = true]; + + // [obsolete] This operation is no longer supported. + optional uint32 obsolete_prev_discretionary_offset = 8 [deprecated = true]; +} + +// Gateway order fill. +message OrderFill +{ + // Trade routing order fill unique identifier. + optional sint64 id = 1; + + // Trade routing order fill execution identifier. + optional string exec_id = 2; + + // [obsolete] Use quantity field instead. + optional uint32 obsolete_quantity = 3 [deprecated = true]; + + // Price at which the lots were bought or sold. + // Correct price. + optional double price = 4; + + // UTC time the fill happened (offset in milliseconds from 01.01.1970). + optional sint64 fill_utc_time = 5; + + // Flag that trade was aggressive (Fixed Income specific order modifier). + optional bool is_aggressive = 6; + + // Leg fills associated with this order fill. + repeated LegFill leg_fills = 7; + + // Interesting to show. + // Order request ID associated with the fill. + optional string order_id = 8; + + // Possible fill status. + enum FillStatus + { + // Regular valid fill. + VALID = 1; + + // Fill was busted. + BUSTED = 2; + + // Fill was corrected. + CORRECTED = 3; + + // Fill was cancelled. + CANCELLED = 4; + } + + // Status of the fill. + // The value is associated with FillStatus enum. + optional uint32 fill_status = 9; + + // Associated fill care order request id. + optional string fill_care_order_request_id = 10; + + // Price at which the lots were bought or sold. + // Display price. + optional sint64 display_price = 11; + + // Fill open/close type. + // This field is associated with OrderChain.OpenCloseType enum type. + optional uint32 open_close_type = 12; + + // Fill speculation type. + // This field is associated with OrderChain.SpeculationType enum type. + optional uint32 speculation_type = 13; + + // Commission value of the fill. + optional double commission = 14; + + // Commission currency code (ISO 4217 based) of the fill. + optional string commission_currency = 15; + + // Quantity of bought or sold lots depending on order side. + optional cqg.Decimal quantity = 16; +} + +// Trade routing fill leg. +message LegFill +{ + // Trade routing leg fill unique identifier. + optional sint64 id = 1; + + // Trade routing leg fill execution identifier. + optional string exec_id = 2; + + //Full contract symbol for this leg. + optional string contract_symbol = 3; + + // [obsolete] Use quantity field instead. + optional uint32 obsolete_quantity = 4 [deprecated = true]; + + // Leg side. + // This field is associated with OrderChain.Side enum type. + optional uint32 side = 5; + + // Price at which the lots were bought or sold. + // Correct price. + optional double price = 6; + + // UTC time the fill happened (offset in milliseconds from 01.01.1970). + optional sint64 fill_utc_time = 7; + + // Status of the leg fill. + // The value is associated with OrderFill.FillStatus enum. + optional uint32 fill_status = 8; + + // Price at which the lots were bought or sold. + // Display price. + optional sint64 display_price = 9; + + // Leg fill open/close type. + // This field is associated with OrderChain.OpenCloseType enum type. + optional uint32 open_close_type = 10; + + // Leg fill speculation type. + // This field is associated with OrderChain.SpeculationType enum type. + optional uint32 speculation_type = 11; + + // Flag that trade was aggressive (Fixed Income specific order modifier). + optional bool is_aggressive = 12; + + // Quantity of bought or sold lots depending on leg side. + optional cqg.Decimal quantity = 13; + + // Order extended side. + // This field is associated with ExtendedSide enum type. + optional uint32 extended_side = 14; + + // Identifies a brokerage that lended an equity being sold short. + // (max length = 64) + optional string locate_id = 15; + + // Fill extra values. + // First - name, second - value. + repeated common_1.Tuple fill_extra_values = 16; + + // Leg's number. + optional string leg_number = 17; +} + +// Represents order with related child orders. +message RelatedOrder +{ + // Associated Order chain. + optional OrderChain order_chain = 1; + + // Child order chains. + repeated RelatedOrder children = 2; + + // Leg path. + // Example: '1/2/'. + optional string leg_path = 3; +} + +// Represents compound order with child orders. +message CompoundOrder +{ + enum CompoundOrderNodeRole + { + // Root of tree. + ROOT = 1; + + // Order place order primary. + OPO_PRIMARY = 2; + + // Order place order secondary. + OPO_SECONDARY = 3; + + // Order cancel order. + OCO_ROLE = 4; + + // Independent compound. + INDEPENDENT_ROLE = 5; + } + + enum CompoundOrderType + { + // Order cancel order. + OCO = 1; + + // Order place order. + OPO = 2; + + // Order type. Compound order with ORDER type is associated with order chain. + ORDER = 3; + + // Independent compound relation as set of two or more of otherwise unrelated orders being placed in one action. + INDEPENDENT = 4; + } + + enum CompoundOrderTriggerType + { + // Default value for compound order. Indicates whether сompound order is working. + Working = 1; + + // Indicates whether сompound order has been filled. + Filled = 2; + + // Indicates whether сompound order has been cancelled. + Cancelled = 3; + } + + // Compound order id. + optional string id = 1; + + // Compound role. + // This field is associated with CompoundOrder.CompoundOrderNodeRole enum type. + optional uint32 node_role = 2; + + // Compound type. + // This field is associated with CompoundOrder.CompoundOrderType enum type. + optional uint32 type = 3; + + // Unique compound client guid. + optional string client_guid = 5; + + // Trigger on market type. + // This field is associated with CompoundOrder.CompoundOrderTriggerType enum type. + optional uint32 trigger_type = 6; + + // Associated order chain. + // Required when compound order type is ORDER. + optional OrderChain order_chain = 7; + + // Child compounds. + repeated CompoundOrder children = 8; +} + +// Represents strategy leg with child legs. +message StrategyLeg +{ + enum StrategyMode + { + // All legs executed. + ALL = 1; + + // Aggregate legs. + AGGR = 2; + + // Multiplicative strategy. + MUL = 3; + } + + // Leg path. + optional string leg_path = 1; + + // Strategy contract. + optional string contract_symbol = 2; + + // [obsolete] Use quantity_ratio field instead. + optional double obsolete_quantity_ratio = 3 [deprecated = true]; + + // Price ratio. + optional double price_ratio = 4; + + // Associated with StrategyMode enum. + optional uint32 mode = 5; + + // Account. + optional ChainAccount account = 6; + + // Yield model. + // First - key, second - value. + repeated common_1.Tuple yield_model = 7; + + // Child legs. + repeated StrategyLeg legs = 8; + + // Strategy leg open/close type. + // This field is associated with OrderChain.OpenCloseType enum type. + optional uint32 open_close_type = 9; + + // Strategy leg speculation type. + // This field is associated with OrderChain.SpeculationType enum type. + optional uint32 speculation_type = 10; + + // Quantity ratio. + optional cqg.Decimal quantity_ratio = 11; +} + +// Represents general information about CQG Gateway account. +message Account +{ + // [required-update] Trade routing account identifier. + optional sint32 id = 1; + + // [required-create] Account name (max length = 64). + // Can contain prefix (like SIM for simalation account) which cannot be changed. + optional string name = 2; + + // [required-create] Brokerage account number (max length = 256). + // Can contain prefix (like PS for permanent simulation) which cannot be changed. + optional string brokerage_account_number = 3; + + // [immutable][obsolete] Use sales_series_id field instead. + // Sales series number. + // Cannot be changed directly with UpdateAccount message, but can be changed by changing sales_series_id. + optional string obsolete_sales_series_number = 4 [deprecated = true]; + + // [immutable][obsolete] Use sales_series_id field instead. + // Sales series name. + // Cannot be changed directly with UpdateAccount message, but can be changed by changing sales_series_id. + optional string obsolete_sales_series_name = 5 [deprecated = true]; + + // [immutable][obsolete] Use brokerage_id field instead. + // Brokerage name. + optional string obsolete_brokerage_name = 6 [deprecated = true]; + + // Account class enumeration. + enum Class + { + // Regular account class. + REGULAR = 1; + + // Template account class. + // This class is used for back office parsing not for clonning. + TEMPLATE = 2; + + // Omnibus account class. + OMNIBUS = 3; + } + + // [required-create][immutable-update] This field is associated with Class enum. + optional uint32 class = 8; + + // Id of customer - owner of the account. + // If changed then new customer must belong to the same brokerage. + // Use profile_id instead. + optional string customer_id = 9; + + // [immutable] Risk server instance which calculates risks for this account (includes related Gateway location). + optional string risk_server_instance = 10; + + // [required-create] Type of the account (e.g. 'Customer Account', 'House Account', etc.) + // List of available account types can be obtained with: + // LookupPropertyListRequest { property_type = TradeRoutingLookupPropertyType.ACCOUNT_TYPE } + optional string account_type_id = 11; + + // ID of related sales series. + // If changed then new sales series must belong to the same brokerage. + // Use profile_sales_series_id instead. + optional string sales_series_id = 12; + + // [immutable] ID of related brokerage. + optional string brokerage_id = 13; + + // [immutable] Default account currency code (ISO 4217). + optional string currency = 14; + + // Account sub-class enumeration. + enum SubClass + { + // Regular account sub-class. + SUB_CLASS_REGULAR = 1; + + // Gateway internal account sub-class. + SUB_CLASS_INTERNAL = 2; + } + + // This field is associated with SubClass enum. + // Can be set/changed only for account with class = 3 (omnibus). + optional uint32 sub_class = 15; + + // [immutable-update] Risk server instance id. + // If not set during CreateAccount message, default brokerage one is used. + optional string risk_server_instance_id = 16; + + // [obsolete] ID of account cluster the account points to. + optional string obsolete_account_cluster_id = 17 [deprecated = true]; + + // [immutable] Determines, whether account is removed. + optional bool removed = 18; + + // [immutable] Determines group role (master/sub-account) + // in case when account belongs to a group. + optional bool is_master = 19; + + // [immutable] This field is associated with AccountGroup.RelationType enum. + // Specifies group relation type in case when account belongs to a group. + optional uint32 group_relation_type = 20; + + // [immutable] Determines if account is collection. + optional bool is_collection = 21; + + // [required-create] Id of profile - owner of the account. + // If changed then new profile must belong to the same brokerage. + // Has priority over customer_id. + // Supported profile types: admin, customer. + optional string profile_id = 22; + + // [required-create] ID of linked sales series profile. + // If changed then new sales series profile must belong to the same brokerage. + // Has priority over sales_series_id. + optional string profile_sales_series_id = 23; + + // [immutable] Determines if account has migration request(s) not in final state. + optional bool is_in_migration = 24; +} + +// Gateway balance record. +message BalanceRecord +{ + // Trade routing account identifier. + required sint32 account_id = 1; + + // Balance record identifier. + required sint32 balance_record_id = 2; + + // Currency code (real currency code is ISO 4217 based. + required string currency = 3; + + // End cash balance. + optional double end_cash_balance = 4; + + // Collateral. + optional double collateral = 5; + + // Previous close date (date value only) (UTC). + optional sint64 as_of_date = 6; + + // Represents balance origin enum. + enum BalanceOrigin + { + // Not-available. + NA = 1; + + // Local balance. + LOCAL = 2; + + // Abroad balance. + OVERSEAS = 3; + } + + // [immutable] Balance origin. + // This field is associated with BalanceOrigin enum type. + optional uint32 origin = 7; + + // Regulated. + optional bool regulated = 8; +} + +// Information about one of the found accounts. +message AccountSearchResultRecord +{ + // Trade routing account identifier. + required sint32 account_id = 1; + + // Account name. + required string name = 2; + + // Brokerage account number. + required string brokerage_account_number = 3; + + // Sales series number. + required string sales_series_number = 4; + + // Sales series name. + required string sales_series_name = 5; + + // Brokerage name. + required string brokerage_name = 6; + + // Id of customer - owner of the account. + // Use profile_id instead. + optional string customer_id = 7; + + // Name of customer - owner of the account. + optional string customer_name = 8; + + // Removed flag. + optional bool removed = 9; + + // Id of sales series. + // Use profile_sales_series_id instead. + optional string sales_series_id = 10; + + optional string brokerage_id = 11; + + optional string risk_server_instance_id = 12; + + optional string group_id = 13; + + // This field is associated with Class enum. + optional uint32 class = 14; + + // Owner profile id. + optional string profile_id = 15; + + // Linked sales series profile id. + optional string profile_sales_series_id = 16; +} + +// Information about enabled account route. +message AccountRouteRecord +{ + // Values indicating whether CQG MiFID Algo "CQG Variable Latency" should be applyed. + enum ForceVariableLatencyAlgo + { + // Never for any orders on this route. + DISABLED = 0; + + // For any orders on this route if they do not already have a CQG Algo or Spreader orders. + NON_CQG_ALGO_ORDERS = 1; + + // Always for any orders on this route if they are not Spreader orders. + ALL_NON_SPREADER_ORDERS =2; + } + + // List of field ids to clear during update operation. + repeated uint32 cleared_fields = 9; + + // [required] Code number of the route. + optional sint32 route_code = 1; + + // [obsolete] Route name. + // See RouteInformation.name field. + optional string obsolete_route_name = 2 [deprecated = true]; + + // [required-create] Account priority of the route. + // Should be unique positive number. + optional sint32 priority = 3; + + // [erasable] Omnibus account ID if it is used for this route. + // NOTE: erasing using cleared_fields functionality is + // implemented for protocol version 1.33 or higher. + optional sint32 omnibus_account_id = 4; + + // [obsolete] Omnibus account name if it is used for this route. + // See Route.omnibus_accounts field. + optional string obsolete_omnibus_account_name = 5 [deprecated = true]; + + // List of route attributes with values. + repeated AccountRouteAttribute attributes = 6; + + // [immutable] If set, route is in use by some other account using this configured route. + optional bool is_in_use = 7; + + // Indicates whether synthetic orders are allowed on this route for this account. + // Can be 'true' only if route allows synthetic orders (RouteInformation.allow_synthetic_order_types). + optional bool allow_synthetic_order_types = 8; + + // 9 is occupied by cleared_fields. + + // Indicates whether the algo_strategies_whitelist contains information about allowed algorithmic strategies. + // Otherwise all available algorithmic strategies on particular route are allowed for the account. + optional bool enable_algo_strategies_whitelist = 10; + + // [erasable] List of route algorithmic strategy ids allowed to account on particular route. + // Can contain specific algorithmic strategy enablement in case when enable_algo_strategies_whitelist flag is set. + repeated string algo_strategies_whitelist = 11; + + // Flag indicating whether during doing order route calculation, Risk Server should enforce + // that a route enabled as "CQG Algo orders only" is only used for the order when it has a CQG MiFID Algo ID. + optional bool cqg_algo_orders_only = 12; + + // This field is associated with ForceVariableLatencyAlgo enum. + optional uint32 force_variable_latency_algo = 13; +} + +// Route attributes. +message AccountRouteAttribute +{ + // [immutable] Route attribute name. + required string Name = 1; + + // Route attribute value. + optional string Value = 2; + + // [required][immutable] attribute id. + optional string id = 3; +} + +// Account to user authorization link. +message AccountUserLink +{ + // [required] Account ID. + optional sint32 account_id = 1; + + // [required] User ID. + optional string user_id = 2; + + // True means the trader can only view account activity. + optional bool is_view_only = 3; + + // Determines if Gateway will automatically park trader's orders as Care Orders. + optional bool is_force_care = 4; + + // [immutable] User name. + optional string user_name = 5; + + // [immutable] Account name. + optional string account_name = 6; + + // [immutable] Brokerage account number. + optional string brokerage_account_number = 7; + + // [immutable] Account's brokerage name. + optional string brokerage_name = 8; + + // Enables trader to place orders into external FCM account number. + optional bool allow_external_accounts = 9; + + // [immutable] Authorization via brokerage or sales series. + optional bool implicit_authorization = 10; + + // Execution Source Code that is used for orders placed by user_id on account_id. + // This is not an actual code but ID that can be obtained from lookup (value field). + // LookupPropertyListRequest { property_type = TradeRoutingLookupPropertyType.EXECUTION_SOURCE_CODE } + optional string execution_source_code_id = 11; + + // [immutable] Account's brokerage identifier. + optional string account_brokerage_id = 12; + + // [immutable] Account's sales series identifier. + optional string account_sales_series_id = 13; + + // Indicates whether orders on Brokerage/Sales series accounts + // should be flagged as Direct Electronic Access under MiFID. + optional bool is_mifid_dea = 14; + + // Forces CQG MiFID algorithms to be treated as client algorithms rather than firm algorithms. + optional bool transform_mifid_algo_cqg_to_client_algo = 15; + + // Indicates whether trade-routing login is primary on account. + // If account already has primary login then it will be + // cleared from account and new one is set. + optional bool is_primary_login = 16; +} + +// Account settings. +message AccountSettings +{ + // List of field ids to clear during update operation. + repeated uint32 cleared_fields = 18; + + // [required-update] Trade routing account identifier. + optional sint32 account_id = 1; + + // [obsolete] Block account indicator. The field is obsolete and always has False value. + optional bool obsolete_is_block = 2 [deprecated = true]; + + // [obsolete] Block size if this is a block account. + optional sint32 obsolete_block_size = 3 [deprecated = true]; + + // Give up account indicator. + optional bool is_giveup = 4; + + // [obsolete] Use giveup_brokerage_id field instead. + // Give up brokerage name if this is a give up account. + optional string obsolete_giveup_brokerage_name = 5 [deprecated = true]; + + // Account statement processing option enumeration (account clearing). + enum StatementOption + { + // Generate complete daily statement (simulated clearing). + GENERATE = 1; + + // Process statements as received from a brokerage. + BROKERAGE = 2; + + // Reset to zero positions at the end of the day. + RESET = 3; + } + + // This field is associated with StatementOption enum. + optional uint32 statement_option = 6; + + // If statement processing option is RESET this field indicates if balances are reset to zero along with positions. + optional bool zero_balance = 7; + + // [erasable] Reconciliation indicator. Account follows brokerage reconciliation setting if the filed is omitted. + optional bool reconciliation = 8; + + // Give up brokerage id if this is a give up account. + optional string giveup_brokerage_id = 9; + + // [erasable] Start of account trading time in ISO 8601 format. + // Only time must be provided. + optional string trading_time_from = 10; + + // [erasable] End of account trading time in ISO 8601 format. + // Only time must be provided. + // Must be provided with the same time zone if start time is set. + optional string trading_time_to = 11; + + // [erasable] Trading time zone. + // The value are associated with a lookup property with TIME_ZONE type. + optional string trading_time_zone = 12; + + // Allow to liquidate orders outside trading time, if trading time is set. + optional bool liquidation_orders_outside_trading_time = 13; + + // Instruct account indicator. + optional bool is_instruct = 14; + + // Allow externally provided execution of account. + optional bool externally_provided_execution = 15; + + // [erasable] Associated MODES account groups. + // The values are associated with a lookup property with MODES_ACCOUNT_GROUP type. + // Empty string will not be processed, use cleared_fields during update operation to clear this field. + repeated string modes_account_groups = 16; + + // Determines whether Pre-trade middle market price for an order is required. + optional bool require_pre_trade_mid_market_mark = 17; + + // 18 is occupied by cleared_fields. + + // Allows using of extended sides. + optional bool allow_extended_side = 19; + + // Indicates whether GoFlat request for the account is allowed (false by default). + optional bool allow_go_flat = 20; + + // [erasable] This field is associated with OrderChain.SpeculationType enum. + // Value should be used for orders initiated from a GoFlat request that does not include speculation type on contracts where speculation type is required. + optional uint32 go_flat_default_speculation_type = 21; +} + +message RiskParameters +{ + // Trade routing account identifier. + // [obsolete] Use specific entity identifier on update message level. + optional sint32 obsolete_account_id = 1 [deprecated = true]; + + // Allow positions to be closed only. + optional bool liquidation_only = 2; + + // Allow futures trading. + optional bool allow_futures = 3; + + enum OptionsTrading + { + // Cannot buy or sell options. + NO = 1; + + // Buy options or liquidate long option positions. + BUY = 2; + + // Buy or Sell options. + ALL = 3; + } + + // Allow options trading. + // The value is associated with OptionsTrading enum. + optional uint32 allow_options = 4; + + // True if trade size limit is enforced. + optional bool enforce_trade_size_limit = 5; + + // [obsolete] Use trade_size_limit field instead. + optional sint32 obsolete_trade_size_limit = 6 [deprecated = true]; + + // True if trade margin limit is enforced. + optional bool enforce_trade_margin_limit = 7; + + // Optional trade margin limit which is maximum margin requirement for any single trade. + optional double trade_margin_limit = 8; + + // True if trade price limit in ticks is enforced. + optional bool enforce_trade_price_limit_ticks = 9; + + // Optional trade price limit in ticks for any single trade. + optional TradePriceLimit trade_price_limit_ticks = 10; + + // True if commodity position limit is enforced. + optional bool enforce_commodity_position_limit = 11; + + // [obsolete] Use commodity_position_limit field instead. + optional LimitValue obsolete_commodity_position_limit = 12 [deprecated = true]; + + // True if contract position limit is enforced. + optional bool enforce_contract_position_limit = 13; + + // [obsolete] Use contract_position_limit field instead. + optional LimitValue obsolete_contract_position_limit = 14 [deprecated = true]; + + // True if margin sybsystem parameters are enforced. + // When enforced, any trade that could cause margin requirements to exceed account's available funds is denied. + optional bool enforce_margin_subsystem_parameters = 15; + + // Purchasing power parameters. + optional PurchasingPowerParameters purchasing_power_parameters = 16; + + // True if daily loss limit is enforced. + optional bool enforce_daily_loss_limit = 17; + + // Optional daily loss limit. Limits losses during a single day. + // Account ending balance + collateral are considered as 'funds' for the limit. + // Losses during a single day are considered as 'losses' for the limit. + optional LossLimit daily_loss_limit = 18; + + // True if delta daily loss limit is enforced. + optional bool enforce_delta_daily_loss_limit = 19; + + // Optional delta daily loss limit. Limits losses since yesterday. + // Yesterday's purchasing power is considered as 'funds' for the limit. + // Losses incurred since yesterday are considered as 'losses' for the limit. + optional LossLimit delta_daily_loss_limit = 20; + + // Maximum number of order requests (new orders, modifications, cancellations) allowed per second. + optional sint32 maximum_order_rate = 21; + + // Reject BUY MKT orders if ask price is not available and SELL MKT orders if bid price is not available. + optional bool reject_risky_market_orders = 22; + + // True if trade price limit in percent is enforced. + optional bool enforce_trade_price_limit_percent = 23; + + // Optional trade price limit in percent for any single trade. + optional TradePriceLimitPercent trade_price_limit_percent = 24; + + // Optional trade size limit for any single trade. + optional cqg.Decimal trade_size_limit = 25; + + // Optional commodity position limit. + optional LimitValueDecimal commodity_position_limit = 26; + + // Optional contract position limit. + optional LimitValueDecimal contract_position_limit = 27; + + // Order placement date plus this number of days must be more than contract last trading date. + optional LimitValue last_trading_date_limit = 28; + + // Trade size limit with unlimited/inherited mode. + // Unlimited/inherited modes aren't supported for account now. + optional LimitValueDecimal trade_size_limit_with_modes = 29; + + // True if total gross open position limit is enforced. + optional bool enforce_total_gross_open_position_limit = 30; + + // Optional total gross open position limit. + optional LimitValueDecimal total_gross_open_position_limit = 31; + + // Long Option Premium check parameter. + // True means that check is performed against Purchasing Power, False - against Cash Balance. + optional bool long_option_premium_check_against_purchasing_power = 32; + + // True means that real-time currency rates are used for intra-day currency conversions, where available. + // Otherwise, Brokerage daily statement currency rates are used for all currency conversions. + optional bool use_intraday_currency_rate = 33; +} + +// Account group. +message AccountGroup +{ + // Group accounts relation enumeration. + enum RelationType + { + // Margin independently (sub accounts can borrow Purchasing Power from master up to configured %). + MARGIN_INDEPENDENTLY_BORROW = 1; + + // Margin independently, then sum margin requirements and Purchasing Powers. + MARGIN_INDEPENDENTLY_SUM = 2; + + // Margin master and sub-accounts together (combine funds, orders, and positions for margin calculations). + MARGIN_TOGETHER = 3; + } + + // [required-update] Group identifier. + optional string group_id = 1; + + // [required-create][immutable-update] Master of the group. + optional string master_account_id = 2; + + // [required-create] Relation type. + // This field is associated with RelationType enum. + optional uint32 relation_type = 3; + + // [immutable-update] Sub account of the group. + repeated SubAccount sub_accounts = 4; +} + +// Sub account of group. +message SubAccount +{ + // [required] Account identifier. + optional string account_id = 1; + + // [immutable] Account name. + optional string account_name = 2; + + // [immutable] Brokerage account number. + optional string brokerage_account_number = 3; + + // [required] Purchasing power. Allowed values (0..1). + optional double purchasing_power_fraction = 4; +} + +// Trade price limit parameters. +message TradePriceLimit +{ + // This field is associated with PriceLimitMode enum. + optional uint32 mode = 1; + + // [obsolete] Number of ticks away from the current market price to enforce the price limit. + optional sint32 obsolete_ticks = 2 [deprecated = true]; + + // Number of ticks away from the current market price to enforce the price limit. + optional LimitValue value = 3; +} + +// Trade price limit parameters. +message TradePriceLimitPercent +{ + // This field is associated with PriceLimitMode enum. + optional uint32 mode = 1; + + // Percent from the current market price to enforce the price limit. + optional LimitValueDouble value = 2; +} + +// Limit value in ticks. +message LimitValue +{ + // This field is associated with LimitMode enum. + optional uint32 mode = 1; + + // Limit value when mode is LIMITED. + optional sint32 value = 2; + + // [obsolete] List of optional contract expiration based limits overrides. + repeated ExpirationLimit obsolete_expiration_limit = 3 [deprecated = true]; + + // Enforce all brokerage accounts to use this setting. + // Only applicable for Brokerage level configuration. + // Supported by LTD Limit. + optional bool enforce = 4; +} + +// Limit value in double. +message LimitValueDouble +{ + // This field is associated with LimitMode enum. + optional uint32 mode = 1; + + // Limit value in double when mode is LIMITED. + optional double value = 2; + + // Enforce all brokerage accounts to use this setting. + // Only applicable for Brokerage level configuration. + // Supported by next limits: margin_multiplier, last_trading_date_limit, long_positions_only. + optional bool enforce = 3; +} + +// Limit value in decimal (can be used for trade size of position limit). +message LimitValueDecimal +{ + // List of field ids to clear during update operation. + repeated uint32 cleared_fields = 5; + + // This field is associated with LimitMode enum. + optional uint32 mode = 1; + + // Limit value when mode is LIMITED. + optional cqg.Decimal value = 2; + + // [erasable] List of optional contract expiration based limits overrides. + // This list is used only for contract level position limit at the moment. + // Limits with lower number of days before expiration take over limits with bigger number of days before expiration + // when contract expiration reaches corresponding limit period. + repeated ExpirationLimitDecimal expiration_limit = 3; + + // Enforce All brokerage accounts to use this setting. + // Only applicable for Brokerage level configuration. + // Supported by LTD Limit. + optional bool enforce = 4; + + // 5 is occupied by cleared_fields. + + // Only applicable for Login level configuration. + // 1- enforced(use login settins}, 0- not enforced. Supported by gross open position limit. + optional bool login_enforce = 6; +} + +// Limit value that can be true/false/default. +message LimitValueBoolean +{ + // This field is associated with LimitMode enum. UNLIMITED is not supported. + optional uint32 mode = 1; + + // Limit value when mode is LIMITED. + optional bool value = 2; + + // Enforce All brokerage accounts to use this setting. + // Only applicable for Brokerage level configuration. + optional bool enforce = 3; +} + +// [obsolete] Use ExpirationLimitDecimal message instead. +message ExpirationLimit +{ + // Number of days before contract expiration this limit is in effect. + optional uint32 days_before_expiration = 1; + + // Limit value when enforced. + optional sint32 value = 2; +} + +// Contract expiration based limit. +message ExpirationLimitDecimal +{ + // Number of days before contract expiration this limit is in effect. + optional uint32 days_before_expiration = 1; + + // Limit value when enforced. + optional cqg.Decimal value = 2; +} + +// Margin subsystem parameters. +message PurchasingPowerParameters +{ + // Additional credit available to satisfy margin requirements. + optional double ms_allowable_margin_credit = 1; + + // Cross margining indicator. If true then inter-month, inter-commodity and inter-exchange credits are considered in margin estimation. + optional bool ms_cross_margining = 2; + + // Possible options to include different values into purchasing power. + enum IncludeOption + { + // Value is included. + YES = 1; + + // Only negative value is included. + NEGATIVE = 2; + + // Value is not included. + NO = 3; + } + + // Include OTE (Open Trade Equity) in Purchasing Power (PP). + // This field is associated with IncludeOption enum. + optional uint32 ms_include_ote_pp = 3; + + // Include NOV (Net Option Value) in Purchasing Power (PP). + // This field is associated with IncludeOption enum. + optional uint32 ms_include_nov_pp = 4; + + // Include UPL (Unrealized Profit Loss) in DLL/DDLL (Daily Loss Limit and Delta Daily Loss Limit) + // This field is associated with IncludeOption enum. + optional uint32 include_upl_ll = 5; + + // Include OTE (Open Trade Equity) in DLL/DDLL (Daily Loss Limit and Delta Daily Loss Limit) + // This field is associated with IncludeOption enum. + optional uint32 include_ote_ll = 6; + + // Check for the negative balance. + optional bool check_negative_balance = 7; + + // If true then OTE, NOV, and UPL can be calculated using theoretical values. + optional bool use_theo_prices = 8; + + // Slippage for option theoretical price in ticks. + optional sint32 theo_ticks = 9; + + // If true then Best Bid and Ask can be used for OTE calculation, only trade and settlement are used otherwise. + optional bool use_bba_ote = 10; + + // If true then Best Bid and Ask can be used for NOV and UPL calculation, only trade and settlement are used otherwise. + optional bool use_bba_nov_upl = 11; + + // Calculate current price as a settlement adjusted by net price change of reference contract, LME style. + optional bool adjust_price_by_netchange = 12; + + // Use brokerage's configured margins instead of gateway's default ones. + // Using this option you are disabling cross-margining, even if it is enabled. + // Can be set if it is allowed on brokerage level only. + optional bool use_brokerage_margins_only = 13; + + // [obsolete] Use margin_multiplier instead. + // Multiplier for calculated margin requirements. Allowed values (0.001..100). + optional double obsolete_margin_multiplier = 14 [deprecated = true]; + + // If true then margin is calculated independently for options using instrument_group_margin_multiplier. + optional bool ms_use_instrument_group_margin_multiplier = 15; + + // Multiplier for calculated instrument group (options) margin requirements. Allowed values (0.001..100). + optional double ms_instrument_group_margin_multiplier = 16; + + // Multiplier for calculated margin requirements. Allowed values (0.001..100). + // In update request you should use LimitMode.DEFAULT to reset this field. + optional LimitValueDouble margin_multiplier = 17; + + // This parameter allows to ignore margin-based checks for liquidation orders. + // Any other risk checks that are enabled for this account + // will be conducted as usual even for liquidation orders. + optional bool always_allow_liquidation = 18; + + // If true then max_purchasing_power parameter is used. + optional bool enforce_max_purchasing_power = 19; + + // Maximum amount of purchasing power available to satisfy margin requirements. + // Applicable when enforce_max_purchasing_power is true. Allowed values (0.001..9999999999). + optional double max_purchasing_power = 20; +} + +// Loss limit. +message LossLimit +{ + // Loss limit type enumeration. + // It defines what is used to get the limit absolute value during calculation. + enum Type + { + // Percentage of funds allowed in losses. + PERCENT = 1; + + // Absolute amount allowed in losses, limited by funds. + AMOUNT = 2; + + // Minimum from percent and absolute amount of funds allowed in losses. + MIN_PERCENT_AMOUNT = 3; + + // Maximum from percent and absolute amount of funds allowed in losses. + MAX_PERCENT_AMOUNT = 4; + + // Absolute amount of funds allowed in losses, and not limited by funds. + AMOUNT_NO_LIMIT = 5; + } + + // This field is associated with Type enumeration. + optional uint32 type = 1; + + // Percent of funds allowed in losses, entered as a fractional between 0 and 1. + optional double percent = 2; + + // Absolute amount in US dollars allowed in losses. + optional double amount = 3; +} + +// Exchange group with a list of commodities. +message ExchangeGroup +{ + // Trade routing system identifier of an exchange group. + required sint32 id = 1; + + // Name of the exchange group. + required shared_1.Text name = 2; + + // List of exchange group fungible commodities. + repeated FungibleCommodity fungible_commodity = 3; +} + +// Fungible commodity. +message FungibleCommodity +{ + // Trade routing system identifier of the fungible commodity. + optional sint32 id = 1; + + // Name of the fungible commodity. + optional shared_1.Text name = 2; + + // List of tradable commodities. + repeated TradableCommodity tradable_commodity = 3; + + // US commodity indicator. + optional bool is_us = 4; + + // List of instrument types defined for this fungible commodity. + repeated sint32 instrument_type_id = 5; + + // Synthetic ID of margin group. + optional string margin_group_id = 6; + + // Prefix of the fungible commodity. + optional string prefix = 7; + + // Fungible commodity's extended code. + optional string extended_code = 8; +} + +// Tradable commodity. +message TradableCommodity +{ + // Commodity string id (aka Commodity XBit). + required string id = 1; + + // Commodity symbol. + required string symbol = 2; +} + +// Instrument type. +message InstrumentType +{ + // Trade routing system identifier of the instrument type. + required sint32 id = 1; + + // Name of the instrument type. + required shared_1.Text name = 2; + + // Different market limit types. + enum MarketLimitType + { + // Instrument position limit type. + INSTRUMENT_POSITION_LIMIT = 1; + + // Contract position limit type. + CONTRACT_POSITION_LIMIT = 2; + + // Trade size limit type. + TRADE_SIZE_LIMIT = 3; + + // Trade price limit type. + TRADE_PRICE_LIMIT = 4; + + // Trade price limit type. + LAST_TRADING_DATE_LIMIT = 5; + + // Long positions only type. + LONG_POSITIONS_ONLY = 6; + } + + // List of limit types that are acceptable for this instrument type. + // This filed is associated with MarketLimitType enum. + repeated uint32 allowed_limits = 3; + + // Instrument group types. + enum InstrumentGroupType + { + // Futures. + FUTURES = 1; + + // Options call/put. + OPTIONS = 2; + + // All strategy types (calendar spreads, reduced tick calendar spreads, packs, strips, etc.). + STRATEGIES = 3; + + // Indices. + INDICES = 4; + + // Fixed Income. + FIXED_INCOME = 5; + + // Cash Spot (including FX). + CASH_SPOT = 6; + + // Daily Futures (relative/rolling prompts). + DAILY_FUTURES = 7; + + // Equities. + EQUITIES = 8; + } + + // Instrument group type id. + // This filed is associated with InstrumentGroupType enum. + optional uint32 instrument_group = 4; +} + +// Market Limits set. +// The general rules for using this result are: +// - all fungible commodities with non-default limit(s) are returned (even those with no 'allowed to trade' tradable commodities); +// - to determine if a tradable commodity is enabled (allowed to trade), first check tradable_commodity_id field; +// if the tradable commodity is not present there, use the next rule; +// - if something is not specified on a lower level, check defaults at applicable higher levels +// (fungible commodity -> exchange group -> all US/non-US commodities -> all commodities). +message MarketLimits +{ + // Allows to clear (set to default) all market limits (including trading authority) for provided level except all_market_limits. + repeated uint32 cleared_fields = 5; + + // Default market limits for all commodities. + optional MarketLimitsRecord all_market_limits = 1; + + // [erasable] Default market limits for US commodities. + optional MarketLimitsRecord us_market_limits = 2; + + // [erasable] Default market limits for non-US commodities. + optional MarketLimitsRecord non_us_market_limits = 3; + + // [erasable] Default market limits for exchange groups. + repeated ExchangeMarketLimits exchange_market_limits = 4; + + // 5 is occupied by cleared_fields. +} + +// Record of market limit setting for exchange group level or higher. +// Limit values are defaults for all included commodities and can be can be overridden on a lower level. +message MarketLimitsRecord +{ + // Reserved for future use, not used now. + repeated uint32 cleared_fields = 4; + + // Indicates if level is allowed to trade. + // If null (not set) - default, actual value inherited from upper level. + optional EntityAllowedToTrade allowed_to_trade = 1; + + // [obsolete] Default margin multiplier. Allowed values (0.001..100). + // Use margin_multiplier = 5 instead. + optional double obsolete_margin_multiplier = 2 [deprecated = true]; + + // Default position and Trade limits. + optional PositionAndTradeLimits position_and_trade_limits = 3; + + // 4 is occupied by cleared_fields. + + // Margin multiplier for default and exchange levels. Allowed values (0.001..100). + // Can be enforced (locked) on FCM level. + optional LimitValueDouble margin_multiplier = 5; +} + +// Set of position and trade limits for all possible levels. +message PositionAndTradeLimits +{ + // Reserved for future use, not used now. + repeated uint32 cleared_fields = 12; + + // [obsolete] Use commodity_position_limit field instead. + optional LimitValue obsolete_commodity_position_limit = 1 [deprecated = true]; + + // [obsolete] Use instrument_position_limit field instead. + optional LimitValue obsolete_instrument_position_limit = 2 [deprecated = true]; + + // [obsolete] Use contract_position_limit field instead. + optional LimitValue obsolete_contract_position_limit = 3 [deprecated = true]; + + // [obsolete] Use trade_size_limit field instead. + optional LimitValue obsolete_trade_size_limit = 4 [deprecated = true]; + + // Trade price limit (all price sources) (in ticks). + optional LimitValue trade_price_limit_ticks = 5; + + // Trade price limit (all price sources) (in percent). + optional LimitValueDouble trade_price_limit_percent = 6; + + // Trade price limits in ticks per price sources for continuous trading. + optional TradePriceLimitsTicks trade_price_limit_ticks_continuous = 7; + + // Trade price limits in ticks per price sources for non-continuous trading. + optional TradePriceLimitsTicks trade_price_limit_ticks_non_continuous = 8; + + // Trade price limits in percent per price sources for continuous trading. + optional TradePriceLimitsPercent trade_price_limit_percent_continuous = 9; + + // Trade price limits in percent per price sources for non-continuous trading. + optional TradePriceLimitsPercent trade_price_limit_percent_non_continuous = 10; + + // Order placement date plus this amount of days must be more than contract last trading date. + optional LimitValue last_trading_date_limit = 11; + + // 12 is occupied by cleared_fields. + + // Optional commodity position limit. + // It is not used (and does not make sense) on instrument type level of settings. + optional LimitValueDecimal commodity_position_limit = 13; + + // Instrument position limit. + // It is not applicable for some instrument types. + optional LimitValueDecimal instrument_position_limit = 14; + + // Contract position limit. + // It is not applicable for some instrument types. + optional LimitValueDecimal contract_position_limit = 15; + + // Trade size limit. + // It is not applicable for some instrument types. + optional LimitValueDecimal trade_size_limit = 16; + + // Indicates if selling before buying is restricted on level. + // If null (not set) - default, actual value inherited from upper level. + optional LimitValueBoolean long_positions_only = 17; + + // Commodity gross open position limit. + // It is not applicable for instrument types. + optional LimitValueDecimal commodity_gross_open_position_limit = 18; + +} + +// Trade price limits in ticks per price sources. +message TradePriceLimitsTicks +{ + // Bid/Ask price source. + optional LimitValue bid_ask = 1; + + // The last trade price source. + // Not used for non-continuous trading. + optional LimitValue last = 2; + + // Open (for continuous) price source - the first trading price at the beginning of the trading day. + // Indicative open (for non-continuous) price source - the proposed open price at the beginning of the next trading day. + optional LimitValue open = 3; + + // Settlement price source - an official price established at the end of each trading day. + optional LimitValue settlement = 4; +} + +// Trade price limits in percent per price sources. +message TradePriceLimitsPercent +{ + // Bid/Ask price source. + optional LimitValueDouble bid_ask = 1; + + // The last trade price source. + // Not used for non-continuous trading. + optional LimitValueDouble last = 2; + + // Open (for continuous) price source - the first trading price at the beginning of the trading day. + // Indicative open (for non-continuous) price source - the proposed open price at the beginning of the next trading day. + optional LimitValueDouble open = 3; + + // Settlement price source - an official price established at the end of each trading day. + optional LimitValueDouble settlement = 4; +} + +// Exchange group level limits. +message ExchangeMarketLimits +{ + // Allows to clear (set to default) all limits on exchange level (default_market_limits) and below (commodity_market_limits). + repeated uint32 cleared_fields = 4; + + // Trade routing system identifier of an exchange group. + // Can be obtained via AccountAvailableExchangeGroupsRequest. + // Corresponds to ExchangeGroup.id field. + required sint32 exchange_group_id = 1; + + // [erasable] Default exchange group level limits. + optional MarketLimitsRecord default_market_limits = 2; + + // [erasable] List of fungible commodity level limits. + repeated CommodityMarketLimits commodity_market_limits = 3; + + // 4 is occupied by cleared_fields. +} + +// Fungible commodity level limits. +message CommodityMarketLimits +{ + // Allows to clear (set to default) all limits of this commodity level and below (instrument_market_limits). + repeated uint32 cleared_fields = 6; + + // Fungible commodity ID. + // Can be obtained via AccountAvailableExchangeGroupsRequest. + // Corresponds to FungibleCommodity.id field. + required sint32 fungible_commodity_id = 1; + + // [obsolete] List of allowed to trade tradable commodity ids. + repeated string obsolete_tradable_commodity_id = 2 [deprecated = true]; + + // [erasable] Default commodity level position and Trade limits. + optional PositionAndTradeLimits position_and_trade_limits = 3; + + // [erasable] List of instrument type level limits. + repeated InstrumentMarketLimits instrument_market_limits = 4; + + // [erasable] List of non-default allowed to trade configuration of commodities. + // EntityAllowedToTrade.id is commodity_id (aka XBit). + repeated EntityAllowedToTrade allowed_to_trade_commodities = 5; + + // 6 is occupied by cleared_fields. + + // Commodity margin multiplier. Allowed values (0.001..100). + // It is applied to all commodities with same margin_group_id even if specified only for one commodity from the group. + // Can be enforced (locked) on FCM level. + optional LimitValueDouble margin_multiplier = 7; +} + +// Instrument type level limits. +message InstrumentMarketLimits +{ + // Allows to clear (set to default) all limits of this instrument. + repeated uint32 cleared_fields = 5; + + // ID of the instrument type. + // Can be obtained via AccountAvailableExchangeGroupsRequest. + // Corresponds to InstrumentType.id field. + required sint32 instrument_type_id = 1; + + // [erasable] Instrument type level position and Trade limits. + optional PositionAndTradeLimits position_and_trade_limits = 2; + + // [erasable] List of non-default allowed to trade configuration of commodities. + repeated EntityAllowedToTrade allowed_to_trade_commodities = 3; + + // [erasable] List of non-default allowed to trade configuration of contracts. + repeated EntityAllowedToTrade allowed_to_trade_contracts = 4; + + // 5 is occupied by cleared_fields. +} + +// Represents any entity that can be allowed/disallowed to trade. +message EntityAllowedToTrade +{ + // Allows to clear allowed_to_trade field. + repeated uint32 cleared_fields = 4; + + // Entity identifier. Can be ID of commodity or contract. + // Commodity ID can be obtained via AccountAvailableExchangeGroupsRequest + // and corresponds to TradableCommodity.id field. + optional string id = 1; + + // [erasable] Indicates if entity is allowed to trade. + // Values: null (not set) - default, actual value inherited from upper level. + // false - explicitly disallowed, no matter what value is on upper level. + // true - explicitly allowed, no matter what value is on upper level. + optional bool allowed_to_trade = 2; + + // Enforce All brokerage accounts to use this setting. + // Only applicable for Brokerage level configuration. + optional bool enforce = 3; + + // 4 is occupied by cleared_fields. +} + +// Contract positions. +message ContractPosition +{ + // Contract symbol (Full contract name). + required string symbol = 1; + + // True if open positions are short (result of sell operations), long otherwise. + required bool is_short_open_position = 2; + + // List of open positions. + // There could be more than one position per contract separating contributed trades on different price levels. + repeated OpenPosition open_position = 3; + + // Contract id in case of grouping by contract. + optional string contract_id = 4; +} + +// Contract open position. +message OpenPosition +{ + enum PositionStatus + { + // 'Start of the day' position. Statement was run. + POSITION = 1; + + // 'Intraday' position. Order request was filled in current trading day. + // Until statement, currency fills also included here. + WORKING_ORDER = 2; + } + + // [obsolete] Use qty field instead. + optional uint32 obsolete_qty = 2 [deprecated = true]; + + // Position average price. + // NOTE: Since it could be an aggregated position price is sent in correct format directly. + required double price = 3; + + // Exchange specific trade date when the position was open or last changed (date only value). + required sint64 trade_date = 4; + + // Statement date (date value only). + required sint64 statement_date = 5; + + // UTC trade time (including date) if available, it might not be available e.g. for the previous day or aggregated positions. + optional sint64 trade_utc_time = 6; + + // Position ID (status=POSITION) or order request ID (status=WORKING_ORDER) + // associated with the position (if statement hasn't run yet). + optional string position_id = 7; + + // Indicates whether it is 'start of the day' or 'intraday' (working order) position. + // The value is associated with OpenPosition.PositionStatus enum. + optional uint32 status = 8; + + // Position size, zero means that this position is deleted. + optional cqg.Decimal qty = 9; + + // [obsolete] Currency code (internal format). + // Use currency_iso_code field instead. + optional string obsolete_currency_code = 10 [deprecated = true]; + + // Position speculation type. + // This field is associated with OrderChain.SpeculationType enum type. + optional uint32 speculation_type = 11; + + // Associated order chain in case of status = WORKING_ORDER. + optional string order_chain_id = 12; + + // Position display price. + optional sint64 display_price = 13; + + // Currency code of position (ISO 4217 based). + optional string currency_iso_code = 14; +} + +// Equity. +message Equity +{ + // Currency code of equity values (ISO 4217 based). + required string currency = 1; + + // Securities on deposit. Margin security values net of haircut. + required double securities = 2; + + // Cash Balance excluding open futures profits/losses, option market values, and securities on deposit. + required double balance = 3; + + // Total open trade equity. Open profits/losses on all futures positions. + required double ote = 4; + + // Ending balance + total open trade equity. + required double total_equity = 5; + + // Mark to market value of option positions. + required double mvo = 6; + + // Total equity + option market value + securities. + required double total_value = 7; + + // Liquid funds available -- can be withdrawn from account. + optional double cash_excess = 8; + + // Implied initial margin requirement. + // Equity required to establish current positions based on margin requirements. + optional double initial_margin = 9; + + // Implied maintenance margin requirement. + // Minimum equity required to maintain current positions based on margin requirements. + optional double maint_margin = 10; + + // The sum of total equity and securities on deposit. + optional double posted_margin = 11; +} + +// Collateral (margin details). +message Collateral +{ + // Currency code of margin and PP values (ISO 4217 based). + required string currency = 4; + + // Current total margin. + required double total_margin = 5; + + // Available account funds including balance, realized profit (or loss), collateral and credits. + // NOTE: OTE and MVO are not included, regardless of account risk parameters. + required double purchasing_power = 6; +} + +// Information about one of the found orders. +message OrderSearchResultRecord +{ + // Brokerage account number. + required string brokerage_account_number = 1; + + // Order ID. + required string order_id = 2; + + // Ticket number. + optional string ticket_number = 3; + + // Order side. + // The value is associated with OrderChain.Side enum. + required uint32 side = 4; + + // Order type. + // The value is associated with OrderChain.OrderType enum. + required uint32 type = 5; + + // Order limit price. + // Correct price format. + optional double limit_price = 6; + + // Order stop price. + // Correct price format. + optional double stop_price = 7; + + // Contract name. + required string contract_name = 8; + + // Time when order was submitted to execution system (UTC). + required sint64 submitted_utc_time = 9; + + // Order chain status. + // This field is associated with OrderChain.Status enum type. + required uint32 status = 10; + + // User name. + optional string user_name = 11; + + // Last name of customer to whom belongs login that placed the order. + optional string customer_last_name = 12; + + // Brokerage name. + required string brokerage_name = 13; + + // Route name. + required string route_name = 14; + + // Trade routing account identifier. + required sint32 account_id = 15; + + // Account name. + required string account_name = 16; + + // Native route name. + optional string native_route_name = 17; + + // Route client order ID. + required string route_client_order_id = 18; + + // Exchange name. + required string exchange_name = 19; + + // Chain order id. + optional string chain_order_id = 20; + + // Limit price of the order. + // Display price format. + optional sint64 display_limit_price = 21; + + // Stop price of the order. + // Display price format. + optional sint64 display_stop_price = 22; + + // [obsolete] Use size field instead. + optional uint32 obsolete_size = 23 [deprecated = true]; + + // Sales series number. + optional string sales_series_number = 24; + + // Sales series name. + optional string sales_series_name = 25; + + // Id of sales series. + // Use profile_sales_series_id instead. + optional string sales_series_id = 26; + + // Total positive size of the order. + optional cqg.Decimal size = 27; + + // Profile id of sales series. + optional string profile_sales_series_id = 28; + + // Order extended side. + // This field is associated with ExtendedSide enum type. + optional uint32 extended_side = 29; + + // Guid of batch request initiated this order request + optional string batch_request_guid = 30; + + // Order request state. + // This field is associated with OrderRequest.State enum type. + optional uint32 order_state = 31; +} + +// [obsolete] Account cluster. +message AccountCluster +{ + // Account cluster id. + // Omit the value during account cluster creation. + optional string id = 1; + + // Brokerage id the cluster points to. + optional string brokerage_id = 2; + + // Cluster name (max length = 256). + optional string name = 3; + + // True if the cluster is removed. + // Set the value to true during update to remove this account cluster. + optional bool is_removed = 4; +} + +// [obsolete] Account cluster price offsets per commodity and instrument type. +message AccountClusterPriceOffset +{ + // List of field ids to clear during update operation. + repeated uint32 cleared_fields = 7; + + // Commodity string id (aka Xbit). + optional string commodity_id = 1; + + // Trade routing system identifier of the instrument type. + optional sint32 instrument_type_id = 2; + + // Price offset in ticks. + optional sint32 price_offset_ticks = 3; + + // [erasable] Hedge order price offset in ticks. + optional sint32 hedge_offset_ticks = 4; + + // [erasable] List of execution instructions for hedge order. + // Each field value is associated with OrderChain.ExecInstruction enum type. + repeated uint32 hedge_exec_instruction = 5; + + // [erasable] Visible quantity of hedge iceberg order in percent. + // The parameter is applied for hedge order with ICEBERG execution instruction. + optional uint32 iceberg_visible_qty_percent = 6; +} + +// Represents available route. +message AvailableRoute +{ + // Route common information. + optional RouteInformation route_information = 1; + + // Route priority. + optional uint32 priority = 2; + + enum OmnibusSupportType + { + PROHIBITED = 1; + + ALLOWED = 2; + + REQUIRED = 3; + } + + // This filed is associated with OmnibusSupportType enum. + optional uint32 omnibus_support_type = 3; + + // Available omnibus accounts for the route. + repeated RouteOmnibusAccount omnibus_accounts = 4; +} + +// Represents omnibus account, configured on the route. +message RouteOmnibusAccount +{ + // Omnibus account id. + optional string account_id = 1; + + // Omnibus account name. + optional string account_name = 2; + + // Omnibus brokerage account name. + optional string brokerage_account_number = 3; + + // Omnibus account priority. + optional uint32 priority = 4; + + // Risk server instance id. + optional string risk_server_instance_id = 5; +} + +// Represents route common information. +message RouteInformation +{ + // Code number of the route. + optional string route_code = 1; + + // Route name. + optional string route_name = 2; + + // If set, synthetic strategies are allowed. + optional bool synthetic_strategies = 3; + + // List of available route attributes. + repeated AccountRouteAttribute attributes = 4; + + // [obsolete] If set, route has overlapped instruments. + optional bool obsolete_has_overlapped_instruments = 5 [deprecated = true]; + + // [immutable] If set, account requires authorization to use this route. + optional bool authorization_required = 6; + + // [immutable] Indicates whether this route supports synthetic orders. + optional bool allow_synthetic_order_types = 7; + + // List of available route algorithmic strategies allowed on particular route. + repeated RouteAlgoStrategy route_algo_strategies = 8; + + // [immutable] If set, account requires primary trade-routing login enabled to use this route. + // Only one route with enabled this flag can be enabled on account. + optional bool primary_login_required = 9; +} + +// Route algorithmic strategy. +message RouteAlgoStrategy +{ + // Algorithmic strategy identifier allowed on particular route. + optional string id = 1; + + // Algorithmic strategy name. + optional shared_1.Text name = 2; + + // Removed flag. + optional bool removed = 3; +} + +// Restore account. +message RestoreAccount +{ + // [required] Account id to restore. + optional string account_id = 1; +} + +// Account type overrides per exchange list. +message AccountTypeOverrideListRequest +{ + // [required] Account id to get type overrides. + optional string account_id = 1; +} + +// Update account type overrides list. +message UpdateAccountTypeOverrideList +{ + // [required] Account id to update type overrides. + optional string account_id = 1; + + // Overrides to add or change. + repeated AccountTypeOverride overrides_to_set = 2; + + // Overrides to remove from account. + // First - login id, second - exchange id. + repeated common_1.Tuple overrides_to_remove = 3; +} + +// Result of RestoreAccount. +message RestoreAccountResult +{ + // If message is received then operation was successfully. +} + +// Result of AccountTypeOverrideListRequest. +message AccountTypeOverrideListResult +{ + // Account type overrides. + repeated AccountTypeOverride overrides = 1; +} + +// Represents account type override per exchange. +// Exchange ID + trade routing login ID pair is unique. +message AccountTypeOverride +{ + // [required] Exchange identifier. + // LookupPropertyListRequest { property_type = common_1.CommonLookupPropertyType.EXCHANGE } + optional string exchange_id = 2; + + // Possible affected login. + // If not provided, all logins are affected. + optional string login_id = 3; + + // [required] Account type override. + // LookupPropertyListRequest { property_type = TradeRoutingLookupPropertyType.ACCOUNT_TYPE } + optional string type_id = 4; + + // [required] Account origin override. + // LookupPropertyListRequest { property_type = TradeRoutingLookupPropertyType.ACCOUNT_ORIGIN } + optional string origin_id = 5; +} + +// Result of UpdateAccountTypeOverrideList. +message UpdateAccountTypeOverrideListResult +{ + // If message is received then operation was successfully. +} + +// Update account user authorization list operation. +message UpdateAccountUserAuthorizationList +{ + // Links to add or modify. + // Authorization is added if it does not exist with this account and user id, it is updated otherwise. + repeated AccountUserLink links_to_set = 1; + + // Links to remove. First - account id [required], second - user id [required]. + repeated common_1.Tuple links_to_remove = 2; +} + +// Result of account user authorization list update. +message UpdateAccountUserAuthorizationListResult +{ + // If message is received then authorizations was updated successfully. +} + +// Remove account. +message RemoveAccount +{ + // [required] Account id to remove. + optional string account_id = 1; +} + +// Result of RemoveAccount. +message RemoveAccountResult +{ + // If message is received then operation was successfully. +} + +// Gets available to account Service Groups according to enabled routes. +message AccountAvailableServiceGroupListRequest +{ + // [required] Account id. + optional string account_id = 1; +} + +// Gets account's enabled Service Groups. +message AccountServiceGroupListRequest +{ + // [required] Account id. + optional string account_id = 1; +} + +// Updates list of account's enabled Service Groups. +message UpdateAccountServiceGroupList +{ + // [required] Account id. + optional string account_id = 1; + + // Service Groups to enable + repeated string service_group_ids_to_set = 2; + + // Service Groups to remove from account. + repeated string service_group_ids_to_remove = 3; +} + +// Result of AccountAvailableServiceGroupListRequest. +message AccountAvailableServiceGroupListResult +{ + // Currently available to account Service Group list. + repeated ServiceGroup service_groups = 1; +} + +// Represents Service Group entity. +message ServiceGroup +{ + // [immutable] Service Group's id. + optional string id = 1; + + // [immutable] Name. + optional string name = 2; + + // [immutable] Removed flag. + optional bool removed = 3; +} + +// Result of AccountServiceGroupListRequest. +message AccountServiceGroupListResult +{ + // Enabled Service Groups. + repeated string service_group_ids = 1; +} + +// Result of UpdateAccountServiceGroupList. +message UpdateAccountServiceGroupListResult +{ + // If message is received then operation was successfully. +} + +// Gets billable exchanges available to the current admin login. +message BillableExchangeListRequest +{ +} + +// Result of BillableExchangeListRequest. +message BillableExchangeListResult +{ + repeated BillableExchange billable_exchanges = 1; +} + +message BillableExchange +{ + // Billable Exchange's id. + optional string number = 1; + + // Name. + optional string name = 2; + + // Description. + optional string description = 3; + + // Service Groups authorization level (Amount Allowed per Exchange). + // This field is associated with ServiceGroupAuthorizationLevel enum. + optional uint32 service_group_authorization_level = 4; + + // Linked Service Groups. + repeated string service_group_ids = 5; +} + +message CreateAccountGroup +{ + optional AccountGroup new_account_group = 1; +} + +message CreateAccountGroupResult +{ + // Created account group id. + optional string new_account_group_id = 1; +} + +message UpdateAccountGroup +{ + // [required] Account group to update. + optional AccountGroup account_group = 1; + + // Sub-accounts to add/update. + repeated SubAccount sub_accounts_to_set = 2; + + // Sub-accounts to remove. + repeated string sub_account_ids_to_remove = 3; +} + +message RemoveAccountGroup +{ + // [required] Account group id to remove. + optional string account_group_id = 1; +} + +message DeleteAccountPositions +{ + // ID of the account with positions data to delete. + // Mutually exclusive with position_ids field. + optional string account_id = 1; + + // Specific position identifiers to delete. + // Mutually exclusive with account_id field. + repeated string position_ids = 2; +} + +message AccountTradingFeaturesRequest +{ + // [required] ID of the account. + optional string account_id = 1; +} + +message AccountTradingFeaturesResult +{ + repeated AccountTradingInterfaceElement account_trading_interface_elements = 1; +} + +message UpdateAccountTradingFeatures +{ + // [required] ID of the account. + optional string account_id = 1; + + repeated AccountTradingInterfaceElement trading_interface_elements_to_set = 2; + + repeated string trading_interface_element_ids_to_remove = 3; +} + +message AccountTradingInterfaceElement +{ + // [required-update] ID of the trading interface element. + // List of available Interface Elements with corresponding ID's + // can be obtained with cmsapi_1.TradingFeaturesRequest. + optional string id = 1; + + // Indicates if trading interface element is enabled for the account. + // Values: false - explicitly disabled. + // true - explicitly enabled. + optional bool enabled = 2; +} + +////------------------------------------------ +//// Enumerations + +// Types of trade routing related lookup properties. +enum TradeRoutingLookupPropertyType +{ + // Type of the account (e.g. 'Customer Account', 'House Account', etc.) + ACCOUNT_TYPE = 101; + + // MODES Account groups type. + MODES_ACCOUNT_GROUP = 102; + + // Time zones. + TIME_ZONE = 103; + + // Risk server instances. + RISK_SERVER_INSTANCE = 104; + + // Trade locations. + TRADE_LOCATION = 105; + + // Order classes. + ORDER_CLASS = 106; + + // Account origin ('Customer', 'firm', etc. ) + ACCOUNT_ORIGIN = 107; + + // Execution source codes that can be used for Account-Login link. + EXECUTION_SOURCE_CODE = 108; + + // CQG MiFID Algorithms. + CQG_MIFID_ALGORITHM = 109; + + // MiFID + FLEXIBLE_IDENTIFIER = 110; +} + +// Price limit mode enumeration. +enum PriceLimitMode +{ + // Trade price limit check is enforced only for orders subject to immediate execution. Check LMT only. + AGGRESSIVE_LMT = 1; + + // Trade price limit check is enforced only for orders subject to immediate execution. Check LMT and STP. + AGGRESSIVE_LMT_STP = 2; + + // Trade price limit check is enforced for all orders. Check LMT only. + ALL_LMT = 3; + + // Trade price limit check is enforced for all orders. Check LMT and STP. + ALL_LMT_STP = 4; +} + +// Limit mode. +enum LimitMode +{ + // Limit is inherited from a parent entity. + DEFAULT = 1; + + // Limit is not enforced. + UNLIMITED = 2; + + // Limit is enforced. + LIMITED = 3; +} + +enum ServiceGroupAuthorizationLevel +{ + // No additional authorization is required. Product enablement enables linked Service Groups. + NONE = 0; + + // Only one Service Group for the exchange is possible to enable at the same time. + // If nothing is enabled then there is no authorization to see/trade linked products. + ONE_REQUIRED = 1; + + // One or more Service Group can be enabled at the same time. + // If nothing is enabled then there is no authorization to see/trade linked products. + ANY_REQUIRED = 2; +} + +// List of possible extended sides. +enum ExtendedSide +{ + EXTENDED_SIDE_BUY = 1; + EXTENDED_SIDE_SELL = 2; + EXTENDED_SIDE_SELL_SHORT = 5; + EXTENDED_SIDE_SELL_SHORT_EXEMPT = 6; +} diff --git a/cqg-cms-api-proto/proto/common/decimal.proto b/cqg-cms-api-proto/proto/common/decimal.proto new file mode 100644 index 0000000..219e62c --- /dev/null +++ b/cqg-cms-api-proto/proto/common/decimal.proto @@ -0,0 +1,20 @@ +// Representation of a decimal number + +syntax = "proto2"; + +package cqg; + +option java_outer_classname = "DecimalProto"; + +// Number is represented as a decimal floating point significand (limited by 64 bits including sign) +// and 32-bit exponent. +// The value represented is significand * (10 ^ exponent) +message Decimal { + // Significand (aka mantissa) of the decimal. Signed. + // It can have trailing zeros (not normalized). + optional sint64 significand = 1 [default = 0]; + + // Exponent of the decimal. + optional sint32 exponent = 2 [default = 0]; +} + diff --git a/cqg-cms-api-proto/proto/common/shared_1.proto b/cqg-cms-api-proto/proto/common/shared_1.proto new file mode 100644 index 0000000..8e78c5a --- /dev/null +++ b/cqg-cms-api-proto/proto/common/shared_1.proto @@ -0,0 +1,395 @@ +// Entities shared between different protocols. +// +syntax = "proto2"; + +package shared_1; + +////------------------------------------------ +//// Entities + +// Text with a unique key. Possible text messages are listed in a separate document. +message Text +{ + // Message unique key. + optional string key = 1; + + // Message text. + optional string text = 2; + + // Optional message format string which is sent only if a message has parameters. + // Format is defined as a sample for localized clients to replace it with a translated version + // and compose a message using variable parameters. + // Format string sample: "The request is rejected because %1% limit of %2% per %3% seconds is exceeded" + optional string format = 3; + + // Optional list of format string parameters ordered according to the format string placeholders. + // E.g. parameters for the sample format string above could be: ["request rate", "1000", "10"]. + // Note: float numbers are always defined in decimal format with a dot separator like "23434.34" + // and date and time in extended ISO 8601 format as "2016-11-09 15:11:20.323" (time part is optional for + // dates, date part is optional for time only, seconds in time part also may not have fractional part). + // Client can convert these values to different formats if they need to. + repeated string param = 4; +} + + +////------------------------------------------ +//// Enumerations + +// Message for holding OrderStatus enum values as a name space. +message OrderStatus +{ + // Status of the order. + enum Status + { + // Original order is sent to execution system. + IN_TRANSIT = 1; + + // Order is rejected. + REJECTED = 2; + + // Order is acknowledged by execution system and perhaps partially filled. + WORKING = 3; + + // Order is expired. + EXPIRED = 4; + + // Cancel request is sent to execution system. + IN_CANCEL = 5; + + // Modify request is sent to execution system. + IN_MODIFY = 6; + + // Order is canceled. + CANCELLED = 7; + + // Order is completely filled by execution system. + FILLED = 8; + + // Order is waiting submission to execution system. + SUSPENDED = 9; + + // Order may be canceled because a disconnect occurred. + DISCONNECTED = 10; + + // Order will be placed at a specified time (waiting execution system to start accepting orders). + ACTIVEAT = 11; + + // Cross order is sent to exchange and waiting for approval from exchange and/or counter-parties. + APPROVE_REQUIRED = 12; + + // The exchange approved the cross order. + // Note that this approve relates only to the sides/participants specified in the order. + // Thus, it is not implied the exchange approved the other sides of the order (counter-parties). + APPROVED_BY_EXCHANGE = 13; + + // Cross order is rejected by one of its participants. + // Note that if a participant rejects its own side of the cross order, the counter-parties may not receive + // any reject messages if exchange does not support this notification. + APPROVE_REJECTED = 14; + + // Cross order is completely executed on exchange, this is the final state of the cross order unless any of its + // trades/legs is subsequently broken by the exchange. + MATCHED = 15; + + // Cross order/leg is executed on exchange, this is transit state until all transactions for trades/breaks are + // received. + PARTIALLY_MATCHED = 16; + + // Cross order was executed on exchange, but now all its trades/legs have been broken by the exchange. + TRADE_BROKEN = 17; + } +} + +// Message for holding TransactionStatus enum values as a name space. +message TransactionStatus +{ + // Status of the transaction. + enum Status + { + // Original order is sent to execution system. + IN_TRANSIT = 1; + + // Original order is rejected (exception). + REJECTED = 2; + + // Order is acknowledged by execution system. + ACK_PLACE = 3; + + // Order is expired (exception). + EXPIRED = 4; + + // Cancel request is sent to execution system. + IN_CANCEL = 5; + + // Cancel is acknowledged by execution system. + ACK_CANCEL = 6; + + // Cancel request is rejected (exception). + REJECT_CANCEL = 7; + + // Modify request is sent to execution system. + IN_MODIFY = 8; + + // Modify is acknowledged by execution system. + ACK_MODIFY = 9; + + // Modify request is rejected (exception). + REJECT_MODIFY = 10; + + // Fill event is received from execution system. + FILL = 11; + + // Order is suspended (parked). + SUSPEND = 12; + + // Referenced fill is corrected. + FILL_CORRECT = 13; + + // Referenced fill is canceled (exception). + FILL_CANCEL = 14; + + // Referenced fill is busted (exception). + FILL_BUST = 15; + + // Acknowledgment that order will activate at specified time. + ACTIVEAT = 16; + + // Order may be canceled because a disconnect occurred (exception). + DISCONNECT = 17; + + // Synthetic order was sent to the actual execution system. + SYNTHETIC_ACTIVATED = 18; + + // Order status and/ or attributes are updated. + UPDATE = 19; + + // Synthetic strategy execution failed, expect 'text_message' + // attribute with further details. The client may identify outright orders used + // when attempting to execute the synthetic strategy by finding orders in its + // book where OrderStatus.origin_order_id == OrderStatus.order_id. + SYNTHETIC_FAILED = 20; + + // Synthetic strategy order has at least one overfilled leg, 'synthetic_hang' attribute is populated. + SYNTHETIC_OVERFILL = 21; + + // Hanging quantity update for the synthetic strategy order. + SYNTHETIC_HANG = 22; + + // Cross order is in OrderStatus.APPROVE_REQUIRED and TransactionStatus.APPROVING state when it is + // acknowledged by exchange but waiting for approval from counter-parties. + // Note: if exchange does not support this status, APPROVED_BY_EXCHANGE status is sent instead. + APPROVING = 23; + + // Cross order is in OrderStatus.APPROVE_REQUIRED and TransactionStatus.APPROVE_REQUESTED state when + // it is waiting for approval from the client (i.e. from the side/participant that received this transaction). + APPROVE_REQUESTED = 24; + + // The exchange approved the cross order. + // Note that this approve relates only to the sides/participants specified in the order. + // Thus, it is not implied the exchange approved the other sides of the order (counter-parties). + APPROVED_BY_EXCHANGE = 25; + + // Cross order is rejected by one of its participants. + // Note that if a participant rejects its own side of the cross order, the counter-parties may not receive + // any reject messages if exchange does not support this notification. + REJECTED_BY_USER = 26; + + // Cross order is executed on exchange. + MATCHED = 27; + + // Cross order/leg have been broken by the exchange. + TRADE_BROKEN = 28; + + // Previously matched cross order/leg have been amended by the exchange. + TRADE_AMENDED = 29; + } +} + +////------------------------------------------ +//// Sign On messages + +// Initial message to obtain access. +message SignOnRequest +{ + required string access_key = 1; +} + +// Sign On result. +message SignOnResult +{ + enum ResultCode + { + /// success codes (0 - 100) + SUCCESS = 0; + + //// failure codes (100+) + // General failure. + FAILURE = 101; + } + + // Operation status. + // This field is associated with ResultCode enum. + required uint32 result_code = 1; + + // Operation details. + optional shared_1.Text details = 2; +} + +////------------------------------------------ +//// Entitlement messages + +// Request for a list of entitlements of the current user. +message EntitlementRequest +{ +} + +// Report with a list of entitlements of the current user. +message EntitlementReport +{ + // List of entitlements. + repeated Entitlement entitlement = 1; +} + +message Entitlement +{ + enum EntitlementType + { + // Feature entitlement. + // The code points to a feature number. + FEATURE = 8; + + // News entitlement. + // The code points to the enabled news feed. + NEWS = 10; + + // Dow Jones news entitlement + // The code points to DJ news feed. + DJNEWS = 26; + + // Studies. + STUDIES = 36; + + // Manage metadata on a security (prefix) level. + // The code points to a contributor id. + MANAGE_SECURITY_METADATA = 49; + + // Manage metadata on a contract level. + // The code points to a contributor id. + MANAGE_CONTRACT_METADATA = 50; + + // Manage OTC state. + // The code points to a group of OTC services. + OTC_MANAGE_TAILS = 51; + } + // This value is associated with EntitlementType enum. + // Ignore Entitlement entry if entitlement_type is not one of EntitlementType + required uint32 entitlement_type = 1; + + // The code that depends on the type. + required string entitlement_code = 2; + + // Deleted flag is used in updates when entity is removed. + optional bool deleted = 3; +} + +////------------------------------------------ +//// Notification destination entities. + +// Destination specification. +// Only one type of destination can be specified. +message Destination +{ + // Optional destination description. + optional string description = 1; + + // APN destination (for iOS devices). + optional ApplePushNotif apple_push_notif = 2; + + // GCM destination (for Android devices). + optional GooglePushNotif google_push_notif = 3; + + // Email destination. + optional EmailNotif email_notif = 4; + + // Notification to an email specified in trader's profile. + optional EmailFromProfileNotif profile_email_notif = 6; + + // SMS. + optional SmsNotif sms_notif = 5; + + // Sms notification to a phone number specified in trader's profile. + optional SmsToPhoneFromProfileNotif profile_sms_notif = 7; +} + +// Push notification for iOS devices. +message ApplePushNotif +{ + // iOS device token + required string device_token = 1; + + // APN application ID + required string app_id = 2; +} + +// Push notification for Android devices. +message GooglePushNotif +{ + // registration token for Android device and app + required string registration_token = 1; + + // GCN sender id + required string sender_id = 2; +} + +// Notification property (e.g. order related information for order event rule notifications). +message NotificationProperty +{ + // Property name. + required string property_name = 1; + + // Property value. + required string property_value = 2; +} + +// Email notification. +message EmailNotif +{ + // List of recipients to send email to. At least one entry must be present. + repeated string recipients = 1; +} + +// Notification to an email specified in trader's profile +// (to the first email in case there are multiple in the profile). +message EmailFromProfileNotif +{ +} + +// Sms notification. +message SmsNotif +{ + // Destination phone number. + required string phone_number = 1; +} + +// Sms notification to a phone number specified in trader's profile +// (to the first phone number in case there are multiple in the profile). +message SmsToPhoneFromProfileNotif +{ +} + + +////------------------------------------------ +//// Misc reusable messages + +// Named value that can be used for custom parameters or properties. +message NamedValue +{ + // Attribute name. + required string name = 1; + + // Attribute value. + optional string value = 2; + + // An optional "deleted" flag for update operations. + optional bool deleted = 3 [default = false]; +} diff --git a/cqg-cms-api-proto/proto/version.txt b/cqg-cms-api-proto/proto/version.txt new file mode 100644 index 0000000..65dba09 --- /dev/null +++ b/cqg-cms-api-proto/proto/version.txt @@ -0,0 +1 @@ +2.6.45000.18 diff --git a/cqg-cms-api-proto/src/Proto/CMS/ApiLimit1.hs b/cqg-cms-api-proto/src/Proto/CMS/ApiLimit1.hs new file mode 100644 index 0000000..aa6d215 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/ApiLimit1.hs @@ -0,0 +1,1193 @@ +{- This file was auto-generated from CMS/api_limit_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.ApiLimit1 ( + ApiLimitEntry(), ApiLimitEntryStatusCode(..), + ApiLimitEntryStatusCode(), ApiLimitRequest(), + ApiLimitRequestEntry(), ApiLimitResult(), ApiLimitType(..), + ApiLimitType() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.Common.Shared1 +{- | Fields : + + * 'Proto.CMS.ApiLimit1_Fields.limitType' @:: Lens' ApiLimitEntry Data.Word.Word32@ + * 'Proto.CMS.ApiLimit1_Fields.maybe'limitType' @:: Lens' ApiLimitEntry (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.ApiLimit1_Fields.entityName' @:: Lens' ApiLimitEntry Data.Text.Text@ + * 'Proto.CMS.ApiLimit1_Fields.maybe'entityName' @:: Lens' ApiLimitEntry (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.ApiLimit1_Fields.statusCode' @:: Lens' ApiLimitEntry Data.Word.Word32@ + * 'Proto.CMS.ApiLimit1_Fields.maybe'statusCode' @:: Lens' ApiLimitEntry (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.ApiLimit1_Fields.value' @:: Lens' ApiLimitEntry Data.Word.Word32@ + * 'Proto.CMS.ApiLimit1_Fields.maybe'value' @:: Lens' ApiLimitEntry (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.ApiLimit1_Fields.periodSec' @:: Lens' ApiLimitEntry Data.Word.Word32@ + * 'Proto.CMS.ApiLimit1_Fields.maybe'periodSec' @:: Lens' ApiLimitEntry (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.ApiLimit1_Fields.description' @:: Lens' ApiLimitEntry Proto.Common.Shared1.Text@ + * 'Proto.CMS.ApiLimit1_Fields.maybe'description' @:: Lens' ApiLimitEntry (Prelude.Maybe Proto.Common.Shared1.Text)@ -} +data ApiLimitEntry + = ApiLimitEntry'_constructor {_ApiLimitEntry'limitType :: !(Prelude.Maybe Data.Word.Word32), + _ApiLimitEntry'entityName :: !(Prelude.Maybe Data.Text.Text), + _ApiLimitEntry'statusCode :: !(Prelude.Maybe Data.Word.Word32), + _ApiLimitEntry'value :: !(Prelude.Maybe Data.Word.Word32), + _ApiLimitEntry'periodSec :: !(Prelude.Maybe Data.Word.Word32), + _ApiLimitEntry'description :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _ApiLimitEntry'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ApiLimitEntry where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ApiLimitEntry "limitType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'limitType + (\ x__ y__ -> x__ {_ApiLimitEntry'limitType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ApiLimitEntry "maybe'limitType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'limitType + (\ x__ y__ -> x__ {_ApiLimitEntry'limitType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ApiLimitEntry "entityName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'entityName + (\ x__ y__ -> x__ {_ApiLimitEntry'entityName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ApiLimitEntry "maybe'entityName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'entityName + (\ x__ y__ -> x__ {_ApiLimitEntry'entityName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ApiLimitEntry "statusCode" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'statusCode + (\ x__ y__ -> x__ {_ApiLimitEntry'statusCode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ApiLimitEntry "maybe'statusCode" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'statusCode + (\ x__ y__ -> x__ {_ApiLimitEntry'statusCode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ApiLimitEntry "value" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'value + (\ x__ y__ -> x__ {_ApiLimitEntry'value = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ApiLimitEntry "maybe'value" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'value + (\ x__ y__ -> x__ {_ApiLimitEntry'value = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ApiLimitEntry "periodSec" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'periodSec + (\ x__ y__ -> x__ {_ApiLimitEntry'periodSec = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ApiLimitEntry "maybe'periodSec" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'periodSec + (\ x__ y__ -> x__ {_ApiLimitEntry'periodSec = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ApiLimitEntry "description" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'description + (\ x__ y__ -> x__ {_ApiLimitEntry'description = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ApiLimitEntry "maybe'description" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitEntry'description + (\ x__ y__ -> x__ {_ApiLimitEntry'description = y__})) + Prelude.id +instance Data.ProtoLens.Message ApiLimitEntry where + messageName _ = Data.Text.pack "api_limit_1.ApiLimitEntry" + packedMessageDescriptor _ + = "\n\ + \\rApiLimitEntry\DC2\GS\n\ + \\n\ + \limit_type\CAN\SOH \SOH(\rR\tlimitType\DC2\US\n\ + \\ventity_name\CAN\STX \SOH(\tR\n\ + \entityName\DC2\US\n\ + \\vstatus_code\CAN\ETX \SOH(\rR\n\ + \statusCode\DC2\DC4\n\ + \\ENQvalue\CAN\EOT \SOH(\rR\ENQvalue\DC2\GS\n\ + \\n\ + \period_sec\CAN\ENQ \SOH(\rR\tperiodSec\DC20\n\ + \\vdescription\CAN\ACK \SOH(\v2\SO.shared_1.TextR\vdescription" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + limitType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "limit_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'limitType")) :: + Data.ProtoLens.FieldDescriptor ApiLimitEntry + entityName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entity_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'entityName")) :: + Data.ProtoLens.FieldDescriptor ApiLimitEntry + statusCode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "status_code" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'statusCode")) :: + Data.ProtoLens.FieldDescriptor ApiLimitEntry + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'value")) :: + Data.ProtoLens.FieldDescriptor ApiLimitEntry + periodSec__field_descriptor + = Data.ProtoLens.FieldDescriptor + "period_sec" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'periodSec")) :: + Data.ProtoLens.FieldDescriptor ApiLimitEntry + description__field_descriptor + = Data.ProtoLens.FieldDescriptor + "description" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'description")) :: + Data.ProtoLens.FieldDescriptor ApiLimitEntry + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, limitType__field_descriptor), + (Data.ProtoLens.Tag 2, entityName__field_descriptor), + (Data.ProtoLens.Tag 3, statusCode__field_descriptor), + (Data.ProtoLens.Tag 4, value__field_descriptor), + (Data.ProtoLens.Tag 5, periodSec__field_descriptor), + (Data.ProtoLens.Tag 6, description__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ApiLimitEntry'_unknownFields + (\ x__ y__ -> x__ {_ApiLimitEntry'_unknownFields = y__}) + defMessage + = ApiLimitEntry'_constructor + {_ApiLimitEntry'limitType = Prelude.Nothing, + _ApiLimitEntry'entityName = Prelude.Nothing, + _ApiLimitEntry'statusCode = Prelude.Nothing, + _ApiLimitEntry'value = Prelude.Nothing, + _ApiLimitEntry'periodSec = Prelude.Nothing, + _ApiLimitEntry'description = Prelude.Nothing, + _ApiLimitEntry'_unknownFields = []} + parseMessage + = let + loop :: + ApiLimitEntry -> Data.ProtoLens.Encoding.Bytes.Parser ApiLimitEntry + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "limit_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"limitType") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "entity_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"entityName") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "status_code" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"statusCode") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "value" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "period_sec" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"periodSec") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "description" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"description") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ApiLimitEntry" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'limitType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'entityName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'statusCode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'periodSec") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'description") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))) +instance Control.DeepSeq.NFData ApiLimitEntry where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ApiLimitEntry'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ApiLimitEntry'limitType x__) + (Control.DeepSeq.deepseq + (_ApiLimitEntry'entityName x__) + (Control.DeepSeq.deepseq + (_ApiLimitEntry'statusCode x__) + (Control.DeepSeq.deepseq + (_ApiLimitEntry'value x__) + (Control.DeepSeq.deepseq + (_ApiLimitEntry'periodSec x__) + (Control.DeepSeq.deepseq (_ApiLimitEntry'description x__) ())))))) +data ApiLimitEntryStatusCode + = API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED | + API_LIMIT_ENTRY_STATUS_CODE_SUCCESS | + API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum ApiLimitEntryStatusCode where + maybeToEnum 0 + = Prelude.Just API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED + maybeToEnum 1 = Prelude.Just API_LIMIT_ENTRY_STATUS_CODE_SUCCESS + maybeToEnum 2 = Prelude.Just API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND + maybeToEnum _ = Prelude.Nothing + showEnum API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED + = "API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED" + showEnum API_LIMIT_ENTRY_STATUS_CODE_SUCCESS + = "API_LIMIT_ENTRY_STATUS_CODE_SUCCESS" + showEnum API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND + = "API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND" + readEnum k + | (Prelude.==) k "API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED" + = Prelude.Just API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED + | (Prelude.==) k "API_LIMIT_ENTRY_STATUS_CODE_SUCCESS" + = Prelude.Just API_LIMIT_ENTRY_STATUS_CODE_SUCCESS + | (Prelude.==) k "API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND" + = Prelude.Just API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded ApiLimitEntryStatusCode where + minBound = API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED + maxBound = API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND +instance Prelude.Enum ApiLimitEntryStatusCode where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum ApiLimitEntryStatusCode: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED = 0 + fromEnum API_LIMIT_ENTRY_STATUS_CODE_SUCCESS = 1 + fromEnum API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND = 2 + succ API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND + = Prelude.error + "ApiLimitEntryStatusCode.succ: bad argument API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND. This value would be out of bounds." + succ API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED + = API_LIMIT_ENTRY_STATUS_CODE_SUCCESS + succ API_LIMIT_ENTRY_STATUS_CODE_SUCCESS + = API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND + pred API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED + = Prelude.error + "ApiLimitEntryStatusCode.pred: bad argument API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED. This value would be out of bounds." + pred API_LIMIT_ENTRY_STATUS_CODE_SUCCESS + = API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED + pred API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND + = API_LIMIT_ENTRY_STATUS_CODE_SUCCESS + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault ApiLimitEntryStatusCode where + fieldDefault = API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED +instance Control.DeepSeq.NFData ApiLimitEntryStatusCode where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.ApiLimit1_Fields.limits' @:: Lens' ApiLimitRequest [ApiLimitRequestEntry]@ + * 'Proto.CMS.ApiLimit1_Fields.vec'limits' @:: Lens' ApiLimitRequest (Data.Vector.Vector ApiLimitRequestEntry)@ -} +data ApiLimitRequest + = ApiLimitRequest'_constructor {_ApiLimitRequest'limits :: !(Data.Vector.Vector ApiLimitRequestEntry), + _ApiLimitRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ApiLimitRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ApiLimitRequest "limits" [ApiLimitRequestEntry] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitRequest'limits + (\ x__ y__ -> x__ {_ApiLimitRequest'limits = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ApiLimitRequest "vec'limits" (Data.Vector.Vector ApiLimitRequestEntry) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitRequest'limits + (\ x__ y__ -> x__ {_ApiLimitRequest'limits = y__})) + Prelude.id +instance Data.ProtoLens.Message ApiLimitRequest where + messageName _ = Data.Text.pack "api_limit_1.ApiLimitRequest" + packedMessageDescriptor _ + = "\n\ + \\SIApiLimitRequest\DC29\n\ + \\ACKlimits\CAN\SOH \ETX(\v2!.api_limit_1.ApiLimitRequestEntryR\ACKlimits" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + limits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ApiLimitRequestEntry) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"limits")) :: + Data.ProtoLens.FieldDescriptor ApiLimitRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, limits__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ApiLimitRequest'_unknownFields + (\ x__ y__ -> x__ {_ApiLimitRequest'_unknownFields = y__}) + defMessage + = ApiLimitRequest'_constructor + {_ApiLimitRequest'limits = Data.Vector.Generic.empty, + _ApiLimitRequest'_unknownFields = []} + parseMessage + = let + loop :: + ApiLimitRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ApiLimitRequestEntry + -> Data.ProtoLens.Encoding.Bytes.Parser ApiLimitRequest + loop x mutable'limits + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'limits <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'limits) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'limits") frozen'limits x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "limits" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'limits y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'limits + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'limits <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'limits) + "ApiLimitRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'limits") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData ApiLimitRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ApiLimitRequest'_unknownFields x__) + (Control.DeepSeq.deepseq (_ApiLimitRequest'limits x__) ()) +{- | Fields : + + * 'Proto.CMS.ApiLimit1_Fields.limitType' @:: Lens' ApiLimitRequestEntry Data.Word.Word32@ + * 'Proto.CMS.ApiLimit1_Fields.maybe'limitType' @:: Lens' ApiLimitRequestEntry (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.ApiLimit1_Fields.entityName' @:: Lens' ApiLimitRequestEntry Data.Text.Text@ + * 'Proto.CMS.ApiLimit1_Fields.maybe'entityName' @:: Lens' ApiLimitRequestEntry (Prelude.Maybe Data.Text.Text)@ -} +data ApiLimitRequestEntry + = ApiLimitRequestEntry'_constructor {_ApiLimitRequestEntry'limitType :: !(Prelude.Maybe Data.Word.Word32), + _ApiLimitRequestEntry'entityName :: !(Prelude.Maybe Data.Text.Text), + _ApiLimitRequestEntry'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ApiLimitRequestEntry where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ApiLimitRequestEntry "limitType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitRequestEntry'limitType + (\ x__ y__ -> x__ {_ApiLimitRequestEntry'limitType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ApiLimitRequestEntry "maybe'limitType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitRequestEntry'limitType + (\ x__ y__ -> x__ {_ApiLimitRequestEntry'limitType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ApiLimitRequestEntry "entityName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitRequestEntry'entityName + (\ x__ y__ -> x__ {_ApiLimitRequestEntry'entityName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ApiLimitRequestEntry "maybe'entityName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitRequestEntry'entityName + (\ x__ y__ -> x__ {_ApiLimitRequestEntry'entityName = y__})) + Prelude.id +instance Data.ProtoLens.Message ApiLimitRequestEntry where + messageName _ = Data.Text.pack "api_limit_1.ApiLimitRequestEntry" + packedMessageDescriptor _ + = "\n\ + \\DC4ApiLimitRequestEntry\DC2\GS\n\ + \\n\ + \limit_type\CAN\SOH \SOH(\rR\tlimitType\DC2\US\n\ + \\ventity_name\CAN\STX \SOH(\tR\n\ + \entityName" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + limitType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "limit_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'limitType")) :: + Data.ProtoLens.FieldDescriptor ApiLimitRequestEntry + entityName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entity_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'entityName")) :: + Data.ProtoLens.FieldDescriptor ApiLimitRequestEntry + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, limitType__field_descriptor), + (Data.ProtoLens.Tag 2, entityName__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ApiLimitRequestEntry'_unknownFields + (\ x__ y__ -> x__ {_ApiLimitRequestEntry'_unknownFields = y__}) + defMessage + = ApiLimitRequestEntry'_constructor + {_ApiLimitRequestEntry'limitType = Prelude.Nothing, + _ApiLimitRequestEntry'entityName = Prelude.Nothing, + _ApiLimitRequestEntry'_unknownFields = []} + parseMessage + = let + loop :: + ApiLimitRequestEntry + -> Data.ProtoLens.Encoding.Bytes.Parser ApiLimitRequestEntry + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "limit_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"limitType") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "entity_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"entityName") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ApiLimitRequestEntry" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'limitType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'entityName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData ApiLimitRequestEntry where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ApiLimitRequestEntry'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ApiLimitRequestEntry'limitType x__) + (Control.DeepSeq.deepseq + (_ApiLimitRequestEntry'entityName x__) ())) +{- | Fields : + + * 'Proto.CMS.ApiLimit1_Fields.limitEntries' @:: Lens' ApiLimitResult [ApiLimitEntry]@ + * 'Proto.CMS.ApiLimit1_Fields.vec'limitEntries' @:: Lens' ApiLimitResult (Data.Vector.Vector ApiLimitEntry)@ -} +data ApiLimitResult + = ApiLimitResult'_constructor {_ApiLimitResult'limitEntries :: !(Data.Vector.Vector ApiLimitEntry), + _ApiLimitResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ApiLimitResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ApiLimitResult "limitEntries" [ApiLimitEntry] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitResult'limitEntries + (\ x__ y__ -> x__ {_ApiLimitResult'limitEntries = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ApiLimitResult "vec'limitEntries" (Data.Vector.Vector ApiLimitEntry) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApiLimitResult'limitEntries + (\ x__ y__ -> x__ {_ApiLimitResult'limitEntries = y__})) + Prelude.id +instance Data.ProtoLens.Message ApiLimitResult where + messageName _ = Data.Text.pack "api_limit_1.ApiLimitResult" + packedMessageDescriptor _ + = "\n\ + \\SOApiLimitResult\DC2?\n\ + \\rlimit_entries\CAN\SOH \ETX(\v2\SUB.api_limit_1.ApiLimitEntryR\flimitEntries" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + limitEntries__field_descriptor + = Data.ProtoLens.FieldDescriptor + "limit_entries" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ApiLimitEntry) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"limitEntries")) :: + Data.ProtoLens.FieldDescriptor ApiLimitResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, limitEntries__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ApiLimitResult'_unknownFields + (\ x__ y__ -> x__ {_ApiLimitResult'_unknownFields = y__}) + defMessage + = ApiLimitResult'_constructor + {_ApiLimitResult'limitEntries = Data.Vector.Generic.empty, + _ApiLimitResult'_unknownFields = []} + parseMessage + = let + loop :: + ApiLimitResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ApiLimitEntry + -> Data.ProtoLens.Encoding.Bytes.Parser ApiLimitResult + loop x mutable'limitEntries + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'limitEntries <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'limitEntries) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'limitEntries") + frozen'limitEntries x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "limit_entries" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'limitEntries y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'limitEntries + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'limitEntries <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'limitEntries) + "ApiLimitResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'limitEntries") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData ApiLimitResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ApiLimitResult'_unknownFields x__) + (Control.DeepSeq.deepseq (_ApiLimitResult'limitEntries x__) ()) +data ApiLimitType + = API_LIMIT_TYPE_UNSPECIFIED | API_LIMIT_TYPE_CLIENT_MESSAGES_RATE + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum ApiLimitType where + maybeToEnum 0 = Prelude.Just API_LIMIT_TYPE_UNSPECIFIED + maybeToEnum 1 = Prelude.Just API_LIMIT_TYPE_CLIENT_MESSAGES_RATE + maybeToEnum _ = Prelude.Nothing + showEnum API_LIMIT_TYPE_UNSPECIFIED = "API_LIMIT_TYPE_UNSPECIFIED" + showEnum API_LIMIT_TYPE_CLIENT_MESSAGES_RATE + = "API_LIMIT_TYPE_CLIENT_MESSAGES_RATE" + readEnum k + | (Prelude.==) k "API_LIMIT_TYPE_UNSPECIFIED" + = Prelude.Just API_LIMIT_TYPE_UNSPECIFIED + | (Prelude.==) k "API_LIMIT_TYPE_CLIENT_MESSAGES_RATE" + = Prelude.Just API_LIMIT_TYPE_CLIENT_MESSAGES_RATE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded ApiLimitType where + minBound = API_LIMIT_TYPE_UNSPECIFIED + maxBound = API_LIMIT_TYPE_CLIENT_MESSAGES_RATE +instance Prelude.Enum ApiLimitType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum ApiLimitType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum API_LIMIT_TYPE_UNSPECIFIED = 0 + fromEnum API_LIMIT_TYPE_CLIENT_MESSAGES_RATE = 1 + succ API_LIMIT_TYPE_CLIENT_MESSAGES_RATE + = Prelude.error + "ApiLimitType.succ: bad argument API_LIMIT_TYPE_CLIENT_MESSAGES_RATE. This value would be out of bounds." + succ API_LIMIT_TYPE_UNSPECIFIED + = API_LIMIT_TYPE_CLIENT_MESSAGES_RATE + pred API_LIMIT_TYPE_UNSPECIFIED + = Prelude.error + "ApiLimitType.pred: bad argument API_LIMIT_TYPE_UNSPECIFIED. This value would be out of bounds." + pred API_LIMIT_TYPE_CLIENT_MESSAGES_RATE + = API_LIMIT_TYPE_UNSPECIFIED + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault ApiLimitType where + fieldDefault = API_LIMIT_TYPE_UNSPECIFIED +instance Control.DeepSeq.NFData ApiLimitType where + rnf x__ = Prelude.seq x__ () +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\NAKCMS/api_limit_1.proto\DC2\vapi_limit_1\SUB\NAKcommon/shared_1.proto\"V\n\ + \\DC4ApiLimitRequestEntry\DC2\GS\n\ + \\n\ + \limit_type\CAN\SOH \SOH(\rR\tlimitType\DC2\US\n\ + \\ventity_name\CAN\STX \SOH(\tR\n\ + \entityName\"L\n\ + \\SIApiLimitRequest\DC29\n\ + \\ACKlimits\CAN\SOH \ETX(\v2!.api_limit_1.ApiLimitRequestEntryR\ACKlimits\"\215\SOH\n\ + \\rApiLimitEntry\DC2\GS\n\ + \\n\ + \limit_type\CAN\SOH \SOH(\rR\tlimitType\DC2\US\n\ + \\ventity_name\CAN\STX \SOH(\tR\n\ + \entityName\DC2\US\n\ + \\vstatus_code\CAN\ETX \SOH(\rR\n\ + \statusCode\DC2\DC4\n\ + \\ENQvalue\CAN\EOT \SOH(\rR\ENQvalue\DC2\GS\n\ + \\n\ + \period_sec\CAN\ENQ \SOH(\rR\tperiodSec\DC20\n\ + \\vdescription\CAN\ACK \SOH(\v2\SO.shared_1.TextR\vdescription\"Q\n\ + \\SOApiLimitResult\DC2?\n\ + \\rlimit_entries\CAN\SOH \ETX(\v2\SUB.api_limit_1.ApiLimitEntryR\flimitEntries*W\n\ + \\fApiLimitType\DC2\RS\n\ + \\SUBAPI_LIMIT_TYPE_UNSPECIFIED\DLE\NUL\DC2'\n\ + \#API_LIMIT_TYPE_CLIENT_MESSAGES_RATE\DLE\SOH*\154\SOH\n\ + \\ETBApiLimitEntryStatusCode\DC2+\n\ + \'API_LIMIT_ENTRY_STATUS_CODE_UNSPECIFIED\DLE\NUL\DC2'\n\ + \#API_LIMIT_ENTRY_STATUS_CODE_SUCCESS\DLE\SOH\DC2)\n\ + \%API_LIMIT_ENTRY_STATUS_CODE_NOT_FOUND\DLE\STXJ\195\DC3\n\ + \\ACK\DC2\EOT\STX\NULT\SOH\n\ + \B\n\ + \\SOH\f\DC2\ETX\STX\NUL\DC228 CQG Customer Management System API user limit protocol\n\ + \\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\EOT\NUL\DC4\n\ + \\t\n\ + \\STX\ETX\NUL\DC2\ETX\ACK\NUL\US\n\ + \\FS\n\ + \\STX\ENQ\NUL\DC2\EOT\t\NUL\DC1\SOH\SUB\DLE Type of limit.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\ENQ\NUL\SOH\DC2\ETX\t\ENQ\DC1\n\ + \9\n\ + \\EOT\ENQ\NUL\STX\NUL\DC2\ETX\f\EOT#\SUB, Limit type unspecifed and must be ignored.\n\ + \\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\NUL\SOH\DC2\ETX\f\EOT\RS\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\NUL\STX\DC2\ETX\f!\"\n\ + \a\n\ + \\EOT\ENQ\NUL\STX\SOH\DC2\ETX\DLE\EOT,\SUBT Maximum number of messages per period.\n\ + \ Messages exceeding the limit are rejected.\n\ + \\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\SOH\SOH\DC2\ETX\DLE\EOT'\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\SOH\STX\DC2\ETX\DLE*+\n\ + \$\n\ + \\STX\EOT\NUL\DC2\EOT\DC4\NUL\US\SOH\SUB\CAN Request for API limit.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\DC4\b\FS\n\ + \\\\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX\CAN\EOT#\SUBO [required] Limit type.\n\ + \ This field is associated with ApiLimitType enum type.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX\CAN\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\CAN\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\CAN\DC4\RS\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\CAN!\"\n\ + \\158\STX\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX\RS\EOT$\SUB\144\STX Name of entity to request limit for. Set of possible values depends on limit_type:\n\ + \ - API_LIMIT_CLIENT_MESSAGES_RATE: Full name of a client message (e.g. information_request.user_info_request).\n\ + \\n\ + \ If not set, then all configured limits of requested type will be returned.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX\RS\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX\RS\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\RS\DC4\US\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\RS\"#\n\ + \%\n\ + \\STX\EOT\SOH\DC2\EOT\"\NUL'\SOH\SUB\EM Request for API limits.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX\"\b\ETB\n\ + \]\n\ + \\EOT\EOT\SOH\STX\NUL\DC2\ETX&\EOT-\SUBP Limits to request.\n\ + \ If empty, all configured types of limits will be returned.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\EOT\DC2\ETX&\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ACK\DC2\ETX&\r!\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX&\"(\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX&+,\n\ + \6\n\ + \\STX\ENQ\SOH\DC2\EOT*\NUL4\SOH\SUB* Status of limit entry in result message.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\ENQ\SOH\SOH\DC2\ETX*\ENQ\FS\n\ + \7\n\ + \\EOT\ENQ\SOH\STX\NUL\DC2\ETX-\EOT0\SUB* Entry not specified and must be ignored.\n\ + \\n\ + \\f\n\ + \\ENQ\ENQ\SOH\STX\NUL\SOH\DC2\ETX-\EOT+\n\ + \\f\n\ + \\ENQ\ENQ\SOH\STX\NUL\STX\DC2\ETX-./\n\ + \\"\n\ + \\EOT\ENQ\SOH\STX\SOH\DC2\ETX0\EOT,\SUB\NAK Value is populated.\n\ + \\n\ + \\f\n\ + \\ENQ\ENQ\SOH\STX\SOH\SOH\DC2\ETX0\EOT'\n\ + \\f\n\ + \\ENQ\ENQ\SOH\STX\SOH\STX\DC2\ETX0*+\n\ + \(\n\ + \\EOT\ENQ\SOH\STX\STX\DC2\ETX3\EOT.\SUB\ESC Limit type was not found.\n\ + \\n\ + \\f\n\ + \\ENQ\ENQ\SOH\STX\STX\SOH\DC2\ETX3\EOT)\n\ + \\f\n\ + \\ENQ\ENQ\SOH\STX\STX\STX\DC2\ETX3,-\n\ + \P\n\ + \\STX\EOT\STX\DC2\EOT7\NULM\SOH\SUBD Information about a limit set for current session of CMS API user.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\STX\SOH\DC2\ETX7\b\NAK\n\ + \Q\n\ + \\EOT\EOT\STX\STX\NUL\DC2\ETX;\EOT#\SUBD Limit type.\n\ + \ This field is associated with ApiLimitType enum type.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\EOT\DC2\ETX;\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETX;\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX;\DC4\RS\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX;!\"\n\ + \\199\SOH\n\ + \\EOT\EOT\STX\STX\SOH\DC2\ETX?\EOT$\SUB\185\SOH Name of entity this limit relates to. For more details see entity_name in ApiLimitRequestEntry.\n\ + \ If not set, then this will be a default limit for all entities of the same limit type.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\EOT\DC2\ETX?\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ENQ\DC2\ETX?\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETX?\DC4\US\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETX?\"#\n\ + \v\n\ + \\EOT\EOT\STX\STX\STX\DC2\ETXC\EOT$\SUBi Result status of the requested limit.\n\ + \ This field is associated with ApiLimitEntryStatusCode enum type.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\EOT\DC2\ETXC\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ENQ\DC2\ETXC\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\SOH\DC2\ETXC\DC4\US\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ETX\DC2\ETXC\"#\n\ + \\ESC\n\ + \\EOT\EOT\STX\STX\ETX\DC2\ETXF\EOT\RS\SUB\SO Limit value.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\EOT\DC2\ETXF\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ENQ\DC2\ETXF\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\SOH\DC2\ETXF\DC4\EM\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ETX\DC2\ETXF\FS\GS\n\ + \E\n\ + \\EOT\EOT\STX\STX\EOT\DC2\ETXI\EOT#\SUB8 Populated if the limit is a rate = value / period_sec.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\EOT\DC2\ETXI\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\ENQ\DC2\ETXI\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\SOH\DC2\ETXI\DC4\RS\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\ETX\DC2\ETXI!\"\n\ + \!\n\ + \\EOT\EOT\STX\STX\ENQ\DC2\ETXL\EOT+\SUB\DC4 Limit description.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ENQ\EOT\DC2\ETXL\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ENQ\ACK\DC2\ETXL\r\SUB\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ENQ\SOH\DC2\ETXL\ESC&\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ENQ\ETX\DC2\ETXL)*\n\ + \(\n\ + \\STX\EOT\ETX\DC2\EOTP\NULT\SOH\SUB\FS Result of ApiLimitRequest.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\ETX\SOH\DC2\ETXP\b\SYN\n\ + \\RS\n\ + \\EOT\EOT\ETX\STX\NUL\DC2\ETXS\EOT-\SUB\DC1 Output entries.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\EOT\DC2\ETXS\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ACK\DC2\ETXS\r\SUB\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETXS\ESC(\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETXS+," \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/ApiLimit1_Fields.hs b/cqg-cms-api-proto/src/Proto/CMS/ApiLimit1_Fields.hs new file mode 100644 index 0000000..ac96b71 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/ApiLimit1_Fields.hs @@ -0,0 +1,124 @@ +{- This file was auto-generated from CMS/api_limit_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.ApiLimit1_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.Common.Shared1 +description :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "description" a) => + Lens.Family2.LensLike' f s a +description = Data.ProtoLens.Field.field @"description" +entityName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entityName" a) => + Lens.Family2.LensLike' f s a +entityName = Data.ProtoLens.Field.field @"entityName" +limitEntries :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "limitEntries" a) => + Lens.Family2.LensLike' f s a +limitEntries = Data.ProtoLens.Field.field @"limitEntries" +limitType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "limitType" a) => + Lens.Family2.LensLike' f s a +limitType = Data.ProtoLens.Field.field @"limitType" +limits :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "limits" a) => + Lens.Family2.LensLike' f s a +limits = Data.ProtoLens.Field.field @"limits" +maybe'description :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'description" a) => + Lens.Family2.LensLike' f s a +maybe'description = Data.ProtoLens.Field.field @"maybe'description" +maybe'entityName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'entityName" a) => + Lens.Family2.LensLike' f s a +maybe'entityName = Data.ProtoLens.Field.field @"maybe'entityName" +maybe'limitType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'limitType" a) => + Lens.Family2.LensLike' f s a +maybe'limitType = Data.ProtoLens.Field.field @"maybe'limitType" +maybe'periodSec :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'periodSec" a) => + Lens.Family2.LensLike' f s a +maybe'periodSec = Data.ProtoLens.Field.field @"maybe'periodSec" +maybe'statusCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'statusCode" a) => + Lens.Family2.LensLike' f s a +maybe'statusCode = Data.ProtoLens.Field.field @"maybe'statusCode" +maybe'value :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'value" a) => + Lens.Family2.LensLike' f s a +maybe'value = Data.ProtoLens.Field.field @"maybe'value" +periodSec :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "periodSec" a) => + Lens.Family2.LensLike' f s a +periodSec = Data.ProtoLens.Field.field @"periodSec" +statusCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "statusCode" a) => + Lens.Family2.LensLike' f s a +statusCode = Data.ProtoLens.Field.field @"statusCode" +value :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "value" a) => + Lens.Family2.LensLike' f s a +value = Data.ProtoLens.Field.field @"value" +vec'limitEntries :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'limitEntries" a) => + Lens.Family2.LensLike' f s a +vec'limitEntries = Data.ProtoLens.Field.field @"vec'limitEntries" +vec'limits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'limits" a) => + Lens.Family2.LensLike' f s a +vec'limits = Data.ProtoLens.Field.field @"vec'limits" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Cmsapi1.hs b/cqg-cms-api-proto/src/Proto/CMS/Cmsapi1.hs new file mode 100644 index 0000000..072ea17 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Cmsapi1.hs @@ -0,0 +1,16975 @@ +{- This file was auto-generated from CMS/cmsapi_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Cmsapi1 ( + AuthPartner(), AuthPartnerListRequest(), AuthPartnerListResult(), + CancelDeferredRequest(), CancelDeferredRequestResult(), + ClientMessage(), CreateProfile(), CreateProfileResult(), + GenerateServiceSecurityToken(), + GenerateServiceSecurityTokenResult(), GetUniqueUsernameRequest(), + InformationRequest(), InformationResult(), LinkLoginToProfile(), + LinkLoginToProfileResult(), OperationRequest(), OperationResult(), + Ping(), Pong(), ProfileRequest(), ProfileSearchRequest(), + ProfileSearchRequest'SearchCriteria(..), + ProfileSearchRequest'SearchCriteria(), ProfileSearchResultRecord(), + ProtocolVersion(..), ProtocolVersion(), RemoveProfile(), + RemoveProfileResult(), RestoreProfile(), RestoreProfileResult(), + SearchRequest(), SearchResult(), SendCredentialResetEmail(), + SendCredentialResetEmailResult(), SendWelcomeEmail(), + SendWelcomeEmailResult(), ServerMessage(), TerminateLoginSession(), + TerminateLoginSessionResult(), UniqueUsernameResult(), + UpdateProfile(), UpdateProfileResult() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.Common1 +import qualified Proto.CMS.Location1 +import qualified Proto.CMS.LogEvent1 +import qualified Proto.CMS.Login1 +import qualified Proto.CMS.Metadata1 +import qualified Proto.CMS.SessionContext1 +import qualified Proto.CMS.Traderouting1 +import qualified Proto.Common.Shared1 +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.id' @:: Lens' AuthPartner Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'id' @:: Lens' AuthPartner (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.displayName' @:: Lens' AuthPartner Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'displayName' @:: Lens' AuthPartner (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.brokerageId' @:: Lens' AuthPartner [Data.Text.Text]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'brokerageId' @:: Lens' AuthPartner (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.logoutEndpointUri' @:: Lens' AuthPartner Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'logoutEndpointUri' @:: Lens' AuthPartner (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.logoutEndpointParameters' @:: Lens' AuthPartner Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'logoutEndpointParameters' @:: Lens' AuthPartner (Prelude.Maybe Data.Text.Text)@ -} +data AuthPartner + = AuthPartner'_constructor {_AuthPartner'id :: !(Prelude.Maybe Data.Text.Text), + _AuthPartner'displayName :: !(Prelude.Maybe Data.Text.Text), + _AuthPartner'brokerageId :: !(Data.Vector.Vector Data.Text.Text), + _AuthPartner'logoutEndpointUri :: !(Prelude.Maybe Data.Text.Text), + _AuthPartner'logoutEndpointParameters :: !(Prelude.Maybe Data.Text.Text), + _AuthPartner'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AuthPartner where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AuthPartner "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartner'id (\ x__ y__ -> x__ {_AuthPartner'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AuthPartner "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartner'id (\ x__ y__ -> x__ {_AuthPartner'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AuthPartner "displayName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartner'displayName + (\ x__ y__ -> x__ {_AuthPartner'displayName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AuthPartner "maybe'displayName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartner'displayName + (\ x__ y__ -> x__ {_AuthPartner'displayName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AuthPartner "brokerageId" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartner'brokerageId + (\ x__ y__ -> x__ {_AuthPartner'brokerageId = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AuthPartner "vec'brokerageId" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartner'brokerageId + (\ x__ y__ -> x__ {_AuthPartner'brokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AuthPartner "logoutEndpointUri" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartner'logoutEndpointUri + (\ x__ y__ -> x__ {_AuthPartner'logoutEndpointUri = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AuthPartner "maybe'logoutEndpointUri" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartner'logoutEndpointUri + (\ x__ y__ -> x__ {_AuthPartner'logoutEndpointUri = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AuthPartner "logoutEndpointParameters" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartner'logoutEndpointParameters + (\ x__ y__ -> x__ {_AuthPartner'logoutEndpointParameters = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AuthPartner "maybe'logoutEndpointParameters" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartner'logoutEndpointParameters + (\ x__ y__ -> x__ {_AuthPartner'logoutEndpointParameters = y__})) + Prelude.id +instance Data.ProtoLens.Message AuthPartner where + messageName _ = Data.Text.pack "cmsapi_1.AuthPartner" + packedMessageDescriptor _ + = "\n\ + \\vAuthPartner\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2!\n\ + \\fdisplay_name\CAN\STX \SOH(\tR\vdisplayName\DC2!\n\ + \\fbrokerage_id\CAN\ETX \ETX(\tR\vbrokerageId\DC2.\n\ + \\DC3logout_endpoint_uri\CAN\EOT \SOH(\tR\DC1logoutEndpointUri\DC2<\n\ + \\SUBlogout_endpoint_parameters\CAN\ENQ \SOH(\tR\CANlogoutEndpointParameters" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor AuthPartner + displayName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayName")) :: + Data.ProtoLens.FieldDescriptor AuthPartner + brokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"brokerageId")) :: + Data.ProtoLens.FieldDescriptor AuthPartner + logoutEndpointUri__field_descriptor + = Data.ProtoLens.FieldDescriptor + "logout_endpoint_uri" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'logoutEndpointUri")) :: + Data.ProtoLens.FieldDescriptor AuthPartner + logoutEndpointParameters__field_descriptor + = Data.ProtoLens.FieldDescriptor + "logout_endpoint_parameters" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'logoutEndpointParameters")) :: + Data.ProtoLens.FieldDescriptor AuthPartner + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, displayName__field_descriptor), + (Data.ProtoLens.Tag 3, brokerageId__field_descriptor), + (Data.ProtoLens.Tag 4, logoutEndpointUri__field_descriptor), + (Data.ProtoLens.Tag 5, logoutEndpointParameters__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AuthPartner'_unknownFields + (\ x__ y__ -> x__ {_AuthPartner'_unknownFields = y__}) + defMessage + = AuthPartner'_constructor + {_AuthPartner'id = Prelude.Nothing, + _AuthPartner'displayName = Prelude.Nothing, + _AuthPartner'brokerageId = Data.Vector.Generic.empty, + _AuthPartner'logoutEndpointUri = Prelude.Nothing, + _AuthPartner'logoutEndpointParameters = Prelude.Nothing, + _AuthPartner'_unknownFields = []} + parseMessage + = let + loop :: + AuthPartner + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser AuthPartner + loop x mutable'brokerageId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'brokerageId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'brokerageId) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'brokerageId") frozen'brokerageId + x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + mutable'brokerageId + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "display_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"displayName") y x) + mutable'brokerageId + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_id" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'brokerageId y) + loop x v + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "logout_endpoint_uri" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"logoutEndpointUri") y x) + mutable'brokerageId + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "logout_endpoint_parameters" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"logoutEndpointParameters") y x) + mutable'brokerageId + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'brokerageId + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'brokerageId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'brokerageId) + "AuthPartner" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'displayName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'brokerageId") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'logoutEndpointUri") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'logoutEndpointParameters") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData AuthPartner where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AuthPartner'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AuthPartner'id x__) + (Control.DeepSeq.deepseq + (_AuthPartner'displayName x__) + (Control.DeepSeq.deepseq + (_AuthPartner'brokerageId x__) + (Control.DeepSeq.deepseq + (_AuthPartner'logoutEndpointUri x__) + (Control.DeepSeq.deepseq + (_AuthPartner'logoutEndpointParameters x__) ()))))) +{- | Fields : + -} +data AuthPartnerListRequest + = AuthPartnerListRequest'_constructor {_AuthPartnerListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AuthPartnerListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message AuthPartnerListRequest where + messageName _ = Data.Text.pack "cmsapi_1.AuthPartnerListRequest" + packedMessageDescriptor _ + = "\n\ + \\SYNAuthPartnerListRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _AuthPartnerListRequest'_unknownFields + (\ x__ y__ -> x__ {_AuthPartnerListRequest'_unknownFields = y__}) + defMessage + = AuthPartnerListRequest'_constructor + {_AuthPartnerListRequest'_unknownFields = []} + parseMessage + = let + loop :: + AuthPartnerListRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AuthPartnerListRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AuthPartnerListRequest" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData AuthPartnerListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AuthPartnerListRequest'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.authPartner' @:: Lens' AuthPartnerListResult [AuthPartner]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'authPartner' @:: Lens' AuthPartnerListResult (Data.Vector.Vector AuthPartner)@ -} +data AuthPartnerListResult + = AuthPartnerListResult'_constructor {_AuthPartnerListResult'authPartner :: !(Data.Vector.Vector AuthPartner), + _AuthPartnerListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AuthPartnerListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AuthPartnerListResult "authPartner" [AuthPartner] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartnerListResult'authPartner + (\ x__ y__ -> x__ {_AuthPartnerListResult'authPartner = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AuthPartnerListResult "vec'authPartner" (Data.Vector.Vector AuthPartner) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AuthPartnerListResult'authPartner + (\ x__ y__ -> x__ {_AuthPartnerListResult'authPartner = y__})) + Prelude.id +instance Data.ProtoLens.Message AuthPartnerListResult where + messageName _ = Data.Text.pack "cmsapi_1.AuthPartnerListResult" + packedMessageDescriptor _ + = "\n\ + \\NAKAuthPartnerListResult\DC28\n\ + \\fauth_partner\CAN\SOH \ETX(\v2\NAK.cmsapi_1.AuthPartnerR\vauthPartner" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + authPartner__field_descriptor + = Data.ProtoLens.FieldDescriptor + "auth_partner" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AuthPartner) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"authPartner")) :: + Data.ProtoLens.FieldDescriptor AuthPartnerListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, authPartner__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AuthPartnerListResult'_unknownFields + (\ x__ y__ -> x__ {_AuthPartnerListResult'_unknownFields = y__}) + defMessage + = AuthPartnerListResult'_constructor + {_AuthPartnerListResult'authPartner = Data.Vector.Generic.empty, + _AuthPartnerListResult'_unknownFields = []} + parseMessage + = let + loop :: + AuthPartnerListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AuthPartner + -> Data.ProtoLens.Encoding.Bytes.Parser AuthPartnerListResult + loop x mutable'authPartner + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'authPartner <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'authPartner) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'authPartner") frozen'authPartner + x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "auth_partner" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'authPartner y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'authPartner + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'authPartner <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'authPartner) + "AuthPartnerListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'authPartner") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AuthPartnerListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AuthPartnerListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AuthPartnerListResult'authPartner x__) ()) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.id' @:: Lens' CancelDeferredRequest Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'id' @:: Lens' CancelDeferredRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Cmsapi1_Fields.trackingNumber' @:: Lens' CancelDeferredRequest Data.Word.Word64@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'trackingNumber' @:: Lens' CancelDeferredRequest (Prelude.Maybe Data.Word.Word64)@ -} +data CancelDeferredRequest + = CancelDeferredRequest'_constructor {_CancelDeferredRequest'id :: !(Prelude.Maybe Data.Word.Word32), + _CancelDeferredRequest'trackingNumber :: !(Prelude.Maybe Data.Word.Word64), + _CancelDeferredRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CancelDeferredRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CancelDeferredRequest "id" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelDeferredRequest'id + (\ x__ y__ -> x__ {_CancelDeferredRequest'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelDeferredRequest "maybe'id" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelDeferredRequest'id + (\ x__ y__ -> x__ {_CancelDeferredRequest'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelDeferredRequest "trackingNumber" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelDeferredRequest'trackingNumber + (\ x__ y__ -> x__ {_CancelDeferredRequest'trackingNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelDeferredRequest "maybe'trackingNumber" (Prelude.Maybe Data.Word.Word64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelDeferredRequest'trackingNumber + (\ x__ y__ -> x__ {_CancelDeferredRequest'trackingNumber = y__})) + Prelude.id +instance Data.ProtoLens.Message CancelDeferredRequest where + messageName _ = Data.Text.pack "cmsapi_1.CancelDeferredRequest" + packedMessageDescriptor _ + = "\n\ + \\NAKCancelDeferredRequest\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\rR\STXid\DC2'\n\ + \\SItracking_number\CAN\STX \SOH(\EOTR\SOtrackingNumber" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor CancelDeferredRequest + trackingNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "tracking_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'trackingNumber")) :: + Data.ProtoLens.FieldDescriptor CancelDeferredRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, trackingNumber__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CancelDeferredRequest'_unknownFields + (\ x__ y__ -> x__ {_CancelDeferredRequest'_unknownFields = y__}) + defMessage + = CancelDeferredRequest'_constructor + {_CancelDeferredRequest'id = Prelude.Nothing, + _CancelDeferredRequest'trackingNumber = Prelude.Nothing, + _CancelDeferredRequest'_unknownFields = []} + parseMessage + = let + loop :: + CancelDeferredRequest + -> Data.ProtoLens.Encoding.Bytes.Parser CancelDeferredRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "tracking_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"trackingNumber") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CancelDeferredRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'trackingNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData CancelDeferredRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CancelDeferredRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CancelDeferredRequest'id x__) + (Control.DeepSeq.deepseq + (_CancelDeferredRequest'trackingNumber x__) ())) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.requestId' @:: Lens' CancelDeferredRequestResult Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'requestId' @:: Lens' CancelDeferredRequestResult (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Cmsapi1_Fields.operationStatus' @:: Lens' CancelDeferredRequestResult Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'operationStatus' @:: Lens' CancelDeferredRequestResult (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Cmsapi1_Fields.errorMessage' @:: Lens' CancelDeferredRequestResult Proto.Common.Shared1.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'errorMessage' @:: Lens' CancelDeferredRequestResult (Prelude.Maybe Proto.Common.Shared1.Text)@ -} +data CancelDeferredRequestResult + = CancelDeferredRequestResult'_constructor {_CancelDeferredRequestResult'requestId :: !(Prelude.Maybe Data.Word.Word32), + _CancelDeferredRequestResult'operationStatus :: !(Prelude.Maybe Data.Word.Word32), + _CancelDeferredRequestResult'errorMessage :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _CancelDeferredRequestResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CancelDeferredRequestResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CancelDeferredRequestResult "requestId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelDeferredRequestResult'requestId + (\ x__ y__ -> x__ {_CancelDeferredRequestResult'requestId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelDeferredRequestResult "maybe'requestId" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelDeferredRequestResult'requestId + (\ x__ y__ -> x__ {_CancelDeferredRequestResult'requestId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelDeferredRequestResult "operationStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelDeferredRequestResult'operationStatus + (\ x__ y__ + -> x__ {_CancelDeferredRequestResult'operationStatus = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelDeferredRequestResult "maybe'operationStatus" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelDeferredRequestResult'operationStatus + (\ x__ y__ + -> x__ {_CancelDeferredRequestResult'operationStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelDeferredRequestResult "errorMessage" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelDeferredRequestResult'errorMessage + (\ x__ y__ + -> x__ {_CancelDeferredRequestResult'errorMessage = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CancelDeferredRequestResult "maybe'errorMessage" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelDeferredRequestResult'errorMessage + (\ x__ y__ + -> x__ {_CancelDeferredRequestResult'errorMessage = y__})) + Prelude.id +instance Data.ProtoLens.Message CancelDeferredRequestResult where + messageName _ + = Data.Text.pack "cmsapi_1.CancelDeferredRequestResult" + packedMessageDescriptor _ + = "\n\ + \\ESCCancelDeferredRequestResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \SOH(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \SOH(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\ETX \SOH(\v2\SO.shared_1.TextR\ferrorMessage" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + requestId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "request_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'requestId")) :: + Data.ProtoLens.FieldDescriptor CancelDeferredRequestResult + operationStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'operationStatus")) :: + Data.ProtoLens.FieldDescriptor CancelDeferredRequestResult + errorMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "error_message" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'errorMessage")) :: + Data.ProtoLens.FieldDescriptor CancelDeferredRequestResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, requestId__field_descriptor), + (Data.ProtoLens.Tag 2, operationStatus__field_descriptor), + (Data.ProtoLens.Tag 3, errorMessage__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CancelDeferredRequestResult'_unknownFields + (\ x__ y__ + -> x__ {_CancelDeferredRequestResult'_unknownFields = y__}) + defMessage + = CancelDeferredRequestResult'_constructor + {_CancelDeferredRequestResult'requestId = Prelude.Nothing, + _CancelDeferredRequestResult'operationStatus = Prelude.Nothing, + _CancelDeferredRequestResult'errorMessage = Prelude.Nothing, + _CancelDeferredRequestResult'_unknownFields = []} + parseMessage + = let + loop :: + CancelDeferredRequestResult + -> Data.ProtoLens.Encoding.Bytes.Parser CancelDeferredRequestResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "request_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationStatus") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "error_message" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"errorMessage") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CancelDeferredRequestResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'requestId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'operationStatus") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'errorMessage") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData CancelDeferredRequestResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CancelDeferredRequestResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CancelDeferredRequestResult'requestId x__) + (Control.DeepSeq.deepseq + (_CancelDeferredRequestResult'operationStatus x__) + (Control.DeepSeq.deepseq + (_CancelDeferredRequestResult'errorMessage x__) ()))) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.logon' @:: Lens' ClientMessage Proto.CMS.Common1.Logon@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'logon' @:: Lens' ClientMessage (Prelude.Maybe Proto.CMS.Common1.Logon)@ + * 'Proto.CMS.Cmsapi1_Fields.logoff' @:: Lens' ClientMessage Proto.CMS.Common1.Logoff@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'logoff' @:: Lens' ClientMessage (Prelude.Maybe Proto.CMS.Common1.Logoff)@ + * 'Proto.CMS.Cmsapi1_Fields.restoreOrJoinSession' @:: Lens' ClientMessage Proto.CMS.Common1.RestoreOrJoinSession@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'restoreOrJoinSession' @:: Lens' ClientMessage (Prelude.Maybe Proto.CMS.Common1.RestoreOrJoinSession)@ + * 'Proto.CMS.Cmsapi1_Fields.informationRequest' @:: Lens' ClientMessage [InformationRequest]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'informationRequest' @:: Lens' ClientMessage (Data.Vector.Vector InformationRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.searchRequest' @:: Lens' ClientMessage [SearchRequest]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'searchRequest' @:: Lens' ClientMessage (Data.Vector.Vector SearchRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.operationRequest' @:: Lens' ClientMessage [OperationRequest]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'operationRequest' @:: Lens' ClientMessage (Data.Vector.Vector OperationRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.tradeRoutingRequest' @:: Lens' ClientMessage [Proto.CMS.Traderouting1.TradeRoutingRequest]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'tradeRoutingRequest' @:: Lens' ClientMessage (Data.Vector.Vector Proto.CMS.Traderouting1.TradeRoutingRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.ping' @:: Lens' ClientMessage Ping@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'ping' @:: Lens' ClientMessage (Prelude.Maybe Ping)@ + * 'Proto.CMS.Cmsapi1_Fields.pong' @:: Lens' ClientMessage Pong@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'pong' @:: Lens' ClientMessage (Prelude.Maybe Pong)@ + * 'Proto.CMS.Cmsapi1_Fields.cancelDeferredRequest' @:: Lens' ClientMessage CancelDeferredRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'cancelDeferredRequest' @:: Lens' ClientMessage (Prelude.Maybe CancelDeferredRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.metadataRequest' @:: Lens' ClientMessage [Proto.CMS.Metadata1.MetadataScopeRequest]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'metadataRequest' @:: Lens' ClientMessage (Data.Vector.Vector Proto.CMS.Metadata1.MetadataScopeRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.sessionContextScopeRequest' @:: Lens' ClientMessage [Proto.CMS.SessionContext1.SessionContextScopeRequest]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'sessionContextScopeRequest' @:: Lens' ClientMessage (Data.Vector.Vector Proto.CMS.SessionContext1.SessionContextScopeRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.locationScopeRequest' @:: Lens' ClientMessage [Proto.CMS.Location1.LocationScopeRequest]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'locationScopeRequest' @:: Lens' ClientMessage (Data.Vector.Vector Proto.CMS.Location1.LocationScopeRequest)@ -} +data ClientMessage + = ClientMessage'_constructor {_ClientMessage'logon :: !(Prelude.Maybe Proto.CMS.Common1.Logon), + _ClientMessage'logoff :: !(Prelude.Maybe Proto.CMS.Common1.Logoff), + _ClientMessage'restoreOrJoinSession :: !(Prelude.Maybe Proto.CMS.Common1.RestoreOrJoinSession), + _ClientMessage'informationRequest :: !(Data.Vector.Vector InformationRequest), + _ClientMessage'searchRequest :: !(Data.Vector.Vector SearchRequest), + _ClientMessage'operationRequest :: !(Data.Vector.Vector OperationRequest), + _ClientMessage'tradeRoutingRequest :: !(Data.Vector.Vector Proto.CMS.Traderouting1.TradeRoutingRequest), + _ClientMessage'ping :: !(Prelude.Maybe Ping), + _ClientMessage'pong :: !(Prelude.Maybe Pong), + _ClientMessage'cancelDeferredRequest :: !(Prelude.Maybe CancelDeferredRequest), + _ClientMessage'metadataRequest :: !(Data.Vector.Vector Proto.CMS.Metadata1.MetadataScopeRequest), + _ClientMessage'sessionContextScopeRequest :: !(Data.Vector.Vector Proto.CMS.SessionContext1.SessionContextScopeRequest), + _ClientMessage'locationScopeRequest :: !(Data.Vector.Vector Proto.CMS.Location1.LocationScopeRequest), + _ClientMessage'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ClientMessage where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ClientMessage "logon" Proto.CMS.Common1.Logon where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'logon + (\ x__ y__ -> x__ {_ClientMessage'logon = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ClientMessage "maybe'logon" (Prelude.Maybe Proto.CMS.Common1.Logon) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'logon + (\ x__ y__ -> x__ {_ClientMessage'logon = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "logoff" Proto.CMS.Common1.Logoff where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'logoff + (\ x__ y__ -> x__ {_ClientMessage'logoff = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ClientMessage "maybe'logoff" (Prelude.Maybe Proto.CMS.Common1.Logoff) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'logoff + (\ x__ y__ -> x__ {_ClientMessage'logoff = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "restoreOrJoinSession" Proto.CMS.Common1.RestoreOrJoinSession where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'restoreOrJoinSession + (\ x__ y__ -> x__ {_ClientMessage'restoreOrJoinSession = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ClientMessage "maybe'restoreOrJoinSession" (Prelude.Maybe Proto.CMS.Common1.RestoreOrJoinSession) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'restoreOrJoinSession + (\ x__ y__ -> x__ {_ClientMessage'restoreOrJoinSession = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "informationRequest" [InformationRequest] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'informationRequest + (\ x__ y__ -> x__ {_ClientMessage'informationRequest = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ClientMessage "vec'informationRequest" (Data.Vector.Vector InformationRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'informationRequest + (\ x__ y__ -> x__ {_ClientMessage'informationRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "searchRequest" [SearchRequest] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'searchRequest + (\ x__ y__ -> x__ {_ClientMessage'searchRequest = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ClientMessage "vec'searchRequest" (Data.Vector.Vector SearchRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'searchRequest + (\ x__ y__ -> x__ {_ClientMessage'searchRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "operationRequest" [OperationRequest] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'operationRequest + (\ x__ y__ -> x__ {_ClientMessage'operationRequest = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ClientMessage "vec'operationRequest" (Data.Vector.Vector OperationRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'operationRequest + (\ x__ y__ -> x__ {_ClientMessage'operationRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "tradeRoutingRequest" [Proto.CMS.Traderouting1.TradeRoutingRequest] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'tradeRoutingRequest + (\ x__ y__ -> x__ {_ClientMessage'tradeRoutingRequest = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ClientMessage "vec'tradeRoutingRequest" (Data.Vector.Vector Proto.CMS.Traderouting1.TradeRoutingRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'tradeRoutingRequest + (\ x__ y__ -> x__ {_ClientMessage'tradeRoutingRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "ping" Ping where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'ping (\ x__ y__ -> x__ {_ClientMessage'ping = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ClientMessage "maybe'ping" (Prelude.Maybe Ping) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'ping (\ x__ y__ -> x__ {_ClientMessage'ping = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "pong" Pong where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'pong (\ x__ y__ -> x__ {_ClientMessage'pong = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ClientMessage "maybe'pong" (Prelude.Maybe Pong) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'pong (\ x__ y__ -> x__ {_ClientMessage'pong = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "cancelDeferredRequest" CancelDeferredRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'cancelDeferredRequest + (\ x__ y__ -> x__ {_ClientMessage'cancelDeferredRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ClientMessage "maybe'cancelDeferredRequest" (Prelude.Maybe CancelDeferredRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'cancelDeferredRequest + (\ x__ y__ -> x__ {_ClientMessage'cancelDeferredRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "metadataRequest" [Proto.CMS.Metadata1.MetadataScopeRequest] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'metadataRequest + (\ x__ y__ -> x__ {_ClientMessage'metadataRequest = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ClientMessage "vec'metadataRequest" (Data.Vector.Vector Proto.CMS.Metadata1.MetadataScopeRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'metadataRequest + (\ x__ y__ -> x__ {_ClientMessage'metadataRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "sessionContextScopeRequest" [Proto.CMS.SessionContext1.SessionContextScopeRequest] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'sessionContextScopeRequest + (\ x__ y__ + -> x__ {_ClientMessage'sessionContextScopeRequest = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ClientMessage "vec'sessionContextScopeRequest" (Data.Vector.Vector Proto.CMS.SessionContext1.SessionContextScopeRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'sessionContextScopeRequest + (\ x__ y__ + -> x__ {_ClientMessage'sessionContextScopeRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ClientMessage "locationScopeRequest" [Proto.CMS.Location1.LocationScopeRequest] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'locationScopeRequest + (\ x__ y__ -> x__ {_ClientMessage'locationScopeRequest = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ClientMessage "vec'locationScopeRequest" (Data.Vector.Vector Proto.CMS.Location1.LocationScopeRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ClientMessage'locationScopeRequest + (\ x__ y__ -> x__ {_ClientMessage'locationScopeRequest = y__})) + Prelude.id +instance Data.ProtoLens.Message ClientMessage where + messageName _ = Data.Text.pack "cmsapi_1.ClientMessage" + packedMessageDescriptor _ + = "\n\ + \\rClientMessage\DC2%\n\ + \\ENQlogon\CAN\SOH \SOH(\v2\SI.common_1.LogonR\ENQlogon\DC2(\n\ + \\ACKlogoff\CAN\STX \SOH(\v2\DLE.common_1.LogoffR\ACKlogoff\DC2U\n\ + \\ETBrestore_or_join_session\CAN\a \SOH(\v2\RS.common_1.RestoreOrJoinSessionR\DC4restoreOrJoinSession\DC2M\n\ + \\DC3information_request\CAN\ETX \ETX(\v2\FS.cmsapi_1.InformationRequestR\DC2informationRequest\DC2>\n\ + \\SOsearch_request\CAN\EOT \ETX(\v2\ETB.cmsapi_1.SearchRequestR\rsearchRequest\DC2G\n\ + \\DC1operation_request\CAN\ENQ \ETX(\v2\SUB.cmsapi_1.OperationRequestR\DLEoperationRequest\DC2W\n\ + \\NAKtrade_routing_request\CAN\ACK \ETX(\v2#.traderouting_1.TradeRoutingRequestR\DC3tradeRoutingRequest\DC2\"\n\ + \\EOTping\CAN\t \SOH(\v2\SO.cmsapi_1.PingR\EOTping\DC2\"\n\ + \\EOTpong\CAN\n\ + \ \SOH(\v2\SO.cmsapi_1.PongR\EOTpong\DC2W\n\ + \\ETBcancel_deferred_request\CAN\v \SOH(\v2\US.cmsapi_1.CancelDeferredRequestR\NAKcancelDeferredRequest\DC2K\n\ + \\DLEmetadata_request\CAN\f \ETX(\v2 .metadata_1.MetadataScopeRequestR\SImetadataRequest\DC2p\n\ + \\GSsession_context_scope_request\CAN\r \ETX(\v2-.session_context_1.SessionContextScopeRequestR\SUBsessionContextScopeRequest\DC2V\n\ + \\SYNlocation_scope_request\CAN\SO \ETX(\v2 .location_1.LocationScopeRequestR\DC4locationScopeRequest*\ENQ\bd\DLE\200\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + logon__field_descriptor + = Data.ProtoLens.FieldDescriptor + "logon" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Logon) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'logon")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + logoff__field_descriptor + = Data.ProtoLens.FieldDescriptor + "logoff" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Logoff) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'logoff")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + restoreOrJoinSession__field_descriptor + = Data.ProtoLens.FieldDescriptor + "restore_or_join_session" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.RestoreOrJoinSession) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'restoreOrJoinSession")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + informationRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "information_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor InformationRequest) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"informationRequest")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + searchRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "search_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SearchRequest) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"searchRequest")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + operationRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OperationRequest) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"operationRequest")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + tradeRoutingRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_routing_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Traderouting1.TradeRoutingRequest) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"tradeRoutingRequest")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + ping__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ping" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Ping) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'ping")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + pong__field_descriptor + = Data.ProtoLens.FieldDescriptor + "pong" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Pong) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'pong")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + cancelDeferredRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cancel_deferred_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CancelDeferredRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cancelDeferredRequest")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + metadataRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "metadata_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Metadata1.MetadataScopeRequest) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"metadataRequest")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + sessionContextScopeRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "session_context_scope_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.SessionContext1.SessionContextScopeRequest) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"sessionContextScopeRequest")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + locationScopeRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "location_scope_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Location1.LocationScopeRequest) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"locationScopeRequest")) :: + Data.ProtoLens.FieldDescriptor ClientMessage + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, logon__field_descriptor), + (Data.ProtoLens.Tag 2, logoff__field_descriptor), + (Data.ProtoLens.Tag 7, restoreOrJoinSession__field_descriptor), + (Data.ProtoLens.Tag 3, informationRequest__field_descriptor), + (Data.ProtoLens.Tag 4, searchRequest__field_descriptor), + (Data.ProtoLens.Tag 5, operationRequest__field_descriptor), + (Data.ProtoLens.Tag 6, tradeRoutingRequest__field_descriptor), + (Data.ProtoLens.Tag 9, ping__field_descriptor), + (Data.ProtoLens.Tag 10, pong__field_descriptor), + (Data.ProtoLens.Tag 11, cancelDeferredRequest__field_descriptor), + (Data.ProtoLens.Tag 12, metadataRequest__field_descriptor), + (Data.ProtoLens.Tag 13, + sessionContextScopeRequest__field_descriptor), + (Data.ProtoLens.Tag 14, locationScopeRequest__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ClientMessage'_unknownFields + (\ x__ y__ -> x__ {_ClientMessage'_unknownFields = y__}) + defMessage + = ClientMessage'_constructor + {_ClientMessage'logon = Prelude.Nothing, + _ClientMessage'logoff = Prelude.Nothing, + _ClientMessage'restoreOrJoinSession = Prelude.Nothing, + _ClientMessage'informationRequest = Data.Vector.Generic.empty, + _ClientMessage'searchRequest = Data.Vector.Generic.empty, + _ClientMessage'operationRequest = Data.Vector.Generic.empty, + _ClientMessage'tradeRoutingRequest = Data.Vector.Generic.empty, + _ClientMessage'ping = Prelude.Nothing, + _ClientMessage'pong = Prelude.Nothing, + _ClientMessage'cancelDeferredRequest = Prelude.Nothing, + _ClientMessage'metadataRequest = Data.Vector.Generic.empty, + _ClientMessage'sessionContextScopeRequest = Data.Vector.Generic.empty, + _ClientMessage'locationScopeRequest = Data.Vector.Generic.empty, + _ClientMessage'_unknownFields = []} + parseMessage + = let + loop :: + ClientMessage + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld InformationRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Location1.LocationScopeRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Metadata1.MetadataScopeRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld OperationRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld SearchRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.SessionContext1.SessionContextScopeRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Traderouting1.TradeRoutingRequest + -> Data.ProtoLens.Encoding.Bytes.Parser ClientMessage + loop + x + mutable'informationRequest + mutable'locationScopeRequest + mutable'metadataRequest + mutable'operationRequest + mutable'searchRequest + mutable'sessionContextScopeRequest + mutable'tradeRoutingRequest + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'informationRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'informationRequest) + frozen'locationScopeRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'locationScopeRequest) + frozen'metadataRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'metadataRequest) + frozen'operationRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'operationRequest) + frozen'searchRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'searchRequest) + frozen'sessionContextScopeRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'sessionContextScopeRequest) + frozen'tradeRoutingRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'tradeRoutingRequest) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'informationRequest") + frozen'informationRequest + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'locationScopeRequest") + frozen'locationScopeRequest + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'metadataRequest") + frozen'metadataRequest + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'operationRequest") + frozen'operationRequest + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'searchRequest") + frozen'searchRequest + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"vec'sessionContextScopeRequest") + frozen'sessionContextScopeRequest + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"vec'tradeRoutingRequest") + frozen'tradeRoutingRequest x)))))))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "logon" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"logon") y x) + mutable'informationRequest mutable'locationScopeRequest + mutable'metadataRequest mutable'operationRequest + mutable'searchRequest mutable'sessionContextScopeRequest + mutable'tradeRoutingRequest + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "logoff" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"logoff") y x) + mutable'informationRequest mutable'locationScopeRequest + mutable'metadataRequest mutable'operationRequest + mutable'searchRequest mutable'sessionContextScopeRequest + mutable'tradeRoutingRequest + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "restore_or_join_session" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"restoreOrJoinSession") y x) + mutable'informationRequest mutable'locationScopeRequest + mutable'metadataRequest mutable'operationRequest + mutable'searchRequest mutable'sessionContextScopeRequest + mutable'tradeRoutingRequest + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "information_request" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'informationRequest y) + loop + x v mutable'locationScopeRequest mutable'metadataRequest + mutable'operationRequest mutable'searchRequest + mutable'sessionContextScopeRequest mutable'tradeRoutingRequest + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "search_request" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'searchRequest y) + loop + x mutable'informationRequest mutable'locationScopeRequest + mutable'metadataRequest mutable'operationRequest v + mutable'sessionContextScopeRequest mutable'tradeRoutingRequest + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "operation_request" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'operationRequest y) + loop + x mutable'informationRequest mutable'locationScopeRequest + mutable'metadataRequest v mutable'searchRequest + mutable'sessionContextScopeRequest mutable'tradeRoutingRequest + 50 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "trade_routing_request" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'tradeRoutingRequest y) + loop + x mutable'informationRequest mutable'locationScopeRequest + mutable'metadataRequest mutable'operationRequest + mutable'searchRequest mutable'sessionContextScopeRequest v + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "ping" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"ping") y x) + mutable'informationRequest mutable'locationScopeRequest + mutable'metadataRequest mutable'operationRequest + mutable'searchRequest mutable'sessionContextScopeRequest + mutable'tradeRoutingRequest + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "pong" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"pong") y x) + mutable'informationRequest mutable'locationScopeRequest + mutable'metadataRequest mutable'operationRequest + mutable'searchRequest mutable'sessionContextScopeRequest + mutable'tradeRoutingRequest + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "cancel_deferred_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"cancelDeferredRequest") y x) + mutable'informationRequest mutable'locationScopeRequest + mutable'metadataRequest mutable'operationRequest + mutable'searchRequest mutable'sessionContextScopeRequest + mutable'tradeRoutingRequest + 98 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "metadata_request" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'metadataRequest y) + loop + x mutable'informationRequest mutable'locationScopeRequest v + mutable'operationRequest mutable'searchRequest + mutable'sessionContextScopeRequest mutable'tradeRoutingRequest + 106 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "session_context_scope_request" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'sessionContextScopeRequest y) + loop + x mutable'informationRequest mutable'locationScopeRequest + mutable'metadataRequest mutable'operationRequest + mutable'searchRequest v mutable'tradeRoutingRequest + 114 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "location_scope_request" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'locationScopeRequest y) + loop + x mutable'informationRequest v mutable'metadataRequest + mutable'operationRequest mutable'searchRequest + mutable'sessionContextScopeRequest mutable'tradeRoutingRequest + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'informationRequest mutable'locationScopeRequest + mutable'metadataRequest mutable'operationRequest + mutable'searchRequest mutable'sessionContextScopeRequest + mutable'tradeRoutingRequest + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'informationRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'locationScopeRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'metadataRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'operationRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'searchRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'sessionContextScopeRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'tradeRoutingRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'informationRequest + mutable'locationScopeRequest mutable'metadataRequest + mutable'operationRequest mutable'searchRequest + mutable'sessionContextScopeRequest mutable'tradeRoutingRequest) + "ClientMessage" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'logon") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'logoff") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'restoreOrJoinSession") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'informationRequest") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'searchRequest") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'operationRequest") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'tradeRoutingRequest") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'ping") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'pong") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'cancelDeferredRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'metadataRequest") + _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'sessionContextScopeRequest") + _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'locationScopeRequest") + _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x)))))))))))))) +instance Control.DeepSeq.NFData ClientMessage where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ClientMessage'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ClientMessage'logon x__) + (Control.DeepSeq.deepseq + (_ClientMessage'logoff x__) + (Control.DeepSeq.deepseq + (_ClientMessage'restoreOrJoinSession x__) + (Control.DeepSeq.deepseq + (_ClientMessage'informationRequest x__) + (Control.DeepSeq.deepseq + (_ClientMessage'searchRequest x__) + (Control.DeepSeq.deepseq + (_ClientMessage'operationRequest x__) + (Control.DeepSeq.deepseq + (_ClientMessage'tradeRoutingRequest x__) + (Control.DeepSeq.deepseq + (_ClientMessage'ping x__) + (Control.DeepSeq.deepseq + (_ClientMessage'pong x__) + (Control.DeepSeq.deepseq + (_ClientMessage'cancelDeferredRequest x__) + (Control.DeepSeq.deepseq + (_ClientMessage'metadataRequest x__) + (Control.DeepSeq.deepseq + (_ClientMessage'sessionContextScopeRequest x__) + (Control.DeepSeq.deepseq + (_ClientMessage'locationScopeRequest x__) + ()))))))))))))) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.profile' @:: Lens' CreateProfile Proto.CMS.Common1.Profile@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profile' @:: Lens' CreateProfile (Prelude.Maybe Proto.CMS.Common1.Profile)@ -} +data CreateProfile + = CreateProfile'_constructor {_CreateProfile'profile :: !(Prelude.Maybe Proto.CMS.Common1.Profile), + _CreateProfile'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateProfile where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateProfile "profile" Proto.CMS.Common1.Profile where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateProfile'profile + (\ x__ y__ -> x__ {_CreateProfile'profile = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CreateProfile "maybe'profile" (Prelude.Maybe Proto.CMS.Common1.Profile) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateProfile'profile + (\ x__ y__ -> x__ {_CreateProfile'profile = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateProfile where + messageName _ = Data.Text.pack "cmsapi_1.CreateProfile" + packedMessageDescriptor _ + = "\n\ + \\rCreateProfile\DC2+\n\ + \\aprofile\CAN\SOH \SOH(\v2\DC1.common_1.ProfileR\aprofile" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + profile__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Profile) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profile")) :: + Data.ProtoLens.FieldDescriptor CreateProfile + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, profile__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateProfile'_unknownFields + (\ x__ y__ -> x__ {_CreateProfile'_unknownFields = y__}) + defMessage + = CreateProfile'_constructor + {_CreateProfile'profile = Prelude.Nothing, + _CreateProfile'_unknownFields = []} + parseMessage + = let + loop :: + CreateProfile -> Data.ProtoLens.Encoding.Bytes.Parser CreateProfile + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "profile" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"profile") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateProfile" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'profile") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData CreateProfile where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateProfile'_unknownFields x__) + (Control.DeepSeq.deepseq (_CreateProfile'profile x__) ()) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.obsoleteCustomerId' @:: Lens' CreateProfileResult Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteCustomerId' @:: Lens' CreateProfileResult (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.profileId' @:: Lens' CreateProfileResult Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileId' @:: Lens' CreateProfileResult (Prelude.Maybe Data.Text.Text)@ -} +data CreateProfileResult + = CreateProfileResult'_constructor {_CreateProfileResult'obsoleteCustomerId :: !(Prelude.Maybe Data.Text.Text), + _CreateProfileResult'profileId :: !(Prelude.Maybe Data.Text.Text), + _CreateProfileResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateProfileResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateProfileResult "obsoleteCustomerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateProfileResult'obsoleteCustomerId + (\ x__ y__ -> x__ {_CreateProfileResult'obsoleteCustomerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateProfileResult "maybe'obsoleteCustomerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateProfileResult'obsoleteCustomerId + (\ x__ y__ -> x__ {_CreateProfileResult'obsoleteCustomerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateProfileResult "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateProfileResult'profileId + (\ x__ y__ -> x__ {_CreateProfileResult'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateProfileResult "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateProfileResult'profileId + (\ x__ y__ -> x__ {_CreateProfileResult'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateProfileResult where + messageName _ = Data.Text.pack "cmsapi_1.CreateProfileResult" + packedMessageDescriptor _ + = "\n\ + \\DC3CreateProfileResult\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\STX \SOH(\tR\tprofileId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteCustomerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId")) :: + Data.ProtoLens.FieldDescriptor CreateProfileResult + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor CreateProfileResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteCustomerId__field_descriptor), + (Data.ProtoLens.Tag 2, profileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateProfileResult'_unknownFields + (\ x__ y__ -> x__ {_CreateProfileResult'_unknownFields = y__}) + defMessage + = CreateProfileResult'_constructor + {_CreateProfileResult'obsoleteCustomerId = Prelude.Nothing, + _CreateProfileResult'profileId = Prelude.Nothing, + _CreateProfileResult'_unknownFields = []} + parseMessage + = let + loop :: + CreateProfileResult + -> Data.ProtoLens.Encoding.Bytes.Parser CreateProfileResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_customer_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCustomerId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateProfileResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData CreateProfileResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateProfileResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CreateProfileResult'obsoleteCustomerId x__) + (Control.DeepSeq.deepseq (_CreateProfileResult'profileId x__) ())) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.loginId' @:: Lens' GenerateServiceSecurityToken Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loginId' @:: Lens' GenerateServiceSecurityToken (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.operation' @:: Lens' GenerateServiceSecurityToken [Data.Word.Word32]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'operation' @:: Lens' GenerateServiceSecurityToken (Data.Vector.Unboxed.Vector Data.Word.Word32)@ -} +data GenerateServiceSecurityToken + = GenerateServiceSecurityToken'_constructor {_GenerateServiceSecurityToken'loginId :: !(Prelude.Maybe Data.Text.Text), + _GenerateServiceSecurityToken'operation :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _GenerateServiceSecurityToken'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show GenerateServiceSecurityToken where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField GenerateServiceSecurityToken "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GenerateServiceSecurityToken'loginId + (\ x__ y__ -> x__ {_GenerateServiceSecurityToken'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField GenerateServiceSecurityToken "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GenerateServiceSecurityToken'loginId + (\ x__ y__ -> x__ {_GenerateServiceSecurityToken'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField GenerateServiceSecurityToken "operation" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GenerateServiceSecurityToken'operation + (\ x__ y__ -> x__ {_GenerateServiceSecurityToken'operation = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField GenerateServiceSecurityToken "vec'operation" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GenerateServiceSecurityToken'operation + (\ x__ y__ -> x__ {_GenerateServiceSecurityToken'operation = y__})) + Prelude.id +instance Data.ProtoLens.Message GenerateServiceSecurityToken where + messageName _ + = Data.Text.pack "cmsapi_1.GenerateServiceSecurityToken" + packedMessageDescriptor _ + = "\n\ + \\FSGenerateServiceSecurityToken\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2\FS\n\ + \\toperation\CAN\STX \ETX(\rR\toperation" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor GenerateServiceSecurityToken + operation__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"operation")) :: + Data.ProtoLens.FieldDescriptor GenerateServiceSecurityToken + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor), + (Data.ProtoLens.Tag 2, operation__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _GenerateServiceSecurityToken'_unknownFields + (\ x__ y__ + -> x__ {_GenerateServiceSecurityToken'_unknownFields = y__}) + defMessage + = GenerateServiceSecurityToken'_constructor + {_GenerateServiceSecurityToken'loginId = Prelude.Nothing, + _GenerateServiceSecurityToken'operation = Data.Vector.Generic.empty, + _GenerateServiceSecurityToken'_unknownFields = []} + parseMessage + = let + loop :: + GenerateServiceSecurityToken + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser GenerateServiceSecurityToken + loop x mutable'operation + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'operation <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'operation) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'operation") frozen'operation x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + mutable'operation + 16 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'operation y) + loop x v + 18 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'operation) + loop x y + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'operation + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'operation <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'operation) + "GenerateServiceSecurityToken" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'operation") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData GenerateServiceSecurityToken where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_GenerateServiceSecurityToken'_unknownFields x__) + (Control.DeepSeq.deepseq + (_GenerateServiceSecurityToken'loginId x__) + (Control.DeepSeq.deepseq + (_GenerateServiceSecurityToken'operation x__) ())) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.securityToken' @:: Lens' GenerateServiceSecurityTokenResult Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'securityToken' @:: Lens' GenerateServiceSecurityTokenResult (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.url' @:: Lens' GenerateServiceSecurityTokenResult Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'url' @:: Lens' GenerateServiceSecurityTokenResult (Prelude.Maybe Data.Text.Text)@ -} +data GenerateServiceSecurityTokenResult + = GenerateServiceSecurityTokenResult'_constructor {_GenerateServiceSecurityTokenResult'securityToken :: !(Prelude.Maybe Data.Text.Text), + _GenerateServiceSecurityTokenResult'url :: !(Prelude.Maybe Data.Text.Text), + _GenerateServiceSecurityTokenResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show GenerateServiceSecurityTokenResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField GenerateServiceSecurityTokenResult "securityToken" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GenerateServiceSecurityTokenResult'securityToken + (\ x__ y__ + -> x__ {_GenerateServiceSecurityTokenResult'securityToken = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField GenerateServiceSecurityTokenResult "maybe'securityToken" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GenerateServiceSecurityTokenResult'securityToken + (\ x__ y__ + -> x__ {_GenerateServiceSecurityTokenResult'securityToken = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField GenerateServiceSecurityTokenResult "url" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GenerateServiceSecurityTokenResult'url + (\ x__ y__ -> x__ {_GenerateServiceSecurityTokenResult'url = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField GenerateServiceSecurityTokenResult "maybe'url" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GenerateServiceSecurityTokenResult'url + (\ x__ y__ -> x__ {_GenerateServiceSecurityTokenResult'url = y__})) + Prelude.id +instance Data.ProtoLens.Message GenerateServiceSecurityTokenResult where + messageName _ + = Data.Text.pack "cmsapi_1.GenerateServiceSecurityTokenResult" + packedMessageDescriptor _ + = "\n\ + \\"GenerateServiceSecurityTokenResult\DC2%\n\ + \\SOsecurity_token\CAN\SOH \SOH(\tR\rsecurityToken\DC2\DLE\n\ + \\ETXurl\CAN\STX \SOH(\tR\ETXurl" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + securityToken__field_descriptor + = Data.ProtoLens.FieldDescriptor + "security_token" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'securityToken")) :: + Data.ProtoLens.FieldDescriptor GenerateServiceSecurityTokenResult + url__field_descriptor + = Data.ProtoLens.FieldDescriptor + "url" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'url")) :: + Data.ProtoLens.FieldDescriptor GenerateServiceSecurityTokenResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, securityToken__field_descriptor), + (Data.ProtoLens.Tag 2, url__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _GenerateServiceSecurityTokenResult'_unknownFields + (\ x__ y__ + -> x__ {_GenerateServiceSecurityTokenResult'_unknownFields = y__}) + defMessage + = GenerateServiceSecurityTokenResult'_constructor + {_GenerateServiceSecurityTokenResult'securityToken = Prelude.Nothing, + _GenerateServiceSecurityTokenResult'url = Prelude.Nothing, + _GenerateServiceSecurityTokenResult'_unknownFields = []} + parseMessage + = let + loop :: + GenerateServiceSecurityTokenResult + -> Data.ProtoLens.Encoding.Bytes.Parser GenerateServiceSecurityTokenResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "security_token" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"securityToken") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "url" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"url") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "GenerateServiceSecurityTokenResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'securityToken") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'url") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData GenerateServiceSecurityTokenResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_GenerateServiceSecurityTokenResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_GenerateServiceSecurityTokenResult'securityToken x__) + (Control.DeepSeq.deepseq + (_GenerateServiceSecurityTokenResult'url x__) ())) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.obsoleteCustomerId' @:: Lens' GetUniqueUsernameRequest Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteCustomerId' @:: Lens' GetUniqueUsernameRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.profileId' @:: Lens' GetUniqueUsernameRequest Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileId' @:: Lens' GetUniqueUsernameRequest (Prelude.Maybe Data.Text.Text)@ -} +data GetUniqueUsernameRequest + = GetUniqueUsernameRequest'_constructor {_GetUniqueUsernameRequest'obsoleteCustomerId :: !(Prelude.Maybe Data.Text.Text), + _GetUniqueUsernameRequest'profileId :: !(Prelude.Maybe Data.Text.Text), + _GetUniqueUsernameRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show GetUniqueUsernameRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField GetUniqueUsernameRequest "obsoleteCustomerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GetUniqueUsernameRequest'obsoleteCustomerId + (\ x__ y__ + -> x__ {_GetUniqueUsernameRequest'obsoleteCustomerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField GetUniqueUsernameRequest "maybe'obsoleteCustomerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GetUniqueUsernameRequest'obsoleteCustomerId + (\ x__ y__ + -> x__ {_GetUniqueUsernameRequest'obsoleteCustomerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField GetUniqueUsernameRequest "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GetUniqueUsernameRequest'profileId + (\ x__ y__ -> x__ {_GetUniqueUsernameRequest'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField GetUniqueUsernameRequest "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GetUniqueUsernameRequest'profileId + (\ x__ y__ -> x__ {_GetUniqueUsernameRequest'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Message GetUniqueUsernameRequest where + messageName _ = Data.Text.pack "cmsapi_1.GetUniqueUsernameRequest" + packedMessageDescriptor _ + = "\n\ + \\CANGetUniqueUsernameRequest\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\STX \SOH(\tR\tprofileId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteCustomerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId")) :: + Data.ProtoLens.FieldDescriptor GetUniqueUsernameRequest + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor GetUniqueUsernameRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteCustomerId__field_descriptor), + (Data.ProtoLens.Tag 2, profileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _GetUniqueUsernameRequest'_unknownFields + (\ x__ y__ -> x__ {_GetUniqueUsernameRequest'_unknownFields = y__}) + defMessage + = GetUniqueUsernameRequest'_constructor + {_GetUniqueUsernameRequest'obsoleteCustomerId = Prelude.Nothing, + _GetUniqueUsernameRequest'profileId = Prelude.Nothing, + _GetUniqueUsernameRequest'_unknownFields = []} + parseMessage + = let + loop :: + GetUniqueUsernameRequest + -> Data.ProtoLens.Encoding.Bytes.Parser GetUniqueUsernameRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_customer_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCustomerId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "GetUniqueUsernameRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData GetUniqueUsernameRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_GetUniqueUsernameRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_GetUniqueUsernameRequest'obsoleteCustomerId x__) + (Control.DeepSeq.deepseq + (_GetUniqueUsernameRequest'profileId x__) ())) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.id' @:: Lens' InformationRequest Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.userInfoRequest' @:: Lens' InformationRequest Proto.CMS.Common1.UserInfoRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'userInfoRequest' @:: Lens' InformationRequest (Prelude.Maybe Proto.CMS.Common1.UserInfoRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.loginEntitlementServiceRequest' @:: Lens' InformationRequest Proto.CMS.Common1.EntityDataRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loginEntitlementServiceRequest' @:: Lens' InformationRequest (Prelude.Maybe Proto.CMS.Common1.EntityDataRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.entitlementCategoryListRequest' @:: Lens' InformationRequest Proto.CMS.Common1.EntitlementCategoryListRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'entitlementCategoryListRequest' @:: Lens' InformationRequest (Prelude.Maybe Proto.CMS.Common1.EntitlementCategoryListRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.entitlementServiceRequest' @:: Lens' InformationRequest Proto.CMS.Common1.EntitlementServiceRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'entitlementServiceRequest' @:: Lens' InformationRequest (Prelude.Maybe Proto.CMS.Common1.EntitlementServiceRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.profileRequest' @:: Lens' InformationRequest ProfileRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileRequest' @:: Lens' InformationRequest (Prelude.Maybe ProfileRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.entitlementServiceListRequest' @:: Lens' InformationRequest Proto.CMS.Common1.EntitlementServiceListRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'entitlementServiceListRequest' @:: Lens' InformationRequest (Prelude.Maybe Proto.CMS.Common1.EntitlementServiceListRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.getUniqueUsernameRequest' @:: Lens' InformationRequest GetUniqueUsernameRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'getUniqueUsernameRequest' @:: Lens' InformationRequest (Prelude.Maybe GetUniqueUsernameRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.customerSalesSeriesAuthorizationListRequest' @:: Lens' InformationRequest Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'customerSalesSeriesAuthorizationListRequest' @:: Lens' InformationRequest (Prelude.Maybe Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.loginSettingsRequest' @:: Lens' InformationRequest Proto.CMS.Common1.LoginSettingsRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loginSettingsRequest' @:: Lens' InformationRequest (Prelude.Maybe Proto.CMS.Common1.LoginSettingsRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.loginExchangeMemberIdListRequest' @:: Lens' InformationRequest Proto.CMS.Common1.LoginExchangeMemberIdListRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loginExchangeMemberIdListRequest' @:: Lens' InformationRequest (Prelude.Maybe Proto.CMS.Common1.LoginExchangeMemberIdListRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.lookupPropertyListRequest' @:: Lens' InformationRequest Proto.CMS.Common1.LookupPropertyListRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'lookupPropertyListRequest' @:: Lens' InformationRequest (Prelude.Maybe Proto.CMS.Common1.LookupPropertyListRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.authPartnerListRequest' @:: Lens' InformationRequest AuthPartnerListRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'authPartnerListRequest' @:: Lens' InformationRequest (Prelude.Maybe AuthPartnerListRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.loginBillingCustomDataRequest' @:: Lens' InformationRequest Proto.CMS.Common1.LoginBillingCustomDataRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loginBillingCustomDataRequest' @:: Lens' InformationRequest (Prelude.Maybe Proto.CMS.Common1.LoginBillingCustomDataRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.tradingFeaturesRequest' @:: Lens' InformationRequest Proto.CMS.Common1.TradingFeaturesRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'tradingFeaturesRequest' @:: Lens' InformationRequest (Prelude.Maybe Proto.CMS.Common1.TradingFeaturesRequest)@ -} +data InformationRequest + = InformationRequest'_constructor {_InformationRequest'id :: !Data.Word.Word32, + _InformationRequest'userInfoRequest :: !(Prelude.Maybe Proto.CMS.Common1.UserInfoRequest), + _InformationRequest'loginEntitlementServiceRequest :: !(Prelude.Maybe Proto.CMS.Common1.EntityDataRequest), + _InformationRequest'entitlementCategoryListRequest :: !(Prelude.Maybe Proto.CMS.Common1.EntitlementCategoryListRequest), + _InformationRequest'entitlementServiceRequest :: !(Prelude.Maybe Proto.CMS.Common1.EntitlementServiceRequest), + _InformationRequest'profileRequest :: !(Prelude.Maybe ProfileRequest), + _InformationRequest'entitlementServiceListRequest :: !(Prelude.Maybe Proto.CMS.Common1.EntitlementServiceListRequest), + _InformationRequest'getUniqueUsernameRequest :: !(Prelude.Maybe GetUniqueUsernameRequest), + _InformationRequest'customerSalesSeriesAuthorizationListRequest :: !(Prelude.Maybe Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListRequest), + _InformationRequest'loginSettingsRequest :: !(Prelude.Maybe Proto.CMS.Common1.LoginSettingsRequest), + _InformationRequest'loginExchangeMemberIdListRequest :: !(Prelude.Maybe Proto.CMS.Common1.LoginExchangeMemberIdListRequest), + _InformationRequest'lookupPropertyListRequest :: !(Prelude.Maybe Proto.CMS.Common1.LookupPropertyListRequest), + _InformationRequest'authPartnerListRequest :: !(Prelude.Maybe AuthPartnerListRequest), + _InformationRequest'loginBillingCustomDataRequest :: !(Prelude.Maybe Proto.CMS.Common1.LoginBillingCustomDataRequest), + _InformationRequest'tradingFeaturesRequest :: !(Prelude.Maybe Proto.CMS.Common1.TradingFeaturesRequest), + _InformationRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show InformationRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField InformationRequest "id" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'id + (\ x__ y__ -> x__ {_InformationRequest'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "userInfoRequest" Proto.CMS.Common1.UserInfoRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'userInfoRequest + (\ x__ y__ -> x__ {_InformationRequest'userInfoRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'userInfoRequest" (Prelude.Maybe Proto.CMS.Common1.UserInfoRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'userInfoRequest + (\ x__ y__ -> x__ {_InformationRequest'userInfoRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "loginEntitlementServiceRequest" Proto.CMS.Common1.EntityDataRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'loginEntitlementServiceRequest + (\ x__ y__ + -> x__ {_InformationRequest'loginEntitlementServiceRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'loginEntitlementServiceRequest" (Prelude.Maybe Proto.CMS.Common1.EntityDataRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'loginEntitlementServiceRequest + (\ x__ y__ + -> x__ {_InformationRequest'loginEntitlementServiceRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "entitlementCategoryListRequest" Proto.CMS.Common1.EntitlementCategoryListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'entitlementCategoryListRequest + (\ x__ y__ + -> x__ {_InformationRequest'entitlementCategoryListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'entitlementCategoryListRequest" (Prelude.Maybe Proto.CMS.Common1.EntitlementCategoryListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'entitlementCategoryListRequest + (\ x__ y__ + -> x__ {_InformationRequest'entitlementCategoryListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "entitlementServiceRequest" Proto.CMS.Common1.EntitlementServiceRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'entitlementServiceRequest + (\ x__ y__ + -> x__ {_InformationRequest'entitlementServiceRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'entitlementServiceRequest" (Prelude.Maybe Proto.CMS.Common1.EntitlementServiceRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'entitlementServiceRequest + (\ x__ y__ + -> x__ {_InformationRequest'entitlementServiceRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "profileRequest" ProfileRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'profileRequest + (\ x__ y__ -> x__ {_InformationRequest'profileRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'profileRequest" (Prelude.Maybe ProfileRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'profileRequest + (\ x__ y__ -> x__ {_InformationRequest'profileRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "entitlementServiceListRequest" Proto.CMS.Common1.EntitlementServiceListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'entitlementServiceListRequest + (\ x__ y__ + -> x__ {_InformationRequest'entitlementServiceListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'entitlementServiceListRequest" (Prelude.Maybe Proto.CMS.Common1.EntitlementServiceListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'entitlementServiceListRequest + (\ x__ y__ + -> x__ {_InformationRequest'entitlementServiceListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "getUniqueUsernameRequest" GetUniqueUsernameRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'getUniqueUsernameRequest + (\ x__ y__ + -> x__ {_InformationRequest'getUniqueUsernameRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'getUniqueUsernameRequest" (Prelude.Maybe GetUniqueUsernameRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'getUniqueUsernameRequest + (\ x__ y__ + -> x__ {_InformationRequest'getUniqueUsernameRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "customerSalesSeriesAuthorizationListRequest" Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'customerSalesSeriesAuthorizationListRequest + (\ x__ y__ + -> x__ + {_InformationRequest'customerSalesSeriesAuthorizationListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'customerSalesSeriesAuthorizationListRequest" (Prelude.Maybe Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'customerSalesSeriesAuthorizationListRequest + (\ x__ y__ + -> x__ + {_InformationRequest'customerSalesSeriesAuthorizationListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "loginSettingsRequest" Proto.CMS.Common1.LoginSettingsRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'loginSettingsRequest + (\ x__ y__ + -> x__ {_InformationRequest'loginSettingsRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'loginSettingsRequest" (Prelude.Maybe Proto.CMS.Common1.LoginSettingsRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'loginSettingsRequest + (\ x__ y__ + -> x__ {_InformationRequest'loginSettingsRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "loginExchangeMemberIdListRequest" Proto.CMS.Common1.LoginExchangeMemberIdListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'loginExchangeMemberIdListRequest + (\ x__ y__ + -> x__ + {_InformationRequest'loginExchangeMemberIdListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'loginExchangeMemberIdListRequest" (Prelude.Maybe Proto.CMS.Common1.LoginExchangeMemberIdListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'loginExchangeMemberIdListRequest + (\ x__ y__ + -> x__ + {_InformationRequest'loginExchangeMemberIdListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "lookupPropertyListRequest" Proto.CMS.Common1.LookupPropertyListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'lookupPropertyListRequest + (\ x__ y__ + -> x__ {_InformationRequest'lookupPropertyListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'lookupPropertyListRequest" (Prelude.Maybe Proto.CMS.Common1.LookupPropertyListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'lookupPropertyListRequest + (\ x__ y__ + -> x__ {_InformationRequest'lookupPropertyListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "authPartnerListRequest" AuthPartnerListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'authPartnerListRequest + (\ x__ y__ + -> x__ {_InformationRequest'authPartnerListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'authPartnerListRequest" (Prelude.Maybe AuthPartnerListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'authPartnerListRequest + (\ x__ y__ + -> x__ {_InformationRequest'authPartnerListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "loginBillingCustomDataRequest" Proto.CMS.Common1.LoginBillingCustomDataRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'loginBillingCustomDataRequest + (\ x__ y__ + -> x__ {_InformationRequest'loginBillingCustomDataRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'loginBillingCustomDataRequest" (Prelude.Maybe Proto.CMS.Common1.LoginBillingCustomDataRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'loginBillingCustomDataRequest + (\ x__ y__ + -> x__ {_InformationRequest'loginBillingCustomDataRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationRequest "tradingFeaturesRequest" Proto.CMS.Common1.TradingFeaturesRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'tradingFeaturesRequest + (\ x__ y__ + -> x__ {_InformationRequest'tradingFeaturesRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationRequest "maybe'tradingFeaturesRequest" (Prelude.Maybe Proto.CMS.Common1.TradingFeaturesRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationRequest'tradingFeaturesRequest + (\ x__ y__ + -> x__ {_InformationRequest'tradingFeaturesRequest = y__})) + Prelude.id +instance Data.ProtoLens.Message InformationRequest where + messageName _ = Data.Text.pack "cmsapi_1.InformationRequest" + packedMessageDescriptor _ + = "\n\ + \\DC2InformationRequest\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC2E\n\ + \\DC1user_info_request\CAN\STX \SOH(\v2\EM.common_1.UserInfoRequestR\SIuserInfoRequest\DC2f\n\ + \!login_entitlement_service_request\CAN\ETX \SOH(\v2\ESC.common_1.EntityDataRequestR\RSloginEntitlementServiceRequest\DC2s\n\ + \!entitlement_category_list_request\CAN\EOT \SOH(\v2(.common_1.EntitlementCategoryListRequestR\RSentitlementCategoryListRequest\DC2c\n\ + \\ESCentitlement_service_request\CAN\ENQ \SOH(\v2#.common_1.EntitlementServiceRequestR\EMentitlementServiceRequest\DC2A\n\ + \\SIprofile_request\CAN\ACK \SOH(\v2\CAN.cmsapi_1.ProfileRequestR\SOprofileRequest\DC2p\n\ + \ entitlement_service_list_request\CAN\a \SOH(\v2'.common_1.EntitlementServiceListRequestR\GSentitlementServiceListRequest\DC2a\n\ + \\ESCget_unique_username_request\CAN\b \SOH(\v2\".cmsapi_1.GetUniqueUsernameRequestR\CANgetUniqueUsernameRequest\DC2\156\SOH\n\ + \0customer_sales_series_authorization_list_request\CAN\t \SOH(\v25.common_1.CustomerSalesSeriesAuthorizationListRequestR+customerSalesSeriesAuthorizationListRequest\DC2T\n\ + \\SYNlogin_settings_request\CAN\n\ + \ \SOH(\v2\RS.common_1.LoginSettingsRequestR\DC4loginSettingsRequest\DC2{\n\ + \%login_exchange_member_id_list_request\CAN\v \SOH(\v2*.common_1.LoginExchangeMemberIdListRequestR loginExchangeMemberIdListRequest\DC2d\n\ + \\FSlookup_property_list_request\CAN\f \SOH(\v2#.common_1.LookupPropertyListRequestR\EMlookupPropertyListRequest\DC2[\n\ + \\EMauth_partner_list_request\CAN\r \SOH(\v2 .cmsapi_1.AuthPartnerListRequestR\SYNauthPartnerListRequest\DC2q\n\ + \!login_billing_custom_data_request\CAN\SO \SOH(\v2'.common_1.LoginBillingCustomDataRequestR\GSloginBillingCustomDataRequest\DC2Z\n\ + \\CANtrading_features_request\CAN\SI \SOH(\v2 .common_1.TradingFeaturesRequestR\SYNtradingFeaturesRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"id")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + userInfoRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_info_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UserInfoRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'userInfoRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + loginEntitlementServiceRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_entitlement_service_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.EntityDataRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'loginEntitlementServiceRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + entitlementCategoryListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_category_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.EntitlementCategoryListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'entitlementCategoryListRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + entitlementServiceRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_service_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.EntitlementServiceRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'entitlementServiceRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + profileRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ProfileRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + entitlementServiceListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_service_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.EntitlementServiceListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'entitlementServiceListRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + getUniqueUsernameRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "get_unique_username_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor GetUniqueUsernameRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'getUniqueUsernameRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + customerSalesSeriesAuthorizationListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_sales_series_authorization_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'customerSalesSeriesAuthorizationListRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + loginSettingsRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_settings_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LoginSettingsRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginSettingsRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + loginExchangeMemberIdListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_exchange_member_id_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LoginExchangeMemberIdListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'loginExchangeMemberIdListRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + lookupPropertyListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "lookup_property_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LookupPropertyListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'lookupPropertyListRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + authPartnerListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "auth_partner_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AuthPartnerListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'authPartnerListRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + loginBillingCustomDataRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_billing_custom_data_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LoginBillingCustomDataRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'loginBillingCustomDataRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + tradingFeaturesRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trading_features_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.TradingFeaturesRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradingFeaturesRequest")) :: + Data.ProtoLens.FieldDescriptor InformationRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, userInfoRequest__field_descriptor), + (Data.ProtoLens.Tag 3, + loginEntitlementServiceRequest__field_descriptor), + (Data.ProtoLens.Tag 4, + entitlementCategoryListRequest__field_descriptor), + (Data.ProtoLens.Tag 5, + entitlementServiceRequest__field_descriptor), + (Data.ProtoLens.Tag 6, profileRequest__field_descriptor), + (Data.ProtoLens.Tag 7, + entitlementServiceListRequest__field_descriptor), + (Data.ProtoLens.Tag 8, getUniqueUsernameRequest__field_descriptor), + (Data.ProtoLens.Tag 9, + customerSalesSeriesAuthorizationListRequest__field_descriptor), + (Data.ProtoLens.Tag 10, loginSettingsRequest__field_descriptor), + (Data.ProtoLens.Tag 11, + loginExchangeMemberIdListRequest__field_descriptor), + (Data.ProtoLens.Tag 12, + lookupPropertyListRequest__field_descriptor), + (Data.ProtoLens.Tag 13, authPartnerListRequest__field_descriptor), + (Data.ProtoLens.Tag 14, + loginBillingCustomDataRequest__field_descriptor), + (Data.ProtoLens.Tag 15, tradingFeaturesRequest__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _InformationRequest'_unknownFields + (\ x__ y__ -> x__ {_InformationRequest'_unknownFields = y__}) + defMessage + = InformationRequest'_constructor + {_InformationRequest'id = Data.ProtoLens.fieldDefault, + _InformationRequest'userInfoRequest = Prelude.Nothing, + _InformationRequest'loginEntitlementServiceRequest = Prelude.Nothing, + _InformationRequest'entitlementCategoryListRequest = Prelude.Nothing, + _InformationRequest'entitlementServiceRequest = Prelude.Nothing, + _InformationRequest'profileRequest = Prelude.Nothing, + _InformationRequest'entitlementServiceListRequest = Prelude.Nothing, + _InformationRequest'getUniqueUsernameRequest = Prelude.Nothing, + _InformationRequest'customerSalesSeriesAuthorizationListRequest = Prelude.Nothing, + _InformationRequest'loginSettingsRequest = Prelude.Nothing, + _InformationRequest'loginExchangeMemberIdListRequest = Prelude.Nothing, + _InformationRequest'lookupPropertyListRequest = Prelude.Nothing, + _InformationRequest'authPartnerListRequest = Prelude.Nothing, + _InformationRequest'loginBillingCustomDataRequest = Prelude.Nothing, + _InformationRequest'tradingFeaturesRequest = Prelude.Nothing, + _InformationRequest'_unknownFields = []} + parseMessage + = let + loop :: + InformationRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser InformationRequest + loop x required'id + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = (if required'id then (:) "id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "user_info_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"userInfoRequest") y x) + required'id + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "login_entitlement_service_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"loginEntitlementServiceRequest") + y x) + required'id + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "entitlement_category_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"entitlementCategoryListRequest") + y x) + required'id + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "entitlement_service_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"entitlementServiceRequest") y x) + required'id + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "profile_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"profileRequest") y x) + required'id + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "entitlement_service_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"entitlementServiceListRequest") y + x) + required'id + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "get_unique_username_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"getUniqueUsernameRequest") y x) + required'id + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "customer_sales_series_authorization_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"customerSalesSeriesAuthorizationListRequest") + y x) + required'id + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "login_settings_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"loginSettingsRequest") y x) + required'id + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "login_exchange_member_id_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"loginExchangeMemberIdListRequest") + y x) + required'id + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "lookup_property_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"lookupPropertyListRequest") y x) + required'id + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "auth_partner_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"authPartnerListRequest") y x) + required'id + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "login_billing_custom_data_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"loginBillingCustomDataRequest") y + x) + required'id + 122 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trading_features_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradingFeaturesRequest") y x) + required'id + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'id + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "InformationRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"id") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'userInfoRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'loginEntitlementServiceRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'entitlementCategoryListRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'entitlementServiceRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'entitlementServiceListRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'getUniqueUsernameRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'customerSalesSeriesAuthorizationListRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'loginSettingsRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'loginExchangeMemberIdListRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'lookupPropertyListRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'authPartnerListRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'loginBillingCustomDataRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradingFeaturesRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))) +instance Control.DeepSeq.NFData InformationRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_InformationRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_InformationRequest'id x__) + (Control.DeepSeq.deepseq + (_InformationRequest'userInfoRequest x__) + (Control.DeepSeq.deepseq + (_InformationRequest'loginEntitlementServiceRequest x__) + (Control.DeepSeq.deepseq + (_InformationRequest'entitlementCategoryListRequest x__) + (Control.DeepSeq.deepseq + (_InformationRequest'entitlementServiceRequest x__) + (Control.DeepSeq.deepseq + (_InformationRequest'profileRequest x__) + (Control.DeepSeq.deepseq + (_InformationRequest'entitlementServiceListRequest x__) + (Control.DeepSeq.deepseq + (_InformationRequest'getUniqueUsernameRequest x__) + (Control.DeepSeq.deepseq + (_InformationRequest'customerSalesSeriesAuthorizationListRequest + x__) + (Control.DeepSeq.deepseq + (_InformationRequest'loginSettingsRequest x__) + (Control.DeepSeq.deepseq + (_InformationRequest'loginExchangeMemberIdListRequest + x__) + (Control.DeepSeq.deepseq + (_InformationRequest'lookupPropertyListRequest x__) + (Control.DeepSeq.deepseq + (_InformationRequest'authPartnerListRequest x__) + (Control.DeepSeq.deepseq + (_InformationRequest'loginBillingCustomDataRequest + x__) + (Control.DeepSeq.deepseq + (_InformationRequest'tradingFeaturesRequest + x__) + ()))))))))))))))) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.requestId' @:: Lens' InformationResult Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.operationStatus' @:: Lens' InformationResult Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.errorMessage' @:: Lens' InformationResult Proto.Common.Shared1.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'errorMessage' @:: Lens' InformationResult (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.user' @:: Lens' InformationResult Proto.CMS.Common1.User@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'user' @:: Lens' InformationResult (Prelude.Maybe Proto.CMS.Common1.User)@ + * 'Proto.CMS.Cmsapi1_Fields.loginEntitlementService' @:: Lens' InformationResult [Proto.CMS.Login1.LoginEntitlementService]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'loginEntitlementService' @:: Lens' InformationResult (Data.Vector.Vector Proto.CMS.Login1.LoginEntitlementService)@ + * 'Proto.CMS.Cmsapi1_Fields.entitlementCategory' @:: Lens' InformationResult [Proto.CMS.Common1.EntitlementCategory]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'entitlementCategory' @:: Lens' InformationResult (Data.Vector.Vector Proto.CMS.Common1.EntitlementCategory)@ + * 'Proto.CMS.Cmsapi1_Fields.entitlementService' @:: Lens' InformationResult [Proto.CMS.Common1.EntitlementService]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'entitlementService' @:: Lens' InformationResult (Data.Vector.Vector Proto.CMS.Common1.EntitlementService)@ + * 'Proto.CMS.Cmsapi1_Fields.profile' @:: Lens' InformationResult Proto.CMS.Common1.Profile@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profile' @:: Lens' InformationResult (Prelude.Maybe Proto.CMS.Common1.Profile)@ + * 'Proto.CMS.Cmsapi1_Fields.uniqueUsernameResult' @:: Lens' InformationResult UniqueUsernameResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'uniqueUsernameResult' @:: Lens' InformationResult (Prelude.Maybe UniqueUsernameResult)@ + * 'Proto.CMS.Cmsapi1_Fields.customerSalesSeriesAuthorizationListResult' @:: Lens' InformationResult Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'customerSalesSeriesAuthorizationListResult' @:: Lens' InformationResult (Prelude.Maybe Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListResult)@ + * 'Proto.CMS.Cmsapi1_Fields.loginSettingsResult' @:: Lens' InformationResult Proto.CMS.Common1.LoginSettingsResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loginSettingsResult' @:: Lens' InformationResult (Prelude.Maybe Proto.CMS.Common1.LoginSettingsResult)@ + * 'Proto.CMS.Cmsapi1_Fields.loginExchangeMemberIdListResult' @:: Lens' InformationResult Proto.CMS.Common1.LoginExchangeMemberIdListResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loginExchangeMemberIdListResult' @:: Lens' InformationResult (Prelude.Maybe Proto.CMS.Common1.LoginExchangeMemberIdListResult)@ + * 'Proto.CMS.Cmsapi1_Fields.lookupPropertyListResult' @:: Lens' InformationResult Proto.CMS.Common1.LookupPropertyListResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'lookupPropertyListResult' @:: Lens' InformationResult (Prelude.Maybe Proto.CMS.Common1.LookupPropertyListResult)@ + * 'Proto.CMS.Cmsapi1_Fields.authPartnerListResult' @:: Lens' InformationResult AuthPartnerListResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'authPartnerListResult' @:: Lens' InformationResult (Prelude.Maybe AuthPartnerListResult)@ + * 'Proto.CMS.Cmsapi1_Fields.loginBillingCustomDataResult' @:: Lens' InformationResult Proto.CMS.Common1.LoginBillingCustomDataResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loginBillingCustomDataResult' @:: Lens' InformationResult (Prelude.Maybe Proto.CMS.Common1.LoginBillingCustomDataResult)@ + * 'Proto.CMS.Cmsapi1_Fields.trackingNumber' @:: Lens' InformationResult Data.Word.Word64@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'trackingNumber' @:: Lens' InformationResult (Prelude.Maybe Data.Word.Word64)@ + * 'Proto.CMS.Cmsapi1_Fields.tradingFeaturesResult' @:: Lens' InformationResult Proto.CMS.Common1.TradingFeaturesResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'tradingFeaturesResult' @:: Lens' InformationResult (Prelude.Maybe Proto.CMS.Common1.TradingFeaturesResult)@ -} +data InformationResult + = InformationResult'_constructor {_InformationResult'requestId :: !Data.Word.Word32, + _InformationResult'operationStatus :: !Data.Word.Word32, + _InformationResult'errorMessage :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _InformationResult'user :: !(Prelude.Maybe Proto.CMS.Common1.User), + _InformationResult'loginEntitlementService :: !(Data.Vector.Vector Proto.CMS.Login1.LoginEntitlementService), + _InformationResult'entitlementCategory :: !(Data.Vector.Vector Proto.CMS.Common1.EntitlementCategory), + _InformationResult'entitlementService :: !(Data.Vector.Vector Proto.CMS.Common1.EntitlementService), + _InformationResult'profile :: !(Prelude.Maybe Proto.CMS.Common1.Profile), + _InformationResult'uniqueUsernameResult :: !(Prelude.Maybe UniqueUsernameResult), + _InformationResult'customerSalesSeriesAuthorizationListResult :: !(Prelude.Maybe Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListResult), + _InformationResult'loginSettingsResult :: !(Prelude.Maybe Proto.CMS.Common1.LoginSettingsResult), + _InformationResult'loginExchangeMemberIdListResult :: !(Prelude.Maybe Proto.CMS.Common1.LoginExchangeMemberIdListResult), + _InformationResult'lookupPropertyListResult :: !(Prelude.Maybe Proto.CMS.Common1.LookupPropertyListResult), + _InformationResult'authPartnerListResult :: !(Prelude.Maybe AuthPartnerListResult), + _InformationResult'loginBillingCustomDataResult :: !(Prelude.Maybe Proto.CMS.Common1.LoginBillingCustomDataResult), + _InformationResult'trackingNumber :: !(Prelude.Maybe Data.Word.Word64), + _InformationResult'tradingFeaturesResult :: !(Prelude.Maybe Proto.CMS.Common1.TradingFeaturesResult), + _InformationResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show InformationResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField InformationResult "requestId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'requestId + (\ x__ y__ -> x__ {_InformationResult'requestId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "operationStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'operationStatus + (\ x__ y__ -> x__ {_InformationResult'operationStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "errorMessage" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'errorMessage + (\ x__ y__ -> x__ {_InformationResult'errorMessage = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'errorMessage" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'errorMessage + (\ x__ y__ -> x__ {_InformationResult'errorMessage = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "user" Proto.CMS.Common1.User where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'user + (\ x__ y__ -> x__ {_InformationResult'user = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'user" (Prelude.Maybe Proto.CMS.Common1.User) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'user + (\ x__ y__ -> x__ {_InformationResult'user = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "loginEntitlementService" [Proto.CMS.Login1.LoginEntitlementService] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'loginEntitlementService + (\ x__ y__ + -> x__ {_InformationResult'loginEntitlementService = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField InformationResult "vec'loginEntitlementService" (Data.Vector.Vector Proto.CMS.Login1.LoginEntitlementService) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'loginEntitlementService + (\ x__ y__ + -> x__ {_InformationResult'loginEntitlementService = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "entitlementCategory" [Proto.CMS.Common1.EntitlementCategory] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'entitlementCategory + (\ x__ y__ -> x__ {_InformationResult'entitlementCategory = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField InformationResult "vec'entitlementCategory" (Data.Vector.Vector Proto.CMS.Common1.EntitlementCategory) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'entitlementCategory + (\ x__ y__ -> x__ {_InformationResult'entitlementCategory = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "entitlementService" [Proto.CMS.Common1.EntitlementService] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'entitlementService + (\ x__ y__ -> x__ {_InformationResult'entitlementService = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField InformationResult "vec'entitlementService" (Data.Vector.Vector Proto.CMS.Common1.EntitlementService) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'entitlementService + (\ x__ y__ -> x__ {_InformationResult'entitlementService = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "profile" Proto.CMS.Common1.Profile where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'profile + (\ x__ y__ -> x__ {_InformationResult'profile = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'profile" (Prelude.Maybe Proto.CMS.Common1.Profile) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'profile + (\ x__ y__ -> x__ {_InformationResult'profile = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "uniqueUsernameResult" UniqueUsernameResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'uniqueUsernameResult + (\ x__ y__ -> x__ {_InformationResult'uniqueUsernameResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'uniqueUsernameResult" (Prelude.Maybe UniqueUsernameResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'uniqueUsernameResult + (\ x__ y__ -> x__ {_InformationResult'uniqueUsernameResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "customerSalesSeriesAuthorizationListResult" Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'customerSalesSeriesAuthorizationListResult + (\ x__ y__ + -> x__ + {_InformationResult'customerSalesSeriesAuthorizationListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'customerSalesSeriesAuthorizationListResult" (Prelude.Maybe Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'customerSalesSeriesAuthorizationListResult + (\ x__ y__ + -> x__ + {_InformationResult'customerSalesSeriesAuthorizationListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "loginSettingsResult" Proto.CMS.Common1.LoginSettingsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'loginSettingsResult + (\ x__ y__ -> x__ {_InformationResult'loginSettingsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'loginSettingsResult" (Prelude.Maybe Proto.CMS.Common1.LoginSettingsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'loginSettingsResult + (\ x__ y__ -> x__ {_InformationResult'loginSettingsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "loginExchangeMemberIdListResult" Proto.CMS.Common1.LoginExchangeMemberIdListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'loginExchangeMemberIdListResult + (\ x__ y__ + -> x__ {_InformationResult'loginExchangeMemberIdListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'loginExchangeMemberIdListResult" (Prelude.Maybe Proto.CMS.Common1.LoginExchangeMemberIdListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'loginExchangeMemberIdListResult + (\ x__ y__ + -> x__ {_InformationResult'loginExchangeMemberIdListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "lookupPropertyListResult" Proto.CMS.Common1.LookupPropertyListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'lookupPropertyListResult + (\ x__ y__ + -> x__ {_InformationResult'lookupPropertyListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'lookupPropertyListResult" (Prelude.Maybe Proto.CMS.Common1.LookupPropertyListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'lookupPropertyListResult + (\ x__ y__ + -> x__ {_InformationResult'lookupPropertyListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "authPartnerListResult" AuthPartnerListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'authPartnerListResult + (\ x__ y__ + -> x__ {_InformationResult'authPartnerListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'authPartnerListResult" (Prelude.Maybe AuthPartnerListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'authPartnerListResult + (\ x__ y__ + -> x__ {_InformationResult'authPartnerListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "loginBillingCustomDataResult" Proto.CMS.Common1.LoginBillingCustomDataResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'loginBillingCustomDataResult + (\ x__ y__ + -> x__ {_InformationResult'loginBillingCustomDataResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'loginBillingCustomDataResult" (Prelude.Maybe Proto.CMS.Common1.LoginBillingCustomDataResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'loginBillingCustomDataResult + (\ x__ y__ + -> x__ {_InformationResult'loginBillingCustomDataResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "trackingNumber" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'trackingNumber + (\ x__ y__ -> x__ {_InformationResult'trackingNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'trackingNumber" (Prelude.Maybe Data.Word.Word64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'trackingNumber + (\ x__ y__ -> x__ {_InformationResult'trackingNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InformationResult "tradingFeaturesResult" Proto.CMS.Common1.TradingFeaturesResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'tradingFeaturesResult + (\ x__ y__ + -> x__ {_InformationResult'tradingFeaturesResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InformationResult "maybe'tradingFeaturesResult" (Prelude.Maybe Proto.CMS.Common1.TradingFeaturesResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InformationResult'tradingFeaturesResult + (\ x__ y__ + -> x__ {_InformationResult'tradingFeaturesResult = y__})) + Prelude.id +instance Data.ProtoLens.Message InformationResult where + messageName _ = Data.Text.pack "cmsapi_1.InformationResult" + packedMessageDescriptor _ + = "\n\ + \\DC1InformationResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \STX(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \STX(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\ETX \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2\"\n\ + \\EOTuser\CAN\EOT \SOH(\v2\SO.common_1.UserR\EOTuser\DC2\\\n\ + \\EMlogin_entitlement_service\CAN\ENQ \ETX(\v2 .login_1.LoginEntitlementServiceR\ETBloginEntitlementService\DC2P\n\ + \\DC4entitlement_category\CAN\ACK \ETX(\v2\GS.common_1.EntitlementCategoryR\DC3entitlementCategory\DC2M\n\ + \\DC3entitlement_service\CAN\a \ETX(\v2\FS.common_1.EntitlementServiceR\DC2entitlementService\DC2+\n\ + \\aprofile\CAN\b \SOH(\v2\DC1.common_1.ProfileR\aprofile\DC2T\n\ + \\SYNunique_username_result\CAN\t \SOH(\v2\RS.cmsapi_1.UniqueUsernameResultR\DC4uniqueUsernameResult\DC2\153\SOH\n\ + \/customer_sales_series_authorization_list_result\CAN\n\ + \ \SOH(\v24.common_1.CustomerSalesSeriesAuthorizationListResultR*customerSalesSeriesAuthorizationListResult\DC2Q\n\ + \\NAKlogin_settings_result\CAN\v \SOH(\v2\GS.common_1.LoginSettingsResultR\DC3loginSettingsResult\DC2x\n\ + \$login_exchange_member_id_list_result\CAN\f \SOH(\v2).common_1.LoginExchangeMemberIdListResultR\USloginExchangeMemberIdListResult\DC2a\n\ + \\ESClookup_property_list_result\CAN\r \SOH(\v2\".common_1.LookupPropertyListResultR\CANlookupPropertyListResult\DC2X\n\ + \\CANauth_partner_list_result\CAN\SO \SOH(\v2\US.cmsapi_1.AuthPartnerListResultR\NAKauthPartnerListResult\DC2n\n\ + \ login_billing_custom_data_result\CAN\SI \SOH(\v2&.common_1.LoginBillingCustomDataResultR\FSloginBillingCustomDataResult\DC2'\n\ + \\SItracking_number\CAN\DLE \SOH(\EOTR\SOtrackingNumber\DC2W\n\ + \\ETBtrading_features_result\CAN\DC1 \SOH(\v2\US.common_1.TradingFeaturesResultR\NAKtradingFeaturesResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + requestId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "request_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"requestId")) :: + Data.ProtoLens.FieldDescriptor InformationResult + operationStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"operationStatus")) :: + Data.ProtoLens.FieldDescriptor InformationResult + errorMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "error_message" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'errorMessage")) :: + Data.ProtoLens.FieldDescriptor InformationResult + user__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.User) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'user")) :: + Data.ProtoLens.FieldDescriptor InformationResult + loginEntitlementService__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_entitlement_service" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Login1.LoginEntitlementService) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"loginEntitlementService")) :: + Data.ProtoLens.FieldDescriptor InformationResult + entitlementCategory__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_category" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.EntitlementCategory) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"entitlementCategory")) :: + Data.ProtoLens.FieldDescriptor InformationResult + entitlementService__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_service" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.EntitlementService) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"entitlementService")) :: + Data.ProtoLens.FieldDescriptor InformationResult + profile__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Profile) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profile")) :: + Data.ProtoLens.FieldDescriptor InformationResult + uniqueUsernameResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "unique_username_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UniqueUsernameResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'uniqueUsernameResult")) :: + Data.ProtoLens.FieldDescriptor InformationResult + customerSalesSeriesAuthorizationListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_sales_series_authorization_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.CustomerSalesSeriesAuthorizationListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'customerSalesSeriesAuthorizationListResult")) :: + Data.ProtoLens.FieldDescriptor InformationResult + loginSettingsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_settings_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LoginSettingsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginSettingsResult")) :: + Data.ProtoLens.FieldDescriptor InformationResult + loginExchangeMemberIdListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_exchange_member_id_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LoginExchangeMemberIdListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'loginExchangeMemberIdListResult")) :: + Data.ProtoLens.FieldDescriptor InformationResult + lookupPropertyListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "lookup_property_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LookupPropertyListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'lookupPropertyListResult")) :: + Data.ProtoLens.FieldDescriptor InformationResult + authPartnerListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "auth_partner_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AuthPartnerListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'authPartnerListResult")) :: + Data.ProtoLens.FieldDescriptor InformationResult + loginBillingCustomDataResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_billing_custom_data_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LoginBillingCustomDataResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'loginBillingCustomDataResult")) :: + Data.ProtoLens.FieldDescriptor InformationResult + trackingNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "tracking_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'trackingNumber")) :: + Data.ProtoLens.FieldDescriptor InformationResult + tradingFeaturesResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trading_features_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.TradingFeaturesResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradingFeaturesResult")) :: + Data.ProtoLens.FieldDescriptor InformationResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, requestId__field_descriptor), + (Data.ProtoLens.Tag 2, operationStatus__field_descriptor), + (Data.ProtoLens.Tag 3, errorMessage__field_descriptor), + (Data.ProtoLens.Tag 4, user__field_descriptor), + (Data.ProtoLens.Tag 5, loginEntitlementService__field_descriptor), + (Data.ProtoLens.Tag 6, entitlementCategory__field_descriptor), + (Data.ProtoLens.Tag 7, entitlementService__field_descriptor), + (Data.ProtoLens.Tag 8, profile__field_descriptor), + (Data.ProtoLens.Tag 9, uniqueUsernameResult__field_descriptor), + (Data.ProtoLens.Tag 10, + customerSalesSeriesAuthorizationListResult__field_descriptor), + (Data.ProtoLens.Tag 11, loginSettingsResult__field_descriptor), + (Data.ProtoLens.Tag 12, + loginExchangeMemberIdListResult__field_descriptor), + (Data.ProtoLens.Tag 13, + lookupPropertyListResult__field_descriptor), + (Data.ProtoLens.Tag 14, authPartnerListResult__field_descriptor), + (Data.ProtoLens.Tag 15, + loginBillingCustomDataResult__field_descriptor), + (Data.ProtoLens.Tag 16, trackingNumber__field_descriptor), + (Data.ProtoLens.Tag 17, tradingFeaturesResult__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _InformationResult'_unknownFields + (\ x__ y__ -> x__ {_InformationResult'_unknownFields = y__}) + defMessage + = InformationResult'_constructor + {_InformationResult'requestId = Data.ProtoLens.fieldDefault, + _InformationResult'operationStatus = Data.ProtoLens.fieldDefault, + _InformationResult'errorMessage = Prelude.Nothing, + _InformationResult'user = Prelude.Nothing, + _InformationResult'loginEntitlementService = Data.Vector.Generic.empty, + _InformationResult'entitlementCategory = Data.Vector.Generic.empty, + _InformationResult'entitlementService = Data.Vector.Generic.empty, + _InformationResult'profile = Prelude.Nothing, + _InformationResult'uniqueUsernameResult = Prelude.Nothing, + _InformationResult'customerSalesSeriesAuthorizationListResult = Prelude.Nothing, + _InformationResult'loginSettingsResult = Prelude.Nothing, + _InformationResult'loginExchangeMemberIdListResult = Prelude.Nothing, + _InformationResult'lookupPropertyListResult = Prelude.Nothing, + _InformationResult'authPartnerListResult = Prelude.Nothing, + _InformationResult'loginBillingCustomDataResult = Prelude.Nothing, + _InformationResult'trackingNumber = Prelude.Nothing, + _InformationResult'tradingFeaturesResult = Prelude.Nothing, + _InformationResult'_unknownFields = []} + parseMessage + = let + loop :: + InformationResult + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.EntitlementCategory + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.EntitlementService + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Login1.LoginEntitlementService + -> Data.ProtoLens.Encoding.Bytes.Parser InformationResult + loop + x + required'operationStatus + required'requestId + mutable'entitlementCategory + mutable'entitlementService + mutable'loginEntitlementService + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'entitlementCategory <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'entitlementCategory) + frozen'entitlementService <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'entitlementService) + frozen'loginEntitlementService <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'loginEntitlementService) + (let + missing + = (if required'operationStatus then + (:) "operation_status" + else + Prelude.id) + ((if required'requestId then (:) "request_id" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'entitlementCategory") + frozen'entitlementCategory + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'entitlementService") + frozen'entitlementService + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'loginEntitlementService") + frozen'loginEntitlementService x)))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "request_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x) + required'operationStatus Prelude.False mutable'entitlementCategory + mutable'entitlementService mutable'loginEntitlementService + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationStatus") y x) + Prelude.False required'requestId mutable'entitlementCategory + mutable'entitlementService mutable'loginEntitlementService + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "error_message" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"errorMessage") y x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "user" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"user") y x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "login_entitlement_service" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'loginEntitlementService y) + loop + x required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService v + 50 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "entitlement_category" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'entitlementCategory y) + loop + x required'operationStatus required'requestId v + mutable'entitlementService mutable'loginEntitlementService + 58 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "entitlement_service" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'entitlementService y) + loop + x required'operationStatus required'requestId + mutable'entitlementCategory v mutable'loginEntitlementService + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "profile" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profile") y x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "unique_username_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"uniqueUsernameResult") y x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "customer_sales_series_authorization_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"customerSalesSeriesAuthorizationListResult") + y x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "login_settings_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"loginSettingsResult") y x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "login_exchange_member_id_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"loginExchangeMemberIdListResult") + y x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "lookup_property_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"lookupPropertyListResult") y x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "auth_partner_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"authPartnerListResult") y x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + 122 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "login_billing_custom_data_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"loginBillingCustomDataResult") y + x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + 128 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "tracking_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"trackingNumber") y x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + 138 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trading_features_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradingFeaturesResult") y x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'operationStatus required'requestId + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'entitlementCategory <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'entitlementService <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'loginEntitlementService <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True Prelude.True + mutable'entitlementCategory mutable'entitlementService + mutable'loginEntitlementService) + "InformationResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"requestId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"operationStatus") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'errorMessage") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'user") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'loginEntitlementService") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'entitlementCategory") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'entitlementService") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profile") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'uniqueUsernameResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'customerSalesSeriesAuthorizationListResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'loginSettingsResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'loginExchangeMemberIdListResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'lookupPropertyListResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'authPartnerListResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'loginBillingCustomDataResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'trackingNumber") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 128) + (Data.ProtoLens.Encoding.Bytes.putVarInt + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradingFeaturesResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))))) +instance Control.DeepSeq.NFData InformationResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_InformationResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_InformationResult'requestId x__) + (Control.DeepSeq.deepseq + (_InformationResult'operationStatus x__) + (Control.DeepSeq.deepseq + (_InformationResult'errorMessage x__) + (Control.DeepSeq.deepseq + (_InformationResult'user x__) + (Control.DeepSeq.deepseq + (_InformationResult'loginEntitlementService x__) + (Control.DeepSeq.deepseq + (_InformationResult'entitlementCategory x__) + (Control.DeepSeq.deepseq + (_InformationResult'entitlementService x__) + (Control.DeepSeq.deepseq + (_InformationResult'profile x__) + (Control.DeepSeq.deepseq + (_InformationResult'uniqueUsernameResult x__) + (Control.DeepSeq.deepseq + (_InformationResult'customerSalesSeriesAuthorizationListResult + x__) + (Control.DeepSeq.deepseq + (_InformationResult'loginSettingsResult x__) + (Control.DeepSeq.deepseq + (_InformationResult'loginExchangeMemberIdListResult + x__) + (Control.DeepSeq.deepseq + (_InformationResult'lookupPropertyListResult + x__) + (Control.DeepSeq.deepseq + (_InformationResult'authPartnerListResult + x__) + (Control.DeepSeq.deepseq + (_InformationResult'loginBillingCustomDataResult + x__) + (Control.DeepSeq.deepseq + (_InformationResult'trackingNumber x__) + (Control.DeepSeq.deepseq + (_InformationResult'tradingFeaturesResult + x__) + ()))))))))))))))))) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.loginId' @:: Lens' LinkLoginToProfile Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loginId' @:: Lens' LinkLoginToProfile (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.obsoleteCustomerId' @:: Lens' LinkLoginToProfile Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteCustomerId' @:: Lens' LinkLoginToProfile (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.profileId' @:: Lens' LinkLoginToProfile Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileId' @:: Lens' LinkLoginToProfile (Prelude.Maybe Data.Text.Text)@ -} +data LinkLoginToProfile + = LinkLoginToProfile'_constructor {_LinkLoginToProfile'loginId :: !(Prelude.Maybe Data.Text.Text), + _LinkLoginToProfile'obsoleteCustomerId :: !(Prelude.Maybe Data.Text.Text), + _LinkLoginToProfile'profileId :: !(Prelude.Maybe Data.Text.Text), + _LinkLoginToProfile'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LinkLoginToProfile where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LinkLoginToProfile "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkLoginToProfile'loginId + (\ x__ y__ -> x__ {_LinkLoginToProfile'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LinkLoginToProfile "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkLoginToProfile'loginId + (\ x__ y__ -> x__ {_LinkLoginToProfile'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LinkLoginToProfile "obsoleteCustomerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkLoginToProfile'obsoleteCustomerId + (\ x__ y__ -> x__ {_LinkLoginToProfile'obsoleteCustomerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LinkLoginToProfile "maybe'obsoleteCustomerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkLoginToProfile'obsoleteCustomerId + (\ x__ y__ -> x__ {_LinkLoginToProfile'obsoleteCustomerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LinkLoginToProfile "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkLoginToProfile'profileId + (\ x__ y__ -> x__ {_LinkLoginToProfile'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LinkLoginToProfile "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkLoginToProfile'profileId + (\ x__ y__ -> x__ {_LinkLoginToProfile'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Message LinkLoginToProfile where + messageName _ = Data.Text.pack "cmsapi_1.LinkLoginToProfile" + packedMessageDescriptor _ + = "\n\ + \\DC2LinkLoginToProfile\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC24\n\ + \\DC4obsolete_customer_id\CAN\STX \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\ETX \SOH(\tR\tprofileId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor LinkLoginToProfile + obsoleteCustomerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId")) :: + Data.ProtoLens.FieldDescriptor LinkLoginToProfile + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor LinkLoginToProfile + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteCustomerId__field_descriptor), + (Data.ProtoLens.Tag 3, profileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LinkLoginToProfile'_unknownFields + (\ x__ y__ -> x__ {_LinkLoginToProfile'_unknownFields = y__}) + defMessage + = LinkLoginToProfile'_constructor + {_LinkLoginToProfile'loginId = Prelude.Nothing, + _LinkLoginToProfile'obsoleteCustomerId = Prelude.Nothing, + _LinkLoginToProfile'profileId = Prelude.Nothing, + _LinkLoginToProfile'_unknownFields = []} + parseMessage + = let + loop :: + LinkLoginToProfile + -> Data.ProtoLens.Encoding.Bytes.Parser LinkLoginToProfile + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_customer_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCustomerId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LinkLoginToProfile" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData LinkLoginToProfile where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LinkLoginToProfile'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LinkLoginToProfile'loginId x__) + (Control.DeepSeq.deepseq + (_LinkLoginToProfile'obsoleteCustomerId x__) + (Control.DeepSeq.deepseq (_LinkLoginToProfile'profileId x__) ()))) +{- | Fields : + -} +data LinkLoginToProfileResult + = LinkLoginToProfileResult'_constructor {_LinkLoginToProfileResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LinkLoginToProfileResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message LinkLoginToProfileResult where + messageName _ = Data.Text.pack "cmsapi_1.LinkLoginToProfileResult" + packedMessageDescriptor _ + = "\n\ + \\CANLinkLoginToProfileResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _LinkLoginToProfileResult'_unknownFields + (\ x__ y__ -> x__ {_LinkLoginToProfileResult'_unknownFields = y__}) + defMessage + = LinkLoginToProfileResult'_constructor + {_LinkLoginToProfileResult'_unknownFields = []} + parseMessage + = let + loop :: + LinkLoginToProfileResult + -> Data.ProtoLens.Encoding.Bytes.Parser LinkLoginToProfileResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LinkLoginToProfileResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData LinkLoginToProfileResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LinkLoginToProfileResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.id' @:: Lens' OperationRequest Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.cloneUser' @:: Lens' OperationRequest Proto.CMS.Common1.CloneUser@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'cloneUser' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.CloneUser)@ + * 'Proto.CMS.Cmsapi1_Fields.createProfile' @:: Lens' OperationRequest CreateProfile@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'createProfile' @:: Lens' OperationRequest (Prelude.Maybe CreateProfile)@ + * 'Proto.CMS.Cmsapi1_Fields.updateProfile' @:: Lens' OperationRequest UpdateProfile@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateProfile' @:: Lens' OperationRequest (Prelude.Maybe UpdateProfile)@ + * 'Proto.CMS.Cmsapi1_Fields.removeProfile' @:: Lens' OperationRequest RemoveProfile@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'removeProfile' @:: Lens' OperationRequest (Prelude.Maybe RemoveProfile)@ + * 'Proto.CMS.Cmsapi1_Fields.createUser' @:: Lens' OperationRequest Proto.CMS.Common1.CreateUser@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'createUser' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.CreateUser)@ + * 'Proto.CMS.Cmsapi1_Fields.updateUser' @:: Lens' OperationRequest Proto.CMS.Common1.UpdateUser@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateUser' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.UpdateUser)@ + * 'Proto.CMS.Cmsapi1_Fields.removeUser' @:: Lens' OperationRequest Proto.CMS.Common1.RemoveUser@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'removeUser' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.RemoveUser)@ + * 'Proto.CMS.Cmsapi1_Fields.linkUserToProfile' @:: Lens' OperationRequest LinkLoginToProfile@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'linkUserToProfile' @:: Lens' OperationRequest (Prelude.Maybe LinkLoginToProfile)@ + * 'Proto.CMS.Cmsapi1_Fields.modifyLoginEntitlementService' @:: Lens' OperationRequest Proto.CMS.Login1.ModifyLoginEntitlementService@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'modifyLoginEntitlementService' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Login1.ModifyLoginEntitlementService)@ + * 'Proto.CMS.Cmsapi1_Fields.sendWelcomeEmail' @:: Lens' OperationRequest SendWelcomeEmail@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'sendWelcomeEmail' @:: Lens' OperationRequest (Prelude.Maybe SendWelcomeEmail)@ + * 'Proto.CMS.Cmsapi1_Fields.restoreUser' @:: Lens' OperationRequest Proto.CMS.Common1.RestoreUser@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'restoreUser' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.RestoreUser)@ + * 'Proto.CMS.Cmsapi1_Fields.restoreProfile' @:: Lens' OperationRequest RestoreProfile@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'restoreProfile' @:: Lens' OperationRequest (Prelude.Maybe RestoreProfile)@ + * 'Proto.CMS.Cmsapi1_Fields.updateCustomerSalesSeriesAuthorizationList' @:: Lens' OperationRequest Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationList@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateCustomerSalesSeriesAuthorizationList' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationList)@ + * 'Proto.CMS.Cmsapi1_Fields.updateLoginExchangeMemberIdList' @:: Lens' OperationRequest Proto.CMS.Common1.UpdateLoginExchangeMemberIdList@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateLoginExchangeMemberIdList' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.UpdateLoginExchangeMemberIdList)@ + * 'Proto.CMS.Cmsapi1_Fields.updateLoginSettings' @:: Lens' OperationRequest Proto.CMS.Common1.UpdateLoginSettings@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateLoginSettings' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.UpdateLoginSettings)@ + * 'Proto.CMS.Cmsapi1_Fields.activateLogin' @:: Lens' OperationRequest Proto.CMS.Common1.ActivateLogin@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'activateLogin' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.ActivateLogin)@ + * 'Proto.CMS.Cmsapi1_Fields.deactivateLogin' @:: Lens' OperationRequest Proto.CMS.Common1.DeactivateLogin@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'deactivateLogin' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.DeactivateLogin)@ + * 'Proto.CMS.Cmsapi1_Fields.sendCredentialResetEmail' @:: Lens' OperationRequest SendCredentialResetEmail@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'sendCredentialResetEmail' @:: Lens' OperationRequest (Prelude.Maybe SendCredentialResetEmail)@ + * 'Proto.CMS.Cmsapi1_Fields.generateServiceSecurityToken' @:: Lens' OperationRequest GenerateServiceSecurityToken@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'generateServiceSecurityToken' @:: Lens' OperationRequest (Prelude.Maybe GenerateServiceSecurityToken)@ + * 'Proto.CMS.Cmsapi1_Fields.eraseCurrentCredentials' @:: Lens' OperationRequest Proto.CMS.Common1.EraseCurrentCredentials@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'eraseCurrentCredentials' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.EraseCurrentCredentials)@ + * 'Proto.CMS.Cmsapi1_Fields.terminateLoginSession' @:: Lens' OperationRequest TerminateLoginSession@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'terminateLoginSession' @:: Lens' OperationRequest (Prelude.Maybe TerminateLoginSession)@ + * 'Proto.CMS.Cmsapi1_Fields.updateLoginBillingCustomData' @:: Lens' OperationRequest Proto.CMS.Common1.UpdateLoginBillingCustomData@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateLoginBillingCustomData' @:: Lens' OperationRequest (Prelude.Maybe Proto.CMS.Common1.UpdateLoginBillingCustomData)@ -} +data OperationRequest + = OperationRequest'_constructor {_OperationRequest'id :: !Data.Word.Word32, + _OperationRequest'cloneUser :: !(Prelude.Maybe Proto.CMS.Common1.CloneUser), + _OperationRequest'createProfile :: !(Prelude.Maybe CreateProfile), + _OperationRequest'updateProfile :: !(Prelude.Maybe UpdateProfile), + _OperationRequest'removeProfile :: !(Prelude.Maybe RemoveProfile), + _OperationRequest'createUser :: !(Prelude.Maybe Proto.CMS.Common1.CreateUser), + _OperationRequest'updateUser :: !(Prelude.Maybe Proto.CMS.Common1.UpdateUser), + _OperationRequest'removeUser :: !(Prelude.Maybe Proto.CMS.Common1.RemoveUser), + _OperationRequest'linkUserToProfile :: !(Prelude.Maybe LinkLoginToProfile), + _OperationRequest'modifyLoginEntitlementService :: !(Prelude.Maybe Proto.CMS.Login1.ModifyLoginEntitlementService), + _OperationRequest'sendWelcomeEmail :: !(Prelude.Maybe SendWelcomeEmail), + _OperationRequest'restoreUser :: !(Prelude.Maybe Proto.CMS.Common1.RestoreUser), + _OperationRequest'restoreProfile :: !(Prelude.Maybe RestoreProfile), + _OperationRequest'updateCustomerSalesSeriesAuthorizationList :: !(Prelude.Maybe Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationList), + _OperationRequest'updateLoginExchangeMemberIdList :: !(Prelude.Maybe Proto.CMS.Common1.UpdateLoginExchangeMemberIdList), + _OperationRequest'updateLoginSettings :: !(Prelude.Maybe Proto.CMS.Common1.UpdateLoginSettings), + _OperationRequest'activateLogin :: !(Prelude.Maybe Proto.CMS.Common1.ActivateLogin), + _OperationRequest'deactivateLogin :: !(Prelude.Maybe Proto.CMS.Common1.DeactivateLogin), + _OperationRequest'sendCredentialResetEmail :: !(Prelude.Maybe SendCredentialResetEmail), + _OperationRequest'generateServiceSecurityToken :: !(Prelude.Maybe GenerateServiceSecurityToken), + _OperationRequest'eraseCurrentCredentials :: !(Prelude.Maybe Proto.CMS.Common1.EraseCurrentCredentials), + _OperationRequest'terminateLoginSession :: !(Prelude.Maybe TerminateLoginSession), + _OperationRequest'updateLoginBillingCustomData :: !(Prelude.Maybe Proto.CMS.Common1.UpdateLoginBillingCustomData), + _OperationRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OperationRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OperationRequest "id" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'id + (\ x__ y__ -> x__ {_OperationRequest'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "cloneUser" Proto.CMS.Common1.CloneUser where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'cloneUser + (\ x__ y__ -> x__ {_OperationRequest'cloneUser = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'cloneUser" (Prelude.Maybe Proto.CMS.Common1.CloneUser) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'cloneUser + (\ x__ y__ -> x__ {_OperationRequest'cloneUser = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "createProfile" CreateProfile where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'createProfile + (\ x__ y__ -> x__ {_OperationRequest'createProfile = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'createProfile" (Prelude.Maybe CreateProfile) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'createProfile + (\ x__ y__ -> x__ {_OperationRequest'createProfile = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "updateProfile" UpdateProfile where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateProfile + (\ x__ y__ -> x__ {_OperationRequest'updateProfile = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'updateProfile" (Prelude.Maybe UpdateProfile) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateProfile + (\ x__ y__ -> x__ {_OperationRequest'updateProfile = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "removeProfile" RemoveProfile where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'removeProfile + (\ x__ y__ -> x__ {_OperationRequest'removeProfile = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'removeProfile" (Prelude.Maybe RemoveProfile) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'removeProfile + (\ x__ y__ -> x__ {_OperationRequest'removeProfile = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "createUser" Proto.CMS.Common1.CreateUser where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'createUser + (\ x__ y__ -> x__ {_OperationRequest'createUser = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'createUser" (Prelude.Maybe Proto.CMS.Common1.CreateUser) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'createUser + (\ x__ y__ -> x__ {_OperationRequest'createUser = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "updateUser" Proto.CMS.Common1.UpdateUser where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateUser + (\ x__ y__ -> x__ {_OperationRequest'updateUser = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'updateUser" (Prelude.Maybe Proto.CMS.Common1.UpdateUser) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateUser + (\ x__ y__ -> x__ {_OperationRequest'updateUser = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "removeUser" Proto.CMS.Common1.RemoveUser where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'removeUser + (\ x__ y__ -> x__ {_OperationRequest'removeUser = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'removeUser" (Prelude.Maybe Proto.CMS.Common1.RemoveUser) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'removeUser + (\ x__ y__ -> x__ {_OperationRequest'removeUser = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "linkUserToProfile" LinkLoginToProfile where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'linkUserToProfile + (\ x__ y__ -> x__ {_OperationRequest'linkUserToProfile = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'linkUserToProfile" (Prelude.Maybe LinkLoginToProfile) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'linkUserToProfile + (\ x__ y__ -> x__ {_OperationRequest'linkUserToProfile = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "modifyLoginEntitlementService" Proto.CMS.Login1.ModifyLoginEntitlementService where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'modifyLoginEntitlementService + (\ x__ y__ + -> x__ {_OperationRequest'modifyLoginEntitlementService = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'modifyLoginEntitlementService" (Prelude.Maybe Proto.CMS.Login1.ModifyLoginEntitlementService) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'modifyLoginEntitlementService + (\ x__ y__ + -> x__ {_OperationRequest'modifyLoginEntitlementService = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "sendWelcomeEmail" SendWelcomeEmail where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'sendWelcomeEmail + (\ x__ y__ -> x__ {_OperationRequest'sendWelcomeEmail = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'sendWelcomeEmail" (Prelude.Maybe SendWelcomeEmail) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'sendWelcomeEmail + (\ x__ y__ -> x__ {_OperationRequest'sendWelcomeEmail = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "restoreUser" Proto.CMS.Common1.RestoreUser where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'restoreUser + (\ x__ y__ -> x__ {_OperationRequest'restoreUser = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'restoreUser" (Prelude.Maybe Proto.CMS.Common1.RestoreUser) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'restoreUser + (\ x__ y__ -> x__ {_OperationRequest'restoreUser = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "restoreProfile" RestoreProfile where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'restoreProfile + (\ x__ y__ -> x__ {_OperationRequest'restoreProfile = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'restoreProfile" (Prelude.Maybe RestoreProfile) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'restoreProfile + (\ x__ y__ -> x__ {_OperationRequest'restoreProfile = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "updateCustomerSalesSeriesAuthorizationList" Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationList where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateCustomerSalesSeriesAuthorizationList + (\ x__ y__ + -> x__ + {_OperationRequest'updateCustomerSalesSeriesAuthorizationList = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'updateCustomerSalesSeriesAuthorizationList" (Prelude.Maybe Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationList) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateCustomerSalesSeriesAuthorizationList + (\ x__ y__ + -> x__ + {_OperationRequest'updateCustomerSalesSeriesAuthorizationList = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "updateLoginExchangeMemberIdList" Proto.CMS.Common1.UpdateLoginExchangeMemberIdList where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateLoginExchangeMemberIdList + (\ x__ y__ + -> x__ {_OperationRequest'updateLoginExchangeMemberIdList = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'updateLoginExchangeMemberIdList" (Prelude.Maybe Proto.CMS.Common1.UpdateLoginExchangeMemberIdList) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateLoginExchangeMemberIdList + (\ x__ y__ + -> x__ {_OperationRequest'updateLoginExchangeMemberIdList = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "updateLoginSettings" Proto.CMS.Common1.UpdateLoginSettings where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateLoginSettings + (\ x__ y__ -> x__ {_OperationRequest'updateLoginSettings = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'updateLoginSettings" (Prelude.Maybe Proto.CMS.Common1.UpdateLoginSettings) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateLoginSettings + (\ x__ y__ -> x__ {_OperationRequest'updateLoginSettings = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "activateLogin" Proto.CMS.Common1.ActivateLogin where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'activateLogin + (\ x__ y__ -> x__ {_OperationRequest'activateLogin = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'activateLogin" (Prelude.Maybe Proto.CMS.Common1.ActivateLogin) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'activateLogin + (\ x__ y__ -> x__ {_OperationRequest'activateLogin = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "deactivateLogin" Proto.CMS.Common1.DeactivateLogin where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'deactivateLogin + (\ x__ y__ -> x__ {_OperationRequest'deactivateLogin = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'deactivateLogin" (Prelude.Maybe Proto.CMS.Common1.DeactivateLogin) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'deactivateLogin + (\ x__ y__ -> x__ {_OperationRequest'deactivateLogin = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "sendCredentialResetEmail" SendCredentialResetEmail where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'sendCredentialResetEmail + (\ x__ y__ + -> x__ {_OperationRequest'sendCredentialResetEmail = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'sendCredentialResetEmail" (Prelude.Maybe SendCredentialResetEmail) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'sendCredentialResetEmail + (\ x__ y__ + -> x__ {_OperationRequest'sendCredentialResetEmail = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "generateServiceSecurityToken" GenerateServiceSecurityToken where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'generateServiceSecurityToken + (\ x__ y__ + -> x__ {_OperationRequest'generateServiceSecurityToken = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'generateServiceSecurityToken" (Prelude.Maybe GenerateServiceSecurityToken) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'generateServiceSecurityToken + (\ x__ y__ + -> x__ {_OperationRequest'generateServiceSecurityToken = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "eraseCurrentCredentials" Proto.CMS.Common1.EraseCurrentCredentials where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'eraseCurrentCredentials + (\ x__ y__ + -> x__ {_OperationRequest'eraseCurrentCredentials = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'eraseCurrentCredentials" (Prelude.Maybe Proto.CMS.Common1.EraseCurrentCredentials) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'eraseCurrentCredentials + (\ x__ y__ + -> x__ {_OperationRequest'eraseCurrentCredentials = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "terminateLoginSession" TerminateLoginSession where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'terminateLoginSession + (\ x__ y__ -> x__ {_OperationRequest'terminateLoginSession = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'terminateLoginSession" (Prelude.Maybe TerminateLoginSession) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'terminateLoginSession + (\ x__ y__ -> x__ {_OperationRequest'terminateLoginSession = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationRequest "updateLoginBillingCustomData" Proto.CMS.Common1.UpdateLoginBillingCustomData where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateLoginBillingCustomData + (\ x__ y__ + -> x__ {_OperationRequest'updateLoginBillingCustomData = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationRequest "maybe'updateLoginBillingCustomData" (Prelude.Maybe Proto.CMS.Common1.UpdateLoginBillingCustomData) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationRequest'updateLoginBillingCustomData + (\ x__ y__ + -> x__ {_OperationRequest'updateLoginBillingCustomData = y__})) + Prelude.id +instance Data.ProtoLens.Message OperationRequest where + messageName _ = Data.Text.pack "cmsapi_1.OperationRequest" + packedMessageDescriptor _ + = "\n\ + \\DLEOperationRequest\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC22\n\ + \\n\ + \clone_user\CAN\STX \SOH(\v2\DC3.common_1.CloneUserR\tcloneUser\DC2>\n\ + \\SOcreate_profile\CAN\ETX \SOH(\v2\ETB.cmsapi_1.CreateProfileR\rcreateProfile\DC2>\n\ + \\SOupdate_profile\CAN\EOT \SOH(\v2\ETB.cmsapi_1.UpdateProfileR\rupdateProfile\DC2>\n\ + \\SOremove_profile\CAN\ENQ \SOH(\v2\ETB.cmsapi_1.RemoveProfileR\rremoveProfile\DC25\n\ + \\vcreate_user\CAN\ACK \SOH(\v2\DC4.common_1.CreateUserR\n\ + \createUser\DC25\n\ + \\vupdate_user\CAN\a \SOH(\v2\DC4.common_1.UpdateUserR\n\ + \updateUser\DC25\n\ + \\vremove_user\CAN\b \SOH(\v2\DC4.common_1.RemoveUserR\n\ + \removeUser\DC2M\n\ + \\DC4link_user_to_profile\CAN\t \SOH(\v2\FS.cmsapi_1.LinkLoginToProfileR\DC1linkUserToProfile\DC2o\n\ + \ modify_login_entitlement_service\CAN\n\ + \ \SOH(\v2&.login_1.ModifyLoginEntitlementServiceR\GSmodifyLoginEntitlementService\DC2H\n\ + \\DC2send_welcome_email\CAN\v \SOH(\v2\SUB.cmsapi_1.SendWelcomeEmailR\DLEsendWelcomeEmail\DC28\n\ + \\frestore_user\CAN\f \SOH(\v2\NAK.common_1.RestoreUserR\vrestoreUser\DC2A\n\ + \\SIrestore_profile\CAN\r \SOH(\v2\CAN.cmsapi_1.RestoreProfileR\SOrestoreProfile\DC2\153\SOH\n\ + \/update_customer_sales_series_authorization_list\CAN\SO \SOH(\v24.common_1.UpdateCustomerSalesSeriesAuthorizationListR*updateCustomerSalesSeriesAuthorizationList\DC2x\n\ + \$update_login_exchange_member_id_list\CAN\SI \SOH(\v2).common_1.UpdateLoginExchangeMemberIdListR\USupdateLoginExchangeMemberIdList\DC2Q\n\ + \\NAKupdate_login_settings\CAN\DLE \SOH(\v2\GS.common_1.UpdateLoginSettingsR\DC3updateLoginSettings\DC2>\n\ + \\SOactivate_login\CAN\DC1 \SOH(\v2\ETB.common_1.ActivateLoginR\ractivateLogin\DC2D\n\ + \\DLEdeactivate_login\CAN\DC2 \SOH(\v2\EM.common_1.DeactivateLoginR\SIdeactivateLogin\DC2a\n\ + \\ESCsend_credential_reset_email\CAN\DC3 \SOH(\v2\".cmsapi_1.SendCredentialResetEmailR\CANsendCredentialResetEmail\DC2m\n\ + \\USgenerate_service_security_token\CAN\DC4 \SOH(\v2&.cmsapi_1.GenerateServiceSecurityTokenR\FSgenerateServiceSecurityToken\DC2]\n\ + \\EMerase_current_credentials\CAN\NAK \SOH(\v2!.common_1.EraseCurrentCredentialsR\ETBeraseCurrentCredentials\DC2W\n\ + \\ETBterminate_login_session\CAN\SYN \SOH(\v2\US.cmsapi_1.TerminateLoginSessionR\NAKterminateLoginSession\DC2n\n\ + \ update_login_billing_custom_data\CAN\ETB \SOH(\v2&.common_1.UpdateLoginBillingCustomDataR\FSupdateLoginBillingCustomData" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"id")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + cloneUser__field_descriptor + = Data.ProtoLens.FieldDescriptor + "clone_user" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.CloneUser) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cloneUser")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + createProfile__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_profile" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateProfile) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createProfile")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + updateProfile__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_profile" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateProfile) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateProfile")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + removeProfile__field_descriptor + = Data.ProtoLens.FieldDescriptor + "remove_profile" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RemoveProfile) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removeProfile")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + createUser__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_user" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.CreateUser) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createUser")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + updateUser__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_user" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UpdateUser) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateUser")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + removeUser__field_descriptor + = Data.ProtoLens.FieldDescriptor + "remove_user" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.RemoveUser) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removeUser")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + linkUserToProfile__field_descriptor + = Data.ProtoLens.FieldDescriptor + "link_user_to_profile" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LinkLoginToProfile) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'linkUserToProfile")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + modifyLoginEntitlementService__field_descriptor + = Data.ProtoLens.FieldDescriptor + "modify_login_entitlement_service" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Login1.ModifyLoginEntitlementService) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'modifyLoginEntitlementService")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + sendWelcomeEmail__field_descriptor + = Data.ProtoLens.FieldDescriptor + "send_welcome_email" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SendWelcomeEmail) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sendWelcomeEmail")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + restoreUser__field_descriptor + = Data.ProtoLens.FieldDescriptor + "restore_user" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.RestoreUser) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'restoreUser")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + restoreProfile__field_descriptor + = Data.ProtoLens.FieldDescriptor + "restore_profile" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RestoreProfile) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'restoreProfile")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + updateCustomerSalesSeriesAuthorizationList__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_customer_sales_series_authorization_list" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationList) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateCustomerSalesSeriesAuthorizationList")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + updateLoginExchangeMemberIdList__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_login_exchange_member_id_list" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UpdateLoginExchangeMemberIdList) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateLoginExchangeMemberIdList")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + updateLoginSettings__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_login_settings" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UpdateLoginSettings) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateLoginSettings")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + activateLogin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "activate_login" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.ActivateLogin) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'activateLogin")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + deactivateLogin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "deactivate_login" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.DeactivateLogin) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'deactivateLogin")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + sendCredentialResetEmail__field_descriptor + = Data.ProtoLens.FieldDescriptor + "send_credential_reset_email" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SendCredentialResetEmail) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sendCredentialResetEmail")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + generateServiceSecurityToken__field_descriptor + = Data.ProtoLens.FieldDescriptor + "generate_service_security_token" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor GenerateServiceSecurityToken) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'generateServiceSecurityToken")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + eraseCurrentCredentials__field_descriptor + = Data.ProtoLens.FieldDescriptor + "erase_current_credentials" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.EraseCurrentCredentials) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'eraseCurrentCredentials")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + terminateLoginSession__field_descriptor + = Data.ProtoLens.FieldDescriptor + "terminate_login_session" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TerminateLoginSession) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'terminateLoginSession")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + updateLoginBillingCustomData__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_login_billing_custom_data" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UpdateLoginBillingCustomData) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateLoginBillingCustomData")) :: + Data.ProtoLens.FieldDescriptor OperationRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, cloneUser__field_descriptor), + (Data.ProtoLens.Tag 3, createProfile__field_descriptor), + (Data.ProtoLens.Tag 4, updateProfile__field_descriptor), + (Data.ProtoLens.Tag 5, removeProfile__field_descriptor), + (Data.ProtoLens.Tag 6, createUser__field_descriptor), + (Data.ProtoLens.Tag 7, updateUser__field_descriptor), + (Data.ProtoLens.Tag 8, removeUser__field_descriptor), + (Data.ProtoLens.Tag 9, linkUserToProfile__field_descriptor), + (Data.ProtoLens.Tag 10, + modifyLoginEntitlementService__field_descriptor), + (Data.ProtoLens.Tag 11, sendWelcomeEmail__field_descriptor), + (Data.ProtoLens.Tag 12, restoreUser__field_descriptor), + (Data.ProtoLens.Tag 13, restoreProfile__field_descriptor), + (Data.ProtoLens.Tag 14, + updateCustomerSalesSeriesAuthorizationList__field_descriptor), + (Data.ProtoLens.Tag 15, + updateLoginExchangeMemberIdList__field_descriptor), + (Data.ProtoLens.Tag 16, updateLoginSettings__field_descriptor), + (Data.ProtoLens.Tag 17, activateLogin__field_descriptor), + (Data.ProtoLens.Tag 18, deactivateLogin__field_descriptor), + (Data.ProtoLens.Tag 19, + sendCredentialResetEmail__field_descriptor), + (Data.ProtoLens.Tag 20, + generateServiceSecurityToken__field_descriptor), + (Data.ProtoLens.Tag 21, eraseCurrentCredentials__field_descriptor), + (Data.ProtoLens.Tag 22, terminateLoginSession__field_descriptor), + (Data.ProtoLens.Tag 23, + updateLoginBillingCustomData__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OperationRequest'_unknownFields + (\ x__ y__ -> x__ {_OperationRequest'_unknownFields = y__}) + defMessage + = OperationRequest'_constructor + {_OperationRequest'id = Data.ProtoLens.fieldDefault, + _OperationRequest'cloneUser = Prelude.Nothing, + _OperationRequest'createProfile = Prelude.Nothing, + _OperationRequest'updateProfile = Prelude.Nothing, + _OperationRequest'removeProfile = Prelude.Nothing, + _OperationRequest'createUser = Prelude.Nothing, + _OperationRequest'updateUser = Prelude.Nothing, + _OperationRequest'removeUser = Prelude.Nothing, + _OperationRequest'linkUserToProfile = Prelude.Nothing, + _OperationRequest'modifyLoginEntitlementService = Prelude.Nothing, + _OperationRequest'sendWelcomeEmail = Prelude.Nothing, + _OperationRequest'restoreUser = Prelude.Nothing, + _OperationRequest'restoreProfile = Prelude.Nothing, + _OperationRequest'updateCustomerSalesSeriesAuthorizationList = Prelude.Nothing, + _OperationRequest'updateLoginExchangeMemberIdList = Prelude.Nothing, + _OperationRequest'updateLoginSettings = Prelude.Nothing, + _OperationRequest'activateLogin = Prelude.Nothing, + _OperationRequest'deactivateLogin = Prelude.Nothing, + _OperationRequest'sendCredentialResetEmail = Prelude.Nothing, + _OperationRequest'generateServiceSecurityToken = Prelude.Nothing, + _OperationRequest'eraseCurrentCredentials = Prelude.Nothing, + _OperationRequest'terminateLoginSession = Prelude.Nothing, + _OperationRequest'updateLoginBillingCustomData = Prelude.Nothing, + _OperationRequest'_unknownFields = []} + parseMessage + = let + loop :: + OperationRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser OperationRequest + loop x required'id + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = (if required'id then (:) "id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "clone_user" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"cloneUser") y x) + required'id + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_profile" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"createProfile") y x) + required'id + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_profile" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateProfile") y x) + required'id + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "remove_profile" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"removeProfile") y x) + required'id + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_user" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"createUser") y x) + required'id + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_user" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"updateUser") y x) + required'id + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "remove_user" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"removeUser") y x) + required'id + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "link_user_to_profile" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"linkUserToProfile") y x) + required'id + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "modify_login_entitlement_service" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"modifyLoginEntitlementService") y + x) + required'id + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "send_welcome_email" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"sendWelcomeEmail") y x) + required'id + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "restore_user" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"restoreUser") y x) + required'id + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "restore_profile" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"restoreProfile") y x) + required'id + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_customer_sales_series_authorization_list" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"updateCustomerSalesSeriesAuthorizationList") + y x) + required'id + 122 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_login_exchange_member_id_list" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateLoginExchangeMemberIdList") + y x) + required'id + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_login_settings" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateLoginSettings") y x) + required'id + 138 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "activate_login" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"activateLogin") y x) + required'id + 146 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "deactivate_login" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"deactivateLogin") y x) + required'id + 154 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "send_credential_reset_email" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"sendCredentialResetEmail") y x) + required'id + 162 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "generate_service_security_token" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"generateServiceSecurityToken") y + x) + required'id + 170 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "erase_current_credentials" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"eraseCurrentCredentials") y x) + required'id + 178 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "terminate_login_session" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"terminateLoginSession") y x) + required'id + 186 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_login_billing_custom_data" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateLoginBillingCustomData") y + x) + required'id + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'id + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "OperationRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"id") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'cloneUser") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'createProfile") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'updateProfile") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'removeProfile") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'createUser") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'updateUser") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'removeUser") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'linkUserToProfile") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'modifyLoginEntitlementService") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'sendWelcomeEmail") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'restoreUser") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'restoreProfile") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateCustomerSalesSeriesAuthorizationList") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateLoginExchangeMemberIdList") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateLoginSettings") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'activateLogin") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'deactivateLogin") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 146) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'sendCredentialResetEmail") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 154) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'generateServiceSecurityToken") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 162) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'eraseCurrentCredentials") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 170) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'terminateLoginSession") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 178) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateLoginBillingCustomData") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 186) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))))))))))) +instance Control.DeepSeq.NFData OperationRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OperationRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OperationRequest'id x__) + (Control.DeepSeq.deepseq + (_OperationRequest'cloneUser x__) + (Control.DeepSeq.deepseq + (_OperationRequest'createProfile x__) + (Control.DeepSeq.deepseq + (_OperationRequest'updateProfile x__) + (Control.DeepSeq.deepseq + (_OperationRequest'removeProfile x__) + (Control.DeepSeq.deepseq + (_OperationRequest'createUser x__) + (Control.DeepSeq.deepseq + (_OperationRequest'updateUser x__) + (Control.DeepSeq.deepseq + (_OperationRequest'removeUser x__) + (Control.DeepSeq.deepseq + (_OperationRequest'linkUserToProfile x__) + (Control.DeepSeq.deepseq + (_OperationRequest'modifyLoginEntitlementService x__) + (Control.DeepSeq.deepseq + (_OperationRequest'sendWelcomeEmail x__) + (Control.DeepSeq.deepseq + (_OperationRequest'restoreUser x__) + (Control.DeepSeq.deepseq + (_OperationRequest'restoreProfile x__) + (Control.DeepSeq.deepseq + (_OperationRequest'updateCustomerSalesSeriesAuthorizationList + x__) + (Control.DeepSeq.deepseq + (_OperationRequest'updateLoginExchangeMemberIdList + x__) + (Control.DeepSeq.deepseq + (_OperationRequest'updateLoginSettings + x__) + (Control.DeepSeq.deepseq + (_OperationRequest'activateLogin + x__) + (Control.DeepSeq.deepseq + (_OperationRequest'deactivateLogin + x__) + (Control.DeepSeq.deepseq + (_OperationRequest'sendCredentialResetEmail + x__) + (Control.DeepSeq.deepseq + (_OperationRequest'generateServiceSecurityToken + x__) + (Control.DeepSeq.deepseq + (_OperationRequest'eraseCurrentCredentials + x__) + (Control.DeepSeq.deepseq + (_OperationRequest'terminateLoginSession + x__) + (Control.DeepSeq.deepseq + (_OperationRequest'updateLoginBillingCustomData + x__) + ()))))))))))))))))))))))) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.requestId' @:: Lens' OperationResult Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.operationStatus' @:: Lens' OperationResult Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.errorMessage' @:: Lens' OperationResult Proto.Common.Shared1.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'errorMessage' @:: Lens' OperationResult (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.cloneUserResult' @:: Lens' OperationResult Proto.CMS.Common1.CloneUserResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'cloneUserResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.CloneUserResult)@ + * 'Proto.CMS.Cmsapi1_Fields.createProfileResult' @:: Lens' OperationResult CreateProfileResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'createProfileResult' @:: Lens' OperationResult (Prelude.Maybe CreateProfileResult)@ + * 'Proto.CMS.Cmsapi1_Fields.updateProfileResult' @:: Lens' OperationResult UpdateProfileResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateProfileResult' @:: Lens' OperationResult (Prelude.Maybe UpdateProfileResult)@ + * 'Proto.CMS.Cmsapi1_Fields.removeProfileResult' @:: Lens' OperationResult RemoveProfileResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'removeProfileResult' @:: Lens' OperationResult (Prelude.Maybe RemoveProfileResult)@ + * 'Proto.CMS.Cmsapi1_Fields.createUserResult' @:: Lens' OperationResult Proto.CMS.Common1.CreateUserResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'createUserResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.CreateUserResult)@ + * 'Proto.CMS.Cmsapi1_Fields.updateUserResult' @:: Lens' OperationResult Proto.CMS.Common1.UpdateUserResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateUserResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.UpdateUserResult)@ + * 'Proto.CMS.Cmsapi1_Fields.removeUserResult' @:: Lens' OperationResult Proto.CMS.Common1.RemoveUserResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'removeUserResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.RemoveUserResult)@ + * 'Proto.CMS.Cmsapi1_Fields.linkLoginToProfileResult' @:: Lens' OperationResult LinkLoginToProfileResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'linkLoginToProfileResult' @:: Lens' OperationResult (Prelude.Maybe LinkLoginToProfileResult)@ + * 'Proto.CMS.Cmsapi1_Fields.modifyLoginEntitlementServiceResult' @:: Lens' OperationResult Proto.CMS.Login1.ModifyLoginEntitlementServiceResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'modifyLoginEntitlementServiceResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Login1.ModifyLoginEntitlementServiceResult)@ + * 'Proto.CMS.Cmsapi1_Fields.sendWelcomeEmailResult' @:: Lens' OperationResult SendWelcomeEmailResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'sendWelcomeEmailResult' @:: Lens' OperationResult (Prelude.Maybe SendWelcomeEmailResult)@ + * 'Proto.CMS.Cmsapi1_Fields.restoreUserResult' @:: Lens' OperationResult Proto.CMS.Common1.RestoreUserResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'restoreUserResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.RestoreUserResult)@ + * 'Proto.CMS.Cmsapi1_Fields.restoreProfileResult' @:: Lens' OperationResult RestoreProfileResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'restoreProfileResult' @:: Lens' OperationResult (Prelude.Maybe RestoreProfileResult)@ + * 'Proto.CMS.Cmsapi1_Fields.updateCustomerSalesSeriesAuthorizationListResult' @:: Lens' OperationResult Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationListResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateCustomerSalesSeriesAuthorizationListResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationListResult)@ + * 'Proto.CMS.Cmsapi1_Fields.updateLoginExchangeMemberIdListResult' @:: Lens' OperationResult Proto.CMS.Common1.UpdateLoginExchangeMemberIdListResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateLoginExchangeMemberIdListResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.UpdateLoginExchangeMemberIdListResult)@ + * 'Proto.CMS.Cmsapi1_Fields.updateLoginSettingsResult' @:: Lens' OperationResult Proto.CMS.Common1.UpdateLoginSettingsResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateLoginSettingsResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.UpdateLoginSettingsResult)@ + * 'Proto.CMS.Cmsapi1_Fields.activateLoginResult' @:: Lens' OperationResult Proto.CMS.Common1.ActivateLoginResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'activateLoginResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.ActivateLoginResult)@ + * 'Proto.CMS.Cmsapi1_Fields.deactivateLoginResult' @:: Lens' OperationResult Proto.CMS.Common1.DeactivateLoginResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'deactivateLoginResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.DeactivateLoginResult)@ + * 'Proto.CMS.Cmsapi1_Fields.sendCredentialResetEmailResult' @:: Lens' OperationResult SendCredentialResetEmailResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'sendCredentialResetEmailResult' @:: Lens' OperationResult (Prelude.Maybe SendCredentialResetEmailResult)@ + * 'Proto.CMS.Cmsapi1_Fields.generateServiceSecurityTokenResult' @:: Lens' OperationResult GenerateServiceSecurityTokenResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'generateServiceSecurityTokenResult' @:: Lens' OperationResult (Prelude.Maybe GenerateServiceSecurityTokenResult)@ + * 'Proto.CMS.Cmsapi1_Fields.eraseCurrentCredentialsResult' @:: Lens' OperationResult Proto.CMS.Common1.EraseCurrentCredentialsResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'eraseCurrentCredentialsResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.EraseCurrentCredentialsResult)@ + * 'Proto.CMS.Cmsapi1_Fields.terminateLoginSessionResult' @:: Lens' OperationResult TerminateLoginSessionResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'terminateLoginSessionResult' @:: Lens' OperationResult (Prelude.Maybe TerminateLoginSessionResult)@ + * 'Proto.CMS.Cmsapi1_Fields.updateLoginBillingCustomDataResult' @:: Lens' OperationResult Proto.CMS.Common1.UpdateLoginBillingCustomDataResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'updateLoginBillingCustomDataResult' @:: Lens' OperationResult (Prelude.Maybe Proto.CMS.Common1.UpdateLoginBillingCustomDataResult)@ + * 'Proto.CMS.Cmsapi1_Fields.trackingNumber' @:: Lens' OperationResult Data.Word.Word64@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'trackingNumber' @:: Lens' OperationResult (Prelude.Maybe Data.Word.Word64)@ -} +data OperationResult + = OperationResult'_constructor {_OperationResult'requestId :: !Data.Word.Word32, + _OperationResult'operationStatus :: !Data.Word.Word32, + _OperationResult'errorMessage :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _OperationResult'cloneUserResult :: !(Prelude.Maybe Proto.CMS.Common1.CloneUserResult), + _OperationResult'createProfileResult :: !(Prelude.Maybe CreateProfileResult), + _OperationResult'updateProfileResult :: !(Prelude.Maybe UpdateProfileResult), + _OperationResult'removeProfileResult :: !(Prelude.Maybe RemoveProfileResult), + _OperationResult'createUserResult :: !(Prelude.Maybe Proto.CMS.Common1.CreateUserResult), + _OperationResult'updateUserResult :: !(Prelude.Maybe Proto.CMS.Common1.UpdateUserResult), + _OperationResult'removeUserResult :: !(Prelude.Maybe Proto.CMS.Common1.RemoveUserResult), + _OperationResult'linkLoginToProfileResult :: !(Prelude.Maybe LinkLoginToProfileResult), + _OperationResult'modifyLoginEntitlementServiceResult :: !(Prelude.Maybe Proto.CMS.Login1.ModifyLoginEntitlementServiceResult), + _OperationResult'sendWelcomeEmailResult :: !(Prelude.Maybe SendWelcomeEmailResult), + _OperationResult'restoreUserResult :: !(Prelude.Maybe Proto.CMS.Common1.RestoreUserResult), + _OperationResult'restoreProfileResult :: !(Prelude.Maybe RestoreProfileResult), + _OperationResult'updateCustomerSalesSeriesAuthorizationListResult :: !(Prelude.Maybe Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationListResult), + _OperationResult'updateLoginExchangeMemberIdListResult :: !(Prelude.Maybe Proto.CMS.Common1.UpdateLoginExchangeMemberIdListResult), + _OperationResult'updateLoginSettingsResult :: !(Prelude.Maybe Proto.CMS.Common1.UpdateLoginSettingsResult), + _OperationResult'activateLoginResult :: !(Prelude.Maybe Proto.CMS.Common1.ActivateLoginResult), + _OperationResult'deactivateLoginResult :: !(Prelude.Maybe Proto.CMS.Common1.DeactivateLoginResult), + _OperationResult'sendCredentialResetEmailResult :: !(Prelude.Maybe SendCredentialResetEmailResult), + _OperationResult'generateServiceSecurityTokenResult :: !(Prelude.Maybe GenerateServiceSecurityTokenResult), + _OperationResult'eraseCurrentCredentialsResult :: !(Prelude.Maybe Proto.CMS.Common1.EraseCurrentCredentialsResult), + _OperationResult'terminateLoginSessionResult :: !(Prelude.Maybe TerminateLoginSessionResult), + _OperationResult'updateLoginBillingCustomDataResult :: !(Prelude.Maybe Proto.CMS.Common1.UpdateLoginBillingCustomDataResult), + _OperationResult'trackingNumber :: !(Prelude.Maybe Data.Word.Word64), + _OperationResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OperationResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OperationResult "requestId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'requestId + (\ x__ y__ -> x__ {_OperationResult'requestId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "operationStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'operationStatus + (\ x__ y__ -> x__ {_OperationResult'operationStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "errorMessage" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'errorMessage + (\ x__ y__ -> x__ {_OperationResult'errorMessage = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'errorMessage" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'errorMessage + (\ x__ y__ -> x__ {_OperationResult'errorMessage = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "cloneUserResult" Proto.CMS.Common1.CloneUserResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'cloneUserResult + (\ x__ y__ -> x__ {_OperationResult'cloneUserResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'cloneUserResult" (Prelude.Maybe Proto.CMS.Common1.CloneUserResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'cloneUserResult + (\ x__ y__ -> x__ {_OperationResult'cloneUserResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "createProfileResult" CreateProfileResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'createProfileResult + (\ x__ y__ -> x__ {_OperationResult'createProfileResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'createProfileResult" (Prelude.Maybe CreateProfileResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'createProfileResult + (\ x__ y__ -> x__ {_OperationResult'createProfileResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "updateProfileResult" UpdateProfileResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateProfileResult + (\ x__ y__ -> x__ {_OperationResult'updateProfileResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'updateProfileResult" (Prelude.Maybe UpdateProfileResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateProfileResult + (\ x__ y__ -> x__ {_OperationResult'updateProfileResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "removeProfileResult" RemoveProfileResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'removeProfileResult + (\ x__ y__ -> x__ {_OperationResult'removeProfileResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'removeProfileResult" (Prelude.Maybe RemoveProfileResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'removeProfileResult + (\ x__ y__ -> x__ {_OperationResult'removeProfileResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "createUserResult" Proto.CMS.Common1.CreateUserResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'createUserResult + (\ x__ y__ -> x__ {_OperationResult'createUserResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'createUserResult" (Prelude.Maybe Proto.CMS.Common1.CreateUserResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'createUserResult + (\ x__ y__ -> x__ {_OperationResult'createUserResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "updateUserResult" Proto.CMS.Common1.UpdateUserResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateUserResult + (\ x__ y__ -> x__ {_OperationResult'updateUserResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'updateUserResult" (Prelude.Maybe Proto.CMS.Common1.UpdateUserResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateUserResult + (\ x__ y__ -> x__ {_OperationResult'updateUserResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "removeUserResult" Proto.CMS.Common1.RemoveUserResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'removeUserResult + (\ x__ y__ -> x__ {_OperationResult'removeUserResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'removeUserResult" (Prelude.Maybe Proto.CMS.Common1.RemoveUserResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'removeUserResult + (\ x__ y__ -> x__ {_OperationResult'removeUserResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "linkLoginToProfileResult" LinkLoginToProfileResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'linkLoginToProfileResult + (\ x__ y__ + -> x__ {_OperationResult'linkLoginToProfileResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'linkLoginToProfileResult" (Prelude.Maybe LinkLoginToProfileResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'linkLoginToProfileResult + (\ x__ y__ + -> x__ {_OperationResult'linkLoginToProfileResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "modifyLoginEntitlementServiceResult" Proto.CMS.Login1.ModifyLoginEntitlementServiceResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'modifyLoginEntitlementServiceResult + (\ x__ y__ + -> x__ + {_OperationResult'modifyLoginEntitlementServiceResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'modifyLoginEntitlementServiceResult" (Prelude.Maybe Proto.CMS.Login1.ModifyLoginEntitlementServiceResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'modifyLoginEntitlementServiceResult + (\ x__ y__ + -> x__ + {_OperationResult'modifyLoginEntitlementServiceResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "sendWelcomeEmailResult" SendWelcomeEmailResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'sendWelcomeEmailResult + (\ x__ y__ -> x__ {_OperationResult'sendWelcomeEmailResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'sendWelcomeEmailResult" (Prelude.Maybe SendWelcomeEmailResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'sendWelcomeEmailResult + (\ x__ y__ -> x__ {_OperationResult'sendWelcomeEmailResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "restoreUserResult" Proto.CMS.Common1.RestoreUserResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'restoreUserResult + (\ x__ y__ -> x__ {_OperationResult'restoreUserResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'restoreUserResult" (Prelude.Maybe Proto.CMS.Common1.RestoreUserResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'restoreUserResult + (\ x__ y__ -> x__ {_OperationResult'restoreUserResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "restoreProfileResult" RestoreProfileResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'restoreProfileResult + (\ x__ y__ -> x__ {_OperationResult'restoreProfileResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'restoreProfileResult" (Prelude.Maybe RestoreProfileResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'restoreProfileResult + (\ x__ y__ -> x__ {_OperationResult'restoreProfileResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "updateCustomerSalesSeriesAuthorizationListResult" Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateCustomerSalesSeriesAuthorizationListResult + (\ x__ y__ + -> x__ + {_OperationResult'updateCustomerSalesSeriesAuthorizationListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'updateCustomerSalesSeriesAuthorizationListResult" (Prelude.Maybe Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateCustomerSalesSeriesAuthorizationListResult + (\ x__ y__ + -> x__ + {_OperationResult'updateCustomerSalesSeriesAuthorizationListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "updateLoginExchangeMemberIdListResult" Proto.CMS.Common1.UpdateLoginExchangeMemberIdListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateLoginExchangeMemberIdListResult + (\ x__ y__ + -> x__ + {_OperationResult'updateLoginExchangeMemberIdListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'updateLoginExchangeMemberIdListResult" (Prelude.Maybe Proto.CMS.Common1.UpdateLoginExchangeMemberIdListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateLoginExchangeMemberIdListResult + (\ x__ y__ + -> x__ + {_OperationResult'updateLoginExchangeMemberIdListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "updateLoginSettingsResult" Proto.CMS.Common1.UpdateLoginSettingsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateLoginSettingsResult + (\ x__ y__ + -> x__ {_OperationResult'updateLoginSettingsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'updateLoginSettingsResult" (Prelude.Maybe Proto.CMS.Common1.UpdateLoginSettingsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateLoginSettingsResult + (\ x__ y__ + -> x__ {_OperationResult'updateLoginSettingsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "activateLoginResult" Proto.CMS.Common1.ActivateLoginResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'activateLoginResult + (\ x__ y__ -> x__ {_OperationResult'activateLoginResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'activateLoginResult" (Prelude.Maybe Proto.CMS.Common1.ActivateLoginResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'activateLoginResult + (\ x__ y__ -> x__ {_OperationResult'activateLoginResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "deactivateLoginResult" Proto.CMS.Common1.DeactivateLoginResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'deactivateLoginResult + (\ x__ y__ -> x__ {_OperationResult'deactivateLoginResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'deactivateLoginResult" (Prelude.Maybe Proto.CMS.Common1.DeactivateLoginResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'deactivateLoginResult + (\ x__ y__ -> x__ {_OperationResult'deactivateLoginResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "sendCredentialResetEmailResult" SendCredentialResetEmailResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'sendCredentialResetEmailResult + (\ x__ y__ + -> x__ {_OperationResult'sendCredentialResetEmailResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'sendCredentialResetEmailResult" (Prelude.Maybe SendCredentialResetEmailResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'sendCredentialResetEmailResult + (\ x__ y__ + -> x__ {_OperationResult'sendCredentialResetEmailResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "generateServiceSecurityTokenResult" GenerateServiceSecurityTokenResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'generateServiceSecurityTokenResult + (\ x__ y__ + -> x__ + {_OperationResult'generateServiceSecurityTokenResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'generateServiceSecurityTokenResult" (Prelude.Maybe GenerateServiceSecurityTokenResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'generateServiceSecurityTokenResult + (\ x__ y__ + -> x__ + {_OperationResult'generateServiceSecurityTokenResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "eraseCurrentCredentialsResult" Proto.CMS.Common1.EraseCurrentCredentialsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'eraseCurrentCredentialsResult + (\ x__ y__ + -> x__ {_OperationResult'eraseCurrentCredentialsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'eraseCurrentCredentialsResult" (Prelude.Maybe Proto.CMS.Common1.EraseCurrentCredentialsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'eraseCurrentCredentialsResult + (\ x__ y__ + -> x__ {_OperationResult'eraseCurrentCredentialsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "terminateLoginSessionResult" TerminateLoginSessionResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'terminateLoginSessionResult + (\ x__ y__ + -> x__ {_OperationResult'terminateLoginSessionResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'terminateLoginSessionResult" (Prelude.Maybe TerminateLoginSessionResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'terminateLoginSessionResult + (\ x__ y__ + -> x__ {_OperationResult'terminateLoginSessionResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "updateLoginBillingCustomDataResult" Proto.CMS.Common1.UpdateLoginBillingCustomDataResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateLoginBillingCustomDataResult + (\ x__ y__ + -> x__ + {_OperationResult'updateLoginBillingCustomDataResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'updateLoginBillingCustomDataResult" (Prelude.Maybe Proto.CMS.Common1.UpdateLoginBillingCustomDataResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'updateLoginBillingCustomDataResult + (\ x__ y__ + -> x__ + {_OperationResult'updateLoginBillingCustomDataResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationResult "trackingNumber" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'trackingNumber + (\ x__ y__ -> x__ {_OperationResult'trackingNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationResult "maybe'trackingNumber" (Prelude.Maybe Data.Word.Word64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationResult'trackingNumber + (\ x__ y__ -> x__ {_OperationResult'trackingNumber = y__})) + Prelude.id +instance Data.ProtoLens.Message OperationResult where + messageName _ = Data.Text.pack "cmsapi_1.OperationResult" + packedMessageDescriptor _ + = "\n\ + \\SIOperationResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \STX(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \STX(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\ETX \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2E\n\ + \\DC1clone_user_result\CAN\EOT \SOH(\v2\EM.common_1.CloneUserResultR\SIcloneUserResult\DC2Q\n\ + \\NAKcreate_profile_result\CAN\ENQ \SOH(\v2\GS.cmsapi_1.CreateProfileResultR\DC3createProfileResult\DC2Q\n\ + \\NAKupdate_profile_result\CAN\ACK \SOH(\v2\GS.cmsapi_1.UpdateProfileResultR\DC3updateProfileResult\DC2Q\n\ + \\NAKremove_profile_result\CAN\a \SOH(\v2\GS.cmsapi_1.RemoveProfileResultR\DC3removeProfileResult\DC2H\n\ + \\DC2create_user_result\CAN\b \SOH(\v2\SUB.common_1.CreateUserResultR\DLEcreateUserResult\DC2H\n\ + \\DC2update_user_result\CAN\t \SOH(\v2\SUB.common_1.UpdateUserResultR\DLEupdateUserResult\DC2H\n\ + \\DC2remove_user_result\CAN\n\ + \ \SOH(\v2\SUB.common_1.RemoveUserResultR\DLEremoveUserResult\DC2b\n\ + \\FSlink_login_to_profile_result\CAN\v \SOH(\v2\".cmsapi_1.LinkLoginToProfileResultR\CANlinkLoginToProfileResult\DC2\130\SOH\n\ + \'modify_login_entitlement_service_result\CAN\f \SOH(\v2,.login_1.ModifyLoginEntitlementServiceResultR#modifyLoginEntitlementServiceResult\DC2[\n\ + \\EMsend_welcome_email_result\CAN\r \SOH(\v2 .cmsapi_1.SendWelcomeEmailResultR\SYNsendWelcomeEmailResult\DC2K\n\ + \\DC3restore_user_result\CAN\SO \SOH(\v2\ESC.common_1.RestoreUserResultR\DC1restoreUserResult\DC2T\n\ + \\SYNrestore_profile_result\CAN\SI \SOH(\v2\RS.cmsapi_1.RestoreProfileResultR\DC4restoreProfileResult\DC2\172\SOH\n\ + \6update_customer_sales_series_authorization_list_result\CAN\DLE \SOH(\v2:.common_1.UpdateCustomerSalesSeriesAuthorizationListResultR0updateCustomerSalesSeriesAuthorizationListResult\DC2\139\SOH\n\ + \+update_login_exchange_member_id_list_result\CAN\DC1 \SOH(\v2/.common_1.UpdateLoginExchangeMemberIdListResultR%updateLoginExchangeMemberIdListResult\DC2d\n\ + \\FSupdate_login_settings_result\CAN\DC2 \SOH(\v2#.common_1.UpdateLoginSettingsResultR\EMupdateLoginSettingsResult\DC2Q\n\ + \\NAKactivate_login_result\CAN\DC3 \SOH(\v2\GS.common_1.ActivateLoginResultR\DC3activateLoginResult\DC2W\n\ + \\ETBdeactivate_login_result\CAN\DC4 \SOH(\v2\US.common_1.DeactivateLoginResultR\NAKdeactivateLoginResult\DC2t\n\ + \\"send_credential_reset_email_result\CAN\NAK \SOH(\v2(.cmsapi_1.SendCredentialResetEmailResultR\RSsendCredentialResetEmailResult\DC2\128\SOH\n\ + \&generate_service_security_token_result\CAN\SYN \SOH(\v2,.cmsapi_1.GenerateServiceSecurityTokenResultR\"generateServiceSecurityTokenResult\DC2p\n\ + \ erase_current_credentials_result\CAN\ETB \SOH(\v2'.common_1.EraseCurrentCredentialsResultR\GSeraseCurrentCredentialsResult\DC2j\n\ + \\RSterminate_login_session_result\CAN\CAN \SOH(\v2%.cmsapi_1.TerminateLoginSessionResultR\ESCterminateLoginSessionResult\DC2\129\SOH\n\ + \'update_login_billing_custom_data_result\CAN\EM \SOH(\v2,.common_1.UpdateLoginBillingCustomDataResultR\"updateLoginBillingCustomDataResult\DC2'\n\ + \\SItracking_number\CAN\SUB \SOH(\EOTR\SOtrackingNumber" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + requestId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "request_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"requestId")) :: + Data.ProtoLens.FieldDescriptor OperationResult + operationStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"operationStatus")) :: + Data.ProtoLens.FieldDescriptor OperationResult + errorMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "error_message" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'errorMessage")) :: + Data.ProtoLens.FieldDescriptor OperationResult + cloneUserResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "clone_user_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.CloneUserResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cloneUserResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + createProfileResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_profile_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateProfileResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createProfileResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + updateProfileResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_profile_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateProfileResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateProfileResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + removeProfileResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "remove_profile_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RemoveProfileResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removeProfileResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + createUserResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_user_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.CreateUserResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createUserResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + updateUserResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_user_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UpdateUserResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateUserResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + removeUserResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "remove_user_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.RemoveUserResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removeUserResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + linkLoginToProfileResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "link_login_to_profile_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LinkLoginToProfileResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'linkLoginToProfileResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + modifyLoginEntitlementServiceResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "modify_login_entitlement_service_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Login1.ModifyLoginEntitlementServiceResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'modifyLoginEntitlementServiceResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + sendWelcomeEmailResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "send_welcome_email_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SendWelcomeEmailResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sendWelcomeEmailResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + restoreUserResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "restore_user_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.RestoreUserResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'restoreUserResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + restoreProfileResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "restore_profile_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RestoreProfileResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'restoreProfileResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + updateCustomerSalesSeriesAuthorizationListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_customer_sales_series_authorization_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UpdateCustomerSalesSeriesAuthorizationListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateCustomerSalesSeriesAuthorizationListResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + updateLoginExchangeMemberIdListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_login_exchange_member_id_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UpdateLoginExchangeMemberIdListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateLoginExchangeMemberIdListResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + updateLoginSettingsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_login_settings_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UpdateLoginSettingsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateLoginSettingsResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + activateLoginResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "activate_login_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.ActivateLoginResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'activateLoginResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + deactivateLoginResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "deactivate_login_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.DeactivateLoginResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'deactivateLoginResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + sendCredentialResetEmailResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "send_credential_reset_email_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SendCredentialResetEmailResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'sendCredentialResetEmailResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + generateServiceSecurityTokenResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "generate_service_security_token_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor GenerateServiceSecurityTokenResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'generateServiceSecurityTokenResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + eraseCurrentCredentialsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "erase_current_credentials_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.EraseCurrentCredentialsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'eraseCurrentCredentialsResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + terminateLoginSessionResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "terminate_login_session_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TerminateLoginSessionResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'terminateLoginSessionResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + updateLoginBillingCustomDataResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_login_billing_custom_data_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UpdateLoginBillingCustomDataResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateLoginBillingCustomDataResult")) :: + Data.ProtoLens.FieldDescriptor OperationResult + trackingNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "tracking_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'trackingNumber")) :: + Data.ProtoLens.FieldDescriptor OperationResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, requestId__field_descriptor), + (Data.ProtoLens.Tag 2, operationStatus__field_descriptor), + (Data.ProtoLens.Tag 3, errorMessage__field_descriptor), + (Data.ProtoLens.Tag 4, cloneUserResult__field_descriptor), + (Data.ProtoLens.Tag 5, createProfileResult__field_descriptor), + (Data.ProtoLens.Tag 6, updateProfileResult__field_descriptor), + (Data.ProtoLens.Tag 7, removeProfileResult__field_descriptor), + (Data.ProtoLens.Tag 8, createUserResult__field_descriptor), + (Data.ProtoLens.Tag 9, updateUserResult__field_descriptor), + (Data.ProtoLens.Tag 10, removeUserResult__field_descriptor), + (Data.ProtoLens.Tag 11, + linkLoginToProfileResult__field_descriptor), + (Data.ProtoLens.Tag 12, + modifyLoginEntitlementServiceResult__field_descriptor), + (Data.ProtoLens.Tag 13, sendWelcomeEmailResult__field_descriptor), + (Data.ProtoLens.Tag 14, restoreUserResult__field_descriptor), + (Data.ProtoLens.Tag 15, restoreProfileResult__field_descriptor), + (Data.ProtoLens.Tag 16, + updateCustomerSalesSeriesAuthorizationListResult__field_descriptor), + (Data.ProtoLens.Tag 17, + updateLoginExchangeMemberIdListResult__field_descriptor), + (Data.ProtoLens.Tag 18, + updateLoginSettingsResult__field_descriptor), + (Data.ProtoLens.Tag 19, activateLoginResult__field_descriptor), + (Data.ProtoLens.Tag 20, deactivateLoginResult__field_descriptor), + (Data.ProtoLens.Tag 21, + sendCredentialResetEmailResult__field_descriptor), + (Data.ProtoLens.Tag 22, + generateServiceSecurityTokenResult__field_descriptor), + (Data.ProtoLens.Tag 23, + eraseCurrentCredentialsResult__field_descriptor), + (Data.ProtoLens.Tag 24, + terminateLoginSessionResult__field_descriptor), + (Data.ProtoLens.Tag 25, + updateLoginBillingCustomDataResult__field_descriptor), + (Data.ProtoLens.Tag 26, trackingNumber__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OperationResult'_unknownFields + (\ x__ y__ -> x__ {_OperationResult'_unknownFields = y__}) + defMessage + = OperationResult'_constructor + {_OperationResult'requestId = Data.ProtoLens.fieldDefault, + _OperationResult'operationStatus = Data.ProtoLens.fieldDefault, + _OperationResult'errorMessage = Prelude.Nothing, + _OperationResult'cloneUserResult = Prelude.Nothing, + _OperationResult'createProfileResult = Prelude.Nothing, + _OperationResult'updateProfileResult = Prelude.Nothing, + _OperationResult'removeProfileResult = Prelude.Nothing, + _OperationResult'createUserResult = Prelude.Nothing, + _OperationResult'updateUserResult = Prelude.Nothing, + _OperationResult'removeUserResult = Prelude.Nothing, + _OperationResult'linkLoginToProfileResult = Prelude.Nothing, + _OperationResult'modifyLoginEntitlementServiceResult = Prelude.Nothing, + _OperationResult'sendWelcomeEmailResult = Prelude.Nothing, + _OperationResult'restoreUserResult = Prelude.Nothing, + _OperationResult'restoreProfileResult = Prelude.Nothing, + _OperationResult'updateCustomerSalesSeriesAuthorizationListResult = Prelude.Nothing, + _OperationResult'updateLoginExchangeMemberIdListResult = Prelude.Nothing, + _OperationResult'updateLoginSettingsResult = Prelude.Nothing, + _OperationResult'activateLoginResult = Prelude.Nothing, + _OperationResult'deactivateLoginResult = Prelude.Nothing, + _OperationResult'sendCredentialResetEmailResult = Prelude.Nothing, + _OperationResult'generateServiceSecurityTokenResult = Prelude.Nothing, + _OperationResult'eraseCurrentCredentialsResult = Prelude.Nothing, + _OperationResult'terminateLoginSessionResult = Prelude.Nothing, + _OperationResult'updateLoginBillingCustomDataResult = Prelude.Nothing, + _OperationResult'trackingNumber = Prelude.Nothing, + _OperationResult'_unknownFields = []} + parseMessage + = let + loop :: + OperationResult + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser OperationResult + loop x required'operationStatus required'requestId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'operationStatus then + (:) "operation_status" + else + Prelude.id) + ((if required'requestId then (:) "request_id" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "request_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x) + required'operationStatus Prelude.False + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationStatus") y x) + Prelude.False required'requestId + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "error_message" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"errorMessage") y x) + required'operationStatus required'requestId + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "clone_user_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"cloneUserResult") y x) + required'operationStatus required'requestId + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_profile_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"createProfileResult") y x) + required'operationStatus required'requestId + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_profile_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateProfileResult") y x) + required'operationStatus required'requestId + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "remove_profile_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"removeProfileResult") y x) + required'operationStatus required'requestId + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_user_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"createUserResult") y x) + required'operationStatus required'requestId + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_user_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateUserResult") y x) + required'operationStatus required'requestId + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "remove_user_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"removeUserResult") y x) + required'operationStatus required'requestId + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "link_login_to_profile_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"linkLoginToProfileResult") y x) + required'operationStatus required'requestId + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "modify_login_entitlement_service_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"modifyLoginEntitlementServiceResult") + y x) + required'operationStatus required'requestId + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "send_welcome_email_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"sendWelcomeEmailResult") y x) + required'operationStatus required'requestId + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "restore_user_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"restoreUserResult") y x) + required'operationStatus required'requestId + 122 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "restore_profile_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"restoreProfileResult") y x) + required'operationStatus required'requestId + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_customer_sales_series_authorization_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"updateCustomerSalesSeriesAuthorizationListResult") + y x) + required'operationStatus required'requestId + 138 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_login_exchange_member_id_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"updateLoginExchangeMemberIdListResult") + y x) + required'operationStatus required'requestId + 146 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_login_settings_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateLoginSettingsResult") y x) + required'operationStatus required'requestId + 154 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "activate_login_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"activateLoginResult") y x) + required'operationStatus required'requestId + 162 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "deactivate_login_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"deactivateLoginResult") y x) + required'operationStatus required'requestId + 170 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "send_credential_reset_email_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"sendCredentialResetEmailResult") + y x) + required'operationStatus required'requestId + 178 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "generate_service_security_token_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"generateServiceSecurityTokenResult") + y x) + required'operationStatus required'requestId + 186 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "erase_current_credentials_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"eraseCurrentCredentialsResult") y + x) + required'operationStatus required'requestId + 194 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "terminate_login_session_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"terminateLoginSessionResult") y + x) + required'operationStatus required'requestId + 202 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_login_billing_custom_data_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"updateLoginBillingCustomDataResult") + y x) + required'operationStatus required'requestId + 208 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "tracking_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"trackingNumber") y x) + required'operationStatus required'requestId + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'operationStatus required'requestId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "OperationResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"requestId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"operationStatus") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'errorMessage") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'cloneUserResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'createProfileResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'updateProfileResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'removeProfileResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'createUserResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'updateUserResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'removeUserResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'linkLoginToProfileResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'modifyLoginEntitlementServiceResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'sendWelcomeEmailResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'restoreUserResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'restoreProfileResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateCustomerSalesSeriesAuthorizationListResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateLoginExchangeMemberIdListResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateLoginSettingsResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 146) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'activateLoginResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 154) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'deactivateLoginResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 162) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'sendCredentialResetEmailResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 170) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'generateServiceSecurityTokenResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 178) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'eraseCurrentCredentialsResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 186) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'terminateLoginSessionResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 194) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateLoginBillingCustomDataResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 202) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'trackingNumber") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 208) + (Data.ProtoLens.Encoding.Bytes.putVarInt + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))))))))))))))) +instance Control.DeepSeq.NFData OperationResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OperationResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OperationResult'requestId x__) + (Control.DeepSeq.deepseq + (_OperationResult'operationStatus x__) + (Control.DeepSeq.deepseq + (_OperationResult'errorMessage x__) + (Control.DeepSeq.deepseq + (_OperationResult'cloneUserResult x__) + (Control.DeepSeq.deepseq + (_OperationResult'createProfileResult x__) + (Control.DeepSeq.deepseq + (_OperationResult'updateProfileResult x__) + (Control.DeepSeq.deepseq + (_OperationResult'removeProfileResult x__) + (Control.DeepSeq.deepseq + (_OperationResult'createUserResult x__) + (Control.DeepSeq.deepseq + (_OperationResult'updateUserResult x__) + (Control.DeepSeq.deepseq + (_OperationResult'removeUserResult x__) + (Control.DeepSeq.deepseq + (_OperationResult'linkLoginToProfileResult x__) + (Control.DeepSeq.deepseq + (_OperationResult'modifyLoginEntitlementServiceResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'sendWelcomeEmailResult x__) + (Control.DeepSeq.deepseq + (_OperationResult'restoreUserResult x__) + (Control.DeepSeq.deepseq + (_OperationResult'restoreProfileResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'updateCustomerSalesSeriesAuthorizationListResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'updateLoginExchangeMemberIdListResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'updateLoginSettingsResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'activateLoginResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'deactivateLoginResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'sendCredentialResetEmailResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'generateServiceSecurityTokenResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'eraseCurrentCredentialsResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'terminateLoginSessionResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'updateLoginBillingCustomDataResult + x__) + (Control.DeepSeq.deepseq + (_OperationResult'trackingNumber + x__) + ())))))))))))))))))))))))))) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.token' @:: Lens' Ping Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'token' @:: Lens' Ping (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.pingUtcTime' @:: Lens' Ping Data.Int.Int64@ -} +data Ping + = Ping'_constructor {_Ping'token :: !(Prelude.Maybe Data.Text.Text), + _Ping'pingUtcTime :: !Data.Int.Int64, + _Ping'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Ping where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Ping "token" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Ping'token (\ x__ y__ -> x__ {_Ping'token = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Ping "maybe'token" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Ping'token (\ x__ y__ -> x__ {_Ping'token = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Ping "pingUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Ping'pingUtcTime (\ x__ y__ -> x__ {_Ping'pingUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Message Ping where + messageName _ = Data.Text.pack "cmsapi_1.Ping" + packedMessageDescriptor _ + = "\n\ + \\EOTPing\DC2\DC4\n\ + \\ENQtoken\CAN\SOH \SOH(\tR\ENQtoken\DC2\"\n\ + \\rping_utc_time\CAN\STX \STX(\DC2R\vpingUtcTime" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + token__field_descriptor + = Data.ProtoLens.FieldDescriptor + "token" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'token")) :: + Data.ProtoLens.FieldDescriptor Ping + pingUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ping_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"pingUtcTime")) :: + Data.ProtoLens.FieldDescriptor Ping + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, token__field_descriptor), + (Data.ProtoLens.Tag 2, pingUtcTime__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Ping'_unknownFields + (\ x__ y__ -> x__ {_Ping'_unknownFields = y__}) + defMessage + = Ping'_constructor + {_Ping'token = Prelude.Nothing, + _Ping'pingUtcTime = Data.ProtoLens.fieldDefault, + _Ping'_unknownFields = []} + parseMessage + = let + loop :: + Ping -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser Ping + loop x required'pingUtcTime + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'pingUtcTime then + (:) "ping_utc_time" + else + Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "token" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"token") y x) + required'pingUtcTime + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "ping_utc_time" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"pingUtcTime") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'pingUtcTime + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "Ping" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'token") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"pingUtcTime") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData Ping where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Ping'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Ping'token x__) + (Control.DeepSeq.deepseq (_Ping'pingUtcTime x__) ())) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.token' @:: Lens' Pong Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'token' @:: Lens' Pong (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.pingUtcTime' @:: Lens' Pong Data.Int.Int64@ + * 'Proto.CMS.Cmsapi1_Fields.pongUtcTime' @:: Lens' Pong Data.Int.Int64@ -} +data Pong + = Pong'_constructor {_Pong'token :: !(Prelude.Maybe Data.Text.Text), + _Pong'pingUtcTime :: !Data.Int.Int64, + _Pong'pongUtcTime :: !Data.Int.Int64, + _Pong'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Pong where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Pong "token" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Pong'token (\ x__ y__ -> x__ {_Pong'token = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Pong "maybe'token" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Pong'token (\ x__ y__ -> x__ {_Pong'token = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Pong "pingUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Pong'pingUtcTime (\ x__ y__ -> x__ {_Pong'pingUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Pong "pongUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Pong'pongUtcTime (\ x__ y__ -> x__ {_Pong'pongUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Message Pong where + messageName _ = Data.Text.pack "cmsapi_1.Pong" + packedMessageDescriptor _ + = "\n\ + \\EOTPong\DC2\DC4\n\ + \\ENQtoken\CAN\SOH \SOH(\tR\ENQtoken\DC2\"\n\ + \\rping_utc_time\CAN\STX \STX(\DC2R\vpingUtcTime\DC2\"\n\ + \\rpong_utc_time\CAN\ETX \STX(\DC2R\vpongUtcTime" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + token__field_descriptor + = Data.ProtoLens.FieldDescriptor + "token" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'token")) :: + Data.ProtoLens.FieldDescriptor Pong + pingUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ping_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"pingUtcTime")) :: + Data.ProtoLens.FieldDescriptor Pong + pongUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "pong_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"pongUtcTime")) :: + Data.ProtoLens.FieldDescriptor Pong + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, token__field_descriptor), + (Data.ProtoLens.Tag 2, pingUtcTime__field_descriptor), + (Data.ProtoLens.Tag 3, pongUtcTime__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Pong'_unknownFields + (\ x__ y__ -> x__ {_Pong'_unknownFields = y__}) + defMessage + = Pong'_constructor + {_Pong'token = Prelude.Nothing, + _Pong'pingUtcTime = Data.ProtoLens.fieldDefault, + _Pong'pongUtcTime = Data.ProtoLens.fieldDefault, + _Pong'_unknownFields = []} + parseMessage + = let + loop :: + Pong + -> Prelude.Bool + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser Pong + loop x required'pingUtcTime required'pongUtcTime + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'pingUtcTime then + (:) "ping_utc_time" + else + Prelude.id) + ((if required'pongUtcTime then (:) "pong_utc_time" else Prelude.id) + []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "token" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"token") y x) + required'pingUtcTime required'pongUtcTime + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "ping_utc_time" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"pingUtcTime") y x) + Prelude.False required'pongUtcTime + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "pong_utc_time" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"pongUtcTime") y x) + required'pingUtcTime Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'pingUtcTime required'pongUtcTime + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "Pong" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'token") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"pingUtcTime") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"pongUtcTime") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData Pong where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Pong'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Pong'token x__) + (Control.DeepSeq.deepseq + (_Pong'pingUtcTime x__) + (Control.DeepSeq.deepseq (_Pong'pongUtcTime x__) ()))) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.obsoleteCustomerId' @:: Lens' ProfileRequest Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteCustomerId' @:: Lens' ProfileRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.profileId' @:: Lens' ProfileRequest Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileId' @:: Lens' ProfileRequest (Prelude.Maybe Data.Text.Text)@ -} +data ProfileRequest + = ProfileRequest'_constructor {_ProfileRequest'obsoleteCustomerId :: !(Prelude.Maybe Data.Text.Text), + _ProfileRequest'profileId :: !(Prelude.Maybe Data.Text.Text), + _ProfileRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ProfileRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ProfileRequest "obsoleteCustomerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileRequest'obsoleteCustomerId + (\ x__ y__ -> x__ {_ProfileRequest'obsoleteCustomerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileRequest "maybe'obsoleteCustomerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileRequest'obsoleteCustomerId + (\ x__ y__ -> x__ {_ProfileRequest'obsoleteCustomerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileRequest "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileRequest'profileId + (\ x__ y__ -> x__ {_ProfileRequest'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileRequest "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileRequest'profileId + (\ x__ y__ -> x__ {_ProfileRequest'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Message ProfileRequest where + messageName _ = Data.Text.pack "cmsapi_1.ProfileRequest" + packedMessageDescriptor _ + = "\n\ + \\SOProfileRequest\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\STX \SOH(\tR\tprofileId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteCustomerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId")) :: + Data.ProtoLens.FieldDescriptor ProfileRequest + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor ProfileRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteCustomerId__field_descriptor), + (Data.ProtoLens.Tag 2, profileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ProfileRequest'_unknownFields + (\ x__ y__ -> x__ {_ProfileRequest'_unknownFields = y__}) + defMessage + = ProfileRequest'_constructor + {_ProfileRequest'obsoleteCustomerId = Prelude.Nothing, + _ProfileRequest'profileId = Prelude.Nothing, + _ProfileRequest'_unknownFields = []} + parseMessage + = let + loop :: + ProfileRequest + -> Data.ProtoLens.Encoding.Bytes.Parser ProfileRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_customer_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCustomerId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ProfileRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData ProfileRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ProfileRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ProfileRequest'obsoleteCustomerId x__) + (Control.DeepSeq.deepseq (_ProfileRequest'profileId x__) ())) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.obsoleteText' @:: Lens' ProfileSearchRequest Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteText' @:: Lens' ProfileSearchRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.obsoleteSearchCriteria' @:: Lens' ProfileSearchRequest [Data.Word.Word32]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'obsoleteSearchCriteria' @:: Lens' ProfileSearchRequest (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Cmsapi1_Fields.searchOptions' @:: Lens' ProfileSearchRequest [Proto.CMS.Common1.SearchOption]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'searchOptions' @:: Lens' ProfileSearchRequest (Data.Vector.Vector Proto.CMS.Common1.SearchOption)@ + * 'Proto.CMS.Cmsapi1_Fields.allMatchMode' @:: Lens' ProfileSearchRequest Prelude.Bool@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'allMatchMode' @:: Lens' ProfileSearchRequest (Prelude.Maybe Prelude.Bool)@ -} +data ProfileSearchRequest + = ProfileSearchRequest'_constructor {_ProfileSearchRequest'obsoleteText :: !(Prelude.Maybe Data.Text.Text), + _ProfileSearchRequest'obsoleteSearchCriteria :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _ProfileSearchRequest'searchOptions :: !(Data.Vector.Vector Proto.CMS.Common1.SearchOption), + _ProfileSearchRequest'allMatchMode :: !(Prelude.Maybe Prelude.Bool), + _ProfileSearchRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ProfileSearchRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ProfileSearchRequest "obsoleteText" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchRequest'obsoleteText + (\ x__ y__ -> x__ {_ProfileSearchRequest'obsoleteText = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchRequest "maybe'obsoleteText" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchRequest'obsoleteText + (\ x__ y__ -> x__ {_ProfileSearchRequest'obsoleteText = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchRequest "obsoleteSearchCriteria" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchRequest'obsoleteSearchCriteria + (\ x__ y__ + -> x__ {_ProfileSearchRequest'obsoleteSearchCriteria = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ProfileSearchRequest "vec'obsoleteSearchCriteria" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchRequest'obsoleteSearchCriteria + (\ x__ y__ + -> x__ {_ProfileSearchRequest'obsoleteSearchCriteria = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchRequest "searchOptions" [Proto.CMS.Common1.SearchOption] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchRequest'searchOptions + (\ x__ y__ -> x__ {_ProfileSearchRequest'searchOptions = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ProfileSearchRequest "vec'searchOptions" (Data.Vector.Vector Proto.CMS.Common1.SearchOption) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchRequest'searchOptions + (\ x__ y__ -> x__ {_ProfileSearchRequest'searchOptions = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchRequest "allMatchMode" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_ProfileSearchRequest'allMatchMode = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField ProfileSearchRequest "maybe'allMatchMode" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_ProfileSearchRequest'allMatchMode = y__})) + Prelude.id +instance Data.ProtoLens.Message ProfileSearchRequest where + messageName _ = Data.Text.pack "cmsapi_1.ProfileSearchRequest" + packedMessageDescriptor _ + = "\n\ + \\DC4ProfileSearchRequest\DC2'\n\ + \\robsolete_text\CAN\SOH \SOH(\tR\fobsoleteTextB\STX\CAN\SOH\DC2<\n\ + \\CANobsolete_search_criteria\CAN\STX \ETX(\rR\SYNobsoleteSearchCriteriaB\STX\CAN\SOH\DC2=\n\ + \\SOsearch_options\CAN\ETX \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\EOT \SOH(\b:\ENQfalseR\fallMatchMode\"\145\SOH\n\ + \\SOSearchCriteria\DC2\SI\n\ + \\vCUSTOMER_ID\DLE\SOH\DC2\b\n\ + \\EOTNAME\DLE\STX\DC2\SO\n\ + \\n\ + \FIRST_NAME\DLE\ETX\DC2\r\n\ + \\tLAST_NAME\DLE\EOT\DC2\ETB\n\ + \\DC3LINKED_BROKERAGE_ID\DLE\ENQ\DC2\n\ + \\n\ + \\ACKNUMBER\DLE\ACK\DC2\SO\n\ + \\n\ + \PROFILE_ID\DLE\a\DC2\DLE\n\ + \\fPROFILE_TYPE\DLE\b" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteText__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_text" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteText")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchRequest + obsoleteSearchCriteria__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_search_criteria" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"obsoleteSearchCriteria")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchRequest + searchOptions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "search_options" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.SearchOption) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"searchOptions")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchRequest + allMatchMode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "all_match_mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allMatchMode")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteText__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteSearchCriteria__field_descriptor), + (Data.ProtoLens.Tag 3, searchOptions__field_descriptor), + (Data.ProtoLens.Tag 4, allMatchMode__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ProfileSearchRequest'_unknownFields + (\ x__ y__ -> x__ {_ProfileSearchRequest'_unknownFields = y__}) + defMessage + = ProfileSearchRequest'_constructor + {_ProfileSearchRequest'obsoleteText = Prelude.Nothing, + _ProfileSearchRequest'obsoleteSearchCriteria = Data.Vector.Generic.empty, + _ProfileSearchRequest'searchOptions = Data.Vector.Generic.empty, + _ProfileSearchRequest'allMatchMode = Prelude.Nothing, + _ProfileSearchRequest'_unknownFields = []} + parseMessage + = let + loop :: + ProfileSearchRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.SearchOption + -> Data.ProtoLens.Encoding.Bytes.Parser ProfileSearchRequest + loop x mutable'obsoleteSearchCriteria mutable'searchOptions + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'obsoleteSearchCriteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'obsoleteSearchCriteria) + frozen'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'searchOptions) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria") + frozen'obsoleteSearchCriteria + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'searchOptions") + frozen'searchOptions x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_text" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteText") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + 16 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_search_criteria" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'obsoleteSearchCriteria y) + loop x v mutable'searchOptions + 18 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_search_criteria" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'obsoleteSearchCriteria) + loop x y mutable'searchOptions + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "search_options" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'searchOptions y) + loop x mutable'obsoleteSearchCriteria v + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "all_match_mode" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allMatchMode") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'obsoleteSearchCriteria mutable'searchOptions + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'obsoleteSearchCriteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'obsoleteSearchCriteria + mutable'searchOptions) + "ProfileSearchRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteText") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'searchOptions") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allMatchMode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData ProfileSearchRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ProfileSearchRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ProfileSearchRequest'obsoleteText x__) + (Control.DeepSeq.deepseq + (_ProfileSearchRequest'obsoleteSearchCriteria x__) + (Control.DeepSeq.deepseq + (_ProfileSearchRequest'searchOptions x__) + (Control.DeepSeq.deepseq + (_ProfileSearchRequest'allMatchMode x__) ())))) +data ProfileSearchRequest'SearchCriteria + = ProfileSearchRequest'CUSTOMER_ID | + ProfileSearchRequest'NAME | + ProfileSearchRequest'FIRST_NAME | + ProfileSearchRequest'LAST_NAME | + ProfileSearchRequest'LINKED_BROKERAGE_ID | + ProfileSearchRequest'NUMBER | + ProfileSearchRequest'PROFILE_ID | + ProfileSearchRequest'PROFILE_TYPE + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum ProfileSearchRequest'SearchCriteria where + maybeToEnum 1 = Prelude.Just ProfileSearchRequest'CUSTOMER_ID + maybeToEnum 2 = Prelude.Just ProfileSearchRequest'NAME + maybeToEnum 3 = Prelude.Just ProfileSearchRequest'FIRST_NAME + maybeToEnum 4 = Prelude.Just ProfileSearchRequest'LAST_NAME + maybeToEnum 5 + = Prelude.Just ProfileSearchRequest'LINKED_BROKERAGE_ID + maybeToEnum 6 = Prelude.Just ProfileSearchRequest'NUMBER + maybeToEnum 7 = Prelude.Just ProfileSearchRequest'PROFILE_ID + maybeToEnum 8 = Prelude.Just ProfileSearchRequest'PROFILE_TYPE + maybeToEnum _ = Prelude.Nothing + showEnum ProfileSearchRequest'CUSTOMER_ID = "CUSTOMER_ID" + showEnum ProfileSearchRequest'NAME = "NAME" + showEnum ProfileSearchRequest'FIRST_NAME = "FIRST_NAME" + showEnum ProfileSearchRequest'LAST_NAME = "LAST_NAME" + showEnum ProfileSearchRequest'LINKED_BROKERAGE_ID + = "LINKED_BROKERAGE_ID" + showEnum ProfileSearchRequest'NUMBER = "NUMBER" + showEnum ProfileSearchRequest'PROFILE_ID = "PROFILE_ID" + showEnum ProfileSearchRequest'PROFILE_TYPE = "PROFILE_TYPE" + readEnum k + | (Prelude.==) k "CUSTOMER_ID" + = Prelude.Just ProfileSearchRequest'CUSTOMER_ID + | (Prelude.==) k "NAME" = Prelude.Just ProfileSearchRequest'NAME + | (Prelude.==) k "FIRST_NAME" + = Prelude.Just ProfileSearchRequest'FIRST_NAME + | (Prelude.==) k "LAST_NAME" + = Prelude.Just ProfileSearchRequest'LAST_NAME + | (Prelude.==) k "LINKED_BROKERAGE_ID" + = Prelude.Just ProfileSearchRequest'LINKED_BROKERAGE_ID + | (Prelude.==) k "NUMBER" + = Prelude.Just ProfileSearchRequest'NUMBER + | (Prelude.==) k "PROFILE_ID" + = Prelude.Just ProfileSearchRequest'PROFILE_ID + | (Prelude.==) k "PROFILE_TYPE" + = Prelude.Just ProfileSearchRequest'PROFILE_TYPE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded ProfileSearchRequest'SearchCriteria where + minBound = ProfileSearchRequest'CUSTOMER_ID + maxBound = ProfileSearchRequest'PROFILE_TYPE +instance Prelude.Enum ProfileSearchRequest'SearchCriteria where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum SearchCriteria: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum ProfileSearchRequest'CUSTOMER_ID = 1 + fromEnum ProfileSearchRequest'NAME = 2 + fromEnum ProfileSearchRequest'FIRST_NAME = 3 + fromEnum ProfileSearchRequest'LAST_NAME = 4 + fromEnum ProfileSearchRequest'LINKED_BROKERAGE_ID = 5 + fromEnum ProfileSearchRequest'NUMBER = 6 + fromEnum ProfileSearchRequest'PROFILE_ID = 7 + fromEnum ProfileSearchRequest'PROFILE_TYPE = 8 + succ ProfileSearchRequest'PROFILE_TYPE + = Prelude.error + "ProfileSearchRequest'SearchCriteria.succ: bad argument ProfileSearchRequest'PROFILE_TYPE. This value would be out of bounds." + succ ProfileSearchRequest'CUSTOMER_ID = ProfileSearchRequest'NAME + succ ProfileSearchRequest'NAME = ProfileSearchRequest'FIRST_NAME + succ ProfileSearchRequest'FIRST_NAME + = ProfileSearchRequest'LAST_NAME + succ ProfileSearchRequest'LAST_NAME + = ProfileSearchRequest'LINKED_BROKERAGE_ID + succ ProfileSearchRequest'LINKED_BROKERAGE_ID + = ProfileSearchRequest'NUMBER + succ ProfileSearchRequest'NUMBER = ProfileSearchRequest'PROFILE_ID + succ ProfileSearchRequest'PROFILE_ID + = ProfileSearchRequest'PROFILE_TYPE + pred ProfileSearchRequest'CUSTOMER_ID + = Prelude.error + "ProfileSearchRequest'SearchCriteria.pred: bad argument ProfileSearchRequest'CUSTOMER_ID. This value would be out of bounds." + pred ProfileSearchRequest'NAME = ProfileSearchRequest'CUSTOMER_ID + pred ProfileSearchRequest'FIRST_NAME = ProfileSearchRequest'NAME + pred ProfileSearchRequest'LAST_NAME + = ProfileSearchRequest'FIRST_NAME + pred ProfileSearchRequest'LINKED_BROKERAGE_ID + = ProfileSearchRequest'LAST_NAME + pred ProfileSearchRequest'NUMBER + = ProfileSearchRequest'LINKED_BROKERAGE_ID + pred ProfileSearchRequest'PROFILE_ID = ProfileSearchRequest'NUMBER + pred ProfileSearchRequest'PROFILE_TYPE + = ProfileSearchRequest'PROFILE_ID + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault ProfileSearchRequest'SearchCriteria where + fieldDefault = ProfileSearchRequest'CUSTOMER_ID +instance Control.DeepSeq.NFData ProfileSearchRequest'SearchCriteria where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.customerId' @:: Lens' ProfileSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'customerId' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.name' @:: Lens' ProfileSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'name' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.linkedBrokerageName' @:: Lens' ProfileSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'linkedBrokerageName' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.firstName' @:: Lens' ProfileSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'firstName' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.lastName' @:: Lens' ProfileSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'lastName' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.linkedBrokerageId' @:: Lens' ProfileSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'linkedBrokerageId' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.removed' @:: Lens' ProfileSearchResultRecord Prelude.Bool@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'removed' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Cmsapi1_Fields.obsoleteAuthenticationSystem' @:: Lens' ProfileSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteAuthenticationSystem' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.profileType' @:: Lens' ProfileSearchResultRecord Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileType' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Cmsapi1_Fields.number' @:: Lens' ProfileSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'number' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.salesSeriesId' @:: Lens' ProfileSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'salesSeriesId' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.profileId' @:: Lens' ProfileSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileId' @:: Lens' ProfileSearchResultRecord (Prelude.Maybe Data.Text.Text)@ -} +data ProfileSearchResultRecord + = ProfileSearchResultRecord'_constructor {_ProfileSearchResultRecord'customerId :: !(Prelude.Maybe Data.Text.Text), + _ProfileSearchResultRecord'name :: !(Prelude.Maybe Data.Text.Text), + _ProfileSearchResultRecord'linkedBrokerageName :: !(Prelude.Maybe Data.Text.Text), + _ProfileSearchResultRecord'firstName :: !(Prelude.Maybe Data.Text.Text), + _ProfileSearchResultRecord'lastName :: !(Prelude.Maybe Data.Text.Text), + _ProfileSearchResultRecord'linkedBrokerageId :: !(Prelude.Maybe Data.Text.Text), + _ProfileSearchResultRecord'removed :: !(Prelude.Maybe Prelude.Bool), + _ProfileSearchResultRecord'obsoleteAuthenticationSystem :: !(Prelude.Maybe Data.Text.Text), + _ProfileSearchResultRecord'profileType :: !(Prelude.Maybe Data.Word.Word32), + _ProfileSearchResultRecord'number :: !(Prelude.Maybe Data.Text.Text), + _ProfileSearchResultRecord'salesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _ProfileSearchResultRecord'profileId :: !(Prelude.Maybe Data.Text.Text), + _ProfileSearchResultRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ProfileSearchResultRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "customerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'customerId + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'customerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'customerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'customerId + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'customerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "name" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'name + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'name" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'name + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "linkedBrokerageName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'linkedBrokerageName + (\ x__ y__ + -> x__ {_ProfileSearchResultRecord'linkedBrokerageName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'linkedBrokerageName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'linkedBrokerageName + (\ x__ y__ + -> x__ {_ProfileSearchResultRecord'linkedBrokerageName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "firstName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'firstName + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'firstName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'firstName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'firstName + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'firstName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "lastName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'lastName + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'lastName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'lastName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'lastName + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'lastName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "linkedBrokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'linkedBrokerageId + (\ x__ y__ + -> x__ {_ProfileSearchResultRecord'linkedBrokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'linkedBrokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'linkedBrokerageId + (\ x__ y__ + -> x__ {_ProfileSearchResultRecord'linkedBrokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "removed" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'removed + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'removed = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'removed" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'removed + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'removed = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "obsoleteAuthenticationSystem" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'obsoleteAuthenticationSystem + (\ x__ y__ + -> x__ + {_ProfileSearchResultRecord'obsoleteAuthenticationSystem = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'obsoleteAuthenticationSystem" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'obsoleteAuthenticationSystem + (\ x__ y__ + -> x__ + {_ProfileSearchResultRecord'obsoleteAuthenticationSystem = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "profileType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'profileType + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'profileType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'profileType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'profileType + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'profileType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "number" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'number + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'number = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'number" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'number + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'number = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "salesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'salesSeriesId + (\ x__ y__ + -> x__ {_ProfileSearchResultRecord'salesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'salesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'salesSeriesId + (\ x__ y__ + -> x__ {_ProfileSearchResultRecord'salesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'profileId + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ProfileSearchResultRecord "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'profileId + (\ x__ y__ -> x__ {_ProfileSearchResultRecord'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Message ProfileSearchResultRecord where + messageName _ = Data.Text.pack "cmsapi_1.ProfileSearchResultRecord" + packedMessageDescriptor _ + = "\n\ + \\EMProfileSearchResultRecord\DC2\US\n\ + \\vcustomer_id\CAN\SOH \SOH(\tR\n\ + \customerId\DC2\DC2\n\ + \\EOTname\CAN\STX \SOH(\tR\EOTname\DC22\n\ + \\NAKlinked_brokerage_name\CAN\ETX \SOH(\tR\DC3linkedBrokerageName\DC2\GS\n\ + \\n\ + \first_name\CAN\EOT \SOH(\tR\tfirstName\DC2\ESC\n\ + \\tlast_name\CAN\ENQ \SOH(\tR\blastName\DC2.\n\ + \\DC3linked_brokerage_id\CAN\ACK \SOH(\tR\DC1linkedBrokerageId\DC2\CAN\n\ + \\aremoved\CAN\a \SOH(\bR\aremoved\DC2H\n\ + \\RSobsolete_authentication_system\CAN\b \SOH(\tR\FSobsoleteAuthenticationSystemB\STX\CAN\SOH\DC2!\n\ + \\fprofile_type\CAN\t \SOH(\rR\vprofileType\DC2\SYN\n\ + \\ACKnumber\CAN\n\ + \ \SOH(\tR\ACKnumber\DC2&\n\ + \\SIsales_series_id\CAN\v \SOH(\tR\rsalesSeriesId\DC2\GS\n\ + \\n\ + \profile_id\CAN\f \SOH(\tR\tprofileId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + customerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerId")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + linkedBrokerageName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "linked_brokerage_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'linkedBrokerageName")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + firstName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "first_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'firstName")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + lastName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "last_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'lastName")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + linkedBrokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "linked_brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'linkedBrokerageId")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + removed__field_descriptor + = Data.ProtoLens.FieldDescriptor + "removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removed")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + obsoleteAuthenticationSystem__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_authentication_system" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteAuthenticationSystem")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + profileType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileType")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + number__field_descriptor + = Data.ProtoLens.FieldDescriptor + "number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'number")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + salesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesId")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor ProfileSearchResultRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, customerId__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, linkedBrokerageName__field_descriptor), + (Data.ProtoLens.Tag 4, firstName__field_descriptor), + (Data.ProtoLens.Tag 5, lastName__field_descriptor), + (Data.ProtoLens.Tag 6, linkedBrokerageId__field_descriptor), + (Data.ProtoLens.Tag 7, removed__field_descriptor), + (Data.ProtoLens.Tag 8, + obsoleteAuthenticationSystem__field_descriptor), + (Data.ProtoLens.Tag 9, profileType__field_descriptor), + (Data.ProtoLens.Tag 10, number__field_descriptor), + (Data.ProtoLens.Tag 11, salesSeriesId__field_descriptor), + (Data.ProtoLens.Tag 12, profileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ProfileSearchResultRecord'_unknownFields + (\ x__ y__ + -> x__ {_ProfileSearchResultRecord'_unknownFields = y__}) + defMessage + = ProfileSearchResultRecord'_constructor + {_ProfileSearchResultRecord'customerId = Prelude.Nothing, + _ProfileSearchResultRecord'name = Prelude.Nothing, + _ProfileSearchResultRecord'linkedBrokerageName = Prelude.Nothing, + _ProfileSearchResultRecord'firstName = Prelude.Nothing, + _ProfileSearchResultRecord'lastName = Prelude.Nothing, + _ProfileSearchResultRecord'linkedBrokerageId = Prelude.Nothing, + _ProfileSearchResultRecord'removed = Prelude.Nothing, + _ProfileSearchResultRecord'obsoleteAuthenticationSystem = Prelude.Nothing, + _ProfileSearchResultRecord'profileType = Prelude.Nothing, + _ProfileSearchResultRecord'number = Prelude.Nothing, + _ProfileSearchResultRecord'salesSeriesId = Prelude.Nothing, + _ProfileSearchResultRecord'profileId = Prelude.Nothing, + _ProfileSearchResultRecord'_unknownFields = []} + parseMessage + = let + loop :: + ProfileSearchResultRecord + -> Data.ProtoLens.Encoding.Bytes.Parser ProfileSearchResultRecord + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"customerId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "name" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "linked_brokerage_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"linkedBrokerageName") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "first_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"firstName") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "last_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"lastName") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "linked_brokerage_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"linkedBrokerageId") y x) + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "removed" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"removed") y x) + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_authentication_system" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteAuthenticationSystem") y + x) + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "profile_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileType") y x) + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "number" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"number") y x) + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesId") y x) + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ProfileSearchResultRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'customerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'linkedBrokerageName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'firstName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'lastName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'linkedBrokerageId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'removed") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteAuthenticationSystem") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'number") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'salesSeriesId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x))))))))))))) +instance Control.DeepSeq.NFData ProfileSearchResultRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'customerId x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'name x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'linkedBrokerageName x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'firstName x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'lastName x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'linkedBrokerageId x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'removed x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'obsoleteAuthenticationSystem x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'profileType x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'number x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'salesSeriesId x__) + (Control.DeepSeq.deepseq + (_ProfileSearchResultRecord'profileId x__) + ())))))))))))) +data ProtocolVersion + = PROTOCOL_VERSION_MAJOR | PROTOCOL_VERSION_MINOR + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum ProtocolVersion where + maybeToEnum 1 = Prelude.Just PROTOCOL_VERSION_MAJOR + maybeToEnum 36 = Prelude.Just PROTOCOL_VERSION_MINOR + maybeToEnum _ = Prelude.Nothing + showEnum PROTOCOL_VERSION_MAJOR = "PROTOCOL_VERSION_MAJOR" + showEnum PROTOCOL_VERSION_MINOR = "PROTOCOL_VERSION_MINOR" + readEnum k + | (Prelude.==) k "PROTOCOL_VERSION_MAJOR" + = Prelude.Just PROTOCOL_VERSION_MAJOR + | (Prelude.==) k "PROTOCOL_VERSION_MINOR" + = Prelude.Just PROTOCOL_VERSION_MINOR + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded ProtocolVersion where + minBound = PROTOCOL_VERSION_MAJOR + maxBound = PROTOCOL_VERSION_MINOR +instance Prelude.Enum ProtocolVersion where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum ProtocolVersion: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum PROTOCOL_VERSION_MAJOR = 1 + fromEnum PROTOCOL_VERSION_MINOR = 36 + succ PROTOCOL_VERSION_MINOR + = Prelude.error + "ProtocolVersion.succ: bad argument PROTOCOL_VERSION_MINOR. This value would be out of bounds." + succ PROTOCOL_VERSION_MAJOR = PROTOCOL_VERSION_MINOR + pred PROTOCOL_VERSION_MAJOR + = Prelude.error + "ProtocolVersion.pred: bad argument PROTOCOL_VERSION_MAJOR. This value would be out of bounds." + pred PROTOCOL_VERSION_MINOR = PROTOCOL_VERSION_MAJOR + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault ProtocolVersion where + fieldDefault = PROTOCOL_VERSION_MAJOR +instance Control.DeepSeq.NFData ProtocolVersion where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.obsoleteCustomerId' @:: Lens' RemoveProfile Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteCustomerId' @:: Lens' RemoveProfile (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.profileId' @:: Lens' RemoveProfile Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileId' @:: Lens' RemoveProfile (Prelude.Maybe Data.Text.Text)@ -} +data RemoveProfile + = RemoveProfile'_constructor {_RemoveProfile'obsoleteCustomerId :: !(Prelude.Maybe Data.Text.Text), + _RemoveProfile'profileId :: !(Prelude.Maybe Data.Text.Text), + _RemoveProfile'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RemoveProfile where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RemoveProfile "obsoleteCustomerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RemoveProfile'obsoleteCustomerId + (\ x__ y__ -> x__ {_RemoveProfile'obsoleteCustomerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RemoveProfile "maybe'obsoleteCustomerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RemoveProfile'obsoleteCustomerId + (\ x__ y__ -> x__ {_RemoveProfile'obsoleteCustomerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RemoveProfile "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RemoveProfile'profileId + (\ x__ y__ -> x__ {_RemoveProfile'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RemoveProfile "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RemoveProfile'profileId + (\ x__ y__ -> x__ {_RemoveProfile'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Message RemoveProfile where + messageName _ = Data.Text.pack "cmsapi_1.RemoveProfile" + packedMessageDescriptor _ + = "\n\ + \\rRemoveProfile\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\STX \SOH(\tR\tprofileId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteCustomerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId")) :: + Data.ProtoLens.FieldDescriptor RemoveProfile + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor RemoveProfile + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteCustomerId__field_descriptor), + (Data.ProtoLens.Tag 2, profileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RemoveProfile'_unknownFields + (\ x__ y__ -> x__ {_RemoveProfile'_unknownFields = y__}) + defMessage + = RemoveProfile'_constructor + {_RemoveProfile'obsoleteCustomerId = Prelude.Nothing, + _RemoveProfile'profileId = Prelude.Nothing, + _RemoveProfile'_unknownFields = []} + parseMessage + = let + loop :: + RemoveProfile -> Data.ProtoLens.Encoding.Bytes.Parser RemoveProfile + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_customer_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCustomerId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RemoveProfile" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData RemoveProfile where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RemoveProfile'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RemoveProfile'obsoleteCustomerId x__) + (Control.DeepSeq.deepseq (_RemoveProfile'profileId x__) ())) +{- | Fields : + -} +data RemoveProfileResult + = RemoveProfileResult'_constructor {_RemoveProfileResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RemoveProfileResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message RemoveProfileResult where + messageName _ = Data.Text.pack "cmsapi_1.RemoveProfileResult" + packedMessageDescriptor _ + = "\n\ + \\DC3RemoveProfileResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _RemoveProfileResult'_unknownFields + (\ x__ y__ -> x__ {_RemoveProfileResult'_unknownFields = y__}) + defMessage + = RemoveProfileResult'_constructor + {_RemoveProfileResult'_unknownFields = []} + parseMessage + = let + loop :: + RemoveProfileResult + -> Data.ProtoLens.Encoding.Bytes.Parser RemoveProfileResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RemoveProfileResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData RemoveProfileResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RemoveProfileResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.obsoleteCustomerId' @:: Lens' RestoreProfile Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteCustomerId' @:: Lens' RestoreProfile (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.profileId' @:: Lens' RestoreProfile Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileId' @:: Lens' RestoreProfile (Prelude.Maybe Data.Text.Text)@ -} +data RestoreProfile + = RestoreProfile'_constructor {_RestoreProfile'obsoleteCustomerId :: !(Prelude.Maybe Data.Text.Text), + _RestoreProfile'profileId :: !(Prelude.Maybe Data.Text.Text), + _RestoreProfile'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RestoreProfile where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RestoreProfile "obsoleteCustomerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreProfile'obsoleteCustomerId + (\ x__ y__ -> x__ {_RestoreProfile'obsoleteCustomerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RestoreProfile "maybe'obsoleteCustomerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreProfile'obsoleteCustomerId + (\ x__ y__ -> x__ {_RestoreProfile'obsoleteCustomerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RestoreProfile "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreProfile'profileId + (\ x__ y__ -> x__ {_RestoreProfile'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RestoreProfile "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreProfile'profileId + (\ x__ y__ -> x__ {_RestoreProfile'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Message RestoreProfile where + messageName _ = Data.Text.pack "cmsapi_1.RestoreProfile" + packedMessageDescriptor _ + = "\n\ + \\SORestoreProfile\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\STX \SOH(\tR\tprofileId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteCustomerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId")) :: + Data.ProtoLens.FieldDescriptor RestoreProfile + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor RestoreProfile + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteCustomerId__field_descriptor), + (Data.ProtoLens.Tag 2, profileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RestoreProfile'_unknownFields + (\ x__ y__ -> x__ {_RestoreProfile'_unknownFields = y__}) + defMessage + = RestoreProfile'_constructor + {_RestoreProfile'obsoleteCustomerId = Prelude.Nothing, + _RestoreProfile'profileId = Prelude.Nothing, + _RestoreProfile'_unknownFields = []} + parseMessage + = let + loop :: + RestoreProfile + -> Data.ProtoLens.Encoding.Bytes.Parser RestoreProfile + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_customer_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCustomerId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RestoreProfile" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData RestoreProfile where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RestoreProfile'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RestoreProfile'obsoleteCustomerId x__) + (Control.DeepSeq.deepseq (_RestoreProfile'profileId x__) ())) +{- | Fields : + -} +data RestoreProfileResult + = RestoreProfileResult'_constructor {_RestoreProfileResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RestoreProfileResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message RestoreProfileResult where + messageName _ = Data.Text.pack "cmsapi_1.RestoreProfileResult" + packedMessageDescriptor _ + = "\n\ + \\DC4RestoreProfileResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _RestoreProfileResult'_unknownFields + (\ x__ y__ -> x__ {_RestoreProfileResult'_unknownFields = y__}) + defMessage + = RestoreProfileResult'_constructor + {_RestoreProfileResult'_unknownFields = []} + parseMessage + = let + loop :: + RestoreProfileResult + -> Data.ProtoLens.Encoding.Bytes.Parser RestoreProfileResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RestoreProfileResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData RestoreProfileResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RestoreProfileResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.id' @:: Lens' SearchRequest Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.top' @:: Lens' SearchRequest Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'top' @:: Lens' SearchRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Cmsapi1_Fields.userSearchRequest' @:: Lens' SearchRequest Proto.CMS.Common1.UserSearchRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'userSearchRequest' @:: Lens' SearchRequest (Prelude.Maybe Proto.CMS.Common1.UserSearchRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.profileSearchRequest' @:: Lens' SearchRequest ProfileSearchRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileSearchRequest' @:: Lens' SearchRequest (Prelude.Maybe ProfileSearchRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.obsoleteSalesSeriesSearchRequest' @:: Lens' SearchRequest Proto.CMS.Common1.SalesSeriesSearchRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteSalesSeriesSearchRequest' @:: Lens' SearchRequest (Prelude.Maybe Proto.CMS.Common1.SalesSeriesSearchRequest)@ + * 'Proto.CMS.Cmsapi1_Fields.includeRemoved' @:: Lens' SearchRequest Prelude.Bool@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'includeRemoved' @:: Lens' SearchRequest (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Cmsapi1_Fields.eventLogSearchRequest' @:: Lens' SearchRequest Proto.CMS.LogEvent1.EventLogSearchRequest@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'eventLogSearchRequest' @:: Lens' SearchRequest (Prelude.Maybe Proto.CMS.LogEvent1.EventLogSearchRequest)@ -} +data SearchRequest + = SearchRequest'_constructor {_SearchRequest'id :: !Data.Word.Word32, + _SearchRequest'top :: !(Prelude.Maybe Data.Word.Word32), + _SearchRequest'userSearchRequest :: !(Prelude.Maybe Proto.CMS.Common1.UserSearchRequest), + _SearchRequest'profileSearchRequest :: !(Prelude.Maybe ProfileSearchRequest), + _SearchRequest'obsoleteSalesSeriesSearchRequest :: !(Prelude.Maybe Proto.CMS.Common1.SalesSeriesSearchRequest), + _SearchRequest'includeRemoved :: !(Prelude.Maybe Prelude.Bool), + _SearchRequest'eventLogSearchRequest :: !(Prelude.Maybe Proto.CMS.LogEvent1.EventLogSearchRequest), + _SearchRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SearchRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SearchRequest "id" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'id (\ x__ y__ -> x__ {_SearchRequest'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchRequest "top" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'top (\ x__ y__ -> x__ {_SearchRequest'top = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SearchRequest "maybe'top" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'top (\ x__ y__ -> x__ {_SearchRequest'top = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchRequest "userSearchRequest" Proto.CMS.Common1.UserSearchRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'userSearchRequest + (\ x__ y__ -> x__ {_SearchRequest'userSearchRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField SearchRequest "maybe'userSearchRequest" (Prelude.Maybe Proto.CMS.Common1.UserSearchRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'userSearchRequest + (\ x__ y__ -> x__ {_SearchRequest'userSearchRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchRequest "profileSearchRequest" ProfileSearchRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'profileSearchRequest + (\ x__ y__ -> x__ {_SearchRequest'profileSearchRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField SearchRequest "maybe'profileSearchRequest" (Prelude.Maybe ProfileSearchRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'profileSearchRequest + (\ x__ y__ -> x__ {_SearchRequest'profileSearchRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchRequest "obsoleteSalesSeriesSearchRequest" Proto.CMS.Common1.SalesSeriesSearchRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'obsoleteSalesSeriesSearchRequest + (\ x__ y__ + -> x__ {_SearchRequest'obsoleteSalesSeriesSearchRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField SearchRequest "maybe'obsoleteSalesSeriesSearchRequest" (Prelude.Maybe Proto.CMS.Common1.SalesSeriesSearchRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'obsoleteSalesSeriesSearchRequest + (\ x__ y__ + -> x__ {_SearchRequest'obsoleteSalesSeriesSearchRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchRequest "includeRemoved" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'includeRemoved + (\ x__ y__ -> x__ {_SearchRequest'includeRemoved = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField SearchRequest "maybe'includeRemoved" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'includeRemoved + (\ x__ y__ -> x__ {_SearchRequest'includeRemoved = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchRequest "eventLogSearchRequest" Proto.CMS.LogEvent1.EventLogSearchRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'eventLogSearchRequest + (\ x__ y__ -> x__ {_SearchRequest'eventLogSearchRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField SearchRequest "maybe'eventLogSearchRequest" (Prelude.Maybe Proto.CMS.LogEvent1.EventLogSearchRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchRequest'eventLogSearchRequest + (\ x__ y__ -> x__ {_SearchRequest'eventLogSearchRequest = y__})) + Prelude.id +instance Data.ProtoLens.Message SearchRequest where + messageName _ = Data.Text.pack "cmsapi_1.SearchRequest" + packedMessageDescriptor _ + = "\n\ + \\rSearchRequest\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC2\DLE\n\ + \\ETXtop\CAN\STX \SOH(\rR\ETXtop\DC2K\n\ + \\DC3user_search_request\CAN\ETX \SOH(\v2\ESC.common_1.UserSearchRequestR\DC1userSearchRequest\DC2T\n\ + \\SYNprofile_search_request\CAN\EOT \SOH(\v2\RS.cmsapi_1.ProfileSearchRequestR\DC4profileSearchRequest\DC2v\n\ + \$obsolete_sales_series_search_request\CAN\ENQ \SOH(\v2\".common_1.SalesSeriesSearchRequestR obsoleteSalesSeriesSearchRequestB\STX\CAN\SOH\DC2.\n\ + \\SIinclude_removed\CAN\ACK \SOH(\b:\ENQfalseR\SOincludeRemoved\DC2[\n\ + \\CANevent_log_search_request\CAN\a \SOH(\v2\".log_event_1.EventLogSearchRequestR\NAKeventLogSearchRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"id")) :: + Data.ProtoLens.FieldDescriptor SearchRequest + top__field_descriptor + = Data.ProtoLens.FieldDescriptor + "top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'top")) :: + Data.ProtoLens.FieldDescriptor SearchRequest + userSearchRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_search_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UserSearchRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'userSearchRequest")) :: + Data.ProtoLens.FieldDescriptor SearchRequest + profileSearchRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_search_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ProfileSearchRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileSearchRequest")) :: + Data.ProtoLens.FieldDescriptor SearchRequest + obsoleteSalesSeriesSearchRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_sales_series_search_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.SalesSeriesSearchRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteSalesSeriesSearchRequest")) :: + Data.ProtoLens.FieldDescriptor SearchRequest + includeRemoved__field_descriptor + = Data.ProtoLens.FieldDescriptor + "include_removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'includeRemoved")) :: + Data.ProtoLens.FieldDescriptor SearchRequest + eventLogSearchRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "event_log_search_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.LogEvent1.EventLogSearchRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'eventLogSearchRequest")) :: + Data.ProtoLens.FieldDescriptor SearchRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, top__field_descriptor), + (Data.ProtoLens.Tag 3, userSearchRequest__field_descriptor), + (Data.ProtoLens.Tag 4, profileSearchRequest__field_descriptor), + (Data.ProtoLens.Tag 5, + obsoleteSalesSeriesSearchRequest__field_descriptor), + (Data.ProtoLens.Tag 6, includeRemoved__field_descriptor), + (Data.ProtoLens.Tag 7, eventLogSearchRequest__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SearchRequest'_unknownFields + (\ x__ y__ -> x__ {_SearchRequest'_unknownFields = y__}) + defMessage + = SearchRequest'_constructor + {_SearchRequest'id = Data.ProtoLens.fieldDefault, + _SearchRequest'top = Prelude.Nothing, + _SearchRequest'userSearchRequest = Prelude.Nothing, + _SearchRequest'profileSearchRequest = Prelude.Nothing, + _SearchRequest'obsoleteSalesSeriesSearchRequest = Prelude.Nothing, + _SearchRequest'includeRemoved = Prelude.Nothing, + _SearchRequest'eventLogSearchRequest = Prelude.Nothing, + _SearchRequest'_unknownFields = []} + parseMessage + = let + loop :: + SearchRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser SearchRequest + loop x required'id + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = (if required'id then (:) "id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + Prelude.False + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "top" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"top") y x) + required'id + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "user_search_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"userSearchRequest") y x) + required'id + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "profile_search_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"profileSearchRequest") y x) + required'id + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_sales_series_search_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"obsoleteSalesSeriesSearchRequest") + y x) + required'id + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "include_removed" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"includeRemoved") y x) + required'id + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "event_log_search_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"eventLogSearchRequest") y x) + required'id + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'id + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "SearchRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"id") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'top") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'userSearchRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileSearchRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteSalesSeriesSearchRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'includeRemoved") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'eventLogSearchRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData SearchRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SearchRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SearchRequest'id x__) + (Control.DeepSeq.deepseq + (_SearchRequest'top x__) + (Control.DeepSeq.deepseq + (_SearchRequest'userSearchRequest x__) + (Control.DeepSeq.deepseq + (_SearchRequest'profileSearchRequest x__) + (Control.DeepSeq.deepseq + (_SearchRequest'obsoleteSalesSeriesSearchRequest x__) + (Control.DeepSeq.deepseq + (_SearchRequest'includeRemoved x__) + (Control.DeepSeq.deepseq + (_SearchRequest'eventLogSearchRequest x__) ()))))))) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.requestId' @:: Lens' SearchResult Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.operationStatus' @:: Lens' SearchResult Data.Word.Word32@ + * 'Proto.CMS.Cmsapi1_Fields.isComplete' @:: Lens' SearchResult Prelude.Bool@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'isComplete' @:: Lens' SearchResult (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Cmsapi1_Fields.errorMessage' @:: Lens' SearchResult Proto.Common.Shared1.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'errorMessage' @:: Lens' SearchResult (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.userRecord' @:: Lens' SearchResult [Proto.CMS.Common1.UserSearchResultRecord]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'userRecord' @:: Lens' SearchResult (Data.Vector.Vector Proto.CMS.Common1.UserSearchResultRecord)@ + * 'Proto.CMS.Cmsapi1_Fields.profileRecord' @:: Lens' SearchResult [ProfileSearchResultRecord]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'profileRecord' @:: Lens' SearchResult (Data.Vector.Vector ProfileSearchResultRecord)@ + * 'Proto.CMS.Cmsapi1_Fields.obsoleteSalesSeriesRecord' @:: Lens' SearchResult [Proto.CMS.Common1.SalesSeriesSearchResultRecord]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'obsoleteSalesSeriesRecord' @:: Lens' SearchResult (Data.Vector.Vector Proto.CMS.Common1.SalesSeriesSearchResultRecord)@ + * 'Proto.CMS.Cmsapi1_Fields.trackingNumber' @:: Lens' SearchResult Data.Word.Word64@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'trackingNumber' @:: Lens' SearchResult (Prelude.Maybe Data.Word.Word64)@ + * 'Proto.CMS.Cmsapi1_Fields.eventLogRecord' @:: Lens' SearchResult [Proto.CMS.LogEvent1.EventLogSearchResultRecord]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'eventLogRecord' @:: Lens' SearchResult (Data.Vector.Vector Proto.CMS.LogEvent1.EventLogSearchResultRecord)@ -} +data SearchResult + = SearchResult'_constructor {_SearchResult'requestId :: !Data.Word.Word32, + _SearchResult'operationStatus :: !Data.Word.Word32, + _SearchResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _SearchResult'errorMessage :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _SearchResult'userRecord :: !(Data.Vector.Vector Proto.CMS.Common1.UserSearchResultRecord), + _SearchResult'profileRecord :: !(Data.Vector.Vector ProfileSearchResultRecord), + _SearchResult'obsoleteSalesSeriesRecord :: !(Data.Vector.Vector Proto.CMS.Common1.SalesSeriesSearchResultRecord), + _SearchResult'trackingNumber :: !(Prelude.Maybe Data.Word.Word64), + _SearchResult'eventLogRecord :: !(Data.Vector.Vector Proto.CMS.LogEvent1.EventLogSearchResultRecord), + _SearchResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SearchResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SearchResult "requestId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'requestId + (\ x__ y__ -> x__ {_SearchResult'requestId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchResult "operationStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'operationStatus + (\ x__ y__ -> x__ {_SearchResult'operationStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'isComplete + (\ x__ y__ -> x__ {_SearchResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField SearchResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'isComplete + (\ x__ y__ -> x__ {_SearchResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchResult "errorMessage" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'errorMessage + (\ x__ y__ -> x__ {_SearchResult'errorMessage = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField SearchResult "maybe'errorMessage" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'errorMessage + (\ x__ y__ -> x__ {_SearchResult'errorMessage = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchResult "userRecord" [Proto.CMS.Common1.UserSearchResultRecord] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'userRecord + (\ x__ y__ -> x__ {_SearchResult'userRecord = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField SearchResult "vec'userRecord" (Data.Vector.Vector Proto.CMS.Common1.UserSearchResultRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'userRecord + (\ x__ y__ -> x__ {_SearchResult'userRecord = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchResult "profileRecord" [ProfileSearchResultRecord] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'profileRecord + (\ x__ y__ -> x__ {_SearchResult'profileRecord = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField SearchResult "vec'profileRecord" (Data.Vector.Vector ProfileSearchResultRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'profileRecord + (\ x__ y__ -> x__ {_SearchResult'profileRecord = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchResult "obsoleteSalesSeriesRecord" [Proto.CMS.Common1.SalesSeriesSearchResultRecord] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'obsoleteSalesSeriesRecord + (\ x__ y__ -> x__ {_SearchResult'obsoleteSalesSeriesRecord = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField SearchResult "vec'obsoleteSalesSeriesRecord" (Data.Vector.Vector Proto.CMS.Common1.SalesSeriesSearchResultRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'obsoleteSalesSeriesRecord + (\ x__ y__ -> x__ {_SearchResult'obsoleteSalesSeriesRecord = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchResult "trackingNumber" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'trackingNumber + (\ x__ y__ -> x__ {_SearchResult'trackingNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SearchResult "maybe'trackingNumber" (Prelude.Maybe Data.Word.Word64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'trackingNumber + (\ x__ y__ -> x__ {_SearchResult'trackingNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchResult "eventLogRecord" [Proto.CMS.LogEvent1.EventLogSearchResultRecord] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'eventLogRecord + (\ x__ y__ -> x__ {_SearchResult'eventLogRecord = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField SearchResult "vec'eventLogRecord" (Data.Vector.Vector Proto.CMS.LogEvent1.EventLogSearchResultRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchResult'eventLogRecord + (\ x__ y__ -> x__ {_SearchResult'eventLogRecord = y__})) + Prelude.id +instance Data.ProtoLens.Message SearchResult where + messageName _ = Data.Text.pack "cmsapi_1.SearchResult" + packedMessageDescriptor _ + = "\n\ + \\fSearchResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \STX(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \STX(\rR\SIoperationStatus\DC2%\n\ + \\vis_complete\CAN\ETX \SOH(\b:\EOTtrueR\n\ + \isComplete\DC23\n\ + \\rerror_message\CAN\EOT \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2A\n\ + \\vuser_record\CAN\ENQ \ETX(\v2 .common_1.UserSearchResultRecordR\n\ + \userRecord\DC2J\n\ + \\SOprofile_record\CAN\ACK \ETX(\v2#.cmsapi_1.ProfileSearchResultRecordR\rprofileRecord\DC2l\n\ + \\FSobsolete_sales_series_record\CAN\a \ETX(\v2'.common_1.SalesSeriesSearchResultRecordR\EMobsoleteSalesSeriesRecordB\STX\CAN\SOH\DC2'\n\ + \\SItracking_number\CAN\b \SOH(\EOTR\SOtrackingNumber\DC2Q\n\ + \\DLEevent_log_record\CAN\t \ETX(\v2'.log_event_1.EventLogSearchResultRecordR\SOeventLogRecord" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + requestId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "request_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"requestId")) :: + Data.ProtoLens.FieldDescriptor SearchResult + operationStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"operationStatus")) :: + Data.ProtoLens.FieldDescriptor SearchResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor SearchResult + errorMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "error_message" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'errorMessage")) :: + Data.ProtoLens.FieldDescriptor SearchResult + userRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UserSearchResultRecord) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"userRecord")) :: + Data.ProtoLens.FieldDescriptor SearchResult + profileRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ProfileSearchResultRecord) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"profileRecord")) :: + Data.ProtoLens.FieldDescriptor SearchResult + obsoleteSalesSeriesRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_sales_series_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.SalesSeriesSearchResultRecord) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"obsoleteSalesSeriesRecord")) :: + Data.ProtoLens.FieldDescriptor SearchResult + trackingNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "tracking_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'trackingNumber")) :: + Data.ProtoLens.FieldDescriptor SearchResult + eventLogRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "event_log_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.LogEvent1.EventLogSearchResultRecord) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"eventLogRecord")) :: + Data.ProtoLens.FieldDescriptor SearchResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, requestId__field_descriptor), + (Data.ProtoLens.Tag 2, operationStatus__field_descriptor), + (Data.ProtoLens.Tag 3, isComplete__field_descriptor), + (Data.ProtoLens.Tag 4, errorMessage__field_descriptor), + (Data.ProtoLens.Tag 5, userRecord__field_descriptor), + (Data.ProtoLens.Tag 6, profileRecord__field_descriptor), + (Data.ProtoLens.Tag 7, + obsoleteSalesSeriesRecord__field_descriptor), + (Data.ProtoLens.Tag 8, trackingNumber__field_descriptor), + (Data.ProtoLens.Tag 9, eventLogRecord__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SearchResult'_unknownFields + (\ x__ y__ -> x__ {_SearchResult'_unknownFields = y__}) + defMessage + = SearchResult'_constructor + {_SearchResult'requestId = Data.ProtoLens.fieldDefault, + _SearchResult'operationStatus = Data.ProtoLens.fieldDefault, + _SearchResult'isComplete = Prelude.Nothing, + _SearchResult'errorMessage = Prelude.Nothing, + _SearchResult'userRecord = Data.Vector.Generic.empty, + _SearchResult'profileRecord = Data.Vector.Generic.empty, + _SearchResult'obsoleteSalesSeriesRecord = Data.Vector.Generic.empty, + _SearchResult'trackingNumber = Prelude.Nothing, + _SearchResult'eventLogRecord = Data.Vector.Generic.empty, + _SearchResult'_unknownFields = []} + parseMessage + = let + loop :: + SearchResult + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.LogEvent1.EventLogSearchResultRecord + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.SalesSeriesSearchResultRecord + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ProfileSearchResultRecord + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.UserSearchResultRecord + -> Data.ProtoLens.Encoding.Bytes.Parser SearchResult + loop + x + required'operationStatus + required'requestId + mutable'eventLogRecord + mutable'obsoleteSalesSeriesRecord + mutable'profileRecord + mutable'userRecord + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'eventLogRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'eventLogRecord) + frozen'obsoleteSalesSeriesRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'obsoleteSalesSeriesRecord) + frozen'profileRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'profileRecord) + frozen'userRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'userRecord) + (let + missing + = (if required'operationStatus then + (:) "operation_status" + else + Prelude.id) + ((if required'requestId then (:) "request_id" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'eventLogRecord") + frozen'eventLogRecord + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'obsoleteSalesSeriesRecord") + frozen'obsoleteSalesSeriesRecord + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'profileRecord") + frozen'profileRecord + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'userRecord") + frozen'userRecord x))))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "request_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x) + required'operationStatus Prelude.False mutable'eventLogRecord + mutable'obsoleteSalesSeriesRecord mutable'profileRecord + mutable'userRecord + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationStatus") y x) + Prelude.False required'requestId mutable'eventLogRecord + mutable'obsoleteSalesSeriesRecord mutable'profileRecord + mutable'userRecord + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + required'operationStatus required'requestId mutable'eventLogRecord + mutable'obsoleteSalesSeriesRecord mutable'profileRecord + mutable'userRecord + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "error_message" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"errorMessage") y x) + required'operationStatus required'requestId mutable'eventLogRecord + mutable'obsoleteSalesSeriesRecord mutable'profileRecord + mutable'userRecord + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "user_record" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'userRecord y) + loop + x required'operationStatus required'requestId + mutable'eventLogRecord mutable'obsoleteSalesSeriesRecord + mutable'profileRecord v + 50 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "profile_record" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'profileRecord y) + loop + x required'operationStatus required'requestId + mutable'eventLogRecord mutable'obsoleteSalesSeriesRecord v + mutable'userRecord + 58 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "obsolete_sales_series_record" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'obsoleteSalesSeriesRecord y) + loop + x required'operationStatus required'requestId + mutable'eventLogRecord v mutable'profileRecord mutable'userRecord + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "tracking_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"trackingNumber") y x) + required'operationStatus required'requestId mutable'eventLogRecord + mutable'obsoleteSalesSeriesRecord mutable'profileRecord + mutable'userRecord + 74 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "event_log_record" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'eventLogRecord y) + loop + x required'operationStatus required'requestId v + mutable'obsoleteSalesSeriesRecord mutable'profileRecord + mutable'userRecord + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'operationStatus required'requestId mutable'eventLogRecord + mutable'obsoleteSalesSeriesRecord mutable'profileRecord + mutable'userRecord + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'eventLogRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'obsoleteSalesSeriesRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'profileRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'userRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True Prelude.True + mutable'eventLogRecord mutable'obsoleteSalesSeriesRecord + mutable'profileRecord mutable'userRecord) + "SearchResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"requestId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"operationStatus") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'errorMessage") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'userRecord") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'profileRecord") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'obsoleteSalesSeriesRecord") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'trackingNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'eventLogRecord") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))))) +instance Control.DeepSeq.NFData SearchResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SearchResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SearchResult'requestId x__) + (Control.DeepSeq.deepseq + (_SearchResult'operationStatus x__) + (Control.DeepSeq.deepseq + (_SearchResult'isComplete x__) + (Control.DeepSeq.deepseq + (_SearchResult'errorMessage x__) + (Control.DeepSeq.deepseq + (_SearchResult'userRecord x__) + (Control.DeepSeq.deepseq + (_SearchResult'profileRecord x__) + (Control.DeepSeq.deepseq + (_SearchResult'obsoleteSalesSeriesRecord x__) + (Control.DeepSeq.deepseq + (_SearchResult'trackingNumber x__) + (Control.DeepSeq.deepseq + (_SearchResult'eventLogRecord x__) ()))))))))) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.obsoleteCustomerId' @:: Lens' SendCredentialResetEmail Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteCustomerId' @:: Lens' SendCredentialResetEmail (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.loginId' @:: Lens' SendCredentialResetEmail Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loginId' @:: Lens' SendCredentialResetEmail (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.operation' @:: Lens' SendCredentialResetEmail [Data.Word.Word32]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'operation' @:: Lens' SendCredentialResetEmail (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Cmsapi1_Fields.profileId' @:: Lens' SendCredentialResetEmail Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileId' @:: Lens' SendCredentialResetEmail (Prelude.Maybe Data.Text.Text)@ -} +data SendCredentialResetEmail + = SendCredentialResetEmail'_constructor {_SendCredentialResetEmail'obsoleteCustomerId :: !(Prelude.Maybe Data.Text.Text), + _SendCredentialResetEmail'loginId :: !(Prelude.Maybe Data.Text.Text), + _SendCredentialResetEmail'operation :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _SendCredentialResetEmail'profileId :: !(Prelude.Maybe Data.Text.Text), + _SendCredentialResetEmail'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SendCredentialResetEmail where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SendCredentialResetEmail "obsoleteCustomerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendCredentialResetEmail'obsoleteCustomerId + (\ x__ y__ + -> x__ {_SendCredentialResetEmail'obsoleteCustomerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SendCredentialResetEmail "maybe'obsoleteCustomerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendCredentialResetEmail'obsoleteCustomerId + (\ x__ y__ + -> x__ {_SendCredentialResetEmail'obsoleteCustomerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SendCredentialResetEmail "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendCredentialResetEmail'loginId + (\ x__ y__ -> x__ {_SendCredentialResetEmail'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SendCredentialResetEmail "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendCredentialResetEmail'loginId + (\ x__ y__ -> x__ {_SendCredentialResetEmail'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SendCredentialResetEmail "operation" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendCredentialResetEmail'operation + (\ x__ y__ -> x__ {_SendCredentialResetEmail'operation = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField SendCredentialResetEmail "vec'operation" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendCredentialResetEmail'operation + (\ x__ y__ -> x__ {_SendCredentialResetEmail'operation = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SendCredentialResetEmail "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendCredentialResetEmail'profileId + (\ x__ y__ -> x__ {_SendCredentialResetEmail'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SendCredentialResetEmail "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendCredentialResetEmail'profileId + (\ x__ y__ -> x__ {_SendCredentialResetEmail'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Message SendCredentialResetEmail where + messageName _ = Data.Text.pack "cmsapi_1.SendCredentialResetEmail" + packedMessageDescriptor _ + = "\n\ + \\CANSendCredentialResetEmail\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\EM\n\ + \\blogin_id\CAN\STX \SOH(\tR\aloginId\DC2\FS\n\ + \\toperation\CAN\ETX \ETX(\rR\toperation\DC2\GS\n\ + \\n\ + \profile_id\CAN\EOT \SOH(\tR\tprofileId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteCustomerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId")) :: + Data.ProtoLens.FieldDescriptor SendCredentialResetEmail + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor SendCredentialResetEmail + operation__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"operation")) :: + Data.ProtoLens.FieldDescriptor SendCredentialResetEmail + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor SendCredentialResetEmail + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteCustomerId__field_descriptor), + (Data.ProtoLens.Tag 2, loginId__field_descriptor), + (Data.ProtoLens.Tag 3, operation__field_descriptor), + (Data.ProtoLens.Tag 4, profileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SendCredentialResetEmail'_unknownFields + (\ x__ y__ -> x__ {_SendCredentialResetEmail'_unknownFields = y__}) + defMessage + = SendCredentialResetEmail'_constructor + {_SendCredentialResetEmail'obsoleteCustomerId = Prelude.Nothing, + _SendCredentialResetEmail'loginId = Prelude.Nothing, + _SendCredentialResetEmail'operation = Data.Vector.Generic.empty, + _SendCredentialResetEmail'profileId = Prelude.Nothing, + _SendCredentialResetEmail'_unknownFields = []} + parseMessage + = let + loop :: + SendCredentialResetEmail + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser SendCredentialResetEmail + loop x mutable'operation + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'operation <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'operation) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'operation") frozen'operation x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_customer_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCustomerId") y x) + mutable'operation + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + mutable'operation + 24 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'operation y) + loop x v + 26 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'operation) + loop x y + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + mutable'operation + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'operation + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'operation <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'operation) + "SendCredentialResetEmail" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'operation") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData SendCredentialResetEmail where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SendCredentialResetEmail'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SendCredentialResetEmail'obsoleteCustomerId x__) + (Control.DeepSeq.deepseq + (_SendCredentialResetEmail'loginId x__) + (Control.DeepSeq.deepseq + (_SendCredentialResetEmail'operation x__) + (Control.DeepSeq.deepseq + (_SendCredentialResetEmail'profileId x__) ())))) +{- | Fields : + -} +data SendCredentialResetEmailResult + = SendCredentialResetEmailResult'_constructor {_SendCredentialResetEmailResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SendCredentialResetEmailResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message SendCredentialResetEmailResult where + messageName _ + = Data.Text.pack "cmsapi_1.SendCredentialResetEmailResult" + packedMessageDescriptor _ + = "\n\ + \\RSSendCredentialResetEmailResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _SendCredentialResetEmailResult'_unknownFields + (\ x__ y__ + -> x__ {_SendCredentialResetEmailResult'_unknownFields = y__}) + defMessage + = SendCredentialResetEmailResult'_constructor + {_SendCredentialResetEmailResult'_unknownFields = []} + parseMessage + = let + loop :: + SendCredentialResetEmailResult + -> Data.ProtoLens.Encoding.Bytes.Parser SendCredentialResetEmailResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "SendCredentialResetEmailResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData SendCredentialResetEmailResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SendCredentialResetEmailResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.obsoleteCustomerId' @:: Lens' SendWelcomeEmail Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteCustomerId' @:: Lens' SendWelcomeEmail (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.loginId' @:: Lens' SendWelcomeEmail [Data.Text.Text]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'loginId' @:: Lens' SendWelcomeEmail (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.profileId' @:: Lens' SendWelcomeEmail Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profileId' @:: Lens' SendWelcomeEmail (Prelude.Maybe Data.Text.Text)@ -} +data SendWelcomeEmail + = SendWelcomeEmail'_constructor {_SendWelcomeEmail'obsoleteCustomerId :: !(Prelude.Maybe Data.Text.Text), + _SendWelcomeEmail'loginId :: !(Data.Vector.Vector Data.Text.Text), + _SendWelcomeEmail'profileId :: !(Prelude.Maybe Data.Text.Text), + _SendWelcomeEmail'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SendWelcomeEmail where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SendWelcomeEmail "obsoleteCustomerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendWelcomeEmail'obsoleteCustomerId + (\ x__ y__ -> x__ {_SendWelcomeEmail'obsoleteCustomerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SendWelcomeEmail "maybe'obsoleteCustomerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendWelcomeEmail'obsoleteCustomerId + (\ x__ y__ -> x__ {_SendWelcomeEmail'obsoleteCustomerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SendWelcomeEmail "loginId" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendWelcomeEmail'loginId + (\ x__ y__ -> x__ {_SendWelcomeEmail'loginId = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField SendWelcomeEmail "vec'loginId" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendWelcomeEmail'loginId + (\ x__ y__ -> x__ {_SendWelcomeEmail'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SendWelcomeEmail "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendWelcomeEmail'profileId + (\ x__ y__ -> x__ {_SendWelcomeEmail'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SendWelcomeEmail "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SendWelcomeEmail'profileId + (\ x__ y__ -> x__ {_SendWelcomeEmail'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Message SendWelcomeEmail where + messageName _ = Data.Text.pack "cmsapi_1.SendWelcomeEmail" + packedMessageDescriptor _ + = "\n\ + \\DLESendWelcomeEmail\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\EM\n\ + \\blogin_id\CAN\STX \ETX(\tR\aloginId\DC2\GS\n\ + \\n\ + \profile_id\CAN\ETX \SOH(\tR\tprofileId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteCustomerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId")) :: + Data.ProtoLens.FieldDescriptor SendWelcomeEmail + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"loginId")) :: + Data.ProtoLens.FieldDescriptor SendWelcomeEmail + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor SendWelcomeEmail + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteCustomerId__field_descriptor), + (Data.ProtoLens.Tag 2, loginId__field_descriptor), + (Data.ProtoLens.Tag 3, profileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SendWelcomeEmail'_unknownFields + (\ x__ y__ -> x__ {_SendWelcomeEmail'_unknownFields = y__}) + defMessage + = SendWelcomeEmail'_constructor + {_SendWelcomeEmail'obsoleteCustomerId = Prelude.Nothing, + _SendWelcomeEmail'loginId = Data.Vector.Generic.empty, + _SendWelcomeEmail'profileId = Prelude.Nothing, + _SendWelcomeEmail'_unknownFields = []} + parseMessage + = let + loop :: + SendWelcomeEmail + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser SendWelcomeEmail + loop x mutable'loginId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'loginId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'loginId) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'loginId") frozen'loginId x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_customer_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCustomerId") y x) + mutable'loginId + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'loginId y) + loop x v + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + mutable'loginId + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'loginId + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'loginId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'loginId) + "SendWelcomeEmail" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'loginId") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData SendWelcomeEmail where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SendWelcomeEmail'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SendWelcomeEmail'obsoleteCustomerId x__) + (Control.DeepSeq.deepseq + (_SendWelcomeEmail'loginId x__) + (Control.DeepSeq.deepseq (_SendWelcomeEmail'profileId x__) ()))) +{- | Fields : + -} +data SendWelcomeEmailResult + = SendWelcomeEmailResult'_constructor {_SendWelcomeEmailResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SendWelcomeEmailResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message SendWelcomeEmailResult where + messageName _ = Data.Text.pack "cmsapi_1.SendWelcomeEmailResult" + packedMessageDescriptor _ + = "\n\ + \\SYNSendWelcomeEmailResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _SendWelcomeEmailResult'_unknownFields + (\ x__ y__ -> x__ {_SendWelcomeEmailResult'_unknownFields = y__}) + defMessage + = SendWelcomeEmailResult'_constructor + {_SendWelcomeEmailResult'_unknownFields = []} + parseMessage + = let + loop :: + SendWelcomeEmailResult + -> Data.ProtoLens.Encoding.Bytes.Parser SendWelcomeEmailResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "SendWelcomeEmailResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData SendWelcomeEmailResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SendWelcomeEmailResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.logonResult' @:: Lens' ServerMessage Proto.CMS.Common1.LogonResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'logonResult' @:: Lens' ServerMessage (Prelude.Maybe Proto.CMS.Common1.LogonResult)@ + * 'Proto.CMS.Cmsapi1_Fields.loggedOff' @:: Lens' ServerMessage Proto.CMS.Common1.LoggedOff@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loggedOff' @:: Lens' ServerMessage (Prelude.Maybe Proto.CMS.Common1.LoggedOff)@ + * 'Proto.CMS.Cmsapi1_Fields.restoreOrJoinSessionResult' @:: Lens' ServerMessage Proto.CMS.Common1.RestoreOrJoinSessionResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'restoreOrJoinSessionResult' @:: Lens' ServerMessage (Prelude.Maybe Proto.CMS.Common1.RestoreOrJoinSessionResult)@ + * 'Proto.CMS.Cmsapi1_Fields.informationResult' @:: Lens' ServerMessage [InformationResult]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'informationResult' @:: Lens' ServerMessage (Data.Vector.Vector InformationResult)@ + * 'Proto.CMS.Cmsapi1_Fields.searchResult' @:: Lens' ServerMessage [SearchResult]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'searchResult' @:: Lens' ServerMessage (Data.Vector.Vector SearchResult)@ + * 'Proto.CMS.Cmsapi1_Fields.operationResult' @:: Lens' ServerMessage [OperationResult]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'operationResult' @:: Lens' ServerMessage (Data.Vector.Vector OperationResult)@ + * 'Proto.CMS.Cmsapi1_Fields.tradeRoutingResult' @:: Lens' ServerMessage [Proto.CMS.Traderouting1.TradeRoutingResult]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'tradeRoutingResult' @:: Lens' ServerMessage (Data.Vector.Vector Proto.CMS.Traderouting1.TradeRoutingResult)@ + * 'Proto.CMS.Cmsapi1_Fields.userMessage' @:: Lens' ServerMessage [Proto.CMS.Common1.UserMessage]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'userMessage' @:: Lens' ServerMessage (Data.Vector.Vector Proto.CMS.Common1.UserMessage)@ + * 'Proto.CMS.Cmsapi1_Fields.ping' @:: Lens' ServerMessage Ping@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'ping' @:: Lens' ServerMessage (Prelude.Maybe Ping)@ + * 'Proto.CMS.Cmsapi1_Fields.pong' @:: Lens' ServerMessage Pong@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'pong' @:: Lens' ServerMessage (Prelude.Maybe Pong)@ + * 'Proto.CMS.Cmsapi1_Fields.cancelDeferredRequestResult' @:: Lens' ServerMessage CancelDeferredRequestResult@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'cancelDeferredRequestResult' @:: Lens' ServerMessage (Prelude.Maybe CancelDeferredRequestResult)@ + * 'Proto.CMS.Cmsapi1_Fields.metadataResult' @:: Lens' ServerMessage [Proto.CMS.Metadata1.MetadataScopeResult]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'metadataResult' @:: Lens' ServerMessage (Data.Vector.Vector Proto.CMS.Metadata1.MetadataScopeResult)@ + * 'Proto.CMS.Cmsapi1_Fields.sessionContextScopeResult' @:: Lens' ServerMessage [Proto.CMS.SessionContext1.SessionContextScopeResult]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'sessionContextScopeResult' @:: Lens' ServerMessage (Data.Vector.Vector Proto.CMS.SessionContext1.SessionContextScopeResult)@ + * 'Proto.CMS.Cmsapi1_Fields.locationScopeResult' @:: Lens' ServerMessage [Proto.CMS.Location1.LocationScopeResult]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'locationScopeResult' @:: Lens' ServerMessage (Data.Vector.Vector Proto.CMS.Location1.LocationScopeResult)@ -} +data ServerMessage + = ServerMessage'_constructor {_ServerMessage'logonResult :: !(Prelude.Maybe Proto.CMS.Common1.LogonResult), + _ServerMessage'loggedOff :: !(Prelude.Maybe Proto.CMS.Common1.LoggedOff), + _ServerMessage'restoreOrJoinSessionResult :: !(Prelude.Maybe Proto.CMS.Common1.RestoreOrJoinSessionResult), + _ServerMessage'informationResult :: !(Data.Vector.Vector InformationResult), + _ServerMessage'searchResult :: !(Data.Vector.Vector SearchResult), + _ServerMessage'operationResult :: !(Data.Vector.Vector OperationResult), + _ServerMessage'tradeRoutingResult :: !(Data.Vector.Vector Proto.CMS.Traderouting1.TradeRoutingResult), + _ServerMessage'userMessage :: !(Data.Vector.Vector Proto.CMS.Common1.UserMessage), + _ServerMessage'ping :: !(Prelude.Maybe Ping), + _ServerMessage'pong :: !(Prelude.Maybe Pong), + _ServerMessage'cancelDeferredRequestResult :: !(Prelude.Maybe CancelDeferredRequestResult), + _ServerMessage'metadataResult :: !(Data.Vector.Vector Proto.CMS.Metadata1.MetadataScopeResult), + _ServerMessage'sessionContextScopeResult :: !(Data.Vector.Vector Proto.CMS.SessionContext1.SessionContextScopeResult), + _ServerMessage'locationScopeResult :: !(Data.Vector.Vector Proto.CMS.Location1.LocationScopeResult), + _ServerMessage'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ServerMessage where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ServerMessage "logonResult" Proto.CMS.Common1.LogonResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'logonResult + (\ x__ y__ -> x__ {_ServerMessage'logonResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ServerMessage "maybe'logonResult" (Prelude.Maybe Proto.CMS.Common1.LogonResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'logonResult + (\ x__ y__ -> x__ {_ServerMessage'logonResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "loggedOff" Proto.CMS.Common1.LoggedOff where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'loggedOff + (\ x__ y__ -> x__ {_ServerMessage'loggedOff = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ServerMessage "maybe'loggedOff" (Prelude.Maybe Proto.CMS.Common1.LoggedOff) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'loggedOff + (\ x__ y__ -> x__ {_ServerMessage'loggedOff = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "restoreOrJoinSessionResult" Proto.CMS.Common1.RestoreOrJoinSessionResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'restoreOrJoinSessionResult + (\ x__ y__ + -> x__ {_ServerMessage'restoreOrJoinSessionResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ServerMessage "maybe'restoreOrJoinSessionResult" (Prelude.Maybe Proto.CMS.Common1.RestoreOrJoinSessionResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'restoreOrJoinSessionResult + (\ x__ y__ + -> x__ {_ServerMessage'restoreOrJoinSessionResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "informationResult" [InformationResult] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'informationResult + (\ x__ y__ -> x__ {_ServerMessage'informationResult = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ServerMessage "vec'informationResult" (Data.Vector.Vector InformationResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'informationResult + (\ x__ y__ -> x__ {_ServerMessage'informationResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "searchResult" [SearchResult] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'searchResult + (\ x__ y__ -> x__ {_ServerMessage'searchResult = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ServerMessage "vec'searchResult" (Data.Vector.Vector SearchResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'searchResult + (\ x__ y__ -> x__ {_ServerMessage'searchResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "operationResult" [OperationResult] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'operationResult + (\ x__ y__ -> x__ {_ServerMessage'operationResult = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ServerMessage "vec'operationResult" (Data.Vector.Vector OperationResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'operationResult + (\ x__ y__ -> x__ {_ServerMessage'operationResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "tradeRoutingResult" [Proto.CMS.Traderouting1.TradeRoutingResult] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'tradeRoutingResult + (\ x__ y__ -> x__ {_ServerMessage'tradeRoutingResult = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ServerMessage "vec'tradeRoutingResult" (Data.Vector.Vector Proto.CMS.Traderouting1.TradeRoutingResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'tradeRoutingResult + (\ x__ y__ -> x__ {_ServerMessage'tradeRoutingResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "userMessage" [Proto.CMS.Common1.UserMessage] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'userMessage + (\ x__ y__ -> x__ {_ServerMessage'userMessage = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ServerMessage "vec'userMessage" (Data.Vector.Vector Proto.CMS.Common1.UserMessage) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'userMessage + (\ x__ y__ -> x__ {_ServerMessage'userMessage = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "ping" Ping where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'ping (\ x__ y__ -> x__ {_ServerMessage'ping = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ServerMessage "maybe'ping" (Prelude.Maybe Ping) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'ping (\ x__ y__ -> x__ {_ServerMessage'ping = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "pong" Pong where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'pong (\ x__ y__ -> x__ {_ServerMessage'pong = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ServerMessage "maybe'pong" (Prelude.Maybe Pong) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'pong (\ x__ y__ -> x__ {_ServerMessage'pong = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "cancelDeferredRequestResult" CancelDeferredRequestResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'cancelDeferredRequestResult + (\ x__ y__ + -> x__ {_ServerMessage'cancelDeferredRequestResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ServerMessage "maybe'cancelDeferredRequestResult" (Prelude.Maybe CancelDeferredRequestResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'cancelDeferredRequestResult + (\ x__ y__ + -> x__ {_ServerMessage'cancelDeferredRequestResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "metadataResult" [Proto.CMS.Metadata1.MetadataScopeResult] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'metadataResult + (\ x__ y__ -> x__ {_ServerMessage'metadataResult = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ServerMessage "vec'metadataResult" (Data.Vector.Vector Proto.CMS.Metadata1.MetadataScopeResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'metadataResult + (\ x__ y__ -> x__ {_ServerMessage'metadataResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "sessionContextScopeResult" [Proto.CMS.SessionContext1.SessionContextScopeResult] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'sessionContextScopeResult + (\ x__ y__ + -> x__ {_ServerMessage'sessionContextScopeResult = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ServerMessage "vec'sessionContextScopeResult" (Data.Vector.Vector Proto.CMS.SessionContext1.SessionContextScopeResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'sessionContextScopeResult + (\ x__ y__ + -> x__ {_ServerMessage'sessionContextScopeResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServerMessage "locationScopeResult" [Proto.CMS.Location1.LocationScopeResult] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'locationScopeResult + (\ x__ y__ -> x__ {_ServerMessage'locationScopeResult = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ServerMessage "vec'locationScopeResult" (Data.Vector.Vector Proto.CMS.Location1.LocationScopeResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServerMessage'locationScopeResult + (\ x__ y__ -> x__ {_ServerMessage'locationScopeResult = y__})) + Prelude.id +instance Data.ProtoLens.Message ServerMessage where + messageName _ = Data.Text.pack "cmsapi_1.ServerMessage" + packedMessageDescriptor _ + = "\n\ + \\rServerMessage\DC28\n\ + \\flogon_result\CAN\SOH \SOH(\v2\NAK.common_1.LogonResultR\vlogonResult\DC22\n\ + \\n\ + \logged_off\CAN\STX \SOH(\v2\DC3.common_1.LoggedOffR\tloggedOff\DC2h\n\ + \\RSrestore_or_join_session_result\CAN\b \SOH(\v2$.common_1.RestoreOrJoinSessionResultR\SUBrestoreOrJoinSessionResult\DC2J\n\ + \\DC2information_result\CAN\ETX \ETX(\v2\ESC.cmsapi_1.InformationResultR\DC1informationResult\DC2;\n\ + \\rsearch_result\CAN\EOT \ETX(\v2\SYN.cmsapi_1.SearchResultR\fsearchResult\DC2D\n\ + \\DLEoperation_result\CAN\ENQ \ETX(\v2\EM.cmsapi_1.OperationResultR\SIoperationResult\DC2T\n\ + \\DC4trade_routing_result\CAN\ACK \ETX(\v2\".traderouting_1.TradeRoutingResultR\DC2tradeRoutingResult\DC28\n\ + \\fuser_message\CAN\a \ETX(\v2\NAK.common_1.UserMessageR\vuserMessage\DC2\"\n\ + \\EOTping\CAN\n\ + \ \SOH(\v2\SO.cmsapi_1.PingR\EOTping\DC2\"\n\ + \\EOTpong\CAN\v \SOH(\v2\SO.cmsapi_1.PongR\EOTpong\DC2j\n\ + \\RScancel_deferred_request_result\CAN\f \SOH(\v2%.cmsapi_1.CancelDeferredRequestResultR\ESCcancelDeferredRequestResult\DC2H\n\ + \\SImetadata_result\CAN\r \ETX(\v2\US.metadata_1.MetadataScopeResultR\SOmetadataResult\DC2m\n\ + \\FSsession_context_scope_result\CAN\SO \ETX(\v2,.session_context_1.SessionContextScopeResultR\EMsessionContextScopeResult\DC2S\n\ + \\NAKlocation_scope_result\CAN\SI \ETX(\v2\US.location_1.LocationScopeResultR\DC3locationScopeResult*\ENQ\bd\DLE\200\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + logonResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "logon_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LogonResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'logonResult")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + loggedOff__field_descriptor + = Data.ProtoLens.FieldDescriptor + "logged_off" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LoggedOff) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loggedOff")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + restoreOrJoinSessionResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "restore_or_join_session_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.RestoreOrJoinSessionResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'restoreOrJoinSessionResult")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + informationResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "information_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor InformationResult) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"informationResult")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + searchResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "search_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SearchResult) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"searchResult")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + operationResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OperationResult) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"operationResult")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + tradeRoutingResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_routing_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Traderouting1.TradeRoutingResult) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"tradeRoutingResult")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + userMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_message" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.UserMessage) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"userMessage")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + ping__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ping" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Ping) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'ping")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + pong__field_descriptor + = Data.ProtoLens.FieldDescriptor + "pong" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Pong) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'pong")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + cancelDeferredRequestResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cancel_deferred_request_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CancelDeferredRequestResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'cancelDeferredRequestResult")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + metadataResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "metadata_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Metadata1.MetadataScopeResult) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"metadataResult")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + sessionContextScopeResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "session_context_scope_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.SessionContext1.SessionContextScopeResult) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"sessionContextScopeResult")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + locationScopeResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "location_scope_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Location1.LocationScopeResult) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"locationScopeResult")) :: + Data.ProtoLens.FieldDescriptor ServerMessage + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, logonResult__field_descriptor), + (Data.ProtoLens.Tag 2, loggedOff__field_descriptor), + (Data.ProtoLens.Tag 8, + restoreOrJoinSessionResult__field_descriptor), + (Data.ProtoLens.Tag 3, informationResult__field_descriptor), + (Data.ProtoLens.Tag 4, searchResult__field_descriptor), + (Data.ProtoLens.Tag 5, operationResult__field_descriptor), + (Data.ProtoLens.Tag 6, tradeRoutingResult__field_descriptor), + (Data.ProtoLens.Tag 7, userMessage__field_descriptor), + (Data.ProtoLens.Tag 10, ping__field_descriptor), + (Data.ProtoLens.Tag 11, pong__field_descriptor), + (Data.ProtoLens.Tag 12, + cancelDeferredRequestResult__field_descriptor), + (Data.ProtoLens.Tag 13, metadataResult__field_descriptor), + (Data.ProtoLens.Tag 14, + sessionContextScopeResult__field_descriptor), + (Data.ProtoLens.Tag 15, locationScopeResult__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ServerMessage'_unknownFields + (\ x__ y__ -> x__ {_ServerMessage'_unknownFields = y__}) + defMessage + = ServerMessage'_constructor + {_ServerMessage'logonResult = Prelude.Nothing, + _ServerMessage'loggedOff = Prelude.Nothing, + _ServerMessage'restoreOrJoinSessionResult = Prelude.Nothing, + _ServerMessage'informationResult = Data.Vector.Generic.empty, + _ServerMessage'searchResult = Data.Vector.Generic.empty, + _ServerMessage'operationResult = Data.Vector.Generic.empty, + _ServerMessage'tradeRoutingResult = Data.Vector.Generic.empty, + _ServerMessage'userMessage = Data.Vector.Generic.empty, + _ServerMessage'ping = Prelude.Nothing, + _ServerMessage'pong = Prelude.Nothing, + _ServerMessage'cancelDeferredRequestResult = Prelude.Nothing, + _ServerMessage'metadataResult = Data.Vector.Generic.empty, + _ServerMessage'sessionContextScopeResult = Data.Vector.Generic.empty, + _ServerMessage'locationScopeResult = Data.Vector.Generic.empty, + _ServerMessage'_unknownFields = []} + parseMessage + = let + loop :: + ServerMessage + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld InformationResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Location1.LocationScopeResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Metadata1.MetadataScopeResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld OperationResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld SearchResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.SessionContext1.SessionContextScopeResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Traderouting1.TradeRoutingResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.UserMessage + -> Data.ProtoLens.Encoding.Bytes.Parser ServerMessage + loop + x + mutable'informationResult + mutable'locationScopeResult + mutable'metadataResult + mutable'operationResult + mutable'searchResult + mutable'sessionContextScopeResult + mutable'tradeRoutingResult + mutable'userMessage + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'informationResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'informationResult) + frozen'locationScopeResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'locationScopeResult) + frozen'metadataResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'metadataResult) + frozen'operationResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'operationResult) + frozen'searchResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'searchResult) + frozen'sessionContextScopeResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'sessionContextScopeResult) + frozen'tradeRoutingResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'tradeRoutingResult) + frozen'userMessage <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'userMessage) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'informationResult") + frozen'informationResult + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'locationScopeResult") + frozen'locationScopeResult + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'metadataResult") + frozen'metadataResult + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'operationResult") + frozen'operationResult + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'searchResult") + frozen'searchResult + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"vec'sessionContextScopeResult") + frozen'sessionContextScopeResult + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"vec'tradeRoutingResult") + frozen'tradeRoutingResult + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'userMessage") + frozen'userMessage x))))))))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "logon_result" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"logonResult") y x) + mutable'informationResult mutable'locationScopeResult + mutable'metadataResult mutable'operationResult + mutable'searchResult mutable'sessionContextScopeResult + mutable'tradeRoutingResult mutable'userMessage + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "logged_off" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"loggedOff") y x) + mutable'informationResult mutable'locationScopeResult + mutable'metadataResult mutable'operationResult + mutable'searchResult mutable'sessionContextScopeResult + mutable'tradeRoutingResult mutable'userMessage + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "restore_or_join_session_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"restoreOrJoinSessionResult") y x) + mutable'informationResult mutable'locationScopeResult + mutable'metadataResult mutable'operationResult + mutable'searchResult mutable'sessionContextScopeResult + mutable'tradeRoutingResult mutable'userMessage + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "information_result" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'informationResult y) + loop + x v mutable'locationScopeResult mutable'metadataResult + mutable'operationResult mutable'searchResult + mutable'sessionContextScopeResult mutable'tradeRoutingResult + mutable'userMessage + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "search_result" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'searchResult y) + loop + x mutable'informationResult mutable'locationScopeResult + mutable'metadataResult mutable'operationResult v + mutable'sessionContextScopeResult mutable'tradeRoutingResult + mutable'userMessage + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "operation_result" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'operationResult y) + loop + x mutable'informationResult mutable'locationScopeResult + mutable'metadataResult v mutable'searchResult + mutable'sessionContextScopeResult mutable'tradeRoutingResult + mutable'userMessage + 50 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "trade_routing_result" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'tradeRoutingResult y) + loop + x mutable'informationResult mutable'locationScopeResult + mutable'metadataResult mutable'operationResult + mutable'searchResult mutable'sessionContextScopeResult v + mutable'userMessage + 58 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "user_message" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'userMessage y) + loop + x mutable'informationResult mutable'locationScopeResult + mutable'metadataResult mutable'operationResult + mutable'searchResult mutable'sessionContextScopeResult + mutable'tradeRoutingResult v + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "ping" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"ping") y x) + mutable'informationResult mutable'locationScopeResult + mutable'metadataResult mutable'operationResult + mutable'searchResult mutable'sessionContextScopeResult + mutable'tradeRoutingResult mutable'userMessage + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "pong" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"pong") y x) + mutable'informationResult mutable'locationScopeResult + mutable'metadataResult mutable'operationResult + mutable'searchResult mutable'sessionContextScopeResult + mutable'tradeRoutingResult mutable'userMessage + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "cancel_deferred_request_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"cancelDeferredRequestResult") y + x) + mutable'informationResult mutable'locationScopeResult + mutable'metadataResult mutable'operationResult + mutable'searchResult mutable'sessionContextScopeResult + mutable'tradeRoutingResult mutable'userMessage + 106 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "metadata_result" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'metadataResult y) + loop + x mutable'informationResult mutable'locationScopeResult v + mutable'operationResult mutable'searchResult + mutable'sessionContextScopeResult mutable'tradeRoutingResult + mutable'userMessage + 114 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "session_context_scope_result" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'sessionContextScopeResult y) + loop + x mutable'informationResult mutable'locationScopeResult + mutable'metadataResult mutable'operationResult + mutable'searchResult v mutable'tradeRoutingResult + mutable'userMessage + 122 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "location_scope_result" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'locationScopeResult y) + loop + x mutable'informationResult v mutable'metadataResult + mutable'operationResult mutable'searchResult + mutable'sessionContextScopeResult mutable'tradeRoutingResult + mutable'userMessage + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'informationResult mutable'locationScopeResult + mutable'metadataResult mutable'operationResult + mutable'searchResult mutable'sessionContextScopeResult + mutable'tradeRoutingResult mutable'userMessage + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'informationResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'locationScopeResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'metadataResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'operationResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'searchResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'sessionContextScopeResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'tradeRoutingResult <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'userMessage <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'informationResult + mutable'locationScopeResult mutable'metadataResult + mutable'operationResult mutable'searchResult + mutable'sessionContextScopeResult mutable'tradeRoutingResult + mutable'userMessage) + "ServerMessage" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'logonResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'loggedOff") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'restoreOrJoinSessionResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'informationResult") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'searchResult") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'operationResult") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'tradeRoutingResult") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'userMessage") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'ping") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'pong") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'cancelDeferredRequestResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'metadataResult") + _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'sessionContextScopeResult") + _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'locationScopeResult") + _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))) +instance Control.DeepSeq.NFData ServerMessage where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ServerMessage'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ServerMessage'logonResult x__) + (Control.DeepSeq.deepseq + (_ServerMessage'loggedOff x__) + (Control.DeepSeq.deepseq + (_ServerMessage'restoreOrJoinSessionResult x__) + (Control.DeepSeq.deepseq + (_ServerMessage'informationResult x__) + (Control.DeepSeq.deepseq + (_ServerMessage'searchResult x__) + (Control.DeepSeq.deepseq + (_ServerMessage'operationResult x__) + (Control.DeepSeq.deepseq + (_ServerMessage'tradeRoutingResult x__) + (Control.DeepSeq.deepseq + (_ServerMessage'userMessage x__) + (Control.DeepSeq.deepseq + (_ServerMessage'ping x__) + (Control.DeepSeq.deepseq + (_ServerMessage'pong x__) + (Control.DeepSeq.deepseq + (_ServerMessage'cancelDeferredRequestResult x__) + (Control.DeepSeq.deepseq + (_ServerMessage'metadataResult x__) + (Control.DeepSeq.deepseq + (_ServerMessage'sessionContextScopeResult x__) + (Control.DeepSeq.deepseq + (_ServerMessage'locationScopeResult x__) + ())))))))))))))) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.loginId' @:: Lens' TerminateLoginSession Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'loginId' @:: Lens' TerminateLoginSession (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Cmsapi1_Fields.sessionIds' @:: Lens' TerminateLoginSession [Data.Text.Text]@ + * 'Proto.CMS.Cmsapi1_Fields.vec'sessionIds' @:: Lens' TerminateLoginSession (Data.Vector.Vector Data.Text.Text)@ -} +data TerminateLoginSession + = TerminateLoginSession'_constructor {_TerminateLoginSession'loginId :: !(Prelude.Maybe Data.Text.Text), + _TerminateLoginSession'sessionIds :: !(Data.Vector.Vector Data.Text.Text), + _TerminateLoginSession'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TerminateLoginSession where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TerminateLoginSession "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TerminateLoginSession'loginId + (\ x__ y__ -> x__ {_TerminateLoginSession'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField TerminateLoginSession "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TerminateLoginSession'loginId + (\ x__ y__ -> x__ {_TerminateLoginSession'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TerminateLoginSession "sessionIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TerminateLoginSession'sessionIds + (\ x__ y__ -> x__ {_TerminateLoginSession'sessionIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField TerminateLoginSession "vec'sessionIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TerminateLoginSession'sessionIds + (\ x__ y__ -> x__ {_TerminateLoginSession'sessionIds = y__})) + Prelude.id +instance Data.ProtoLens.Message TerminateLoginSession where + messageName _ = Data.Text.pack "cmsapi_1.TerminateLoginSession" + packedMessageDescriptor _ + = "\n\ + \\NAKTerminateLoginSession\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2\US\n\ + \\vsession_ids\CAN\STX \ETX(\tR\n\ + \sessionIds" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor TerminateLoginSession + sessionIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "session_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"sessionIds")) :: + Data.ProtoLens.FieldDescriptor TerminateLoginSession + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor), + (Data.ProtoLens.Tag 2, sessionIds__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TerminateLoginSession'_unknownFields + (\ x__ y__ -> x__ {_TerminateLoginSession'_unknownFields = y__}) + defMessage + = TerminateLoginSession'_constructor + {_TerminateLoginSession'loginId = Prelude.Nothing, + _TerminateLoginSession'sessionIds = Data.Vector.Generic.empty, + _TerminateLoginSession'_unknownFields = []} + parseMessage + = let + loop :: + TerminateLoginSession + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser TerminateLoginSession + loop x mutable'sessionIds + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'sessionIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'sessionIds) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'sessionIds") frozen'sessionIds + x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + mutable'sessionIds + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "session_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'sessionIds y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'sessionIds + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'sessionIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'sessionIds) + "TerminateLoginSession" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'sessionIds") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData TerminateLoginSession where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TerminateLoginSession'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TerminateLoginSession'loginId x__) + (Control.DeepSeq.deepseq + (_TerminateLoginSession'sessionIds x__) ())) +{- | Fields : + -} +data TerminateLoginSessionResult + = TerminateLoginSessionResult'_constructor {_TerminateLoginSessionResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TerminateLoginSessionResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message TerminateLoginSessionResult where + messageName _ + = Data.Text.pack "cmsapi_1.TerminateLoginSessionResult" + packedMessageDescriptor _ + = "\n\ + \\ESCTerminateLoginSessionResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _TerminateLoginSessionResult'_unknownFields + (\ x__ y__ + -> x__ {_TerminateLoginSessionResult'_unknownFields = y__}) + defMessage + = TerminateLoginSessionResult'_constructor + {_TerminateLoginSessionResult'_unknownFields = []} + parseMessage + = let + loop :: + TerminateLoginSessionResult + -> Data.ProtoLens.Encoding.Bytes.Parser TerminateLoginSessionResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TerminateLoginSessionResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData TerminateLoginSessionResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TerminateLoginSessionResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.username' @:: Lens' UniqueUsernameResult Data.Text.Text@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'username' @:: Lens' UniqueUsernameResult (Prelude.Maybe Data.Text.Text)@ -} +data UniqueUsernameResult + = UniqueUsernameResult'_constructor {_UniqueUsernameResult'username :: !(Prelude.Maybe Data.Text.Text), + _UniqueUsernameResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UniqueUsernameResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UniqueUsernameResult "username" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UniqueUsernameResult'username + (\ x__ y__ -> x__ {_UniqueUsernameResult'username = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UniqueUsernameResult "maybe'username" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UniqueUsernameResult'username + (\ x__ y__ -> x__ {_UniqueUsernameResult'username = y__})) + Prelude.id +instance Data.ProtoLens.Message UniqueUsernameResult where + messageName _ = Data.Text.pack "cmsapi_1.UniqueUsernameResult" + packedMessageDescriptor _ + = "\n\ + \\DC4UniqueUsernameResult\DC2\SUB\n\ + \\busername\CAN\SOH \SOH(\tR\busername" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + username__field_descriptor + = Data.ProtoLens.FieldDescriptor + "username" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'username")) :: + Data.ProtoLens.FieldDescriptor UniqueUsernameResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, username__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UniqueUsernameResult'_unknownFields + (\ x__ y__ -> x__ {_UniqueUsernameResult'_unknownFields = y__}) + defMessage + = UniqueUsernameResult'_constructor + {_UniqueUsernameResult'username = Prelude.Nothing, + _UniqueUsernameResult'_unknownFields = []} + parseMessage + = let + loop :: + UniqueUsernameResult + -> Data.ProtoLens.Encoding.Bytes.Parser UniqueUsernameResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "username" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"username") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UniqueUsernameResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'username") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData UniqueUsernameResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UniqueUsernameResult'_unknownFields x__) + (Control.DeepSeq.deepseq (_UniqueUsernameResult'username x__) ()) +{- | Fields : + + * 'Proto.CMS.Cmsapi1_Fields.profile' @:: Lens' UpdateProfile Proto.CMS.Common1.Profile@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'profile' @:: Lens' UpdateProfile (Prelude.Maybe Proto.CMS.Common1.Profile)@ + * 'Proto.CMS.Cmsapi1_Fields.obsoleteOriginalProfile' @:: Lens' UpdateProfile Proto.CMS.Common1.Profile@ + * 'Proto.CMS.Cmsapi1_Fields.maybe'obsoleteOriginalProfile' @:: Lens' UpdateProfile (Prelude.Maybe Proto.CMS.Common1.Profile)@ -} +data UpdateProfile + = UpdateProfile'_constructor {_UpdateProfile'profile :: !(Prelude.Maybe Proto.CMS.Common1.Profile), + _UpdateProfile'obsoleteOriginalProfile :: !(Prelude.Maybe Proto.CMS.Common1.Profile), + _UpdateProfile'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateProfile where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateProfile "profile" Proto.CMS.Common1.Profile where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateProfile'profile + (\ x__ y__ -> x__ {_UpdateProfile'profile = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateProfile "maybe'profile" (Prelude.Maybe Proto.CMS.Common1.Profile) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateProfile'profile + (\ x__ y__ -> x__ {_UpdateProfile'profile = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateProfile "obsoleteOriginalProfile" Proto.CMS.Common1.Profile where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateProfile'obsoleteOriginalProfile + (\ x__ y__ -> x__ {_UpdateProfile'obsoleteOriginalProfile = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateProfile "maybe'obsoleteOriginalProfile" (Prelude.Maybe Proto.CMS.Common1.Profile) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateProfile'obsoleteOriginalProfile + (\ x__ y__ -> x__ {_UpdateProfile'obsoleteOriginalProfile = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateProfile where + messageName _ = Data.Text.pack "cmsapi_1.UpdateProfile" + packedMessageDescriptor _ + = "\n\ + \\rUpdateProfile\DC2+\n\ + \\aprofile\CAN\SOH \SOH(\v2\DC1.common_1.ProfileR\aprofile\DC2Q\n\ + \\EMobsolete_original_profile\CAN\STX \SOH(\v2\DC1.common_1.ProfileR\ETBobsoleteOriginalProfileB\STX\CAN\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + profile__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Profile) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profile")) :: + Data.ProtoLens.FieldDescriptor UpdateProfile + obsoleteOriginalProfile__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_original_profile" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Profile) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteOriginalProfile")) :: + Data.ProtoLens.FieldDescriptor UpdateProfile + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, profile__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteOriginalProfile__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateProfile'_unknownFields + (\ x__ y__ -> x__ {_UpdateProfile'_unknownFields = y__}) + defMessage + = UpdateProfile'_constructor + {_UpdateProfile'profile = Prelude.Nothing, + _UpdateProfile'obsoleteOriginalProfile = Prelude.Nothing, + _UpdateProfile'_unknownFields = []} + parseMessage + = let + loop :: + UpdateProfile -> Data.ProtoLens.Encoding.Bytes.Parser UpdateProfile + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "profile" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"profile") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_original_profile" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteOriginalProfile") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateProfile" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'profile") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteOriginalProfile") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UpdateProfile where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateProfile'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateProfile'profile x__) + (Control.DeepSeq.deepseq + (_UpdateProfile'obsoleteOriginalProfile x__) ())) +{- | Fields : + -} +data UpdateProfileResult + = UpdateProfileResult'_constructor {_UpdateProfileResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateProfileResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateProfileResult where + messageName _ = Data.Text.pack "cmsapi_1.UpdateProfileResult" + packedMessageDescriptor _ + = "\n\ + \\DC3UpdateProfileResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateProfileResult'_unknownFields + (\ x__ y__ -> x__ {_UpdateProfileResult'_unknownFields = y__}) + defMessage + = UpdateProfileResult'_constructor + {_UpdateProfileResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateProfileResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateProfileResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateProfileResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateProfileResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateProfileResult'_unknownFields x__) () +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\DC2CMS/cmsapi_1.proto\DC2\bcmsapi_1\SUB\NAKcommon/shared_1.proto\SUB\DC2CMS/common_1.proto\SUB\CANCMS/traderouting_1.proto\SUB\DC4CMS/metadata_1.proto\SUB\NAKCMS/log_event_1.proto\SUB\ESCCMS/session_context_1.proto\SUB\DC1CMS/login_1.proto\SUB\DC4CMS/location_1.proto\"\167\a\n\ + \\rClientMessage\DC2%\n\ + \\ENQlogon\CAN\SOH \SOH(\v2\SI.common_1.LogonR\ENQlogon\DC2(\n\ + \\ACKlogoff\CAN\STX \SOH(\v2\DLE.common_1.LogoffR\ACKlogoff\DC2U\n\ + \\ETBrestore_or_join_session\CAN\a \SOH(\v2\RS.common_1.RestoreOrJoinSessionR\DC4restoreOrJoinSession\DC2M\n\ + \\DC3information_request\CAN\ETX \ETX(\v2\FS.cmsapi_1.InformationRequestR\DC2informationRequest\DC2>\n\ + \\SOsearch_request\CAN\EOT \ETX(\v2\ETB.cmsapi_1.SearchRequestR\rsearchRequest\DC2G\n\ + \\DC1operation_request\CAN\ENQ \ETX(\v2\SUB.cmsapi_1.OperationRequestR\DLEoperationRequest\DC2W\n\ + \\NAKtrade_routing_request\CAN\ACK \ETX(\v2#.traderouting_1.TradeRoutingRequestR\DC3tradeRoutingRequest\DC2\"\n\ + \\EOTping\CAN\t \SOH(\v2\SO.cmsapi_1.PingR\EOTping\DC2\"\n\ + \\EOTpong\CAN\n\ + \ \SOH(\v2\SO.cmsapi_1.PongR\EOTpong\DC2W\n\ + \\ETBcancel_deferred_request\CAN\v \SOH(\v2\US.cmsapi_1.CancelDeferredRequestR\NAKcancelDeferredRequest\DC2K\n\ + \\DLEmetadata_request\CAN\f \ETX(\v2 .metadata_1.MetadataScopeRequestR\SImetadataRequest\DC2p\n\ + \\GSsession_context_scope_request\CAN\r \ETX(\v2-.session_context_1.SessionContextScopeRequestR\SUBsessionContextScopeRequest\DC2V\n\ + \\SYNlocation_scope_request\CAN\SO \ETX(\v2 .location_1.LocationScopeRequestR\DC4locationScopeRequest*\ENQ\bd\DLE\200\SOH\"\201\v\n\ + \\DC2InformationRequest\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC2E\n\ + \\DC1user_info_request\CAN\STX \SOH(\v2\EM.common_1.UserInfoRequestR\SIuserInfoRequest\DC2f\n\ + \!login_entitlement_service_request\CAN\ETX \SOH(\v2\ESC.common_1.EntityDataRequestR\RSloginEntitlementServiceRequest\DC2s\n\ + \!entitlement_category_list_request\CAN\EOT \SOH(\v2(.common_1.EntitlementCategoryListRequestR\RSentitlementCategoryListRequest\DC2c\n\ + \\ESCentitlement_service_request\CAN\ENQ \SOH(\v2#.common_1.EntitlementServiceRequestR\EMentitlementServiceRequest\DC2A\n\ + \\SIprofile_request\CAN\ACK \SOH(\v2\CAN.cmsapi_1.ProfileRequestR\SOprofileRequest\DC2p\n\ + \ entitlement_service_list_request\CAN\a \SOH(\v2'.common_1.EntitlementServiceListRequestR\GSentitlementServiceListRequest\DC2a\n\ + \\ESCget_unique_username_request\CAN\b \SOH(\v2\".cmsapi_1.GetUniqueUsernameRequestR\CANgetUniqueUsernameRequest\DC2\156\SOH\n\ + \0customer_sales_series_authorization_list_request\CAN\t \SOH(\v25.common_1.CustomerSalesSeriesAuthorizationListRequestR+customerSalesSeriesAuthorizationListRequest\DC2T\n\ + \\SYNlogin_settings_request\CAN\n\ + \ \SOH(\v2\RS.common_1.LoginSettingsRequestR\DC4loginSettingsRequest\DC2{\n\ + \%login_exchange_member_id_list_request\CAN\v \SOH(\v2*.common_1.LoginExchangeMemberIdListRequestR loginExchangeMemberIdListRequest\DC2d\n\ + \\FSlookup_property_list_request\CAN\f \SOH(\v2#.common_1.LookupPropertyListRequestR\EMlookupPropertyListRequest\DC2[\n\ + \\EMauth_partner_list_request\CAN\r \SOH(\v2 .cmsapi_1.AuthPartnerListRequestR\SYNauthPartnerListRequest\DC2q\n\ + \!login_billing_custom_data_request\CAN\SO \SOH(\v2'.common_1.LoginBillingCustomDataRequestR\GSloginBillingCustomDataRequest\DC2Z\n\ + \\CANtrading_features_request\CAN\SI \SOH(\v2 .common_1.TradingFeaturesRequestR\SYNtradingFeaturesRequest\"\217\ETX\n\ + \\rSearchRequest\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC2\DLE\n\ + \\ETXtop\CAN\STX \SOH(\rR\ETXtop\DC2K\n\ + \\DC3user_search_request\CAN\ETX \SOH(\v2\ESC.common_1.UserSearchRequestR\DC1userSearchRequest\DC2T\n\ + \\SYNprofile_search_request\CAN\EOT \SOH(\v2\RS.cmsapi_1.ProfileSearchRequestR\DC4profileSearchRequest\DC2v\n\ + \$obsolete_sales_series_search_request\CAN\ENQ \SOH(\v2\".common_1.SalesSeriesSearchRequestR obsoleteSalesSeriesSearchRequestB\STX\CAN\SOH\DC2.\n\ + \\SIinclude_removed\CAN\ACK \SOH(\b:\ENQfalseR\SOincludeRemoved\DC2[\n\ + \\CANevent_log_search_request\CAN\a \SOH(\v2\".log_event_1.EventLogSearchRequestR\NAKeventLogSearchRequest\"\171\SO\n\ + \\DLEOperationRequest\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC22\n\ + \\n\ + \clone_user\CAN\STX \SOH(\v2\DC3.common_1.CloneUserR\tcloneUser\DC2>\n\ + \\SOcreate_profile\CAN\ETX \SOH(\v2\ETB.cmsapi_1.CreateProfileR\rcreateProfile\DC2>\n\ + \\SOupdate_profile\CAN\EOT \SOH(\v2\ETB.cmsapi_1.UpdateProfileR\rupdateProfile\DC2>\n\ + \\SOremove_profile\CAN\ENQ \SOH(\v2\ETB.cmsapi_1.RemoveProfileR\rremoveProfile\DC25\n\ + \\vcreate_user\CAN\ACK \SOH(\v2\DC4.common_1.CreateUserR\n\ + \createUser\DC25\n\ + \\vupdate_user\CAN\a \SOH(\v2\DC4.common_1.UpdateUserR\n\ + \updateUser\DC25\n\ + \\vremove_user\CAN\b \SOH(\v2\DC4.common_1.RemoveUserR\n\ + \removeUser\DC2M\n\ + \\DC4link_user_to_profile\CAN\t \SOH(\v2\FS.cmsapi_1.LinkLoginToProfileR\DC1linkUserToProfile\DC2o\n\ + \ modify_login_entitlement_service\CAN\n\ + \ \SOH(\v2&.login_1.ModifyLoginEntitlementServiceR\GSmodifyLoginEntitlementService\DC2H\n\ + \\DC2send_welcome_email\CAN\v \SOH(\v2\SUB.cmsapi_1.SendWelcomeEmailR\DLEsendWelcomeEmail\DC28\n\ + \\frestore_user\CAN\f \SOH(\v2\NAK.common_1.RestoreUserR\vrestoreUser\DC2A\n\ + \\SIrestore_profile\CAN\r \SOH(\v2\CAN.cmsapi_1.RestoreProfileR\SOrestoreProfile\DC2\153\SOH\n\ + \/update_customer_sales_series_authorization_list\CAN\SO \SOH(\v24.common_1.UpdateCustomerSalesSeriesAuthorizationListR*updateCustomerSalesSeriesAuthorizationList\DC2x\n\ + \$update_login_exchange_member_id_list\CAN\SI \SOH(\v2).common_1.UpdateLoginExchangeMemberIdListR\USupdateLoginExchangeMemberIdList\DC2Q\n\ + \\NAKupdate_login_settings\CAN\DLE \SOH(\v2\GS.common_1.UpdateLoginSettingsR\DC3updateLoginSettings\DC2>\n\ + \\SOactivate_login\CAN\DC1 \SOH(\v2\ETB.common_1.ActivateLoginR\ractivateLogin\DC2D\n\ + \\DLEdeactivate_login\CAN\DC2 \SOH(\v2\EM.common_1.DeactivateLoginR\SIdeactivateLogin\DC2a\n\ + \\ESCsend_credential_reset_email\CAN\DC3 \SOH(\v2\".cmsapi_1.SendCredentialResetEmailR\CANsendCredentialResetEmail\DC2m\n\ + \\USgenerate_service_security_token\CAN\DC4 \SOH(\v2&.cmsapi_1.GenerateServiceSecurityTokenR\FSgenerateServiceSecurityToken\DC2]\n\ + \\EMerase_current_credentials\CAN\NAK \SOH(\v2!.common_1.EraseCurrentCredentialsR\ETBeraseCurrentCredentials\DC2W\n\ + \\ETBterminate_login_session\CAN\SYN \SOH(\v2\US.cmsapi_1.TerminateLoginSessionR\NAKterminateLoginSession\DC2n\n\ + \ update_login_billing_custom_data\CAN\ETB \SOH(\v2&.common_1.UpdateLoginBillingCustomDataR\FSupdateLoginBillingCustomData\"P\n\ + \\NAKCancelDeferredRequest\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\rR\STXid\DC2'\n\ + \\SItracking_number\CAN\STX \SOH(\EOTR\SOtrackingNumber\"\143\b\n\ + \\rServerMessage\DC28\n\ + \\flogon_result\CAN\SOH \SOH(\v2\NAK.common_1.LogonResultR\vlogonResult\DC22\n\ + \\n\ + \logged_off\CAN\STX \SOH(\v2\DC3.common_1.LoggedOffR\tloggedOff\DC2h\n\ + \\RSrestore_or_join_session_result\CAN\b \SOH(\v2$.common_1.RestoreOrJoinSessionResultR\SUBrestoreOrJoinSessionResult\DC2J\n\ + \\DC2information_result\CAN\ETX \ETX(\v2\ESC.cmsapi_1.InformationResultR\DC1informationResult\DC2;\n\ + \\rsearch_result\CAN\EOT \ETX(\v2\SYN.cmsapi_1.SearchResultR\fsearchResult\DC2D\n\ + \\DLEoperation_result\CAN\ENQ \ETX(\v2\EM.cmsapi_1.OperationResultR\SIoperationResult\DC2T\n\ + \\DC4trade_routing_result\CAN\ACK \ETX(\v2\".traderouting_1.TradeRoutingResultR\DC2tradeRoutingResult\DC28\n\ + \\fuser_message\CAN\a \ETX(\v2\NAK.common_1.UserMessageR\vuserMessage\DC2\"\n\ + \\EOTping\CAN\n\ + \ \SOH(\v2\SO.cmsapi_1.PingR\EOTping\DC2\"\n\ + \\EOTpong\CAN\v \SOH(\v2\SO.cmsapi_1.PongR\EOTpong\DC2j\n\ + \\RScancel_deferred_request_result\CAN\f \SOH(\v2%.cmsapi_1.CancelDeferredRequestResultR\ESCcancelDeferredRequestResult\DC2H\n\ + \\SImetadata_result\CAN\r \ETX(\v2\US.metadata_1.MetadataScopeResultR\SOmetadataResult\DC2m\n\ + \\FSsession_context_scope_result\CAN\SO \ETX(\v2,.session_context_1.SessionContextScopeResultR\EMsessionContextScopeResult\DC2S\n\ + \\NAKlocation_scope_result\CAN\SI \ETX(\v2\US.location_1.LocationScopeResultR\DC3locationScopeResult*\ENQ\bd\DLE\200\SOH\"\208\n\ + \\n\ + \\DC1InformationResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \STX(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \STX(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\ETX \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2\"\n\ + \\EOTuser\CAN\EOT \SOH(\v2\SO.common_1.UserR\EOTuser\DC2\\\n\ + \\EMlogin_entitlement_service\CAN\ENQ \ETX(\v2 .login_1.LoginEntitlementServiceR\ETBloginEntitlementService\DC2P\n\ + \\DC4entitlement_category\CAN\ACK \ETX(\v2\GS.common_1.EntitlementCategoryR\DC3entitlementCategory\DC2M\n\ + \\DC3entitlement_service\CAN\a \ETX(\v2\FS.common_1.EntitlementServiceR\DC2entitlementService\DC2+\n\ + \\aprofile\CAN\b \SOH(\v2\DC1.common_1.ProfileR\aprofile\DC2T\n\ + \\SYNunique_username_result\CAN\t \SOH(\v2\RS.cmsapi_1.UniqueUsernameResultR\DC4uniqueUsernameResult\DC2\153\SOH\n\ + \/customer_sales_series_authorization_list_result\CAN\n\ + \ \SOH(\v24.common_1.CustomerSalesSeriesAuthorizationListResultR*customerSalesSeriesAuthorizationListResult\DC2Q\n\ + \\NAKlogin_settings_result\CAN\v \SOH(\v2\GS.common_1.LoginSettingsResultR\DC3loginSettingsResult\DC2x\n\ + \$login_exchange_member_id_list_result\CAN\f \SOH(\v2).common_1.LoginExchangeMemberIdListResultR\USloginExchangeMemberIdListResult\DC2a\n\ + \\ESClookup_property_list_result\CAN\r \SOH(\v2\".common_1.LookupPropertyListResultR\CANlookupPropertyListResult\DC2X\n\ + \\CANauth_partner_list_result\CAN\SO \SOH(\v2\US.cmsapi_1.AuthPartnerListResultR\NAKauthPartnerListResult\DC2n\n\ + \ login_billing_custom_data_result\CAN\SI \SOH(\v2&.common_1.LoginBillingCustomDataResultR\FSloginBillingCustomDataResult\DC2'\n\ + \\SItracking_number\CAN\DLE \SOH(\EOTR\SOtrackingNumber\DC2W\n\ + \\ETBtrading_features_result\CAN\DC1 \SOH(\v2\US.common_1.TradingFeaturesResultR\NAKtradingFeaturesResult\"\173\EOT\n\ + \\fSearchResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \STX(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \STX(\rR\SIoperationStatus\DC2%\n\ + \\vis_complete\CAN\ETX \SOH(\b:\EOTtrueR\n\ + \isComplete\DC23\n\ + \\rerror_message\CAN\EOT \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2A\n\ + \\vuser_record\CAN\ENQ \ETX(\v2 .common_1.UserSearchResultRecordR\n\ + \userRecord\DC2J\n\ + \\SOprofile_record\CAN\ACK \ETX(\v2#.cmsapi_1.ProfileSearchResultRecordR\rprofileRecord\DC2l\n\ + \\FSobsolete_sales_series_record\CAN\a \ETX(\v2'.common_1.SalesSeriesSearchResultRecordR\EMobsoleteSalesSeriesRecordB\STX\CAN\SOH\DC2'\n\ + \\SItracking_number\CAN\b \SOH(\EOTR\SOtrackingNumber\DC2Q\n\ + \\DLEevent_log_record\CAN\t \ETX(\v2'.log_event_1.EventLogSearchResultRecordR\SOeventLogRecord\"\234\DC2\n\ + \\SIOperationResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \STX(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \STX(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\ETX \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2E\n\ + \\DC1clone_user_result\CAN\EOT \SOH(\v2\EM.common_1.CloneUserResultR\SIcloneUserResult\DC2Q\n\ + \\NAKcreate_profile_result\CAN\ENQ \SOH(\v2\GS.cmsapi_1.CreateProfileResultR\DC3createProfileResult\DC2Q\n\ + \\NAKupdate_profile_result\CAN\ACK \SOH(\v2\GS.cmsapi_1.UpdateProfileResultR\DC3updateProfileResult\DC2Q\n\ + \\NAKremove_profile_result\CAN\a \SOH(\v2\GS.cmsapi_1.RemoveProfileResultR\DC3removeProfileResult\DC2H\n\ + \\DC2create_user_result\CAN\b \SOH(\v2\SUB.common_1.CreateUserResultR\DLEcreateUserResult\DC2H\n\ + \\DC2update_user_result\CAN\t \SOH(\v2\SUB.common_1.UpdateUserResultR\DLEupdateUserResult\DC2H\n\ + \\DC2remove_user_result\CAN\n\ + \ \SOH(\v2\SUB.common_1.RemoveUserResultR\DLEremoveUserResult\DC2b\n\ + \\FSlink_login_to_profile_result\CAN\v \SOH(\v2\".cmsapi_1.LinkLoginToProfileResultR\CANlinkLoginToProfileResult\DC2\130\SOH\n\ + \'modify_login_entitlement_service_result\CAN\f \SOH(\v2,.login_1.ModifyLoginEntitlementServiceResultR#modifyLoginEntitlementServiceResult\DC2[\n\ + \\EMsend_welcome_email_result\CAN\r \SOH(\v2 .cmsapi_1.SendWelcomeEmailResultR\SYNsendWelcomeEmailResult\DC2K\n\ + \\DC3restore_user_result\CAN\SO \SOH(\v2\ESC.common_1.RestoreUserResultR\DC1restoreUserResult\DC2T\n\ + \\SYNrestore_profile_result\CAN\SI \SOH(\v2\RS.cmsapi_1.RestoreProfileResultR\DC4restoreProfileResult\DC2\172\SOH\n\ + \6update_customer_sales_series_authorization_list_result\CAN\DLE \SOH(\v2:.common_1.UpdateCustomerSalesSeriesAuthorizationListResultR0updateCustomerSalesSeriesAuthorizationListResult\DC2\139\SOH\n\ + \+update_login_exchange_member_id_list_result\CAN\DC1 \SOH(\v2/.common_1.UpdateLoginExchangeMemberIdListResultR%updateLoginExchangeMemberIdListResult\DC2d\n\ + \\FSupdate_login_settings_result\CAN\DC2 \SOH(\v2#.common_1.UpdateLoginSettingsResultR\EMupdateLoginSettingsResult\DC2Q\n\ + \\NAKactivate_login_result\CAN\DC3 \SOH(\v2\GS.common_1.ActivateLoginResultR\DC3activateLoginResult\DC2W\n\ + \\ETBdeactivate_login_result\CAN\DC4 \SOH(\v2\US.common_1.DeactivateLoginResultR\NAKdeactivateLoginResult\DC2t\n\ + \\"send_credential_reset_email_result\CAN\NAK \SOH(\v2(.cmsapi_1.SendCredentialResetEmailResultR\RSsendCredentialResetEmailResult\DC2\128\SOH\n\ + \&generate_service_security_token_result\CAN\SYN \SOH(\v2,.cmsapi_1.GenerateServiceSecurityTokenResultR\"generateServiceSecurityTokenResult\DC2p\n\ + \ erase_current_credentials_result\CAN\ETB \SOH(\v2'.common_1.EraseCurrentCredentialsResultR\GSeraseCurrentCredentialsResult\DC2j\n\ + \\RSterminate_login_session_result\CAN\CAN \SOH(\v2%.cmsapi_1.TerminateLoginSessionResultR\ESCterminateLoginSessionResult\DC2\129\SOH\n\ + \'update_login_billing_custom_data_result\CAN\EM \SOH(\v2,.common_1.UpdateLoginBillingCustomDataResultR\"updateLoginBillingCustomDataResult\DC2'\n\ + \\SItracking_number\CAN\SUB \SOH(\EOTR\SOtrackingNumber\"\130\SOH\n\ + \\DLESendWelcomeEmail\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\EM\n\ + \\blogin_id\CAN\STX \ETX(\tR\aloginId\DC2\GS\n\ + \\n\ + \profile_id\CAN\ETX \SOH(\tR\tprofileId\"\CAN\n\ + \\SYNSendWelcomeEmailResult\"\168\SOH\n\ + \\CANSendCredentialResetEmail\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\EM\n\ + \\blogin_id\CAN\STX \SOH(\tR\aloginId\DC2\FS\n\ + \\toperation\CAN\ETX \ETX(\rR\toperation\DC2\GS\n\ + \\n\ + \profile_id\CAN\EOT \SOH(\tR\tprofileId\" \n\ + \\RSSendCredentialResetEmailResult\"W\n\ + \\FSGenerateServiceSecurityToken\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2\FS\n\ + \\toperation\CAN\STX \ETX(\rR\toperation\"]\n\ + \\"GenerateServiceSecurityTokenResult\DC2%\n\ + \\SOsecurity_token\CAN\SOH \SOH(\tR\rsecurityToken\DC2\DLE\n\ + \\ETXurl\CAN\STX \SOH(\tR\ETXurl\"@\n\ + \\EOTPing\DC2\DC4\n\ + \\ENQtoken\CAN\SOH \SOH(\tR\ENQtoken\DC2\"\n\ + \\rping_utc_time\CAN\STX \STX(\DC2R\vpingUtcTime\"d\n\ + \\EOTPong\DC2\DC4\n\ + \\ENQtoken\CAN\SOH \SOH(\tR\ENQtoken\DC2\"\n\ + \\rping_utc_time\CAN\STX \STX(\DC2R\vpingUtcTime\DC2\"\n\ + \\rpong_utc_time\CAN\ETX \STX(\DC2R\vpongUtcTime\"\CAN\n\ + \\SYNAuthPartnerListRequest\"Q\n\ + \\NAKAuthPartnerListResult\DC28\n\ + \\fauth_partner\CAN\SOH \ETX(\v2\NAK.cmsapi_1.AuthPartnerR\vauthPartner\"\209\SOH\n\ + \\vAuthPartner\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2!\n\ + \\fdisplay_name\CAN\STX \SOH(\tR\vdisplayName\DC2!\n\ + \\fbrokerage_id\CAN\ETX \ETX(\tR\vbrokerageId\DC2.\n\ + \\DC3logout_endpoint_uri\CAN\EOT \SOH(\tR\DC1logoutEndpointUri\DC2<\n\ + \\SUBlogout_endpoint_parameters\CAN\ENQ \SOH(\tR\CANlogoutEndpointParameters\"<\n\ + \\rCreateProfile\DC2+\n\ + \\aprofile\CAN\SOH \SOH(\v2\DC1.common_1.ProfileR\aprofile\"\143\SOH\n\ + \\rUpdateProfile\DC2+\n\ + \\aprofile\CAN\SOH \SOH(\v2\DC1.common_1.ProfileR\aprofile\DC2Q\n\ + \\EMobsolete_original_profile\CAN\STX \SOH(\v2\DC1.common_1.ProfileR\ETBobsoleteOriginalProfileB\STX\CAN\SOH\"d\n\ + \\rRemoveProfile\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\STX \SOH(\tR\tprofileId\"e\n\ + \\SORestoreProfile\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\STX \SOH(\tR\tprofileId\"j\n\ + \\DC3CreateProfileResult\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\STX \SOH(\tR\tprofileId\"\NAK\n\ + \\DC3UpdateProfileResult\"\NAK\n\ + \\DC3RemoveProfileResult\"\SYN\n\ + \\DC4RestoreProfileResult\"e\n\ + \\SOProfileRequest\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\STX \SOH(\tR\tprofileId\"\132\SOH\n\ + \\DC2LinkLoginToProfile\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC24\n\ + \\DC4obsolete_customer_id\CAN\STX \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\ETX \SOH(\tR\tprofileId\"\SUB\n\ + \\CANLinkLoginToProfileResult\"o\n\ + \\CANGetUniqueUsernameRequest\DC24\n\ + \\DC4obsolete_customer_id\CAN\SOH \SOH(\tR\DC2obsoleteCustomerIdB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \profile_id\CAN\STX \SOH(\tR\tprofileId\"2\n\ + \\DC4UniqueUsernameResult\DC2\SUB\n\ + \\busername\CAN\SOH \SOH(\tR\busername\"\253\STX\n\ + \\DC4ProfileSearchRequest\DC2'\n\ + \\robsolete_text\CAN\SOH \SOH(\tR\fobsoleteTextB\STX\CAN\SOH\DC2<\n\ + \\CANobsolete_search_criteria\CAN\STX \ETX(\rR\SYNobsoleteSearchCriteriaB\STX\CAN\SOH\DC2=\n\ + \\SOsearch_options\CAN\ETX \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\EOT \SOH(\b:\ENQfalseR\fallMatchMode\"\145\SOH\n\ + \\SOSearchCriteria\DC2\SI\n\ + \\vCUSTOMER_ID\DLE\SOH\DC2\b\n\ + \\EOTNAME\DLE\STX\DC2\SO\n\ + \\n\ + \FIRST_NAME\DLE\ETX\DC2\r\n\ + \\tLAST_NAME\DLE\EOT\DC2\ETB\n\ + \\DC3LINKED_BROKERAGE_ID\DLE\ENQ\DC2\n\ + \\n\ + \\ACKNUMBER\DLE\ACK\DC2\SO\n\ + \\n\ + \PROFILE_ID\DLE\a\DC2\DLE\n\ + \\fPROFILE_TYPE\DLE\b\"\214\ETX\n\ + \\EMProfileSearchResultRecord\DC2\US\n\ + \\vcustomer_id\CAN\SOH \SOH(\tR\n\ + \customerId\DC2\DC2\n\ + \\EOTname\CAN\STX \SOH(\tR\EOTname\DC22\n\ + \\NAKlinked_brokerage_name\CAN\ETX \SOH(\tR\DC3linkedBrokerageName\DC2\GS\n\ + \\n\ + \first_name\CAN\EOT \SOH(\tR\tfirstName\DC2\ESC\n\ + \\tlast_name\CAN\ENQ \SOH(\tR\blastName\DC2.\n\ + \\DC3linked_brokerage_id\CAN\ACK \SOH(\tR\DC1linkedBrokerageId\DC2\CAN\n\ + \\aremoved\CAN\a \SOH(\bR\aremoved\DC2H\n\ + \\RSobsolete_authentication_system\CAN\b \SOH(\tR\FSobsoleteAuthenticationSystemB\STX\CAN\SOH\DC2!\n\ + \\fprofile_type\CAN\t \SOH(\rR\vprofileType\DC2\SYN\n\ + \\ACKnumber\CAN\n\ + \ \SOH(\tR\ACKnumber\DC2&\n\ + \\SIsales_series_id\CAN\v \SOH(\tR\rsalesSeriesId\DC2\GS\n\ + \\n\ + \profile_id\CAN\f \SOH(\tR\tprofileId\"\156\SOH\n\ + \\ESCCancelDeferredRequestResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \SOH(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \SOH(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\ETX \SOH(\v2\SO.shared_1.TextR\ferrorMessage\"S\n\ + \\NAKTerminateLoginSession\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2\US\n\ + \\vsession_ids\CAN\STX \ETX(\tR\n\ + \sessionIds\"\GS\n\ + \\ESCTerminateLoginSessionResult*I\n\ + \\SIProtocolVersion\DC2\SUB\n\ + \\SYNPROTOCOL_VERSION_MAJOR\DLE\SOH\DC2\SUB\n\ + \\SYNPROTOCOL_VERSION_MINOR\DLE$J\188\234\SOH\n\ + \\a\DC2\ENQ\DC3\NUL\212\ACK\SOH\n\ + \\195\a\n\ + \\SOH\f\DC2\ETX\DC3\NUL\DC22\184\a CQG Customer Management System API Protocol.\n\ + \\n\ + \ Protocol time attributes are 64-bit signed integers that contain offset in milliseconds from 01.01.1970 (unix timestamp).\n\ + \\n\ + \ The following attributes are used in comments to describe fields specifics:\n\ + \ 1. [immutable] - field is ignored via any operation message.\n\ + \ 2. [obsolete] - field is obsolete and candidate for remove in some next protocol version.\n\ + \ 3. [required] - field is required for any operation message, even if it is marked as optional.\n\ + \ Attribute can be additionally amended with operation name it is applied for. For example:\n\ + \ [required-create] - field is required for the create message only.\n\ + \ [required-update] - field is required for the update message only. \n\ + \ 4. [erasable] - field number can be provided in the cleared_fields to reset the value during update operation.\n\ + \\n\ + \ Protocol constants:\n\ + \ DEFAULT_RESULT_RECORDS_NUMBER = 1000.\n\ + \\n\ + \ Last changes were made on 21 Feb 2024\n\ + \ Version 1.36\n\ + \\n\ + \\t\n\ + \\STX\ETX\NUL\DC2\ETX\NAK\NUL\US\n\ + \\t\n\ + \\STX\ETX\SOH\DC2\ETX\SYN\NUL\FS\n\ + \\t\n\ + \\STX\ETX\STX\DC2\ETX\ETB\NUL\"\n\ + \\t\n\ + \\STX\ETX\ETX\DC2\ETX\CAN\NUL\RS\n\ + \\t\n\ + \\STX\ETX\EOT\DC2\ETX\EM\NUL\US\n\ + \\t\n\ + \\STX\ETX\ENQ\DC2\ETX\SUB\NUL%\n\ + \\t\n\ + \\STX\ETX\ACK\DC2\ETX\ESC\NUL\ESC\n\ + \\t\n\ + \\STX\ETX\a\DC2\ETX\FS\NUL\RS\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\RS\NUL\DC1\n\ + \\n\ + \\n\ + \\STX\ENQ\NUL\DC2\EOT \NUL'\SOH\n\ + \\n\ + \\n\ + \\ETX\ENQ\NUL\SOH\DC2\ETX \ENQ\DC4\n\ + \z\n\ + \\EOT\ENQ\NUL\STX\NUL\DC2\ETX#\EOT\US\SUBm Major number change is required for backward incompatible protocol versions (new 'proto' file is necessary)\n\ + \\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\NUL\SOH\DC2\ETX#\EOT\SUB\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\NUL\STX\DC2\ETX#\GS\RS\n\ + \\221\SOH\n\ + \\EOT\ENQ\NUL\STX\SOH\DC2\ETX&\EOT \SUB\207\SOH Minor number is increased for backward compatible protocol versions when new messages and/ or fields are\n\ + \ added without removing/ changing any existing messages and fields (new 'proto' file is not created)\n\ + \\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\SOH\SOH\DC2\ETX&\EOT\SUB\n\ + \\f\n\ + \\ENQ\ENQ\NUL\STX\SOH\STX\DC2\ETX&\GS\US\n\ + \\232\ENQ\n\ + \\STX\EOT\NUL\DC2\EOT4\NUL[\SOH\SUB\153\ENQ Rate of incoming requests (sum of different requests within messages) is limited,\n\ + \ use session_context_scope_request.api_limit_request to get limits of the current session.\n\ + \ In addition, users should keep no more than 100 pending requests at any time.\n\ + \ Significantly exceeding the limit of pending requests will result in the rejection of new requests.\n\ + \ NOTE: All the limits mentioned in this protocol are not guaranteed; they are given for reference only\n\ + \ and are subject to change without prior notice.\n\ + \ Delay may occur and be different because of the overall load of the system. \n\ + \ Pending requests are queued and executed as soon as the system state allows it.\n\ + \2@//------------------------------------------\n\ + \// Client Messages\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX4\b\NAK\n\ + \\153\SOH\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX8\EOT&\SUB\139\SOH Session related messages.\n\ + \ Only one session related message is expected in ClientMessage (it should not be combined with other messages).\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX8\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX8\r\ESC\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX8\FS!\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX8$%\n\ + \\v\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX9\EOT(\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX9\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX9\r\FS\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX9\GS#\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX9&'\n\ + \\v\n\ + \\EOT\EOT\NUL\STX\STX\DC2\ETX:\EOTG\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\EOT\DC2\ETX:\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ACK\DC2\ETX:\r*\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX:+B\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX:EF\n\ + \#\n\ + \\EOT\EOT\NUL\STX\ETX\DC2\ETX=\EOT8\SUB\SYN Information request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\EOT\DC2\ETX=\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ACK\DC2\ETX=\r\US\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX= 3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX=67\n\ + \\RS\n\ + \\EOT\EOT\NUL\STX\EOT\DC2\ETX@\EOT.\SUB\DC1 Search request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\EOT\DC2\ETX@\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\ACK\DC2\ETX@\r\SUB\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX@\ESC)\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX@,-\n\ + \!\n\ + \\EOT\EOT\NUL\STX\ENQ\DC2\ETXC\EOT4\SUB\DC4 Operation request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ENQ\EOT\DC2\ETXC\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ENQ\ACK\DC2\ETXC\r\GS\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETXC\RS/\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETXC23\n\ + \0\n\ + \\EOT\EOT\NUL\STX\ACK\DC2\ETXF\EOTJ\SUB# Trade routing related operations.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ACK\EOT\DC2\ETXF\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ACK\ACK\DC2\ETXF\r/\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETXF0E\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETXFHI\n\ + \0\n\ + \\EOT\EOT\NUL\STX\a\DC2\ETXI\EOT\ESC\SUB# Ping request initiated by client.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\a\EOT\DC2\ETXI\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\a\ACK\DC2\ETXI\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\a\SOH\DC2\ETXI\DC2\SYN\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\a\ETX\DC2\ETXI\EM\SUB\n\ + \7\n\ + \\EOT\EOT\NUL\STX\b\DC2\ETXL\EOT\FS\SUB* Pong message in response to server Ping.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\b\EOT\DC2\ETXL\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\b\ACK\DC2\ETXL\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\b\SOH\DC2\ETXL\DC2\SYN\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\b\ETX\DC2\ETXL\EM\ESC\n\ + \<\n\ + \\EOT\EOT\NUL\STX\t\DC2\ETXO\EOT@\SUB/ Request to cancel previously deferred request\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\t\EOT\DC2\ETXO\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\t\ACK\DC2\ETXO\r\"\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\t\SOH\DC2\ETXO#:\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\t\ETX\DC2\ETXO=?\n\ + \\v\n\ + \\EOT\EOT\NUL\STX\n\ + \\DC2\ETXQ\EOTC\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\n\ + \\EOT\DC2\ETXQ\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\n\ + \\ACK\DC2\ETXQ\r,\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\n\ + \\SOH\DC2\ETXQ-=\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\n\ + \\ETX\DC2\ETXQ@B\n\ + \P\n\ + \\EOT\EOT\NUL\STX\v\DC2\ETXT\EOT]\SUBC Requests related to configuration/information of current session.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\v\EOT\DC2\ETXT\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\v\ACK\DC2\ETXT\r9\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\v\SOH\DC2\ETXT:W\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\v\ETX\DC2\ETXTZ\\\n\ + \,\n\ + \\EOT\EOT\NUL\STX\f\DC2\ETXW\EOTI\SUB\US Location management requests.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\f\EOT\DC2\ETXW\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\f\ACK\DC2\ETXW\r,\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\f\SOH\DC2\ETXW-C\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\f\ETX\DC2\ETXWFH\n\ + \(\n\ + \\ETX\EOT\NUL\ENQ\DC2\ETXZ\EOT\SUB\SUB\FS Reserved for internal use.\n\ + \\n\ + \\v\n\ + \\EOT\EOT\NUL\ENQ\NUL\DC2\ETXZ\SI\EM\n\ + \\f\n\ + \\ENQ\EOT\NUL\ENQ\NUL\SOH\DC2\ETXZ\SI\DC2\n\ + \\f\n\ + \\ENQ\EOT\NUL\ENQ\NUL\STX\DC2\ETXZ\SYN\EM\n\ + \_\n\ + \\STX\EOT\SOH\DC2\ENQ_\NUL\144\SOH\SOH\SUBR Information request message.\n\ + \ One of the operational request fields is expected.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX_\b\SUB\n\ + \W\n\ + \\EOT\EOT\SOH\STX\NUL\DC2\ETXc\EOT\ESC\SUBJ Request identifier.\n\ + \ It should be unique to match with operation result.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\EOT\DC2\ETXc\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETXc\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETXc\DC4\SYN\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETXc\EM\SUB\n\ + \+\n\ + \\EOT\EOT\SOH\STX\SOH\DC2\ETXf\EOT<\SUB\RS Request of user information.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETXf\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ACK\DC2\ETXf\r%\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETXf&7\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETXf:;\n\ + \.\n\ + \\EOT\EOT\SOH\STX\STX\DC2\ETXi\EOTN\SUB! Request of user's entitlements.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\EOT\DC2\ETXi\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ACK\DC2\ETXi\r'\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETXi(I\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETXiLM\n\ + \1\n\ + \\EOT\EOT\SOH\STX\ETX\DC2\ETXl\EOT[\SUB$ Request of entitlement categories.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\EOT\DC2\ETXl\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ACK\DC2\ETXl\r4\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETXl5V\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETXlYZ\n\ + \:\n\ + \\EOT\EOT\SOH\STX\EOT\DC2\ETXo\EOTP\SUB- Request of entitlement service information.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\EOT\DC2\ETXo\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ACK\DC2\ETXo\r/\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\SOH\DC2\ETXo0K\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ETX\DC2\ETXoNO\n\ + \.\n\ + \\EOT\EOT\SOH\STX\ENQ\DC2\ETXr\EOT0\SUB! Request of profile information.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\EOT\DC2\ETXr\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\ACK\DC2\ETXr\r\ESC\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\SOH\DC2\ETXr\FS+\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\ETX\DC2\ETXr./\n\ + \-\n\ + \\EOT\EOT\SOH\STX\ACK\DC2\ETXu\EOTY\SUB Request for all services list.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\EOT\DC2\ETXu\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\ACK\DC2\ETXu\r3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\SOH\DC2\ETXu4T\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\ETX\DC2\ETXuWX\n\ + \)\n\ + \\EOT\EOT\SOH\STX\a\DC2\ETXx\EOTF\SUB\FS Request of unique username\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\EOT\DC2\ETXx\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\ACK\DC2\ETXx\r%\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\SOH\DC2\ETXx&A\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\ETX\DC2\ETXxDE\n\ + \6\n\ + \\EOT\EOT\SOH\STX\b\DC2\ETX{\EOTw\SUB) Customer to sales series links request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\EOT\DC2\ETX{\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\ACK\DC2\ETX{\rA\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\SOH\DC2\ETX{Br\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\ETX\DC2\ETX{uv\n\ + \1\n\ + \\EOT\EOT\SOH\STX\t\DC2\ETX~\EOTG\SUB$ Login additional settings request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\EOT\DC2\ETX~\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\ACK\DC2\ETX~\r*\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\SOH\DC2\ETX~+A\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\ETX\DC2\ETX~DF\n\ + \U\n\ + \\EOT\EOT\SOH\STX\n\ + \\DC2\EOT\130\SOH\EOTb\SUBG Requests login's member ids.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\n\ + \\EOT\DC2\EOT\130\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\n\ + \\ACK\DC2\EOT\130\SOH\r6\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\n\ + \\SOH\DC2\EOT\130\SOH7\\\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\n\ + \\ETX\DC2\EOT\130\SOH_a\n\ + \u\n\ + \\EOT\EOT\SOH\STX\v\DC2\EOT\134\SOH\EOTR\SUBg Get a list of lookup properties.\n\ + \ Lookup Property types are defined by CommonLookupPropertyType enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\v\EOT\DC2\EOT\134\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\v\ACK\DC2\EOT\134\SOH\r/\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\v\SOH\DC2\EOT\134\SOH0L\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\v\ETX\DC2\EOT\134\SOHOQ\n\ + \4\n\ + \\EOT\EOT\SOH\STX\f\DC2\EOT\137\SOH\EOTC\SUB& Get list of authentication partners.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\f\EOT\DC2\EOT\137\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\f\ACK\DC2\EOT\137\SOH\r#\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\f\SOH\DC2\EOT\137\SOH$=\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\f\ETX\DC2\EOT\137\SOH@B\n\ + \5\n\ + \\EOT\EOT\SOH\STX\r\DC2\EOT\140\SOH\EOT[\SUB' Request of login billing custom data.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\r\EOT\DC2\EOT\140\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\r\ACK\DC2\EOT\140\SOH\r3\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\r\SOH\DC2\EOT\140\SOH4U\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\r\ETX\DC2\EOT\140\SOHXZ\n\ + \,\n\ + \\EOT\EOT\SOH\STX\SO\DC2\EOT\143\SOH\EOTK\SUB\RS Request of trading features.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\SO\EOT\DC2\EOT\143\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\SO\ACK\DC2\EOT\143\SOH\r,\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\SO\SOH\DC2\EOT\143\SOH-E\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\SO\ETX\DC2\EOT\143\SOHHJ\n\ + \\222\SOH\n\ + \\STX\EOT\STX\DC2\ACK\150\SOH\NUL\173\SOH\SOH\SUB\207\SOH Request message to search for information.\n\ + \ One optional field is expected.\n\ + \ By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records.\n\ + \ Set parameter top to a larger number to receive more.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\STX\SOH\DC2\EOT\150\SOH\b\NAK\n\ + \X\n\ + \\EOT\EOT\STX\STX\NUL\DC2\EOT\154\SOH\EOT\ESC\SUBJ Request identifier.\n\ + \ It should be unique to match with operation result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\NUL\EOT\DC2\EOT\154\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\EOT\154\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\NUL\SOH\DC2\EOT\154\SOH\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\NUL\ETX\DC2\EOT\154\SOH\EM\SUB\n\ + \Y\n\ + \\EOT\EOT\STX\STX\SOH\DC2\EOT\157\SOH\EOT\FS\SUBK Optionally restrict matched results by returning the first 'top' records.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SOH\EOT\DC2\EOT\157\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SOH\ENQ\DC2\EOT\157\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SOH\SOH\DC2\EOT\157\SOH\DC4\ETB\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SOH\ETX\DC2\EOT\157\SOH\SUB\ESC\n\ + \!\n\ + \\EOT\EOT\STX\STX\STX\DC2\EOT\160\SOH\EOT@\SUB\DC3 Search for users.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\EOT\DC2\EOT\160\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\ACK\DC2\EOT\160\SOH\r'\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\SOH\DC2\EOT\160\SOH(;\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\ETX\DC2\EOT\160\SOH>?\n\ + \$\n\ + \\EOT\EOT\STX\STX\ETX\DC2\EOT\163\SOH\EOT=\SUB\SYN Search for profiles.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\EOT\DC2\EOT\163\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\ACK\DC2\EOT\163\SOH\r!\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\SOH\DC2\EOT\163\SOH\"8\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\ETX\DC2\EOT\163\SOH;<\n\ + \<\n\ + \\EOT\EOT\STX\STX\EOT\DC2\EOT\166\SOH\EOTj\SUB. [obsolete] Use ProfileSearchRequest instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\EOT\DC2\EOT\166\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\ACK\DC2\EOT\166\SOH\r.\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\SOH\DC2\EOT\166\SOH/S\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\ETX\DC2\EOT\166\SOHVW\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\b\DC2\EOT\166\SOHXi\n\ + \\SO\n\ + \\ACK\EOT\STX\STX\EOT\b\ETX\DC2\EOT\166\SOHYh\n\ + \R\n\ + \\EOT\EOT\STX\STX\ENQ\DC2\EOT\169\SOH\EOT8\SUBD Determines whether removed entities are included in search result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ENQ\EOT\DC2\EOT\169\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ENQ\ENQ\DC2\EOT\169\SOH\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ENQ\SOH\DC2\EOT\169\SOH\DC2!\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ENQ\ETX\DC2\EOT\169\SOH$%\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ENQ\b\DC2\EOT\169\SOH&7\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ENQ\a\DC2\EOT\169\SOH16\n\ + \&\n\ + \\EOT\EOT\STX\STX\ACK\DC2\EOT\172\SOH\EOTL\SUB\CAN Search for log events.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ACK\EOT\DC2\EOT\172\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ACK\ACK\DC2\EOT\172\SOH\r.\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ACK\SOH\DC2\EOT\172\SOH/G\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ACK\ETX\DC2\EOT\172\SOHJK\n\ + \\186\ACK\n\ + \\STX\EOT\ETX\DC2\ACK\185\SOH\NUL\138\STX\SOH\SUB\171\ACK Operation request message.\n\ + \ One of the request fields is expected.\n\ + \ Create operations ignore entity id fields (set it to an empty string).\n\ + \ Update operations use entity id fields as a key to update corresponding entities.\n\ + \ Also update operations have optional original entity fields (last know information before changes).\n\ + \ If the original entity is specified then it is used to identify which fields are updated and\n\ + \ which stay untouched so to update only fields that are different from the provided original.\n\ + \ Update operation does not fail if some of the updated fields have been changed already.\n\ + \ This means that if two clients change the same entity field at the same time then the last one is set\n\ + \ but if two clients change different fields of this entity at the same time then both changes are applied.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ETX\SOH\DC2\EOT\185\SOH\b\CAN\n\ + \X\n\ + \\EOT\EOT\ETX\STX\NUL\DC2\EOT\189\SOH\EOT\ESC\SUBJ Request identifier.\n\ + \ It should be unique to match with operation result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\EOT\DC2\EOT\189\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\EOT\189\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\EOT\189\SOH\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\EOT\189\SOH\EM\SUB\n\ + \X\n\ + \\EOT\EOT\ETX\STX\SOH\DC2\EOT\193\SOH\EOT/\SUBJ Clone template or regular user.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SOH\EOT\DC2\EOT\193\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SOH\ACK\DC2\EOT\193\SOH\r\US\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\EOT\193\SOH *\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\EOT\193\SOH-.\n\ + \\US\n\ + \\EOT\EOT\ETX\STX\STX\DC2\EOT\196\SOH\EOT.\SUB\DC1 Create profile.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\STX\EOT\DC2\EOT\196\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\STX\ACK\DC2\EOT\196\SOH\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\STX\SOH\DC2\EOT\196\SOH\ESC)\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\STX\ETX\DC2\EOT\196\SOH,-\n\ + \\US\n\ + \\EOT\EOT\ETX\STX\ETX\DC2\EOT\199\SOH\EOT.\SUB\DC1 Update profile.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ETX\EOT\DC2\EOT\199\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ETX\ACK\DC2\EOT\199\SOH\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ETX\SOH\DC2\EOT\199\SOH\ESC)\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ETX\ETX\DC2\EOT\199\SOH,-\n\ + \\US\n\ + \\EOT\EOT\ETX\STX\EOT\DC2\EOT\202\SOH\EOT.\SUB\DC1 Remove profile.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\EOT\EOT\DC2\EOT\202\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\EOT\ACK\DC2\EOT\202\SOH\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\EOT\SOH\DC2\EOT\202\SOH\ESC)\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\EOT\ETX\DC2\EOT\202\SOH,-\n\ + \\FS\n\ + \\EOT\EOT\ETX\STX\ENQ\DC2\EOT\205\SOH\EOT1\SUB\SO Create user.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ENQ\EOT\DC2\EOT\205\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ENQ\ACK\DC2\EOT\205\SOH\r \n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ENQ\SOH\DC2\EOT\205\SOH!,\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ENQ\ETX\DC2\EOT\205\SOH/0\n\ + \\FS\n\ + \\EOT\EOT\ETX\STX\ACK\DC2\EOT\208\SOH\EOT1\SUB\SO Update user.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ACK\EOT\DC2\EOT\208\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ACK\ACK\DC2\EOT\208\SOH\r \n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ACK\SOH\DC2\EOT\208\SOH!,\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ACK\ETX\DC2\EOT\208\SOH/0\n\ + \\FS\n\ + \\EOT\EOT\ETX\STX\a\DC2\EOT\211\SOH\EOT1\SUB\SO Remove user.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\a\EOT\DC2\EOT\211\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\a\ACK\DC2\EOT\211\SOH\r \n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\a\SOH\DC2\EOT\211\SOH!,\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\a\ETX\DC2\EOT\211\SOH/0\n\ + \X\n\ + \\EOT\EOT\ETX\STX\b\DC2\EOT\215\SOH\EOT9\SUBJ [re-]link login to a profile.\n\ + \ Supported profile types: admin, customer.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\b\EOT\DC2\EOT\215\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\b\ACK\DC2\EOT\215\SOH\r\US\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\b\SOH\DC2\EOT\215\SOH 4\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\b\ETX\DC2\EOT\215\SOH78\n\ + \=\n\ + \\EOT\EOT\ETX\STX\t\DC2\EOT\218\SOH\EOTY\SUB/ Modify the list of user entitlement services.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\t\EOT\DC2\EOT\218\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\t\ACK\DC2\EOT\218\SOH\r2\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\t\SOH\DC2\EOT\218\SOH3S\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\t\ETX\DC2\EOT\218\SOHVX\n\ + \Z\n\ + \\EOT\EOT\ETX\STX\n\ + \\DC2\EOT\222\SOH\EOT6\SUBL Send welcome e-mail to profile.\n\ + \ Supported profile types: admin, customer.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\n\ + \\EOT\DC2\EOT\222\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\n\ + \\ACK\DC2\EOT\222\SOH\r\GS\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\n\ + \\SOH\DC2\EOT\222\SOH\RS0\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\n\ + \\ETX\DC2\EOT\222\SOH35\n\ + \\GS\n\ + \\EOT\EOT\ETX\STX\v\DC2\EOT\225\SOH\EOT4\SUB\SI Restore user.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\v\EOT\DC2\EOT\225\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\v\ACK\DC2\EOT\225\SOH\r!\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\v\SOH\DC2\EOT\225\SOH\".\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\v\ETX\DC2\EOT\225\SOH13\n\ + \ \n\ + \\EOT\EOT\ETX\STX\f\DC2\EOT\228\SOH\EOT1\SUB\DC2 Restore profile.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\f\EOT\DC2\EOT\228\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\f\ACK\DC2\EOT\228\SOH\r\ESC\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\f\SOH\DC2\EOT\228\SOH\FS+\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\f\ETX\DC2\EOT\228\SOH.0\n\ + \M\n\ + \\EOT\EOT\ETX\STX\r\DC2\EOT\231\SOH\EOTv\SUB? Update customer to sales series authorization list operation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\r\EOT\DC2\EOT\231\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\r\ACK\DC2\EOT\231\SOH\r@\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\r\SOH\DC2\EOT\231\SOHAp\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\r\ETX\DC2\EOT\231\SOHsu\n\ + \^\n\ + \\EOT\EOT\ETX\STX\SO\DC2\EOT\235\SOH\EOT`\SUBP Update login exchange member id list.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SO\EOT\DC2\EOT\235\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SO\ACK\DC2\EOT\235\SOH\r5\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SO\SOH\DC2\EOT\235\SOH6Z\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SO\ETX\DC2\EOT\235\SOH]_\n\ + \&\n\ + \\EOT\EOT\ETX\STX\SI\DC2\EOT\238\SOH\EOTE\SUB\CAN Update Login settings.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SI\EOT\DC2\EOT\238\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SI\ACK\DC2\EOT\238\SOH\r)\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SI\SOH\DC2\EOT\238\SOH*?\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SI\ETX\DC2\EOT\238\SOHBD\n\ + \R\n\ + \\EOT\EOT\ETX\STX\DLE\DC2\EOT\242\SOH\EOT8\SUBD Activate login operation.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DLE\EOT\DC2\EOT\242\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DLE\ACK\DC2\EOT\242\SOH\r#\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DLE\SOH\DC2\EOT\242\SOH$2\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DLE\ETX\DC2\EOT\242\SOH57\n\ + \T\n\ + \\EOT\EOT\ETX\STX\DC1\DC2\EOT\246\SOH\EOT<\SUBF Deactivate login operation.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC1\EOT\DC2\EOT\246\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC1\ACK\DC2\EOT\246\SOH\r%\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC1\SOH\DC2\EOT\246\SOH&6\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC1\ETX\DC2\EOT\246\SOH9;\n\ + \\\\n\ + \\EOT\EOT\ETX\STX\DC2\DC2\EOT\250\SOH\EOTG\SUBN Send credential reset email.\n\ + \ Supported login domains: trade-routing, admin.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC2\EOT\DC2\EOT\250\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC2\ACK\DC2\EOT\250\SOH\r%\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC2\SOH\DC2\EOT\250\SOH&A\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC2\ETX\DC2\EOT\250\SOHDF\n\ + \\133\SOH\n\ + \\EOT\EOT\ETX\STX\DC3\DC2\EOT\254\SOH\EOTO\SUBw Generate a service security token for a special AuthServer operation.\n\ + \ Supported login domains: trade-routing, admin.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC3\EOT\DC2\EOT\254\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC3\ACK\DC2\EOT\254\SOH\r)\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC3\SOH\DC2\EOT\254\SOH*I\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC3\ETX\DC2\EOT\254\SOHLN\n\ + \n\n\ + \\EOT\EOT\ETX\STX\DC4\DC2\EOT\130\STX\EOTM\SUB` Erases current credentials of specified types.\n\ + \ Supported login domains: trade-routing, admin.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC4\EOT\DC2\EOT\130\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC4\ACK\DC2\EOT\130\STX\r-\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC4\SOH\DC2\EOT\130\STX.G\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\DC4\ETX\DC2\EOT\130\STXJL\n\ + \>\n\ + \\EOT\EOT\ETX\STX\NAK\DC2\EOT\133\STX\EOT@\SUB0 Supported login domains: trade-routing, admin.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NAK\EOT\DC2\EOT\133\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NAK\ACK\DC2\EOT\133\STX\r\"\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NAK\SOH\DC2\EOT\133\STX#:\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NAK\ETX\DC2\EOT\133\STX=?\n\ + \Z\n\ + \\EOT\EOT\ETX\STX\SYN\DC2\EOT\137\STX\EOTY\SUBL Update login billing custom data.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SYN\EOT\DC2\EOT\137\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SYN\ACK\DC2\EOT\137\STX\r2\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SYN\SOH\DC2\EOT\137\STX3S\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SYN\ETX\DC2\EOT\137\STXVX\n\ + \\160\EOT\n\ + \\STX\EOT\EOT\DC2\ACK\150\STX\NUL\158\STX\SOH\SUB\145\EOT Request used to cancel previously sent request that was deferred in Waiting Queue\n\ + \ Only next requests can be deferred and canceled:\n\ + \ cmsapi.InformationRequest\n\ + \ cmsapi.OperationRequest\n\ + \ cmsapi.SearchRequest\n\ + \ trapi.TradeRoutingRequest\n\ + \ Requests cancelation is available only if client was logged on or join session\n\ + \ with subscribe_on_request_status_change flag set to true.\n\ + \ If request with this tracking_number is not present in Waiting Queue or it was initiated from\n\ + \ another connection than it will not be canceled\n\ + \\n\ + \\v\n\ + \\ETX\EOT\EOT\SOH\DC2\EOT\150\STX\b\GS\n\ + \V\n\ + \\EOT\EOT\EOT\STX\NUL\DC2\EOT\154\STX\EOT\ESC\SUBH Request identifier\n\ + \ it should be unique to match with operation result\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\EOT\DC2\EOT\154\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\EOT\154\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\EOT\154\STX\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\EOT\154\STX\EM\SUB\n\ + \L\n\ + \\EOT\EOT\EOT\STX\SOH\DC2\EOT\157\STX\EOT(\SUB> Tracking Number of request to be canceled from Waiting Queue\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\EOT\DC2\EOT\157\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\ENQ\DC2\EOT\157\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\EOT\157\STX\DC4#\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\EOT\157\STX&'\n\ + \l\n\ + \\STX\EOT\ENQ\DC2\ACK\164\STX\NUL\205\STX\SOH\SUB\ESC Server to Client message.\n\ + \2A//------------------------------------------\n\ + \// Server Messages.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ENQ\SOH\DC2\EOT\164\STX\b\NAK\n\ + \/\n\ + \\EOT\EOT\ENQ\STX\NUL\DC2\EOT\167\STX\EOT3\SUB! Session level messages results.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\EOT\DC2\EOT\167\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\ACK\DC2\EOT\167\STX\r!\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\EOT\167\STX\".\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\EOT\167\STX12\n\ + \\f\n\ + \\EOT\EOT\ENQ\STX\SOH\DC2\EOT\168\STX\EOT/\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\EOT\DC2\EOT\168\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\ACK\DC2\EOT\168\STX\r\US\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\SOH\DC2\EOT\168\STX *\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\ETX\DC2\EOT\168\STX-.\n\ + \\f\n\ + \\EOT\EOT\ENQ\STX\STX\DC2\EOT\169\STX\EOTT\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\EOT\DC2\EOT\169\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\ACK\DC2\EOT\169\STX\r0\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\SOH\DC2\EOT\169\STX1O\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\ETX\DC2\EOT\169\STXRS\n\ + \.\n\ + \\EOT\EOT\ENQ\STX\ETX\DC2\EOT\172\STX\EOT6\SUB Result of information request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\EOT\DC2\EOT\172\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\ACK\DC2\EOT\172\STX\r\RS\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\SOH\DC2\EOT\172\STX\US1\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\ETX\DC2\EOT\172\STX45\n\ + \)\n\ + \\EOT\EOT\ENQ\STX\EOT\DC2\EOT\175\STX\EOT,\SUB\ESC Result of search request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\EOT\DC2\EOT\175\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\ACK\DC2\EOT\175\STX\r\EM\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\SOH\DC2\EOT\175\STX\SUB'\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\ETX\DC2\EOT\175\STX*+\n\ + \,\n\ + \\EOT\EOT\ENQ\STX\ENQ\DC2\EOT\178\STX\EOT2\SUB\RS Result of operation request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ENQ\EOT\DC2\EOT\178\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ENQ\ACK\DC2\EOT\178\STX\r\FS\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ENQ\SOH\DC2\EOT\178\STX\GS-\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ENQ\ETX\DC2\EOT\178\STX01\n\ + \0\n\ + \\EOT\EOT\ENQ\STX\ACK\DC2\EOT\181\STX\EOTH\SUB\" Trade routing operation results.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ACK\EOT\DC2\EOT\181\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ACK\ACK\DC2\EOT\181\STX\r.\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ACK\SOH\DC2\EOT\181\STX/C\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ACK\ETX\DC2\EOT\181\STXFG\n\ + \$\n\ + \\EOT\EOT\ENQ\STX\a\DC2\EOT\184\STX\EOT3\SUB\SYN Message from server.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\a\EOT\DC2\EOT\184\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\a\ACK\DC2\EOT\184\STX\r!\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\a\SOH\DC2\EOT\184\STX\".\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\a\ETX\DC2\EOT\184\STX12\n\ + \\GS\n\ + \\EOT\EOT\ENQ\STX\b\DC2\EOT\187\STX\EOT\FS\SUB\SI Ping request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\b\EOT\DC2\EOT\187\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\b\ACK\DC2\EOT\187\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\b\SOH\DC2\EOT\187\STX\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\b\ETX\DC2\EOT\187\STX\EM\ESC\n\ + \@\n\ + \\EOT\EOT\ENQ\STX\t\DC2\EOT\190\STX\EOT\FS\SUB2 Pong message in response to client Ping request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\t\EOT\DC2\EOT\190\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\t\ACK\DC2\EOT\190\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\t\SOH\DC2\EOT\190\STX\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\t\ETX\DC2\EOT\190\STX\EM\ESC\n\ + \1\n\ + \\EOT\EOT\ENQ\STX\n\ + \\DC2\EOT\193\STX\EOTM\SUB# Result of cancel_deferred_request\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\n\ + \\EOT\DC2\EOT\193\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\n\ + \\ACK\DC2\EOT\193\STX\r(\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\n\ + \\SOH\DC2\EOT\193\STX)G\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\n\ + \\ETX\DC2\EOT\193\STXJL\n\ + \\f\n\ + \\EOT\EOT\ENQ\STX\v\DC2\EOT\195\STX\EOTA\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\v\EOT\DC2\EOT\195\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\v\ACK\DC2\EOT\195\STX\r+\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\v\SOH\DC2\EOT\195\STX,;\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\v\ETX\DC2\EOT\195\STX>@\n\ + \8\n\ + \\EOT\EOT\ENQ\STX\f\DC2\EOT\198\STX\EOT[\SUB* Result of session_context_scope_request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\f\EOT\DC2\EOT\198\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\f\ACK\DC2\EOT\198\STX\r8\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\f\SOH\DC2\EOT\198\STX9U\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\f\ETX\DC2\EOT\198\STXXZ\n\ + \,\n\ + \\EOT\EOT\ENQ\STX\r\DC2\EOT\201\STX\EOTG\SUB\RS Location management results.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\r\EOT\DC2\EOT\201\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\r\ACK\DC2\EOT\201\STX\r+\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\r\SOH\DC2\EOT\201\STX,A\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\r\ETX\DC2\EOT\201\STXDF\n\ + \)\n\ + \\ETX\EOT\ENQ\ENQ\DC2\EOT\204\STX\EOT\SUB\SUB\FS Reserved for internal use.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\ENQ\ENQ\NUL\DC2\EOT\204\STX\SI\EM\n\ + \\r\n\ + \\ENQ\EOT\ENQ\ENQ\NUL\SOH\DC2\EOT\204\STX\SI\DC2\n\ + \\r\n\ + \\ENQ\EOT\ENQ\ENQ\NUL\STX\DC2\EOT\204\STX\SYN\EM\n\ + \\140\SOH\n\ + \\STX\EOT\ACK\DC2\ACK\209\STX\NUL\135\ETX\SOH\SUB~ Result of information request.\n\ + \ Information is filtered according to permissions of logged-in user (or 'on-behalf-of' user).\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ACK\SOH\DC2\EOT\209\STX\b\EM\n\ + \.\n\ + \\EOT\EOT\ACK\STX\NUL\DC2\EOT\212\STX\EOT#\SUB ID of a corresponding request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\EOT\DC2\EOT\212\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\EOT\212\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\EOT\212\STX\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\EOT\212\STX!\"\n\ + \_\n\ + \\EOT\EOT\ACK\STX\SOH\DC2\EOT\216\STX\EOT)\SUBQ Operation status.\n\ + \ This field is associated with common_1.OperationStatus enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\EOT\DC2\EOT\216\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\ENQ\DC2\EOT\216\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\SOH\DC2\EOT\216\STX\DC4$\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\ETX\DC2\EOT\216\STX'(\n\ + \ \n\ + \\EOT\EOT\ACK\STX\STX\DC2\EOT\219\STX\EOT-\SUB\DC2 Failure details.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\STX\EOT\DC2\EOT\219\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\STX\ACK\DC2\EOT\219\STX\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\STX\SOH\DC2\EOT\219\STX\ESC(\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\STX\ETX\DC2\EOT\219\STX+,\n\ + \!\n\ + \\EOT\EOT\ACK\STX\ETX\DC2\EOT\222\STX\EOT$\SUB\DC3 User information.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ETX\EOT\DC2\EOT\222\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ETX\ACK\DC2\EOT\222\STX\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ETX\SOH\DC2\EOT\222\STX\ESC\US\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ETX\ETX\DC2\EOT\222\STX\"#\n\ + \2\n\ + \\EOT\EOT\ACK\STX\EOT\DC2\EOT\225\STX\EOTK\SUB$ List of user entitlement services.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\EOT\EOT\DC2\EOT\225\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\EOT\ACK\DC2\EOT\225\STX\r,\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\EOT\SOH\DC2\EOT\225\STX-F\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\EOT\ETX\DC2\EOT\225\STXIJ\n\ + \,\n\ + \\EOT\EOT\ACK\STX\ENQ\DC2\EOT\228\STX\EOTC\SUB\RS Entitlement categories list.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ENQ\EOT\DC2\EOT\228\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ENQ\ACK\DC2\EOT\228\STX\r)\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ENQ\SOH\DC2\EOT\228\STX*>\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ENQ\ETX\DC2\EOT\228\STXAB\n\ + \)\n\ + \\EOT\EOT\ACK\STX\ACK\DC2\EOT\231\STX\EOTA\SUB\ESC Entitlement service list.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ACK\EOT\DC2\EOT\231\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ACK\ACK\DC2\EOT\231\STX\r(\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ACK\SOH\DC2\EOT\231\STX)<\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ACK\ETX\DC2\EOT\231\STX?@\n\ + \\CAN\n\ + \\EOT\EOT\ACK\STX\a\DC2\EOT\234\STX\EOT*\SUB\n\ + \ Profile.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\a\EOT\DC2\EOT\234\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\a\ACK\DC2\EOT\234\STX\r\GS\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\a\SOH\DC2\EOT\234\STX\RS%\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\a\ETX\DC2\EOT\234\STX()\n\ + \*\n\ + \\EOT\EOT\ACK\STX\b\DC2\EOT\237\STX\EOT=\SUB\FS Get unique username result\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\b\EOT\DC2\EOT\237\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\b\ACK\DC2\EOT\237\STX\r!\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\b\SOH\DC2\EOT\237\STX\"8\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\b\ETX\DC2\EOT\237\STX;<\n\ + \K\n\ + \\EOT\EOT\ACK\STX\t\DC2\EOT\240\STX\EOTv\SUB= Customer to sales series authorization list result message.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\t\EOT\DC2\EOT\240\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\t\ACK\DC2\EOT\240\STX\r@\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\t\SOH\DC2\EOT\240\STXAp\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\t\ETX\DC2\EOT\240\STXsu\n\ + \/\n\ + \\EOT\EOT\ACK\STX\n\ + \\DC2\EOT\243\STX\EOTE\SUB! Result of LoginSettingsRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\n\ + \\EOT\DC2\EOT\243\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\n\ + \\ACK\DC2\EOT\243\STX\r)\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\n\ + \\SOH\DC2\EOT\243\STX*?\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\n\ + \\ETX\DC2\EOT\243\STXBD\n\ + \:\n\ + \\EOT\EOT\ACK\STX\v\DC2\EOT\246\STX\EOT`\SUB, Result of LoginExchangeMemberIdListRequest\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\v\EOT\DC2\EOT\246\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\v\ACK\DC2\EOT\246\STX\r5\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\v\SOH\DC2\EOT\246\STX6Z\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\v\ETX\DC2\EOT\246\STX]_\n\ + \7\n\ + \\EOT\EOT\ACK\STX\f\DC2\EOT\249\STX\EOTP\SUB) Result of lookup_property_list_request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\f\EOT\DC2\EOT\249\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\f\ACK\DC2\EOT\249\STX\r.\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\f\SOH\DC2\EOT\249\STX/J\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\f\ETX\DC2\EOT\249\STXMO\n\ + \1\n\ + \\EOT\EOT\ACK\STX\r\DC2\EOT\252\STX\EOTA\SUB# Result of AuthPartnerListRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\r\EOT\DC2\EOT\252\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\r\ACK\DC2\EOT\252\STX\r\"\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\r\SOH\DC2\EOT\252\STX#;\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\r\ETX\DC2\EOT\252\STX>@\n\ + \8\n\ + \\EOT\EOT\ACK\STX\SO\DC2\EOT\255\STX\EOTY\SUB* Result of LoginBillingCustomDataRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SO\EOT\DC2\EOT\255\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SO\ACK\DC2\EOT\255\STX\r2\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SO\SOH\DC2\EOT\255\STX3S\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SO\ETX\DC2\EOT\255\STXVX\n\ + \g\n\ + \\EOT\EOT\ACK\STX\SI\DC2\EOT\131\ETX\EOT)\SUBY Request tracking number generated by CMS API\n\ + \ Used by client to cancel deferred request\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SI\EOT\DC2\EOT\131\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SI\ENQ\DC2\EOT\131\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SI\SOH\DC2\EOT\131\ETX\DC4#\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SI\ETX\DC2\EOT\131\ETX&(\n\ + \1\n\ + \\EOT\EOT\ACK\STX\DLE\DC2\EOT\134\ETX\EOTI\SUB# Result of TradingFeaturesRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\DLE\EOT\DC2\EOT\134\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\DLE\ACK\DC2\EOT\134\ETX\r+\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\DLE\SOH\DC2\EOT\134\ETX,C\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\DLE\ETX\DC2\EOT\134\ETXFH\n\ + \(\n\ + \\STX\EOT\a\DC2\ACK\138\ETX\NUL\169\ETX\SOH\SUB\SUB Search operation result.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\a\SOH\DC2\EOT\138\ETX\b\DC4\n\ + \.\n\ + \\EOT\EOT\a\STX\NUL\DC2\EOT\141\ETX\EOT#\SUB ID of a corresponding request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\EOT\DC2\EOT\141\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\ENQ\DC2\EOT\141\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\SOH\DC2\EOT\141\ETX\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\ETX\DC2\EOT\141\ETX!\"\n\ + \_\n\ + \\EOT\EOT\a\STX\SOH\DC2\EOT\145\ETX\EOT)\SUBQ Operation status.\n\ + \ This field is associated with common_1.OperationStatus enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\EOT\DC2\EOT\145\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\ENQ\DC2\EOT\145\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\SOH\DC2\EOT\145\ETX\DC4$\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\ETX\DC2\EOT\145\ETX'(\n\ + \y\n\ + \\EOT\EOT\a\STX\STX\DC2\EOT\149\ETX\EOT3\SUBk This flag is set to True if all search results are sent\n\ + \ and nothing was filtered out by 'top' parameter.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\EOT\DC2\EOT\149\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\ENQ\DC2\EOT\149\ETX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\SOH\DC2\EOT\149\ETX\DC2\GS\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\ETX\DC2\EOT\149\ETX !\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\b\DC2\EOT\149\ETX\"2\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\a\DC2\EOT\149\ETX-1\n\ + \ \n\ + \\EOT\EOT\a\STX\ETX\DC2\EOT\152\ETX\EOT-\SUB\DC2 Failure details.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ETX\EOT\DC2\EOT\152\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ETX\ACK\DC2\EOT\152\ETX\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ETX\SOH\DC2\EOT\152\ETX\ESC(\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ETX\ETX\DC2\EOT\152\ETX+,\n\ + \+\n\ + \\EOT\EOT\a\STX\EOT\DC2\EOT\155\ETX\EOT=\SUB\GS User search result records.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\EOT\EOT\DC2\EOT\155\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\EOT\ACK\DC2\EOT\155\ETX\r,\n\ + \\r\n\ + \\ENQ\EOT\a\STX\EOT\SOH\DC2\EOT\155\ETX-8\n\ + \\r\n\ + \\ENQ\EOT\a\STX\EOT\ETX\DC2\EOT\155\ETX;<\n\ + \.\n\ + \\EOT\EOT\a\STX\ENQ\DC2\EOT\158\ETX\EOT:\SUB Profile search result records.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ENQ\EOT\DC2\EOT\158\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ENQ\ACK\DC2\EOT\158\ETX\r&\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ENQ\SOH\DC2\EOT\158\ETX'5\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ENQ\ETX\DC2\EOT\158\ETX89\n\ + \A\n\ + \\EOT\EOT\a\STX\ACK\DC2\EOT\161\ETX\EOTg\SUB3 [obsolete] Use ProfileSearchResultRecord instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ACK\EOT\DC2\EOT\161\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ACK\ACK\DC2\EOT\161\ETX\r3\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ACK\SOH\DC2\EOT\161\ETX4P\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ACK\ETX\DC2\EOT\161\ETXST\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ACK\b\DC2\EOT\161\ETXUf\n\ + \\SO\n\ + \\ACK\EOT\a\STX\ACK\b\ETX\DC2\EOT\161\ETXVe\n\ + \g\n\ + \\EOT\EOT\a\STX\a\DC2\EOT\165\ETX\EOT(\SUBY Request tracking number generated by CMS API\n\ + \ Used by client to cancel deferred request\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\a\EOT\DC2\EOT\165\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\a\ENQ\DC2\EOT\165\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\a\STX\a\SOH\DC2\EOT\165\ETX\DC4#\n\ + \\r\n\ + \\ENQ\EOT\a\STX\a\ETX\DC2\EOT\165\ETX&'\n\ + \0\n\ + \\EOT\EOT\a\STX\b\DC2\EOT\168\ETX\EOTI\SUB\" Log event search result records.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\b\EOT\DC2\EOT\168\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\b\ACK\DC2\EOT\168\ETX\r3\n\ + \\r\n\ + \\ENQ\EOT\a\STX\b\SOH\DC2\EOT\168\ETX4D\n\ + \\r\n\ + \\ENQ\EOT\a\STX\b\ETX\DC2\EOT\168\ETXGH\n\ + \,\n\ + \\STX\EOT\b\DC2\ACK\172\ETX\NUL\252\ETX\SOH\SUB\RS Result of operation request.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\b\SOH\DC2\EOT\172\ETX\b\ETB\n\ + \.\n\ + \\EOT\EOT\b\STX\NUL\DC2\EOT\175\ETX\EOT#\SUB ID of a corresponding request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\EOT\DC2\EOT\175\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\ENQ\DC2\EOT\175\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\SOH\DC2\EOT\175\ETX\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\ETX\DC2\EOT\175\ETX!\"\n\ + \_\n\ + \\EOT\EOT\b\STX\SOH\DC2\EOT\179\ETX\EOT)\SUBQ Operation status.\n\ + \ This field is associated with common_1.OperationStatus enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\EOT\DC2\EOT\179\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\ENQ\DC2\EOT\179\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\SOH\DC2\EOT\179\ETX\DC4$\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\ETX\DC2\EOT\179\ETX'(\n\ + \ \n\ + \\EOT\EOT\b\STX\STX\DC2\EOT\182\ETX\EOT-\SUB\DC2 Failure details.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\EOT\DC2\EOT\182\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\ACK\DC2\EOT\182\ETX\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\SOH\DC2\EOT\182\ETX\ESC(\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\ETX\DC2\EOT\182\ETX+,\n\ + \\"\n\ + \\EOT\EOT\b\STX\ETX\DC2\EOT\185\ETX\EOT<\SUB\DC4 Clone user result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\EOT\DC2\EOT\185\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\ACK\DC2\EOT\185\ETX\r%\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\SOH\DC2\EOT\185\ETX&7\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\ETX\DC2\EOT\185\ETX:;\n\ + \&\n\ + \\EOT\EOT\b\STX\EOT\DC2\EOT\188\ETX\EOT;\SUB\CAN Create profile result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\EOT\EOT\DC2\EOT\188\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\EOT\ACK\DC2\EOT\188\ETX\r \n\ + \\r\n\ + \\ENQ\EOT\b\STX\EOT\SOH\DC2\EOT\188\ETX!6\n\ + \\r\n\ + \\ENQ\EOT\b\STX\EOT\ETX\DC2\EOT\188\ETX9:\n\ + \&\n\ + \\EOT\EOT\b\STX\ENQ\DC2\EOT\191\ETX\EOT;\SUB\CAN Update profile result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ENQ\EOT\DC2\EOT\191\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ENQ\ACK\DC2\EOT\191\ETX\r \n\ + \\r\n\ + \\ENQ\EOT\b\STX\ENQ\SOH\DC2\EOT\191\ETX!6\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ENQ\ETX\DC2\EOT\191\ETX9:\n\ + \&\n\ + \\EOT\EOT\b\STX\ACK\DC2\EOT\194\ETX\EOT;\SUB\CAN Remove profile result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ACK\EOT\DC2\EOT\194\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ACK\ACK\DC2\EOT\194\ETX\r \n\ + \\r\n\ + \\ENQ\EOT\b\STX\ACK\SOH\DC2\EOT\194\ETX!6\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ACK\ETX\DC2\EOT\194\ETX9:\n\ + \#\n\ + \\EOT\EOT\b\STX\a\DC2\EOT\197\ETX\EOT>\SUB\NAK Create user result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\a\EOT\DC2\EOT\197\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\a\ACK\DC2\EOT\197\ETX\r&\n\ + \\r\n\ + \\ENQ\EOT\b\STX\a\SOH\DC2\EOT\197\ETX'9\n\ + \\r\n\ + \\ENQ\EOT\b\STX\a\ETX\DC2\EOT\197\ETX<=\n\ + \#\n\ + \\EOT\EOT\b\STX\b\DC2\EOT\200\ETX\EOT>\SUB\NAK Update user result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\b\EOT\DC2\EOT\200\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\b\ACK\DC2\EOT\200\ETX\r&\n\ + \\r\n\ + \\ENQ\EOT\b\STX\b\SOH\DC2\EOT\200\ETX'9\n\ + \\r\n\ + \\ENQ\EOT\b\STX\b\ETX\DC2\EOT\200\ETX<=\n\ + \#\n\ + \\EOT\EOT\b\STX\t\DC2\EOT\203\ETX\EOT?\SUB\NAK Remove user result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\t\EOT\DC2\EOT\203\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\t\ACK\DC2\EOT\203\ETX\r&\n\ + \\r\n\ + \\ENQ\EOT\b\STX\t\SOH\DC2\EOT\203\ETX'9\n\ + \\r\n\ + \\ENQ\EOT\b\STX\t\ETX\DC2\EOT\203\ETX<>\n\ + \2\n\ + \\EOT\EOT\b\STX\n\ + \\DC2\EOT\206\ETX\EOTH\SUB$ [re-]link login to profile result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\n\ + \\EOT\DC2\EOT\206\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\n\ + \\ACK\DC2\EOT\206\ETX\r%\n\ + \\r\n\ + \\ENQ\EOT\b\STX\n\ + \\SOH\DC2\EOT\206\ETX&B\n\ + \\r\n\ + \\ENQ\EOT\b\STX\n\ + \\ETX\DC2\EOT\206\ETXEG\n\ + \7\n\ + \\EOT\EOT\b\STX\v\DC2\EOT\209\ETX\EOTf\SUB) Modify user entitlement service result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\v\EOT\DC2\EOT\209\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\v\ACK\DC2\EOT\209\ETX\r8\n\ + \\r\n\ + \\ENQ\EOT\b\STX\v\SOH\DC2\EOT\209\ETX9`\n\ + \\r\n\ + \\ENQ\EOT\b\STX\v\ETX\DC2\EOT\209\ETXce\n\ + \+\n\ + \\EOT\EOT\b\STX\f\DC2\EOT\212\ETX\EOTC\SUB\GS Send welcome e-mail result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\f\EOT\DC2\EOT\212\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\f\ACK\DC2\EOT\212\ETX\r#\n\ + \\r\n\ + \\ENQ\EOT\b\STX\f\SOH\DC2\EOT\212\ETX$=\n\ + \\r\n\ + \\ENQ\EOT\b\STX\f\ETX\DC2\EOT\212\ETX@B\n\ + \$\n\ + \\EOT\EOT\b\STX\r\DC2\EOT\215\ETX\EOTA\SUB\SYN Restore user result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\r\EOT\DC2\EOT\215\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\r\ACK\DC2\EOT\215\ETX\r'\n\ + \\r\n\ + \\ENQ\EOT\b\STX\r\SOH\DC2\EOT\215\ETX(;\n\ + \\r\n\ + \\ENQ\EOT\b\STX\r\ETX\DC2\EOT\215\ETX>@\n\ + \'\n\ + \\EOT\EOT\b\STX\SO\DC2\EOT\218\ETX\EOT>\SUB\EM Restore profile result.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SO\EOT\DC2\EOT\218\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SO\ACK\DC2\EOT\218\ETX\r!\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SO\SOH\DC2\EOT\218\ETX\"8\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SO\ETX\DC2\EOT\218\ETX;=\n\ + \N\n\ + \\EOT\EOT\b\STX\SI\DC2\ENQ\221\ETX\EOT\131\SOH\SUB? Result of customer to sales series authorization list update.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SI\EOT\DC2\EOT\221\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SI\ACK\DC2\EOT\221\ETX\rF\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SI\SOH\DC2\EOT\221\ETXG}\n\ + \\SI\n\ + \\ENQ\EOT\b\STX\SI\ETX\DC2\ACK\221\ETX\128\SOH\130\SOH\n\ + \:\n\ + \\EOT\EOT\b\STX\DLE\DC2\EOT\224\ETX\EOTm\SUB, Result of UpdateLoginExchangeMemberIdList.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\DLE\EOT\DC2\EOT\224\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\DLE\ACK\DC2\EOT\224\ETX\r;\n\ + \\r\n\ + \\ENQ\EOT\b\STX\DLE\SOH\DC2\EOT\224\ETX\n\ + \\SO\n\ + \\ACK\EOT\t\STX\NUL\b\ETX\DC2\EOT\130\EOT.=\n\ + \~\n\ + \\EOT\EOT\t\STX\SOH\DC2\EOT\134\EOT\EOT!\SUBp Optional list of logins to be included into this e-mail.\n\ + \ All profile's system logins are included if omitted.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\EOT\DC2\EOT\134\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\ENQ\DC2\EOT\134\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\SOH\DC2\EOT\134\EOT\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\ETX\DC2\EOT\134\EOT\US \n\ + \>\n\ + \\EOT\EOT\t\STX\STX\DC2\EOT\138\EOT\EOT#\SUB0 Profile id of a recipient.\n\ + \ Supported profiles\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\t\STX\STX\EOT\DC2\EOT\138\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\t\STX\STX\ENQ\DC2\EOT\138\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\t\STX\STX\SOH\DC2\EOT\138\EOT\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\t\STX\STX\ETX\DC2\EOT\138\EOT!\"\n\ + \8\n\ + \\STX\EOT\n\ + \\DC2\ACK\142\EOT\NUL\144\EOT\SOH\SUB* Result of send welcome e-mail operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\n\ + \\SOH\DC2\EOT\142\EOT\b\RS\n\ + \:\n\ + \\STX\EOT\v\DC2\ACK\147\EOT\NUL\162\EOT\SOH\SUB, Send credential reset e-mail to a profile.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\v\SOH\DC2\EOT\147\EOT\b \n\ + \2\n\ + \\EOT\EOT\v\STX\NUL\DC2\EOT\150\EOT\EOT?\SUB$ [obsolete] Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\EOT\DC2\EOT\150\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\ENQ\DC2\EOT\150\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\SOH\DC2\EOT\150\EOT\DC4(\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\ETX\DC2\EOT\150\EOT+,\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\b\DC2\EOT\150\EOT->\n\ + \\SO\n\ + \\ACK\EOT\v\STX\NUL\b\ETX\DC2\EOT\150\EOT.=\n\ + \\134\SOH\n\ + \\EOT\EOT\v\STX\SOH\DC2\EOT\154\EOT\EOT!\SUBx [required] A login linked to a profile for which the reset is requested.\n\ + \ Only trade-routing logins are supported now.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\EOT\DC2\EOT\154\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\ENQ\DC2\EOT\154\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\SOH\DC2\EOT\154\EOT\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\ETX\DC2\EOT\154\EOT\US \n\ + \\151\SOH\n\ + \\EOT\EOT\v\STX\STX\DC2\EOT\158\EOT\EOT\"\SUB\136\SOH List of special operations that are requested for this login.\n\ + \ This filed is associated with common_1.AuthServerSpecialOperation enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\EOT\DC2\EOT\158\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\ENQ\DC2\EOT\158\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\SOH\DC2\EOT\158\EOT\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\ETX\DC2\EOT\158\EOT !\n\ + \*\n\ + \\EOT\EOT\v\STX\ETX\DC2\EOT\161\EOT\EOT#\SUB\FS Profile id of a recipient.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\EOT\DC2\EOT\161\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\ENQ\DC2\EOT\161\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\SOH\DC2\EOT\161\EOT\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\ETX\DC2\EOT\161\EOT!\"\n\ + \0\n\ + \\STX\EOT\f\DC2\ACK\165\EOT\NUL\167\EOT\SOH\SUB\" Result of send e-mail operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\f\SOH\DC2\EOT\165\EOT\b&\n\ + \\f\n\ + \\STX\EOT\r\DC2\ACK\169\EOT\NUL\178\EOT\SOH\n\ + \\v\n\ + \\ETX\EOT\r\SOH\DC2\EOT\169\EOT\b$\n\ + \e\n\ + \\EOT\EOT\r\STX\NUL\DC2\EOT\173\EOT\EOT!\SUBW [required] Generate SST for this login.\n\ + \ Only trade-routing logins are supported now.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\EOT\DC2\EOT\173\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\ENQ\DC2\EOT\173\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\SOH\DC2\EOT\173\EOT\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\ETX\DC2\EOT\173\EOT\US \n\ + \\151\SOH\n\ + \\EOT\EOT\r\STX\SOH\DC2\EOT\177\EOT\EOT\"\SUB\136\SOH List of special operations that are requested for this login.\n\ + \ This filed is associated with common_1.AuthServerSpecialOperation enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\EOT\DC2\EOT\177\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\ENQ\DC2\EOT\177\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\SOH\DC2\EOT\177\EOT\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\ETX\DC2\EOT\177\EOT !\n\ + \\f\n\ + \\STX\EOT\SO\DC2\ACK\180\EOT\NUL\188\EOT\SOH\n\ + \\v\n\ + \\ETX\EOT\SO\SOH\DC2\EOT\180\EOT\b*\n\ + \ \n\ + \\EOT\EOT\SO\STX\NUL\DC2\EOT\183\EOT\EOT'\SUB\DC2 Generated token.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\EOT\DC2\EOT\183\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\ENQ\DC2\EOT\183\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\SOH\DC2\EOT\183\EOT\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\ETX\DC2\EOT\183\EOT%&\n\ + \i\n\ + \\EOT\EOT\SO\STX\SOH\DC2\EOT\187\EOT\EOT\FS\SUB[ URL that can be visited by a client to execute special operations using\n\ + \ generated token.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\EOT\DC2\EOT\187\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\ENQ\DC2\EOT\187\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\SOH\DC2\EOT\187\EOT\DC4\ETB\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\ETX\DC2\EOT\187\EOT\SUB\ESC\n\ + \\162\SOH\n\ + \\STX\EOT\SI\DC2\ACK\192\EOT\NUL\199\EOT\SOH\SUB\147\SOH Ping request which can be initiated by any side to ensure connection is alive.\n\ + \ Both client and server sides must respond such request with Pong.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SI\SOH\DC2\EOT\192\EOT\b\f\n\ + \3\n\ + \\EOT\EOT\SI\STX\NUL\DC2\EOT\195\EOT\ETX\GS\SUB% Token routed back in Pong response.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\EOT\DC2\EOT\195\EOT\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\ENQ\DC2\EOT\195\EOT\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\SOH\DC2\EOT\195\EOT\DC3\CAN\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\ETX\DC2\EOT\195\EOT\ESC\FS\n\ + \^\n\ + \\EOT\EOT\SI\STX\SOH\DC2\EOT\198\EOT\ETX%\SUBP UTC time when this request was composed. Used for network latency diagnostics.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\EOT\DC2\EOT\198\EOT\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\ENQ\DC2\EOT\198\EOT\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\SOH\DC2\EOT\198\EOT\DC3 \n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\ETX\DC2\EOT\198\EOT#$\n\ + \M\n\ + \\STX\EOT\DLE\DC2\ACK\202\EOT\NUL\212\EOT\SOH\SUB? Pong response which must be sent in response on Ping request.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DLE\SOH\DC2\EOT\202\EOT\b\f\n\ + \-\n\ + \\EOT\EOT\DLE\STX\NUL\DC2\EOT\205\EOT\ETX\GS\SUB\US Token passed in Ping request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\EOT\DC2\EOT\205\EOT\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\ENQ\DC2\EOT\205\EOT\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\SOH\DC2\EOT\205\EOT\DC3\CAN\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\ETX\DC2\EOT\205\EOT\ESC\FS\n\ + \6\n\ + \\EOT\EOT\DLE\STX\SOH\DC2\EOT\208\EOT\ETX%\SUB( Corresponding value from Ping request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\EOT\DC2\EOT\208\EOT\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\ENQ\DC2\EOT\208\EOT\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\SOH\DC2\EOT\208\EOT\DC3 \n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\ETX\DC2\EOT\208\EOT#$\n\ + \9\n\ + \\EOT\EOT\DLE\STX\STX\DC2\EOT\211\EOT\ETX%\SUB+ UTC time when this response was composed.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\EOT\DC2\EOT\211\EOT\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\ENQ\DC2\EOT\211\EOT\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\SOH\DC2\EOT\211\EOT\DC3 \n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\ETX\DC2\EOT\211\EOT#$\n\ + \<\n\ + \\STX\EOT\DC1\DC2\ACK\215\EOT\NUL\217\EOT\SOH\SUB. Request for list of authentication partners.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC1\SOH\DC2\EOT\215\EOT\b\RS\n\ + \0\n\ + \\STX\EOT\DC2\DC2\ACK\220\EOT\NUL\223\EOT\SOH\SUB\" Reply to AuthPartnerListRequest.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC2\SOH\DC2\EOT\220\EOT\b\GS\n\ + \\f\n\ + \\EOT\EOT\DC2\STX\NUL\DC2\EOT\222\EOT\EOT*\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\EOT\DC2\EOT\222\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\ACK\DC2\EOT\222\EOT\r\CAN\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\SOH\DC2\EOT\222\EOT\EM%\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\ETX\DC2\EOT\222\EOT()\n\ + \9\n\ + \\STX\EOT\DC3\DC2\ACK\226\EOT\NUL\242\EOT\SOH\SUB+ Information about authentication partner.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC3\SOH\DC2\EOT\226\EOT\b\DC3\n\ + \\GS\n\ + \\EOT\EOT\DC3\STX\NUL\DC2\EOT\229\EOT\EOT\ESC\SUB\SI Partner's ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\EOT\DC2\EOT\229\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\ENQ\DC2\EOT\229\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\SOH\DC2\EOT\229\EOT\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\ETX\DC2\EOT\229\EOT\EM\SUB\n\ + \'\n\ + \\EOT\EOT\DC3\STX\SOH\DC2\EOT\232\EOT\EOT%\SUB\EM Partner's display name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\EOT\DC2\EOT\232\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\ENQ\DC2\EOT\232\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\SOH\DC2\EOT\232\EOT\DC4 \n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\ETX\DC2\EOT\232\EOT#$\n\ + \D\n\ + \\EOT\EOT\DC3\STX\STX\DC2\EOT\235\EOT\EOT%\SUB6 List of brokerage (FCM) IDs the partner enabled for.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\EOT\DC2\EOT\235\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\ENQ\DC2\EOT\235\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\SOH\DC2\EOT\235\EOT\DC4 \n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\ETX\DC2\EOT\235\EOT#$\n\ + \5\n\ + \\EOT\EOT\DC3\STX\ETX\DC2\EOT\238\EOT\EOT,\SUB' Logout endpoint URI for this partner.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ETX\EOT\DC2\EOT\238\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ETX\ENQ\DC2\EOT\238\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ETX\SOH\DC2\EOT\238\EOT\DC4'\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ETX\ETX\DC2\EOT\238\EOT*+\n\ + \<\n\ + \\EOT\EOT\DC3\STX\EOT\DC2\EOT\241\EOT\EOT3\SUB. Logout endpoint parameters for this partner.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\EOT\EOT\DC2\EOT\241\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\EOT\ENQ\DC2\EOT\241\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\EOT\SOH\DC2\EOT\241\EOT\DC4.\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\EOT\ETX\DC2\EOT\241\EOT12\n\ + \)\n\ + \\STX\EOT\DC4\DC2\ACK\245\EOT\NUL\249\EOT\SOH\SUB\ESC Create profile operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC4\SOH\DC2\EOT\245\EOT\b\NAK\n\ + \-\n\ + \\EOT\EOT\DC4\STX\NUL\DC2\EOT\248\EOT\EOT*\SUB\US [required] Profile to create.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\EOT\DC2\EOT\248\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\ACK\DC2\EOT\248\EOT\r\GS\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\SOH\DC2\EOT\248\EOT\RS%\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\ETX\DC2\EOT\248\EOT()\n\ + \)\n\ + \\STX\EOT\NAK\DC2\ACK\252\EOT\NUL\131\ENQ\SOH\SUB\ESC Update profile operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\NAK\SOH\DC2\EOT\252\EOT\b\NAK\n\ + \-\n\ + \\EOT\EOT\NAK\STX\NUL\DC2\EOT\255\EOT\EOT*\SUB\US [required] Profile to update.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\EOT\DC2\EOT\255\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\ACK\DC2\EOT\255\EOT\r\GS\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\SOH\DC2\EOT\255\EOT\RS%\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\ETX\DC2\EOT\255\EOT()\n\ + \S\n\ + \\EOT\EOT\NAK\STX\SOH\DC2\EOT\130\ENQ\EOTN\SUBE [obsolete] Use only profile field with changed fields only instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\EOT\DC2\EOT\130\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\ACK\DC2\EOT\130\ENQ\r\GS\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\SOH\DC2\EOT\130\ENQ\RS7\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\ETX\DC2\EOT\130\ENQ:;\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\b\DC2\EOT\130\ENQ\n\ + \\SO\n\ + \\ACK\EOT\SYN\STX\NUL\b\ETX\DC2\EOT\137\ENQ.=\n\ + \-\n\ + \\EOT\EOT\SYN\STX\SOH\DC2\EOT\140\ENQ\EOT#\SUB\US Profile identifier to remove.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\EOT\DC2\EOT\140\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\ENQ\DC2\EOT\140\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\SOH\DC2\EOT\140\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\ETX\DC2\EOT\140\ENQ!\"\n\ + \*\n\ + \\STX\EOT\ETB\DC2\ACK\144\ENQ\NUL\151\ENQ\SOH\SUB\FS Restore profile operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ETB\SOH\DC2\EOT\144\ENQ\b\SYN\n\ + \2\n\ + \\EOT\EOT\ETB\STX\NUL\DC2\EOT\147\ENQ\EOT?\SUB$ [obsolete] Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\EOT\DC2\EOT\147\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\ENQ\DC2\EOT\147\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\SOH\DC2\EOT\147\ENQ\DC4(\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\ETX\DC2\EOT\147\ENQ+,\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\b\DC2\EOT\147\ENQ->\n\ + \\SO\n\ + \\ACK\EOT\ETB\STX\NUL\b\ETX\DC2\EOT\147\ENQ.=\n\ + \-\n\ + \\EOT\EOT\ETB\STX\SOH\DC2\EOT\150\ENQ\EOT#\SUB\US Profile identifier to remove.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\SOH\EOT\DC2\EOT\150\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\SOH\ENQ\DC2\EOT\150\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\SOH\SOH\DC2\EOT\150\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\SOH\ETX\DC2\EOT\150\ENQ!\"\n\ + \3\n\ + \\STX\EOT\CAN\DC2\ACK\154\ENQ\NUL\161\ENQ\SOH\SUB% Result of create profile operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\CAN\SOH\DC2\EOT\154\ENQ\b\ESC\n\ + \2\n\ + \\EOT\EOT\CAN\STX\NUL\DC2\EOT\157\ENQ\EOT?\SUB$ [obsolete] Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\EOT\DC2\EOT\157\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\ENQ\DC2\EOT\157\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\SOH\DC2\EOT\157\ENQ\DC4(\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\ETX\DC2\EOT\157\ENQ+,\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\b\DC2\EOT\157\ENQ->\n\ + \\SO\n\ + \\ACK\EOT\CAN\STX\NUL\b\ETX\DC2\EOT\157\ENQ.=\n\ + \1\n\ + \\EOT\EOT\CAN\STX\SOH\DC2\EOT\160\ENQ\EOT#\SUB# Assigned profile id, if succeded.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\EOT\DC2\EOT\160\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\ENQ\DC2\EOT\160\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\SOH\DC2\EOT\160\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\ETX\DC2\EOT\160\ENQ!\"\n\ + \3\n\ + \\STX\EOT\EM\DC2\ACK\164\ENQ\NUL\166\ENQ\SOH\SUB% Result of update profile operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\EM\SOH\DC2\EOT\164\ENQ\b\ESC\n\ + \3\n\ + \\STX\EOT\SUB\DC2\ACK\169\ENQ\NUL\171\ENQ\SOH\SUB% Result of remove profile operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SUB\SOH\DC2\EOT\169\ENQ\b\ESC\n\ + \4\n\ + \\STX\EOT\ESC\DC2\ACK\174\ENQ\NUL\176\ENQ\SOH\SUB& Result of restore profile operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ESC\SOH\DC2\EOT\174\ENQ\b\FS\n\ + \/\n\ + \\STX\EOT\FS\DC2\ACK\179\ENQ\NUL\186\ENQ\SOH\SUB! Request of profile information.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\FS\SOH\DC2\EOT\179\ENQ\b\SYN\n\ + \2\n\ + \\EOT\EOT\FS\STX\NUL\DC2\EOT\182\ENQ\EOT?\SUB$ [obsolete] Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\EOT\DC2\EOT\182\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\ENQ\DC2\EOT\182\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\SOH\DC2\EOT\182\ENQ\DC4(\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\ETX\DC2\EOT\182\ENQ+,\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\b\DC2\EOT\182\ENQ->\n\ + \\SO\n\ + \\ACK\EOT\FS\STX\NUL\b\ETX\DC2\EOT\182\ENQ.=\n\ + \*\n\ + \\EOT\EOT\FS\STX\SOH\DC2\EOT\185\ENQ\EOT#\SUB\FS ID of a requested profile.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\SOH\EOT\DC2\EOT\185\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\SOH\ENQ\DC2\EOT\185\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\SOH\SOH\DC2\EOT\185\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\SOH\ETX\DC2\EOT\185\ENQ!\"\n\ + \1\n\ + \\STX\EOT\GS\DC2\ACK\189\ENQ\NUL\200\ENQ\SOH\SUB# Link user to a profile operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\GS\SOH\DC2\EOT\189\ENQ\b\SUB\n\ + \,\n\ + \\EOT\EOT\GS\STX\NUL\DC2\EOT\192\ENQ\EOT!\SUB\RS [required] Login id to link.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\EOT\DC2\EOT\192\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\ENQ\DC2\EOT\192\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\SOH\DC2\EOT\192\ENQ\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\ETX\DC2\EOT\192\ENQ\US \n\ + \2\n\ + \\EOT\EOT\GS\STX\SOH\DC2\EOT\195\ENQ\EOT?\SUB$ [obsolete] Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\EOT\DC2\EOT\195\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\ENQ\DC2\EOT\195\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\SOH\DC2\EOT\195\ENQ\DC4(\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\ETX\DC2\EOT\195\ENQ+,\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\b\DC2\EOT\195\ENQ->\n\ + \\SO\n\ + \\ACK\EOT\GS\STX\SOH\b\ETX\DC2\EOT\195\ENQ.=\n\ + \F\n\ + \\EOT\EOT\GS\STX\STX\DC2\EOT\199\ENQ\EOT#\SUB8 Profile id.\n\ + \ Supported profile types: admin, customer.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\STX\EOT\DC2\EOT\199\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\STX\ENQ\DC2\EOT\199\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\STX\SOH\DC2\EOT\199\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\STX\ETX\DC2\EOT\199\ENQ!\"\n\ + \A\n\ + \\STX\EOT\RS\DC2\ACK\203\ENQ\NUL\205\ENQ\SOH\SUB3 Result of [re-]link login to a profile operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\RS\SOH\DC2\EOT\203\ENQ\b \n\ + \+\n\ + \\STX\EOT\US\DC2\ACK\208\ENQ\NUL\215\ENQ\SOH\SUB\GS Request of unique username.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\US\SOH\DC2\EOT\208\ENQ\b \n\ + \2\n\ + \\EOT\EOT\US\STX\NUL\DC2\EOT\211\ENQ\EOT?\SUB$ [obsolete] Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\EOT\DC2\EOT\211\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\ENQ\DC2\EOT\211\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\SOH\DC2\EOT\211\ENQ\DC4(\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\ETX\DC2\EOT\211\ENQ+,\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\b\DC2\EOT\211\ENQ->\n\ + \\SO\n\ + \\ACK\EOT\US\STX\NUL\b\ETX\DC2\EOT\211\ENQ.=\n\ + \/\n\ + \\EOT\EOT\US\STX\SOH\DC2\EOT\214\ENQ\EOT#\SUB! Profile id username created for\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\US\STX\SOH\EOT\DC2\EOT\214\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\US\STX\SOH\ENQ\DC2\EOT\214\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\US\STX\SOH\SOH\DC2\EOT\214\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\US\STX\SOH\ETX\DC2\EOT\214\ENQ!\"\n\ + \2\n\ + \\STX\EOT \DC2\ACK\218\ENQ\NUL\222\ENQ\SOH\SUB$ Result of unique username request.\n\ + \\n\ + \\v\n\ + \\ETX\EOT \SOH\DC2\EOT\218\ENQ\b\FS\n\ + \'\n\ + \\EOT\EOT \STX\NUL\DC2\EOT\221\ENQ\EOT!\SUB\EM username, if succeeded.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\EOT\DC2\EOT\221\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\ENQ\DC2\EOT\221\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\SOH\DC2\EOT\221\ENQ\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\ETX\DC2\EOT\221\ENQ\US \n\ + \+\n\ + \\STX\EOT!\DC2\ACK\225\ENQ\NUL\139\ACK\SOH\SUB\GS Request to search profiles.\n\ + \\n\ + \\v\n\ + \\ETX\EOT!\SOH\DC2\EOT\225\ENQ\b\FS\n\ + \:\n\ + \\EOT\EOT!\EOT\NUL\DC2\ACK\228\ENQ\EOT\253\ENQ\ENQ\SUB* List of possible search refine criteria.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT!\EOT\NUL\SOH\DC2\EOT\228\ENQ\t\ETB\n\ + \(\n\ + \\ACK\EOT!\EOT\NUL\STX\NUL\DC2\EOT\231\ENQ\b\CAN\SUB\CAN Search by customer id.\n\ + \\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\NUL\SOH\DC2\EOT\231\ENQ\b\DC3\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\NUL\STX\DC2\EOT\231\ENQ\SYN\ETB\n\ + \)\n\ + \\ACK\EOT!\EOT\NUL\STX\SOH\DC2\EOT\234\ENQ\b\DC1\SUB\EM Search by profile name.\n\ + \\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\SOH\SOH\DC2\EOT\234\ENQ\b\f\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\SOH\STX\DC2\EOT\234\ENQ\SI\DLE\n\ + \'\n\ + \\ACK\EOT!\EOT\NUL\STX\STX\DC2\EOT\237\ENQ\b\ETB\SUB\ETB Search by first name.\n\ + \\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\STX\SOH\DC2\EOT\237\ENQ\b\DC2\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\STX\STX\DC2\EOT\237\ENQ\NAK\SYN\n\ + \&\n\ + \\ACK\EOT!\EOT\NUL\STX\ETX\DC2\EOT\240\ENQ\b\SYN\SUB\SYN Search by last name.\n\ + \\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\ETX\SOH\DC2\EOT\240\ENQ\b\DC1\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\ETX\STX\DC2\EOT\240\ENQ\DC4\NAK\n\ + \)\n\ + \\ACK\EOT!\EOT\NUL\STX\EOT\DC2\EOT\243\ENQ\b \SUB\EM Search by brokerage id.\n\ + \\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\EOT\SOH\DC2\EOT\243\ENQ\b\ESC\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\EOT\STX\DC2\EOT\243\ENQ\RS\US\n\ + \.\n\ + \\ACK\EOT!\EOT\NUL\STX\ENQ\DC2\EOT\246\ENQ\b\DC3\SUB\RS Profile sales series number.\n\ + \\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\ENQ\SOH\DC2\EOT\246\ENQ\b\SO\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\ENQ\STX\DC2\EOT\246\ENQ\DC1\DC2\n\ + \\SO\n\ + \\ACK\EOT!\EOT\NUL\STX\ACK\DC2\EOT\248\ENQ\b\ETB\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\ACK\SOH\DC2\EOT\248\ENQ\b\DC2\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\ACK\STX\DC2\EOT\248\ENQ\NAK\SYN\n\ + \\187\SOH\n\ + \\ACK\EOT!\EOT\NUL\STX\a\DC2\EOT\252\ENQ\b\EM\SUB\170\SOH This field is associated with common_1.ProfileType enum type.\n\ + \ LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY or IN rule and in all match mode.\n\ + \\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\a\SOH\DC2\EOT\252\ENQ\b\DC4\n\ + \\SI\n\ + \\a\EOT!\EOT\NUL\STX\a\STX\DC2\EOT\252\ENQ\ETB\CAN\n\ + \<\n\ + \\EOT\EOT!\STX\NUL\DC2\EOT\128\ACK\EOT8\SUB. [obsolete] Use search_options field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\EOT\DC2\EOT\128\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\ENQ\DC2\EOT\128\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\SOH\DC2\EOT\128\ACK\DC4!\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\ETX\DC2\EOT\128\ACK$%\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\b\DC2\EOT\128\ACK&7\n\ + \\SO\n\ + \\ACK\EOT!\STX\NUL\b\ETX\DC2\EOT\128\ACK'6\n\ + \<\n\ + \\EOT\EOT!\STX\SOH\DC2\EOT\131\ACK\EOTC\SUB. [obsolete] Use search_options field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\EOT\DC2\EOT\131\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\ENQ\DC2\EOT\131\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\SOH\DC2\EOT\131\ACK\DC4,\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\ETX\DC2\EOT\131\ACK/0\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\b\DC2\EOT\131\ACK1B\n\ + \\SO\n\ + \\ACK\EOT!\STX\SOH\b\ETX\DC2\EOT\131\ACK2A\n\ + \h\n\ + \\EOT\EOT!\STX\STX\DC2\EOT\134\ACK\EOT6\SUBZ List of search options. Each option has its own search text, criteria and matching rule.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT!\STX\STX\EOT\DC2\EOT\134\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT!\STX\STX\ACK\DC2\EOT\134\ACK\r\"\n\ + \\r\n\ + \\ENQ\EOT!\STX\STX\SOH\DC2\EOT\134\ACK#1\n\ + \\r\n\ + \\ENQ\EOT!\STX\STX\ETX\DC2\EOT\134\ACK45\n\ + \h\n\ + \\EOT\EOT!\STX\ETX\DC2\EOT\138\ACK\EOT7\SUBZ Indicates, whether all criteria must match at once.\n\ + \ By default any criteria must match.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\EOT\DC2\EOT\138\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\ENQ\DC2\EOT\138\ACK\r\DC1\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\SOH\DC2\EOT\138\ACK\DC2 \n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\ETX\DC2\EOT\138\ACK#$\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\b\DC2\EOT\138\ACK%6\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\a\DC2\EOT\138\ACK05\n\ + \\f\n\ + \\STX\EOT\"\DC2\ACK\141\ACK\NUL\181\ACK\SOH\n\ + \\v\n\ + \\ETX\EOT\"\SOH\DC2\EOT\141\ACK\b!\n\ + \/\n\ + \\EOT\EOT\"\STX\NUL\DC2\EOT\144\ACK\EOT$\SUB! Associated Customer identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\NUL\EOT\DC2\EOT\144\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\NUL\ENQ\DC2\EOT\144\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\"\STX\NUL\SOH\DC2\EOT\144\ACK\DC4\US\n\ + \\r\n\ + \\ENQ\EOT\"\STX\NUL\ETX\DC2\EOT\144\ACK\"#\n\ + \\GS\n\ + \\EOT\EOT\"\STX\SOH\DC2\EOT\147\ACK\EOT\GS\SUB\SI Profile name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\EOT\DC2\EOT\147\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\ENQ\DC2\EOT\147\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\SOH\DC2\EOT\147\ACK\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\ETX\DC2\EOT\147\ACK\ESC\FS\n\ + \)\n\ + \\EOT\EOT\"\STX\STX\DC2\EOT\150\ACK\EOT.\SUB\ESC Profile's brokerage name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\STX\EOT\DC2\EOT\150\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\STX\ENQ\DC2\EOT\150\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\"\STX\STX\SOH\DC2\EOT\150\ACK\DC4)\n\ + \\r\n\ + \\ENQ\EOT\"\STX\STX\ETX\DC2\EOT\150\ACK,-\n\ + \#\n\ + \\EOT\EOT\"\STX\ETX\DC2\EOT\153\ACK\EOT#\SUB\NAK Contact first name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ETX\EOT\DC2\EOT\153\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ETX\ENQ\DC2\EOT\153\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ETX\SOH\DC2\EOT\153\ACK\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ETX\ETX\DC2\EOT\153\ACK!\"\n\ + \\"\n\ + \\EOT\EOT\"\STX\EOT\DC2\EOT\156\ACK\EOT\"\SUB\DC4 Contact last name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\EOT\EOT\DC2\EOT\156\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\EOT\ENQ\DC2\EOT\156\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\"\STX\EOT\SOH\DC2\EOT\156\ACK\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\"\STX\EOT\ETX\DC2\EOT\156\ACK !\n\ + \.\n\ + \\EOT\EOT\"\STX\ENQ\DC2\EOT\159\ACK\EOT,\SUB Profile's linked brokerage id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ENQ\EOT\DC2\EOT\159\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ENQ\ENQ\DC2\EOT\159\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ENQ\SOH\DC2\EOT\159\ACK\DC4'\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ENQ\ETX\DC2\EOT\159\ACK*+\n\ + \\GS\n\ + \\EOT\EOT\"\STX\ACK\DC2\EOT\162\ACK\EOT\RS\SUB\SI Removed flag.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ACK\EOT\DC2\EOT\162\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ACK\ENQ\DC2\EOT\162\ACK\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ACK\SOH\DC2\EOT\162\ACK\DC2\EM\n\ + \\r\n\ + \\ENQ\EOT\"\STX\ACK\ETX\DC2\EOT\162\ACK\FS\GS\n\ + \\208\SOH\n\ + \\EOT\EOT\"\STX\a\DC2\EOT\167\ACK\EOTK\SUB\193\SOH [obsolete] Authentication system of login must be used instead.\n\ + \ Profile's authentication system.\n\ + \ LookupPropertyListRequest { property_type = CommonLookupPropertyType.AUTHENTICATION_SYSTEM }\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\a\EOT\DC2\EOT\167\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\a\ENQ\DC2\EOT\167\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\"\STX\a\SOH\DC2\EOT\167\ACK\DC42\n\ + \\r\n\ + \\ENQ\EOT\"\STX\a\ETX\DC2\EOT\167\ACK56\n\ + \\r\n\ + \\ENQ\EOT\"\STX\a\b\DC2\EOT\167\ACK7J\n\ + \\SO\n\ + \\ACK\EOT\"\STX\a\b\ETX\DC2\EOT\167\ACK8I\n\ + \c\n\ + \\EOT\EOT\"\STX\b\DC2\EOT\171\ACK\EOT%\SUBU Profile's main type.\n\ + \ This field is associated with Customer.ProfileType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\b\EOT\DC2\EOT\171\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\b\ENQ\DC2\EOT\171\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\"\STX\b\SOH\DC2\EOT\171\ACK\DC4 \n\ + \\r\n\ + \\ENQ\EOT\"\STX\b\ETX\DC2\EOT\171\ACK#$\n\ + \,\n\ + \\EOT\EOT\"\STX\t\DC2\EOT\174\ACK\EOT \SUB\RS Sales series profile number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\t\EOT\DC2\EOT\174\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\t\ENQ\DC2\EOT\174\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\"\STX\t\SOH\DC2\EOT\174\ACK\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOT\"\STX\t\ETX\DC2\EOT\174\ACK\GS\US\n\ + \3\n\ + \\EOT\EOT\"\STX\n\ + \\DC2\EOT\177\ACK\EOT)\SUB% Associated Sales Series identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\n\ + \\EOT\DC2\EOT\177\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\n\ + \\ENQ\DC2\EOT\177\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\"\STX\n\ + \\SOH\DC2\EOT\177\ACK\DC4#\n\ + \\r\n\ + \\ENQ\EOT\"\STX\n\ + \\ETX\DC2\EOT\177\ACK&(\n\ + \#\n\ + \\EOT\EOT\"\STX\v\DC2\EOT\180\ACK\EOT$\SUB\NAK Profile identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\v\EOT\DC2\EOT\180\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\v\ENQ\DC2\EOT\180\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\"\STX\v\SOH\DC2\EOT\180\ACK\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\"\STX\v\ETX\DC2\EOT\180\ACK!#\n\ + \/\n\ + \\STX\EOT#\DC2\ACK\184\ACK\NUL\195\ACK\SOH\SUB! Result of CancelDeferredRequest\n\ + \\n\ + \\v\n\ + \\ETX\EOT#\SOH\DC2\EOT\184\ACK\b#\n\ + \-\n\ + \\EOT\EOT#\STX\NUL\DC2\EOT\187\ACK\EOT#\SUB\US ID of a corresponding request\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\NUL\EOT\DC2\EOT\187\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT#\STX\NUL\ENQ\DC2\EOT\187\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT#\STX\NUL\SOH\DC2\EOT\187\ACK\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT#\STX\NUL\ETX\DC2\EOT\187\ACK!\"\n\ + \^\n\ + \\EOT\EOT#\STX\SOH\DC2\EOT\191\ACK\EOT)\SUBP Operation status.\n\ + \ this field is associated with common_1.OperationStatus enum\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\SOH\EOT\DC2\EOT\191\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT#\STX\SOH\ENQ\DC2\EOT\191\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT#\STX\SOH\SOH\DC2\EOT\191\ACK\DC4$\n\ + \\r\n\ + \\ENQ\EOT#\STX\SOH\ETX\DC2\EOT\191\ACK'(\n\ + \\US\n\ + \\EOT\EOT#\STX\STX\DC2\EOT\194\ACK\EOT-\SUB\DC1 Failure details\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\STX\EOT\DC2\EOT\194\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT#\STX\STX\ACK\DC2\EOT\194\ACK\r\SUB\n\ + \\r\n\ + \\ENQ\EOT#\STX\STX\SOH\DC2\EOT\194\ACK\ESC(\n\ + \\r\n\ + \\ENQ\EOT#\STX\STX\ETX\DC2\EOT\194\ACK+,\n\ + \`\n\ + \\STX\EOT$\DC2\ACK\199\ACK\NUL\208\ACK\SOH\SUBR Terminates all open sessions of login.\n\ + \ When there are no sessions does nothing.\n\ + \\n\ + \\v\n\ + \\ETX\EOT$\SOH\DC2\EOT\199\ACK\b\GS\n\ + \[\n\ + \\EOT\EOT$\STX\NUL\DC2\EOT\203\ACK\EOT!\SUBM [required] Login identifier.\n\ + \ Supported login domains: trade-routing, admin\n\ + \\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\EOT\DC2\EOT\203\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\ENQ\DC2\EOT\203\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\SOH\DC2\EOT\203\ACK\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\ETX\DC2\EOT\203\ACK\US \n\ + \\135\SOH\n\ + \\EOT\EOT$\STX\SOH\DC2\EOT\207\ACK\EOT$\SUBy Specific login session identifiers to terminate.\n\ + \ If not provided, all active sessions of the login will be terminated.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT$\STX\SOH\EOT\DC2\EOT\207\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT$\STX\SOH\ENQ\DC2\EOT\207\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT$\STX\SOH\SOH\DC2\EOT\207\ACK\DC4\US\n\ + \\r\n\ + \\ENQ\EOT$\STX\SOH\ETX\DC2\EOT\207\ACK\"#\n\ + \\f\n\ + \\STX\EOT%\DC2\ACK\210\ACK\NUL\212\ACK\SOH\n\ + \\v\n\ + \\ETX\EOT%\SOH\DC2\EOT\210\ACK\b#" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Cmsapi1_Fields.hs b/cqg-cms-api-proto/src/Proto/CMS/Cmsapi1_Fields.hs new file mode 100644 index 0000000..839ce60 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Cmsapi1_Fields.hs @@ -0,0 +1,1937 @@ +{- This file was auto-generated from CMS/cmsapi_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Cmsapi1_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.Common1 +import qualified Proto.CMS.Location1 +import qualified Proto.CMS.LogEvent1 +import qualified Proto.CMS.Login1 +import qualified Proto.CMS.Metadata1 +import qualified Proto.CMS.SessionContext1 +import qualified Proto.CMS.Traderouting1 +import qualified Proto.Common.Shared1 +activateLogin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "activateLogin" a) => + Lens.Family2.LensLike' f s a +activateLogin = Data.ProtoLens.Field.field @"activateLogin" +activateLoginResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "activateLoginResult" a) => + Lens.Family2.LensLike' f s a +activateLoginResult + = Data.ProtoLens.Field.field @"activateLoginResult" +allMatchMode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allMatchMode" a) => + Lens.Family2.LensLike' f s a +allMatchMode = Data.ProtoLens.Field.field @"allMatchMode" +authPartner :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "authPartner" a) => + Lens.Family2.LensLike' f s a +authPartner = Data.ProtoLens.Field.field @"authPartner" +authPartnerListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "authPartnerListRequest" a) => + Lens.Family2.LensLike' f s a +authPartnerListRequest + = Data.ProtoLens.Field.field @"authPartnerListRequest" +authPartnerListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "authPartnerListResult" a) => + Lens.Family2.LensLike' f s a +authPartnerListResult + = Data.ProtoLens.Field.field @"authPartnerListResult" +brokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageId" a) => + Lens.Family2.LensLike' f s a +brokerageId = Data.ProtoLens.Field.field @"brokerageId" +cancelDeferredRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cancelDeferredRequest" a) => + Lens.Family2.LensLike' f s a +cancelDeferredRequest + = Data.ProtoLens.Field.field @"cancelDeferredRequest" +cancelDeferredRequestResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cancelDeferredRequestResult" a) => + Lens.Family2.LensLike' f s a +cancelDeferredRequestResult + = Data.ProtoLens.Field.field @"cancelDeferredRequestResult" +cloneUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cloneUser" a) => + Lens.Family2.LensLike' f s a +cloneUser = Data.ProtoLens.Field.field @"cloneUser" +cloneUserResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cloneUserResult" a) => + Lens.Family2.LensLike' f s a +cloneUserResult = Data.ProtoLens.Field.field @"cloneUserResult" +createProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createProfile" a) => + Lens.Family2.LensLike' f s a +createProfile = Data.ProtoLens.Field.field @"createProfile" +createProfileResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createProfileResult" a) => + Lens.Family2.LensLike' f s a +createProfileResult + = Data.ProtoLens.Field.field @"createProfileResult" +createUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createUser" a) => + Lens.Family2.LensLike' f s a +createUser = Data.ProtoLens.Field.field @"createUser" +createUserResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createUserResult" a) => + Lens.Family2.LensLike' f s a +createUserResult = Data.ProtoLens.Field.field @"createUserResult" +customerId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "customerId" a) => + Lens.Family2.LensLike' f s a +customerId = Data.ProtoLens.Field.field @"customerId" +customerSalesSeriesAuthorizationListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "customerSalesSeriesAuthorizationListRequest" a) => + Lens.Family2.LensLike' f s a +customerSalesSeriesAuthorizationListRequest + = Data.ProtoLens.Field.field + @"customerSalesSeriesAuthorizationListRequest" +customerSalesSeriesAuthorizationListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "customerSalesSeriesAuthorizationListResult" a) => + Lens.Family2.LensLike' f s a +customerSalesSeriesAuthorizationListResult + = Data.ProtoLens.Field.field + @"customerSalesSeriesAuthorizationListResult" +deactivateLogin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "deactivateLogin" a) => + Lens.Family2.LensLike' f s a +deactivateLogin = Data.ProtoLens.Field.field @"deactivateLogin" +deactivateLoginResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "deactivateLoginResult" a) => + Lens.Family2.LensLike' f s a +deactivateLoginResult + = Data.ProtoLens.Field.field @"deactivateLoginResult" +displayName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "displayName" a) => + Lens.Family2.LensLike' f s a +displayName = Data.ProtoLens.Field.field @"displayName" +entitlementCategory :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlementCategory" a) => + Lens.Family2.LensLike' f s a +entitlementCategory + = Data.ProtoLens.Field.field @"entitlementCategory" +entitlementCategoryListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlementCategoryListRequest" a) => + Lens.Family2.LensLike' f s a +entitlementCategoryListRequest + = Data.ProtoLens.Field.field @"entitlementCategoryListRequest" +entitlementService :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlementService" a) => + Lens.Family2.LensLike' f s a +entitlementService + = Data.ProtoLens.Field.field @"entitlementService" +entitlementServiceListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlementServiceListRequest" a) => + Lens.Family2.LensLike' f s a +entitlementServiceListRequest + = Data.ProtoLens.Field.field @"entitlementServiceListRequest" +entitlementServiceRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlementServiceRequest" a) => + Lens.Family2.LensLike' f s a +entitlementServiceRequest + = Data.ProtoLens.Field.field @"entitlementServiceRequest" +eraseCurrentCredentials :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "eraseCurrentCredentials" a) => + Lens.Family2.LensLike' f s a +eraseCurrentCredentials + = Data.ProtoLens.Field.field @"eraseCurrentCredentials" +eraseCurrentCredentialsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "eraseCurrentCredentialsResult" a) => + Lens.Family2.LensLike' f s a +eraseCurrentCredentialsResult + = Data.ProtoLens.Field.field @"eraseCurrentCredentialsResult" +errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "errorMessage" a) => + Lens.Family2.LensLike' f s a +errorMessage = Data.ProtoLens.Field.field @"errorMessage" +eventLogRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "eventLogRecord" a) => + Lens.Family2.LensLike' f s a +eventLogRecord = Data.ProtoLens.Field.field @"eventLogRecord" +eventLogSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "eventLogSearchRequest" a) => + Lens.Family2.LensLike' f s a +eventLogSearchRequest + = Data.ProtoLens.Field.field @"eventLogSearchRequest" +firstName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "firstName" a) => + Lens.Family2.LensLike' f s a +firstName = Data.ProtoLens.Field.field @"firstName" +generateServiceSecurityToken :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "generateServiceSecurityToken" a) => + Lens.Family2.LensLike' f s a +generateServiceSecurityToken + = Data.ProtoLens.Field.field @"generateServiceSecurityToken" +generateServiceSecurityTokenResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "generateServiceSecurityTokenResult" a) => + Lens.Family2.LensLike' f s a +generateServiceSecurityTokenResult + = Data.ProtoLens.Field.field @"generateServiceSecurityTokenResult" +getUniqueUsernameRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "getUniqueUsernameRequest" a) => + Lens.Family2.LensLike' f s a +getUniqueUsernameRequest + = Data.ProtoLens.Field.field @"getUniqueUsernameRequest" +id :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "id" a) => + Lens.Family2.LensLike' f s a +id = Data.ProtoLens.Field.field @"id" +includeRemoved :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "includeRemoved" a) => + Lens.Family2.LensLike' f s a +includeRemoved = Data.ProtoLens.Field.field @"includeRemoved" +informationRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "informationRequest" a) => + Lens.Family2.LensLike' f s a +informationRequest + = Data.ProtoLens.Field.field @"informationRequest" +informationResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "informationResult" a) => + Lens.Family2.LensLike' f s a +informationResult = Data.ProtoLens.Field.field @"informationResult" +isComplete :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isComplete" a) => + Lens.Family2.LensLike' f s a +isComplete = Data.ProtoLens.Field.field @"isComplete" +lastName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "lastName" a) => + Lens.Family2.LensLike' f s a +lastName = Data.ProtoLens.Field.field @"lastName" +linkLoginToProfileResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "linkLoginToProfileResult" a) => + Lens.Family2.LensLike' f s a +linkLoginToProfileResult + = Data.ProtoLens.Field.field @"linkLoginToProfileResult" +linkUserToProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "linkUserToProfile" a) => + Lens.Family2.LensLike' f s a +linkUserToProfile = Data.ProtoLens.Field.field @"linkUserToProfile" +linkedBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "linkedBrokerageId" a) => + Lens.Family2.LensLike' f s a +linkedBrokerageId = Data.ProtoLens.Field.field @"linkedBrokerageId" +linkedBrokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "linkedBrokerageName" a) => + Lens.Family2.LensLike' f s a +linkedBrokerageName + = Data.ProtoLens.Field.field @"linkedBrokerageName" +locationScopeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "locationScopeRequest" a) => + Lens.Family2.LensLike' f s a +locationScopeRequest + = Data.ProtoLens.Field.field @"locationScopeRequest" +locationScopeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "locationScopeResult" a) => + Lens.Family2.LensLike' f s a +locationScopeResult + = Data.ProtoLens.Field.field @"locationScopeResult" +loggedOff :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loggedOff" a) => + Lens.Family2.LensLike' f s a +loggedOff = Data.ProtoLens.Field.field @"loggedOff" +loginBillingCustomDataRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginBillingCustomDataRequest" a) => + Lens.Family2.LensLike' f s a +loginBillingCustomDataRequest + = Data.ProtoLens.Field.field @"loginBillingCustomDataRequest" +loginBillingCustomDataResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginBillingCustomDataResult" a) => + Lens.Family2.LensLike' f s a +loginBillingCustomDataResult + = Data.ProtoLens.Field.field @"loginBillingCustomDataResult" +loginEntitlementService :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginEntitlementService" a) => + Lens.Family2.LensLike' f s a +loginEntitlementService + = Data.ProtoLens.Field.field @"loginEntitlementService" +loginEntitlementServiceRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginEntitlementServiceRequest" a) => + Lens.Family2.LensLike' f s a +loginEntitlementServiceRequest + = Data.ProtoLens.Field.field @"loginEntitlementServiceRequest" +loginExchangeMemberIdListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginExchangeMemberIdListRequest" a) => + Lens.Family2.LensLike' f s a +loginExchangeMemberIdListRequest + = Data.ProtoLens.Field.field @"loginExchangeMemberIdListRequest" +loginExchangeMemberIdListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginExchangeMemberIdListResult" a) => + Lens.Family2.LensLike' f s a +loginExchangeMemberIdListResult + = Data.ProtoLens.Field.field @"loginExchangeMemberIdListResult" +loginId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "loginId" a) => + Lens.Family2.LensLike' f s a +loginId = Data.ProtoLens.Field.field @"loginId" +loginSettingsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginSettingsRequest" a) => + Lens.Family2.LensLike' f s a +loginSettingsRequest + = Data.ProtoLens.Field.field @"loginSettingsRequest" +loginSettingsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginSettingsResult" a) => + Lens.Family2.LensLike' f s a +loginSettingsResult + = Data.ProtoLens.Field.field @"loginSettingsResult" +logoff :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "logoff" a) => + Lens.Family2.LensLike' f s a +logoff = Data.ProtoLens.Field.field @"logoff" +logon :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "logon" a) => + Lens.Family2.LensLike' f s a +logon = Data.ProtoLens.Field.field @"logon" +logonResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "logonResult" a) => + Lens.Family2.LensLike' f s a +logonResult = Data.ProtoLens.Field.field @"logonResult" +logoutEndpointParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "logoutEndpointParameters" a) => + Lens.Family2.LensLike' f s a +logoutEndpointParameters + = Data.ProtoLens.Field.field @"logoutEndpointParameters" +logoutEndpointUri :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "logoutEndpointUri" a) => + Lens.Family2.LensLike' f s a +logoutEndpointUri = Data.ProtoLens.Field.field @"logoutEndpointUri" +lookupPropertyListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "lookupPropertyListRequest" a) => + Lens.Family2.LensLike' f s a +lookupPropertyListRequest + = Data.ProtoLens.Field.field @"lookupPropertyListRequest" +lookupPropertyListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "lookupPropertyListResult" a) => + Lens.Family2.LensLike' f s a +lookupPropertyListResult + = Data.ProtoLens.Field.field @"lookupPropertyListResult" +maybe'activateLogin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'activateLogin" a) => + Lens.Family2.LensLike' f s a +maybe'activateLogin + = Data.ProtoLens.Field.field @"maybe'activateLogin" +maybe'activateLoginResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'activateLoginResult" a) => + Lens.Family2.LensLike' f s a +maybe'activateLoginResult + = Data.ProtoLens.Field.field @"maybe'activateLoginResult" +maybe'allMatchMode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allMatchMode" a) => + Lens.Family2.LensLike' f s a +maybe'allMatchMode + = Data.ProtoLens.Field.field @"maybe'allMatchMode" +maybe'authPartnerListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'authPartnerListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'authPartnerListRequest + = Data.ProtoLens.Field.field @"maybe'authPartnerListRequest" +maybe'authPartnerListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'authPartnerListResult" a) => + Lens.Family2.LensLike' f s a +maybe'authPartnerListResult + = Data.ProtoLens.Field.field @"maybe'authPartnerListResult" +maybe'cancelDeferredRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cancelDeferredRequest" a) => + Lens.Family2.LensLike' f s a +maybe'cancelDeferredRequest + = Data.ProtoLens.Field.field @"maybe'cancelDeferredRequest" +maybe'cancelDeferredRequestResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cancelDeferredRequestResult" a) => + Lens.Family2.LensLike' f s a +maybe'cancelDeferredRequestResult + = Data.ProtoLens.Field.field @"maybe'cancelDeferredRequestResult" +maybe'cloneUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cloneUser" a) => + Lens.Family2.LensLike' f s a +maybe'cloneUser = Data.ProtoLens.Field.field @"maybe'cloneUser" +maybe'cloneUserResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cloneUserResult" a) => + Lens.Family2.LensLike' f s a +maybe'cloneUserResult + = Data.ProtoLens.Field.field @"maybe'cloneUserResult" +maybe'createProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createProfile" a) => + Lens.Family2.LensLike' f s a +maybe'createProfile + = Data.ProtoLens.Field.field @"maybe'createProfile" +maybe'createProfileResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createProfileResult" a) => + Lens.Family2.LensLike' f s a +maybe'createProfileResult + = Data.ProtoLens.Field.field @"maybe'createProfileResult" +maybe'createUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createUser" a) => + Lens.Family2.LensLike' f s a +maybe'createUser = Data.ProtoLens.Field.field @"maybe'createUser" +maybe'createUserResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createUserResult" a) => + Lens.Family2.LensLike' f s a +maybe'createUserResult + = Data.ProtoLens.Field.field @"maybe'createUserResult" +maybe'customerId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'customerId" a) => + Lens.Family2.LensLike' f s a +maybe'customerId = Data.ProtoLens.Field.field @"maybe'customerId" +maybe'customerSalesSeriesAuthorizationListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'customerSalesSeriesAuthorizationListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'customerSalesSeriesAuthorizationListRequest + = Data.ProtoLens.Field.field + @"maybe'customerSalesSeriesAuthorizationListRequest" +maybe'customerSalesSeriesAuthorizationListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'customerSalesSeriesAuthorizationListResult" a) => + Lens.Family2.LensLike' f s a +maybe'customerSalesSeriesAuthorizationListResult + = Data.ProtoLens.Field.field + @"maybe'customerSalesSeriesAuthorizationListResult" +maybe'deactivateLogin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'deactivateLogin" a) => + Lens.Family2.LensLike' f s a +maybe'deactivateLogin + = Data.ProtoLens.Field.field @"maybe'deactivateLogin" +maybe'deactivateLoginResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'deactivateLoginResult" a) => + Lens.Family2.LensLike' f s a +maybe'deactivateLoginResult + = Data.ProtoLens.Field.field @"maybe'deactivateLoginResult" +maybe'displayName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'displayName" a) => + Lens.Family2.LensLike' f s a +maybe'displayName = Data.ProtoLens.Field.field @"maybe'displayName" +maybe'entitlementCategoryListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'entitlementCategoryListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'entitlementCategoryListRequest + = Data.ProtoLens.Field.field + @"maybe'entitlementCategoryListRequest" +maybe'entitlementServiceListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'entitlementServiceListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'entitlementServiceListRequest + = Data.ProtoLens.Field.field @"maybe'entitlementServiceListRequest" +maybe'entitlementServiceRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'entitlementServiceRequest" a) => + Lens.Family2.LensLike' f s a +maybe'entitlementServiceRequest + = Data.ProtoLens.Field.field @"maybe'entitlementServiceRequest" +maybe'eraseCurrentCredentials :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'eraseCurrentCredentials" a) => + Lens.Family2.LensLike' f s a +maybe'eraseCurrentCredentials + = Data.ProtoLens.Field.field @"maybe'eraseCurrentCredentials" +maybe'eraseCurrentCredentialsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'eraseCurrentCredentialsResult" a) => + Lens.Family2.LensLike' f s a +maybe'eraseCurrentCredentialsResult + = Data.ProtoLens.Field.field @"maybe'eraseCurrentCredentialsResult" +maybe'errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'errorMessage" a) => + Lens.Family2.LensLike' f s a +maybe'errorMessage + = Data.ProtoLens.Field.field @"maybe'errorMessage" +maybe'eventLogSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'eventLogSearchRequest" a) => + Lens.Family2.LensLike' f s a +maybe'eventLogSearchRequest + = Data.ProtoLens.Field.field @"maybe'eventLogSearchRequest" +maybe'firstName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'firstName" a) => + Lens.Family2.LensLike' f s a +maybe'firstName = Data.ProtoLens.Field.field @"maybe'firstName" +maybe'generateServiceSecurityToken :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'generateServiceSecurityToken" a) => + Lens.Family2.LensLike' f s a +maybe'generateServiceSecurityToken + = Data.ProtoLens.Field.field @"maybe'generateServiceSecurityToken" +maybe'generateServiceSecurityTokenResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'generateServiceSecurityTokenResult" a) => + Lens.Family2.LensLike' f s a +maybe'generateServiceSecurityTokenResult + = Data.ProtoLens.Field.field + @"maybe'generateServiceSecurityTokenResult" +maybe'getUniqueUsernameRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'getUniqueUsernameRequest" a) => + Lens.Family2.LensLike' f s a +maybe'getUniqueUsernameRequest + = Data.ProtoLens.Field.field @"maybe'getUniqueUsernameRequest" +maybe'id :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'id" a) => + Lens.Family2.LensLike' f s a +maybe'id = Data.ProtoLens.Field.field @"maybe'id" +maybe'includeRemoved :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'includeRemoved" a) => + Lens.Family2.LensLike' f s a +maybe'includeRemoved + = Data.ProtoLens.Field.field @"maybe'includeRemoved" +maybe'isComplete :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isComplete" a) => + Lens.Family2.LensLike' f s a +maybe'isComplete = Data.ProtoLens.Field.field @"maybe'isComplete" +maybe'lastName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'lastName" a) => + Lens.Family2.LensLike' f s a +maybe'lastName = Data.ProtoLens.Field.field @"maybe'lastName" +maybe'linkLoginToProfileResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'linkLoginToProfileResult" a) => + Lens.Family2.LensLike' f s a +maybe'linkLoginToProfileResult + = Data.ProtoLens.Field.field @"maybe'linkLoginToProfileResult" +maybe'linkUserToProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'linkUserToProfile" a) => + Lens.Family2.LensLike' f s a +maybe'linkUserToProfile + = Data.ProtoLens.Field.field @"maybe'linkUserToProfile" +maybe'linkedBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'linkedBrokerageId" a) => + Lens.Family2.LensLike' f s a +maybe'linkedBrokerageId + = Data.ProtoLens.Field.field @"maybe'linkedBrokerageId" +maybe'linkedBrokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'linkedBrokerageName" a) => + Lens.Family2.LensLike' f s a +maybe'linkedBrokerageName + = Data.ProtoLens.Field.field @"maybe'linkedBrokerageName" +maybe'loggedOff :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loggedOff" a) => + Lens.Family2.LensLike' f s a +maybe'loggedOff = Data.ProtoLens.Field.field @"maybe'loggedOff" +maybe'loginBillingCustomDataRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginBillingCustomDataRequest" a) => + Lens.Family2.LensLike' f s a +maybe'loginBillingCustomDataRequest + = Data.ProtoLens.Field.field @"maybe'loginBillingCustomDataRequest" +maybe'loginBillingCustomDataResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginBillingCustomDataResult" a) => + Lens.Family2.LensLike' f s a +maybe'loginBillingCustomDataResult + = Data.ProtoLens.Field.field @"maybe'loginBillingCustomDataResult" +maybe'loginEntitlementServiceRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginEntitlementServiceRequest" a) => + Lens.Family2.LensLike' f s a +maybe'loginEntitlementServiceRequest + = Data.ProtoLens.Field.field + @"maybe'loginEntitlementServiceRequest" +maybe'loginExchangeMemberIdListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginExchangeMemberIdListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'loginExchangeMemberIdListRequest + = Data.ProtoLens.Field.field + @"maybe'loginExchangeMemberIdListRequest" +maybe'loginExchangeMemberIdListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginExchangeMemberIdListResult" a) => + Lens.Family2.LensLike' f s a +maybe'loginExchangeMemberIdListResult + = Data.ProtoLens.Field.field + @"maybe'loginExchangeMemberIdListResult" +maybe'loginId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginId" a) => + Lens.Family2.LensLike' f s a +maybe'loginId = Data.ProtoLens.Field.field @"maybe'loginId" +maybe'loginSettingsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginSettingsRequest" a) => + Lens.Family2.LensLike' f s a +maybe'loginSettingsRequest + = Data.ProtoLens.Field.field @"maybe'loginSettingsRequest" +maybe'loginSettingsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginSettingsResult" a) => + Lens.Family2.LensLike' f s a +maybe'loginSettingsResult + = Data.ProtoLens.Field.field @"maybe'loginSettingsResult" +maybe'logoff :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'logoff" a) => + Lens.Family2.LensLike' f s a +maybe'logoff = Data.ProtoLens.Field.field @"maybe'logoff" +maybe'logon :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'logon" a) => + Lens.Family2.LensLike' f s a +maybe'logon = Data.ProtoLens.Field.field @"maybe'logon" +maybe'logonResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'logonResult" a) => + Lens.Family2.LensLike' f s a +maybe'logonResult = Data.ProtoLens.Field.field @"maybe'logonResult" +maybe'logoutEndpointParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'logoutEndpointParameters" a) => + Lens.Family2.LensLike' f s a +maybe'logoutEndpointParameters + = Data.ProtoLens.Field.field @"maybe'logoutEndpointParameters" +maybe'logoutEndpointUri :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'logoutEndpointUri" a) => + Lens.Family2.LensLike' f s a +maybe'logoutEndpointUri + = Data.ProtoLens.Field.field @"maybe'logoutEndpointUri" +maybe'lookupPropertyListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'lookupPropertyListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'lookupPropertyListRequest + = Data.ProtoLens.Field.field @"maybe'lookupPropertyListRequest" +maybe'lookupPropertyListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'lookupPropertyListResult" a) => + Lens.Family2.LensLike' f s a +maybe'lookupPropertyListResult + = Data.ProtoLens.Field.field @"maybe'lookupPropertyListResult" +maybe'modifyLoginEntitlementService :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'modifyLoginEntitlementService" a) => + Lens.Family2.LensLike' f s a +maybe'modifyLoginEntitlementService + = Data.ProtoLens.Field.field @"maybe'modifyLoginEntitlementService" +maybe'modifyLoginEntitlementServiceResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'modifyLoginEntitlementServiceResult" a) => + Lens.Family2.LensLike' f s a +maybe'modifyLoginEntitlementServiceResult + = Data.ProtoLens.Field.field + @"maybe'modifyLoginEntitlementServiceResult" +maybe'name :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'name" a) => + Lens.Family2.LensLike' f s a +maybe'name = Data.ProtoLens.Field.field @"maybe'name" +maybe'number :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'number" a) => + Lens.Family2.LensLike' f s a +maybe'number = Data.ProtoLens.Field.field @"maybe'number" +maybe'obsoleteAuthenticationSystem :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteAuthenticationSystem" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteAuthenticationSystem + = Data.ProtoLens.Field.field @"maybe'obsoleteAuthenticationSystem" +maybe'obsoleteCustomerId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteCustomerId" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteCustomerId + = Data.ProtoLens.Field.field @"maybe'obsoleteCustomerId" +maybe'obsoleteOriginalProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteOriginalProfile" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteOriginalProfile + = Data.ProtoLens.Field.field @"maybe'obsoleteOriginalProfile" +maybe'obsoleteSalesSeriesSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteSalesSeriesSearchRequest" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteSalesSeriesSearchRequest + = Data.ProtoLens.Field.field + @"maybe'obsoleteSalesSeriesSearchRequest" +maybe'obsoleteText :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteText" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteText + = Data.ProtoLens.Field.field @"maybe'obsoleteText" +maybe'operationStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'operationStatus" a) => + Lens.Family2.LensLike' f s a +maybe'operationStatus + = Data.ProtoLens.Field.field @"maybe'operationStatus" +maybe'ping :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'ping" a) => + Lens.Family2.LensLike' f s a +maybe'ping = Data.ProtoLens.Field.field @"maybe'ping" +maybe'pong :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'pong" a) => + Lens.Family2.LensLike' f s a +maybe'pong = Data.ProtoLens.Field.field @"maybe'pong" +maybe'profile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profile" a) => + Lens.Family2.LensLike' f s a +maybe'profile = Data.ProtoLens.Field.field @"maybe'profile" +maybe'profileId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profileId" a) => + Lens.Family2.LensLike' f s a +maybe'profileId = Data.ProtoLens.Field.field @"maybe'profileId" +maybe'profileRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profileRequest" a) => + Lens.Family2.LensLike' f s a +maybe'profileRequest + = Data.ProtoLens.Field.field @"maybe'profileRequest" +maybe'profileSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profileSearchRequest" a) => + Lens.Family2.LensLike' f s a +maybe'profileSearchRequest + = Data.ProtoLens.Field.field @"maybe'profileSearchRequest" +maybe'profileType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profileType" a) => + Lens.Family2.LensLike' f s a +maybe'profileType = Data.ProtoLens.Field.field @"maybe'profileType" +maybe'removeProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'removeProfile" a) => + Lens.Family2.LensLike' f s a +maybe'removeProfile + = Data.ProtoLens.Field.field @"maybe'removeProfile" +maybe'removeProfileResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'removeProfileResult" a) => + Lens.Family2.LensLike' f s a +maybe'removeProfileResult + = Data.ProtoLens.Field.field @"maybe'removeProfileResult" +maybe'removeUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'removeUser" a) => + Lens.Family2.LensLike' f s a +maybe'removeUser = Data.ProtoLens.Field.field @"maybe'removeUser" +maybe'removeUserResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'removeUserResult" a) => + Lens.Family2.LensLike' f s a +maybe'removeUserResult + = Data.ProtoLens.Field.field @"maybe'removeUserResult" +maybe'removed :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'removed" a) => + Lens.Family2.LensLike' f s a +maybe'removed = Data.ProtoLens.Field.field @"maybe'removed" +maybe'requestId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'requestId" a) => + Lens.Family2.LensLike' f s a +maybe'requestId = Data.ProtoLens.Field.field @"maybe'requestId" +maybe'restoreOrJoinSession :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'restoreOrJoinSession" a) => + Lens.Family2.LensLike' f s a +maybe'restoreOrJoinSession + = Data.ProtoLens.Field.field @"maybe'restoreOrJoinSession" +maybe'restoreOrJoinSessionResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'restoreOrJoinSessionResult" a) => + Lens.Family2.LensLike' f s a +maybe'restoreOrJoinSessionResult + = Data.ProtoLens.Field.field @"maybe'restoreOrJoinSessionResult" +maybe'restoreProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'restoreProfile" a) => + Lens.Family2.LensLike' f s a +maybe'restoreProfile + = Data.ProtoLens.Field.field @"maybe'restoreProfile" +maybe'restoreProfileResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'restoreProfileResult" a) => + Lens.Family2.LensLike' f s a +maybe'restoreProfileResult + = Data.ProtoLens.Field.field @"maybe'restoreProfileResult" +maybe'restoreUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'restoreUser" a) => + Lens.Family2.LensLike' f s a +maybe'restoreUser = Data.ProtoLens.Field.field @"maybe'restoreUser" +maybe'restoreUserResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'restoreUserResult" a) => + Lens.Family2.LensLike' f s a +maybe'restoreUserResult + = Data.ProtoLens.Field.field @"maybe'restoreUserResult" +maybe'salesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'salesSeriesId" a) => + Lens.Family2.LensLike' f s a +maybe'salesSeriesId + = Data.ProtoLens.Field.field @"maybe'salesSeriesId" +maybe'securityToken :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'securityToken" a) => + Lens.Family2.LensLike' f s a +maybe'securityToken + = Data.ProtoLens.Field.field @"maybe'securityToken" +maybe'sendCredentialResetEmail :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'sendCredentialResetEmail" a) => + Lens.Family2.LensLike' f s a +maybe'sendCredentialResetEmail + = Data.ProtoLens.Field.field @"maybe'sendCredentialResetEmail" +maybe'sendCredentialResetEmailResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'sendCredentialResetEmailResult" a) => + Lens.Family2.LensLike' f s a +maybe'sendCredentialResetEmailResult + = Data.ProtoLens.Field.field + @"maybe'sendCredentialResetEmailResult" +maybe'sendWelcomeEmail :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'sendWelcomeEmail" a) => + Lens.Family2.LensLike' f s a +maybe'sendWelcomeEmail + = Data.ProtoLens.Field.field @"maybe'sendWelcomeEmail" +maybe'sendWelcomeEmailResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'sendWelcomeEmailResult" a) => + Lens.Family2.LensLike' f s a +maybe'sendWelcomeEmailResult + = Data.ProtoLens.Field.field @"maybe'sendWelcomeEmailResult" +maybe'terminateLoginSession :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'terminateLoginSession" a) => + Lens.Family2.LensLike' f s a +maybe'terminateLoginSession + = Data.ProtoLens.Field.field @"maybe'terminateLoginSession" +maybe'terminateLoginSessionResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'terminateLoginSessionResult" a) => + Lens.Family2.LensLike' f s a +maybe'terminateLoginSessionResult + = Data.ProtoLens.Field.field @"maybe'terminateLoginSessionResult" +maybe'token :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'token" a) => + Lens.Family2.LensLike' f s a +maybe'token = Data.ProtoLens.Field.field @"maybe'token" +maybe'top :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'top" a) => + Lens.Family2.LensLike' f s a +maybe'top = Data.ProtoLens.Field.field @"maybe'top" +maybe'trackingNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'trackingNumber" a) => + Lens.Family2.LensLike' f s a +maybe'trackingNumber + = Data.ProtoLens.Field.field @"maybe'trackingNumber" +maybe'tradingFeaturesRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradingFeaturesRequest" a) => + Lens.Family2.LensLike' f s a +maybe'tradingFeaturesRequest + = Data.ProtoLens.Field.field @"maybe'tradingFeaturesRequest" +maybe'tradingFeaturesResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradingFeaturesResult" a) => + Lens.Family2.LensLike' f s a +maybe'tradingFeaturesResult + = Data.ProtoLens.Field.field @"maybe'tradingFeaturesResult" +maybe'uniqueUsernameResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'uniqueUsernameResult" a) => + Lens.Family2.LensLike' f s a +maybe'uniqueUsernameResult + = Data.ProtoLens.Field.field @"maybe'uniqueUsernameResult" +maybe'updateCustomerSalesSeriesAuthorizationList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateCustomerSalesSeriesAuthorizationList" a) => + Lens.Family2.LensLike' f s a +maybe'updateCustomerSalesSeriesAuthorizationList + = Data.ProtoLens.Field.field + @"maybe'updateCustomerSalesSeriesAuthorizationList" +maybe'updateCustomerSalesSeriesAuthorizationListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateCustomerSalesSeriesAuthorizationListResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateCustomerSalesSeriesAuthorizationListResult + = Data.ProtoLens.Field.field + @"maybe'updateCustomerSalesSeriesAuthorizationListResult" +maybe'updateLoginBillingCustomData :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateLoginBillingCustomData" a) => + Lens.Family2.LensLike' f s a +maybe'updateLoginBillingCustomData + = Data.ProtoLens.Field.field @"maybe'updateLoginBillingCustomData" +maybe'updateLoginBillingCustomDataResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateLoginBillingCustomDataResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateLoginBillingCustomDataResult + = Data.ProtoLens.Field.field + @"maybe'updateLoginBillingCustomDataResult" +maybe'updateLoginExchangeMemberIdList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateLoginExchangeMemberIdList" a) => + Lens.Family2.LensLike' f s a +maybe'updateLoginExchangeMemberIdList + = Data.ProtoLens.Field.field + @"maybe'updateLoginExchangeMemberIdList" +maybe'updateLoginExchangeMemberIdListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateLoginExchangeMemberIdListResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateLoginExchangeMemberIdListResult + = Data.ProtoLens.Field.field + @"maybe'updateLoginExchangeMemberIdListResult" +maybe'updateLoginSettings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateLoginSettings" a) => + Lens.Family2.LensLike' f s a +maybe'updateLoginSettings + = Data.ProtoLens.Field.field @"maybe'updateLoginSettings" +maybe'updateLoginSettingsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateLoginSettingsResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateLoginSettingsResult + = Data.ProtoLens.Field.field @"maybe'updateLoginSettingsResult" +maybe'updateProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateProfile" a) => + Lens.Family2.LensLike' f s a +maybe'updateProfile + = Data.ProtoLens.Field.field @"maybe'updateProfile" +maybe'updateProfileResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateProfileResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateProfileResult + = Data.ProtoLens.Field.field @"maybe'updateProfileResult" +maybe'updateUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateUser" a) => + Lens.Family2.LensLike' f s a +maybe'updateUser = Data.ProtoLens.Field.field @"maybe'updateUser" +maybe'updateUserResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateUserResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateUserResult + = Data.ProtoLens.Field.field @"maybe'updateUserResult" +maybe'url :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'url" a) => + Lens.Family2.LensLike' f s a +maybe'url = Data.ProtoLens.Field.field @"maybe'url" +maybe'user :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'user" a) => + Lens.Family2.LensLike' f s a +maybe'user = Data.ProtoLens.Field.field @"maybe'user" +maybe'userInfoRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'userInfoRequest" a) => + Lens.Family2.LensLike' f s a +maybe'userInfoRequest + = Data.ProtoLens.Field.field @"maybe'userInfoRequest" +maybe'userSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'userSearchRequest" a) => + Lens.Family2.LensLike' f s a +maybe'userSearchRequest + = Data.ProtoLens.Field.field @"maybe'userSearchRequest" +maybe'username :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'username" a) => + Lens.Family2.LensLike' f s a +maybe'username = Data.ProtoLens.Field.field @"maybe'username" +metadataRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "metadataRequest" a) => + Lens.Family2.LensLike' f s a +metadataRequest = Data.ProtoLens.Field.field @"metadataRequest" +metadataResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "metadataResult" a) => + Lens.Family2.LensLike' f s a +metadataResult = Data.ProtoLens.Field.field @"metadataResult" +modifyLoginEntitlementService :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "modifyLoginEntitlementService" a) => + Lens.Family2.LensLike' f s a +modifyLoginEntitlementService + = Data.ProtoLens.Field.field @"modifyLoginEntitlementService" +modifyLoginEntitlementServiceResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "modifyLoginEntitlementServiceResult" a) => + Lens.Family2.LensLike' f s a +modifyLoginEntitlementServiceResult + = Data.ProtoLens.Field.field @"modifyLoginEntitlementServiceResult" +name :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "name" a) => + Lens.Family2.LensLike' f s a +name = Data.ProtoLens.Field.field @"name" +number :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "number" a) => + Lens.Family2.LensLike' f s a +number = Data.ProtoLens.Field.field @"number" +obsoleteAuthenticationSystem :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteAuthenticationSystem" a) => + Lens.Family2.LensLike' f s a +obsoleteAuthenticationSystem + = Data.ProtoLens.Field.field @"obsoleteAuthenticationSystem" +obsoleteCustomerId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteCustomerId" a) => + Lens.Family2.LensLike' f s a +obsoleteCustomerId + = Data.ProtoLens.Field.field @"obsoleteCustomerId" +obsoleteOriginalProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteOriginalProfile" a) => + Lens.Family2.LensLike' f s a +obsoleteOriginalProfile + = Data.ProtoLens.Field.field @"obsoleteOriginalProfile" +obsoleteSalesSeriesRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteSalesSeriesRecord" a) => + Lens.Family2.LensLike' f s a +obsoleteSalesSeriesRecord + = Data.ProtoLens.Field.field @"obsoleteSalesSeriesRecord" +obsoleteSalesSeriesSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteSalesSeriesSearchRequest" a) => + Lens.Family2.LensLike' f s a +obsoleteSalesSeriesSearchRequest + = Data.ProtoLens.Field.field @"obsoleteSalesSeriesSearchRequest" +obsoleteSearchCriteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteSearchCriteria" a) => + Lens.Family2.LensLike' f s a +obsoleteSearchCriteria + = Data.ProtoLens.Field.field @"obsoleteSearchCriteria" +obsoleteText :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteText" a) => + Lens.Family2.LensLike' f s a +obsoleteText = Data.ProtoLens.Field.field @"obsoleteText" +operation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operation" a) => + Lens.Family2.LensLike' f s a +operation = Data.ProtoLens.Field.field @"operation" +operationRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operationRequest" a) => + Lens.Family2.LensLike' f s a +operationRequest = Data.ProtoLens.Field.field @"operationRequest" +operationResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operationResult" a) => + Lens.Family2.LensLike' f s a +operationResult = Data.ProtoLens.Field.field @"operationResult" +operationStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operationStatus" a) => + Lens.Family2.LensLike' f s a +operationStatus = Data.ProtoLens.Field.field @"operationStatus" +ping :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "ping" a) => + Lens.Family2.LensLike' f s a +ping = Data.ProtoLens.Field.field @"ping" +pingUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "pingUtcTime" a) => + Lens.Family2.LensLike' f s a +pingUtcTime = Data.ProtoLens.Field.field @"pingUtcTime" +pong :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "pong" a) => + Lens.Family2.LensLike' f s a +pong = Data.ProtoLens.Field.field @"pong" +pongUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "pongUtcTime" a) => + Lens.Family2.LensLike' f s a +pongUtcTime = Data.ProtoLens.Field.field @"pongUtcTime" +profile :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "profile" a) => + Lens.Family2.LensLike' f s a +profile = Data.ProtoLens.Field.field @"profile" +profileId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileId" a) => + Lens.Family2.LensLike' f s a +profileId = Data.ProtoLens.Field.field @"profileId" +profileRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileRecord" a) => + Lens.Family2.LensLike' f s a +profileRecord = Data.ProtoLens.Field.field @"profileRecord" +profileRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileRequest" a) => + Lens.Family2.LensLike' f s a +profileRequest = Data.ProtoLens.Field.field @"profileRequest" +profileSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileSearchRequest" a) => + Lens.Family2.LensLike' f s a +profileSearchRequest + = Data.ProtoLens.Field.field @"profileSearchRequest" +profileType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileType" a) => + Lens.Family2.LensLike' f s a +profileType = Data.ProtoLens.Field.field @"profileType" +removeProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "removeProfile" a) => + Lens.Family2.LensLike' f s a +removeProfile = Data.ProtoLens.Field.field @"removeProfile" +removeProfileResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "removeProfileResult" a) => + Lens.Family2.LensLike' f s a +removeProfileResult + = Data.ProtoLens.Field.field @"removeProfileResult" +removeUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "removeUser" a) => + Lens.Family2.LensLike' f s a +removeUser = Data.ProtoLens.Field.field @"removeUser" +removeUserResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "removeUserResult" a) => + Lens.Family2.LensLike' f s a +removeUserResult = Data.ProtoLens.Field.field @"removeUserResult" +removed :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "removed" a) => + Lens.Family2.LensLike' f s a +removed = Data.ProtoLens.Field.field @"removed" +requestId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "requestId" a) => + Lens.Family2.LensLike' f s a +requestId = Data.ProtoLens.Field.field @"requestId" +restoreOrJoinSession :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "restoreOrJoinSession" a) => + Lens.Family2.LensLike' f s a +restoreOrJoinSession + = Data.ProtoLens.Field.field @"restoreOrJoinSession" +restoreOrJoinSessionResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "restoreOrJoinSessionResult" a) => + Lens.Family2.LensLike' f s a +restoreOrJoinSessionResult + = Data.ProtoLens.Field.field @"restoreOrJoinSessionResult" +restoreProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "restoreProfile" a) => + Lens.Family2.LensLike' f s a +restoreProfile = Data.ProtoLens.Field.field @"restoreProfile" +restoreProfileResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "restoreProfileResult" a) => + Lens.Family2.LensLike' f s a +restoreProfileResult + = Data.ProtoLens.Field.field @"restoreProfileResult" +restoreUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "restoreUser" a) => + Lens.Family2.LensLike' f s a +restoreUser = Data.ProtoLens.Field.field @"restoreUser" +restoreUserResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "restoreUserResult" a) => + Lens.Family2.LensLike' f s a +restoreUserResult = Data.ProtoLens.Field.field @"restoreUserResult" +salesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "salesSeriesId" a) => + Lens.Family2.LensLike' f s a +salesSeriesId = Data.ProtoLens.Field.field @"salesSeriesId" +searchOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "searchOptions" a) => + Lens.Family2.LensLike' f s a +searchOptions = Data.ProtoLens.Field.field @"searchOptions" +searchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "searchRequest" a) => + Lens.Family2.LensLike' f s a +searchRequest = Data.ProtoLens.Field.field @"searchRequest" +searchResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "searchResult" a) => + Lens.Family2.LensLike' f s a +searchResult = Data.ProtoLens.Field.field @"searchResult" +securityToken :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "securityToken" a) => + Lens.Family2.LensLike' f s a +securityToken = Data.ProtoLens.Field.field @"securityToken" +sendCredentialResetEmail :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "sendCredentialResetEmail" a) => + Lens.Family2.LensLike' f s a +sendCredentialResetEmail + = Data.ProtoLens.Field.field @"sendCredentialResetEmail" +sendCredentialResetEmailResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "sendCredentialResetEmailResult" a) => + Lens.Family2.LensLike' f s a +sendCredentialResetEmailResult + = Data.ProtoLens.Field.field @"sendCredentialResetEmailResult" +sendWelcomeEmail :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "sendWelcomeEmail" a) => + Lens.Family2.LensLike' f s a +sendWelcomeEmail = Data.ProtoLens.Field.field @"sendWelcomeEmail" +sendWelcomeEmailResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "sendWelcomeEmailResult" a) => + Lens.Family2.LensLike' f s a +sendWelcomeEmailResult + = Data.ProtoLens.Field.field @"sendWelcomeEmailResult" +sessionContextScopeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "sessionContextScopeRequest" a) => + Lens.Family2.LensLike' f s a +sessionContextScopeRequest + = Data.ProtoLens.Field.field @"sessionContextScopeRequest" +sessionContextScopeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "sessionContextScopeResult" a) => + Lens.Family2.LensLike' f s a +sessionContextScopeResult + = Data.ProtoLens.Field.field @"sessionContextScopeResult" +sessionIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "sessionIds" a) => + Lens.Family2.LensLike' f s a +sessionIds = Data.ProtoLens.Field.field @"sessionIds" +terminateLoginSession :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "terminateLoginSession" a) => + Lens.Family2.LensLike' f s a +terminateLoginSession + = Data.ProtoLens.Field.field @"terminateLoginSession" +terminateLoginSessionResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "terminateLoginSessionResult" a) => + Lens.Family2.LensLike' f s a +terminateLoginSessionResult + = Data.ProtoLens.Field.field @"terminateLoginSessionResult" +token :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "token" a) => + Lens.Family2.LensLike' f s a +token = Data.ProtoLens.Field.field @"token" +top :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "top" a) => + Lens.Family2.LensLike' f s a +top = Data.ProtoLens.Field.field @"top" +trackingNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "trackingNumber" a) => + Lens.Family2.LensLike' f s a +trackingNumber = Data.ProtoLens.Field.field @"trackingNumber" +tradeRoutingRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradeRoutingRequest" a) => + Lens.Family2.LensLike' f s a +tradeRoutingRequest + = Data.ProtoLens.Field.field @"tradeRoutingRequest" +tradeRoutingResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradeRoutingResult" a) => + Lens.Family2.LensLike' f s a +tradeRoutingResult + = Data.ProtoLens.Field.field @"tradeRoutingResult" +tradingFeaturesRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradingFeaturesRequest" a) => + Lens.Family2.LensLike' f s a +tradingFeaturesRequest + = Data.ProtoLens.Field.field @"tradingFeaturesRequest" +tradingFeaturesResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradingFeaturesResult" a) => + Lens.Family2.LensLike' f s a +tradingFeaturesResult + = Data.ProtoLens.Field.field @"tradingFeaturesResult" +uniqueUsernameResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "uniqueUsernameResult" a) => + Lens.Family2.LensLike' f s a +uniqueUsernameResult + = Data.ProtoLens.Field.field @"uniqueUsernameResult" +updateCustomerSalesSeriesAuthorizationList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateCustomerSalesSeriesAuthorizationList" a) => + Lens.Family2.LensLike' f s a +updateCustomerSalesSeriesAuthorizationList + = Data.ProtoLens.Field.field + @"updateCustomerSalesSeriesAuthorizationList" +updateCustomerSalesSeriesAuthorizationListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateCustomerSalesSeriesAuthorizationListResult" a) => + Lens.Family2.LensLike' f s a +updateCustomerSalesSeriesAuthorizationListResult + = Data.ProtoLens.Field.field + @"updateCustomerSalesSeriesAuthorizationListResult" +updateLoginBillingCustomData :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateLoginBillingCustomData" a) => + Lens.Family2.LensLike' f s a +updateLoginBillingCustomData + = Data.ProtoLens.Field.field @"updateLoginBillingCustomData" +updateLoginBillingCustomDataResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateLoginBillingCustomDataResult" a) => + Lens.Family2.LensLike' f s a +updateLoginBillingCustomDataResult + = Data.ProtoLens.Field.field @"updateLoginBillingCustomDataResult" +updateLoginExchangeMemberIdList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateLoginExchangeMemberIdList" a) => + Lens.Family2.LensLike' f s a +updateLoginExchangeMemberIdList + = Data.ProtoLens.Field.field @"updateLoginExchangeMemberIdList" +updateLoginExchangeMemberIdListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateLoginExchangeMemberIdListResult" a) => + Lens.Family2.LensLike' f s a +updateLoginExchangeMemberIdListResult + = Data.ProtoLens.Field.field + @"updateLoginExchangeMemberIdListResult" +updateLoginSettings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateLoginSettings" a) => + Lens.Family2.LensLike' f s a +updateLoginSettings + = Data.ProtoLens.Field.field @"updateLoginSettings" +updateLoginSettingsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateLoginSettingsResult" a) => + Lens.Family2.LensLike' f s a +updateLoginSettingsResult + = Data.ProtoLens.Field.field @"updateLoginSettingsResult" +updateProfile :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateProfile" a) => + Lens.Family2.LensLike' f s a +updateProfile = Data.ProtoLens.Field.field @"updateProfile" +updateProfileResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateProfileResult" a) => + Lens.Family2.LensLike' f s a +updateProfileResult + = Data.ProtoLens.Field.field @"updateProfileResult" +updateUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateUser" a) => + Lens.Family2.LensLike' f s a +updateUser = Data.ProtoLens.Field.field @"updateUser" +updateUserResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateUserResult" a) => + Lens.Family2.LensLike' f s a +updateUserResult = Data.ProtoLens.Field.field @"updateUserResult" +url :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "url" a) => + Lens.Family2.LensLike' f s a +url = Data.ProtoLens.Field.field @"url" +user :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "user" a) => + Lens.Family2.LensLike' f s a +user = Data.ProtoLens.Field.field @"user" +userInfoRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "userInfoRequest" a) => + Lens.Family2.LensLike' f s a +userInfoRequest = Data.ProtoLens.Field.field @"userInfoRequest" +userMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "userMessage" a) => + Lens.Family2.LensLike' f s a +userMessage = Data.ProtoLens.Field.field @"userMessage" +userRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "userRecord" a) => + Lens.Family2.LensLike' f s a +userRecord = Data.ProtoLens.Field.field @"userRecord" +userSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "userSearchRequest" a) => + Lens.Family2.LensLike' f s a +userSearchRequest = Data.ProtoLens.Field.field @"userSearchRequest" +username :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "username" a) => + Lens.Family2.LensLike' f s a +username = Data.ProtoLens.Field.field @"username" +vec'authPartner :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'authPartner" a) => + Lens.Family2.LensLike' f s a +vec'authPartner = Data.ProtoLens.Field.field @"vec'authPartner" +vec'brokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'brokerageId" a) => + Lens.Family2.LensLike' f s a +vec'brokerageId = Data.ProtoLens.Field.field @"vec'brokerageId" +vec'entitlementCategory :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'entitlementCategory" a) => + Lens.Family2.LensLike' f s a +vec'entitlementCategory + = Data.ProtoLens.Field.field @"vec'entitlementCategory" +vec'entitlementService :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'entitlementService" a) => + Lens.Family2.LensLike' f s a +vec'entitlementService + = Data.ProtoLens.Field.field @"vec'entitlementService" +vec'eventLogRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'eventLogRecord" a) => + Lens.Family2.LensLike' f s a +vec'eventLogRecord + = Data.ProtoLens.Field.field @"vec'eventLogRecord" +vec'informationRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'informationRequest" a) => + Lens.Family2.LensLike' f s a +vec'informationRequest + = Data.ProtoLens.Field.field @"vec'informationRequest" +vec'informationResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'informationResult" a) => + Lens.Family2.LensLike' f s a +vec'informationResult + = Data.ProtoLens.Field.field @"vec'informationResult" +vec'locationScopeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'locationScopeRequest" a) => + Lens.Family2.LensLike' f s a +vec'locationScopeRequest + = Data.ProtoLens.Field.field @"vec'locationScopeRequest" +vec'locationScopeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'locationScopeResult" a) => + Lens.Family2.LensLike' f s a +vec'locationScopeResult + = Data.ProtoLens.Field.field @"vec'locationScopeResult" +vec'loginEntitlementService :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'loginEntitlementService" a) => + Lens.Family2.LensLike' f s a +vec'loginEntitlementService + = Data.ProtoLens.Field.field @"vec'loginEntitlementService" +vec'loginId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'loginId" a) => + Lens.Family2.LensLike' f s a +vec'loginId = Data.ProtoLens.Field.field @"vec'loginId" +vec'metadataRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'metadataRequest" a) => + Lens.Family2.LensLike' f s a +vec'metadataRequest + = Data.ProtoLens.Field.field @"vec'metadataRequest" +vec'metadataResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'metadataResult" a) => + Lens.Family2.LensLike' f s a +vec'metadataResult + = Data.ProtoLens.Field.field @"vec'metadataResult" +vec'obsoleteSalesSeriesRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'obsoleteSalesSeriesRecord" a) => + Lens.Family2.LensLike' f s a +vec'obsoleteSalesSeriesRecord + = Data.ProtoLens.Field.field @"vec'obsoleteSalesSeriesRecord" +vec'obsoleteSearchCriteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'obsoleteSearchCriteria" a) => + Lens.Family2.LensLike' f s a +vec'obsoleteSearchCriteria + = Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria" +vec'operation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'operation" a) => + Lens.Family2.LensLike' f s a +vec'operation = Data.ProtoLens.Field.field @"vec'operation" +vec'operationRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'operationRequest" a) => + Lens.Family2.LensLike' f s a +vec'operationRequest + = Data.ProtoLens.Field.field @"vec'operationRequest" +vec'operationResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'operationResult" a) => + Lens.Family2.LensLike' f s a +vec'operationResult + = Data.ProtoLens.Field.field @"vec'operationResult" +vec'profileRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'profileRecord" a) => + Lens.Family2.LensLike' f s a +vec'profileRecord = Data.ProtoLens.Field.field @"vec'profileRecord" +vec'searchOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'searchOptions" a) => + Lens.Family2.LensLike' f s a +vec'searchOptions = Data.ProtoLens.Field.field @"vec'searchOptions" +vec'searchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'searchRequest" a) => + Lens.Family2.LensLike' f s a +vec'searchRequest = Data.ProtoLens.Field.field @"vec'searchRequest" +vec'searchResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'searchResult" a) => + Lens.Family2.LensLike' f s a +vec'searchResult = Data.ProtoLens.Field.field @"vec'searchResult" +vec'sessionContextScopeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'sessionContextScopeRequest" a) => + Lens.Family2.LensLike' f s a +vec'sessionContextScopeRequest + = Data.ProtoLens.Field.field @"vec'sessionContextScopeRequest" +vec'sessionContextScopeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'sessionContextScopeResult" a) => + Lens.Family2.LensLike' f s a +vec'sessionContextScopeResult + = Data.ProtoLens.Field.field @"vec'sessionContextScopeResult" +vec'sessionIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'sessionIds" a) => + Lens.Family2.LensLike' f s a +vec'sessionIds = Data.ProtoLens.Field.field @"vec'sessionIds" +vec'tradeRoutingRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'tradeRoutingRequest" a) => + Lens.Family2.LensLike' f s a +vec'tradeRoutingRequest + = Data.ProtoLens.Field.field @"vec'tradeRoutingRequest" +vec'tradeRoutingResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'tradeRoutingResult" a) => + Lens.Family2.LensLike' f s a +vec'tradeRoutingResult + = Data.ProtoLens.Field.field @"vec'tradeRoutingResult" +vec'userMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'userMessage" a) => + Lens.Family2.LensLike' f s a +vec'userMessage = Data.ProtoLens.Field.field @"vec'userMessage" +vec'userRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'userRecord" a) => + Lens.Family2.LensLike' f s a +vec'userRecord = Data.ProtoLens.Field.field @"vec'userRecord" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Common1.hs b/cqg-cms-api-proto/src/Proto/CMS/Common1.hs new file mode 100644 index 0000000..9cc2778 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Common1.hs @@ -0,0 +1,27570 @@ +{- This file was auto-generated from CMS/common_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Common1 ( + ActivateLogin(), ActivateLoginResult(), Address(), + Address'AddressStatus(..), Address'AddressStatus(), + AdminLoginScope(..), AdminLoginScope(), AuthActivityType(..), + AuthActivityType(), AuthServerSpecialOperation(..), + AuthServerSpecialOperation(), CloneUser(), CloneUserResult(), + CommonLookupPropertyType(..), CommonLookupPropertyType(), + ContactInformation(), CreateUser(), CreateUserResult(), + CredentialType(..), CredentialType(), Credentials(), + CustomerSalesSeriesAuthorizationListRequest(), + CustomerSalesSeriesAuthorizationListResult(), + CustomerSalesSeriesLink(), DataRequest(), DeactivateLogin(), + DeactivateLoginResult(), Email(), EntitiesDataRequest(), + EntitlementCategory(), EntitlementCategoryListRequest(), + EntitlementConstraint(), EntitlementConstraint'Type(..), + EntitlementConstraint'Type(), EntitlementService(), + EntitlementService'AuthorizationType(..), + EntitlementService'AuthorizationType(), + EntitlementService'ServiceOption(..), + EntitlementService'ServiceOption(), EntitlementServiceItem(), + EntitlementServiceItemType(), EntitlementServiceListRequest(), + EntitlementServiceRequest(), EntityDataRequest(), EntityType(..), + EntityType(), EraseCurrentCredentials(), + EraseCurrentCredentialsResult(), ExternalAuth(), + InternalEntityType(..), InternalEntityType(), LegalType(..), + LegalType(), LinkedEntityListRequest(), LinkedEntityListResult(), + LoggedOff(), LoginBillingCustomData(), + LoginBillingCustomDataRequest(), LoginBillingCustomDataResult(), + LoginDomain(..), LoginDomain(), LoginExchangeMemberId(), + LoginExchangeMemberIdListRequest(), + LoginExchangeMemberIdListResult(), LoginSettings(), + LoginSettings'DisconnectAction(..), + LoginSettings'DisconnectAction(), LoginSettingsRequest(), + LoginSettingsResult(), Logoff(), Logon(), Logon'SessionSetting(..), + Logon'SessionSetting(), LogonResult(), LogonResultCode(..), + LogonResultCode(), LookupProperty(), LookupPropertyListRequest(), + LookupPropertyListResult(), NamedEntity(), OperationStatus(..), + OperationStatus(), Phone(), Price(), Profile(), ProfileType(..), + ProfileType(), RemoveUser(), RemoveUserResult(), + RestoreOrJoinSession(), RestoreOrJoinSession'OperationType(..), + RestoreOrJoinSession'OperationType(), RestoreOrJoinSessionResult(), + RestoreUser(), RestoreUserResult(), SalesSeriesInfo(), + SalesSeriesListResult(), SalesSeriesSearchRequest(), + SalesSeriesSearchRequest'SearchCriteria(..), + SalesSeriesSearchRequest'SearchCriteria(), + SalesSeriesSearchResultRecord(), SearchOption(), + SearchOption'MatchingRule(..), SearchOption'MatchingRule(), + TradingFeaturesRequest(), TradingFeaturesResult(), + TradingInterfaceElement(), Tuple(), + UpdateCustomerSalesSeriesAuthorizationList(), + UpdateCustomerSalesSeriesAuthorizationListResult(), + UpdateEntityLinks(), UpdateEntityLinksResult(), + UpdateLoginBillingCustomData(), + UpdateLoginBillingCustomDataResult(), + UpdateLoginExchangeMemberIdList(), + UpdateLoginExchangeMemberIdListResult(), UpdateLoginSettings(), + UpdateLoginSettingsResult(), UpdateUser(), UpdateUserResult(), + User(), User'LoginClass(..), User'LoginClass(), + User'SubscriberType(..), User'SubscriberType(), UserInfoRequest(), + UserMessage(), UserMessage'MessageType(..), + UserMessage'MessageType(), UserSearchRequest(), + UserSearchRequest'SearchCriteria(..), + UserSearchRequest'SearchCriteria(), UserSearchResultRecord() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.Common.Shared1 +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginId' @:: Lens' ActivateLogin Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'loginId' @:: Lens' ActivateLogin (Prelude.Maybe Data.Text.Text)@ -} +data ActivateLogin + = ActivateLogin'_constructor {_ActivateLogin'loginId :: !(Prelude.Maybe Data.Text.Text), + _ActivateLogin'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ActivateLogin where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ActivateLogin "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ActivateLogin'loginId + (\ x__ y__ -> x__ {_ActivateLogin'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ActivateLogin "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ActivateLogin'loginId + (\ x__ y__ -> x__ {_ActivateLogin'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Message ActivateLogin where + messageName _ = Data.Text.pack "common_1.ActivateLogin" + packedMessageDescriptor _ + = "\n\ + \\rActivateLogin\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor ActivateLogin + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ActivateLogin'_unknownFields + (\ x__ y__ -> x__ {_ActivateLogin'_unknownFields = y__}) + defMessage + = ActivateLogin'_constructor + {_ActivateLogin'loginId = Prelude.Nothing, + _ActivateLogin'_unknownFields = []} + parseMessage + = let + loop :: + ActivateLogin -> Data.ProtoLens.Encoding.Bytes.Parser ActivateLogin + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ActivateLogin" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData ActivateLogin where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ActivateLogin'_unknownFields x__) + (Control.DeepSeq.deepseq (_ActivateLogin'loginId x__) ()) +{- | Fields : + -} +data ActivateLoginResult + = ActivateLoginResult'_constructor {_ActivateLoginResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ActivateLoginResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message ActivateLoginResult where + messageName _ = Data.Text.pack "common_1.ActivateLoginResult" + packedMessageDescriptor _ + = "\n\ + \\DC3ActivateLoginResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _ActivateLoginResult'_unknownFields + (\ x__ y__ -> x__ {_ActivateLoginResult'_unknownFields = y__}) + defMessage + = ActivateLoginResult'_constructor + {_ActivateLoginResult'_unknownFields = []} + parseMessage + = let + loop :: + ActivateLoginResult + -> Data.ProtoLens.Encoding.Bytes.Parser ActivateLoginResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ActivateLoginResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData ActivateLoginResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ActivateLoginResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.clearedFields' @:: Lens' Address [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'clearedFields' @:: Lens' Address (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.country' @:: Lens' Address Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'country' @:: Lens' Address (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.state' @:: Lens' Address Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'state' @:: Lens' Address (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.city' @:: Lens' Address Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'city' @:: Lens' Address (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.zip' @:: Lens' Address Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'zip' @:: Lens' Address (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.address' @:: Lens' Address Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'address' @:: Lens' Address (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.address2' @:: Lens' Address Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'address2' @:: Lens' Address (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.name' @:: Lens' Address Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'name' @:: Lens' Address (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.addressStatus' @:: Lens' Address Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'addressStatus' @:: Lens' Address (Prelude.Maybe Data.Word.Word32)@ -} +data Address + = Address'_constructor {_Address'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _Address'country :: !(Prelude.Maybe Data.Text.Text), + _Address'state :: !(Prelude.Maybe Data.Text.Text), + _Address'city :: !(Prelude.Maybe Data.Text.Text), + _Address'zip :: !(Prelude.Maybe Data.Text.Text), + _Address'address :: !(Prelude.Maybe Data.Text.Text), + _Address'address2 :: !(Prelude.Maybe Data.Text.Text), + _Address'name :: !(Prelude.Maybe Data.Text.Text), + _Address'addressStatus :: !(Prelude.Maybe Data.Word.Word32), + _Address'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Address where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Address "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'clearedFields + (\ x__ y__ -> x__ {_Address'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField Address "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'clearedFields + (\ x__ y__ -> x__ {_Address'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Address "country" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'country (\ x__ y__ -> x__ {_Address'country = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Address "maybe'country" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'country (\ x__ y__ -> x__ {_Address'country = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Address "state" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'state (\ x__ y__ -> x__ {_Address'state = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Address "maybe'state" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'state (\ x__ y__ -> x__ {_Address'state = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Address "city" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'city (\ x__ y__ -> x__ {_Address'city = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Address "maybe'city" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'city (\ x__ y__ -> x__ {_Address'city = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Address "zip" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'zip (\ x__ y__ -> x__ {_Address'zip = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Address "maybe'zip" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'zip (\ x__ y__ -> x__ {_Address'zip = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Address "address" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'address (\ x__ y__ -> x__ {_Address'address = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Address "maybe'address" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'address (\ x__ y__ -> x__ {_Address'address = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Address "address2" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'address2 (\ x__ y__ -> x__ {_Address'address2 = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Address "maybe'address2" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'address2 (\ x__ y__ -> x__ {_Address'address2 = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Address "name" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'name (\ x__ y__ -> x__ {_Address'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Address "maybe'name" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'name (\ x__ y__ -> x__ {_Address'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Address "addressStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'addressStatus + (\ x__ y__ -> x__ {_Address'addressStatus = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Address "maybe'addressStatus" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Address'addressStatus + (\ x__ y__ -> x__ {_Address'addressStatus = y__})) + Prelude.id +instance Data.ProtoLens.Message Address where + messageName _ = Data.Text.pack "common_1.Address" + packedMessageDescriptor _ + = "\n\ + \\aAddress\DC2%\n\ + \\SOcleared_fields\CAN\t \ETX(\rR\rclearedFields\DC2\CAN\n\ + \\acountry\CAN\SOH \SOH(\tR\acountry\DC2\DC4\n\ + \\ENQstate\CAN\STX \SOH(\tR\ENQstate\DC2\DC2\n\ + \\EOTcity\CAN\ETX \SOH(\tR\EOTcity\DC2\DLE\n\ + \\ETXzip\CAN\EOT \SOH(\tR\ETXzip\DC2\CAN\n\ + \\aaddress\CAN\ENQ \SOH(\tR\aaddress\DC2\ESC\n\ + \\taddress_2\CAN\ACK \SOH(\tR\baddress2\DC2\DC2\n\ + \\EOTname\CAN\a \SOH(\tR\EOTname\DC2%\n\ + \\SOaddress_status\CAN\b \SOH(\rR\raddressStatus\"C\n\ + \\rAddressStatus\DC2\v\n\ + \\aINVALID\DLE\NUL\DC2\t\n\ + \\ENQVALID\DLE\SOH\DC2\DC1\n\ + \\rNO_VALIDATION\DLE\STX\DC2\a\n\ + \\ETXNEW\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor Address + country__field_descriptor + = Data.ProtoLens.FieldDescriptor + "country" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'country")) :: + Data.ProtoLens.FieldDescriptor Address + state__field_descriptor + = Data.ProtoLens.FieldDescriptor + "state" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'state")) :: + Data.ProtoLens.FieldDescriptor Address + city__field_descriptor + = Data.ProtoLens.FieldDescriptor + "city" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'city")) :: + Data.ProtoLens.FieldDescriptor Address + zip__field_descriptor + = Data.ProtoLens.FieldDescriptor + "zip" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'zip")) :: + Data.ProtoLens.FieldDescriptor Address + address__field_descriptor + = Data.ProtoLens.FieldDescriptor + "address" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'address")) :: + Data.ProtoLens.FieldDescriptor Address + address2__field_descriptor + = Data.ProtoLens.FieldDescriptor + "address_2" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'address2")) :: + Data.ProtoLens.FieldDescriptor Address + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor Address + addressStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "address_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'addressStatus")) :: + Data.ProtoLens.FieldDescriptor Address + in + Data.Map.fromList + [(Data.ProtoLens.Tag 9, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, country__field_descriptor), + (Data.ProtoLens.Tag 2, state__field_descriptor), + (Data.ProtoLens.Tag 3, city__field_descriptor), + (Data.ProtoLens.Tag 4, zip__field_descriptor), + (Data.ProtoLens.Tag 5, address__field_descriptor), + (Data.ProtoLens.Tag 6, address2__field_descriptor), + (Data.ProtoLens.Tag 7, name__field_descriptor), + (Data.ProtoLens.Tag 8, addressStatus__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Address'_unknownFields + (\ x__ y__ -> x__ {_Address'_unknownFields = y__}) + defMessage + = Address'_constructor + {_Address'clearedFields = Data.Vector.Generic.empty, + _Address'country = Prelude.Nothing, + _Address'state = Prelude.Nothing, _Address'city = Prelude.Nothing, + _Address'zip = Prelude.Nothing, _Address'address = Prelude.Nothing, + _Address'address2 = Prelude.Nothing, + _Address'name = Prelude.Nothing, + _Address'addressStatus = Prelude.Nothing, + _Address'_unknownFields = []} + parseMessage + = let + loop :: + Address + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser Address + loop x mutable'clearedFields + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 72 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x v + 74 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x y + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "country" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"country") y x) + mutable'clearedFields + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "state" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"state") y x) + mutable'clearedFields + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "city" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"city") y x) + mutable'clearedFields + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "zip" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"zip") y x) + mutable'clearedFields + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "address" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"address") y x) + mutable'clearedFields + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "address_2" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"address2") y x) + mutable'clearedFields + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + mutable'clearedFields + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "address_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"addressStatus") y x) + mutable'clearedFields + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'clearedFields + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'clearedFields) + "Address" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'country") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'state") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'city") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'zip") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'address") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'address2") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'addressStatus") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))))) +instance Control.DeepSeq.NFData Address where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Address'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Address'clearedFields x__) + (Control.DeepSeq.deepseq + (_Address'country x__) + (Control.DeepSeq.deepseq + (_Address'state x__) + (Control.DeepSeq.deepseq + (_Address'city x__) + (Control.DeepSeq.deepseq + (_Address'zip x__) + (Control.DeepSeq.deepseq + (_Address'address x__) + (Control.DeepSeq.deepseq + (_Address'address2 x__) + (Control.DeepSeq.deepseq + (_Address'name x__) + (Control.DeepSeq.deepseq + (_Address'addressStatus x__) ()))))))))) +data Address'AddressStatus + = Address'INVALID | + Address'VALID | + Address'NO_VALIDATION | + Address'NEW + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum Address'AddressStatus where + maybeToEnum 0 = Prelude.Just Address'INVALID + maybeToEnum 1 = Prelude.Just Address'VALID + maybeToEnum 2 = Prelude.Just Address'NO_VALIDATION + maybeToEnum 3 = Prelude.Just Address'NEW + maybeToEnum _ = Prelude.Nothing + showEnum Address'INVALID = "INVALID" + showEnum Address'VALID = "VALID" + showEnum Address'NO_VALIDATION = "NO_VALIDATION" + showEnum Address'NEW = "NEW" + readEnum k + | (Prelude.==) k "INVALID" = Prelude.Just Address'INVALID + | (Prelude.==) k "VALID" = Prelude.Just Address'VALID + | (Prelude.==) k "NO_VALIDATION" + = Prelude.Just Address'NO_VALIDATION + | (Prelude.==) k "NEW" = Prelude.Just Address'NEW + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded Address'AddressStatus where + minBound = Address'INVALID + maxBound = Address'NEW +instance Prelude.Enum Address'AddressStatus where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum AddressStatus: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum Address'INVALID = 0 + fromEnum Address'VALID = 1 + fromEnum Address'NO_VALIDATION = 2 + fromEnum Address'NEW = 3 + succ Address'NEW + = Prelude.error + "Address'AddressStatus.succ: bad argument Address'NEW. This value would be out of bounds." + succ Address'INVALID = Address'VALID + succ Address'VALID = Address'NO_VALIDATION + succ Address'NO_VALIDATION = Address'NEW + pred Address'INVALID + = Prelude.error + "Address'AddressStatus.pred: bad argument Address'INVALID. This value would be out of bounds." + pred Address'VALID = Address'INVALID + pred Address'NO_VALIDATION = Address'VALID + pred Address'NEW = Address'NO_VALIDATION + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault Address'AddressStatus where + fieldDefault = Address'INVALID +instance Control.DeepSeq.NFData Address'AddressStatus where + rnf x__ = Prelude.seq x__ () +data AdminLoginScope + = CQG | BROKERAGE | SALES_REP | TRADER + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum AdminLoginScope where + maybeToEnum 1 = Prelude.Just CQG + maybeToEnum 2 = Prelude.Just BROKERAGE + maybeToEnum 3 = Prelude.Just SALES_REP + maybeToEnum 4 = Prelude.Just TRADER + maybeToEnum _ = Prelude.Nothing + showEnum CQG = "CQG" + showEnum BROKERAGE = "BROKERAGE" + showEnum SALES_REP = "SALES_REP" + showEnum TRADER = "TRADER" + readEnum k + | (Prelude.==) k "CQG" = Prelude.Just CQG + | (Prelude.==) k "BROKERAGE" = Prelude.Just BROKERAGE + | (Prelude.==) k "SALES_REP" = Prelude.Just SALES_REP + | (Prelude.==) k "TRADER" = Prelude.Just TRADER + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded AdminLoginScope where + minBound = CQG + maxBound = TRADER +instance Prelude.Enum AdminLoginScope where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum AdminLoginScope: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum CQG = 1 + fromEnum BROKERAGE = 2 + fromEnum SALES_REP = 3 + fromEnum TRADER = 4 + succ TRADER + = Prelude.error + "AdminLoginScope.succ: bad argument TRADER. This value would be out of bounds." + succ CQG = BROKERAGE + succ BROKERAGE = SALES_REP + succ SALES_REP = TRADER + pred CQG + = Prelude.error + "AdminLoginScope.pred: bad argument CQG. This value would be out of bounds." + pred BROKERAGE = CQG + pred SALES_REP = BROKERAGE + pred TRADER = SALES_REP + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault AdminLoginScope where + fieldDefault = CQG +instance Control.DeepSeq.NFData AdminLoginScope where + rnf x__ = Prelude.seq x__ () +data AuthActivityType + = LOGIN | + PASSWORD_CHANGE | + CLEAR_LOCKOUT | + CHANGE_2FA | + ERASE_2FA | + ERASE_PASSWORD + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum AuthActivityType where + maybeToEnum 1 = Prelude.Just LOGIN + maybeToEnum 2 = Prelude.Just PASSWORD_CHANGE + maybeToEnum 3 = Prelude.Just CLEAR_LOCKOUT + maybeToEnum 4 = Prelude.Just CHANGE_2FA + maybeToEnum 5 = Prelude.Just ERASE_2FA + maybeToEnum 6 = Prelude.Just ERASE_PASSWORD + maybeToEnum _ = Prelude.Nothing + showEnum LOGIN = "LOGIN" + showEnum PASSWORD_CHANGE = "PASSWORD_CHANGE" + showEnum CLEAR_LOCKOUT = "CLEAR_LOCKOUT" + showEnum CHANGE_2FA = "CHANGE_2FA" + showEnum ERASE_2FA = "ERASE_2FA" + showEnum ERASE_PASSWORD = "ERASE_PASSWORD" + readEnum k + | (Prelude.==) k "LOGIN" = Prelude.Just LOGIN + | (Prelude.==) k "PASSWORD_CHANGE" = Prelude.Just PASSWORD_CHANGE + | (Prelude.==) k "CLEAR_LOCKOUT" = Prelude.Just CLEAR_LOCKOUT + | (Prelude.==) k "CHANGE_2FA" = Prelude.Just CHANGE_2FA + | (Prelude.==) k "ERASE_2FA" = Prelude.Just ERASE_2FA + | (Prelude.==) k "ERASE_PASSWORD" = Prelude.Just ERASE_PASSWORD + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded AuthActivityType where + minBound = LOGIN + maxBound = ERASE_PASSWORD +instance Prelude.Enum AuthActivityType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum AuthActivityType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum LOGIN = 1 + fromEnum PASSWORD_CHANGE = 2 + fromEnum CLEAR_LOCKOUT = 3 + fromEnum CHANGE_2FA = 4 + fromEnum ERASE_2FA = 5 + fromEnum ERASE_PASSWORD = 6 + succ ERASE_PASSWORD + = Prelude.error + "AuthActivityType.succ: bad argument ERASE_PASSWORD. This value would be out of bounds." + succ LOGIN = PASSWORD_CHANGE + succ PASSWORD_CHANGE = CLEAR_LOCKOUT + succ CLEAR_LOCKOUT = CHANGE_2FA + succ CHANGE_2FA = ERASE_2FA + succ ERASE_2FA = ERASE_PASSWORD + pred LOGIN + = Prelude.error + "AuthActivityType.pred: bad argument LOGIN. This value would be out of bounds." + pred PASSWORD_CHANGE = LOGIN + pred CLEAR_LOCKOUT = PASSWORD_CHANGE + pred CHANGE_2FA = CLEAR_LOCKOUT + pred ERASE_2FA = CHANGE_2FA + pred ERASE_PASSWORD = ERASE_2FA + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault AuthActivityType where + fieldDefault = LOGIN +instance Control.DeepSeq.NFData AuthActivityType where + rnf x__ = Prelude.seq x__ () +data AuthServerSpecialOperation + = COMPLETE_LOGON | + SET_PASSWORD | + SETUP_SECOND_FACTOR | + CHANGE_EXPIRED_PASSWORD | + SIGN_AGREEMENT | + VERIFY_PHONE | + PASS_CERTIFICATION + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum AuthServerSpecialOperation where + maybeToEnum 0 = Prelude.Just COMPLETE_LOGON + maybeToEnum 1 = Prelude.Just SET_PASSWORD + maybeToEnum 2 = Prelude.Just SETUP_SECOND_FACTOR + maybeToEnum 3 = Prelude.Just CHANGE_EXPIRED_PASSWORD + maybeToEnum 4 = Prelude.Just SIGN_AGREEMENT + maybeToEnum 5 = Prelude.Just VERIFY_PHONE + maybeToEnum 6 = Prelude.Just PASS_CERTIFICATION + maybeToEnum _ = Prelude.Nothing + showEnum COMPLETE_LOGON = "COMPLETE_LOGON" + showEnum SET_PASSWORD = "SET_PASSWORD" + showEnum SETUP_SECOND_FACTOR = "SETUP_SECOND_FACTOR" + showEnum CHANGE_EXPIRED_PASSWORD = "CHANGE_EXPIRED_PASSWORD" + showEnum SIGN_AGREEMENT = "SIGN_AGREEMENT" + showEnum VERIFY_PHONE = "VERIFY_PHONE" + showEnum PASS_CERTIFICATION = "PASS_CERTIFICATION" + readEnum k + | (Prelude.==) k "COMPLETE_LOGON" = Prelude.Just COMPLETE_LOGON + | (Prelude.==) k "SET_PASSWORD" = Prelude.Just SET_PASSWORD + | (Prelude.==) k "SETUP_SECOND_FACTOR" + = Prelude.Just SETUP_SECOND_FACTOR + | (Prelude.==) k "CHANGE_EXPIRED_PASSWORD" + = Prelude.Just CHANGE_EXPIRED_PASSWORD + | (Prelude.==) k "SIGN_AGREEMENT" = Prelude.Just SIGN_AGREEMENT + | (Prelude.==) k "VERIFY_PHONE" = Prelude.Just VERIFY_PHONE + | (Prelude.==) k "PASS_CERTIFICATION" + = Prelude.Just PASS_CERTIFICATION + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded AuthServerSpecialOperation where + minBound = COMPLETE_LOGON + maxBound = PASS_CERTIFICATION +instance Prelude.Enum AuthServerSpecialOperation where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum AuthServerSpecialOperation: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum COMPLETE_LOGON = 0 + fromEnum SET_PASSWORD = 1 + fromEnum SETUP_SECOND_FACTOR = 2 + fromEnum CHANGE_EXPIRED_PASSWORD = 3 + fromEnum SIGN_AGREEMENT = 4 + fromEnum VERIFY_PHONE = 5 + fromEnum PASS_CERTIFICATION = 6 + succ PASS_CERTIFICATION + = Prelude.error + "AuthServerSpecialOperation.succ: bad argument PASS_CERTIFICATION. This value would be out of bounds." + succ COMPLETE_LOGON = SET_PASSWORD + succ SET_PASSWORD = SETUP_SECOND_FACTOR + succ SETUP_SECOND_FACTOR = CHANGE_EXPIRED_PASSWORD + succ CHANGE_EXPIRED_PASSWORD = SIGN_AGREEMENT + succ SIGN_AGREEMENT = VERIFY_PHONE + succ VERIFY_PHONE = PASS_CERTIFICATION + pred COMPLETE_LOGON + = Prelude.error + "AuthServerSpecialOperation.pred: bad argument COMPLETE_LOGON. This value would be out of bounds." + pred SET_PASSWORD = COMPLETE_LOGON + pred SETUP_SECOND_FACTOR = SET_PASSWORD + pred CHANGE_EXPIRED_PASSWORD = SETUP_SECOND_FACTOR + pred SIGN_AGREEMENT = CHANGE_EXPIRED_PASSWORD + pred VERIFY_PHONE = SIGN_AGREEMENT + pred PASS_CERTIFICATION = VERIFY_PHONE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault AuthServerSpecialOperation where + fieldDefault = COMPLETE_LOGON +instance Control.DeepSeq.NFData AuthServerSpecialOperation where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.sourceUserId' @:: Lens' CloneUser Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'sourceUserId' @:: Lens' CloneUser (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.newUserUsername' @:: Lens' CloneUser Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'newUserUsername' @:: Lens' CloneUser (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.obsoleteNewUserFirstName' @:: Lens' CloneUser Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteNewUserFirstName' @:: Lens' CloneUser (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.obsoleteNewUserLastName' @:: Lens' CloneUser Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteNewUserLastName' @:: Lens' CloneUser (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.obsoleteNewUserAddress' @:: Lens' CloneUser Address@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteNewUserAddress' @:: Lens' CloneUser (Prelude.Maybe Address)@ + * 'Proto.CMS.Common1_Fields.newUserContactInformation' @:: Lens' CloneUser ContactInformation@ + * 'Proto.CMS.Common1_Fields.maybe'newUserContactInformation' @:: Lens' CloneUser (Prelude.Maybe ContactInformation)@ + * 'Proto.CMS.Common1_Fields.obsoleteNewUserMiddleInitial' @:: Lens' CloneUser Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteNewUserMiddleInitial' @:: Lens' CloneUser (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.targetProfileId' @:: Lens' CloneUser Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'targetProfileId' @:: Lens' CloneUser (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.noWelcomeEmail' @:: Lens' CloneUser Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'noWelcomeEmail' @:: Lens' CloneUser (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.newProfileBrokerageId' @:: Lens' CloneUser Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'newProfileBrokerageId' @:: Lens' CloneUser (Prelude.Maybe Data.Text.Text)@ -} +data CloneUser + = CloneUser'_constructor {_CloneUser'sourceUserId :: !(Prelude.Maybe Data.Text.Text), + _CloneUser'newUserUsername :: !(Prelude.Maybe Data.Text.Text), + _CloneUser'obsoleteNewUserFirstName :: !(Prelude.Maybe Data.Text.Text), + _CloneUser'obsoleteNewUserLastName :: !(Prelude.Maybe Data.Text.Text), + _CloneUser'obsoleteNewUserAddress :: !(Prelude.Maybe Address), + _CloneUser'newUserContactInformation :: !(Prelude.Maybe ContactInformation), + _CloneUser'obsoleteNewUserMiddleInitial :: !(Prelude.Maybe Data.Text.Text), + _CloneUser'targetProfileId :: !(Prelude.Maybe Data.Text.Text), + _CloneUser'noWelcomeEmail :: !(Prelude.Maybe Prelude.Bool), + _CloneUser'newProfileBrokerageId :: !(Prelude.Maybe Data.Text.Text), + _CloneUser'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CloneUser where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CloneUser "sourceUserId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'sourceUserId + (\ x__ y__ -> x__ {_CloneUser'sourceUserId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CloneUser "maybe'sourceUserId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'sourceUserId + (\ x__ y__ -> x__ {_CloneUser'sourceUserId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneUser "newUserUsername" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'newUserUsername + (\ x__ y__ -> x__ {_CloneUser'newUserUsername = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CloneUser "maybe'newUserUsername" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'newUserUsername + (\ x__ y__ -> x__ {_CloneUser'newUserUsername = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneUser "obsoleteNewUserFirstName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'obsoleteNewUserFirstName + (\ x__ y__ -> x__ {_CloneUser'obsoleteNewUserFirstName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CloneUser "maybe'obsoleteNewUserFirstName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'obsoleteNewUserFirstName + (\ x__ y__ -> x__ {_CloneUser'obsoleteNewUserFirstName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneUser "obsoleteNewUserLastName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'obsoleteNewUserLastName + (\ x__ y__ -> x__ {_CloneUser'obsoleteNewUserLastName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CloneUser "maybe'obsoleteNewUserLastName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'obsoleteNewUserLastName + (\ x__ y__ -> x__ {_CloneUser'obsoleteNewUserLastName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneUser "obsoleteNewUserAddress" Address where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'obsoleteNewUserAddress + (\ x__ y__ -> x__ {_CloneUser'obsoleteNewUserAddress = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CloneUser "maybe'obsoleteNewUserAddress" (Prelude.Maybe Address) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'obsoleteNewUserAddress + (\ x__ y__ -> x__ {_CloneUser'obsoleteNewUserAddress = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneUser "newUserContactInformation" ContactInformation where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'newUserContactInformation + (\ x__ y__ -> x__ {_CloneUser'newUserContactInformation = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CloneUser "maybe'newUserContactInformation" (Prelude.Maybe ContactInformation) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'newUserContactInformation + (\ x__ y__ -> x__ {_CloneUser'newUserContactInformation = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneUser "obsoleteNewUserMiddleInitial" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'obsoleteNewUserMiddleInitial + (\ x__ y__ -> x__ {_CloneUser'obsoleteNewUserMiddleInitial = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CloneUser "maybe'obsoleteNewUserMiddleInitial" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'obsoleteNewUserMiddleInitial + (\ x__ y__ -> x__ {_CloneUser'obsoleteNewUserMiddleInitial = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneUser "targetProfileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'targetProfileId + (\ x__ y__ -> x__ {_CloneUser'targetProfileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CloneUser "maybe'targetProfileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'targetProfileId + (\ x__ y__ -> x__ {_CloneUser'targetProfileId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneUser "noWelcomeEmail" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'noWelcomeEmail + (\ x__ y__ -> x__ {_CloneUser'noWelcomeEmail = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CloneUser "maybe'noWelcomeEmail" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'noWelcomeEmail + (\ x__ y__ -> x__ {_CloneUser'noWelcomeEmail = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneUser "newProfileBrokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'newProfileBrokerageId + (\ x__ y__ -> x__ {_CloneUser'newProfileBrokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CloneUser "maybe'newProfileBrokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUser'newProfileBrokerageId + (\ x__ y__ -> x__ {_CloneUser'newProfileBrokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Message CloneUser where + messageName _ = Data.Text.pack "common_1.CloneUser" + packedMessageDescriptor _ + = "\n\ + \\tCloneUser\DC2$\n\ + \\SOsource_user_id\CAN\SOH \SOH(\tR\fsourceUserId\DC2*\n\ + \\DC1new_user_username\CAN\STX \SOH(\tR\SInewUserUsername\DC2B\n\ + \\FSobsolete_new_user_first_name\CAN\ETX \SOH(\tR\CANobsoleteNewUserFirstNameB\STX\CAN\SOH\DC2@\n\ + \\ESCobsolete_new_user_last_name\CAN\EOT \SOH(\tR\ETBobsoleteNewUserLastNameB\STX\CAN\SOH\DC2P\n\ + \\EMobsolete_new_user_address\CAN\ENQ \SOH(\v2\DC1.common_1.AddressR\SYNobsoleteNewUserAddressB\STX\CAN\SOH\DC2]\n\ + \\FSnew_user_contact_information\CAN\ACK \SOH(\v2\FS.common_1.ContactInformationR\EMnewUserContactInformation\DC2J\n\ + \ obsolete_new_user_middle_initial\CAN\a \SOH(\tR\FSobsoleteNewUserMiddleInitialB\STX\CAN\SOH\DC2*\n\ + \\DC1target_profile_id\CAN\b \SOH(\tR\SItargetProfileId\DC2(\n\ + \\DLEno_welcome_email\CAN\t \SOH(\bR\SOnoWelcomeEmail\DC27\n\ + \\CANnew_profile_brokerage_id\CAN\n\ + \ \SOH(\tR\NAKnewProfileBrokerageId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + sourceUserId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "source_user_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sourceUserId")) :: + Data.ProtoLens.FieldDescriptor CloneUser + newUserUsername__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_user_username" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'newUserUsername")) :: + Data.ProtoLens.FieldDescriptor CloneUser + obsoleteNewUserFirstName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_new_user_first_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteNewUserFirstName")) :: + Data.ProtoLens.FieldDescriptor CloneUser + obsoleteNewUserLastName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_new_user_last_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteNewUserLastName")) :: + Data.ProtoLens.FieldDescriptor CloneUser + obsoleteNewUserAddress__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_new_user_address" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Address) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteNewUserAddress")) :: + Data.ProtoLens.FieldDescriptor CloneUser + newUserContactInformation__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_user_contact_information" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ContactInformation) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'newUserContactInformation")) :: + Data.ProtoLens.FieldDescriptor CloneUser + obsoleteNewUserMiddleInitial__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_new_user_middle_initial" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteNewUserMiddleInitial")) :: + Data.ProtoLens.FieldDescriptor CloneUser + targetProfileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "target_profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'targetProfileId")) :: + Data.ProtoLens.FieldDescriptor CloneUser + noWelcomeEmail__field_descriptor + = Data.ProtoLens.FieldDescriptor + "no_welcome_email" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'noWelcomeEmail")) :: + Data.ProtoLens.FieldDescriptor CloneUser + newProfileBrokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_profile_brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'newProfileBrokerageId")) :: + Data.ProtoLens.FieldDescriptor CloneUser + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, sourceUserId__field_descriptor), + (Data.ProtoLens.Tag 2, newUserUsername__field_descriptor), + (Data.ProtoLens.Tag 3, obsoleteNewUserFirstName__field_descriptor), + (Data.ProtoLens.Tag 4, obsoleteNewUserLastName__field_descriptor), + (Data.ProtoLens.Tag 5, obsoleteNewUserAddress__field_descriptor), + (Data.ProtoLens.Tag 6, + newUserContactInformation__field_descriptor), + (Data.ProtoLens.Tag 7, + obsoleteNewUserMiddleInitial__field_descriptor), + (Data.ProtoLens.Tag 8, targetProfileId__field_descriptor), + (Data.ProtoLens.Tag 9, noWelcomeEmail__field_descriptor), + (Data.ProtoLens.Tag 10, newProfileBrokerageId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CloneUser'_unknownFields + (\ x__ y__ -> x__ {_CloneUser'_unknownFields = y__}) + defMessage + = CloneUser'_constructor + {_CloneUser'sourceUserId = Prelude.Nothing, + _CloneUser'newUserUsername = Prelude.Nothing, + _CloneUser'obsoleteNewUserFirstName = Prelude.Nothing, + _CloneUser'obsoleteNewUserLastName = Prelude.Nothing, + _CloneUser'obsoleteNewUserAddress = Prelude.Nothing, + _CloneUser'newUserContactInformation = Prelude.Nothing, + _CloneUser'obsoleteNewUserMiddleInitial = Prelude.Nothing, + _CloneUser'targetProfileId = Prelude.Nothing, + _CloneUser'noWelcomeEmail = Prelude.Nothing, + _CloneUser'newProfileBrokerageId = Prelude.Nothing, + _CloneUser'_unknownFields = []} + parseMessage + = let + loop :: CloneUser -> Data.ProtoLens.Encoding.Bytes.Parser CloneUser + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "source_user_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"sourceUserId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "new_user_username" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newUserUsername") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_new_user_first_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteNewUserFirstName") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_new_user_last_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteNewUserLastName") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_new_user_address" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteNewUserAddress") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "new_user_contact_information" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newUserContactInformation") y x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_new_user_middle_initial" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteNewUserMiddleInitial") y + x) + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "target_profile_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"targetProfileId") y x) + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "no_welcome_email" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"noWelcomeEmail") y x) + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "new_profile_brokerage_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newProfileBrokerageId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CloneUser" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'sourceUserId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'newUserUsername") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteNewUserFirstName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteNewUserLastName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteNewUserAddress") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'newUserContactInformation") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteNewUserMiddleInitial") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'targetProfileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'noWelcomeEmail") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'newProfileBrokerageId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x))))))))))) +instance Control.DeepSeq.NFData CloneUser where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CloneUser'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CloneUser'sourceUserId x__) + (Control.DeepSeq.deepseq + (_CloneUser'newUserUsername x__) + (Control.DeepSeq.deepseq + (_CloneUser'obsoleteNewUserFirstName x__) + (Control.DeepSeq.deepseq + (_CloneUser'obsoleteNewUserLastName x__) + (Control.DeepSeq.deepseq + (_CloneUser'obsoleteNewUserAddress x__) + (Control.DeepSeq.deepseq + (_CloneUser'newUserContactInformation x__) + (Control.DeepSeq.deepseq + (_CloneUser'obsoleteNewUserMiddleInitial x__) + (Control.DeepSeq.deepseq + (_CloneUser'targetProfileId x__) + (Control.DeepSeq.deepseq + (_CloneUser'noWelcomeEmail x__) + (Control.DeepSeq.deepseq + (_CloneUser'newProfileBrokerageId x__) ())))))))))) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.newUserId' @:: Lens' CloneUserResult Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.newProfileId' @:: Lens' CloneUserResult Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'newProfileId' @:: Lens' CloneUserResult (Prelude.Maybe Data.Text.Text)@ -} +data CloneUserResult + = CloneUserResult'_constructor {_CloneUserResult'newUserId :: !Data.Text.Text, + _CloneUserResult'newProfileId :: !(Prelude.Maybe Data.Text.Text), + _CloneUserResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CloneUserResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CloneUserResult "newUserId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUserResult'newUserId + (\ x__ y__ -> x__ {_CloneUserResult'newUserId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneUserResult "newProfileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUserResult'newProfileId + (\ x__ y__ -> x__ {_CloneUserResult'newProfileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CloneUserResult "maybe'newProfileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneUserResult'newProfileId + (\ x__ y__ -> x__ {_CloneUserResult'newProfileId = y__})) + Prelude.id +instance Data.ProtoLens.Message CloneUserResult where + messageName _ = Data.Text.pack "common_1.CloneUserResult" + packedMessageDescriptor _ + = "\n\ + \\SICloneUserResult\DC2\RS\n\ + \\vnew_user_id\CAN\SOH \STX(\tR\tnewUserId\DC2$\n\ + \\SOnew_profile_id\CAN\STX \SOH(\tR\fnewProfileId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + newUserId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_user_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"newUserId")) :: + Data.ProtoLens.FieldDescriptor CloneUserResult + newProfileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'newProfileId")) :: + Data.ProtoLens.FieldDescriptor CloneUserResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, newUserId__field_descriptor), + (Data.ProtoLens.Tag 2, newProfileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CloneUserResult'_unknownFields + (\ x__ y__ -> x__ {_CloneUserResult'_unknownFields = y__}) + defMessage + = CloneUserResult'_constructor + {_CloneUserResult'newUserId = Data.ProtoLens.fieldDefault, + _CloneUserResult'newProfileId = Prelude.Nothing, + _CloneUserResult'_unknownFields = []} + parseMessage + = let + loop :: + CloneUserResult + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser CloneUserResult + loop x required'newUserId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'newUserId then (:) "new_user_id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "new_user_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"newUserId") y x) + Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "new_profile_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newProfileId") y x) + required'newUserId + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'newUserId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "CloneUserResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"newUserId") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'newProfileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData CloneUserResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CloneUserResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CloneUserResult'newUserId x__) + (Control.DeepSeq.deepseq (_CloneUserResult'newProfileId x__) ())) +data CommonLookupPropertyType + = AUTHENTICATION_SYSTEM | + CONNECTION_POINT | + EXCHANGE | + COUNTRY | + REGION | + LOG_EVENT_TYPE | + REGEX_VALIDATION_RULE + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum CommonLookupPropertyType where + maybeToEnum 201 = Prelude.Just AUTHENTICATION_SYSTEM + maybeToEnum 202 = Prelude.Just CONNECTION_POINT + maybeToEnum 203 = Prelude.Just EXCHANGE + maybeToEnum 204 = Prelude.Just COUNTRY + maybeToEnum 205 = Prelude.Just REGION + maybeToEnum 206 = Prelude.Just LOG_EVENT_TYPE + maybeToEnum 207 = Prelude.Just REGEX_VALIDATION_RULE + maybeToEnum _ = Prelude.Nothing + showEnum AUTHENTICATION_SYSTEM = "AUTHENTICATION_SYSTEM" + showEnum CONNECTION_POINT = "CONNECTION_POINT" + showEnum EXCHANGE = "EXCHANGE" + showEnum COUNTRY = "COUNTRY" + showEnum REGION = "REGION" + showEnum LOG_EVENT_TYPE = "LOG_EVENT_TYPE" + showEnum REGEX_VALIDATION_RULE = "REGEX_VALIDATION_RULE" + readEnum k + | (Prelude.==) k "AUTHENTICATION_SYSTEM" + = Prelude.Just AUTHENTICATION_SYSTEM + | (Prelude.==) k "CONNECTION_POINT" = Prelude.Just CONNECTION_POINT + | (Prelude.==) k "EXCHANGE" = Prelude.Just EXCHANGE + | (Prelude.==) k "COUNTRY" = Prelude.Just COUNTRY + | (Prelude.==) k "REGION" = Prelude.Just REGION + | (Prelude.==) k "LOG_EVENT_TYPE" = Prelude.Just LOG_EVENT_TYPE + | (Prelude.==) k "REGEX_VALIDATION_RULE" + = Prelude.Just REGEX_VALIDATION_RULE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded CommonLookupPropertyType where + minBound = AUTHENTICATION_SYSTEM + maxBound = REGEX_VALIDATION_RULE +instance Prelude.Enum CommonLookupPropertyType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum CommonLookupPropertyType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum AUTHENTICATION_SYSTEM = 201 + fromEnum CONNECTION_POINT = 202 + fromEnum EXCHANGE = 203 + fromEnum COUNTRY = 204 + fromEnum REGION = 205 + fromEnum LOG_EVENT_TYPE = 206 + fromEnum REGEX_VALIDATION_RULE = 207 + succ REGEX_VALIDATION_RULE + = Prelude.error + "CommonLookupPropertyType.succ: bad argument REGEX_VALIDATION_RULE. This value would be out of bounds." + succ AUTHENTICATION_SYSTEM = CONNECTION_POINT + succ CONNECTION_POINT = EXCHANGE + succ EXCHANGE = COUNTRY + succ COUNTRY = REGION + succ REGION = LOG_EVENT_TYPE + succ LOG_EVENT_TYPE = REGEX_VALIDATION_RULE + pred AUTHENTICATION_SYSTEM + = Prelude.error + "CommonLookupPropertyType.pred: bad argument AUTHENTICATION_SYSTEM. This value would be out of bounds." + pred CONNECTION_POINT = AUTHENTICATION_SYSTEM + pred EXCHANGE = CONNECTION_POINT + pred COUNTRY = EXCHANGE + pred REGION = COUNTRY + pred LOG_EVENT_TYPE = REGION + pred REGEX_VALIDATION_RULE = LOG_EVENT_TYPE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault CommonLookupPropertyType where + fieldDefault = AUTHENTICATION_SYSTEM +instance Control.DeepSeq.NFData CommonLookupPropertyType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.email' @:: Lens' ContactInformation [Email]@ + * 'Proto.CMS.Common1_Fields.vec'email' @:: Lens' ContactInformation (Data.Vector.Vector Email)@ + * 'Proto.CMS.Common1_Fields.phone' @:: Lens' ContactInformation [Phone]@ + * 'Proto.CMS.Common1_Fields.vec'phone' @:: Lens' ContactInformation (Data.Vector.Vector Phone)@ + * 'Proto.CMS.Common1_Fields.fax' @:: Lens' ContactInformation [Phone]@ + * 'Proto.CMS.Common1_Fields.vec'fax' @:: Lens' ContactInformation (Data.Vector.Vector Phone)@ + * 'Proto.CMS.Common1_Fields.firstName' @:: Lens' ContactInformation Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'firstName' @:: Lens' ContactInformation (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.lastName' @:: Lens' ContactInformation Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'lastName' @:: Lens' ContactInformation (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.address' @:: Lens' ContactInformation [Address]@ + * 'Proto.CMS.Common1_Fields.vec'address' @:: Lens' ContactInformation (Data.Vector.Vector Address)@ -} +data ContactInformation + = ContactInformation'_constructor {_ContactInformation'email :: !(Data.Vector.Vector Email), + _ContactInformation'phone :: !(Data.Vector.Vector Phone), + _ContactInformation'fax :: !(Data.Vector.Vector Phone), + _ContactInformation'firstName :: !(Prelude.Maybe Data.Text.Text), + _ContactInformation'lastName :: !(Prelude.Maybe Data.Text.Text), + _ContactInformation'address :: !(Data.Vector.Vector Address), + _ContactInformation'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ContactInformation where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ContactInformation "email" [Email] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'email + (\ x__ y__ -> x__ {_ContactInformation'email = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ContactInformation "vec'email" (Data.Vector.Vector Email) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'email + (\ x__ y__ -> x__ {_ContactInformation'email = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContactInformation "phone" [Phone] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'phone + (\ x__ y__ -> x__ {_ContactInformation'phone = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ContactInformation "vec'phone" (Data.Vector.Vector Phone) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'phone + (\ x__ y__ -> x__ {_ContactInformation'phone = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContactInformation "fax" [Phone] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'fax + (\ x__ y__ -> x__ {_ContactInformation'fax = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ContactInformation "vec'fax" (Data.Vector.Vector Phone) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'fax + (\ x__ y__ -> x__ {_ContactInformation'fax = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContactInformation "firstName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'firstName + (\ x__ y__ -> x__ {_ContactInformation'firstName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ContactInformation "maybe'firstName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'firstName + (\ x__ y__ -> x__ {_ContactInformation'firstName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContactInformation "lastName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'lastName + (\ x__ y__ -> x__ {_ContactInformation'lastName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ContactInformation "maybe'lastName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'lastName + (\ x__ y__ -> x__ {_ContactInformation'lastName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContactInformation "address" [Address] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'address + (\ x__ y__ -> x__ {_ContactInformation'address = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ContactInformation "vec'address" (Data.Vector.Vector Address) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContactInformation'address + (\ x__ y__ -> x__ {_ContactInformation'address = y__})) + Prelude.id +instance Data.ProtoLens.Message ContactInformation where + messageName _ = Data.Text.pack "common_1.ContactInformation" + packedMessageDescriptor _ + = "\n\ + \\DC2ContactInformation\DC2%\n\ + \\ENQemail\CAN\SOH \ETX(\v2\SI.common_1.EmailR\ENQemail\DC2%\n\ + \\ENQphone\CAN\STX \ETX(\v2\SI.common_1.PhoneR\ENQphone\DC2!\n\ + \\ETXfax\CAN\ETX \ETX(\v2\SI.common_1.PhoneR\ETXfax\DC2\GS\n\ + \\n\ + \first_name\CAN\EOT \SOH(\tR\tfirstName\DC2\ESC\n\ + \\tlast_name\CAN\ENQ \SOH(\tR\blastName\DC2+\n\ + \\aaddress\CAN\ACK \ETX(\v2\DC1.common_1.AddressR\aaddress" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + email__field_descriptor + = Data.ProtoLens.FieldDescriptor + "email" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Email) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"email")) :: + Data.ProtoLens.FieldDescriptor ContactInformation + phone__field_descriptor + = Data.ProtoLens.FieldDescriptor + "phone" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Phone) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"phone")) :: + Data.ProtoLens.FieldDescriptor ContactInformation + fax__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fax" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Phone) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"fax")) :: + Data.ProtoLens.FieldDescriptor ContactInformation + firstName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "first_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'firstName")) :: + Data.ProtoLens.FieldDescriptor ContactInformation + lastName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "last_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'lastName")) :: + Data.ProtoLens.FieldDescriptor ContactInformation + address__field_descriptor + = Data.ProtoLens.FieldDescriptor + "address" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Address) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"address")) :: + Data.ProtoLens.FieldDescriptor ContactInformation + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, email__field_descriptor), + (Data.ProtoLens.Tag 2, phone__field_descriptor), + (Data.ProtoLens.Tag 3, fax__field_descriptor), + (Data.ProtoLens.Tag 4, firstName__field_descriptor), + (Data.ProtoLens.Tag 5, lastName__field_descriptor), + (Data.ProtoLens.Tag 6, address__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ContactInformation'_unknownFields + (\ x__ y__ -> x__ {_ContactInformation'_unknownFields = y__}) + defMessage + = ContactInformation'_constructor + {_ContactInformation'email = Data.Vector.Generic.empty, + _ContactInformation'phone = Data.Vector.Generic.empty, + _ContactInformation'fax = Data.Vector.Generic.empty, + _ContactInformation'firstName = Prelude.Nothing, + _ContactInformation'lastName = Prelude.Nothing, + _ContactInformation'address = Data.Vector.Generic.empty, + _ContactInformation'_unknownFields = []} + parseMessage + = let + loop :: + ContactInformation + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Address + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Email + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Phone + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Phone + -> Data.ProtoLens.Encoding.Bytes.Parser ContactInformation + loop x mutable'address mutable'email mutable'fax mutable'phone + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'address <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'address) + frozen'email <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'email) + frozen'fax <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'fax) + frozen'phone <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'phone) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'address") frozen'address + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'email") frozen'email + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'fax") frozen'fax + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'phone") frozen'phone x))))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "email" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'email y) + loop x mutable'address v mutable'fax mutable'phone + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "phone" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'phone y) + loop x mutable'address mutable'email mutable'fax v + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "fax" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'fax y) + loop x mutable'address mutable'email v mutable'phone + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "first_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"firstName") y x) + mutable'address mutable'email mutable'fax mutable'phone + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "last_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"lastName") y x) + mutable'address mutable'email mutable'fax mutable'phone + 50 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "address" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'address y) + loop x v mutable'email mutable'fax mutable'phone + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'address mutable'email mutable'fax mutable'phone + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'address <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'email <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'fax <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'phone <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'address mutable'email mutable'fax + mutable'phone) + "ContactInformation" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'email") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'phone") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'fax") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'firstName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'lastName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'address") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))) +instance Control.DeepSeq.NFData ContactInformation where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ContactInformation'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ContactInformation'email x__) + (Control.DeepSeq.deepseq + (_ContactInformation'phone x__) + (Control.DeepSeq.deepseq + (_ContactInformation'fax x__) + (Control.DeepSeq.deepseq + (_ContactInformation'firstName x__) + (Control.DeepSeq.deepseq + (_ContactInformation'lastName x__) + (Control.DeepSeq.deepseq (_ContactInformation'address x__) ())))))) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.user' @:: Lens' CreateUser User@ -} +data CreateUser + = CreateUser'_constructor {_CreateUser'user :: !User, + _CreateUser'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateUser where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateUser "user" User where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateUser'user (\ x__ y__ -> x__ {_CreateUser'user = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateUser where + messageName _ = Data.Text.pack "common_1.CreateUser" + packedMessageDescriptor _ + = "\n\ + \\n\ + \CreateUser\DC2\"\n\ + \\EOTuser\CAN\SOH \STX(\v2\SO.common_1.UserR\EOTuser" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + user__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor User) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"user")) :: + Data.ProtoLens.FieldDescriptor CreateUser + in + Data.Map.fromList [(Data.ProtoLens.Tag 1, user__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateUser'_unknownFields + (\ x__ y__ -> x__ {_CreateUser'_unknownFields = y__}) + defMessage + = CreateUser'_constructor + {_CreateUser'user = Data.ProtoLens.defMessage, + _CreateUser'_unknownFields = []} + parseMessage + = let + loop :: + CreateUser + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser CreateUser + loop x required'user + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing = (if required'user then (:) "user" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "user" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"user") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'user + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "CreateUser" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view (Data.ProtoLens.Field.field @"user") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData CreateUser where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateUser'_unknownFields x__) + (Control.DeepSeq.deepseq (_CreateUser'user x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.id' @:: Lens' CreateUserResult Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'id' @:: Lens' CreateUserResult (Prelude.Maybe Data.Text.Text)@ -} +data CreateUserResult + = CreateUserResult'_constructor {_CreateUserResult'id :: !(Prelude.Maybe Data.Text.Text), + _CreateUserResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateUserResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateUserResult "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateUserResult'id + (\ x__ y__ -> x__ {_CreateUserResult'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateUserResult "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateUserResult'id + (\ x__ y__ -> x__ {_CreateUserResult'id = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateUserResult where + messageName _ = Data.Text.pack "common_1.CreateUserResult" + packedMessageDescriptor _ + = "\n\ + \\DLECreateUserResult\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor CreateUserResult + in Data.Map.fromList [(Data.ProtoLens.Tag 1, id__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateUserResult'_unknownFields + (\ x__ y__ -> x__ {_CreateUserResult'_unknownFields = y__}) + defMessage + = CreateUserResult'_constructor + {_CreateUserResult'id = Prelude.Nothing, + _CreateUserResult'_unknownFields = []} + parseMessage + = let + loop :: + CreateUserResult + -> Data.ProtoLens.Encoding.Bytes.Parser CreateUserResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateUserResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData CreateUserResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateUserResult'_unknownFields x__) + (Control.DeepSeq.deepseq (_CreateUserResult'id x__) ()) +data CredentialType + = STATIC_PASSWORD | SECOND_FACTOR + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum CredentialType where + maybeToEnum 1 = Prelude.Just STATIC_PASSWORD + maybeToEnum 2 = Prelude.Just SECOND_FACTOR + maybeToEnum _ = Prelude.Nothing + showEnum STATIC_PASSWORD = "STATIC_PASSWORD" + showEnum SECOND_FACTOR = "SECOND_FACTOR" + readEnum k + | (Prelude.==) k "STATIC_PASSWORD" = Prelude.Just STATIC_PASSWORD + | (Prelude.==) k "SECOND_FACTOR" = Prelude.Just SECOND_FACTOR + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded CredentialType where + minBound = STATIC_PASSWORD + maxBound = SECOND_FACTOR +instance Prelude.Enum CredentialType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum CredentialType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum STATIC_PASSWORD = 1 + fromEnum SECOND_FACTOR = 2 + succ SECOND_FACTOR + = Prelude.error + "CredentialType.succ: bad argument SECOND_FACTOR. This value would be out of bounds." + succ STATIC_PASSWORD = SECOND_FACTOR + pred STATIC_PASSWORD + = Prelude.error + "CredentialType.pred: bad argument STATIC_PASSWORD. This value would be out of bounds." + pred SECOND_FACTOR = STATIC_PASSWORD + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault CredentialType where + fieldDefault = STATIC_PASSWORD +instance Control.DeepSeq.NFData CredentialType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.userName' @:: Lens' Credentials Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.password' @:: Lens' Credentials Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'password' @:: Lens' Credentials (Prelude.Maybe Data.Text.Text)@ -} +data Credentials + = Credentials'_constructor {_Credentials'userName :: !Data.Text.Text, + _Credentials'password :: !(Prelude.Maybe Data.Text.Text), + _Credentials'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Credentials where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Credentials "userName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Credentials'userName + (\ x__ y__ -> x__ {_Credentials'userName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Credentials "password" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Credentials'password + (\ x__ y__ -> x__ {_Credentials'password = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Credentials "maybe'password" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Credentials'password + (\ x__ y__ -> x__ {_Credentials'password = y__})) + Prelude.id +instance Data.ProtoLens.Message Credentials where + messageName _ = Data.Text.pack "common_1.Credentials" + packedMessageDescriptor _ + = "\n\ + \\vCredentials\DC2\ESC\n\ + \\tuser_name\CAN\SOH \STX(\tR\buserName\DC2\SUB\n\ + \\bpassword\CAN\STX \SOH(\tR\bpassword" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + userName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"userName")) :: + Data.ProtoLens.FieldDescriptor Credentials + password__field_descriptor + = Data.ProtoLens.FieldDescriptor + "password" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'password")) :: + Data.ProtoLens.FieldDescriptor Credentials + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, userName__field_descriptor), + (Data.ProtoLens.Tag 2, password__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Credentials'_unknownFields + (\ x__ y__ -> x__ {_Credentials'_unknownFields = y__}) + defMessage + = Credentials'_constructor + {_Credentials'userName = Data.ProtoLens.fieldDefault, + _Credentials'password = Prelude.Nothing, + _Credentials'_unknownFields = []} + parseMessage + = let + loop :: + Credentials + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser Credentials + loop x required'userName + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'userName then (:) "user_name" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"userName") y x) + Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "password" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"password") y x) + required'userName + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'userName + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "Credentials" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"userName") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'password") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData Credentials where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Credentials'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Credentials'userName x__) + (Control.DeepSeq.deepseq (_Credentials'password x__) ())) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.customerId' @:: Lens' CustomerSalesSeriesAuthorizationListRequest Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'customerId' @:: Lens' CustomerSalesSeriesAuthorizationListRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.salesSeriesId' @:: Lens' CustomerSalesSeriesAuthorizationListRequest Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'salesSeriesId' @:: Lens' CustomerSalesSeriesAuthorizationListRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.top' @:: Lens' CustomerSalesSeriesAuthorizationListRequest Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'top' @:: Lens' CustomerSalesSeriesAuthorizationListRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.profileId' @:: Lens' CustomerSalesSeriesAuthorizationListRequest Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'profileId' @:: Lens' CustomerSalesSeriesAuthorizationListRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.profileSalesSeriesId' @:: Lens' CustomerSalesSeriesAuthorizationListRequest Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'profileSalesSeriesId' @:: Lens' CustomerSalesSeriesAuthorizationListRequest (Prelude.Maybe Data.Text.Text)@ -} +data CustomerSalesSeriesAuthorizationListRequest + = CustomerSalesSeriesAuthorizationListRequest'_constructor {_CustomerSalesSeriesAuthorizationListRequest'customerId :: !(Prelude.Maybe Data.Text.Text), + _CustomerSalesSeriesAuthorizationListRequest'salesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _CustomerSalesSeriesAuthorizationListRequest'top :: !(Prelude.Maybe Data.Word.Word32), + _CustomerSalesSeriesAuthorizationListRequest'profileId :: !(Prelude.Maybe Data.Text.Text), + _CustomerSalesSeriesAuthorizationListRequest'profileSalesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _CustomerSalesSeriesAuthorizationListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CustomerSalesSeriesAuthorizationListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListRequest "customerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListRequest'customerId + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListRequest'customerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListRequest "maybe'customerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListRequest'customerId + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListRequest'customerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListRequest "salesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListRequest'salesSeriesId + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListRequest'salesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListRequest "maybe'salesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListRequest'salesSeriesId + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListRequest'salesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListRequest "top" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListRequest'top + (\ x__ y__ + -> x__ {_CustomerSalesSeriesAuthorizationListRequest'top = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListRequest "maybe'top" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListRequest'top + (\ x__ y__ + -> x__ {_CustomerSalesSeriesAuthorizationListRequest'top = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListRequest "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListRequest'profileId + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListRequest'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListRequest "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListRequest'profileId + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListRequest'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListRequest "profileSalesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListRequest'profileSalesSeriesId + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListRequest'profileSalesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListRequest "maybe'profileSalesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListRequest'profileSalesSeriesId + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListRequest'profileSalesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Message CustomerSalesSeriesAuthorizationListRequest where + messageName _ + = Data.Text.pack + "common_1.CustomerSalesSeriesAuthorizationListRequest" + packedMessageDescriptor _ + = "\n\ + \+CustomerSalesSeriesAuthorizationListRequest\DC2\US\n\ + \\vcustomer_id\CAN\SOH \SOH(\tR\n\ + \customerId\DC2&\n\ + \\SIsales_series_id\CAN\STX \SOH(\tR\rsalesSeriesId\DC2\DLE\n\ + \\ETXtop\CAN\ETX \SOH(\rR\ETXtop\DC2\GS\n\ + \\n\ + \profile_id\CAN\EOT \SOH(\tR\tprofileId\DC25\n\ + \\ETBprofile_sales_series_id\CAN\ENQ \SOH(\tR\DC4profileSalesSeriesId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + customerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerId")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesAuthorizationListRequest + salesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesId")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesAuthorizationListRequest + top__field_descriptor + = Data.ProtoLens.FieldDescriptor + "top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'top")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesAuthorizationListRequest + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesAuthorizationListRequest + profileSalesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileSalesSeriesId")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesAuthorizationListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, customerId__field_descriptor), + (Data.ProtoLens.Tag 2, salesSeriesId__field_descriptor), + (Data.ProtoLens.Tag 3, top__field_descriptor), + (Data.ProtoLens.Tag 4, profileId__field_descriptor), + (Data.ProtoLens.Tag 5, profileSalesSeriesId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListRequest'_unknownFields + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListRequest'_unknownFields = y__}) + defMessage + = CustomerSalesSeriesAuthorizationListRequest'_constructor + {_CustomerSalesSeriesAuthorizationListRequest'customerId = Prelude.Nothing, + _CustomerSalesSeriesAuthorizationListRequest'salesSeriesId = Prelude.Nothing, + _CustomerSalesSeriesAuthorizationListRequest'top = Prelude.Nothing, + _CustomerSalesSeriesAuthorizationListRequest'profileId = Prelude.Nothing, + _CustomerSalesSeriesAuthorizationListRequest'profileSalesSeriesId = Prelude.Nothing, + _CustomerSalesSeriesAuthorizationListRequest'_unknownFields = []} + parseMessage + = let + loop :: + CustomerSalesSeriesAuthorizationListRequest + -> Data.ProtoLens.Encoding.Bytes.Parser CustomerSalesSeriesAuthorizationListRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"customerId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesId") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "top" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"top") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"profileSalesSeriesId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "CustomerSalesSeriesAuthorizationListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'customerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'salesSeriesId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'top") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileSalesSeriesId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData CustomerSalesSeriesAuthorizationListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CustomerSalesSeriesAuthorizationListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesAuthorizationListRequest'customerId x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesAuthorizationListRequest'salesSeriesId x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesAuthorizationListRequest'top x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesAuthorizationListRequest'profileId x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesAuthorizationListRequest'profileSalesSeriesId + x__) + ()))))) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.customerSalesSeriesLinks' @:: Lens' CustomerSalesSeriesAuthorizationListResult [CustomerSalesSeriesLink]@ + * 'Proto.CMS.Common1_Fields.vec'customerSalesSeriesLinks' @:: Lens' CustomerSalesSeriesAuthorizationListResult (Data.Vector.Vector CustomerSalesSeriesLink)@ + * 'Proto.CMS.Common1_Fields.isComplete' @:: Lens' CustomerSalesSeriesAuthorizationListResult Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'isComplete' @:: Lens' CustomerSalesSeriesAuthorizationListResult (Prelude.Maybe Prelude.Bool)@ -} +data CustomerSalesSeriesAuthorizationListResult + = CustomerSalesSeriesAuthorizationListResult'_constructor {_CustomerSalesSeriesAuthorizationListResult'customerSalesSeriesLinks :: !(Data.Vector.Vector CustomerSalesSeriesLink), + _CustomerSalesSeriesAuthorizationListResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _CustomerSalesSeriesAuthorizationListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CustomerSalesSeriesAuthorizationListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListResult "customerSalesSeriesLinks" [CustomerSalesSeriesLink] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListResult'customerSalesSeriesLinks + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListResult'customerSalesSeriesLinks = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListResult "vec'customerSalesSeriesLinks" (Data.Vector.Vector CustomerSalesSeriesLink) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListResult'customerSalesSeriesLinks + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListResult'customerSalesSeriesLinks = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListResult'isComplete + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesAuthorizationListResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListResult'isComplete + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Message CustomerSalesSeriesAuthorizationListResult where + messageName _ + = Data.Text.pack + "common_1.CustomerSalesSeriesAuthorizationListResult" + packedMessageDescriptor _ + = "\n\ + \*CustomerSalesSeriesAuthorizationListResult\DC2`\n\ + \\ESCcustomer_sales_series_links\CAN\SOH \ETX(\v2!.common_1.CustomerSalesSeriesLinkR\CANcustomerSalesSeriesLinks\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + customerSalesSeriesLinks__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_sales_series_links" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CustomerSalesSeriesLink) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"customerSalesSeriesLinks")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesAuthorizationListResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesAuthorizationListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, + customerSalesSeriesLinks__field_descriptor), + (Data.ProtoLens.Tag 2, isComplete__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CustomerSalesSeriesAuthorizationListResult'_unknownFields + (\ x__ y__ + -> x__ + {_CustomerSalesSeriesAuthorizationListResult'_unknownFields = y__}) + defMessage + = CustomerSalesSeriesAuthorizationListResult'_constructor + {_CustomerSalesSeriesAuthorizationListResult'customerSalesSeriesLinks = Data.Vector.Generic.empty, + _CustomerSalesSeriesAuthorizationListResult'isComplete = Prelude.Nothing, + _CustomerSalesSeriesAuthorizationListResult'_unknownFields = []} + parseMessage + = let + loop :: + CustomerSalesSeriesAuthorizationListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld CustomerSalesSeriesLink + -> Data.ProtoLens.Encoding.Bytes.Parser CustomerSalesSeriesAuthorizationListResult + loop x mutable'customerSalesSeriesLinks + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'customerSalesSeriesLinks <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'customerSalesSeriesLinks) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'customerSalesSeriesLinks") + frozen'customerSalesSeriesLinks x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "customer_sales_series_links" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'customerSalesSeriesLinks y) + loop x v + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + mutable'customerSalesSeriesLinks + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'customerSalesSeriesLinks + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'customerSalesSeriesLinks <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'customerSalesSeriesLinks) + "CustomerSalesSeriesAuthorizationListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'customerSalesSeriesLinks") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData CustomerSalesSeriesAuthorizationListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CustomerSalesSeriesAuthorizationListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesAuthorizationListResult'customerSalesSeriesLinks + x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesAuthorizationListResult'isComplete x__) ())) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.customerId' @:: Lens' CustomerSalesSeriesLink Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'customerId' @:: Lens' CustomerSalesSeriesLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.salesSeriesId' @:: Lens' CustomerSalesSeriesLink Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'salesSeriesId' @:: Lens' CustomerSalesSeriesLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.salesSeriesName' @:: Lens' CustomerSalesSeriesLink Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'salesSeriesName' @:: Lens' CustomerSalesSeriesLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.salesSeriesNumber' @:: Lens' CustomerSalesSeriesLink Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'salesSeriesNumber' @:: Lens' CustomerSalesSeriesLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.profileId' @:: Lens' CustomerSalesSeriesLink Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'profileId' @:: Lens' CustomerSalesSeriesLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.profileSalesSeriesId' @:: Lens' CustomerSalesSeriesLink Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'profileSalesSeriesId' @:: Lens' CustomerSalesSeriesLink (Prelude.Maybe Data.Text.Text)@ -} +data CustomerSalesSeriesLink + = CustomerSalesSeriesLink'_constructor {_CustomerSalesSeriesLink'customerId :: !(Prelude.Maybe Data.Text.Text), + _CustomerSalesSeriesLink'salesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _CustomerSalesSeriesLink'salesSeriesName :: !(Prelude.Maybe Data.Text.Text), + _CustomerSalesSeriesLink'salesSeriesNumber :: !(Prelude.Maybe Data.Text.Text), + _CustomerSalesSeriesLink'profileId :: !(Prelude.Maybe Data.Text.Text), + _CustomerSalesSeriesLink'profileSalesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _CustomerSalesSeriesLink'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CustomerSalesSeriesLink where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "customerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'customerId + (\ x__ y__ -> x__ {_CustomerSalesSeriesLink'customerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "maybe'customerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'customerId + (\ x__ y__ -> x__ {_CustomerSalesSeriesLink'customerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "salesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'salesSeriesId + (\ x__ y__ -> x__ {_CustomerSalesSeriesLink'salesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "maybe'salesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'salesSeriesId + (\ x__ y__ -> x__ {_CustomerSalesSeriesLink'salesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "salesSeriesName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'salesSeriesName + (\ x__ y__ + -> x__ {_CustomerSalesSeriesLink'salesSeriesName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "maybe'salesSeriesName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'salesSeriesName + (\ x__ y__ + -> x__ {_CustomerSalesSeriesLink'salesSeriesName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "salesSeriesNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'salesSeriesNumber + (\ x__ y__ + -> x__ {_CustomerSalesSeriesLink'salesSeriesNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "maybe'salesSeriesNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'salesSeriesNumber + (\ x__ y__ + -> x__ {_CustomerSalesSeriesLink'salesSeriesNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'profileId + (\ x__ y__ -> x__ {_CustomerSalesSeriesLink'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'profileId + (\ x__ y__ -> x__ {_CustomerSalesSeriesLink'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "profileSalesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'profileSalesSeriesId + (\ x__ y__ + -> x__ {_CustomerSalesSeriesLink'profileSalesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CustomerSalesSeriesLink "maybe'profileSalesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'profileSalesSeriesId + (\ x__ y__ + -> x__ {_CustomerSalesSeriesLink'profileSalesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Message CustomerSalesSeriesLink where + messageName _ = Data.Text.pack "common_1.CustomerSalesSeriesLink" + packedMessageDescriptor _ + = "\n\ + \\ETBCustomerSalesSeriesLink\DC2\US\n\ + \\vcustomer_id\CAN\SOH \SOH(\tR\n\ + \customerId\DC2&\n\ + \\SIsales_series_id\CAN\STX \SOH(\tR\rsalesSeriesId\DC2*\n\ + \\DC1sales_series_name\CAN\ETX \SOH(\tR\SIsalesSeriesName\DC2.\n\ + \\DC3sales_series_number\CAN\EOT \SOH(\tR\DC1salesSeriesNumber\DC2\GS\n\ + \\n\ + \profile_id\CAN\ENQ \SOH(\tR\tprofileId\DC25\n\ + \\ETBprofile_sales_series_id\CAN\ACK \SOH(\tR\DC4profileSalesSeriesId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + customerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerId")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesLink + salesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesId")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesLink + salesSeriesName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesName")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesLink + salesSeriesNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesNumber")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesLink + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesLink + profileSalesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileSalesSeriesId")) :: + Data.ProtoLens.FieldDescriptor CustomerSalesSeriesLink + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, customerId__field_descriptor), + (Data.ProtoLens.Tag 2, salesSeriesId__field_descriptor), + (Data.ProtoLens.Tag 3, salesSeriesName__field_descriptor), + (Data.ProtoLens.Tag 4, salesSeriesNumber__field_descriptor), + (Data.ProtoLens.Tag 5, profileId__field_descriptor), + (Data.ProtoLens.Tag 6, profileSalesSeriesId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CustomerSalesSeriesLink'_unknownFields + (\ x__ y__ -> x__ {_CustomerSalesSeriesLink'_unknownFields = y__}) + defMessage + = CustomerSalesSeriesLink'_constructor + {_CustomerSalesSeriesLink'customerId = Prelude.Nothing, + _CustomerSalesSeriesLink'salesSeriesId = Prelude.Nothing, + _CustomerSalesSeriesLink'salesSeriesName = Prelude.Nothing, + _CustomerSalesSeriesLink'salesSeriesNumber = Prelude.Nothing, + _CustomerSalesSeriesLink'profileId = Prelude.Nothing, + _CustomerSalesSeriesLink'profileSalesSeriesId = Prelude.Nothing, + _CustomerSalesSeriesLink'_unknownFields = []} + parseMessage + = let + loop :: + CustomerSalesSeriesLink + -> Data.ProtoLens.Encoding.Bytes.Parser CustomerSalesSeriesLink + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"customerId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesName") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesNumber") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"profileSalesSeriesId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CustomerSalesSeriesLink" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'customerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'salesSeriesId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'salesSeriesName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'salesSeriesNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileSalesSeriesId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))) +instance Control.DeepSeq.NFData CustomerSalesSeriesLink where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CustomerSalesSeriesLink'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesLink'customerId x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesLink'salesSeriesId x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesLink'salesSeriesName x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesLink'salesSeriesNumber x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesLink'profileId x__) + (Control.DeepSeq.deepseq + (_CustomerSalesSeriesLink'profileSalesSeriesId x__) ())))))) +{- | Fields : + -} +data DataRequest + = DataRequest'_constructor {_DataRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show DataRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message DataRequest where + messageName _ = Data.Text.pack "common_1.DataRequest" + packedMessageDescriptor _ + = "\n\ + \\vDataRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _DataRequest'_unknownFields + (\ x__ y__ -> x__ {_DataRequest'_unknownFields = y__}) + defMessage + = DataRequest'_constructor {_DataRequest'_unknownFields = []} + parseMessage + = let + loop :: + DataRequest -> Data.ProtoLens.Encoding.Bytes.Parser DataRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "DataRequest" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData DataRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq (_DataRequest'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginId' @:: Lens' DeactivateLogin Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'loginId' @:: Lens' DeactivateLogin (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.expirationTime' @:: Lens' DeactivateLogin Data.Int.Int64@ + * 'Proto.CMS.Common1_Fields.maybe'expirationTime' @:: Lens' DeactivateLogin (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Common1_Fields.cleanUpEventSubscriptions' @:: Lens' DeactivateLogin Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'cleanUpEventSubscriptions' @:: Lens' DeactivateLogin (Prelude.Maybe Prelude.Bool)@ -} +data DeactivateLogin + = DeactivateLogin'_constructor {_DeactivateLogin'loginId :: !(Prelude.Maybe Data.Text.Text), + _DeactivateLogin'expirationTime :: !(Prelude.Maybe Data.Int.Int64), + _DeactivateLogin'cleanUpEventSubscriptions :: !(Prelude.Maybe Prelude.Bool), + _DeactivateLogin'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show DeactivateLogin where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField DeactivateLogin "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _DeactivateLogin'loginId + (\ x__ y__ -> x__ {_DeactivateLogin'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField DeactivateLogin "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _DeactivateLogin'loginId + (\ x__ y__ -> x__ {_DeactivateLogin'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField DeactivateLogin "expirationTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _DeactivateLogin'expirationTime + (\ x__ y__ -> x__ {_DeactivateLogin'expirationTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField DeactivateLogin "maybe'expirationTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _DeactivateLogin'expirationTime + (\ x__ y__ -> x__ {_DeactivateLogin'expirationTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField DeactivateLogin "cleanUpEventSubscriptions" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _DeactivateLogin'cleanUpEventSubscriptions + (\ x__ y__ + -> x__ {_DeactivateLogin'cleanUpEventSubscriptions = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField DeactivateLogin "maybe'cleanUpEventSubscriptions" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _DeactivateLogin'cleanUpEventSubscriptions + (\ x__ y__ + -> x__ {_DeactivateLogin'cleanUpEventSubscriptions = y__})) + Prelude.id +instance Data.ProtoLens.Message DeactivateLogin where + messageName _ = Data.Text.pack "common_1.DeactivateLogin" + packedMessageDescriptor _ + = "\n\ + \\SIDeactivateLogin\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2'\n\ + \\SIexpiration_time\CAN\STX \SOH(\DC2R\SOexpirationTime\DC2F\n\ + \\FSclean_up_event_subscriptions\CAN\ETX \SOH(\b:\ENQfalseR\EMcleanUpEventSubscriptions" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor DeactivateLogin + expirationTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "expiration_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'expirationTime")) :: + Data.ProtoLens.FieldDescriptor DeactivateLogin + cleanUpEventSubscriptions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "clean_up_event_subscriptions" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cleanUpEventSubscriptions")) :: + Data.ProtoLens.FieldDescriptor DeactivateLogin + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor), + (Data.ProtoLens.Tag 2, expirationTime__field_descriptor), + (Data.ProtoLens.Tag 3, + cleanUpEventSubscriptions__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _DeactivateLogin'_unknownFields + (\ x__ y__ -> x__ {_DeactivateLogin'_unknownFields = y__}) + defMessage + = DeactivateLogin'_constructor + {_DeactivateLogin'loginId = Prelude.Nothing, + _DeactivateLogin'expirationTime = Prelude.Nothing, + _DeactivateLogin'cleanUpEventSubscriptions = Prelude.Nothing, + _DeactivateLogin'_unknownFields = []} + parseMessage + = let + loop :: + DeactivateLogin + -> Data.ProtoLens.Encoding.Bytes.Parser DeactivateLogin + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "expiration_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"expirationTime") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "clean_up_event_subscriptions" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"cleanUpEventSubscriptions") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "DeactivateLogin" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'expirationTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'cleanUpEventSubscriptions") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData DeactivateLogin where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_DeactivateLogin'_unknownFields x__) + (Control.DeepSeq.deepseq + (_DeactivateLogin'loginId x__) + (Control.DeepSeq.deepseq + (_DeactivateLogin'expirationTime x__) + (Control.DeepSeq.deepseq + (_DeactivateLogin'cleanUpEventSubscriptions x__) ()))) +{- | Fields : + -} +data DeactivateLoginResult + = DeactivateLoginResult'_constructor {_DeactivateLoginResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show DeactivateLoginResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message DeactivateLoginResult where + messageName _ = Data.Text.pack "common_1.DeactivateLoginResult" + packedMessageDescriptor _ + = "\n\ + \\NAKDeactivateLoginResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _DeactivateLoginResult'_unknownFields + (\ x__ y__ -> x__ {_DeactivateLoginResult'_unknownFields = y__}) + defMessage + = DeactivateLoginResult'_constructor + {_DeactivateLoginResult'_unknownFields = []} + parseMessage + = let + loop :: + DeactivateLoginResult + -> Data.ProtoLens.Encoding.Bytes.Parser DeactivateLoginResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "DeactivateLoginResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData DeactivateLoginResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_DeactivateLoginResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.email' @:: Lens' Email Data.Text.Text@ -} +data Email + = Email'_constructor {_Email'email :: !Data.Text.Text, + _Email'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Email where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Email "email" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Email'email (\ x__ y__ -> x__ {_Email'email = y__})) + Prelude.id +instance Data.ProtoLens.Message Email where + messageName _ = Data.Text.pack "common_1.Email" + packedMessageDescriptor _ + = "\n\ + \\ENQEmail\DC2\DC4\n\ + \\ENQemail\CAN\SOH \STX(\tR\ENQemail" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + email__field_descriptor + = Data.ProtoLens.FieldDescriptor + "email" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"email")) :: + Data.ProtoLens.FieldDescriptor Email + in + Data.Map.fromList [(Data.ProtoLens.Tag 1, email__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Email'_unknownFields + (\ x__ y__ -> x__ {_Email'_unknownFields = y__}) + defMessage + = Email'_constructor + {_Email'email = Data.ProtoLens.fieldDefault, + _Email'_unknownFields = []} + parseMessage + = let + loop :: + Email -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser Email + loop x required'email + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing = (if required'email then (:) "email" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "email" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"email") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'email + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "Email" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"email") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData Email where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Email'_unknownFields x__) + (Control.DeepSeq.deepseq (_Email'email x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.entityId' @:: Lens' EntitiesDataRequest [Data.Text.Text]@ + * 'Proto.CMS.Common1_Fields.vec'entityId' @:: Lens' EntitiesDataRequest (Data.Vector.Vector Data.Text.Text)@ -} +data EntitiesDataRequest + = EntitiesDataRequest'_constructor {_EntitiesDataRequest'entityId :: !(Data.Vector.Vector Data.Text.Text), + _EntitiesDataRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntitiesDataRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EntitiesDataRequest "entityId" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitiesDataRequest'entityId + (\ x__ y__ -> x__ {_EntitiesDataRequest'entityId = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EntitiesDataRequest "vec'entityId" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitiesDataRequest'entityId + (\ x__ y__ -> x__ {_EntitiesDataRequest'entityId = y__})) + Prelude.id +instance Data.ProtoLens.Message EntitiesDataRequest where + messageName _ = Data.Text.pack "common_1.EntitiesDataRequest" + packedMessageDescriptor _ + = "\n\ + \\DC3EntitiesDataRequest\DC2\ESC\n\ + \\tentity_id\CAN\SOH \ETX(\tR\bentityId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + entityId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entity_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"entityId")) :: + Data.ProtoLens.FieldDescriptor EntitiesDataRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, entityId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EntitiesDataRequest'_unknownFields + (\ x__ y__ -> x__ {_EntitiesDataRequest'_unknownFields = y__}) + defMessage + = EntitiesDataRequest'_constructor + {_EntitiesDataRequest'entityId = Data.Vector.Generic.empty, + _EntitiesDataRequest'_unknownFields = []} + parseMessage + = let + loop :: + EntitiesDataRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser EntitiesDataRequest + loop x mutable'entityId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'entityId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'entityId) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'entityId") frozen'entityId x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "entity_id" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'entityId y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'entityId + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'entityId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'entityId) + "EntitiesDataRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'entityId") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData EntitiesDataRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntitiesDataRequest'_unknownFields x__) + (Control.DeepSeq.deepseq (_EntitiesDataRequest'entityId x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.id' @:: Lens' EntitlementCategory Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.name' @:: Lens' EntitlementCategory Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.subCategory' @:: Lens' EntitlementCategory [EntitlementCategory]@ + * 'Proto.CMS.Common1_Fields.vec'subCategory' @:: Lens' EntitlementCategory (Data.Vector.Vector EntitlementCategory)@ + * 'Proto.CMS.Common1_Fields.brokerageAssignable' @:: Lens' EntitlementCategory Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'brokerageAssignable' @:: Lens' EntitlementCategory (Prelude.Maybe Prelude.Bool)@ -} +data EntitlementCategory + = EntitlementCategory'_constructor {_EntitlementCategory'id :: !Data.Word.Word32, + _EntitlementCategory'name :: !Proto.Common.Shared1.Text, + _EntitlementCategory'subCategory :: !(Data.Vector.Vector EntitlementCategory), + _EntitlementCategory'brokerageAssignable :: !(Prelude.Maybe Prelude.Bool), + _EntitlementCategory'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntitlementCategory where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EntitlementCategory "id" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementCategory'id + (\ x__ y__ -> x__ {_EntitlementCategory'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementCategory "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementCategory'name + (\ x__ y__ -> x__ {_EntitlementCategory'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementCategory "subCategory" [EntitlementCategory] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementCategory'subCategory + (\ x__ y__ -> x__ {_EntitlementCategory'subCategory = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EntitlementCategory "vec'subCategory" (Data.Vector.Vector EntitlementCategory) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementCategory'subCategory + (\ x__ y__ -> x__ {_EntitlementCategory'subCategory = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementCategory "brokerageAssignable" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementCategory'brokerageAssignable + (\ x__ y__ + -> x__ {_EntitlementCategory'brokerageAssignable = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementCategory "maybe'brokerageAssignable" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementCategory'brokerageAssignable + (\ x__ y__ + -> x__ {_EntitlementCategory'brokerageAssignable = y__})) + Prelude.id +instance Data.ProtoLens.Message EntitlementCategory where + messageName _ = Data.Text.pack "common_1.EntitlementCategory" + packedMessageDescriptor _ + = "\n\ + \\DC3EntitlementCategory\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \STX(\v2\SO.shared_1.TextR\EOTname\DC2@\n\ + \\fsub_category\CAN\ETX \ETX(\v2\GS.common_1.EntitlementCategoryR\vsubCategory\DC21\n\ + \\DC4brokerage_assignable\CAN\EOT \SOH(\bR\DC3brokerageAssignable" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"id")) :: + Data.ProtoLens.FieldDescriptor EntitlementCategory + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"name")) :: + Data.ProtoLens.FieldDescriptor EntitlementCategory + subCategory__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sub_category" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EntitlementCategory) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"subCategory")) :: + Data.ProtoLens.FieldDescriptor EntitlementCategory + brokerageAssignable__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_assignable" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageAssignable")) :: + Data.ProtoLens.FieldDescriptor EntitlementCategory + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, subCategory__field_descriptor), + (Data.ProtoLens.Tag 4, brokerageAssignable__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EntitlementCategory'_unknownFields + (\ x__ y__ -> x__ {_EntitlementCategory'_unknownFields = y__}) + defMessage + = EntitlementCategory'_constructor + {_EntitlementCategory'id = Data.ProtoLens.fieldDefault, + _EntitlementCategory'name = Data.ProtoLens.defMessage, + _EntitlementCategory'subCategory = Data.Vector.Generic.empty, + _EntitlementCategory'brokerageAssignable = Prelude.Nothing, + _EntitlementCategory'_unknownFields = []} + parseMessage + = let + loop :: + EntitlementCategory + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld EntitlementCategory + -> Data.ProtoLens.Encoding.Bytes.Parser EntitlementCategory + loop x required'id required'name mutable'subCategory + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'subCategory <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'subCategory) + (let + missing + = (if required'id then (:) "id" else Prelude.id) + ((if required'name then (:) "name" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'subCategory") frozen'subCategory + x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + Prelude.False required'name mutable'subCategory + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + required'id Prelude.False mutable'subCategory + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "sub_category" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'subCategory y) + loop x required'id required'name v + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "brokerage_assignable" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAssignable") y x) + required'id required'name mutable'subCategory + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'id required'name mutable'subCategory + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'subCategory <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True Prelude.True + mutable'subCategory) + "EntitlementCategory" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"id") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view (Data.ProtoLens.Field.field @"name") _x))) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'subCategory") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageAssignable") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData EntitlementCategory where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntitlementCategory'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EntitlementCategory'id x__) + (Control.DeepSeq.deepseq + (_EntitlementCategory'name x__) + (Control.DeepSeq.deepseq + (_EntitlementCategory'subCategory x__) + (Control.DeepSeq.deepseq + (_EntitlementCategory'brokerageAssignable x__) ())))) +{- | Fields : + -} +data EntitlementCategoryListRequest + = EntitlementCategoryListRequest'_constructor {_EntitlementCategoryListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntitlementCategoryListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message EntitlementCategoryListRequest where + messageName _ + = Data.Text.pack "common_1.EntitlementCategoryListRequest" + packedMessageDescriptor _ + = "\n\ + \\RSEntitlementCategoryListRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _EntitlementCategoryListRequest'_unknownFields + (\ x__ y__ + -> x__ {_EntitlementCategoryListRequest'_unknownFields = y__}) + defMessage + = EntitlementCategoryListRequest'_constructor + {_EntitlementCategoryListRequest'_unknownFields = []} + parseMessage + = let + loop :: + EntitlementCategoryListRequest + -> Data.ProtoLens.Encoding.Bytes.Parser EntitlementCategoryListRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "EntitlementCategoryListRequest" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData EntitlementCategoryListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntitlementCategoryListRequest'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.constraintType' @:: Lens' EntitlementConstraint Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.refServiceId' @:: Lens' EntitlementConstraint Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'refServiceId' @:: Lens' EntitlementConstraint (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.constraintGroup' @:: Lens' EntitlementConstraint Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'constraintGroup' @:: Lens' EntitlementConstraint (Prelude.Maybe Data.Text.Text)@ -} +data EntitlementConstraint + = EntitlementConstraint'_constructor {_EntitlementConstraint'constraintType :: !Data.Word.Word32, + _EntitlementConstraint'refServiceId :: !(Prelude.Maybe Data.Word.Word32), + _EntitlementConstraint'constraintGroup :: !(Prelude.Maybe Data.Text.Text), + _EntitlementConstraint'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntitlementConstraint where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EntitlementConstraint "constraintType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementConstraint'constraintType + (\ x__ y__ -> x__ {_EntitlementConstraint'constraintType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementConstraint "refServiceId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementConstraint'refServiceId + (\ x__ y__ -> x__ {_EntitlementConstraint'refServiceId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementConstraint "maybe'refServiceId" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementConstraint'refServiceId + (\ x__ y__ -> x__ {_EntitlementConstraint'refServiceId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementConstraint "constraintGroup" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementConstraint'constraintGroup + (\ x__ y__ -> x__ {_EntitlementConstraint'constraintGroup = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementConstraint "maybe'constraintGroup" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementConstraint'constraintGroup + (\ x__ y__ -> x__ {_EntitlementConstraint'constraintGroup = y__})) + Prelude.id +instance Data.ProtoLens.Message EntitlementConstraint where + messageName _ = Data.Text.pack "common_1.EntitlementConstraint" + packedMessageDescriptor _ + = "\n\ + \\NAKEntitlementConstraint\DC2'\n\ + \\SIconstraint_type\CAN\SOH \STX(\rR\SOconstraintType\DC2$\n\ + \\SOref_service_id\CAN\STX \SOH(\rR\frefServiceId\DC2)\n\ + \\DLEconstraint_group\CAN\ETX \SOH(\tR\SIconstraintGroup\"p\n\ + \\EOTType\DC2\v\n\ + \\aEXCLUDE\DLE\SOH\DC2\v\n\ + \\aWARNING\DLE\STX\DC2\SYN\n\ + \\DC2MANDATORY_ONLY_ONE\DLE\ETX\DC2\f\n\ + \\bPICK_ONE\DLE\EOT\DC2\NAK\n\ + \\DC1PRODUCT_WHITELIST\DLE\ENQ\DC2\DC1\n\ + \\rINCLUDE_ITEMS\DLE\ACK" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + constraintType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "constraint_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"constraintType")) :: + Data.ProtoLens.FieldDescriptor EntitlementConstraint + refServiceId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ref_service_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'refServiceId")) :: + Data.ProtoLens.FieldDescriptor EntitlementConstraint + constraintGroup__field_descriptor + = Data.ProtoLens.FieldDescriptor + "constraint_group" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'constraintGroup")) :: + Data.ProtoLens.FieldDescriptor EntitlementConstraint + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, constraintType__field_descriptor), + (Data.ProtoLens.Tag 2, refServiceId__field_descriptor), + (Data.ProtoLens.Tag 3, constraintGroup__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EntitlementConstraint'_unknownFields + (\ x__ y__ -> x__ {_EntitlementConstraint'_unknownFields = y__}) + defMessage + = EntitlementConstraint'_constructor + {_EntitlementConstraint'constraintType = Data.ProtoLens.fieldDefault, + _EntitlementConstraint'refServiceId = Prelude.Nothing, + _EntitlementConstraint'constraintGroup = Prelude.Nothing, + _EntitlementConstraint'_unknownFields = []} + parseMessage + = let + loop :: + EntitlementConstraint + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser EntitlementConstraint + loop x required'constraintType + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'constraintType then + (:) "constraint_type" + else + Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "constraint_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"constraintType") y x) + Prelude.False + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "ref_service_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"refServiceId") y x) + required'constraintType + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "constraint_group" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"constraintGroup") y x) + required'constraintType + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'constraintType + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "EntitlementConstraint" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"constraintType") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'refServiceId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'constraintGroup") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData EntitlementConstraint where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntitlementConstraint'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EntitlementConstraint'constraintType x__) + (Control.DeepSeq.deepseq + (_EntitlementConstraint'refServiceId x__) + (Control.DeepSeq.deepseq + (_EntitlementConstraint'constraintGroup x__) ()))) +data EntitlementConstraint'Type + = EntitlementConstraint'EXCLUDE | + EntitlementConstraint'WARNING | + EntitlementConstraint'MANDATORY_ONLY_ONE | + EntitlementConstraint'PICK_ONE | + EntitlementConstraint'PRODUCT_WHITELIST | + EntitlementConstraint'INCLUDE_ITEMS + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum EntitlementConstraint'Type where + maybeToEnum 1 = Prelude.Just EntitlementConstraint'EXCLUDE + maybeToEnum 2 = Prelude.Just EntitlementConstraint'WARNING + maybeToEnum 3 + = Prelude.Just EntitlementConstraint'MANDATORY_ONLY_ONE + maybeToEnum 4 = Prelude.Just EntitlementConstraint'PICK_ONE + maybeToEnum 5 + = Prelude.Just EntitlementConstraint'PRODUCT_WHITELIST + maybeToEnum 6 = Prelude.Just EntitlementConstraint'INCLUDE_ITEMS + maybeToEnum _ = Prelude.Nothing + showEnum EntitlementConstraint'EXCLUDE = "EXCLUDE" + showEnum EntitlementConstraint'WARNING = "WARNING" + showEnum EntitlementConstraint'MANDATORY_ONLY_ONE + = "MANDATORY_ONLY_ONE" + showEnum EntitlementConstraint'PICK_ONE = "PICK_ONE" + showEnum EntitlementConstraint'PRODUCT_WHITELIST + = "PRODUCT_WHITELIST" + showEnum EntitlementConstraint'INCLUDE_ITEMS = "INCLUDE_ITEMS" + readEnum k + | (Prelude.==) k "EXCLUDE" + = Prelude.Just EntitlementConstraint'EXCLUDE + | (Prelude.==) k "WARNING" + = Prelude.Just EntitlementConstraint'WARNING + | (Prelude.==) k "MANDATORY_ONLY_ONE" + = Prelude.Just EntitlementConstraint'MANDATORY_ONLY_ONE + | (Prelude.==) k "PICK_ONE" + = Prelude.Just EntitlementConstraint'PICK_ONE + | (Prelude.==) k "PRODUCT_WHITELIST" + = Prelude.Just EntitlementConstraint'PRODUCT_WHITELIST + | (Prelude.==) k "INCLUDE_ITEMS" + = Prelude.Just EntitlementConstraint'INCLUDE_ITEMS + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded EntitlementConstraint'Type where + minBound = EntitlementConstraint'EXCLUDE + maxBound = EntitlementConstraint'INCLUDE_ITEMS +instance Prelude.Enum EntitlementConstraint'Type where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum Type: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum EntitlementConstraint'EXCLUDE = 1 + fromEnum EntitlementConstraint'WARNING = 2 + fromEnum EntitlementConstraint'MANDATORY_ONLY_ONE = 3 + fromEnum EntitlementConstraint'PICK_ONE = 4 + fromEnum EntitlementConstraint'PRODUCT_WHITELIST = 5 + fromEnum EntitlementConstraint'INCLUDE_ITEMS = 6 + succ EntitlementConstraint'INCLUDE_ITEMS + = Prelude.error + "EntitlementConstraint'Type.succ: bad argument EntitlementConstraint'INCLUDE_ITEMS. This value would be out of bounds." + succ EntitlementConstraint'EXCLUDE = EntitlementConstraint'WARNING + succ EntitlementConstraint'WARNING + = EntitlementConstraint'MANDATORY_ONLY_ONE + succ EntitlementConstraint'MANDATORY_ONLY_ONE + = EntitlementConstraint'PICK_ONE + succ EntitlementConstraint'PICK_ONE + = EntitlementConstraint'PRODUCT_WHITELIST + succ EntitlementConstraint'PRODUCT_WHITELIST + = EntitlementConstraint'INCLUDE_ITEMS + pred EntitlementConstraint'EXCLUDE + = Prelude.error + "EntitlementConstraint'Type.pred: bad argument EntitlementConstraint'EXCLUDE. This value would be out of bounds." + pred EntitlementConstraint'WARNING = EntitlementConstraint'EXCLUDE + pred EntitlementConstraint'MANDATORY_ONLY_ONE + = EntitlementConstraint'WARNING + pred EntitlementConstraint'PICK_ONE + = EntitlementConstraint'MANDATORY_ONLY_ONE + pred EntitlementConstraint'PRODUCT_WHITELIST + = EntitlementConstraint'PICK_ONE + pred EntitlementConstraint'INCLUDE_ITEMS + = EntitlementConstraint'PRODUCT_WHITELIST + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault EntitlementConstraint'Type where + fieldDefault = EntitlementConstraint'EXCLUDE +instance Control.DeepSeq.NFData EntitlementConstraint'Type where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.id' @:: Lens' EntitlementService Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.name' @:: Lens' EntitlementService Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.categoryId' @:: Lens' EntitlementService [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'categoryId' @:: Lens' EntitlementService (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.price' @:: Lens' EntitlementService [Price]@ + * 'Proto.CMS.Common1_Fields.vec'price' @:: Lens' EntitlementService (Data.Vector.Vector Price)@ + * 'Proto.CMS.Common1_Fields.description' @:: Lens' EntitlementService Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.authorizationType' @:: Lens' EntitlementService Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.constraint' @:: Lens' EntitlementService [EntitlementConstraint]@ + * 'Proto.CMS.Common1_Fields.vec'constraint' @:: Lens' EntitlementService (Data.Vector.Vector EntitlementConstraint)@ + * 'Proto.CMS.Common1_Fields.obsoleteAgreementRequired' @:: Lens' EntitlementService Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteAgreementRequired' @:: Lens' EntitlementService (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.obsoleteAgreement' @:: Lens' EntitlementService Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteAgreement' @:: Lens' EntitlementService (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Common1_Fields.subscriberType' @:: Lens' EntitlementService Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'subscriberType' @:: Lens' EntitlementService (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.billingBrokerageRequired' @:: Lens' EntitlementService Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'billingBrokerageRequired' @:: Lens' EntitlementService (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.loginDomains' @:: Lens' EntitlementService [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'loginDomains' @:: Lens' EntitlementService (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.options' @:: Lens' EntitlementService [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'options' @:: Lens' EntitlementService (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.items' @:: Lens' EntitlementService [EntitlementServiceItem]@ + * 'Proto.CMS.Common1_Fields.vec'items' @:: Lens' EntitlementService (Data.Vector.Vector EntitlementServiceItem)@ + * 'Proto.CMS.Common1_Fields.brokerageAssignable' @:: Lens' EntitlementService Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'brokerageAssignable' @:: Lens' EntitlementService (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.brokerageAuthorizationRequired' @:: Lens' EntitlementService Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'brokerageAuthorizationRequired' @:: Lens' EntitlementService (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.default'' @:: Lens' EntitlementService Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'default'' @:: Lens' EntitlementService (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.visibleByCqgOnly' @:: Lens' EntitlementService Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'visibleByCqgOnly' @:: Lens' EntitlementService (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.contractType' @:: Lens' EntitlementService Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'contractType' @:: Lens' EntitlementService (Prelude.Maybe Data.Text.Text)@ -} +data EntitlementService + = EntitlementService'_constructor {_EntitlementService'id :: !Data.Word.Word32, + _EntitlementService'name :: !Proto.Common.Shared1.Text, + _EntitlementService'categoryId :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _EntitlementService'price :: !(Data.Vector.Vector Price), + _EntitlementService'description :: !Proto.Common.Shared1.Text, + _EntitlementService'authorizationType :: !Data.Word.Word32, + _EntitlementService'constraint :: !(Data.Vector.Vector EntitlementConstraint), + _EntitlementService'obsoleteAgreementRequired :: !(Prelude.Maybe Prelude.Bool), + _EntitlementService'obsoleteAgreement :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _EntitlementService'subscriberType :: !(Prelude.Maybe Data.Word.Word32), + _EntitlementService'billingBrokerageRequired :: !(Prelude.Maybe Prelude.Bool), + _EntitlementService'loginDomains :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _EntitlementService'options :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _EntitlementService'items :: !(Data.Vector.Vector EntitlementServiceItem), + _EntitlementService'brokerageAssignable :: !(Prelude.Maybe Prelude.Bool), + _EntitlementService'brokerageAuthorizationRequired :: !(Prelude.Maybe Prelude.Bool), + _EntitlementService'default' :: !(Prelude.Maybe Prelude.Bool), + _EntitlementService'visibleByCqgOnly :: !(Prelude.Maybe Prelude.Bool), + _EntitlementService'contractType :: !(Prelude.Maybe Data.Text.Text), + _EntitlementService'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntitlementService where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EntitlementService "id" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'id + (\ x__ y__ -> x__ {_EntitlementService'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'name + (\ x__ y__ -> x__ {_EntitlementService'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "categoryId" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'categoryId + (\ x__ y__ -> x__ {_EntitlementService'categoryId = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EntitlementService "vec'categoryId" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'categoryId + (\ x__ y__ -> x__ {_EntitlementService'categoryId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "price" [Price] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'price + (\ x__ y__ -> x__ {_EntitlementService'price = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EntitlementService "vec'price" (Data.Vector.Vector Price) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'price + (\ x__ y__ -> x__ {_EntitlementService'price = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "description" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'description + (\ x__ y__ -> x__ {_EntitlementService'description = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "authorizationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'authorizationType + (\ x__ y__ -> x__ {_EntitlementService'authorizationType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "constraint" [EntitlementConstraint] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'constraint + (\ x__ y__ -> x__ {_EntitlementService'constraint = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EntitlementService "vec'constraint" (Data.Vector.Vector EntitlementConstraint) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'constraint + (\ x__ y__ -> x__ {_EntitlementService'constraint = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "obsoleteAgreementRequired" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'obsoleteAgreementRequired + (\ x__ y__ + -> x__ {_EntitlementService'obsoleteAgreementRequired = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementService "maybe'obsoleteAgreementRequired" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'obsoleteAgreementRequired + (\ x__ y__ + -> x__ {_EntitlementService'obsoleteAgreementRequired = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "obsoleteAgreement" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'obsoleteAgreement + (\ x__ y__ -> x__ {_EntitlementService'obsoleteAgreement = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField EntitlementService "maybe'obsoleteAgreement" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'obsoleteAgreement + (\ x__ y__ -> x__ {_EntitlementService'obsoleteAgreement = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "subscriberType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'subscriberType + (\ x__ y__ -> x__ {_EntitlementService'subscriberType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementService "maybe'subscriberType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'subscriberType + (\ x__ y__ -> x__ {_EntitlementService'subscriberType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "billingBrokerageRequired" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'billingBrokerageRequired + (\ x__ y__ + -> x__ {_EntitlementService'billingBrokerageRequired = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementService "maybe'billingBrokerageRequired" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'billingBrokerageRequired + (\ x__ y__ + -> x__ {_EntitlementService'billingBrokerageRequired = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "loginDomains" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'loginDomains + (\ x__ y__ -> x__ {_EntitlementService'loginDomains = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EntitlementService "vec'loginDomains" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'loginDomains + (\ x__ y__ -> x__ {_EntitlementService'loginDomains = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "options" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'options + (\ x__ y__ -> x__ {_EntitlementService'options = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EntitlementService "vec'options" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'options + (\ x__ y__ -> x__ {_EntitlementService'options = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "items" [EntitlementServiceItem] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'items + (\ x__ y__ -> x__ {_EntitlementService'items = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EntitlementService "vec'items" (Data.Vector.Vector EntitlementServiceItem) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'items + (\ x__ y__ -> x__ {_EntitlementService'items = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "brokerageAssignable" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'brokerageAssignable + (\ x__ y__ -> x__ {_EntitlementService'brokerageAssignable = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementService "maybe'brokerageAssignable" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'brokerageAssignable + (\ x__ y__ -> x__ {_EntitlementService'brokerageAssignable = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "brokerageAuthorizationRequired" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'brokerageAuthorizationRequired + (\ x__ y__ + -> x__ {_EntitlementService'brokerageAuthorizationRequired = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementService "maybe'brokerageAuthorizationRequired" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'brokerageAuthorizationRequired + (\ x__ y__ + -> x__ {_EntitlementService'brokerageAuthorizationRequired = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "default'" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'default' + (\ x__ y__ -> x__ {_EntitlementService'default' = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementService "maybe'default'" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'default' + (\ x__ y__ -> x__ {_EntitlementService'default' = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "visibleByCqgOnly" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'visibleByCqgOnly + (\ x__ y__ -> x__ {_EntitlementService'visibleByCqgOnly = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementService "maybe'visibleByCqgOnly" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'visibleByCqgOnly + (\ x__ y__ -> x__ {_EntitlementService'visibleByCqgOnly = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementService "contractType" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'contractType + (\ x__ y__ -> x__ {_EntitlementService'contractType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementService "maybe'contractType" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementService'contractType + (\ x__ y__ -> x__ {_EntitlementService'contractType = y__})) + Prelude.id +instance Data.ProtoLens.Message EntitlementService where + messageName _ = Data.Text.pack "common_1.EntitlementService" + packedMessageDescriptor _ + = "\n\ + \\DC2EntitlementService\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \STX(\v2\SO.shared_1.TextR\EOTname\DC2\US\n\ + \\vcategory_id\CAN\ETX \ETX(\rR\n\ + \categoryId\DC2%\n\ + \\ENQprice\CAN\EOT \ETX(\v2\SI.common_1.PriceR\ENQprice\DC20\n\ + \\vdescription\CAN\ENQ \STX(\v2\SO.shared_1.TextR\vdescription\DC2-\n\ + \\DC2authorization_type\CAN\ACK \STX(\rR\DC1authorizationType\DC2?\n\ + \\n\ + \constraint\CAN\a \ETX(\v2\US.common_1.EntitlementConstraintR\n\ + \constraint\DC2B\n\ + \\ESCobsolete_agreement_required\CAN\b \SOH(\bR\EMobsoleteAgreementRequiredB\STX\CAN\SOH\DC2A\n\ + \\DC2obsolete_agreement\CAN\t \SOH(\v2\SO.shared_1.TextR\DC1obsoleteAgreementB\STX\CAN\SOH\DC2'\n\ + \\SIsubscriber_type\CAN\n\ + \ \SOH(\rR\SOsubscriberType\DC2<\n\ + \\SUBbilling_brokerage_required\CAN\v \SOH(\bR\CANbillingBrokerageRequired\DC2#\n\ + \\rlogin_domains\CAN\f \ETX(\rR\floginDomains\DC2\CAN\n\ + \\aoptions\CAN\r \ETX(\rR\aoptions\DC26\n\ + \\ENQitems\CAN\SO \ETX(\v2 .common_1.EntitlementServiceItemR\ENQitems\DC21\n\ + \\DC4brokerage_assignable\CAN\SI \SOH(\bR\DC3brokerageAssignable\DC2H\n\ + \ brokerage_authorization_required\CAN\DLE \SOH(\bR\RSbrokerageAuthorizationRequired\DC2\CAN\n\ + \\adefault\CAN\DC1 \SOH(\bR\adefault\DC2-\n\ + \\DC3visible_by_cqg_only\CAN\DC2 \SOH(\bR\DLEvisibleByCqgOnly\DC2#\n\ + \\rcontract_type\CAN\DC3 \SOH(\tR\fcontractType\"W\n\ + \\DC1AuthorizationType\DC2\DLE\n\ + \\fDISABLE_ONLY\DLE\SOH\DC2\r\n\ + \\tVIEW_ONLY\DLE\STX\DC2\SI\n\ + \\vENABLE_ONLY\DLE\ETX\DC2\DLE\n\ + \\fFULL_CONTROL\DLE\EOT\";\n\ + \\rServiceOption\DC2\DC4\n\ + \\DLEONLY_FOR_TRADERS\DLE\SOH\DC2\DC4\n\ + \\DLEFREE_FOR_TRADERS\DLE\STX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"id")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"name")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + categoryId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "category_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"categoryId")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + price__field_descriptor + = Data.ProtoLens.FieldDescriptor + "price" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Price) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"price")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + description__field_descriptor + = Data.ProtoLens.FieldDescriptor + "description" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"description")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + authorizationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "authorization_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"authorizationType")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + constraint__field_descriptor + = Data.ProtoLens.FieldDescriptor + "constraint" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EntitlementConstraint) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"constraint")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + obsoleteAgreementRequired__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_agreement_required" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteAgreementRequired")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + obsoleteAgreement__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_agreement" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteAgreement")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + subscriberType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "subscriber_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'subscriberType")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + billingBrokerageRequired__field_descriptor + = Data.ProtoLens.FieldDescriptor + "billing_brokerage_required" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'billingBrokerageRequired")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + loginDomains__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_domains" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"loginDomains")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + options__field_descriptor + = Data.ProtoLens.FieldDescriptor + "options" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"options")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + items__field_descriptor + = Data.ProtoLens.FieldDescriptor + "items" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EntitlementServiceItem) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"items")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + brokerageAssignable__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_assignable" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageAssignable")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + brokerageAuthorizationRequired__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_authorization_required" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'brokerageAuthorizationRequired")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + default'__field_descriptor + = Data.ProtoLens.FieldDescriptor + "default" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'default'")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + visibleByCqgOnly__field_descriptor + = Data.ProtoLens.FieldDescriptor + "visible_by_cqg_only" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'visibleByCqgOnly")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + contractType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractType")) :: + Data.ProtoLens.FieldDescriptor EntitlementService + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, categoryId__field_descriptor), + (Data.ProtoLens.Tag 4, price__field_descriptor), + (Data.ProtoLens.Tag 5, description__field_descriptor), + (Data.ProtoLens.Tag 6, authorizationType__field_descriptor), + (Data.ProtoLens.Tag 7, constraint__field_descriptor), + (Data.ProtoLens.Tag 8, + obsoleteAgreementRequired__field_descriptor), + (Data.ProtoLens.Tag 9, obsoleteAgreement__field_descriptor), + (Data.ProtoLens.Tag 10, subscriberType__field_descriptor), + (Data.ProtoLens.Tag 11, + billingBrokerageRequired__field_descriptor), + (Data.ProtoLens.Tag 12, loginDomains__field_descriptor), + (Data.ProtoLens.Tag 13, options__field_descriptor), + (Data.ProtoLens.Tag 14, items__field_descriptor), + (Data.ProtoLens.Tag 15, brokerageAssignable__field_descriptor), + (Data.ProtoLens.Tag 16, + brokerageAuthorizationRequired__field_descriptor), + (Data.ProtoLens.Tag 17, default'__field_descriptor), + (Data.ProtoLens.Tag 18, visibleByCqgOnly__field_descriptor), + (Data.ProtoLens.Tag 19, contractType__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EntitlementService'_unknownFields + (\ x__ y__ -> x__ {_EntitlementService'_unknownFields = y__}) + defMessage + = EntitlementService'_constructor + {_EntitlementService'id = Data.ProtoLens.fieldDefault, + _EntitlementService'name = Data.ProtoLens.defMessage, + _EntitlementService'categoryId = Data.Vector.Generic.empty, + _EntitlementService'price = Data.Vector.Generic.empty, + _EntitlementService'description = Data.ProtoLens.defMessage, + _EntitlementService'authorizationType = Data.ProtoLens.fieldDefault, + _EntitlementService'constraint = Data.Vector.Generic.empty, + _EntitlementService'obsoleteAgreementRequired = Prelude.Nothing, + _EntitlementService'obsoleteAgreement = Prelude.Nothing, + _EntitlementService'subscriberType = Prelude.Nothing, + _EntitlementService'billingBrokerageRequired = Prelude.Nothing, + _EntitlementService'loginDomains = Data.Vector.Generic.empty, + _EntitlementService'options = Data.Vector.Generic.empty, + _EntitlementService'items = Data.Vector.Generic.empty, + _EntitlementService'brokerageAssignable = Prelude.Nothing, + _EntitlementService'brokerageAuthorizationRequired = Prelude.Nothing, + _EntitlementService'default' = Prelude.Nothing, + _EntitlementService'visibleByCqgOnly = Prelude.Nothing, + _EntitlementService'contractType = Prelude.Nothing, + _EntitlementService'_unknownFields = []} + parseMessage + = let + loop :: + EntitlementService + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld EntitlementConstraint + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld EntitlementServiceItem + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Price + -> Data.ProtoLens.Encoding.Bytes.Parser EntitlementService + loop + x + required'authorizationType + required'description + required'id + required'name + mutable'categoryId + mutable'constraint + mutable'items + mutable'loginDomains + mutable'options + mutable'price + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'categoryId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'categoryId) + frozen'constraint <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'constraint) + frozen'items <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'items) + frozen'loginDomains <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'loginDomains) + frozen'options <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'options) + frozen'price <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'price) + (let + missing + = (if required'authorizationType then + (:) "authorization_type" + else + Prelude.id) + ((if required'description then (:) "description" else Prelude.id) + ((if required'id then (:) "id" else Prelude.id) + ((if required'name then (:) "name" else Prelude.id) []))) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'categoryId") frozen'categoryId + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'constraint") frozen'constraint + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'items") frozen'items + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'loginDomains") + frozen'loginDomains + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'options") frozen'options + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'price") frozen'price + x))))))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + required'authorizationType required'description Prelude.False + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + required'authorizationType required'description required'id + Prelude.False mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 24 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "category_id" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'categoryId y) + loop + x required'authorizationType required'description required'id + required'name v mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 26 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "category_id" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'categoryId) + loop + x required'authorizationType required'description required'id + required'name y mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "price" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'price y) + loop + x required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options v + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "description" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"description") y x) + required'authorizationType Prelude.False required'id required'name + mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "authorization_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"authorizationType") y x) + Prelude.False required'description required'id required'name + mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 58 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "constraint" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'constraint y) + loop + x required'authorizationType required'description required'id + required'name mutable'categoryId v mutable'items + mutable'loginDomains mutable'options mutable'price + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_agreement_required" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteAgreementRequired") y x) + required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_agreement" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteAgreement") y x) + required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 80 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "subscriber_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"subscriberType") y x) + required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 88 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "billing_brokerage_required" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"billingBrokerageRequired") y x) + required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 96 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "login_domains" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'loginDomains y) + loop + x required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + v mutable'options mutable'price + 98 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "login_domains" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'loginDomains) + loop + x required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + y mutable'options mutable'price + 104 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "options" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'options y) + loop + x required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains v mutable'price + 106 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "options" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'options) + loop + x required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains y mutable'price + 114 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "items" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'items y) + loop + x required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint v + mutable'loginDomains mutable'options mutable'price + 120 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "brokerage_assignable" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAssignable") y x) + required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 128 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "brokerage_authorization_required" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAuthorizationRequired") + y x) + required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 136 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "default" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"default'") y x) + required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 144 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "visible_by_cqg_only" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"visibleByCqgOnly") y x) + required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + 154 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractType") y x) + required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'authorizationType required'description required'id + required'name mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'categoryId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'constraint <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'items <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'loginDomains <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'options <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'price <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True + Prelude.True mutable'categoryId mutable'constraint mutable'items + mutable'loginDomains mutable'options mutable'price) + "EntitlementService" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"id") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view (Data.ProtoLens.Field.field @"name") _x))) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'categoryId") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'price") _x)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view + (Data.ProtoLens.Field.field @"description") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"authorizationType") _x))) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'constraint") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteAgreementRequired") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteAgreement") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'subscriberType") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 80) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'billingBrokerageRequired") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 96) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'loginDomains") + _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 104) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'options") + _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'items") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'brokerageAssignable") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 120) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'brokerageAuthorizationRequired") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 128) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'default'") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 136) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'visibleByCqgOnly") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 144) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'contractType") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 154) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))))))) +instance Control.DeepSeq.NFData EntitlementService where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntitlementService'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EntitlementService'id x__) + (Control.DeepSeq.deepseq + (_EntitlementService'name x__) + (Control.DeepSeq.deepseq + (_EntitlementService'categoryId x__) + (Control.DeepSeq.deepseq + (_EntitlementService'price x__) + (Control.DeepSeq.deepseq + (_EntitlementService'description x__) + (Control.DeepSeq.deepseq + (_EntitlementService'authorizationType x__) + (Control.DeepSeq.deepseq + (_EntitlementService'constraint x__) + (Control.DeepSeq.deepseq + (_EntitlementService'obsoleteAgreementRequired x__) + (Control.DeepSeq.deepseq + (_EntitlementService'obsoleteAgreement x__) + (Control.DeepSeq.deepseq + (_EntitlementService'subscriberType x__) + (Control.DeepSeq.deepseq + (_EntitlementService'billingBrokerageRequired x__) + (Control.DeepSeq.deepseq + (_EntitlementService'loginDomains x__) + (Control.DeepSeq.deepseq + (_EntitlementService'options x__) + (Control.DeepSeq.deepseq + (_EntitlementService'items x__) + (Control.DeepSeq.deepseq + (_EntitlementService'brokerageAssignable + x__) + (Control.DeepSeq.deepseq + (_EntitlementService'brokerageAuthorizationRequired + x__) + (Control.DeepSeq.deepseq + (_EntitlementService'default' x__) + (Control.DeepSeq.deepseq + (_EntitlementService'visibleByCqgOnly + x__) + (Control.DeepSeq.deepseq + (_EntitlementService'contractType + x__) + ()))))))))))))))))))) +data EntitlementService'AuthorizationType + = EntitlementService'DISABLE_ONLY | + EntitlementService'VIEW_ONLY | + EntitlementService'ENABLE_ONLY | + EntitlementService'FULL_CONTROL + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum EntitlementService'AuthorizationType where + maybeToEnum 1 = Prelude.Just EntitlementService'DISABLE_ONLY + maybeToEnum 2 = Prelude.Just EntitlementService'VIEW_ONLY + maybeToEnum 3 = Prelude.Just EntitlementService'ENABLE_ONLY + maybeToEnum 4 = Prelude.Just EntitlementService'FULL_CONTROL + maybeToEnum _ = Prelude.Nothing + showEnum EntitlementService'DISABLE_ONLY = "DISABLE_ONLY" + showEnum EntitlementService'VIEW_ONLY = "VIEW_ONLY" + showEnum EntitlementService'ENABLE_ONLY = "ENABLE_ONLY" + showEnum EntitlementService'FULL_CONTROL = "FULL_CONTROL" + readEnum k + | (Prelude.==) k "DISABLE_ONLY" + = Prelude.Just EntitlementService'DISABLE_ONLY + | (Prelude.==) k "VIEW_ONLY" + = Prelude.Just EntitlementService'VIEW_ONLY + | (Prelude.==) k "ENABLE_ONLY" + = Prelude.Just EntitlementService'ENABLE_ONLY + | (Prelude.==) k "FULL_CONTROL" + = Prelude.Just EntitlementService'FULL_CONTROL + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded EntitlementService'AuthorizationType where + minBound = EntitlementService'DISABLE_ONLY + maxBound = EntitlementService'FULL_CONTROL +instance Prelude.Enum EntitlementService'AuthorizationType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum AuthorizationType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum EntitlementService'DISABLE_ONLY = 1 + fromEnum EntitlementService'VIEW_ONLY = 2 + fromEnum EntitlementService'ENABLE_ONLY = 3 + fromEnum EntitlementService'FULL_CONTROL = 4 + succ EntitlementService'FULL_CONTROL + = Prelude.error + "EntitlementService'AuthorizationType.succ: bad argument EntitlementService'FULL_CONTROL. This value would be out of bounds." + succ EntitlementService'DISABLE_ONLY = EntitlementService'VIEW_ONLY + succ EntitlementService'VIEW_ONLY = EntitlementService'ENABLE_ONLY + succ EntitlementService'ENABLE_ONLY + = EntitlementService'FULL_CONTROL + pred EntitlementService'DISABLE_ONLY + = Prelude.error + "EntitlementService'AuthorizationType.pred: bad argument EntitlementService'DISABLE_ONLY. This value would be out of bounds." + pred EntitlementService'VIEW_ONLY = EntitlementService'DISABLE_ONLY + pred EntitlementService'ENABLE_ONLY = EntitlementService'VIEW_ONLY + pred EntitlementService'FULL_CONTROL + = EntitlementService'ENABLE_ONLY + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault EntitlementService'AuthorizationType where + fieldDefault = EntitlementService'DISABLE_ONLY +instance Control.DeepSeq.NFData EntitlementService'AuthorizationType where + rnf x__ = Prelude.seq x__ () +data EntitlementService'ServiceOption + = EntitlementService'ONLY_FOR_TRADERS | + EntitlementService'FREE_FOR_TRADERS + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum EntitlementService'ServiceOption where + maybeToEnum 1 = Prelude.Just EntitlementService'ONLY_FOR_TRADERS + maybeToEnum 2 = Prelude.Just EntitlementService'FREE_FOR_TRADERS + maybeToEnum _ = Prelude.Nothing + showEnum EntitlementService'ONLY_FOR_TRADERS = "ONLY_FOR_TRADERS" + showEnum EntitlementService'FREE_FOR_TRADERS = "FREE_FOR_TRADERS" + readEnum k + | (Prelude.==) k "ONLY_FOR_TRADERS" + = Prelude.Just EntitlementService'ONLY_FOR_TRADERS + | (Prelude.==) k "FREE_FOR_TRADERS" + = Prelude.Just EntitlementService'FREE_FOR_TRADERS + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded EntitlementService'ServiceOption where + minBound = EntitlementService'ONLY_FOR_TRADERS + maxBound = EntitlementService'FREE_FOR_TRADERS +instance Prelude.Enum EntitlementService'ServiceOption where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum ServiceOption: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum EntitlementService'ONLY_FOR_TRADERS = 1 + fromEnum EntitlementService'FREE_FOR_TRADERS = 2 + succ EntitlementService'FREE_FOR_TRADERS + = Prelude.error + "EntitlementService'ServiceOption.succ: bad argument EntitlementService'FREE_FOR_TRADERS. This value would be out of bounds." + succ EntitlementService'ONLY_FOR_TRADERS + = EntitlementService'FREE_FOR_TRADERS + pred EntitlementService'ONLY_FOR_TRADERS + = Prelude.error + "EntitlementService'ServiceOption.pred: bad argument EntitlementService'ONLY_FOR_TRADERS. This value would be out of bounds." + pred EntitlementService'FREE_FOR_TRADERS + = EntitlementService'ONLY_FOR_TRADERS + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault EntitlementService'ServiceOption where + fieldDefault = EntitlementService'ONLY_FOR_TRADERS +instance Control.DeepSeq.NFData EntitlementService'ServiceOption where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.id' @:: Lens' EntitlementServiceItem Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'id' @:: Lens' EntitlementServiceItem (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.type'' @:: Lens' EntitlementServiceItem EntitlementServiceItemType@ + * 'Proto.CMS.Common1_Fields.maybe'type'' @:: Lens' EntitlementServiceItem (Prelude.Maybe EntitlementServiceItemType)@ + * 'Proto.CMS.Common1_Fields.name' @:: Lens' EntitlementServiceItem Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.maybe'name' @:: Lens' EntitlementServiceItem (Prelude.Maybe Proto.Common.Shared1.Text)@ -} +data EntitlementServiceItem + = EntitlementServiceItem'_constructor {_EntitlementServiceItem'id :: !(Prelude.Maybe Data.Text.Text), + _EntitlementServiceItem'type' :: !(Prelude.Maybe EntitlementServiceItemType), + _EntitlementServiceItem'name :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _EntitlementServiceItem'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntitlementServiceItem where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EntitlementServiceItem "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItem'id + (\ x__ y__ -> x__ {_EntitlementServiceItem'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementServiceItem "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItem'id + (\ x__ y__ -> x__ {_EntitlementServiceItem'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementServiceItem "type'" EntitlementServiceItemType where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItem'type' + (\ x__ y__ -> x__ {_EntitlementServiceItem'type' = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField EntitlementServiceItem "maybe'type'" (Prelude.Maybe EntitlementServiceItemType) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItem'type' + (\ x__ y__ -> x__ {_EntitlementServiceItem'type' = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementServiceItem "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItem'name + (\ x__ y__ -> x__ {_EntitlementServiceItem'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField EntitlementServiceItem "maybe'name" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItem'name + (\ x__ y__ -> x__ {_EntitlementServiceItem'name = y__})) + Prelude.id +instance Data.ProtoLens.Message EntitlementServiceItem where + messageName _ = Data.Text.pack "common_1.EntitlementServiceItem" + packedMessageDescriptor _ + = "\n\ + \\SYNEntitlementServiceItem\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC28\n\ + \\EOTtype\CAN\STX \SOH(\v2$.common_1.EntitlementServiceItemTypeR\EOTtype\DC2\"\n\ + \\EOTname\CAN\ETX \SOH(\v2\SO.shared_1.TextR\EOTname" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor EntitlementServiceItem + type'__field_descriptor + = Data.ProtoLens.FieldDescriptor + "type" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EntitlementServiceItemType) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'type'")) :: + Data.ProtoLens.FieldDescriptor EntitlementServiceItem + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor EntitlementServiceItem + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, type'__field_descriptor), + (Data.ProtoLens.Tag 3, name__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EntitlementServiceItem'_unknownFields + (\ x__ y__ -> x__ {_EntitlementServiceItem'_unknownFields = y__}) + defMessage + = EntitlementServiceItem'_constructor + {_EntitlementServiceItem'id = Prelude.Nothing, + _EntitlementServiceItem'type' = Prelude.Nothing, + _EntitlementServiceItem'name = Prelude.Nothing, + _EntitlementServiceItem'_unknownFields = []} + parseMessage + = let + loop :: + EntitlementServiceItem + -> Data.ProtoLens.Encoding.Bytes.Parser EntitlementServiceItem + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "type" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"type'") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "EntitlementServiceItem" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'type'") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData EntitlementServiceItem where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntitlementServiceItem'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EntitlementServiceItem'id x__) + (Control.DeepSeq.deepseq + (_EntitlementServiceItem'type' x__) + (Control.DeepSeq.deepseq (_EntitlementServiceItem'name x__) ()))) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.id' @:: Lens' EntitlementServiceItemType Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'id' @:: Lens' EntitlementServiceItemType (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.name' @:: Lens' EntitlementServiceItemType Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.maybe'name' @:: Lens' EntitlementServiceItemType (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Common1_Fields.description' @:: Lens' EntitlementServiceItemType Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.maybe'description' @:: Lens' EntitlementServiceItemType (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Common1_Fields.isMarketData' @:: Lens' EntitlementServiceItemType Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'isMarketData' @:: Lens' EntitlementServiceItemType (Prelude.Maybe Prelude.Bool)@ -} +data EntitlementServiceItemType + = EntitlementServiceItemType'_constructor {_EntitlementServiceItemType'id :: !(Prelude.Maybe Data.Text.Text), + _EntitlementServiceItemType'name :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _EntitlementServiceItemType'description :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _EntitlementServiceItemType'isMarketData :: !(Prelude.Maybe Prelude.Bool), + _EntitlementServiceItemType'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntitlementServiceItemType where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EntitlementServiceItemType "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItemType'id + (\ x__ y__ -> x__ {_EntitlementServiceItemType'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementServiceItemType "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItemType'id + (\ x__ y__ -> x__ {_EntitlementServiceItemType'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementServiceItemType "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItemType'name + (\ x__ y__ -> x__ {_EntitlementServiceItemType'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField EntitlementServiceItemType "maybe'name" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItemType'name + (\ x__ y__ -> x__ {_EntitlementServiceItemType'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementServiceItemType "description" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItemType'description + (\ x__ y__ -> x__ {_EntitlementServiceItemType'description = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField EntitlementServiceItemType "maybe'description" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItemType'description + (\ x__ y__ -> x__ {_EntitlementServiceItemType'description = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementServiceItemType "isMarketData" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItemType'isMarketData + (\ x__ y__ + -> x__ {_EntitlementServiceItemType'isMarketData = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntitlementServiceItemType "maybe'isMarketData" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceItemType'isMarketData + (\ x__ y__ + -> x__ {_EntitlementServiceItemType'isMarketData = y__})) + Prelude.id +instance Data.ProtoLens.Message EntitlementServiceItemType where + messageName _ + = Data.Text.pack "common_1.EntitlementServiceItemType" + packedMessageDescriptor _ + = "\n\ + \\SUBEntitlementServiceItemType\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname\DC20\n\ + \\vdescription\CAN\ETX \SOH(\v2\SO.shared_1.TextR\vdescription\DC2$\n\ + \\SOis_market_data\CAN\EOT \SOH(\bR\fisMarketData" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor EntitlementServiceItemType + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor EntitlementServiceItemType + description__field_descriptor + = Data.ProtoLens.FieldDescriptor + "description" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'description")) :: + Data.ProtoLens.FieldDescriptor EntitlementServiceItemType + isMarketData__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_market_data" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isMarketData")) :: + Data.ProtoLens.FieldDescriptor EntitlementServiceItemType + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, description__field_descriptor), + (Data.ProtoLens.Tag 4, isMarketData__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EntitlementServiceItemType'_unknownFields + (\ x__ y__ + -> x__ {_EntitlementServiceItemType'_unknownFields = y__}) + defMessage + = EntitlementServiceItemType'_constructor + {_EntitlementServiceItemType'id = Prelude.Nothing, + _EntitlementServiceItemType'name = Prelude.Nothing, + _EntitlementServiceItemType'description = Prelude.Nothing, + _EntitlementServiceItemType'isMarketData = Prelude.Nothing, + _EntitlementServiceItemType'_unknownFields = []} + parseMessage + = let + loop :: + EntitlementServiceItemType + -> Data.ProtoLens.Encoding.Bytes.Parser EntitlementServiceItemType + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "description" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"description") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_market_data" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"isMarketData") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "EntitlementServiceItemType" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'description") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isMarketData") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData EntitlementServiceItemType where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntitlementServiceItemType'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EntitlementServiceItemType'id x__) + (Control.DeepSeq.deepseq + (_EntitlementServiceItemType'name x__) + (Control.DeepSeq.deepseq + (_EntitlementServiceItemType'description x__) + (Control.DeepSeq.deepseq + (_EntitlementServiceItemType'isMarketData x__) ())))) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.brokerageId' @:: Lens' EntitlementServiceListRequest [Data.Text.Text]@ + * 'Proto.CMS.Common1_Fields.vec'brokerageId' @:: Lens' EntitlementServiceListRequest (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.includeRetired' @:: Lens' EntitlementServiceListRequest Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'includeRetired' @:: Lens' EntitlementServiceListRequest (Prelude.Maybe Prelude.Bool)@ -} +data EntitlementServiceListRequest + = EntitlementServiceListRequest'_constructor {_EntitlementServiceListRequest'brokerageId :: !(Data.Vector.Vector Data.Text.Text), + _EntitlementServiceListRequest'includeRetired :: !(Prelude.Maybe Prelude.Bool), + _EntitlementServiceListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntitlementServiceListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EntitlementServiceListRequest "brokerageId" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceListRequest'brokerageId + (\ x__ y__ + -> x__ {_EntitlementServiceListRequest'brokerageId = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EntitlementServiceListRequest "vec'brokerageId" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceListRequest'brokerageId + (\ x__ y__ + -> x__ {_EntitlementServiceListRequest'brokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntitlementServiceListRequest "includeRetired" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceListRequest'includeRetired + (\ x__ y__ + -> x__ {_EntitlementServiceListRequest'includeRetired = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField EntitlementServiceListRequest "maybe'includeRetired" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceListRequest'includeRetired + (\ x__ y__ + -> x__ {_EntitlementServiceListRequest'includeRetired = y__})) + Prelude.id +instance Data.ProtoLens.Message EntitlementServiceListRequest where + messageName _ + = Data.Text.pack "common_1.EntitlementServiceListRequest" + packedMessageDescriptor _ + = "\n\ + \\GSEntitlementServiceListRequest\DC2!\n\ + \\fbrokerage_id\CAN\SOH \ETX(\tR\vbrokerageId\DC2.\n\ + \\SIinclude_retired\CAN\STX \SOH(\b:\ENQfalseR\SOincludeRetired" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + brokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"brokerageId")) :: + Data.ProtoLens.FieldDescriptor EntitlementServiceListRequest + includeRetired__field_descriptor + = Data.ProtoLens.FieldDescriptor + "include_retired" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'includeRetired")) :: + Data.ProtoLens.FieldDescriptor EntitlementServiceListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, brokerageId__field_descriptor), + (Data.ProtoLens.Tag 2, includeRetired__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EntitlementServiceListRequest'_unknownFields + (\ x__ y__ + -> x__ {_EntitlementServiceListRequest'_unknownFields = y__}) + defMessage + = EntitlementServiceListRequest'_constructor + {_EntitlementServiceListRequest'brokerageId = Data.Vector.Generic.empty, + _EntitlementServiceListRequest'includeRetired = Prelude.Nothing, + _EntitlementServiceListRequest'_unknownFields = []} + parseMessage + = let + loop :: + EntitlementServiceListRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser EntitlementServiceListRequest + loop x mutable'brokerageId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'brokerageId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'brokerageId) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'brokerageId") frozen'brokerageId + x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_id" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'brokerageId y) + loop x v + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "include_retired" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"includeRetired") y x) + mutable'brokerageId + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'brokerageId + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'brokerageId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'brokerageId) + "EntitlementServiceListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'brokerageId") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'includeRetired") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData EntitlementServiceListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntitlementServiceListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EntitlementServiceListRequest'brokerageId x__) + (Control.DeepSeq.deepseq + (_EntitlementServiceListRequest'includeRetired x__) ())) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.entitlementServiceId' @:: Lens' EntitlementServiceRequest Data.Word.Word32@ -} +data EntitlementServiceRequest + = EntitlementServiceRequest'_constructor {_EntitlementServiceRequest'entitlementServiceId :: !Data.Word.Word32, + _EntitlementServiceRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntitlementServiceRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EntitlementServiceRequest "entitlementServiceId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementServiceRequest'entitlementServiceId + (\ x__ y__ + -> x__ {_EntitlementServiceRequest'entitlementServiceId = y__})) + Prelude.id +instance Data.ProtoLens.Message EntitlementServiceRequest where + messageName _ = Data.Text.pack "common_1.EntitlementServiceRequest" + packedMessageDescriptor _ + = "\n\ + \\EMEntitlementServiceRequest\DC24\n\ + \\SYNentitlement_service_id\CAN\SOH \STX(\rR\DC4entitlementServiceId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + entitlementServiceId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_service_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"entitlementServiceId")) :: + Data.ProtoLens.FieldDescriptor EntitlementServiceRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, entitlementServiceId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EntitlementServiceRequest'_unknownFields + (\ x__ y__ + -> x__ {_EntitlementServiceRequest'_unknownFields = y__}) + defMessage + = EntitlementServiceRequest'_constructor + {_EntitlementServiceRequest'entitlementServiceId = Data.ProtoLens.fieldDefault, + _EntitlementServiceRequest'_unknownFields = []} + parseMessage + = let + loop :: + EntitlementServiceRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser EntitlementServiceRequest + loop x required'entitlementServiceId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'entitlementServiceId then + (:) "entitlement_service_id" + else + Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "entitlement_service_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"entitlementServiceId") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'entitlementServiceId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "EntitlementServiceRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"entitlementServiceId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData EntitlementServiceRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntitlementServiceRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EntitlementServiceRequest'entitlementServiceId x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.entityId' @:: Lens' EntityDataRequest Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'entityId' @:: Lens' EntityDataRequest (Prelude.Maybe Data.Text.Text)@ -} +data EntityDataRequest + = EntityDataRequest'_constructor {_EntityDataRequest'entityId :: !(Prelude.Maybe Data.Text.Text), + _EntityDataRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntityDataRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EntityDataRequest "entityId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntityDataRequest'entityId + (\ x__ y__ -> x__ {_EntityDataRequest'entityId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntityDataRequest "maybe'entityId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntityDataRequest'entityId + (\ x__ y__ -> x__ {_EntityDataRequest'entityId = y__})) + Prelude.id +instance Data.ProtoLens.Message EntityDataRequest where + messageName _ = Data.Text.pack "common_1.EntityDataRequest" + packedMessageDescriptor _ + = "\n\ + \\DC1EntityDataRequest\DC2\ESC\n\ + \\tentity_id\CAN\SOH \SOH(\tR\bentityId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + entityId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entity_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'entityId")) :: + Data.ProtoLens.FieldDescriptor EntityDataRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, entityId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EntityDataRequest'_unknownFields + (\ x__ y__ -> x__ {_EntityDataRequest'_unknownFields = y__}) + defMessage + = EntityDataRequest'_constructor + {_EntityDataRequest'entityId = Prelude.Nothing, + _EntityDataRequest'_unknownFields = []} + parseMessage + = let + loop :: + EntityDataRequest + -> Data.ProtoLens.Encoding.Bytes.Parser EntityDataRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "entity_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"entityId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "EntityDataRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'entityId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData EntityDataRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntityDataRequest'_unknownFields x__) + (Control.DeepSeq.deepseq (_EntityDataRequest'entityId x__) ()) +data EntityType + = ENTITY_TYPE_ACCOUNT | + ENTITY_TYPE_ORDER | + ENTITY_TYPE_LOGIN | + ENTITY_TYPE_PROFILE | + ENTITY_TYPE_LEGAL_DOCUMENT + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum EntityType where + maybeToEnum 1 = Prelude.Just ENTITY_TYPE_ACCOUNT + maybeToEnum 2 = Prelude.Just ENTITY_TYPE_ORDER + maybeToEnum 3 = Prelude.Just ENTITY_TYPE_LOGIN + maybeToEnum 4 = Prelude.Just ENTITY_TYPE_PROFILE + maybeToEnum 5 = Prelude.Just ENTITY_TYPE_LEGAL_DOCUMENT + maybeToEnum _ = Prelude.Nothing + showEnum ENTITY_TYPE_ACCOUNT = "ENTITY_TYPE_ACCOUNT" + showEnum ENTITY_TYPE_ORDER = "ENTITY_TYPE_ORDER" + showEnum ENTITY_TYPE_LOGIN = "ENTITY_TYPE_LOGIN" + showEnum ENTITY_TYPE_PROFILE = "ENTITY_TYPE_PROFILE" + showEnum ENTITY_TYPE_LEGAL_DOCUMENT = "ENTITY_TYPE_LEGAL_DOCUMENT" + readEnum k + | (Prelude.==) k "ENTITY_TYPE_ACCOUNT" + = Prelude.Just ENTITY_TYPE_ACCOUNT + | (Prelude.==) k "ENTITY_TYPE_ORDER" + = Prelude.Just ENTITY_TYPE_ORDER + | (Prelude.==) k "ENTITY_TYPE_LOGIN" + = Prelude.Just ENTITY_TYPE_LOGIN + | (Prelude.==) k "ENTITY_TYPE_PROFILE" + = Prelude.Just ENTITY_TYPE_PROFILE + | (Prelude.==) k "ENTITY_TYPE_LEGAL_DOCUMENT" + = Prelude.Just ENTITY_TYPE_LEGAL_DOCUMENT + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded EntityType where + minBound = ENTITY_TYPE_ACCOUNT + maxBound = ENTITY_TYPE_LEGAL_DOCUMENT +instance Prelude.Enum EntityType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum EntityType: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum ENTITY_TYPE_ACCOUNT = 1 + fromEnum ENTITY_TYPE_ORDER = 2 + fromEnum ENTITY_TYPE_LOGIN = 3 + fromEnum ENTITY_TYPE_PROFILE = 4 + fromEnum ENTITY_TYPE_LEGAL_DOCUMENT = 5 + succ ENTITY_TYPE_LEGAL_DOCUMENT + = Prelude.error + "EntityType.succ: bad argument ENTITY_TYPE_LEGAL_DOCUMENT. This value would be out of bounds." + succ ENTITY_TYPE_ACCOUNT = ENTITY_TYPE_ORDER + succ ENTITY_TYPE_ORDER = ENTITY_TYPE_LOGIN + succ ENTITY_TYPE_LOGIN = ENTITY_TYPE_PROFILE + succ ENTITY_TYPE_PROFILE = ENTITY_TYPE_LEGAL_DOCUMENT + pred ENTITY_TYPE_ACCOUNT + = Prelude.error + "EntityType.pred: bad argument ENTITY_TYPE_ACCOUNT. This value would be out of bounds." + pred ENTITY_TYPE_ORDER = ENTITY_TYPE_ACCOUNT + pred ENTITY_TYPE_LOGIN = ENTITY_TYPE_ORDER + pred ENTITY_TYPE_PROFILE = ENTITY_TYPE_LOGIN + pred ENTITY_TYPE_LEGAL_DOCUMENT = ENTITY_TYPE_PROFILE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault EntityType where + fieldDefault = ENTITY_TYPE_ACCOUNT +instance Control.DeepSeq.NFData EntityType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginId' @:: Lens' EraseCurrentCredentials Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'loginId' @:: Lens' EraseCurrentCredentials (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.credentialTypes' @:: Lens' EraseCurrentCredentials [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'credentialTypes' @:: Lens' EraseCurrentCredentials (Data.Vector.Unboxed.Vector Data.Word.Word32)@ -} +data EraseCurrentCredentials + = EraseCurrentCredentials'_constructor {_EraseCurrentCredentials'loginId :: !(Prelude.Maybe Data.Text.Text), + _EraseCurrentCredentials'credentialTypes :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _EraseCurrentCredentials'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EraseCurrentCredentials where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EraseCurrentCredentials "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EraseCurrentCredentials'loginId + (\ x__ y__ -> x__ {_EraseCurrentCredentials'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EraseCurrentCredentials "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EraseCurrentCredentials'loginId + (\ x__ y__ -> x__ {_EraseCurrentCredentials'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EraseCurrentCredentials "credentialTypes" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EraseCurrentCredentials'credentialTypes + (\ x__ y__ + -> x__ {_EraseCurrentCredentials'credentialTypes = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EraseCurrentCredentials "vec'credentialTypes" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EraseCurrentCredentials'credentialTypes + (\ x__ y__ + -> x__ {_EraseCurrentCredentials'credentialTypes = y__})) + Prelude.id +instance Data.ProtoLens.Message EraseCurrentCredentials where + messageName _ = Data.Text.pack "common_1.EraseCurrentCredentials" + packedMessageDescriptor _ + = "\n\ + \\ETBEraseCurrentCredentials\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2)\n\ + \\DLEcredential_types\CAN\STX \ETX(\rR\SIcredentialTypes" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor EraseCurrentCredentials + credentialTypes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "credential_types" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"credentialTypes")) :: + Data.ProtoLens.FieldDescriptor EraseCurrentCredentials + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor), + (Data.ProtoLens.Tag 2, credentialTypes__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EraseCurrentCredentials'_unknownFields + (\ x__ y__ -> x__ {_EraseCurrentCredentials'_unknownFields = y__}) + defMessage + = EraseCurrentCredentials'_constructor + {_EraseCurrentCredentials'loginId = Prelude.Nothing, + _EraseCurrentCredentials'credentialTypes = Data.Vector.Generic.empty, + _EraseCurrentCredentials'_unknownFields = []} + parseMessage + = let + loop :: + EraseCurrentCredentials + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser EraseCurrentCredentials + loop x mutable'credentialTypes + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'credentialTypes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'credentialTypes) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'credentialTypes") + frozen'credentialTypes x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + mutable'credentialTypes + 16 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "credential_types" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'credentialTypes y) + loop x v + 18 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "credential_types" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'credentialTypes) + loop x y + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'credentialTypes + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'credentialTypes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'credentialTypes) + "EraseCurrentCredentials" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'credentialTypes") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData EraseCurrentCredentials where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EraseCurrentCredentials'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EraseCurrentCredentials'loginId x__) + (Control.DeepSeq.deepseq + (_EraseCurrentCredentials'credentialTypes x__) ())) +{- | Fields : + -} +data EraseCurrentCredentialsResult + = EraseCurrentCredentialsResult'_constructor {_EraseCurrentCredentialsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EraseCurrentCredentialsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message EraseCurrentCredentialsResult where + messageName _ + = Data.Text.pack "common_1.EraseCurrentCredentialsResult" + packedMessageDescriptor _ + = "\n\ + \\GSEraseCurrentCredentialsResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _EraseCurrentCredentialsResult'_unknownFields + (\ x__ y__ + -> x__ {_EraseCurrentCredentialsResult'_unknownFields = y__}) + defMessage + = EraseCurrentCredentialsResult'_constructor + {_EraseCurrentCredentialsResult'_unknownFields = []} + parseMessage + = let + loop :: + EraseCurrentCredentialsResult + -> Data.ProtoLens.Encoding.Bytes.Parser EraseCurrentCredentialsResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "EraseCurrentCredentialsResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData EraseCurrentCredentialsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EraseCurrentCredentialsResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.partnerId' @:: Lens' ExternalAuth Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'partnerId' @:: Lens' ExternalAuth (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.username' @:: Lens' ExternalAuth Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'username' @:: Lens' ExternalAuth (Prelude.Maybe Data.Text.Text)@ -} +data ExternalAuth + = ExternalAuth'_constructor {_ExternalAuth'partnerId :: !(Prelude.Maybe Data.Text.Text), + _ExternalAuth'username :: !(Prelude.Maybe Data.Text.Text), + _ExternalAuth'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ExternalAuth where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ExternalAuth "partnerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExternalAuth'partnerId + (\ x__ y__ -> x__ {_ExternalAuth'partnerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ExternalAuth "maybe'partnerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExternalAuth'partnerId + (\ x__ y__ -> x__ {_ExternalAuth'partnerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ExternalAuth "username" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExternalAuth'username + (\ x__ y__ -> x__ {_ExternalAuth'username = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ExternalAuth "maybe'username" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExternalAuth'username + (\ x__ y__ -> x__ {_ExternalAuth'username = y__})) + Prelude.id +instance Data.ProtoLens.Message ExternalAuth where + messageName _ = Data.Text.pack "common_1.ExternalAuth" + packedMessageDescriptor _ + = "\n\ + \\fExternalAuth\DC2\GS\n\ + \\n\ + \partner_id\CAN\SOH \SOH(\tR\tpartnerId\DC2\SUB\n\ + \\busername\CAN\STX \SOH(\tR\busername" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + partnerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "partner_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'partnerId")) :: + Data.ProtoLens.FieldDescriptor ExternalAuth + username__field_descriptor + = Data.ProtoLens.FieldDescriptor + "username" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'username")) :: + Data.ProtoLens.FieldDescriptor ExternalAuth + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, partnerId__field_descriptor), + (Data.ProtoLens.Tag 2, username__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ExternalAuth'_unknownFields + (\ x__ y__ -> x__ {_ExternalAuth'_unknownFields = y__}) + defMessage + = ExternalAuth'_constructor + {_ExternalAuth'partnerId = Prelude.Nothing, + _ExternalAuth'username = Prelude.Nothing, + _ExternalAuth'_unknownFields = []} + parseMessage + = let + loop :: + ExternalAuth -> Data.ProtoLens.Encoding.Bytes.Parser ExternalAuth + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "partner_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"partnerId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "username" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"username") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ExternalAuth" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'partnerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'username") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData ExternalAuth where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ExternalAuth'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ExternalAuth'partnerId x__) + (Control.DeepSeq.deepseq (_ExternalAuth'username x__) ())) +data InternalEntityType + = INTERNAL_ENTITY_TYPE_ACCOUNT | + INTERNAL_ENTITY_TYPE_ORDER | + INTERNAL_ENTITY_TYPE_TRADER | + INTERNAL_ENTITY_TYPE_CUSTOMER | + INTERNAL_ENTITY_TYPE_SYSTEM | + INTERNAL_ENTITY_TYPE_CAST_USER | + INTERNAL_ENTITY_TYPE_SALES_SERIES | + INTERNAL_ENTITY_TYPE_FCM | + INTERNAL_ENTITY_TYPE_ROUTE_GROUP | + INTERNAL_ENTITY_TYPE_EXCHANGE | + INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum InternalEntityType where + maybeToEnum 1 = Prelude.Just INTERNAL_ENTITY_TYPE_ACCOUNT + maybeToEnum 2 = Prelude.Just INTERNAL_ENTITY_TYPE_ORDER + maybeToEnum 3 = Prelude.Just INTERNAL_ENTITY_TYPE_TRADER + maybeToEnum 4 = Prelude.Just INTERNAL_ENTITY_TYPE_CUSTOMER + maybeToEnum 5 = Prelude.Just INTERNAL_ENTITY_TYPE_SYSTEM + maybeToEnum 6 = Prelude.Just INTERNAL_ENTITY_TYPE_CAST_USER + maybeToEnum 7 = Prelude.Just INTERNAL_ENTITY_TYPE_SALES_SERIES + maybeToEnum 8 = Prelude.Just INTERNAL_ENTITY_TYPE_FCM + maybeToEnum 9 = Prelude.Just INTERNAL_ENTITY_TYPE_ROUTE_GROUP + maybeToEnum 10 = Prelude.Just INTERNAL_ENTITY_TYPE_EXCHANGE + maybeToEnum 11 + = Prelude.Just INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE + maybeToEnum _ = Prelude.Nothing + showEnum INTERNAL_ENTITY_TYPE_ACCOUNT + = "INTERNAL_ENTITY_TYPE_ACCOUNT" + showEnum INTERNAL_ENTITY_TYPE_ORDER = "INTERNAL_ENTITY_TYPE_ORDER" + showEnum INTERNAL_ENTITY_TYPE_TRADER + = "INTERNAL_ENTITY_TYPE_TRADER" + showEnum INTERNAL_ENTITY_TYPE_CUSTOMER + = "INTERNAL_ENTITY_TYPE_CUSTOMER" + showEnum INTERNAL_ENTITY_TYPE_SYSTEM + = "INTERNAL_ENTITY_TYPE_SYSTEM" + showEnum INTERNAL_ENTITY_TYPE_CAST_USER + = "INTERNAL_ENTITY_TYPE_CAST_USER" + showEnum INTERNAL_ENTITY_TYPE_SALES_SERIES + = "INTERNAL_ENTITY_TYPE_SALES_SERIES" + showEnum INTERNAL_ENTITY_TYPE_FCM = "INTERNAL_ENTITY_TYPE_FCM" + showEnum INTERNAL_ENTITY_TYPE_ROUTE_GROUP + = "INTERNAL_ENTITY_TYPE_ROUTE_GROUP" + showEnum INTERNAL_ENTITY_TYPE_EXCHANGE + = "INTERNAL_ENTITY_TYPE_EXCHANGE" + showEnum INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE + = "INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE" + readEnum k + | (Prelude.==) k "INTERNAL_ENTITY_TYPE_ACCOUNT" + = Prelude.Just INTERNAL_ENTITY_TYPE_ACCOUNT + | (Prelude.==) k "INTERNAL_ENTITY_TYPE_ORDER" + = Prelude.Just INTERNAL_ENTITY_TYPE_ORDER + | (Prelude.==) k "INTERNAL_ENTITY_TYPE_TRADER" + = Prelude.Just INTERNAL_ENTITY_TYPE_TRADER + | (Prelude.==) k "INTERNAL_ENTITY_TYPE_CUSTOMER" + = Prelude.Just INTERNAL_ENTITY_TYPE_CUSTOMER + | (Prelude.==) k "INTERNAL_ENTITY_TYPE_SYSTEM" + = Prelude.Just INTERNAL_ENTITY_TYPE_SYSTEM + | (Prelude.==) k "INTERNAL_ENTITY_TYPE_CAST_USER" + = Prelude.Just INTERNAL_ENTITY_TYPE_CAST_USER + | (Prelude.==) k "INTERNAL_ENTITY_TYPE_SALES_SERIES" + = Prelude.Just INTERNAL_ENTITY_TYPE_SALES_SERIES + | (Prelude.==) k "INTERNAL_ENTITY_TYPE_FCM" + = Prelude.Just INTERNAL_ENTITY_TYPE_FCM + | (Prelude.==) k "INTERNAL_ENTITY_TYPE_ROUTE_GROUP" + = Prelude.Just INTERNAL_ENTITY_TYPE_ROUTE_GROUP + | (Prelude.==) k "INTERNAL_ENTITY_TYPE_EXCHANGE" + = Prelude.Just INTERNAL_ENTITY_TYPE_EXCHANGE + | (Prelude.==) k "INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE" + = Prelude.Just INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded InternalEntityType where + minBound = INTERNAL_ENTITY_TYPE_ACCOUNT + maxBound = INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE +instance Prelude.Enum InternalEntityType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum InternalEntityType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum INTERNAL_ENTITY_TYPE_ACCOUNT = 1 + fromEnum INTERNAL_ENTITY_TYPE_ORDER = 2 + fromEnum INTERNAL_ENTITY_TYPE_TRADER = 3 + fromEnum INTERNAL_ENTITY_TYPE_CUSTOMER = 4 + fromEnum INTERNAL_ENTITY_TYPE_SYSTEM = 5 + fromEnum INTERNAL_ENTITY_TYPE_CAST_USER = 6 + fromEnum INTERNAL_ENTITY_TYPE_SALES_SERIES = 7 + fromEnum INTERNAL_ENTITY_TYPE_FCM = 8 + fromEnum INTERNAL_ENTITY_TYPE_ROUTE_GROUP = 9 + fromEnum INTERNAL_ENTITY_TYPE_EXCHANGE = 10 + fromEnum INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE = 11 + succ INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE + = Prelude.error + "InternalEntityType.succ: bad argument INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE. This value would be out of bounds." + succ INTERNAL_ENTITY_TYPE_ACCOUNT = INTERNAL_ENTITY_TYPE_ORDER + succ INTERNAL_ENTITY_TYPE_ORDER = INTERNAL_ENTITY_TYPE_TRADER + succ INTERNAL_ENTITY_TYPE_TRADER = INTERNAL_ENTITY_TYPE_CUSTOMER + succ INTERNAL_ENTITY_TYPE_CUSTOMER = INTERNAL_ENTITY_TYPE_SYSTEM + succ INTERNAL_ENTITY_TYPE_SYSTEM = INTERNAL_ENTITY_TYPE_CAST_USER + succ INTERNAL_ENTITY_TYPE_CAST_USER + = INTERNAL_ENTITY_TYPE_SALES_SERIES + succ INTERNAL_ENTITY_TYPE_SALES_SERIES = INTERNAL_ENTITY_TYPE_FCM + succ INTERNAL_ENTITY_TYPE_FCM = INTERNAL_ENTITY_TYPE_ROUTE_GROUP + succ INTERNAL_ENTITY_TYPE_ROUTE_GROUP + = INTERNAL_ENTITY_TYPE_EXCHANGE + succ INTERNAL_ENTITY_TYPE_EXCHANGE + = INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE + pred INTERNAL_ENTITY_TYPE_ACCOUNT + = Prelude.error + "InternalEntityType.pred: bad argument INTERNAL_ENTITY_TYPE_ACCOUNT. This value would be out of bounds." + pred INTERNAL_ENTITY_TYPE_ORDER = INTERNAL_ENTITY_TYPE_ACCOUNT + pred INTERNAL_ENTITY_TYPE_TRADER = INTERNAL_ENTITY_TYPE_ORDER + pred INTERNAL_ENTITY_TYPE_CUSTOMER = INTERNAL_ENTITY_TYPE_TRADER + pred INTERNAL_ENTITY_TYPE_SYSTEM = INTERNAL_ENTITY_TYPE_CUSTOMER + pred INTERNAL_ENTITY_TYPE_CAST_USER = INTERNAL_ENTITY_TYPE_SYSTEM + pred INTERNAL_ENTITY_TYPE_SALES_SERIES + = INTERNAL_ENTITY_TYPE_CAST_USER + pred INTERNAL_ENTITY_TYPE_FCM = INTERNAL_ENTITY_TYPE_SALES_SERIES + pred INTERNAL_ENTITY_TYPE_ROUTE_GROUP = INTERNAL_ENTITY_TYPE_FCM + pred INTERNAL_ENTITY_TYPE_EXCHANGE + = INTERNAL_ENTITY_TYPE_ROUTE_GROUP + pred INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE + = INTERNAL_ENTITY_TYPE_EXCHANGE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault InternalEntityType where + fieldDefault = INTERNAL_ENTITY_TYPE_ACCOUNT +instance Control.DeepSeq.NFData InternalEntityType where + rnf x__ = Prelude.seq x__ () +data LegalType + = INDIVIDUAL | JOINT | LIMITED | TRUST | CORPORATE | PARTNERSHIP + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum LegalType where + maybeToEnum 1 = Prelude.Just INDIVIDUAL + maybeToEnum 2 = Prelude.Just JOINT + maybeToEnum 3 = Prelude.Just LIMITED + maybeToEnum 4 = Prelude.Just TRUST + maybeToEnum 5 = Prelude.Just CORPORATE + maybeToEnum 6 = Prelude.Just PARTNERSHIP + maybeToEnum _ = Prelude.Nothing + showEnum INDIVIDUAL = "INDIVIDUAL" + showEnum JOINT = "JOINT" + showEnum LIMITED = "LIMITED" + showEnum TRUST = "TRUST" + showEnum CORPORATE = "CORPORATE" + showEnum PARTNERSHIP = "PARTNERSHIP" + readEnum k + | (Prelude.==) k "INDIVIDUAL" = Prelude.Just INDIVIDUAL + | (Prelude.==) k "JOINT" = Prelude.Just JOINT + | (Prelude.==) k "LIMITED" = Prelude.Just LIMITED + | (Prelude.==) k "TRUST" = Prelude.Just TRUST + | (Prelude.==) k "CORPORATE" = Prelude.Just CORPORATE + | (Prelude.==) k "PARTNERSHIP" = Prelude.Just PARTNERSHIP + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded LegalType where + minBound = INDIVIDUAL + maxBound = PARTNERSHIP +instance Prelude.Enum LegalType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum LegalType: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum INDIVIDUAL = 1 + fromEnum JOINT = 2 + fromEnum LIMITED = 3 + fromEnum TRUST = 4 + fromEnum CORPORATE = 5 + fromEnum PARTNERSHIP = 6 + succ PARTNERSHIP + = Prelude.error + "LegalType.succ: bad argument PARTNERSHIP. This value would be out of bounds." + succ INDIVIDUAL = JOINT + succ JOINT = LIMITED + succ LIMITED = TRUST + succ TRUST = CORPORATE + succ CORPORATE = PARTNERSHIP + pred INDIVIDUAL + = Prelude.error + "LegalType.pred: bad argument INDIVIDUAL. This value would be out of bounds." + pred JOINT = INDIVIDUAL + pred LIMITED = JOINT + pred TRUST = LIMITED + pred CORPORATE = TRUST + pred PARTNERSHIP = CORPORATE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault LegalType where + fieldDefault = INDIVIDUAL +instance Control.DeepSeq.NFData LegalType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.id' @:: Lens' LinkedEntityListRequest Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'id' @:: Lens' LinkedEntityListRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.top' @:: Lens' LinkedEntityListRequest Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'top' @:: Lens' LinkedEntityListRequest (Prelude.Maybe Data.Word.Word32)@ -} +data LinkedEntityListRequest + = LinkedEntityListRequest'_constructor {_LinkedEntityListRequest'id :: !(Prelude.Maybe Data.Text.Text), + _LinkedEntityListRequest'top :: !(Prelude.Maybe Data.Word.Word32), + _LinkedEntityListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LinkedEntityListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LinkedEntityListRequest "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkedEntityListRequest'id + (\ x__ y__ -> x__ {_LinkedEntityListRequest'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LinkedEntityListRequest "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkedEntityListRequest'id + (\ x__ y__ -> x__ {_LinkedEntityListRequest'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LinkedEntityListRequest "top" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkedEntityListRequest'top + (\ x__ y__ -> x__ {_LinkedEntityListRequest'top = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LinkedEntityListRequest "maybe'top" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkedEntityListRequest'top + (\ x__ y__ -> x__ {_LinkedEntityListRequest'top = y__})) + Prelude.id +instance Data.ProtoLens.Message LinkedEntityListRequest where + messageName _ = Data.Text.pack "common_1.LinkedEntityListRequest" + packedMessageDescriptor _ + = "\n\ + \\ETBLinkedEntityListRequest\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\DLE\n\ + \\ETXtop\CAN\STX \SOH(\rR\ETXtop" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor LinkedEntityListRequest + top__field_descriptor + = Data.ProtoLens.FieldDescriptor + "top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'top")) :: + Data.ProtoLens.FieldDescriptor LinkedEntityListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, top__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LinkedEntityListRequest'_unknownFields + (\ x__ y__ -> x__ {_LinkedEntityListRequest'_unknownFields = y__}) + defMessage + = LinkedEntityListRequest'_constructor + {_LinkedEntityListRequest'id = Prelude.Nothing, + _LinkedEntityListRequest'top = Prelude.Nothing, + _LinkedEntityListRequest'_unknownFields = []} + parseMessage + = let + loop :: + LinkedEntityListRequest + -> Data.ProtoLens.Encoding.Bytes.Parser LinkedEntityListRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "top" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"top") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LinkedEntityListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'top") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData LinkedEntityListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LinkedEntityListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LinkedEntityListRequest'id x__) + (Control.DeepSeq.deepseq (_LinkedEntityListRequest'top x__) ())) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.entities' @:: Lens' LinkedEntityListResult [NamedEntity]@ + * 'Proto.CMS.Common1_Fields.vec'entities' @:: Lens' LinkedEntityListResult (Data.Vector.Vector NamedEntity)@ + * 'Proto.CMS.Common1_Fields.isComplete' @:: Lens' LinkedEntityListResult Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'isComplete' @:: Lens' LinkedEntityListResult (Prelude.Maybe Prelude.Bool)@ -} +data LinkedEntityListResult + = LinkedEntityListResult'_constructor {_LinkedEntityListResult'entities :: !(Data.Vector.Vector NamedEntity), + _LinkedEntityListResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _LinkedEntityListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LinkedEntityListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LinkedEntityListResult "entities" [NamedEntity] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkedEntityListResult'entities + (\ x__ y__ -> x__ {_LinkedEntityListResult'entities = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LinkedEntityListResult "vec'entities" (Data.Vector.Vector NamedEntity) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkedEntityListResult'entities + (\ x__ y__ -> x__ {_LinkedEntityListResult'entities = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LinkedEntityListResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkedEntityListResult'isComplete + (\ x__ y__ -> x__ {_LinkedEntityListResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField LinkedEntityListResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LinkedEntityListResult'isComplete + (\ x__ y__ -> x__ {_LinkedEntityListResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Message LinkedEntityListResult where + messageName _ = Data.Text.pack "common_1.LinkedEntityListResult" + packedMessageDescriptor _ + = "\n\ + \\SYNLinkedEntityListResult\DC21\n\ + \\bentities\CAN\SOH \ETX(\v2\NAK.common_1.NamedEntityR\bentities\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + entities__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entities" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor NamedEntity) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"entities")) :: + Data.ProtoLens.FieldDescriptor LinkedEntityListResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor LinkedEntityListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, entities__field_descriptor), + (Data.ProtoLens.Tag 2, isComplete__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LinkedEntityListResult'_unknownFields + (\ x__ y__ -> x__ {_LinkedEntityListResult'_unknownFields = y__}) + defMessage + = LinkedEntityListResult'_constructor + {_LinkedEntityListResult'entities = Data.Vector.Generic.empty, + _LinkedEntityListResult'isComplete = Prelude.Nothing, + _LinkedEntityListResult'_unknownFields = []} + parseMessage + = let + loop :: + LinkedEntityListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld NamedEntity + -> Data.ProtoLens.Encoding.Bytes.Parser LinkedEntityListResult + loop x mutable'entities + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'entities <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'entities) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'entities") frozen'entities x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "entities" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'entities y) + loop x v + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + mutable'entities + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'entities + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'entities <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'entities) + "LinkedEntityListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'entities") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData LinkedEntityListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LinkedEntityListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LinkedEntityListResult'entities x__) + (Control.DeepSeq.deepseq + (_LinkedEntityListResult'isComplete x__) ())) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.reason' @:: Lens' LoggedOff Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.maybe'reason' @:: Lens' LoggedOff (Prelude.Maybe Proto.Common.Shared1.Text)@ -} +data LoggedOff + = LoggedOff'_constructor {_LoggedOff'reason :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _LoggedOff'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LoggedOff where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LoggedOff "reason" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoggedOff'reason (\ x__ y__ -> x__ {_LoggedOff'reason = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField LoggedOff "maybe'reason" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoggedOff'reason (\ x__ y__ -> x__ {_LoggedOff'reason = y__})) + Prelude.id +instance Data.ProtoLens.Message LoggedOff where + messageName _ = Data.Text.pack "common_1.LoggedOff" + packedMessageDescriptor _ + = "\n\ + \\tLoggedOff\DC2&\n\ + \\ACKreason\CAN\STX \SOH(\v2\SO.shared_1.TextR\ACKreason" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + reason__field_descriptor + = Data.ProtoLens.FieldDescriptor + "reason" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'reason")) :: + Data.ProtoLens.FieldDescriptor LoggedOff + in + Data.Map.fromList + [(Data.ProtoLens.Tag 2, reason__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LoggedOff'_unknownFields + (\ x__ y__ -> x__ {_LoggedOff'_unknownFields = y__}) + defMessage + = LoggedOff'_constructor + {_LoggedOff'reason = Prelude.Nothing, + _LoggedOff'_unknownFields = []} + parseMessage + = let + loop :: LoggedOff -> Data.ProtoLens.Encoding.Bytes.Parser LoggedOff + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "reason" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"reason") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LoggedOff" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'reason") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData LoggedOff where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LoggedOff'_unknownFields x__) + (Control.DeepSeq.deepseq (_LoggedOff'reason x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.accountId' @:: Lens' LoginBillingCustomData Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'accountId' @:: Lens' LoginBillingCustomData (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.billingCustomData' @:: Lens' LoginBillingCustomData [Data.Text.Text]@ + * 'Proto.CMS.Common1_Fields.vec'billingCustomData' @:: Lens' LoginBillingCustomData (Data.Vector.Vector Data.Text.Text)@ -} +data LoginBillingCustomData + = LoginBillingCustomData'_constructor {_LoginBillingCustomData'accountId :: !(Prelude.Maybe Data.Text.Text), + _LoginBillingCustomData'billingCustomData :: !(Data.Vector.Vector Data.Text.Text), + _LoginBillingCustomData'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LoginBillingCustomData where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LoginBillingCustomData "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginBillingCustomData'accountId + (\ x__ y__ -> x__ {_LoginBillingCustomData'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginBillingCustomData "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginBillingCustomData'accountId + (\ x__ y__ -> x__ {_LoginBillingCustomData'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginBillingCustomData "billingCustomData" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginBillingCustomData'billingCustomData + (\ x__ y__ + -> x__ {_LoginBillingCustomData'billingCustomData = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LoginBillingCustomData "vec'billingCustomData" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginBillingCustomData'billingCustomData + (\ x__ y__ + -> x__ {_LoginBillingCustomData'billingCustomData = y__})) + Prelude.id +instance Data.ProtoLens.Message LoginBillingCustomData where + messageName _ = Data.Text.pack "common_1.LoginBillingCustomData" + packedMessageDescriptor _ + = "\n\ + \\SYNLoginBillingCustomData\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2.\n\ + \\DC3billing_custom_data\CAN\STX \ETX(\tR\DC1billingCustomData" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor LoginBillingCustomData + billingCustomData__field_descriptor + = Data.ProtoLens.FieldDescriptor + "billing_custom_data" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"billingCustomData")) :: + Data.ProtoLens.FieldDescriptor LoginBillingCustomData + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, billingCustomData__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LoginBillingCustomData'_unknownFields + (\ x__ y__ -> x__ {_LoginBillingCustomData'_unknownFields = y__}) + defMessage + = LoginBillingCustomData'_constructor + {_LoginBillingCustomData'accountId = Prelude.Nothing, + _LoginBillingCustomData'billingCustomData = Data.Vector.Generic.empty, + _LoginBillingCustomData'_unknownFields = []} + parseMessage + = let + loop :: + LoginBillingCustomData + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser LoginBillingCustomData + loop x mutable'billingCustomData + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'billingCustomData <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'billingCustomData) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'billingCustomData") + frozen'billingCustomData x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + mutable'billingCustomData + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "billing_custom_data" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'billingCustomData y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'billingCustomData + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'billingCustomData <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'billingCustomData) + "LoginBillingCustomData" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'billingCustomData") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData LoginBillingCustomData where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LoginBillingCustomData'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LoginBillingCustomData'accountId x__) + (Control.DeepSeq.deepseq + (_LoginBillingCustomData'billingCustomData x__) ())) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginId' @:: Lens' LoginBillingCustomDataRequest Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'loginId' @:: Lens' LoginBillingCustomDataRequest (Prelude.Maybe Data.Text.Text)@ -} +data LoginBillingCustomDataRequest + = LoginBillingCustomDataRequest'_constructor {_LoginBillingCustomDataRequest'loginId :: !(Prelude.Maybe Data.Text.Text), + _LoginBillingCustomDataRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LoginBillingCustomDataRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LoginBillingCustomDataRequest "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginBillingCustomDataRequest'loginId + (\ x__ y__ -> x__ {_LoginBillingCustomDataRequest'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginBillingCustomDataRequest "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginBillingCustomDataRequest'loginId + (\ x__ y__ -> x__ {_LoginBillingCustomDataRequest'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Message LoginBillingCustomDataRequest where + messageName _ + = Data.Text.pack "common_1.LoginBillingCustomDataRequest" + packedMessageDescriptor _ + = "\n\ + \\GSLoginBillingCustomDataRequest\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor LoginBillingCustomDataRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LoginBillingCustomDataRequest'_unknownFields + (\ x__ y__ + -> x__ {_LoginBillingCustomDataRequest'_unknownFields = y__}) + defMessage + = LoginBillingCustomDataRequest'_constructor + {_LoginBillingCustomDataRequest'loginId = Prelude.Nothing, + _LoginBillingCustomDataRequest'_unknownFields = []} + parseMessage + = let + loop :: + LoginBillingCustomDataRequest + -> Data.ProtoLens.Encoding.Bytes.Parser LoginBillingCustomDataRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LoginBillingCustomDataRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData LoginBillingCustomDataRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LoginBillingCustomDataRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LoginBillingCustomDataRequest'loginId x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginBillingCustomData' @:: Lens' LoginBillingCustomDataResult [LoginBillingCustomData]@ + * 'Proto.CMS.Common1_Fields.vec'loginBillingCustomData' @:: Lens' LoginBillingCustomDataResult (Data.Vector.Vector LoginBillingCustomData)@ -} +data LoginBillingCustomDataResult + = LoginBillingCustomDataResult'_constructor {_LoginBillingCustomDataResult'loginBillingCustomData :: !(Data.Vector.Vector LoginBillingCustomData), + _LoginBillingCustomDataResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LoginBillingCustomDataResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LoginBillingCustomDataResult "loginBillingCustomData" [LoginBillingCustomData] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginBillingCustomDataResult'loginBillingCustomData + (\ x__ y__ + -> x__ + {_LoginBillingCustomDataResult'loginBillingCustomData = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LoginBillingCustomDataResult "vec'loginBillingCustomData" (Data.Vector.Vector LoginBillingCustomData) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginBillingCustomDataResult'loginBillingCustomData + (\ x__ y__ + -> x__ + {_LoginBillingCustomDataResult'loginBillingCustomData = y__})) + Prelude.id +instance Data.ProtoLens.Message LoginBillingCustomDataResult where + messageName _ + = Data.Text.pack "common_1.LoginBillingCustomDataResult" + packedMessageDescriptor _ + = "\n\ + \\FSLoginBillingCustomDataResult\DC2[\n\ + \\EMlogin_billing_custom_data\CAN\SOH \ETX(\v2 .common_1.LoginBillingCustomDataR\SYNloginBillingCustomData" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginBillingCustomData__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_billing_custom_data" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LoginBillingCustomData) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"loginBillingCustomData")) :: + Data.ProtoLens.FieldDescriptor LoginBillingCustomDataResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginBillingCustomData__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LoginBillingCustomDataResult'_unknownFields + (\ x__ y__ + -> x__ {_LoginBillingCustomDataResult'_unknownFields = y__}) + defMessage + = LoginBillingCustomDataResult'_constructor + {_LoginBillingCustomDataResult'loginBillingCustomData = Data.Vector.Generic.empty, + _LoginBillingCustomDataResult'_unknownFields = []} + parseMessage + = let + loop :: + LoginBillingCustomDataResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld LoginBillingCustomData + -> Data.ProtoLens.Encoding.Bytes.Parser LoginBillingCustomDataResult + loop x mutable'loginBillingCustomData + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'loginBillingCustomData <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'loginBillingCustomData) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'loginBillingCustomData") + frozen'loginBillingCustomData x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "login_billing_custom_data" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'loginBillingCustomData y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'loginBillingCustomData + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'loginBillingCustomData <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'loginBillingCustomData) + "LoginBillingCustomDataResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'loginBillingCustomData") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData LoginBillingCustomDataResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LoginBillingCustomDataResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LoginBillingCustomDataResult'loginBillingCustomData x__) ()) +data LoginDomain + = CQG_TRADE_ROUTING | CQG_SYSTEM | CQG_ADMIN + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum LoginDomain where + maybeToEnum 2 = Prelude.Just CQG_TRADE_ROUTING + maybeToEnum 3 = Prelude.Just CQG_SYSTEM + maybeToEnum 4 = Prelude.Just CQG_ADMIN + maybeToEnum _ = Prelude.Nothing + showEnum CQG_TRADE_ROUTING = "CQG_TRADE_ROUTING" + showEnum CQG_SYSTEM = "CQG_SYSTEM" + showEnum CQG_ADMIN = "CQG_ADMIN" + readEnum k + | (Prelude.==) k "CQG_TRADE_ROUTING" + = Prelude.Just CQG_TRADE_ROUTING + | (Prelude.==) k "CQG_SYSTEM" = Prelude.Just CQG_SYSTEM + | (Prelude.==) k "CQG_ADMIN" = Prelude.Just CQG_ADMIN + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded LoginDomain where + minBound = CQG_TRADE_ROUTING + maxBound = CQG_ADMIN +instance Prelude.Enum LoginDomain where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum LoginDomain: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum CQG_TRADE_ROUTING = 2 + fromEnum CQG_SYSTEM = 3 + fromEnum CQG_ADMIN = 4 + succ CQG_ADMIN + = Prelude.error + "LoginDomain.succ: bad argument CQG_ADMIN. This value would be out of bounds." + succ CQG_TRADE_ROUTING = CQG_SYSTEM + succ CQG_SYSTEM = CQG_ADMIN + pred CQG_TRADE_ROUTING + = Prelude.error + "LoginDomain.pred: bad argument CQG_TRADE_ROUTING. This value would be out of bounds." + pred CQG_SYSTEM = CQG_TRADE_ROUTING + pred CQG_ADMIN = CQG_SYSTEM + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault LoginDomain where + fieldDefault = CQG_TRADE_ROUTING +instance Control.DeepSeq.NFData LoginDomain where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginId' @:: Lens' LoginExchangeMemberId Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'loginId' @:: Lens' LoginExchangeMemberId (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.exchangeId' @:: Lens' LoginExchangeMemberId Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'exchangeId' @:: Lens' LoginExchangeMemberId (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.memberId' @:: Lens' LoginExchangeMemberId Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'memberId' @:: Lens' LoginExchangeMemberId (Prelude.Maybe Data.Text.Text)@ -} +data LoginExchangeMemberId + = LoginExchangeMemberId'_constructor {_LoginExchangeMemberId'loginId :: !(Prelude.Maybe Data.Text.Text), + _LoginExchangeMemberId'exchangeId :: !(Prelude.Maybe Data.Text.Text), + _LoginExchangeMemberId'memberId :: !(Prelude.Maybe Data.Text.Text), + _LoginExchangeMemberId'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LoginExchangeMemberId where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LoginExchangeMemberId "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginExchangeMemberId'loginId + (\ x__ y__ -> x__ {_LoginExchangeMemberId'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginExchangeMemberId "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginExchangeMemberId'loginId + (\ x__ y__ -> x__ {_LoginExchangeMemberId'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginExchangeMemberId "exchangeId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginExchangeMemberId'exchangeId + (\ x__ y__ -> x__ {_LoginExchangeMemberId'exchangeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginExchangeMemberId "maybe'exchangeId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginExchangeMemberId'exchangeId + (\ x__ y__ -> x__ {_LoginExchangeMemberId'exchangeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginExchangeMemberId "memberId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginExchangeMemberId'memberId + (\ x__ y__ -> x__ {_LoginExchangeMemberId'memberId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginExchangeMemberId "maybe'memberId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginExchangeMemberId'memberId + (\ x__ y__ -> x__ {_LoginExchangeMemberId'memberId = y__})) + Prelude.id +instance Data.ProtoLens.Message LoginExchangeMemberId where + messageName _ = Data.Text.pack "common_1.LoginExchangeMemberId" + packedMessageDescriptor _ + = "\n\ + \\NAKLoginExchangeMemberId\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2\US\n\ + \\vexchange_id\CAN\STX \SOH(\tR\n\ + \exchangeId\DC2\ESC\n\ + \\tmember_id\CAN\ETX \SOH(\tR\bmemberId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor LoginExchangeMemberId + exchangeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exchange_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'exchangeId")) :: + Data.ProtoLens.FieldDescriptor LoginExchangeMemberId + memberId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "member_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'memberId")) :: + Data.ProtoLens.FieldDescriptor LoginExchangeMemberId + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor), + (Data.ProtoLens.Tag 2, exchangeId__field_descriptor), + (Data.ProtoLens.Tag 3, memberId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LoginExchangeMemberId'_unknownFields + (\ x__ y__ -> x__ {_LoginExchangeMemberId'_unknownFields = y__}) + defMessage + = LoginExchangeMemberId'_constructor + {_LoginExchangeMemberId'loginId = Prelude.Nothing, + _LoginExchangeMemberId'exchangeId = Prelude.Nothing, + _LoginExchangeMemberId'memberId = Prelude.Nothing, + _LoginExchangeMemberId'_unknownFields = []} + parseMessage + = let + loop :: + LoginExchangeMemberId + -> Data.ProtoLens.Encoding.Bytes.Parser LoginExchangeMemberId + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "exchange_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"exchangeId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "member_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"memberId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LoginExchangeMemberId" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'exchangeId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'memberId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData LoginExchangeMemberId where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LoginExchangeMemberId'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LoginExchangeMemberId'loginId x__) + (Control.DeepSeq.deepseq + (_LoginExchangeMemberId'exchangeId x__) + (Control.DeepSeq.deepseq + (_LoginExchangeMemberId'memberId x__) ()))) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginId' @:: Lens' LoginExchangeMemberIdListRequest Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'loginId' @:: Lens' LoginExchangeMemberIdListRequest (Prelude.Maybe Data.Text.Text)@ -} +data LoginExchangeMemberIdListRequest + = LoginExchangeMemberIdListRequest'_constructor {_LoginExchangeMemberIdListRequest'loginId :: !(Prelude.Maybe Data.Text.Text), + _LoginExchangeMemberIdListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LoginExchangeMemberIdListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LoginExchangeMemberIdListRequest "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginExchangeMemberIdListRequest'loginId + (\ x__ y__ + -> x__ {_LoginExchangeMemberIdListRequest'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginExchangeMemberIdListRequest "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginExchangeMemberIdListRequest'loginId + (\ x__ y__ + -> x__ {_LoginExchangeMemberIdListRequest'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Message LoginExchangeMemberIdListRequest where + messageName _ + = Data.Text.pack "common_1.LoginExchangeMemberIdListRequest" + packedMessageDescriptor _ + = "\n\ + \ LoginExchangeMemberIdListRequest\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor LoginExchangeMemberIdListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LoginExchangeMemberIdListRequest'_unknownFields + (\ x__ y__ + -> x__ {_LoginExchangeMemberIdListRequest'_unknownFields = y__}) + defMessage + = LoginExchangeMemberIdListRequest'_constructor + {_LoginExchangeMemberIdListRequest'loginId = Prelude.Nothing, + _LoginExchangeMemberIdListRequest'_unknownFields = []} + parseMessage + = let + loop :: + LoginExchangeMemberIdListRequest + -> Data.ProtoLens.Encoding.Bytes.Parser LoginExchangeMemberIdListRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "LoginExchangeMemberIdListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData LoginExchangeMemberIdListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LoginExchangeMemberIdListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LoginExchangeMemberIdListRequest'loginId x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginMemberIds' @:: Lens' LoginExchangeMemberIdListResult [LoginExchangeMemberId]@ + * 'Proto.CMS.Common1_Fields.vec'loginMemberIds' @:: Lens' LoginExchangeMemberIdListResult (Data.Vector.Vector LoginExchangeMemberId)@ -} +data LoginExchangeMemberIdListResult + = LoginExchangeMemberIdListResult'_constructor {_LoginExchangeMemberIdListResult'loginMemberIds :: !(Data.Vector.Vector LoginExchangeMemberId), + _LoginExchangeMemberIdListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LoginExchangeMemberIdListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LoginExchangeMemberIdListResult "loginMemberIds" [LoginExchangeMemberId] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginExchangeMemberIdListResult'loginMemberIds + (\ x__ y__ + -> x__ {_LoginExchangeMemberIdListResult'loginMemberIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LoginExchangeMemberIdListResult "vec'loginMemberIds" (Data.Vector.Vector LoginExchangeMemberId) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginExchangeMemberIdListResult'loginMemberIds + (\ x__ y__ + -> x__ {_LoginExchangeMemberIdListResult'loginMemberIds = y__})) + Prelude.id +instance Data.ProtoLens.Message LoginExchangeMemberIdListResult where + messageName _ + = Data.Text.pack "common_1.LoginExchangeMemberIdListResult" + packedMessageDescriptor _ + = "\n\ + \\USLoginExchangeMemberIdListResult\DC2I\n\ + \\DLElogin_member_ids\CAN\SOH \ETX(\v2\US.common_1.LoginExchangeMemberIdR\SOloginMemberIds" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginMemberIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_member_ids" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LoginExchangeMemberId) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"loginMemberIds")) :: + Data.ProtoLens.FieldDescriptor LoginExchangeMemberIdListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginMemberIds__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LoginExchangeMemberIdListResult'_unknownFields + (\ x__ y__ + -> x__ {_LoginExchangeMemberIdListResult'_unknownFields = y__}) + defMessage + = LoginExchangeMemberIdListResult'_constructor + {_LoginExchangeMemberIdListResult'loginMemberIds = Data.Vector.Generic.empty, + _LoginExchangeMemberIdListResult'_unknownFields = []} + parseMessage + = let + loop :: + LoginExchangeMemberIdListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld LoginExchangeMemberId + -> Data.ProtoLens.Encoding.Bytes.Parser LoginExchangeMemberIdListResult + loop x mutable'loginMemberIds + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'loginMemberIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'loginMemberIds) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'loginMemberIds") + frozen'loginMemberIds x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "login_member_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'loginMemberIds y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'loginMemberIds + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'loginMemberIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'loginMemberIds) + "LoginExchangeMemberIdListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'loginMemberIds") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData LoginExchangeMemberIdListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LoginExchangeMemberIdListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LoginExchangeMemberIdListResult'loginMemberIds x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.clearedFields' @:: Lens' LoginSettings [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'clearedFields' @:: Lens' LoginSettings (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.loginId' @:: Lens' LoginSettings Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'loginId' @:: Lens' LoginSettings (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.preferredConnectionPointId' @:: Lens' LoginSettings Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'preferredConnectionPointId' @:: Lens' LoginSettings (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.concurrentSessionsNumber' @:: Lens' LoginSettings Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'concurrentSessionsNumber' @:: Lens' LoginSettings (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.passwordNeverExpires' @:: Lens' LoginSettings Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'passwordNeverExpires' @:: Lens' LoginSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.obsoleteIsStrategyRunner' @:: Lens' LoginSettings Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteIsStrategyRunner' @:: Lens' LoginSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.preferredConnectionPointName' @:: Lens' LoginSettings Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'preferredConnectionPointName' @:: Lens' LoginSettings (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.linkedLoginId' @:: Lens' LoginSettings Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'linkedLoginId' @:: Lens' LoginSettings (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.externalAuth' @:: Lens' LoginSettings ExternalAuth@ + * 'Proto.CMS.Common1_Fields.maybe'externalAuth' @:: Lens' LoginSettings (Prelude.Maybe ExternalAuth)@ + * 'Proto.CMS.Common1_Fields.dailyLogonLimit' @:: Lens' LoginSettings Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'dailyLogonLimit' @:: Lens' LoginSettings (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.dailyLogonCount' @:: Lens' LoginSettings Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'dailyLogonCount' @:: Lens' LoginSettings (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.authenticationSystem' @:: Lens' LoginSettings Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'authenticationSystem' @:: Lens' LoginSettings (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.allowExceedAccountLimit' @:: Lens' LoginSettings Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'allowExceedAccountLimit' @:: Lens' LoginSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.onSessionDisconnectAction' @:: Lens' LoginSettings Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'onSessionDisconnectAction' @:: Lens' LoginSettings (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.reconnectTimeoutAfterDisconnect' @:: Lens' LoginSettings Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'reconnectTimeoutAfterDisconnect' @:: Lens' LoginSettings (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.timeZone' @:: Lens' LoginSettings Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'timeZone' @:: Lens' LoginSettings (Prelude.Maybe Data.Text.Text)@ -} +data LoginSettings + = LoginSettings'_constructor {_LoginSettings'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _LoginSettings'loginId :: !(Prelude.Maybe Data.Text.Text), + _LoginSettings'preferredConnectionPointId :: !(Prelude.Maybe Data.Text.Text), + _LoginSettings'concurrentSessionsNumber :: !(Prelude.Maybe Data.Word.Word32), + _LoginSettings'passwordNeverExpires :: !(Prelude.Maybe Prelude.Bool), + _LoginSettings'obsoleteIsStrategyRunner :: !(Prelude.Maybe Prelude.Bool), + _LoginSettings'preferredConnectionPointName :: !(Prelude.Maybe Data.Text.Text), + _LoginSettings'linkedLoginId :: !(Prelude.Maybe Data.Text.Text), + _LoginSettings'externalAuth :: !(Prelude.Maybe ExternalAuth), + _LoginSettings'dailyLogonLimit :: !(Prelude.Maybe Data.Word.Word32), + _LoginSettings'dailyLogonCount :: !(Prelude.Maybe Data.Word.Word32), + _LoginSettings'authenticationSystem :: !(Prelude.Maybe Data.Text.Text), + _LoginSettings'allowExceedAccountLimit :: !(Prelude.Maybe Prelude.Bool), + _LoginSettings'onSessionDisconnectAction :: !(Prelude.Maybe Data.Word.Word32), + _LoginSettings'reconnectTimeoutAfterDisconnect :: !(Prelude.Maybe Data.Word.Word32), + _LoginSettings'timeZone :: !(Prelude.Maybe Data.Text.Text), + _LoginSettings'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LoginSettings where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LoginSettings "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'clearedFields + (\ x__ y__ -> x__ {_LoginSettings'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LoginSettings "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'clearedFields + (\ x__ y__ -> x__ {_LoginSettings'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'loginId + (\ x__ y__ -> x__ {_LoginSettings'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'loginId + (\ x__ y__ -> x__ {_LoginSettings'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "preferredConnectionPointId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'preferredConnectionPointId + (\ x__ y__ + -> x__ {_LoginSettings'preferredConnectionPointId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'preferredConnectionPointId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'preferredConnectionPointId + (\ x__ y__ + -> x__ {_LoginSettings'preferredConnectionPointId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "concurrentSessionsNumber" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'concurrentSessionsNumber + (\ x__ y__ -> x__ {_LoginSettings'concurrentSessionsNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'concurrentSessionsNumber" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'concurrentSessionsNumber + (\ x__ y__ -> x__ {_LoginSettings'concurrentSessionsNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "passwordNeverExpires" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'passwordNeverExpires + (\ x__ y__ -> x__ {_LoginSettings'passwordNeverExpires = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'passwordNeverExpires" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'passwordNeverExpires + (\ x__ y__ -> x__ {_LoginSettings'passwordNeverExpires = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "obsoleteIsStrategyRunner" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'obsoleteIsStrategyRunner + (\ x__ y__ -> x__ {_LoginSettings'obsoleteIsStrategyRunner = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'obsoleteIsStrategyRunner" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'obsoleteIsStrategyRunner + (\ x__ y__ -> x__ {_LoginSettings'obsoleteIsStrategyRunner = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "preferredConnectionPointName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'preferredConnectionPointName + (\ x__ y__ + -> x__ {_LoginSettings'preferredConnectionPointName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'preferredConnectionPointName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'preferredConnectionPointName + (\ x__ y__ + -> x__ {_LoginSettings'preferredConnectionPointName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "linkedLoginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'linkedLoginId + (\ x__ y__ -> x__ {_LoginSettings'linkedLoginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'linkedLoginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'linkedLoginId + (\ x__ y__ -> x__ {_LoginSettings'linkedLoginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "externalAuth" ExternalAuth where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'externalAuth + (\ x__ y__ -> x__ {_LoginSettings'externalAuth = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'externalAuth" (Prelude.Maybe ExternalAuth) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'externalAuth + (\ x__ y__ -> x__ {_LoginSettings'externalAuth = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "dailyLogonLimit" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'dailyLogonLimit + (\ x__ y__ -> x__ {_LoginSettings'dailyLogonLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'dailyLogonLimit" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'dailyLogonLimit + (\ x__ y__ -> x__ {_LoginSettings'dailyLogonLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "dailyLogonCount" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'dailyLogonCount + (\ x__ y__ -> x__ {_LoginSettings'dailyLogonCount = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'dailyLogonCount" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'dailyLogonCount + (\ x__ y__ -> x__ {_LoginSettings'dailyLogonCount = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "authenticationSystem" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'authenticationSystem + (\ x__ y__ -> x__ {_LoginSettings'authenticationSystem = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'authenticationSystem" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'authenticationSystem + (\ x__ y__ -> x__ {_LoginSettings'authenticationSystem = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "allowExceedAccountLimit" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'allowExceedAccountLimit + (\ x__ y__ -> x__ {_LoginSettings'allowExceedAccountLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'allowExceedAccountLimit" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'allowExceedAccountLimit + (\ x__ y__ -> x__ {_LoginSettings'allowExceedAccountLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "onSessionDisconnectAction" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'onSessionDisconnectAction + (\ x__ y__ + -> x__ {_LoginSettings'onSessionDisconnectAction = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'onSessionDisconnectAction" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'onSessionDisconnectAction + (\ x__ y__ + -> x__ {_LoginSettings'onSessionDisconnectAction = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "reconnectTimeoutAfterDisconnect" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'reconnectTimeoutAfterDisconnect + (\ x__ y__ + -> x__ {_LoginSettings'reconnectTimeoutAfterDisconnect = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'reconnectTimeoutAfterDisconnect" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'reconnectTimeoutAfterDisconnect + (\ x__ y__ + -> x__ {_LoginSettings'reconnectTimeoutAfterDisconnect = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginSettings "timeZone" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'timeZone + (\ x__ y__ -> x__ {_LoginSettings'timeZone = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettings "maybe'timeZone" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettings'timeZone + (\ x__ y__ -> x__ {_LoginSettings'timeZone = y__})) + Prelude.id +instance Data.ProtoLens.Message LoginSettings where + messageName _ = Data.Text.pack "common_1.LoginSettings" + packedMessageDescriptor _ + = "\n\ + \\rLoginSettings\DC2%\n\ + \\SOcleared_fields\CAN\a \ETX(\rR\rclearedFields\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2A\n\ + \\GSpreferred_connection_point_id\CAN\STX \SOH(\tR\SUBpreferredConnectionPointId\DC2<\n\ + \\SUBconcurrent_sessions_number\CAN\ETX \SOH(\rR\CANconcurrentSessionsNumber\DC24\n\ + \\SYNpassword_never_expires\CAN\EOT \SOH(\bR\DC4passwordNeverExpires\DC2A\n\ + \\ESCobsolete_is_strategy_runner\CAN\ENQ \SOH(\bR\CANobsoleteIsStrategyRunnerB\STX\CAN\SOH\DC2E\n\ + \\USpreferred_connection_point_name\CAN\ACK \SOH(\tR\FSpreferredConnectionPointName\DC2&\n\ + \\SIlinked_login_id\CAN\b \SOH(\tR\rlinkedLoginId\DC2;\n\ + \\rexternal_auth\CAN\t \SOH(\v2\SYN.common_1.ExternalAuthR\fexternalAuth\DC2*\n\ + \\DC1daily_logon_limit\CAN\n\ + \ \SOH(\rR\SIdailyLogonLimit\DC2*\n\ + \\DC1daily_logon_count\CAN\v \SOH(\rR\SIdailyLogonCount\DC23\n\ + \\NAKauthentication_system\CAN\f \SOH(\tR\DC4authenticationSystem\DC2;\n\ + \\SUBallow_exceed_account_limit\CAN\r \SOH(\bR\ETBallowExceedAccountLimit\DC2?\n\ + \\FSon_session_disconnect_action\CAN\SO \SOH(\rR\EMonSessionDisconnectAction\DC2K\n\ + \\"reconnect_timeout_after_disconnect\CAN\SI \SOH(\rR\USreconnectTimeoutAfterDisconnect\DC2\ESC\n\ + \\ttime_zone\CAN\DLE \SOH(\tR\btimeZone\"8\n\ + \\DLEDisconnectAction\DC2\v\n\ + \\aNOTHING\DLE\SOH\DC2\n\ + \\n\ + \\ACKCANCEL\DLE\STX\DC2\v\n\ + \\aSUSPEND\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + preferredConnectionPointId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "preferred_connection_point_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'preferredConnectionPointId")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + concurrentSessionsNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "concurrent_sessions_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'concurrentSessionsNumber")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + passwordNeverExpires__field_descriptor + = Data.ProtoLens.FieldDescriptor + "password_never_expires" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'passwordNeverExpires")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + obsoleteIsStrategyRunner__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_is_strategy_runner" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteIsStrategyRunner")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + preferredConnectionPointName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "preferred_connection_point_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'preferredConnectionPointName")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + linkedLoginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "linked_login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'linkedLoginId")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + externalAuth__field_descriptor + = Data.ProtoLens.FieldDescriptor + "external_auth" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ExternalAuth) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'externalAuth")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + dailyLogonLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "daily_logon_limit" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'dailyLogonLimit")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + dailyLogonCount__field_descriptor + = Data.ProtoLens.FieldDescriptor + "daily_logon_count" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'dailyLogonCount")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + authenticationSystem__field_descriptor + = Data.ProtoLens.FieldDescriptor + "authentication_system" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'authenticationSystem")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + allowExceedAccountLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allow_exceed_account_limit" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowExceedAccountLimit")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + onSessionDisconnectAction__field_descriptor + = Data.ProtoLens.FieldDescriptor + "on_session_disconnect_action" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'onSessionDisconnectAction")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + reconnectTimeoutAfterDisconnect__field_descriptor + = Data.ProtoLens.FieldDescriptor + "reconnect_timeout_after_disconnect" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'reconnectTimeoutAfterDisconnect")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + timeZone__field_descriptor + = Data.ProtoLens.FieldDescriptor + "time_zone" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'timeZone")) :: + Data.ProtoLens.FieldDescriptor LoginSettings + in + Data.Map.fromList + [(Data.ProtoLens.Tag 7, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, loginId__field_descriptor), + (Data.ProtoLens.Tag 2, + preferredConnectionPointId__field_descriptor), + (Data.ProtoLens.Tag 3, concurrentSessionsNumber__field_descriptor), + (Data.ProtoLens.Tag 4, passwordNeverExpires__field_descriptor), + (Data.ProtoLens.Tag 5, obsoleteIsStrategyRunner__field_descriptor), + (Data.ProtoLens.Tag 6, + preferredConnectionPointName__field_descriptor), + (Data.ProtoLens.Tag 8, linkedLoginId__field_descriptor), + (Data.ProtoLens.Tag 9, externalAuth__field_descriptor), + (Data.ProtoLens.Tag 10, dailyLogonLimit__field_descriptor), + (Data.ProtoLens.Tag 11, dailyLogonCount__field_descriptor), + (Data.ProtoLens.Tag 12, authenticationSystem__field_descriptor), + (Data.ProtoLens.Tag 13, allowExceedAccountLimit__field_descriptor), + (Data.ProtoLens.Tag 14, + onSessionDisconnectAction__field_descriptor), + (Data.ProtoLens.Tag 15, + reconnectTimeoutAfterDisconnect__field_descriptor), + (Data.ProtoLens.Tag 16, timeZone__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LoginSettings'_unknownFields + (\ x__ y__ -> x__ {_LoginSettings'_unknownFields = y__}) + defMessage + = LoginSettings'_constructor + {_LoginSettings'clearedFields = Data.Vector.Generic.empty, + _LoginSettings'loginId = Prelude.Nothing, + _LoginSettings'preferredConnectionPointId = Prelude.Nothing, + _LoginSettings'concurrentSessionsNumber = Prelude.Nothing, + _LoginSettings'passwordNeverExpires = Prelude.Nothing, + _LoginSettings'obsoleteIsStrategyRunner = Prelude.Nothing, + _LoginSettings'preferredConnectionPointName = Prelude.Nothing, + _LoginSettings'linkedLoginId = Prelude.Nothing, + _LoginSettings'externalAuth = Prelude.Nothing, + _LoginSettings'dailyLogonLimit = Prelude.Nothing, + _LoginSettings'dailyLogonCount = Prelude.Nothing, + _LoginSettings'authenticationSystem = Prelude.Nothing, + _LoginSettings'allowExceedAccountLimit = Prelude.Nothing, + _LoginSettings'onSessionDisconnectAction = Prelude.Nothing, + _LoginSettings'reconnectTimeoutAfterDisconnect = Prelude.Nothing, + _LoginSettings'timeZone = Prelude.Nothing, + _LoginSettings'_unknownFields = []} + parseMessage + = let + loop :: + LoginSettings + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser LoginSettings + loop x mutable'clearedFields + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 56 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x v + 58 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x y + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + mutable'clearedFields + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "preferred_connection_point_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"preferredConnectionPointId") y x) + mutable'clearedFields + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "concurrent_sessions_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"concurrentSessionsNumber") y x) + mutable'clearedFields + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "password_never_expires" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"passwordNeverExpires") y x) + mutable'clearedFields + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_is_strategy_runner" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteIsStrategyRunner") y x) + mutable'clearedFields + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "preferred_connection_point_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"preferredConnectionPointName") y + x) + mutable'clearedFields + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "linked_login_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"linkedLoginId") y x) + mutable'clearedFields + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "external_auth" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"externalAuth") y x) + mutable'clearedFields + 80 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "daily_logon_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"dailyLogonLimit") y x) + mutable'clearedFields + 88 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "daily_logon_count" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"dailyLogonCount") y x) + mutable'clearedFields + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "authentication_system" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"authenticationSystem") y x) + mutable'clearedFields + 104 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "allow_exceed_account_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowExceedAccountLimit") y x) + mutable'clearedFields + 112 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "on_session_disconnect_action" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"onSessionDisconnectAction") y x) + mutable'clearedFields + 120 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "reconnect_timeout_after_disconnect" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"reconnectTimeoutAfterDisconnect") + y x) + mutable'clearedFields + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "time_zone" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"timeZone") y x) + mutable'clearedFields + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'clearedFields + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'clearedFields) + "LoginSettings" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'preferredConnectionPointId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'concurrentSessionsNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'passwordNeverExpires") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteIsStrategyRunner") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'preferredConnectionPointName") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'linkedLoginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'externalAuth") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'dailyLogonLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 80) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'dailyLogonCount") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'authenticationSystem") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'allowExceedAccountLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 104) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'onSessionDisconnectAction") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 112) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'reconnectTimeoutAfterDisconnect") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 120) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'timeZone") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))))) +instance Control.DeepSeq.NFData LoginSettings where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LoginSettings'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LoginSettings'clearedFields x__) + (Control.DeepSeq.deepseq + (_LoginSettings'loginId x__) + (Control.DeepSeq.deepseq + (_LoginSettings'preferredConnectionPointId x__) + (Control.DeepSeq.deepseq + (_LoginSettings'concurrentSessionsNumber x__) + (Control.DeepSeq.deepseq + (_LoginSettings'passwordNeverExpires x__) + (Control.DeepSeq.deepseq + (_LoginSettings'obsoleteIsStrategyRunner x__) + (Control.DeepSeq.deepseq + (_LoginSettings'preferredConnectionPointName x__) + (Control.DeepSeq.deepseq + (_LoginSettings'linkedLoginId x__) + (Control.DeepSeq.deepseq + (_LoginSettings'externalAuth x__) + (Control.DeepSeq.deepseq + (_LoginSettings'dailyLogonLimit x__) + (Control.DeepSeq.deepseq + (_LoginSettings'dailyLogonCount x__) + (Control.DeepSeq.deepseq + (_LoginSettings'authenticationSystem x__) + (Control.DeepSeq.deepseq + (_LoginSettings'allowExceedAccountLimit x__) + (Control.DeepSeq.deepseq + (_LoginSettings'onSessionDisconnectAction + x__) + (Control.DeepSeq.deepseq + (_LoginSettings'reconnectTimeoutAfterDisconnect + x__) + (Control.DeepSeq.deepseq + (_LoginSettings'timeZone x__) + ())))))))))))))))) +data LoginSettings'DisconnectAction + = LoginSettings'NOTHING | + LoginSettings'CANCEL | + LoginSettings'SUSPEND + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum LoginSettings'DisconnectAction where + maybeToEnum 1 = Prelude.Just LoginSettings'NOTHING + maybeToEnum 2 = Prelude.Just LoginSettings'CANCEL + maybeToEnum 3 = Prelude.Just LoginSettings'SUSPEND + maybeToEnum _ = Prelude.Nothing + showEnum LoginSettings'NOTHING = "NOTHING" + showEnum LoginSettings'CANCEL = "CANCEL" + showEnum LoginSettings'SUSPEND = "SUSPEND" + readEnum k + | (Prelude.==) k "NOTHING" = Prelude.Just LoginSettings'NOTHING + | (Prelude.==) k "CANCEL" = Prelude.Just LoginSettings'CANCEL + | (Prelude.==) k "SUSPEND" = Prelude.Just LoginSettings'SUSPEND + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded LoginSettings'DisconnectAction where + minBound = LoginSettings'NOTHING + maxBound = LoginSettings'SUSPEND +instance Prelude.Enum LoginSettings'DisconnectAction where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum DisconnectAction: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum LoginSettings'NOTHING = 1 + fromEnum LoginSettings'CANCEL = 2 + fromEnum LoginSettings'SUSPEND = 3 + succ LoginSettings'SUSPEND + = Prelude.error + "LoginSettings'DisconnectAction.succ: bad argument LoginSettings'SUSPEND. This value would be out of bounds." + succ LoginSettings'NOTHING = LoginSettings'CANCEL + succ LoginSettings'CANCEL = LoginSettings'SUSPEND + pred LoginSettings'NOTHING + = Prelude.error + "LoginSettings'DisconnectAction.pred: bad argument LoginSettings'NOTHING. This value would be out of bounds." + pred LoginSettings'CANCEL = LoginSettings'NOTHING + pred LoginSettings'SUSPEND = LoginSettings'CANCEL + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault LoginSettings'DisconnectAction where + fieldDefault = LoginSettings'NOTHING +instance Control.DeepSeq.NFData LoginSettings'DisconnectAction where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginId' @:: Lens' LoginSettingsRequest Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'loginId' @:: Lens' LoginSettingsRequest (Prelude.Maybe Data.Text.Text)@ -} +data LoginSettingsRequest + = LoginSettingsRequest'_constructor {_LoginSettingsRequest'loginId :: !(Prelude.Maybe Data.Text.Text), + _LoginSettingsRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LoginSettingsRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LoginSettingsRequest "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettingsRequest'loginId + (\ x__ y__ -> x__ {_LoginSettingsRequest'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginSettingsRequest "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettingsRequest'loginId + (\ x__ y__ -> x__ {_LoginSettingsRequest'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Message LoginSettingsRequest where + messageName _ = Data.Text.pack "common_1.LoginSettingsRequest" + packedMessageDescriptor _ + = "\n\ + \\DC4LoginSettingsRequest\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor LoginSettingsRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LoginSettingsRequest'_unknownFields + (\ x__ y__ -> x__ {_LoginSettingsRequest'_unknownFields = y__}) + defMessage + = LoginSettingsRequest'_constructor + {_LoginSettingsRequest'loginId = Prelude.Nothing, + _LoginSettingsRequest'_unknownFields = []} + parseMessage + = let + loop :: + LoginSettingsRequest + -> Data.ProtoLens.Encoding.Bytes.Parser LoginSettingsRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LoginSettingsRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData LoginSettingsRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LoginSettingsRequest'_unknownFields x__) + (Control.DeepSeq.deepseq (_LoginSettingsRequest'loginId x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginSettings' @:: Lens' LoginSettingsResult LoginSettings@ + * 'Proto.CMS.Common1_Fields.maybe'loginSettings' @:: Lens' LoginSettingsResult (Prelude.Maybe LoginSettings)@ -} +data LoginSettingsResult + = LoginSettingsResult'_constructor {_LoginSettingsResult'loginSettings :: !(Prelude.Maybe LoginSettings), + _LoginSettingsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LoginSettingsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LoginSettingsResult "loginSettings" LoginSettings where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettingsResult'loginSettings + (\ x__ y__ -> x__ {_LoginSettingsResult'loginSettings = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField LoginSettingsResult "maybe'loginSettings" (Prelude.Maybe LoginSettings) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginSettingsResult'loginSettings + (\ x__ y__ -> x__ {_LoginSettingsResult'loginSettings = y__})) + Prelude.id +instance Data.ProtoLens.Message LoginSettingsResult where + messageName _ = Data.Text.pack "common_1.LoginSettingsResult" + packedMessageDescriptor _ + = "\n\ + \\DC3LoginSettingsResult\DC2>\n\ + \\SOlogin_settings\CAN\SOH \SOH(\v2\ETB.common_1.LoginSettingsR\rloginSettings" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginSettings__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_settings" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LoginSettings) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginSettings")) :: + Data.ProtoLens.FieldDescriptor LoginSettingsResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginSettings__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LoginSettingsResult'_unknownFields + (\ x__ y__ -> x__ {_LoginSettingsResult'_unknownFields = y__}) + defMessage + = LoginSettingsResult'_constructor + {_LoginSettingsResult'loginSettings = Prelude.Nothing, + _LoginSettingsResult'_unknownFields = []} + parseMessage + = let + loop :: + LoginSettingsResult + -> Data.ProtoLens.Encoding.Bytes.Parser LoginSettingsResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "login_settings" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"loginSettings") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LoginSettingsResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'loginSettings") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData LoginSettingsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LoginSettingsResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LoginSettingsResult'loginSettings x__) ()) +{- | Fields : + -} +data Logoff + = Logoff'_constructor {_Logoff'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Logoff where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message Logoff where + messageName _ = Data.Text.pack "common_1.Logoff" + packedMessageDescriptor _ + = "\n\ + \\ACKLogoff" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _Logoff'_unknownFields + (\ x__ y__ -> x__ {_Logoff'_unknownFields = y__}) + defMessage = Logoff'_constructor {_Logoff'_unknownFields = []} + parseMessage + = let + loop :: Logoff -> Data.ProtoLens.Encoding.Bytes.Parser Logoff + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "Logoff" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData Logoff where + rnf + = \ x__ -> Control.DeepSeq.deepseq (_Logoff'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.protocolVersionMinor' @:: Lens' Logon Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'protocolVersionMinor' @:: Lens' Logon (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.protocolVersionMajor' @:: Lens' Logon Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'protocolVersionMajor' @:: Lens' Logon (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.userName' @:: Lens' Logon Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'userName' @:: Lens' Logon (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.password' @:: Lens' Logon Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'password' @:: Lens' Logon (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.clientAppId' @:: Lens' Logon Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'clientAppId' @:: Lens' Logon (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.clientVersion' @:: Lens' Logon Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'clientVersion' @:: Lens' Logon (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.sessionSettings' @:: Lens' Logon [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'sessionSettings' @:: Lens' Logon (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.dropConcurrentSession' @:: Lens' Logon Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'dropConcurrentSession' @:: Lens' Logon (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.privateLabel' @:: Lens' Logon Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'privateLabel' @:: Lens' Logon (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.accessToken' @:: Lens' Logon Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'accessToken' @:: Lens' Logon (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.subscribeOnRequestStatusChange' @:: Lens' Logon Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'subscribeOnRequestStatusChange' @:: Lens' Logon (Prelude.Maybe Prelude.Bool)@ -} +data Logon + = Logon'_constructor {_Logon'protocolVersionMinor :: !(Prelude.Maybe Data.Word.Word32), + _Logon'protocolVersionMajor :: !(Prelude.Maybe Data.Word.Word32), + _Logon'userName :: !(Prelude.Maybe Data.Text.Text), + _Logon'password :: !(Prelude.Maybe Data.Text.Text), + _Logon'clientAppId :: !(Prelude.Maybe Data.Text.Text), + _Logon'clientVersion :: !(Prelude.Maybe Data.Text.Text), + _Logon'sessionSettings :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _Logon'dropConcurrentSession :: !(Prelude.Maybe Prelude.Bool), + _Logon'privateLabel :: !(Prelude.Maybe Data.Text.Text), + _Logon'accessToken :: !(Prelude.Maybe Data.Text.Text), + _Logon'subscribeOnRequestStatusChange :: !(Prelude.Maybe Prelude.Bool), + _Logon'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Logon where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Logon "protocolVersionMinor" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'protocolVersionMinor + (\ x__ y__ -> x__ {_Logon'protocolVersionMinor = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Logon "maybe'protocolVersionMinor" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'protocolVersionMinor + (\ x__ y__ -> x__ {_Logon'protocolVersionMinor = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Logon "protocolVersionMajor" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'protocolVersionMajor + (\ x__ y__ -> x__ {_Logon'protocolVersionMajor = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Logon "maybe'protocolVersionMajor" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'protocolVersionMajor + (\ x__ y__ -> x__ {_Logon'protocolVersionMajor = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Logon "userName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'userName (\ x__ y__ -> x__ {_Logon'userName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Logon "maybe'userName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'userName (\ x__ y__ -> x__ {_Logon'userName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Logon "password" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'password (\ x__ y__ -> x__ {_Logon'password = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Logon "maybe'password" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'password (\ x__ y__ -> x__ {_Logon'password = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Logon "clientAppId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'clientAppId (\ x__ y__ -> x__ {_Logon'clientAppId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Logon "maybe'clientAppId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'clientAppId (\ x__ y__ -> x__ {_Logon'clientAppId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Logon "clientVersion" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'clientVersion + (\ x__ y__ -> x__ {_Logon'clientVersion = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Logon "maybe'clientVersion" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'clientVersion + (\ x__ y__ -> x__ {_Logon'clientVersion = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Logon "sessionSettings" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'sessionSettings + (\ x__ y__ -> x__ {_Logon'sessionSettings = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField Logon "vec'sessionSettings" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'sessionSettings + (\ x__ y__ -> x__ {_Logon'sessionSettings = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Logon "dropConcurrentSession" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'dropConcurrentSession + (\ x__ y__ -> x__ {_Logon'dropConcurrentSession = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Logon "maybe'dropConcurrentSession" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'dropConcurrentSession + (\ x__ y__ -> x__ {_Logon'dropConcurrentSession = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Logon "privateLabel" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'privateLabel (\ x__ y__ -> x__ {_Logon'privateLabel = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Logon "maybe'privateLabel" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'privateLabel (\ x__ y__ -> x__ {_Logon'privateLabel = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Logon "accessToken" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'accessToken (\ x__ y__ -> x__ {_Logon'accessToken = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Logon "maybe'accessToken" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'accessToken (\ x__ y__ -> x__ {_Logon'accessToken = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Logon "subscribeOnRequestStatusChange" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'subscribeOnRequestStatusChange + (\ x__ y__ -> x__ {_Logon'subscribeOnRequestStatusChange = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField Logon "maybe'subscribeOnRequestStatusChange" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Logon'subscribeOnRequestStatusChange + (\ x__ y__ -> x__ {_Logon'subscribeOnRequestStatusChange = y__})) + Prelude.id +instance Data.ProtoLens.Message Logon where + messageName _ = Data.Text.pack "common_1.Logon" + packedMessageDescriptor _ + = "\n\ + \\ENQLogon\DC24\n\ + \\SYNprotocol_version_minor\CAN\SOH \SOH(\rR\DC4protocolVersionMinor\DC24\n\ + \\SYNprotocol_version_major\CAN\STX \SOH(\rR\DC4protocolVersionMajor\DC2\ESC\n\ + \\tuser_name\CAN\ETX \SOH(\tR\buserName\DC2\SUB\n\ + \\bpassword\CAN\EOT \SOH(\tR\bpassword\DC2\"\n\ + \\rclient_app_id\CAN\ENQ \SOH(\tR\vclientAppId\DC2%\n\ + \\SOclient_version\CAN\ACK \SOH(\tR\rclientVersion\DC2)\n\ + \\DLEsession_settings\CAN\a \ETX(\rR\SIsessionSettings\DC26\n\ + \\ETBdrop_concurrent_session\CAN\b \SOH(\bR\NAKdropConcurrentSession\DC2#\n\ + \\rprivate_label\CAN\t \SOH(\tR\fprivateLabel\DC2!\n\ + \\faccess_token\CAN\n\ + \ \SOH(\tR\vaccessToken\DC2Q\n\ + \\"subscribe_on_request_status_change\CAN\v \SOH(\b:\ENQfalseR\RSsubscribeOnRequestStatusChange\"C\n\ + \\SOSessionSetting\DC2\EM\n\ + \\NAKALLOW_SESSION_RESTORE\DLE\SOH\DC2\SYN\n\ + \\DC2ALLOW_SESSION_JOIN\DLE\STX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + protocolVersionMinor__field_descriptor + = Data.ProtoLens.FieldDescriptor + "protocol_version_minor" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'protocolVersionMinor")) :: + Data.ProtoLens.FieldDescriptor Logon + protocolVersionMajor__field_descriptor + = Data.ProtoLens.FieldDescriptor + "protocol_version_major" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'protocolVersionMajor")) :: + Data.ProtoLens.FieldDescriptor Logon + userName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'userName")) :: + Data.ProtoLens.FieldDescriptor Logon + password__field_descriptor + = Data.ProtoLens.FieldDescriptor + "password" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'password")) :: + Data.ProtoLens.FieldDescriptor Logon + clientAppId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_app_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'clientAppId")) :: + Data.ProtoLens.FieldDescriptor Logon + clientVersion__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_version" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'clientVersion")) :: + Data.ProtoLens.FieldDescriptor Logon + sessionSettings__field_descriptor + = Data.ProtoLens.FieldDescriptor + "session_settings" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"sessionSettings")) :: + Data.ProtoLens.FieldDescriptor Logon + dropConcurrentSession__field_descriptor + = Data.ProtoLens.FieldDescriptor + "drop_concurrent_session" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'dropConcurrentSession")) :: + Data.ProtoLens.FieldDescriptor Logon + privateLabel__field_descriptor + = Data.ProtoLens.FieldDescriptor + "private_label" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'privateLabel")) :: + Data.ProtoLens.FieldDescriptor Logon + accessToken__field_descriptor + = Data.ProtoLens.FieldDescriptor + "access_token" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accessToken")) :: + Data.ProtoLens.FieldDescriptor Logon + subscribeOnRequestStatusChange__field_descriptor + = Data.ProtoLens.FieldDescriptor + "subscribe_on_request_status_change" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'subscribeOnRequestStatusChange")) :: + Data.ProtoLens.FieldDescriptor Logon + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, protocolVersionMinor__field_descriptor), + (Data.ProtoLens.Tag 2, protocolVersionMajor__field_descriptor), + (Data.ProtoLens.Tag 3, userName__field_descriptor), + (Data.ProtoLens.Tag 4, password__field_descriptor), + (Data.ProtoLens.Tag 5, clientAppId__field_descriptor), + (Data.ProtoLens.Tag 6, clientVersion__field_descriptor), + (Data.ProtoLens.Tag 7, sessionSettings__field_descriptor), + (Data.ProtoLens.Tag 8, dropConcurrentSession__field_descriptor), + (Data.ProtoLens.Tag 9, privateLabel__field_descriptor), + (Data.ProtoLens.Tag 10, accessToken__field_descriptor), + (Data.ProtoLens.Tag 11, + subscribeOnRequestStatusChange__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Logon'_unknownFields + (\ x__ y__ -> x__ {_Logon'_unknownFields = y__}) + defMessage + = Logon'_constructor + {_Logon'protocolVersionMinor = Prelude.Nothing, + _Logon'protocolVersionMajor = Prelude.Nothing, + _Logon'userName = Prelude.Nothing, + _Logon'password = Prelude.Nothing, + _Logon'clientAppId = Prelude.Nothing, + _Logon'clientVersion = Prelude.Nothing, + _Logon'sessionSettings = Data.Vector.Generic.empty, + _Logon'dropConcurrentSession = Prelude.Nothing, + _Logon'privateLabel = Prelude.Nothing, + _Logon'accessToken = Prelude.Nothing, + _Logon'subscribeOnRequestStatusChange = Prelude.Nothing, + _Logon'_unknownFields = []} + parseMessage + = let + loop :: + Logon + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser Logon + loop x mutable'sessionSettings + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'sessionSettings <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'sessionSettings) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'sessionSettings") + frozen'sessionSettings x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "protocol_version_minor" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"protocolVersionMinor") y x) + mutable'sessionSettings + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "protocol_version_major" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"protocolVersionMajor") y x) + mutable'sessionSettings + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"userName") y x) + mutable'sessionSettings + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "password" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"password") y x) + mutable'sessionSettings + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_app_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"clientAppId") y x) + mutable'sessionSettings + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_version" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"clientVersion") y x) + mutable'sessionSettings + 56 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "session_settings" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'sessionSettings y) + loop x v + 58 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "session_settings" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'sessionSettings) + loop x y + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "drop_concurrent_session" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"dropConcurrentSession") y x) + mutable'sessionSettings + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "private_label" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"privateLabel") y x) + mutable'sessionSettings + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "access_token" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accessToken") y x) + mutable'sessionSettings + 88 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "subscribe_on_request_status_change" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"subscribeOnRequestStatusChange") + y x) + mutable'sessionSettings + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'sessionSettings + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'sessionSettings <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'sessionSettings) + "Logon" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'protocolVersionMinor") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'protocolVersionMajor") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'userName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'password") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'clientAppId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'clientVersion") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'sessionSettings") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'dropConcurrentSession") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'privateLabel") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accessToken") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'subscribeOnRequestStatusChange") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x)))))))))))) +instance Control.DeepSeq.NFData Logon where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Logon'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Logon'protocolVersionMinor x__) + (Control.DeepSeq.deepseq + (_Logon'protocolVersionMajor x__) + (Control.DeepSeq.deepseq + (_Logon'userName x__) + (Control.DeepSeq.deepseq + (_Logon'password x__) + (Control.DeepSeq.deepseq + (_Logon'clientAppId x__) + (Control.DeepSeq.deepseq + (_Logon'clientVersion x__) + (Control.DeepSeq.deepseq + (_Logon'sessionSettings x__) + (Control.DeepSeq.deepseq + (_Logon'dropConcurrentSession x__) + (Control.DeepSeq.deepseq + (_Logon'privateLabel x__) + (Control.DeepSeq.deepseq + (_Logon'accessToken x__) + (Control.DeepSeq.deepseq + (_Logon'subscribeOnRequestStatusChange x__) + ()))))))))))) +data Logon'SessionSetting + = Logon'ALLOW_SESSION_RESTORE | Logon'ALLOW_SESSION_JOIN + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum Logon'SessionSetting where + maybeToEnum 1 = Prelude.Just Logon'ALLOW_SESSION_RESTORE + maybeToEnum 2 = Prelude.Just Logon'ALLOW_SESSION_JOIN + maybeToEnum _ = Prelude.Nothing + showEnum Logon'ALLOW_SESSION_RESTORE = "ALLOW_SESSION_RESTORE" + showEnum Logon'ALLOW_SESSION_JOIN = "ALLOW_SESSION_JOIN" + readEnum k + | (Prelude.==) k "ALLOW_SESSION_RESTORE" + = Prelude.Just Logon'ALLOW_SESSION_RESTORE + | (Prelude.==) k "ALLOW_SESSION_JOIN" + = Prelude.Just Logon'ALLOW_SESSION_JOIN + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded Logon'SessionSetting where + minBound = Logon'ALLOW_SESSION_RESTORE + maxBound = Logon'ALLOW_SESSION_JOIN +instance Prelude.Enum Logon'SessionSetting where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum SessionSetting: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum Logon'ALLOW_SESSION_RESTORE = 1 + fromEnum Logon'ALLOW_SESSION_JOIN = 2 + succ Logon'ALLOW_SESSION_JOIN + = Prelude.error + "Logon'SessionSetting.succ: bad argument Logon'ALLOW_SESSION_JOIN. This value would be out of bounds." + succ Logon'ALLOW_SESSION_RESTORE = Logon'ALLOW_SESSION_JOIN + pred Logon'ALLOW_SESSION_RESTORE + = Prelude.error + "Logon'SessionSetting.pred: bad argument Logon'ALLOW_SESSION_RESTORE. This value would be out of bounds." + pred Logon'ALLOW_SESSION_JOIN = Logon'ALLOW_SESSION_RESTORE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault Logon'SessionSetting where + fieldDefault = Logon'ALLOW_SESSION_RESTORE +instance Control.DeepSeq.NFData Logon'SessionSetting where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.protocolVersionMinor' @:: Lens' LogonResult Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.protocolVersionMajor' @:: Lens' LogonResult Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.operationStatus' @:: Lens' LogonResult Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.errorMessage' @:: Lens' LogonResult Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.maybe'errorMessage' @:: Lens' LogonResult (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Common1_Fields.sessionToken' @:: Lens' LogonResult Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'sessionToken' @:: Lens' LogonResult (Prelude.Maybe Data.Text.Text)@ -} +data LogonResult + = LogonResult'_constructor {_LogonResult'protocolVersionMinor :: !Data.Word.Word32, + _LogonResult'protocolVersionMajor :: !Data.Word.Word32, + _LogonResult'operationStatus :: !Data.Word.Word32, + _LogonResult'errorMessage :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _LogonResult'sessionToken :: !(Prelude.Maybe Data.Text.Text), + _LogonResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LogonResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LogonResult "protocolVersionMinor" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LogonResult'protocolVersionMinor + (\ x__ y__ -> x__ {_LogonResult'protocolVersionMinor = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LogonResult "protocolVersionMajor" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LogonResult'protocolVersionMajor + (\ x__ y__ -> x__ {_LogonResult'protocolVersionMajor = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LogonResult "operationStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LogonResult'operationStatus + (\ x__ y__ -> x__ {_LogonResult'operationStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LogonResult "errorMessage" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LogonResult'errorMessage + (\ x__ y__ -> x__ {_LogonResult'errorMessage = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField LogonResult "maybe'errorMessage" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LogonResult'errorMessage + (\ x__ y__ -> x__ {_LogonResult'errorMessage = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LogonResult "sessionToken" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LogonResult'sessionToken + (\ x__ y__ -> x__ {_LogonResult'sessionToken = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LogonResult "maybe'sessionToken" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LogonResult'sessionToken + (\ x__ y__ -> x__ {_LogonResult'sessionToken = y__})) + Prelude.id +instance Data.ProtoLens.Message LogonResult where + messageName _ = Data.Text.pack "common_1.LogonResult" + packedMessageDescriptor _ + = "\n\ + \\vLogonResult\DC24\n\ + \\SYNprotocol_version_minor\CAN\SOH \STX(\rR\DC4protocolVersionMinor\DC24\n\ + \\SYNprotocol_version_major\CAN\STX \STX(\rR\DC4protocolVersionMajor\DC2)\n\ + \\DLEoperation_status\CAN\ETX \STX(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\EOT \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2#\n\ + \\rsession_token\CAN\ENQ \SOH(\tR\fsessionToken" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + protocolVersionMinor__field_descriptor + = Data.ProtoLens.FieldDescriptor + "protocol_version_minor" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"protocolVersionMinor")) :: + Data.ProtoLens.FieldDescriptor LogonResult + protocolVersionMajor__field_descriptor + = Data.ProtoLens.FieldDescriptor + "protocol_version_major" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"protocolVersionMajor")) :: + Data.ProtoLens.FieldDescriptor LogonResult + operationStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"operationStatus")) :: + Data.ProtoLens.FieldDescriptor LogonResult + errorMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "error_message" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'errorMessage")) :: + Data.ProtoLens.FieldDescriptor LogonResult + sessionToken__field_descriptor + = Data.ProtoLens.FieldDescriptor + "session_token" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sessionToken")) :: + Data.ProtoLens.FieldDescriptor LogonResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, protocolVersionMinor__field_descriptor), + (Data.ProtoLens.Tag 2, protocolVersionMajor__field_descriptor), + (Data.ProtoLens.Tag 3, operationStatus__field_descriptor), + (Data.ProtoLens.Tag 4, errorMessage__field_descriptor), + (Data.ProtoLens.Tag 5, sessionToken__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LogonResult'_unknownFields + (\ x__ y__ -> x__ {_LogonResult'_unknownFields = y__}) + defMessage + = LogonResult'_constructor + {_LogonResult'protocolVersionMinor = Data.ProtoLens.fieldDefault, + _LogonResult'protocolVersionMajor = Data.ProtoLens.fieldDefault, + _LogonResult'operationStatus = Data.ProtoLens.fieldDefault, + _LogonResult'errorMessage = Prelude.Nothing, + _LogonResult'sessionToken = Prelude.Nothing, + _LogonResult'_unknownFields = []} + parseMessage + = let + loop :: + LogonResult + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser LogonResult + loop + x + required'operationStatus + required'protocolVersionMajor + required'protocolVersionMinor + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'operationStatus then + (:) "operation_status" + else + Prelude.id) + ((if required'protocolVersionMajor then + (:) "protocol_version_major" + else + Prelude.id) + ((if required'protocolVersionMinor then + (:) "protocol_version_minor" + else + Prelude.id) + [])) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "protocol_version_minor" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"protocolVersionMinor") y x) + required'operationStatus required'protocolVersionMajor + Prelude.False + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "protocol_version_major" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"protocolVersionMajor") y x) + required'operationStatus Prelude.False + required'protocolVersionMinor + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationStatus") y x) + Prelude.False required'protocolVersionMajor + required'protocolVersionMinor + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "error_message" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"errorMessage") y x) + required'operationStatus required'protocolVersionMajor + required'protocolVersionMinor + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "session_token" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"sessionToken") y x) + required'operationStatus required'protocolVersionMajor + required'protocolVersionMinor + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'operationStatus required'protocolVersionMajor + required'protocolVersionMinor + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True) + "LogonResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"protocolVersionMinor") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"protocolVersionMajor") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"operationStatus") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'errorMessage") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'sessionToken") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData LogonResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LogonResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LogonResult'protocolVersionMinor x__) + (Control.DeepSeq.deepseq + (_LogonResult'protocolVersionMajor x__) + (Control.DeepSeq.deepseq + (_LogonResult'operationStatus x__) + (Control.DeepSeq.deepseq + (_LogonResult'errorMessage x__) + (Control.DeepSeq.deepseq (_LogonResult'sessionToken x__) ()))))) +data LogonResultCode + = LOGON_SUCCESS | + LOGON_FAILURE | + NO_ONETIME_PASSWORD | + PASSWORD_EXPIRED | + ROUTINE_ERROR | + WRONG_PARAMETERS | + USER_AUTO_LOCKOUT | + USER_MANUAL_LOCKOUT | + SECOND_FACTOR_INIT_REQUIRED | + INCOMPATIBLE_CLIENT | + UNSIGNED_AGREEMENT | + TOO_MANY_LOGONS | + PHONE_VERIFICATION_REQUIRED | + ACCESS_DENIED + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum LogonResultCode where + maybeToEnum 0 = Prelude.Just LOGON_SUCCESS + maybeToEnum 101 = Prelude.Just LOGON_FAILURE + maybeToEnum 103 = Prelude.Just NO_ONETIME_PASSWORD + maybeToEnum 104 = Prelude.Just PASSWORD_EXPIRED + maybeToEnum 105 = Prelude.Just ROUTINE_ERROR + maybeToEnum 106 = Prelude.Just WRONG_PARAMETERS + maybeToEnum 107 = Prelude.Just USER_AUTO_LOCKOUT + maybeToEnum 108 = Prelude.Just USER_MANUAL_LOCKOUT + maybeToEnum 109 = Prelude.Just SECOND_FACTOR_INIT_REQUIRED + maybeToEnum 110 = Prelude.Just INCOMPATIBLE_CLIENT + maybeToEnum 111 = Prelude.Just UNSIGNED_AGREEMENT + maybeToEnum 112 = Prelude.Just TOO_MANY_LOGONS + maybeToEnum 113 = Prelude.Just PHONE_VERIFICATION_REQUIRED + maybeToEnum 114 = Prelude.Just ACCESS_DENIED + maybeToEnum _ = Prelude.Nothing + showEnum LOGON_SUCCESS = "LOGON_SUCCESS" + showEnum LOGON_FAILURE = "LOGON_FAILURE" + showEnum NO_ONETIME_PASSWORD = "NO_ONETIME_PASSWORD" + showEnum PASSWORD_EXPIRED = "PASSWORD_EXPIRED" + showEnum ROUTINE_ERROR = "ROUTINE_ERROR" + showEnum WRONG_PARAMETERS = "WRONG_PARAMETERS" + showEnum USER_AUTO_LOCKOUT = "USER_AUTO_LOCKOUT" + showEnum USER_MANUAL_LOCKOUT = "USER_MANUAL_LOCKOUT" + showEnum SECOND_FACTOR_INIT_REQUIRED + = "SECOND_FACTOR_INIT_REQUIRED" + showEnum INCOMPATIBLE_CLIENT = "INCOMPATIBLE_CLIENT" + showEnum UNSIGNED_AGREEMENT = "UNSIGNED_AGREEMENT" + showEnum TOO_MANY_LOGONS = "TOO_MANY_LOGONS" + showEnum PHONE_VERIFICATION_REQUIRED + = "PHONE_VERIFICATION_REQUIRED" + showEnum ACCESS_DENIED = "ACCESS_DENIED" + readEnum k + | (Prelude.==) k "LOGON_SUCCESS" = Prelude.Just LOGON_SUCCESS + | (Prelude.==) k "LOGON_FAILURE" = Prelude.Just LOGON_FAILURE + | (Prelude.==) k "NO_ONETIME_PASSWORD" + = Prelude.Just NO_ONETIME_PASSWORD + | (Prelude.==) k "PASSWORD_EXPIRED" = Prelude.Just PASSWORD_EXPIRED + | (Prelude.==) k "ROUTINE_ERROR" = Prelude.Just ROUTINE_ERROR + | (Prelude.==) k "WRONG_PARAMETERS" = Prelude.Just WRONG_PARAMETERS + | (Prelude.==) k "USER_AUTO_LOCKOUT" + = Prelude.Just USER_AUTO_LOCKOUT + | (Prelude.==) k "USER_MANUAL_LOCKOUT" + = Prelude.Just USER_MANUAL_LOCKOUT + | (Prelude.==) k "SECOND_FACTOR_INIT_REQUIRED" + = Prelude.Just SECOND_FACTOR_INIT_REQUIRED + | (Prelude.==) k "INCOMPATIBLE_CLIENT" + = Prelude.Just INCOMPATIBLE_CLIENT + | (Prelude.==) k "UNSIGNED_AGREEMENT" + = Prelude.Just UNSIGNED_AGREEMENT + | (Prelude.==) k "TOO_MANY_LOGONS" = Prelude.Just TOO_MANY_LOGONS + | (Prelude.==) k "PHONE_VERIFICATION_REQUIRED" + = Prelude.Just PHONE_VERIFICATION_REQUIRED + | (Prelude.==) k "ACCESS_DENIED" = Prelude.Just ACCESS_DENIED + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded LogonResultCode where + minBound = LOGON_SUCCESS + maxBound = ACCESS_DENIED +instance Prelude.Enum LogonResultCode where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum LogonResultCode: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum LOGON_SUCCESS = 0 + fromEnum LOGON_FAILURE = 101 + fromEnum NO_ONETIME_PASSWORD = 103 + fromEnum PASSWORD_EXPIRED = 104 + fromEnum ROUTINE_ERROR = 105 + fromEnum WRONG_PARAMETERS = 106 + fromEnum USER_AUTO_LOCKOUT = 107 + fromEnum USER_MANUAL_LOCKOUT = 108 + fromEnum SECOND_FACTOR_INIT_REQUIRED = 109 + fromEnum INCOMPATIBLE_CLIENT = 110 + fromEnum UNSIGNED_AGREEMENT = 111 + fromEnum TOO_MANY_LOGONS = 112 + fromEnum PHONE_VERIFICATION_REQUIRED = 113 + fromEnum ACCESS_DENIED = 114 + succ ACCESS_DENIED + = Prelude.error + "LogonResultCode.succ: bad argument ACCESS_DENIED. This value would be out of bounds." + succ LOGON_SUCCESS = LOGON_FAILURE + succ LOGON_FAILURE = NO_ONETIME_PASSWORD + succ NO_ONETIME_PASSWORD = PASSWORD_EXPIRED + succ PASSWORD_EXPIRED = ROUTINE_ERROR + succ ROUTINE_ERROR = WRONG_PARAMETERS + succ WRONG_PARAMETERS = USER_AUTO_LOCKOUT + succ USER_AUTO_LOCKOUT = USER_MANUAL_LOCKOUT + succ USER_MANUAL_LOCKOUT = SECOND_FACTOR_INIT_REQUIRED + succ SECOND_FACTOR_INIT_REQUIRED = INCOMPATIBLE_CLIENT + succ INCOMPATIBLE_CLIENT = UNSIGNED_AGREEMENT + succ UNSIGNED_AGREEMENT = TOO_MANY_LOGONS + succ TOO_MANY_LOGONS = PHONE_VERIFICATION_REQUIRED + succ PHONE_VERIFICATION_REQUIRED = ACCESS_DENIED + pred LOGON_SUCCESS + = Prelude.error + "LogonResultCode.pred: bad argument LOGON_SUCCESS. This value would be out of bounds." + pred LOGON_FAILURE = LOGON_SUCCESS + pred NO_ONETIME_PASSWORD = LOGON_FAILURE + pred PASSWORD_EXPIRED = NO_ONETIME_PASSWORD + pred ROUTINE_ERROR = PASSWORD_EXPIRED + pred WRONG_PARAMETERS = ROUTINE_ERROR + pred USER_AUTO_LOCKOUT = WRONG_PARAMETERS + pred USER_MANUAL_LOCKOUT = USER_AUTO_LOCKOUT + pred SECOND_FACTOR_INIT_REQUIRED = USER_MANUAL_LOCKOUT + pred INCOMPATIBLE_CLIENT = SECOND_FACTOR_INIT_REQUIRED + pred UNSIGNED_AGREEMENT = INCOMPATIBLE_CLIENT + pred TOO_MANY_LOGONS = UNSIGNED_AGREEMENT + pred PHONE_VERIFICATION_REQUIRED = TOO_MANY_LOGONS + pred ACCESS_DENIED = PHONE_VERIFICATION_REQUIRED + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault LogonResultCode where + fieldDefault = LOGON_SUCCESS +instance Control.DeepSeq.NFData LogonResultCode where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.type'' @:: Lens' LookupProperty Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.value' @:: Lens' LookupProperty Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.name' @:: Lens' LookupProperty Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.description' @:: Lens' LookupProperty Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.maybe'description' @:: Lens' LookupProperty (Prelude.Maybe Proto.Common.Shared1.Text)@ -} +data LookupProperty + = LookupProperty'_constructor {_LookupProperty'type' :: !Data.Word.Word32, + _LookupProperty'value :: !Data.Text.Text, + _LookupProperty'name :: !Proto.Common.Shared1.Text, + _LookupProperty'description :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _LookupProperty'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LookupProperty where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LookupProperty "type'" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LookupProperty'type' + (\ x__ y__ -> x__ {_LookupProperty'type' = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LookupProperty "value" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LookupProperty'value + (\ x__ y__ -> x__ {_LookupProperty'value = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LookupProperty "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LookupProperty'name + (\ x__ y__ -> x__ {_LookupProperty'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LookupProperty "description" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LookupProperty'description + (\ x__ y__ -> x__ {_LookupProperty'description = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField LookupProperty "maybe'description" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LookupProperty'description + (\ x__ y__ -> x__ {_LookupProperty'description = y__})) + Prelude.id +instance Data.ProtoLens.Message LookupProperty where + messageName _ = Data.Text.pack "common_1.LookupProperty" + packedMessageDescriptor _ + = "\n\ + \\SOLookupProperty\DC2\DC2\n\ + \\EOTtype\CAN\SOH \STX(\rR\EOTtype\DC2\DC4\n\ + \\ENQvalue\CAN\STX \STX(\tR\ENQvalue\DC2\"\n\ + \\EOTname\CAN\ETX \STX(\v2\SO.shared_1.TextR\EOTname\DC20\n\ + \\vdescription\CAN\EOT \SOH(\v2\SO.shared_1.TextR\vdescription" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + type'__field_descriptor + = Data.ProtoLens.FieldDescriptor + "type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"type'")) :: + Data.ProtoLens.FieldDescriptor LookupProperty + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"value")) :: + Data.ProtoLens.FieldDescriptor LookupProperty + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"name")) :: + Data.ProtoLens.FieldDescriptor LookupProperty + description__field_descriptor + = Data.ProtoLens.FieldDescriptor + "description" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'description")) :: + Data.ProtoLens.FieldDescriptor LookupProperty + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, type'__field_descriptor), + (Data.ProtoLens.Tag 2, value__field_descriptor), + (Data.ProtoLens.Tag 3, name__field_descriptor), + (Data.ProtoLens.Tag 4, description__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LookupProperty'_unknownFields + (\ x__ y__ -> x__ {_LookupProperty'_unknownFields = y__}) + defMessage + = LookupProperty'_constructor + {_LookupProperty'type' = Data.ProtoLens.fieldDefault, + _LookupProperty'value = Data.ProtoLens.fieldDefault, + _LookupProperty'name = Data.ProtoLens.defMessage, + _LookupProperty'description = Prelude.Nothing, + _LookupProperty'_unknownFields = []} + parseMessage + = let + loop :: + LookupProperty + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser LookupProperty + loop x required'name required'type' required'value + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'name then (:) "name" else Prelude.id) + ((if required'type' then (:) "type" else Prelude.id) + ((if required'value then (:) "value" else Prelude.id) [])) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"type'") y x) + required'name Prelude.False required'value + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "value" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + required'name required'type' Prelude.False + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + Prelude.False required'type' required'value + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "description" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"description") y x) + required'name required'type' required'value + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'name required'type' required'value + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True) + "LookupProperty" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"type'") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"value") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view (Data.ProtoLens.Field.field @"name") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'description") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData LookupProperty where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LookupProperty'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LookupProperty'type' x__) + (Control.DeepSeq.deepseq + (_LookupProperty'value x__) + (Control.DeepSeq.deepseq + (_LookupProperty'name x__) + (Control.DeepSeq.deepseq (_LookupProperty'description x__) ())))) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.propertyType' @:: Lens' LookupPropertyListRequest [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'propertyType' @:: Lens' LookupPropertyListRequest (Data.Vector.Unboxed.Vector Data.Word.Word32)@ -} +data LookupPropertyListRequest + = LookupPropertyListRequest'_constructor {_LookupPropertyListRequest'propertyType :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _LookupPropertyListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LookupPropertyListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LookupPropertyListRequest "propertyType" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LookupPropertyListRequest'propertyType + (\ x__ y__ -> x__ {_LookupPropertyListRequest'propertyType = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LookupPropertyListRequest "vec'propertyType" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LookupPropertyListRequest'propertyType + (\ x__ y__ -> x__ {_LookupPropertyListRequest'propertyType = y__})) + Prelude.id +instance Data.ProtoLens.Message LookupPropertyListRequest where + messageName _ = Data.Text.pack "common_1.LookupPropertyListRequest" + packedMessageDescriptor _ + = "\n\ + \\EMLookupPropertyListRequest\DC2#\n\ + \\rproperty_type\CAN\SOH \ETX(\rR\fpropertyType" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + propertyType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "property_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"propertyType")) :: + Data.ProtoLens.FieldDescriptor LookupPropertyListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, propertyType__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LookupPropertyListRequest'_unknownFields + (\ x__ y__ + -> x__ {_LookupPropertyListRequest'_unknownFields = y__}) + defMessage + = LookupPropertyListRequest'_constructor + {_LookupPropertyListRequest'propertyType = Data.Vector.Generic.empty, + _LookupPropertyListRequest'_unknownFields = []} + parseMessage + = let + loop :: + LookupPropertyListRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser LookupPropertyListRequest + loop x mutable'propertyType + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'propertyType <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'propertyType) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'propertyType") + frozen'propertyType x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "property_type" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'propertyType y) + loop x v + 10 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "property_type" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'propertyType) + loop x y + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'propertyType + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'propertyType <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'propertyType) + "LookupPropertyListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'propertyType") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData LookupPropertyListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LookupPropertyListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LookupPropertyListRequest'propertyType x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.lookupProperty' @:: Lens' LookupPropertyListResult [LookupProperty]@ + * 'Proto.CMS.Common1_Fields.vec'lookupProperty' @:: Lens' LookupPropertyListResult (Data.Vector.Vector LookupProperty)@ -} +data LookupPropertyListResult + = LookupPropertyListResult'_constructor {_LookupPropertyListResult'lookupProperty :: !(Data.Vector.Vector LookupProperty), + _LookupPropertyListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LookupPropertyListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LookupPropertyListResult "lookupProperty" [LookupProperty] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LookupPropertyListResult'lookupProperty + (\ x__ y__ + -> x__ {_LookupPropertyListResult'lookupProperty = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LookupPropertyListResult "vec'lookupProperty" (Data.Vector.Vector LookupProperty) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LookupPropertyListResult'lookupProperty + (\ x__ y__ + -> x__ {_LookupPropertyListResult'lookupProperty = y__})) + Prelude.id +instance Data.ProtoLens.Message LookupPropertyListResult where + messageName _ = Data.Text.pack "common_1.LookupPropertyListResult" + packedMessageDescriptor _ + = "\n\ + \\CANLookupPropertyListResult\DC2A\n\ + \\SIlookup_property\CAN\SOH \ETX(\v2\CAN.common_1.LookupPropertyR\SOlookupProperty" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + lookupProperty__field_descriptor + = Data.ProtoLens.FieldDescriptor + "lookup_property" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LookupProperty) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"lookupProperty")) :: + Data.ProtoLens.FieldDescriptor LookupPropertyListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, lookupProperty__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LookupPropertyListResult'_unknownFields + (\ x__ y__ -> x__ {_LookupPropertyListResult'_unknownFields = y__}) + defMessage + = LookupPropertyListResult'_constructor + {_LookupPropertyListResult'lookupProperty = Data.Vector.Generic.empty, + _LookupPropertyListResult'_unknownFields = []} + parseMessage + = let + loop :: + LookupPropertyListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld LookupProperty + -> Data.ProtoLens.Encoding.Bytes.Parser LookupPropertyListResult + loop x mutable'lookupProperty + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'lookupProperty <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'lookupProperty) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'lookupProperty") + frozen'lookupProperty x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "lookup_property" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'lookupProperty y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'lookupProperty + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'lookupProperty <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'lookupProperty) + "LookupPropertyListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'lookupProperty") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData LookupPropertyListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LookupPropertyListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LookupPropertyListResult'lookupProperty x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.id' @:: Lens' NamedEntity Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'id' @:: Lens' NamedEntity (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.name' @:: Lens' NamedEntity Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.maybe'name' @:: Lens' NamedEntity (Prelude.Maybe Proto.Common.Shared1.Text)@ -} +data NamedEntity + = NamedEntity'_constructor {_NamedEntity'id :: !(Prelude.Maybe Data.Text.Text), + _NamedEntity'name :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _NamedEntity'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show NamedEntity where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField NamedEntity "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _NamedEntity'id (\ x__ y__ -> x__ {_NamedEntity'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField NamedEntity "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _NamedEntity'id (\ x__ y__ -> x__ {_NamedEntity'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField NamedEntity "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _NamedEntity'name (\ x__ y__ -> x__ {_NamedEntity'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField NamedEntity "maybe'name" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _NamedEntity'name (\ x__ y__ -> x__ {_NamedEntity'name = y__})) + Prelude.id +instance Data.ProtoLens.Message NamedEntity where + messageName _ = Data.Text.pack "common_1.NamedEntity" + packedMessageDescriptor _ + = "\n\ + \\vNamedEntity\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor NamedEntity + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor NamedEntity + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _NamedEntity'_unknownFields + (\ x__ y__ -> x__ {_NamedEntity'_unknownFields = y__}) + defMessage + = NamedEntity'_constructor + {_NamedEntity'id = Prelude.Nothing, + _NamedEntity'name = Prelude.Nothing, + _NamedEntity'_unknownFields = []} + parseMessage + = let + loop :: + NamedEntity -> Data.ProtoLens.Encoding.Bytes.Parser NamedEntity + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "NamedEntity" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData NamedEntity where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_NamedEntity'_unknownFields x__) + (Control.DeepSeq.deepseq + (_NamedEntity'id x__) + (Control.DeepSeq.deepseq (_NamedEntity'name x__) ())) +data OperationStatus + = SUCCESS | FAILURE | ACCEPTED | QUEUED | IN_PROCESSING | CANCELED + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OperationStatus where + maybeToEnum 1 = Prelude.Just SUCCESS + maybeToEnum 2 = Prelude.Just FAILURE + maybeToEnum 3 = Prelude.Just ACCEPTED + maybeToEnum 4 = Prelude.Just QUEUED + maybeToEnum 5 = Prelude.Just IN_PROCESSING + maybeToEnum 6 = Prelude.Just CANCELED + maybeToEnum _ = Prelude.Nothing + showEnum SUCCESS = "SUCCESS" + showEnum FAILURE = "FAILURE" + showEnum ACCEPTED = "ACCEPTED" + showEnum QUEUED = "QUEUED" + showEnum IN_PROCESSING = "IN_PROCESSING" + showEnum CANCELED = "CANCELED" + readEnum k + | (Prelude.==) k "SUCCESS" = Prelude.Just SUCCESS + | (Prelude.==) k "FAILURE" = Prelude.Just FAILURE + | (Prelude.==) k "ACCEPTED" = Prelude.Just ACCEPTED + | (Prelude.==) k "QUEUED" = Prelude.Just QUEUED + | (Prelude.==) k "IN_PROCESSING" = Prelude.Just IN_PROCESSING + | (Prelude.==) k "CANCELED" = Prelude.Just CANCELED + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OperationStatus where + minBound = SUCCESS + maxBound = CANCELED +instance Prelude.Enum OperationStatus where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum OperationStatus: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum SUCCESS = 1 + fromEnum FAILURE = 2 + fromEnum ACCEPTED = 3 + fromEnum QUEUED = 4 + fromEnum IN_PROCESSING = 5 + fromEnum CANCELED = 6 + succ CANCELED + = Prelude.error + "OperationStatus.succ: bad argument CANCELED. This value would be out of bounds." + succ SUCCESS = FAILURE + succ FAILURE = ACCEPTED + succ ACCEPTED = QUEUED + succ QUEUED = IN_PROCESSING + succ IN_PROCESSING = CANCELED + pred SUCCESS + = Prelude.error + "OperationStatus.pred: bad argument SUCCESS. This value would be out of bounds." + pred FAILURE = SUCCESS + pred ACCEPTED = FAILURE + pred QUEUED = ACCEPTED + pred IN_PROCESSING = QUEUED + pred CANCELED = IN_PROCESSING + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OperationStatus where + fieldDefault = SUCCESS +instance Control.DeepSeq.NFData OperationStatus where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.number' @:: Lens' Phone Data.Text.Text@ -} +data Phone + = Phone'_constructor {_Phone'number :: !Data.Text.Text, + _Phone'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Phone where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Phone "number" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Phone'number (\ x__ y__ -> x__ {_Phone'number = y__})) + Prelude.id +instance Data.ProtoLens.Message Phone where + messageName _ = Data.Text.pack "common_1.Phone" + packedMessageDescriptor _ + = "\n\ + \\ENQPhone\DC2\SYN\n\ + \\ACKnumber\CAN\SOH \STX(\tR\ACKnumber" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + number__field_descriptor + = Data.ProtoLens.FieldDescriptor + "number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"number")) :: + Data.ProtoLens.FieldDescriptor Phone + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, number__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Phone'_unknownFields + (\ x__ y__ -> x__ {_Phone'_unknownFields = y__}) + defMessage + = Phone'_constructor + {_Phone'number = Data.ProtoLens.fieldDefault, + _Phone'_unknownFields = []} + parseMessage + = let + loop :: + Phone -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser Phone + loop x required'number + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing = (if required'number then (:) "number" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "number" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"number") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'number + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "Phone" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"number") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData Phone where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Phone'_unknownFields x__) + (Control.DeepSeq.deepseq (_Phone'number x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.currency' @:: Lens' Price Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.value' @:: Lens' Price Prelude.Double@ -} +data Price + = Price'_constructor {_Price'currency :: !Data.Text.Text, + _Price'value :: !Prelude.Double, + _Price'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Price where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Price "currency" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Price'currency (\ x__ y__ -> x__ {_Price'currency = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Price "value" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Price'value (\ x__ y__ -> x__ {_Price'value = y__})) + Prelude.id +instance Data.ProtoLens.Message Price where + messageName _ = Data.Text.pack "common_1.Price" + packedMessageDescriptor _ + = "\n\ + \\ENQPrice\DC2\SUB\n\ + \\bcurrency\CAN\SOH \STX(\tR\bcurrency\DC2\DC4\n\ + \\ENQvalue\CAN\STX \STX(\SOHR\ENQvalue" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + currency__field_descriptor + = Data.ProtoLens.FieldDescriptor + "currency" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"currency")) :: + Data.ProtoLens.FieldDescriptor Price + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"value")) :: + Data.ProtoLens.FieldDescriptor Price + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, currency__field_descriptor), + (Data.ProtoLens.Tag 2, value__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Price'_unknownFields + (\ x__ y__ -> x__ {_Price'_unknownFields = y__}) + defMessage + = Price'_constructor + {_Price'currency = Data.ProtoLens.fieldDefault, + _Price'value = Data.ProtoLens.fieldDefault, + _Price'_unknownFields = []} + parseMessage + = let + loop :: + Price + -> Prelude.Bool + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser Price + loop x required'currency required'value + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'currency then (:) "currency" else Prelude.id) + ((if required'value then (:) "value" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "currency" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"currency") y x) + Prelude.False required'value + 17 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "value" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + required'currency Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'currency required'value + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "Price" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"currency") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 17) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"value") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData Price where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Price'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Price'currency x__) + (Control.DeepSeq.deepseq (_Price'value x__) ())) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.clearedFields' @:: Lens' Profile [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'clearedFields' @:: Lens' Profile (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.customerId' @:: Lens' Profile Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'customerId' @:: Lens' Profile (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.legalType' @:: Lens' Profile Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'legalType' @:: Lens' Profile (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.name' @:: Lens' Profile Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'name' @:: Lens' Profile (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.contactInformation' @:: Lens' Profile ContactInformation@ + * 'Proto.CMS.Common1_Fields.maybe'contactInformation' @:: Lens' Profile (Prelude.Maybe ContactInformation)@ + * 'Proto.CMS.Common1_Fields.linkedBrokerageId' @:: Lens' Profile Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'linkedBrokerageId' @:: Lens' Profile (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.removed' @:: Lens' Profile Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'removed' @:: Lens' Profile (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.obsoleteAuthenticationSystem' @:: Lens' Profile Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteAuthenticationSystem' @:: Lens' Profile (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.profileType' @:: Lens' Profile Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'profileType' @:: Lens' Profile (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.profileId' @:: Lens' Profile Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'profileId' @:: Lens' Profile (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.salesSeriesId' @:: Lens' Profile Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'salesSeriesId' @:: Lens' Profile (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.number' @:: Lens' Profile Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'number' @:: Lens' Profile (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.simplified' @:: Lens' Profile Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'simplified' @:: Lens' Profile (Prelude.Maybe Prelude.Bool)@ -} +data Profile + = Profile'_constructor {_Profile'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _Profile'customerId :: !(Prelude.Maybe Data.Text.Text), + _Profile'legalType :: !(Prelude.Maybe Data.Word.Word32), + _Profile'name :: !(Prelude.Maybe Data.Text.Text), + _Profile'contactInformation :: !(Prelude.Maybe ContactInformation), + _Profile'linkedBrokerageId :: !(Prelude.Maybe Data.Text.Text), + _Profile'removed :: !(Prelude.Maybe Prelude.Bool), + _Profile'obsoleteAuthenticationSystem :: !(Prelude.Maybe Data.Text.Text), + _Profile'profileType :: !(Prelude.Maybe Data.Word.Word32), + _Profile'profileId :: !(Prelude.Maybe Data.Text.Text), + _Profile'salesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _Profile'number :: !(Prelude.Maybe Data.Text.Text), + _Profile'simplified :: !(Prelude.Maybe Prelude.Bool), + _Profile'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Profile where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Profile "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'clearedFields + (\ x__ y__ -> x__ {_Profile'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField Profile "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'clearedFields + (\ x__ y__ -> x__ {_Profile'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "customerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'customerId (\ x__ y__ -> x__ {_Profile'customerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Profile "maybe'customerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'customerId (\ x__ y__ -> x__ {_Profile'customerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "legalType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'legalType (\ x__ y__ -> x__ {_Profile'legalType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Profile "maybe'legalType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'legalType (\ x__ y__ -> x__ {_Profile'legalType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "name" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'name (\ x__ y__ -> x__ {_Profile'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Profile "maybe'name" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'name (\ x__ y__ -> x__ {_Profile'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "contactInformation" ContactInformation where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'contactInformation + (\ x__ y__ -> x__ {_Profile'contactInformation = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Profile "maybe'contactInformation" (Prelude.Maybe ContactInformation) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'contactInformation + (\ x__ y__ -> x__ {_Profile'contactInformation = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "linkedBrokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'linkedBrokerageId + (\ x__ y__ -> x__ {_Profile'linkedBrokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Profile "maybe'linkedBrokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'linkedBrokerageId + (\ x__ y__ -> x__ {_Profile'linkedBrokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "removed" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'removed (\ x__ y__ -> x__ {_Profile'removed = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Profile "maybe'removed" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'removed (\ x__ y__ -> x__ {_Profile'removed = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "obsoleteAuthenticationSystem" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'obsoleteAuthenticationSystem + (\ x__ y__ -> x__ {_Profile'obsoleteAuthenticationSystem = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Profile "maybe'obsoleteAuthenticationSystem" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'obsoleteAuthenticationSystem + (\ x__ y__ -> x__ {_Profile'obsoleteAuthenticationSystem = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "profileType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'profileType + (\ x__ y__ -> x__ {_Profile'profileType = y__})) + (Data.ProtoLens.maybeLens 1) +instance Data.ProtoLens.Field.HasField Profile "maybe'profileType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'profileType + (\ x__ y__ -> x__ {_Profile'profileType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'profileId (\ x__ y__ -> x__ {_Profile'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Profile "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'profileId (\ x__ y__ -> x__ {_Profile'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "salesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'salesSeriesId + (\ x__ y__ -> x__ {_Profile'salesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Profile "maybe'salesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'salesSeriesId + (\ x__ y__ -> x__ {_Profile'salesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "number" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'number (\ x__ y__ -> x__ {_Profile'number = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Profile "maybe'number" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'number (\ x__ y__ -> x__ {_Profile'number = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Profile "simplified" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'simplified (\ x__ y__ -> x__ {_Profile'simplified = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Profile "maybe'simplified" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Profile'simplified (\ x__ y__ -> x__ {_Profile'simplified = y__})) + Prelude.id +instance Data.ProtoLens.Message Profile where + messageName _ = Data.Text.pack "common_1.Profile" + packedMessageDescriptor _ + = "\n\ + \\aProfile\DC2%\n\ + \\SOcleared_fields\CAN\t \ETX(\rR\rclearedFields\DC2\US\n\ + \\vcustomer_id\CAN\SOH \SOH(\tR\n\ + \customerId\DC2\GS\n\ + \\n\ + \legal_type\CAN\STX \SOH(\rR\tlegalType\DC2\DC2\n\ + \\EOTname\CAN\ETX \SOH(\tR\EOTname\DC2M\n\ + \\DC3contact_information\CAN\EOT \SOH(\v2\FS.common_1.ContactInformationR\DC2contactInformation\DC2.\n\ + \\DC3linked_brokerage_id\CAN\ENQ \SOH(\tR\DC1linkedBrokerageId\DC2\CAN\n\ + \\aremoved\CAN\ACK \SOH(\bR\aremoved\DC2H\n\ + \\RSobsolete_authentication_system\CAN\a \SOH(\tR\FSobsoleteAuthenticationSystemB\STX\CAN\SOH\DC2$\n\ + \\fprofile_type\CAN\b \SOH(\r:\SOH1R\vprofileType\DC2\GS\n\ + \\n\ + \profile_id\CAN\v \SOH(\tR\tprofileId\DC2&\n\ + \\SIsales_series_id\CAN\f \SOH(\tR\rsalesSeriesId\DC2\SYN\n\ + \\ACKnumber\CAN\r \SOH(\tR\ACKnumber\DC2\RS\n\ + \\n\ + \simplified\CAN\SO \SOH(\bR\n\ + \simplified" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor Profile + customerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerId")) :: + Data.ProtoLens.FieldDescriptor Profile + legalType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "legal_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'legalType")) :: + Data.ProtoLens.FieldDescriptor Profile + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor Profile + contactInformation__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contact_information" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ContactInformation) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contactInformation")) :: + Data.ProtoLens.FieldDescriptor Profile + linkedBrokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "linked_brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'linkedBrokerageId")) :: + Data.ProtoLens.FieldDescriptor Profile + removed__field_descriptor + = Data.ProtoLens.FieldDescriptor + "removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removed")) :: + Data.ProtoLens.FieldDescriptor Profile + obsoleteAuthenticationSystem__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_authentication_system" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteAuthenticationSystem")) :: + Data.ProtoLens.FieldDescriptor Profile + profileType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileType")) :: + Data.ProtoLens.FieldDescriptor Profile + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor Profile + salesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesId")) :: + Data.ProtoLens.FieldDescriptor Profile + number__field_descriptor + = Data.ProtoLens.FieldDescriptor + "number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'number")) :: + Data.ProtoLens.FieldDescriptor Profile + simplified__field_descriptor + = Data.ProtoLens.FieldDescriptor + "simplified" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'simplified")) :: + Data.ProtoLens.FieldDescriptor Profile + in + Data.Map.fromList + [(Data.ProtoLens.Tag 9, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, customerId__field_descriptor), + (Data.ProtoLens.Tag 2, legalType__field_descriptor), + (Data.ProtoLens.Tag 3, name__field_descriptor), + (Data.ProtoLens.Tag 4, contactInformation__field_descriptor), + (Data.ProtoLens.Tag 5, linkedBrokerageId__field_descriptor), + (Data.ProtoLens.Tag 6, removed__field_descriptor), + (Data.ProtoLens.Tag 7, + obsoleteAuthenticationSystem__field_descriptor), + (Data.ProtoLens.Tag 8, profileType__field_descriptor), + (Data.ProtoLens.Tag 11, profileId__field_descriptor), + (Data.ProtoLens.Tag 12, salesSeriesId__field_descriptor), + (Data.ProtoLens.Tag 13, number__field_descriptor), + (Data.ProtoLens.Tag 14, simplified__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Profile'_unknownFields + (\ x__ y__ -> x__ {_Profile'_unknownFields = y__}) + defMessage + = Profile'_constructor + {_Profile'clearedFields = Data.Vector.Generic.empty, + _Profile'customerId = Prelude.Nothing, + _Profile'legalType = Prelude.Nothing, + _Profile'name = Prelude.Nothing, + _Profile'contactInformation = Prelude.Nothing, + _Profile'linkedBrokerageId = Prelude.Nothing, + _Profile'removed = Prelude.Nothing, + _Profile'obsoleteAuthenticationSystem = Prelude.Nothing, + _Profile'profileType = Prelude.Nothing, + _Profile'profileId = Prelude.Nothing, + _Profile'salesSeriesId = Prelude.Nothing, + _Profile'number = Prelude.Nothing, + _Profile'simplified = Prelude.Nothing, + _Profile'_unknownFields = []} + parseMessage + = let + loop :: + Profile + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser Profile + loop x mutable'clearedFields + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 72 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x v + 74 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x y + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"customerId") y x) + mutable'clearedFields + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "legal_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"legalType") y x) + mutable'clearedFields + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + mutable'clearedFields + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "contact_information" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contactInformation") y x) + mutable'clearedFields + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "linked_brokerage_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"linkedBrokerageId") y x) + mutable'clearedFields + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "removed" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"removed") y x) + mutable'clearedFields + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_authentication_system" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteAuthenticationSystem") y + x) + mutable'clearedFields + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "profile_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileType") y x) + mutable'clearedFields + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + mutable'clearedFields + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesId") y x) + mutable'clearedFields + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "number" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"number") y x) + mutable'clearedFields + 112 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "simplified" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"simplified") y x) + mutable'clearedFields + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'clearedFields + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'clearedFields) + "Profile" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'customerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'legalType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'contactInformation") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'linkedBrokerageId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'removed") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteAuthenticationSystem") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'salesSeriesId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'number") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'simplified") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 112) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x)))))))))))))) +instance Control.DeepSeq.NFData Profile where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Profile'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Profile'clearedFields x__) + (Control.DeepSeq.deepseq + (_Profile'customerId x__) + (Control.DeepSeq.deepseq + (_Profile'legalType x__) + (Control.DeepSeq.deepseq + (_Profile'name x__) + (Control.DeepSeq.deepseq + (_Profile'contactInformation x__) + (Control.DeepSeq.deepseq + (_Profile'linkedBrokerageId x__) + (Control.DeepSeq.deepseq + (_Profile'removed x__) + (Control.DeepSeq.deepseq + (_Profile'obsoleteAuthenticationSystem x__) + (Control.DeepSeq.deepseq + (_Profile'profileType x__) + (Control.DeepSeq.deepseq + (_Profile'profileId x__) + (Control.DeepSeq.deepseq + (_Profile'salesSeriesId x__) + (Control.DeepSeq.deepseq + (_Profile'number x__) + (Control.DeepSeq.deepseq + (_Profile'simplified x__) ()))))))))))))) +data ProfileType + = PROFILE_TYPE_CUSTOMER | + PROFILE_TYPE_ADMIN | + PROFILE_TYPE_BROKERAGE | + PROFILE_TYPE_SUBSCRIBER | + PROFILE_TYPE_SALES_SERIES + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum ProfileType where + maybeToEnum 1 = Prelude.Just PROFILE_TYPE_CUSTOMER + maybeToEnum 2 = Prelude.Just PROFILE_TYPE_ADMIN + maybeToEnum 3 = Prelude.Just PROFILE_TYPE_BROKERAGE + maybeToEnum 4 = Prelude.Just PROFILE_TYPE_SUBSCRIBER + maybeToEnum 5 = Prelude.Just PROFILE_TYPE_SALES_SERIES + maybeToEnum _ = Prelude.Nothing + showEnum PROFILE_TYPE_CUSTOMER = "PROFILE_TYPE_CUSTOMER" + showEnum PROFILE_TYPE_ADMIN = "PROFILE_TYPE_ADMIN" + showEnum PROFILE_TYPE_BROKERAGE = "PROFILE_TYPE_BROKERAGE" + showEnum PROFILE_TYPE_SUBSCRIBER = "PROFILE_TYPE_SUBSCRIBER" + showEnum PROFILE_TYPE_SALES_SERIES = "PROFILE_TYPE_SALES_SERIES" + readEnum k + | (Prelude.==) k "PROFILE_TYPE_CUSTOMER" + = Prelude.Just PROFILE_TYPE_CUSTOMER + | (Prelude.==) k "PROFILE_TYPE_ADMIN" + = Prelude.Just PROFILE_TYPE_ADMIN + | (Prelude.==) k "PROFILE_TYPE_BROKERAGE" + = Prelude.Just PROFILE_TYPE_BROKERAGE + | (Prelude.==) k "PROFILE_TYPE_SUBSCRIBER" + = Prelude.Just PROFILE_TYPE_SUBSCRIBER + | (Prelude.==) k "PROFILE_TYPE_SALES_SERIES" + = Prelude.Just PROFILE_TYPE_SALES_SERIES + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded ProfileType where + minBound = PROFILE_TYPE_CUSTOMER + maxBound = PROFILE_TYPE_SALES_SERIES +instance Prelude.Enum ProfileType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum ProfileType: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum PROFILE_TYPE_CUSTOMER = 1 + fromEnum PROFILE_TYPE_ADMIN = 2 + fromEnum PROFILE_TYPE_BROKERAGE = 3 + fromEnum PROFILE_TYPE_SUBSCRIBER = 4 + fromEnum PROFILE_TYPE_SALES_SERIES = 5 + succ PROFILE_TYPE_SALES_SERIES + = Prelude.error + "ProfileType.succ: bad argument PROFILE_TYPE_SALES_SERIES. This value would be out of bounds." + succ PROFILE_TYPE_CUSTOMER = PROFILE_TYPE_ADMIN + succ PROFILE_TYPE_ADMIN = PROFILE_TYPE_BROKERAGE + succ PROFILE_TYPE_BROKERAGE = PROFILE_TYPE_SUBSCRIBER + succ PROFILE_TYPE_SUBSCRIBER = PROFILE_TYPE_SALES_SERIES + pred PROFILE_TYPE_CUSTOMER + = Prelude.error + "ProfileType.pred: bad argument PROFILE_TYPE_CUSTOMER. This value would be out of bounds." + pred PROFILE_TYPE_ADMIN = PROFILE_TYPE_CUSTOMER + pred PROFILE_TYPE_BROKERAGE = PROFILE_TYPE_ADMIN + pred PROFILE_TYPE_SUBSCRIBER = PROFILE_TYPE_BROKERAGE + pred PROFILE_TYPE_SALES_SERIES = PROFILE_TYPE_SUBSCRIBER + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault ProfileType where + fieldDefault = PROFILE_TYPE_CUSTOMER +instance Control.DeepSeq.NFData ProfileType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.id' @:: Lens' RemoveUser Data.Text.Text@ -} +data RemoveUser + = RemoveUser'_constructor {_RemoveUser'id :: !Data.Text.Text, + _RemoveUser'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RemoveUser where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RemoveUser "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RemoveUser'id (\ x__ y__ -> x__ {_RemoveUser'id = y__})) + Prelude.id +instance Data.ProtoLens.Message RemoveUser where + messageName _ = Data.Text.pack "common_1.RemoveUser" + packedMessageDescriptor _ + = "\n\ + \\n\ + \RemoveUser\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\tR\STXid" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"id")) :: + Data.ProtoLens.FieldDescriptor RemoveUser + in Data.Map.fromList [(Data.ProtoLens.Tag 1, id__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RemoveUser'_unknownFields + (\ x__ y__ -> x__ {_RemoveUser'_unknownFields = y__}) + defMessage + = RemoveUser'_constructor + {_RemoveUser'id = Data.ProtoLens.fieldDefault, + _RemoveUser'_unknownFields = []} + parseMessage + = let + loop :: + RemoveUser + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser RemoveUser + loop x required'id + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = (if required'id then (:) "id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'id + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "RemoveUser" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"id") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData RemoveUser where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RemoveUser'_unknownFields x__) + (Control.DeepSeq.deepseq (_RemoveUser'id x__) ()) +{- | Fields : + -} +data RemoveUserResult + = RemoveUserResult'_constructor {_RemoveUserResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RemoveUserResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message RemoveUserResult where + messageName _ = Data.Text.pack "common_1.RemoveUserResult" + packedMessageDescriptor _ + = "\n\ + \\DLERemoveUserResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _RemoveUserResult'_unknownFields + (\ x__ y__ -> x__ {_RemoveUserResult'_unknownFields = y__}) + defMessage + = RemoveUserResult'_constructor + {_RemoveUserResult'_unknownFields = []} + parseMessage + = let + loop :: + RemoveUserResult + -> Data.ProtoLens.Encoding.Bytes.Parser RemoveUserResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RemoveUserResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData RemoveUserResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RemoveUserResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.sessionToken' @:: Lens' RestoreOrJoinSession Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.clientAppId' @:: Lens' RestoreOrJoinSession Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.clientIpAddress' @:: Lens' RestoreOrJoinSession Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'clientIpAddress' @:: Lens' RestoreOrJoinSession (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.subscribeOnRequestStatusChange' @:: Lens' RestoreOrJoinSession Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'subscribeOnRequestStatusChange' @:: Lens' RestoreOrJoinSession (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.operationType' @:: Lens' RestoreOrJoinSession Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'operationType' @:: Lens' RestoreOrJoinSession (Prelude.Maybe Data.Word.Word32)@ -} +data RestoreOrJoinSession + = RestoreOrJoinSession'_constructor {_RestoreOrJoinSession'sessionToken :: !Data.Text.Text, + _RestoreOrJoinSession'clientAppId :: !Data.Text.Text, + _RestoreOrJoinSession'clientIpAddress :: !(Prelude.Maybe Data.Text.Text), + _RestoreOrJoinSession'subscribeOnRequestStatusChange :: !(Prelude.Maybe Prelude.Bool), + _RestoreOrJoinSession'operationType :: !(Prelude.Maybe Data.Word.Word32), + _RestoreOrJoinSession'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RestoreOrJoinSession where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RestoreOrJoinSession "sessionToken" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreOrJoinSession'sessionToken + (\ x__ y__ -> x__ {_RestoreOrJoinSession'sessionToken = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RestoreOrJoinSession "clientAppId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreOrJoinSession'clientAppId + (\ x__ y__ -> x__ {_RestoreOrJoinSession'clientAppId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RestoreOrJoinSession "clientIpAddress" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreOrJoinSession'clientIpAddress + (\ x__ y__ -> x__ {_RestoreOrJoinSession'clientIpAddress = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RestoreOrJoinSession "maybe'clientIpAddress" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreOrJoinSession'clientIpAddress + (\ x__ y__ -> x__ {_RestoreOrJoinSession'clientIpAddress = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RestoreOrJoinSession "subscribeOnRequestStatusChange" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreOrJoinSession'subscribeOnRequestStatusChange + (\ x__ y__ + -> x__ + {_RestoreOrJoinSession'subscribeOnRequestStatusChange = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField RestoreOrJoinSession "maybe'subscribeOnRequestStatusChange" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreOrJoinSession'subscribeOnRequestStatusChange + (\ x__ y__ + -> x__ + {_RestoreOrJoinSession'subscribeOnRequestStatusChange = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RestoreOrJoinSession "operationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreOrJoinSession'operationType + (\ x__ y__ -> x__ {_RestoreOrJoinSession'operationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RestoreOrJoinSession "maybe'operationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreOrJoinSession'operationType + (\ x__ y__ -> x__ {_RestoreOrJoinSession'operationType = y__})) + Prelude.id +instance Data.ProtoLens.Message RestoreOrJoinSession where + messageName _ = Data.Text.pack "common_1.RestoreOrJoinSession" + packedMessageDescriptor _ + = "\n\ + \\DC4RestoreOrJoinSession\DC2#\n\ + \\rsession_token\CAN\SOH \STX(\tR\fsessionToken\DC2\"\n\ + \\rclient_app_id\CAN\STX \STX(\tR\vclientAppId\DC2*\n\ + \\DC1client_ip_address\CAN\ETX \SOH(\tR\SIclientIpAddress\DC2Q\n\ + \\"subscribe_on_request_status_change\CAN\EOT \SOH(\b:\ENQfalseR\RSsubscribeOnRequestStatusChange\DC2%\n\ + \\SOoperation_type\CAN\ENQ \SOH(\rR\roperationType\"&\n\ + \\rOperationType\DC2\v\n\ + \\aRESTORE\DLE\SOH\DC2\b\n\ + \\EOTJOIN\DLE\STX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + sessionToken__field_descriptor + = Data.ProtoLens.FieldDescriptor + "session_token" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"sessionToken")) :: + Data.ProtoLens.FieldDescriptor RestoreOrJoinSession + clientAppId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_app_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"clientAppId")) :: + Data.ProtoLens.FieldDescriptor RestoreOrJoinSession + clientIpAddress__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_ip_address" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'clientIpAddress")) :: + Data.ProtoLens.FieldDescriptor RestoreOrJoinSession + subscribeOnRequestStatusChange__field_descriptor + = Data.ProtoLens.FieldDescriptor + "subscribe_on_request_status_change" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'subscribeOnRequestStatusChange")) :: + Data.ProtoLens.FieldDescriptor RestoreOrJoinSession + operationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'operationType")) :: + Data.ProtoLens.FieldDescriptor RestoreOrJoinSession + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, sessionToken__field_descriptor), + (Data.ProtoLens.Tag 2, clientAppId__field_descriptor), + (Data.ProtoLens.Tag 3, clientIpAddress__field_descriptor), + (Data.ProtoLens.Tag 4, + subscribeOnRequestStatusChange__field_descriptor), + (Data.ProtoLens.Tag 5, operationType__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RestoreOrJoinSession'_unknownFields + (\ x__ y__ -> x__ {_RestoreOrJoinSession'_unknownFields = y__}) + defMessage + = RestoreOrJoinSession'_constructor + {_RestoreOrJoinSession'sessionToken = Data.ProtoLens.fieldDefault, + _RestoreOrJoinSession'clientAppId = Data.ProtoLens.fieldDefault, + _RestoreOrJoinSession'clientIpAddress = Prelude.Nothing, + _RestoreOrJoinSession'subscribeOnRequestStatusChange = Prelude.Nothing, + _RestoreOrJoinSession'operationType = Prelude.Nothing, + _RestoreOrJoinSession'_unknownFields = []} + parseMessage + = let + loop :: + RestoreOrJoinSession + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser RestoreOrJoinSession + loop x required'clientAppId required'sessionToken + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'clientAppId then + (:) "client_app_id" + else + Prelude.id) + ((if required'sessionToken then + (:) "session_token" + else + Prelude.id) + []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "session_token" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"sessionToken") y x) + required'clientAppId Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_app_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"clientAppId") y x) + Prelude.False required'sessionToken + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_ip_address" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"clientIpAddress") y x) + required'clientAppId required'sessionToken + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "subscribe_on_request_status_change" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"subscribeOnRequestStatusChange") + y x) + required'clientAppId required'sessionToken + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationType") y x) + required'clientAppId required'sessionToken + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'clientAppId required'sessionToken + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "RestoreOrJoinSession" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"sessionToken") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"clientAppId") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'clientIpAddress") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'subscribeOnRequestStatusChange") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'operationType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData RestoreOrJoinSession where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RestoreOrJoinSession'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RestoreOrJoinSession'sessionToken x__) + (Control.DeepSeq.deepseq + (_RestoreOrJoinSession'clientAppId x__) + (Control.DeepSeq.deepseq + (_RestoreOrJoinSession'clientIpAddress x__) + (Control.DeepSeq.deepseq + (_RestoreOrJoinSession'subscribeOnRequestStatusChange x__) + (Control.DeepSeq.deepseq + (_RestoreOrJoinSession'operationType x__) ()))))) +data RestoreOrJoinSession'OperationType + = RestoreOrJoinSession'RESTORE | RestoreOrJoinSession'JOIN + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum RestoreOrJoinSession'OperationType where + maybeToEnum 1 = Prelude.Just RestoreOrJoinSession'RESTORE + maybeToEnum 2 = Prelude.Just RestoreOrJoinSession'JOIN + maybeToEnum _ = Prelude.Nothing + showEnum RestoreOrJoinSession'RESTORE = "RESTORE" + showEnum RestoreOrJoinSession'JOIN = "JOIN" + readEnum k + | (Prelude.==) k "RESTORE" + = Prelude.Just RestoreOrJoinSession'RESTORE + | (Prelude.==) k "JOIN" = Prelude.Just RestoreOrJoinSession'JOIN + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded RestoreOrJoinSession'OperationType where + minBound = RestoreOrJoinSession'RESTORE + maxBound = RestoreOrJoinSession'JOIN +instance Prelude.Enum RestoreOrJoinSession'OperationType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum OperationType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum RestoreOrJoinSession'RESTORE = 1 + fromEnum RestoreOrJoinSession'JOIN = 2 + succ RestoreOrJoinSession'JOIN + = Prelude.error + "RestoreOrJoinSession'OperationType.succ: bad argument RestoreOrJoinSession'JOIN. This value would be out of bounds." + succ RestoreOrJoinSession'RESTORE = RestoreOrJoinSession'JOIN + pred RestoreOrJoinSession'RESTORE + = Prelude.error + "RestoreOrJoinSession'OperationType.pred: bad argument RestoreOrJoinSession'RESTORE. This value would be out of bounds." + pred RestoreOrJoinSession'JOIN = RestoreOrJoinSession'RESTORE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault RestoreOrJoinSession'OperationType where + fieldDefault = RestoreOrJoinSession'RESTORE +instance Control.DeepSeq.NFData RestoreOrJoinSession'OperationType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.operationStatus' @:: Lens' RestoreOrJoinSessionResult Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.errorMessage' @:: Lens' RestoreOrJoinSessionResult Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.maybe'errorMessage' @:: Lens' RestoreOrJoinSessionResult (Prelude.Maybe Proto.Common.Shared1.Text)@ -} +data RestoreOrJoinSessionResult + = RestoreOrJoinSessionResult'_constructor {_RestoreOrJoinSessionResult'operationStatus :: !Data.Word.Word32, + _RestoreOrJoinSessionResult'errorMessage :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _RestoreOrJoinSessionResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RestoreOrJoinSessionResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RestoreOrJoinSessionResult "operationStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreOrJoinSessionResult'operationStatus + (\ x__ y__ + -> x__ {_RestoreOrJoinSessionResult'operationStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RestoreOrJoinSessionResult "errorMessage" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreOrJoinSessionResult'errorMessage + (\ x__ y__ + -> x__ {_RestoreOrJoinSessionResult'errorMessage = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RestoreOrJoinSessionResult "maybe'errorMessage" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreOrJoinSessionResult'errorMessage + (\ x__ y__ + -> x__ {_RestoreOrJoinSessionResult'errorMessage = y__})) + Prelude.id +instance Data.ProtoLens.Message RestoreOrJoinSessionResult where + messageName _ + = Data.Text.pack "common_1.RestoreOrJoinSessionResult" + packedMessageDescriptor _ + = "\n\ + \\SUBRestoreOrJoinSessionResult\DC2)\n\ + \\DLEoperation_status\CAN\SOH \STX(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\STX \SOH(\v2\SO.shared_1.TextR\ferrorMessage" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + operationStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"operationStatus")) :: + Data.ProtoLens.FieldDescriptor RestoreOrJoinSessionResult + errorMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "error_message" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'errorMessage")) :: + Data.ProtoLens.FieldDescriptor RestoreOrJoinSessionResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, operationStatus__field_descriptor), + (Data.ProtoLens.Tag 2, errorMessage__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RestoreOrJoinSessionResult'_unknownFields + (\ x__ y__ + -> x__ {_RestoreOrJoinSessionResult'_unknownFields = y__}) + defMessage + = RestoreOrJoinSessionResult'_constructor + {_RestoreOrJoinSessionResult'operationStatus = Data.ProtoLens.fieldDefault, + _RestoreOrJoinSessionResult'errorMessage = Prelude.Nothing, + _RestoreOrJoinSessionResult'_unknownFields = []} + parseMessage + = let + loop :: + RestoreOrJoinSessionResult + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser RestoreOrJoinSessionResult + loop x required'operationStatus + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'operationStatus then + (:) "operation_status" + else + Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationStatus") y x) + Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "error_message" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"errorMessage") y x) + required'operationStatus + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'operationStatus + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "RestoreOrJoinSessionResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"operationStatus") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'errorMessage") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData RestoreOrJoinSessionResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RestoreOrJoinSessionResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RestoreOrJoinSessionResult'operationStatus x__) + (Control.DeepSeq.deepseq + (_RestoreOrJoinSessionResult'errorMessage x__) ())) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.id' @:: Lens' RestoreUser Data.Text.Text@ -} +data RestoreUser + = RestoreUser'_constructor {_RestoreUser'id :: !Data.Text.Text, + _RestoreUser'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RestoreUser where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RestoreUser "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreUser'id (\ x__ y__ -> x__ {_RestoreUser'id = y__})) + Prelude.id +instance Data.ProtoLens.Message RestoreUser where + messageName _ = Data.Text.pack "common_1.RestoreUser" + packedMessageDescriptor _ + = "\n\ + \\vRestoreUser\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\tR\STXid" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"id")) :: + Data.ProtoLens.FieldDescriptor RestoreUser + in Data.Map.fromList [(Data.ProtoLens.Tag 1, id__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RestoreUser'_unknownFields + (\ x__ y__ -> x__ {_RestoreUser'_unknownFields = y__}) + defMessage + = RestoreUser'_constructor + {_RestoreUser'id = Data.ProtoLens.fieldDefault, + _RestoreUser'_unknownFields = []} + parseMessage + = let + loop :: + RestoreUser + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser RestoreUser + loop x required'id + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = (if required'id then (:) "id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'id + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "RestoreUser" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"id") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData RestoreUser where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RestoreUser'_unknownFields x__) + (Control.DeepSeq.deepseq (_RestoreUser'id x__) ()) +{- | Fields : + -} +data RestoreUserResult + = RestoreUserResult'_constructor {_RestoreUserResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RestoreUserResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message RestoreUserResult where + messageName _ = Data.Text.pack "common_1.RestoreUserResult" + packedMessageDescriptor _ + = "\n\ + \\DC1RestoreUserResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _RestoreUserResult'_unknownFields + (\ x__ y__ -> x__ {_RestoreUserResult'_unknownFields = y__}) + defMessage + = RestoreUserResult'_constructor + {_RestoreUserResult'_unknownFields = []} + parseMessage + = let + loop :: + RestoreUserResult + -> Data.ProtoLens.Encoding.Bytes.Parser RestoreUserResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RestoreUserResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData RestoreUserResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RestoreUserResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.id' @:: Lens' SalesSeriesInfo Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'id' @:: Lens' SalesSeriesInfo (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.salesSeriesName' @:: Lens' SalesSeriesInfo Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'salesSeriesName' @:: Lens' SalesSeriesInfo (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.salesSeriesNumber' @:: Lens' SalesSeriesInfo Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'salesSeriesNumber' @:: Lens' SalesSeriesInfo (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.profileId' @:: Lens' SalesSeriesInfo Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'profileId' @:: Lens' SalesSeriesInfo (Prelude.Maybe Data.Text.Text)@ -} +data SalesSeriesInfo + = SalesSeriesInfo'_constructor {_SalesSeriesInfo'id :: !(Prelude.Maybe Data.Text.Text), + _SalesSeriesInfo'salesSeriesName :: !(Prelude.Maybe Data.Text.Text), + _SalesSeriesInfo'salesSeriesNumber :: !(Prelude.Maybe Data.Text.Text), + _SalesSeriesInfo'profileId :: !(Prelude.Maybe Data.Text.Text), + _SalesSeriesInfo'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SalesSeriesInfo where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SalesSeriesInfo "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesInfo'id (\ x__ y__ -> x__ {_SalesSeriesInfo'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SalesSeriesInfo "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesInfo'id (\ x__ y__ -> x__ {_SalesSeriesInfo'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesInfo "salesSeriesName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesInfo'salesSeriesName + (\ x__ y__ -> x__ {_SalesSeriesInfo'salesSeriesName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SalesSeriesInfo "maybe'salesSeriesName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesInfo'salesSeriesName + (\ x__ y__ -> x__ {_SalesSeriesInfo'salesSeriesName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesInfo "salesSeriesNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesInfo'salesSeriesNumber + (\ x__ y__ -> x__ {_SalesSeriesInfo'salesSeriesNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SalesSeriesInfo "maybe'salesSeriesNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesInfo'salesSeriesNumber + (\ x__ y__ -> x__ {_SalesSeriesInfo'salesSeriesNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesInfo "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesInfo'profileId + (\ x__ y__ -> x__ {_SalesSeriesInfo'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SalesSeriesInfo "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesInfo'profileId + (\ x__ y__ -> x__ {_SalesSeriesInfo'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Message SalesSeriesInfo where + messageName _ = Data.Text.pack "common_1.SalesSeriesInfo" + packedMessageDescriptor _ + = "\n\ + \\SISalesSeriesInfo\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2*\n\ + \\DC1sales_series_name\CAN\STX \SOH(\tR\SIsalesSeriesName\DC2.\n\ + \\DC3sales_series_number\CAN\ETX \SOH(\tR\DC1salesSeriesNumber\DC2\GS\n\ + \\n\ + \profile_id\CAN\EOT \SOH(\tR\tprofileId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesInfo + salesSeriesName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesName")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesInfo + salesSeriesNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesNumber")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesInfo + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesInfo + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, salesSeriesName__field_descriptor), + (Data.ProtoLens.Tag 3, salesSeriesNumber__field_descriptor), + (Data.ProtoLens.Tag 4, profileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SalesSeriesInfo'_unknownFields + (\ x__ y__ -> x__ {_SalesSeriesInfo'_unknownFields = y__}) + defMessage + = SalesSeriesInfo'_constructor + {_SalesSeriesInfo'id = Prelude.Nothing, + _SalesSeriesInfo'salesSeriesName = Prelude.Nothing, + _SalesSeriesInfo'salesSeriesNumber = Prelude.Nothing, + _SalesSeriesInfo'profileId = Prelude.Nothing, + _SalesSeriesInfo'_unknownFields = []} + parseMessage + = let + loop :: + SalesSeriesInfo + -> Data.ProtoLens.Encoding.Bytes.Parser SalesSeriesInfo + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesName") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesNumber") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "SalesSeriesInfo" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'salesSeriesName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'salesSeriesNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData SalesSeriesInfo where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SalesSeriesInfo'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SalesSeriesInfo'id x__) + (Control.DeepSeq.deepseq + (_SalesSeriesInfo'salesSeriesName x__) + (Control.DeepSeq.deepseq + (_SalesSeriesInfo'salesSeriesNumber x__) + (Control.DeepSeq.deepseq (_SalesSeriesInfo'profileId x__) ())))) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.salesSeries' @:: Lens' SalesSeriesListResult [SalesSeriesInfo]@ + * 'Proto.CMS.Common1_Fields.vec'salesSeries' @:: Lens' SalesSeriesListResult (Data.Vector.Vector SalesSeriesInfo)@ + * 'Proto.CMS.Common1_Fields.isComplete' @:: Lens' SalesSeriesListResult Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'isComplete' @:: Lens' SalesSeriesListResult (Prelude.Maybe Prelude.Bool)@ -} +data SalesSeriesListResult + = SalesSeriesListResult'_constructor {_SalesSeriesListResult'salesSeries :: !(Data.Vector.Vector SalesSeriesInfo), + _SalesSeriesListResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _SalesSeriesListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SalesSeriesListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SalesSeriesListResult "salesSeries" [SalesSeriesInfo] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesListResult'salesSeries + (\ x__ y__ -> x__ {_SalesSeriesListResult'salesSeries = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField SalesSeriesListResult "vec'salesSeries" (Data.Vector.Vector SalesSeriesInfo) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesListResult'salesSeries + (\ x__ y__ -> x__ {_SalesSeriesListResult'salesSeries = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesListResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesListResult'isComplete + (\ x__ y__ -> x__ {_SalesSeriesListResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField SalesSeriesListResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesListResult'isComplete + (\ x__ y__ -> x__ {_SalesSeriesListResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Message SalesSeriesListResult where + messageName _ = Data.Text.pack "common_1.SalesSeriesListResult" + packedMessageDescriptor _ + = "\n\ + \\NAKSalesSeriesListResult\DC2<\n\ + \\fsales_series\CAN\SOH \ETX(\v2\EM.common_1.SalesSeriesInfoR\vsalesSeries\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + salesSeries__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SalesSeriesInfo) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"salesSeries")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesListResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, salesSeries__field_descriptor), + (Data.ProtoLens.Tag 2, isComplete__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SalesSeriesListResult'_unknownFields + (\ x__ y__ -> x__ {_SalesSeriesListResult'_unknownFields = y__}) + defMessage + = SalesSeriesListResult'_constructor + {_SalesSeriesListResult'salesSeries = Data.Vector.Generic.empty, + _SalesSeriesListResult'isComplete = Prelude.Nothing, + _SalesSeriesListResult'_unknownFields = []} + parseMessage + = let + loop :: + SalesSeriesListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld SalesSeriesInfo + -> Data.ProtoLens.Encoding.Bytes.Parser SalesSeriesListResult + loop x mutable'salesSeries + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'salesSeries <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'salesSeries) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'salesSeries") frozen'salesSeries + x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "sales_series" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'salesSeries y) + loop x v + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + mutable'salesSeries + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'salesSeries + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'salesSeries <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'salesSeries) + "SalesSeriesListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'salesSeries") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData SalesSeriesListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SalesSeriesListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SalesSeriesListResult'salesSeries x__) + (Control.DeepSeq.deepseq + (_SalesSeriesListResult'isComplete x__) ())) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.obsoleteText' @:: Lens' SalesSeriesSearchRequest Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteText' @:: Lens' SalesSeriesSearchRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.obsoleteSearchCriteria' @:: Lens' SalesSeriesSearchRequest [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'obsoleteSearchCriteria' @:: Lens' SalesSeriesSearchRequest (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.searchOptions' @:: Lens' SalesSeriesSearchRequest [SearchOption]@ + * 'Proto.CMS.Common1_Fields.vec'searchOptions' @:: Lens' SalesSeriesSearchRequest (Data.Vector.Vector SearchOption)@ + * 'Proto.CMS.Common1_Fields.allMatchMode' @:: Lens' SalesSeriesSearchRequest Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'allMatchMode' @:: Lens' SalesSeriesSearchRequest (Prelude.Maybe Prelude.Bool)@ -} +data SalesSeriesSearchRequest + = SalesSeriesSearchRequest'_constructor {_SalesSeriesSearchRequest'obsoleteText :: !(Prelude.Maybe Data.Text.Text), + _SalesSeriesSearchRequest'obsoleteSearchCriteria :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _SalesSeriesSearchRequest'searchOptions :: !(Data.Vector.Vector SearchOption), + _SalesSeriesSearchRequest'allMatchMode :: !(Prelude.Maybe Prelude.Bool), + _SalesSeriesSearchRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SalesSeriesSearchRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchRequest "obsoleteText" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchRequest'obsoleteText + (\ x__ y__ -> x__ {_SalesSeriesSearchRequest'obsoleteText = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchRequest "maybe'obsoleteText" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchRequest'obsoleteText + (\ x__ y__ -> x__ {_SalesSeriesSearchRequest'obsoleteText = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesSearchRequest "obsoleteSearchCriteria" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchRequest'obsoleteSearchCriteria + (\ x__ y__ + -> x__ {_SalesSeriesSearchRequest'obsoleteSearchCriteria = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchRequest "vec'obsoleteSearchCriteria" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchRequest'obsoleteSearchCriteria + (\ x__ y__ + -> x__ {_SalesSeriesSearchRequest'obsoleteSearchCriteria = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesSearchRequest "searchOptions" [SearchOption] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchRequest'searchOptions + (\ x__ y__ -> x__ {_SalesSeriesSearchRequest'searchOptions = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchRequest "vec'searchOptions" (Data.Vector.Vector SearchOption) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchRequest'searchOptions + (\ x__ y__ -> x__ {_SalesSeriesSearchRequest'searchOptions = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesSearchRequest "allMatchMode" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_SalesSeriesSearchRequest'allMatchMode = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchRequest "maybe'allMatchMode" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_SalesSeriesSearchRequest'allMatchMode = y__})) + Prelude.id +instance Data.ProtoLens.Message SalesSeriesSearchRequest where + messageName _ = Data.Text.pack "common_1.SalesSeriesSearchRequest" + packedMessageDescriptor _ + = "\n\ + \\CANSalesSeriesSearchRequest\DC2'\n\ + \\robsolete_text\CAN\SOH \SOH(\tR\fobsoleteTextB\STX\CAN\SOH\DC2<\n\ + \\CANobsolete_search_criteria\CAN\STX \ETX(\rR\SYNobsoleteSearchCriteriaB\STX\CAN\SOH\DC2=\n\ + \\SOsearch_options\CAN\ETX \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\EOT \SOH(\b:\ENQfalseR\fallMatchMode\"_\n\ + \\SOSearchCriteria\DC2\ACK\n\ + \\STXID\DLE\SOH\DC2\n\ + \\n\ + \\ACKNUMBER\DLE\STX\DC2\b\n\ + \\EOTNAME\DLE\ETX\DC2\DLE\n\ + \\fBROKERAGE_ID\DLE\EOT\DC2\SO\n\ + \\n\ + \FIRST_NAME\DLE\ENQ\DC2\r\n\ + \\tLAST_NAME\DLE\ACK" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteText__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_text" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteText")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesSearchRequest + obsoleteSearchCriteria__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_search_criteria" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"obsoleteSearchCriteria")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesSearchRequest + searchOptions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "search_options" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SearchOption) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"searchOptions")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesSearchRequest + allMatchMode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "all_match_mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allMatchMode")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesSearchRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteText__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteSearchCriteria__field_descriptor), + (Data.ProtoLens.Tag 3, searchOptions__field_descriptor), + (Data.ProtoLens.Tag 4, allMatchMode__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SalesSeriesSearchRequest'_unknownFields + (\ x__ y__ -> x__ {_SalesSeriesSearchRequest'_unknownFields = y__}) + defMessage + = SalesSeriesSearchRequest'_constructor + {_SalesSeriesSearchRequest'obsoleteText = Prelude.Nothing, + _SalesSeriesSearchRequest'obsoleteSearchCriteria = Data.Vector.Generic.empty, + _SalesSeriesSearchRequest'searchOptions = Data.Vector.Generic.empty, + _SalesSeriesSearchRequest'allMatchMode = Prelude.Nothing, + _SalesSeriesSearchRequest'_unknownFields = []} + parseMessage + = let + loop :: + SalesSeriesSearchRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld SearchOption + -> Data.ProtoLens.Encoding.Bytes.Parser SalesSeriesSearchRequest + loop x mutable'obsoleteSearchCriteria mutable'searchOptions + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'obsoleteSearchCriteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'obsoleteSearchCriteria) + frozen'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'searchOptions) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria") + frozen'obsoleteSearchCriteria + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'searchOptions") + frozen'searchOptions x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_text" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteText") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + 16 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_search_criteria" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'obsoleteSearchCriteria y) + loop x v mutable'searchOptions + 18 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_search_criteria" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'obsoleteSearchCriteria) + loop x y mutable'searchOptions + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "search_options" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'searchOptions y) + loop x mutable'obsoleteSearchCriteria v + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "all_match_mode" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allMatchMode") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'obsoleteSearchCriteria mutable'searchOptions + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'obsoleteSearchCriteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'obsoleteSearchCriteria + mutable'searchOptions) + "SalesSeriesSearchRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteText") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'searchOptions") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allMatchMode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData SalesSeriesSearchRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SalesSeriesSearchRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SalesSeriesSearchRequest'obsoleteText x__) + (Control.DeepSeq.deepseq + (_SalesSeriesSearchRequest'obsoleteSearchCriteria x__) + (Control.DeepSeq.deepseq + (_SalesSeriesSearchRequest'searchOptions x__) + (Control.DeepSeq.deepseq + (_SalesSeriesSearchRequest'allMatchMode x__) ())))) +data SalesSeriesSearchRequest'SearchCriteria + = SalesSeriesSearchRequest'ID | + SalesSeriesSearchRequest'NUMBER | + SalesSeriesSearchRequest'NAME | + SalesSeriesSearchRequest'BROKERAGE_ID | + SalesSeriesSearchRequest'FIRST_NAME | + SalesSeriesSearchRequest'LAST_NAME + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum SalesSeriesSearchRequest'SearchCriteria where + maybeToEnum 1 = Prelude.Just SalesSeriesSearchRequest'ID + maybeToEnum 2 = Prelude.Just SalesSeriesSearchRequest'NUMBER + maybeToEnum 3 = Prelude.Just SalesSeriesSearchRequest'NAME + maybeToEnum 4 = Prelude.Just SalesSeriesSearchRequest'BROKERAGE_ID + maybeToEnum 5 = Prelude.Just SalesSeriesSearchRequest'FIRST_NAME + maybeToEnum 6 = Prelude.Just SalesSeriesSearchRequest'LAST_NAME + maybeToEnum _ = Prelude.Nothing + showEnum SalesSeriesSearchRequest'ID = "ID" + showEnum SalesSeriesSearchRequest'NUMBER = "NUMBER" + showEnum SalesSeriesSearchRequest'NAME = "NAME" + showEnum SalesSeriesSearchRequest'BROKERAGE_ID = "BROKERAGE_ID" + showEnum SalesSeriesSearchRequest'FIRST_NAME = "FIRST_NAME" + showEnum SalesSeriesSearchRequest'LAST_NAME = "LAST_NAME" + readEnum k + | (Prelude.==) k "ID" = Prelude.Just SalesSeriesSearchRequest'ID + | (Prelude.==) k "NUMBER" + = Prelude.Just SalesSeriesSearchRequest'NUMBER + | (Prelude.==) k "NAME" + = Prelude.Just SalesSeriesSearchRequest'NAME + | (Prelude.==) k "BROKERAGE_ID" + = Prelude.Just SalesSeriesSearchRequest'BROKERAGE_ID + | (Prelude.==) k "FIRST_NAME" + = Prelude.Just SalesSeriesSearchRequest'FIRST_NAME + | (Prelude.==) k "LAST_NAME" + = Prelude.Just SalesSeriesSearchRequest'LAST_NAME + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded SalesSeriesSearchRequest'SearchCriteria where + minBound = SalesSeriesSearchRequest'ID + maxBound = SalesSeriesSearchRequest'LAST_NAME +instance Prelude.Enum SalesSeriesSearchRequest'SearchCriteria where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum SearchCriteria: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum SalesSeriesSearchRequest'ID = 1 + fromEnum SalesSeriesSearchRequest'NUMBER = 2 + fromEnum SalesSeriesSearchRequest'NAME = 3 + fromEnum SalesSeriesSearchRequest'BROKERAGE_ID = 4 + fromEnum SalesSeriesSearchRequest'FIRST_NAME = 5 + fromEnum SalesSeriesSearchRequest'LAST_NAME = 6 + succ SalesSeriesSearchRequest'LAST_NAME + = Prelude.error + "SalesSeriesSearchRequest'SearchCriteria.succ: bad argument SalesSeriesSearchRequest'LAST_NAME. This value would be out of bounds." + succ SalesSeriesSearchRequest'ID = SalesSeriesSearchRequest'NUMBER + succ SalesSeriesSearchRequest'NUMBER + = SalesSeriesSearchRequest'NAME + succ SalesSeriesSearchRequest'NAME + = SalesSeriesSearchRequest'BROKERAGE_ID + succ SalesSeriesSearchRequest'BROKERAGE_ID + = SalesSeriesSearchRequest'FIRST_NAME + succ SalesSeriesSearchRequest'FIRST_NAME + = SalesSeriesSearchRequest'LAST_NAME + pred SalesSeriesSearchRequest'ID + = Prelude.error + "SalesSeriesSearchRequest'SearchCriteria.pred: bad argument SalesSeriesSearchRequest'ID. This value would be out of bounds." + pred SalesSeriesSearchRequest'NUMBER = SalesSeriesSearchRequest'ID + pred SalesSeriesSearchRequest'NAME + = SalesSeriesSearchRequest'NUMBER + pred SalesSeriesSearchRequest'BROKERAGE_ID + = SalesSeriesSearchRequest'NAME + pred SalesSeriesSearchRequest'FIRST_NAME + = SalesSeriesSearchRequest'BROKERAGE_ID + pred SalesSeriesSearchRequest'LAST_NAME + = SalesSeriesSearchRequest'FIRST_NAME + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault SalesSeriesSearchRequest'SearchCriteria where + fieldDefault = SalesSeriesSearchRequest'ID +instance Control.DeepSeq.NFData SalesSeriesSearchRequest'SearchCriteria where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.salesSeriesId' @:: Lens' SalesSeriesSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'salesSeriesId' @:: Lens' SalesSeriesSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.salesSeriesName' @:: Lens' SalesSeriesSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'salesSeriesName' @:: Lens' SalesSeriesSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.salesSeriesNumber' @:: Lens' SalesSeriesSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'salesSeriesNumber' @:: Lens' SalesSeriesSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.brokerageId' @:: Lens' SalesSeriesSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'brokerageId' @:: Lens' SalesSeriesSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.brokerageName' @:: Lens' SalesSeriesSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'brokerageName' @:: Lens' SalesSeriesSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.removed' @:: Lens' SalesSeriesSearchResultRecord Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'removed' @:: Lens' SalesSeriesSearchResultRecord (Prelude.Maybe Prelude.Bool)@ -} +data SalesSeriesSearchResultRecord + = SalesSeriesSearchResultRecord'_constructor {_SalesSeriesSearchResultRecord'salesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _SalesSeriesSearchResultRecord'salesSeriesName :: !(Prelude.Maybe Data.Text.Text), + _SalesSeriesSearchResultRecord'salesSeriesNumber :: !(Prelude.Maybe Data.Text.Text), + _SalesSeriesSearchResultRecord'brokerageId :: !(Prelude.Maybe Data.Text.Text), + _SalesSeriesSearchResultRecord'brokerageName :: !(Prelude.Maybe Data.Text.Text), + _SalesSeriesSearchResultRecord'removed :: !(Prelude.Maybe Prelude.Bool), + _SalesSeriesSearchResultRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SalesSeriesSearchResultRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "salesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'salesSeriesId + (\ x__ y__ + -> x__ {_SalesSeriesSearchResultRecord'salesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "maybe'salesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'salesSeriesId + (\ x__ y__ + -> x__ {_SalesSeriesSearchResultRecord'salesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "salesSeriesName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'salesSeriesName + (\ x__ y__ + -> x__ {_SalesSeriesSearchResultRecord'salesSeriesName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "maybe'salesSeriesName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'salesSeriesName + (\ x__ y__ + -> x__ {_SalesSeriesSearchResultRecord'salesSeriesName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "salesSeriesNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'salesSeriesNumber + (\ x__ y__ + -> x__ {_SalesSeriesSearchResultRecord'salesSeriesNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "maybe'salesSeriesNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'salesSeriesNumber + (\ x__ y__ + -> x__ {_SalesSeriesSearchResultRecord'salesSeriesNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "brokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'brokerageId + (\ x__ y__ + -> x__ {_SalesSeriesSearchResultRecord'brokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "maybe'brokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'brokerageId + (\ x__ y__ + -> x__ {_SalesSeriesSearchResultRecord'brokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "brokerageName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'brokerageName + (\ x__ y__ + -> x__ {_SalesSeriesSearchResultRecord'brokerageName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "maybe'brokerageName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'brokerageName + (\ x__ y__ + -> x__ {_SalesSeriesSearchResultRecord'brokerageName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "removed" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'removed + (\ x__ y__ -> x__ {_SalesSeriesSearchResultRecord'removed = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SalesSeriesSearchResultRecord "maybe'removed" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'removed + (\ x__ y__ -> x__ {_SalesSeriesSearchResultRecord'removed = y__})) + Prelude.id +instance Data.ProtoLens.Message SalesSeriesSearchResultRecord where + messageName _ + = Data.Text.pack "common_1.SalesSeriesSearchResultRecord" + packedMessageDescriptor _ + = "\n\ + \\GSSalesSeriesSearchResultRecord\DC2&\n\ + \\SIsales_series_id\CAN\SOH \SOH(\tR\rsalesSeriesId\DC2*\n\ + \\DC1sales_series_name\CAN\STX \SOH(\tR\SIsalesSeriesName\DC2.\n\ + \\DC3sales_series_number\CAN\ETX \SOH(\tR\DC1salesSeriesNumber\DC2!\n\ + \\fbrokerage_id\CAN\EOT \SOH(\tR\vbrokerageId\DC2%\n\ + \\SObrokerage_name\CAN\ENQ \SOH(\tR\rbrokerageName\DC2\CAN\n\ + \\aremoved\CAN\ACK \SOH(\bR\aremoved" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + salesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesId")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesSearchResultRecord + salesSeriesName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesName")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesSearchResultRecord + salesSeriesNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesNumber")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesSearchResultRecord + brokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageId")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesSearchResultRecord + brokerageName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageName")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesSearchResultRecord + removed__field_descriptor + = Data.ProtoLens.FieldDescriptor + "removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removed")) :: + Data.ProtoLens.FieldDescriptor SalesSeriesSearchResultRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, salesSeriesId__field_descriptor), + (Data.ProtoLens.Tag 2, salesSeriesName__field_descriptor), + (Data.ProtoLens.Tag 3, salesSeriesNumber__field_descriptor), + (Data.ProtoLens.Tag 4, brokerageId__field_descriptor), + (Data.ProtoLens.Tag 5, brokerageName__field_descriptor), + (Data.ProtoLens.Tag 6, removed__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SalesSeriesSearchResultRecord'_unknownFields + (\ x__ y__ + -> x__ {_SalesSeriesSearchResultRecord'_unknownFields = y__}) + defMessage + = SalesSeriesSearchResultRecord'_constructor + {_SalesSeriesSearchResultRecord'salesSeriesId = Prelude.Nothing, + _SalesSeriesSearchResultRecord'salesSeriesName = Prelude.Nothing, + _SalesSeriesSearchResultRecord'salesSeriesNumber = Prelude.Nothing, + _SalesSeriesSearchResultRecord'brokerageId = Prelude.Nothing, + _SalesSeriesSearchResultRecord'brokerageName = Prelude.Nothing, + _SalesSeriesSearchResultRecord'removed = Prelude.Nothing, + _SalesSeriesSearchResultRecord'_unknownFields = []} + parseMessage + = let + loop :: + SalesSeriesSearchResultRecord + -> Data.ProtoLens.Encoding.Bytes.Parser SalesSeriesSearchResultRecord + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesName") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesNumber") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"brokerageId") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageName") y x) + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "removed" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"removed") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "SalesSeriesSearchResultRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'salesSeriesId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'salesSeriesName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'salesSeriesNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'removed") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))) +instance Control.DeepSeq.NFData SalesSeriesSearchResultRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SalesSeriesSearchResultRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SalesSeriesSearchResultRecord'salesSeriesId x__) + (Control.DeepSeq.deepseq + (_SalesSeriesSearchResultRecord'salesSeriesName x__) + (Control.DeepSeq.deepseq + (_SalesSeriesSearchResultRecord'salesSeriesNumber x__) + (Control.DeepSeq.deepseq + (_SalesSeriesSearchResultRecord'brokerageId x__) + (Control.DeepSeq.deepseq + (_SalesSeriesSearchResultRecord'brokerageName x__) + (Control.DeepSeq.deepseq + (_SalesSeriesSearchResultRecord'removed x__) ())))))) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.text' @:: Lens' SearchOption Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'text' @:: Lens' SearchOption (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.criteria' @:: Lens' SearchOption [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'criteria' @:: Lens' SearchOption (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.matchingRule' @:: Lens' SearchOption Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'matchingRule' @:: Lens' SearchOption (Prelude.Maybe Data.Word.Word32)@ -} +data SearchOption + = SearchOption'_constructor {_SearchOption'text :: !(Prelude.Maybe Data.Text.Text), + _SearchOption'criteria :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _SearchOption'matchingRule :: !(Prelude.Maybe Data.Word.Word32), + _SearchOption'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SearchOption where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SearchOption "text" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchOption'text (\ x__ y__ -> x__ {_SearchOption'text = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SearchOption "maybe'text" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchOption'text (\ x__ y__ -> x__ {_SearchOption'text = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchOption "criteria" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchOption'criteria + (\ x__ y__ -> x__ {_SearchOption'criteria = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField SearchOption "vec'criteria" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchOption'criteria + (\ x__ y__ -> x__ {_SearchOption'criteria = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SearchOption "matchingRule" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchOption'matchingRule + (\ x__ y__ -> x__ {_SearchOption'matchingRule = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SearchOption "maybe'matchingRule" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SearchOption'matchingRule + (\ x__ y__ -> x__ {_SearchOption'matchingRule = y__})) + Prelude.id +instance Data.ProtoLens.Message SearchOption where + messageName _ = Data.Text.pack "common_1.SearchOption" + packedMessageDescriptor _ + = "\n\ + \\fSearchOption\DC2\DC2\n\ + \\EOTtext\CAN\SOH \SOH(\tR\EOTtext\DC2\SUB\n\ + \\bcriteria\CAN\STX \ETX(\rR\bcriteria\DC2#\n\ + \\rmatching_rule\CAN\ETX \SOH(\rR\fmatchingRule\"f\n\ + \\fMatchingRule\DC2\f\n\ + \\bCONTAINS\DLE\NUL\DC2\SI\n\ + \\vSTARTS_WITH\DLE\SOH\DC2\r\n\ + \\tENDS_WITH\DLE\STX\DC2\DC2\n\ + \\SOEXACT_EQUALITY\DLE\ETX\DC2\DC4\n\ + \\DLEIN_MATCHING_RULE\DLE\EOT" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + text__field_descriptor + = Data.ProtoLens.FieldDescriptor + "text" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'text")) :: + Data.ProtoLens.FieldDescriptor SearchOption + criteria__field_descriptor + = Data.ProtoLens.FieldDescriptor + "criteria" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"criteria")) :: + Data.ProtoLens.FieldDescriptor SearchOption + matchingRule__field_descriptor + = Data.ProtoLens.FieldDescriptor + "matching_rule" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'matchingRule")) :: + Data.ProtoLens.FieldDescriptor SearchOption + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, text__field_descriptor), + (Data.ProtoLens.Tag 2, criteria__field_descriptor), + (Data.ProtoLens.Tag 3, matchingRule__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SearchOption'_unknownFields + (\ x__ y__ -> x__ {_SearchOption'_unknownFields = y__}) + defMessage + = SearchOption'_constructor + {_SearchOption'text = Prelude.Nothing, + _SearchOption'criteria = Data.Vector.Generic.empty, + _SearchOption'matchingRule = Prelude.Nothing, + _SearchOption'_unknownFields = []} + parseMessage + = let + loop :: + SearchOption + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser SearchOption + loop x mutable'criteria + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'criteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'criteria) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'criteria") frozen'criteria x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "text" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"text") y x) + mutable'criteria + 16 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "criteria" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'criteria y) + loop x v + 18 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "criteria" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'criteria) + loop x y + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "matching_rule" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"matchingRule") y x) + mutable'criteria + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'criteria + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'criteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'criteria) + "SearchOption" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'text") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'criteria") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'matchingRule") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData SearchOption where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SearchOption'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SearchOption'text x__) + (Control.DeepSeq.deepseq + (_SearchOption'criteria x__) + (Control.DeepSeq.deepseq (_SearchOption'matchingRule x__) ()))) +data SearchOption'MatchingRule + = SearchOption'CONTAINS | + SearchOption'STARTS_WITH | + SearchOption'ENDS_WITH | + SearchOption'EXACT_EQUALITY | + SearchOption'IN_MATCHING_RULE + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum SearchOption'MatchingRule where + maybeToEnum 0 = Prelude.Just SearchOption'CONTAINS + maybeToEnum 1 = Prelude.Just SearchOption'STARTS_WITH + maybeToEnum 2 = Prelude.Just SearchOption'ENDS_WITH + maybeToEnum 3 = Prelude.Just SearchOption'EXACT_EQUALITY + maybeToEnum 4 = Prelude.Just SearchOption'IN_MATCHING_RULE + maybeToEnum _ = Prelude.Nothing + showEnum SearchOption'CONTAINS = "CONTAINS" + showEnum SearchOption'STARTS_WITH = "STARTS_WITH" + showEnum SearchOption'ENDS_WITH = "ENDS_WITH" + showEnum SearchOption'EXACT_EQUALITY = "EXACT_EQUALITY" + showEnum SearchOption'IN_MATCHING_RULE = "IN_MATCHING_RULE" + readEnum k + | (Prelude.==) k "CONTAINS" = Prelude.Just SearchOption'CONTAINS + | (Prelude.==) k "STARTS_WITH" + = Prelude.Just SearchOption'STARTS_WITH + | (Prelude.==) k "ENDS_WITH" = Prelude.Just SearchOption'ENDS_WITH + | (Prelude.==) k "EXACT_EQUALITY" + = Prelude.Just SearchOption'EXACT_EQUALITY + | (Prelude.==) k "IN_MATCHING_RULE" + = Prelude.Just SearchOption'IN_MATCHING_RULE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded SearchOption'MatchingRule where + minBound = SearchOption'CONTAINS + maxBound = SearchOption'IN_MATCHING_RULE +instance Prelude.Enum SearchOption'MatchingRule where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum MatchingRule: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum SearchOption'CONTAINS = 0 + fromEnum SearchOption'STARTS_WITH = 1 + fromEnum SearchOption'ENDS_WITH = 2 + fromEnum SearchOption'EXACT_EQUALITY = 3 + fromEnum SearchOption'IN_MATCHING_RULE = 4 + succ SearchOption'IN_MATCHING_RULE + = Prelude.error + "SearchOption'MatchingRule.succ: bad argument SearchOption'IN_MATCHING_RULE. This value would be out of bounds." + succ SearchOption'CONTAINS = SearchOption'STARTS_WITH + succ SearchOption'STARTS_WITH = SearchOption'ENDS_WITH + succ SearchOption'ENDS_WITH = SearchOption'EXACT_EQUALITY + succ SearchOption'EXACT_EQUALITY = SearchOption'IN_MATCHING_RULE + pred SearchOption'CONTAINS + = Prelude.error + "SearchOption'MatchingRule.pred: bad argument SearchOption'CONTAINS. This value would be out of bounds." + pred SearchOption'STARTS_WITH = SearchOption'CONTAINS + pred SearchOption'ENDS_WITH = SearchOption'STARTS_WITH + pred SearchOption'EXACT_EQUALITY = SearchOption'ENDS_WITH + pred SearchOption'IN_MATCHING_RULE = SearchOption'EXACT_EQUALITY + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault SearchOption'MatchingRule where + fieldDefault = SearchOption'CONTAINS +instance Control.DeepSeq.NFData SearchOption'MatchingRule where + rnf x__ = Prelude.seq x__ () +{- | Fields : + -} +data TradingFeaturesRequest + = TradingFeaturesRequest'_constructor {_TradingFeaturesRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TradingFeaturesRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message TradingFeaturesRequest where + messageName _ = Data.Text.pack "common_1.TradingFeaturesRequest" + packedMessageDescriptor _ + = "\n\ + \\SYNTradingFeaturesRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _TradingFeaturesRequest'_unknownFields + (\ x__ y__ -> x__ {_TradingFeaturesRequest'_unknownFields = y__}) + defMessage + = TradingFeaturesRequest'_constructor + {_TradingFeaturesRequest'_unknownFields = []} + parseMessage + = let + loop :: + TradingFeaturesRequest + -> Data.ProtoLens.Encoding.Bytes.Parser TradingFeaturesRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TradingFeaturesRequest" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData TradingFeaturesRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TradingFeaturesRequest'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.tradingInterfaceElements' @:: Lens' TradingFeaturesResult [TradingInterfaceElement]@ + * 'Proto.CMS.Common1_Fields.vec'tradingInterfaceElements' @:: Lens' TradingFeaturesResult (Data.Vector.Vector TradingInterfaceElement)@ -} +data TradingFeaturesResult + = TradingFeaturesResult'_constructor {_TradingFeaturesResult'tradingInterfaceElements :: !(Data.Vector.Vector TradingInterfaceElement), + _TradingFeaturesResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TradingFeaturesResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TradingFeaturesResult "tradingInterfaceElements" [TradingInterfaceElement] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradingFeaturesResult'tradingInterfaceElements + (\ x__ y__ + -> x__ {_TradingFeaturesResult'tradingInterfaceElements = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField TradingFeaturesResult "vec'tradingInterfaceElements" (Data.Vector.Vector TradingInterfaceElement) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradingFeaturesResult'tradingInterfaceElements + (\ x__ y__ + -> x__ {_TradingFeaturesResult'tradingInterfaceElements = y__})) + Prelude.id +instance Data.ProtoLens.Message TradingFeaturesResult where + messageName _ = Data.Text.pack "common_1.TradingFeaturesResult" + packedMessageDescriptor _ + = "\n\ + \\NAKTradingFeaturesResult\DC2_\n\ + \\SUBtrading_interface_elements\CAN\SOH \ETX(\v2!.common_1.TradingInterfaceElementR\CANtradingInterfaceElements" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + tradingInterfaceElements__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trading_interface_elements" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TradingInterfaceElement) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"tradingInterfaceElements")) :: + Data.ProtoLens.FieldDescriptor TradingFeaturesResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, + tradingInterfaceElements__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TradingFeaturesResult'_unknownFields + (\ x__ y__ -> x__ {_TradingFeaturesResult'_unknownFields = y__}) + defMessage + = TradingFeaturesResult'_constructor + {_TradingFeaturesResult'tradingInterfaceElements = Data.Vector.Generic.empty, + _TradingFeaturesResult'_unknownFields = []} + parseMessage + = let + loop :: + TradingFeaturesResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TradingInterfaceElement + -> Data.ProtoLens.Encoding.Bytes.Parser TradingFeaturesResult + loop x mutable'tradingInterfaceElements + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'tradingInterfaceElements <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'tradingInterfaceElements) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'tradingInterfaceElements") + frozen'tradingInterfaceElements x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "trading_interface_elements" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'tradingInterfaceElements y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'tradingInterfaceElements + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'tradingInterfaceElements <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'tradingInterfaceElements) + "TradingFeaturesResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'tradingInterfaceElements") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData TradingFeaturesResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TradingFeaturesResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TradingFeaturesResult'tradingInterfaceElements x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.id' @:: Lens' TradingInterfaceElement Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'id' @:: Lens' TradingInterfaceElement (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.name' @:: Lens' TradingInterfaceElement Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.maybe'name' @:: Lens' TradingInterfaceElement (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Common1_Fields.disableOnly' @:: Lens' TradingInterfaceElement Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'disableOnly' @:: Lens' TradingInterfaceElement (Prelude.Maybe Prelude.Bool)@ -} +data TradingInterfaceElement + = TradingInterfaceElement'_constructor {_TradingInterfaceElement'id :: !(Prelude.Maybe Data.Text.Text), + _TradingInterfaceElement'name :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _TradingInterfaceElement'disableOnly :: !(Prelude.Maybe Prelude.Bool), + _TradingInterfaceElement'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TradingInterfaceElement where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TradingInterfaceElement "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradingInterfaceElement'id + (\ x__ y__ -> x__ {_TradingInterfaceElement'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField TradingInterfaceElement "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradingInterfaceElement'id + (\ x__ y__ -> x__ {_TradingInterfaceElement'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradingInterfaceElement "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradingInterfaceElement'name + (\ x__ y__ -> x__ {_TradingInterfaceElement'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradingInterfaceElement "maybe'name" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradingInterfaceElement'name + (\ x__ y__ -> x__ {_TradingInterfaceElement'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradingInterfaceElement "disableOnly" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradingInterfaceElement'disableOnly + (\ x__ y__ -> x__ {_TradingInterfaceElement'disableOnly = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField TradingInterfaceElement "maybe'disableOnly" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradingInterfaceElement'disableOnly + (\ x__ y__ -> x__ {_TradingInterfaceElement'disableOnly = y__})) + Prelude.id +instance Data.ProtoLens.Message TradingInterfaceElement where + messageName _ = Data.Text.pack "common_1.TradingInterfaceElement" + packedMessageDescriptor _ + = "\n\ + \\ETBTradingInterfaceElement\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname\DC2!\n\ + \\fdisable_only\CAN\ETX \SOH(\bR\vdisableOnly" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor TradingInterfaceElement + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor TradingInterfaceElement + disableOnly__field_descriptor + = Data.ProtoLens.FieldDescriptor + "disable_only" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'disableOnly")) :: + Data.ProtoLens.FieldDescriptor TradingInterfaceElement + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, disableOnly__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TradingInterfaceElement'_unknownFields + (\ x__ y__ -> x__ {_TradingInterfaceElement'_unknownFields = y__}) + defMessage + = TradingInterfaceElement'_constructor + {_TradingInterfaceElement'id = Prelude.Nothing, + _TradingInterfaceElement'name = Prelude.Nothing, + _TradingInterfaceElement'disableOnly = Prelude.Nothing, + _TradingInterfaceElement'_unknownFields = []} + parseMessage + = let + loop :: + TradingInterfaceElement + -> Data.ProtoLens.Encoding.Bytes.Parser TradingInterfaceElement + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "disable_only" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"disableOnly") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TradingInterfaceElement" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'disableOnly") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData TradingInterfaceElement where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TradingInterfaceElement'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TradingInterfaceElement'id x__) + (Control.DeepSeq.deepseq + (_TradingInterfaceElement'name x__) + (Control.DeepSeq.deepseq + (_TradingInterfaceElement'disableOnly x__) ()))) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.first' @:: Lens' Tuple Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'first' @:: Lens' Tuple (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.second' @:: Lens' Tuple Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'second' @:: Lens' Tuple (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.third' @:: Lens' Tuple Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'third' @:: Lens' Tuple (Prelude.Maybe Data.Text.Text)@ -} +data Tuple + = Tuple'_constructor {_Tuple'first :: !(Prelude.Maybe Data.Text.Text), + _Tuple'second :: !(Prelude.Maybe Data.Text.Text), + _Tuple'third :: !(Prelude.Maybe Data.Text.Text), + _Tuple'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Tuple where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Tuple "first" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tuple'first (\ x__ y__ -> x__ {_Tuple'first = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Tuple "maybe'first" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tuple'first (\ x__ y__ -> x__ {_Tuple'first = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tuple "second" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tuple'second (\ x__ y__ -> x__ {_Tuple'second = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Tuple "maybe'second" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tuple'second (\ x__ y__ -> x__ {_Tuple'second = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Tuple "third" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tuple'third (\ x__ y__ -> x__ {_Tuple'third = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Tuple "maybe'third" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Tuple'third (\ x__ y__ -> x__ {_Tuple'third = y__})) + Prelude.id +instance Data.ProtoLens.Message Tuple where + messageName _ = Data.Text.pack "common_1.Tuple" + packedMessageDescriptor _ + = "\n\ + \\ENQTuple\DC2\DC4\n\ + \\ENQfirst\CAN\SOH \SOH(\tR\ENQfirst\DC2\SYN\n\ + \\ACKsecond\CAN\STX \SOH(\tR\ACKsecond\DC2\DC4\n\ + \\ENQthird\CAN\ETX \SOH(\tR\ENQthird" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + first__field_descriptor + = Data.ProtoLens.FieldDescriptor + "first" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'first")) :: + Data.ProtoLens.FieldDescriptor Tuple + second__field_descriptor + = Data.ProtoLens.FieldDescriptor + "second" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'second")) :: + Data.ProtoLens.FieldDescriptor Tuple + third__field_descriptor + = Data.ProtoLens.FieldDescriptor + "third" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'third")) :: + Data.ProtoLens.FieldDescriptor Tuple + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, first__field_descriptor), + (Data.ProtoLens.Tag 2, second__field_descriptor), + (Data.ProtoLens.Tag 3, third__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Tuple'_unknownFields + (\ x__ y__ -> x__ {_Tuple'_unknownFields = y__}) + defMessage + = Tuple'_constructor + {_Tuple'first = Prelude.Nothing, _Tuple'second = Prelude.Nothing, + _Tuple'third = Prelude.Nothing, _Tuple'_unknownFields = []} + parseMessage + = let + loop :: Tuple -> Data.ProtoLens.Encoding.Bytes.Parser Tuple + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "first" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"first") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "second" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"second") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "third" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"third") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "Tuple" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'first") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'second") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'third") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData Tuple where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Tuple'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Tuple'first x__) + (Control.DeepSeq.deepseq + (_Tuple'second x__) + (Control.DeepSeq.deepseq (_Tuple'third x__) ()))) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.linksToSet' @:: Lens' UpdateCustomerSalesSeriesAuthorizationList [CustomerSalesSeriesLink]@ + * 'Proto.CMS.Common1_Fields.vec'linksToSet' @:: Lens' UpdateCustomerSalesSeriesAuthorizationList (Data.Vector.Vector CustomerSalesSeriesLink)@ + * 'Proto.CMS.Common1_Fields.linksToRemove' @:: Lens' UpdateCustomerSalesSeriesAuthorizationList [Tuple]@ + * 'Proto.CMS.Common1_Fields.vec'linksToRemove' @:: Lens' UpdateCustomerSalesSeriesAuthorizationList (Data.Vector.Vector Tuple)@ -} +data UpdateCustomerSalesSeriesAuthorizationList + = UpdateCustomerSalesSeriesAuthorizationList'_constructor {_UpdateCustomerSalesSeriesAuthorizationList'linksToSet :: !(Data.Vector.Vector CustomerSalesSeriesLink), + _UpdateCustomerSalesSeriesAuthorizationList'linksToRemove :: !(Data.Vector.Vector Tuple), + _UpdateCustomerSalesSeriesAuthorizationList'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateCustomerSalesSeriesAuthorizationList where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateCustomerSalesSeriesAuthorizationList "linksToSet" [CustomerSalesSeriesLink] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateCustomerSalesSeriesAuthorizationList'linksToSet + (\ x__ y__ + -> x__ + {_UpdateCustomerSalesSeriesAuthorizationList'linksToSet = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateCustomerSalesSeriesAuthorizationList "vec'linksToSet" (Data.Vector.Vector CustomerSalesSeriesLink) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateCustomerSalesSeriesAuthorizationList'linksToSet + (\ x__ y__ + -> x__ + {_UpdateCustomerSalesSeriesAuthorizationList'linksToSet = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateCustomerSalesSeriesAuthorizationList "linksToRemove" [Tuple] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateCustomerSalesSeriesAuthorizationList'linksToRemove + (\ x__ y__ + -> x__ + {_UpdateCustomerSalesSeriesAuthorizationList'linksToRemove = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateCustomerSalesSeriesAuthorizationList "vec'linksToRemove" (Data.Vector.Vector Tuple) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateCustomerSalesSeriesAuthorizationList'linksToRemove + (\ x__ y__ + -> x__ + {_UpdateCustomerSalesSeriesAuthorizationList'linksToRemove = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateCustomerSalesSeriesAuthorizationList where + messageName _ + = Data.Text.pack + "common_1.UpdateCustomerSalesSeriesAuthorizationList" + packedMessageDescriptor _ + = "\n\ + \*UpdateCustomerSalesSeriesAuthorizationList\DC2C\n\ + \\flinks_to_set\CAN\SOH \ETX(\v2!.common_1.CustomerSalesSeriesLinkR\n\ + \linksToSet\DC27\n\ + \\SIlinks_to_remove\CAN\STX \ETX(\v2\SI.common_1.TupleR\rlinksToRemove" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + linksToSet__field_descriptor + = Data.ProtoLens.FieldDescriptor + "links_to_set" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CustomerSalesSeriesLink) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"linksToSet")) :: + Data.ProtoLens.FieldDescriptor UpdateCustomerSalesSeriesAuthorizationList + linksToRemove__field_descriptor + = Data.ProtoLens.FieldDescriptor + "links_to_remove" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Tuple) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"linksToRemove")) :: + Data.ProtoLens.FieldDescriptor UpdateCustomerSalesSeriesAuthorizationList + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, linksToSet__field_descriptor), + (Data.ProtoLens.Tag 2, linksToRemove__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateCustomerSalesSeriesAuthorizationList'_unknownFields + (\ x__ y__ + -> x__ + {_UpdateCustomerSalesSeriesAuthorizationList'_unknownFields = y__}) + defMessage + = UpdateCustomerSalesSeriesAuthorizationList'_constructor + {_UpdateCustomerSalesSeriesAuthorizationList'linksToSet = Data.Vector.Generic.empty, + _UpdateCustomerSalesSeriesAuthorizationList'linksToRemove = Data.Vector.Generic.empty, + _UpdateCustomerSalesSeriesAuthorizationList'_unknownFields = []} + parseMessage + = let + loop :: + UpdateCustomerSalesSeriesAuthorizationList + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Tuple + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld CustomerSalesSeriesLink + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateCustomerSalesSeriesAuthorizationList + loop x mutable'linksToRemove mutable'linksToSet + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'linksToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'linksToRemove) + frozen'linksToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'linksToSet) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'linksToRemove") + frozen'linksToRemove + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'linksToSet") frozen'linksToSet + x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "links_to_set" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'linksToSet y) + loop x mutable'linksToRemove v + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "links_to_remove" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'linksToRemove y) + loop x v mutable'linksToSet + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'linksToRemove mutable'linksToSet + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'linksToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'linksToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'linksToRemove mutable'linksToSet) + "UpdateCustomerSalesSeriesAuthorizationList" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'linksToSet") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'linksToRemove") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UpdateCustomerSalesSeriesAuthorizationList where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateCustomerSalesSeriesAuthorizationList'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateCustomerSalesSeriesAuthorizationList'linksToSet x__) + (Control.DeepSeq.deepseq + (_UpdateCustomerSalesSeriesAuthorizationList'linksToRemove x__) + ())) +{- | Fields : + -} +data UpdateCustomerSalesSeriesAuthorizationListResult + = UpdateCustomerSalesSeriesAuthorizationListResult'_constructor {_UpdateCustomerSalesSeriesAuthorizationListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateCustomerSalesSeriesAuthorizationListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateCustomerSalesSeriesAuthorizationListResult where + messageName _ + = Data.Text.pack + "common_1.UpdateCustomerSalesSeriesAuthorizationListResult" + packedMessageDescriptor _ + = "\n\ + \0UpdateCustomerSalesSeriesAuthorizationListResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateCustomerSalesSeriesAuthorizationListResult'_unknownFields + (\ x__ y__ + -> x__ + {_UpdateCustomerSalesSeriesAuthorizationListResult'_unknownFields = y__}) + defMessage + = UpdateCustomerSalesSeriesAuthorizationListResult'_constructor + {_UpdateCustomerSalesSeriesAuthorizationListResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateCustomerSalesSeriesAuthorizationListResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateCustomerSalesSeriesAuthorizationListResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "UpdateCustomerSalesSeriesAuthorizationListResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateCustomerSalesSeriesAuthorizationListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateCustomerSalesSeriesAuthorizationListResult'_unknownFields + x__) + () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.linksToSet' @:: Lens' UpdateEntityLinks [Tuple]@ + * 'Proto.CMS.Common1_Fields.vec'linksToSet' @:: Lens' UpdateEntityLinks (Data.Vector.Vector Tuple)@ + * 'Proto.CMS.Common1_Fields.linksToRemove' @:: Lens' UpdateEntityLinks [Tuple]@ + * 'Proto.CMS.Common1_Fields.vec'linksToRemove' @:: Lens' UpdateEntityLinks (Data.Vector.Vector Tuple)@ -} +data UpdateEntityLinks + = UpdateEntityLinks'_constructor {_UpdateEntityLinks'linksToSet :: !(Data.Vector.Vector Tuple), + _UpdateEntityLinks'linksToRemove :: !(Data.Vector.Vector Tuple), + _UpdateEntityLinks'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateEntityLinks where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateEntityLinks "linksToSet" [Tuple] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateEntityLinks'linksToSet + (\ x__ y__ -> x__ {_UpdateEntityLinks'linksToSet = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateEntityLinks "vec'linksToSet" (Data.Vector.Vector Tuple) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateEntityLinks'linksToSet + (\ x__ y__ -> x__ {_UpdateEntityLinks'linksToSet = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateEntityLinks "linksToRemove" [Tuple] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateEntityLinks'linksToRemove + (\ x__ y__ -> x__ {_UpdateEntityLinks'linksToRemove = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateEntityLinks "vec'linksToRemove" (Data.Vector.Vector Tuple) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateEntityLinks'linksToRemove + (\ x__ y__ -> x__ {_UpdateEntityLinks'linksToRemove = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateEntityLinks where + messageName _ = Data.Text.pack "common_1.UpdateEntityLinks" + packedMessageDescriptor _ + = "\n\ + \\DC1UpdateEntityLinks\DC21\n\ + \\flinks_to_set\CAN\SOH \ETX(\v2\SI.common_1.TupleR\n\ + \linksToSet\DC27\n\ + \\SIlinks_to_remove\CAN\STX \ETX(\v2\SI.common_1.TupleR\rlinksToRemove" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + linksToSet__field_descriptor + = Data.ProtoLens.FieldDescriptor + "links_to_set" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Tuple) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"linksToSet")) :: + Data.ProtoLens.FieldDescriptor UpdateEntityLinks + linksToRemove__field_descriptor + = Data.ProtoLens.FieldDescriptor + "links_to_remove" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Tuple) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"linksToRemove")) :: + Data.ProtoLens.FieldDescriptor UpdateEntityLinks + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, linksToSet__field_descriptor), + (Data.ProtoLens.Tag 2, linksToRemove__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateEntityLinks'_unknownFields + (\ x__ y__ -> x__ {_UpdateEntityLinks'_unknownFields = y__}) + defMessage + = UpdateEntityLinks'_constructor + {_UpdateEntityLinks'linksToSet = Data.Vector.Generic.empty, + _UpdateEntityLinks'linksToRemove = Data.Vector.Generic.empty, + _UpdateEntityLinks'_unknownFields = []} + parseMessage + = let + loop :: + UpdateEntityLinks + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Tuple + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Tuple + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateEntityLinks + loop x mutable'linksToRemove mutable'linksToSet + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'linksToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'linksToRemove) + frozen'linksToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'linksToSet) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'linksToRemove") + frozen'linksToRemove + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'linksToSet") frozen'linksToSet + x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "links_to_set" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'linksToSet y) + loop x mutable'linksToRemove v + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "links_to_remove" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'linksToRemove y) + loop x v mutable'linksToSet + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'linksToRemove mutable'linksToSet + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'linksToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'linksToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'linksToRemove mutable'linksToSet) + "UpdateEntityLinks" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'linksToSet") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'linksToRemove") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UpdateEntityLinks where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateEntityLinks'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateEntityLinks'linksToSet x__) + (Control.DeepSeq.deepseq + (_UpdateEntityLinks'linksToRemove x__) ())) +{- | Fields : + -} +data UpdateEntityLinksResult + = UpdateEntityLinksResult'_constructor {_UpdateEntityLinksResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateEntityLinksResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateEntityLinksResult where + messageName _ = Data.Text.pack "common_1.UpdateEntityLinksResult" + packedMessageDescriptor _ + = "\n\ + \\ETBUpdateEntityLinksResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateEntityLinksResult'_unknownFields + (\ x__ y__ -> x__ {_UpdateEntityLinksResult'_unknownFields = y__}) + defMessage + = UpdateEntityLinksResult'_constructor + {_UpdateEntityLinksResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateEntityLinksResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateEntityLinksResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateEntityLinksResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateEntityLinksResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateEntityLinksResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginId' @:: Lens' UpdateLoginBillingCustomData Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'loginId' @:: Lens' UpdateLoginBillingCustomData (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.loginBillingCustomData' @:: Lens' UpdateLoginBillingCustomData [LoginBillingCustomData]@ + * 'Proto.CMS.Common1_Fields.vec'loginBillingCustomData' @:: Lens' UpdateLoginBillingCustomData (Data.Vector.Vector LoginBillingCustomData)@ -} +data UpdateLoginBillingCustomData + = UpdateLoginBillingCustomData'_constructor {_UpdateLoginBillingCustomData'loginId :: !(Prelude.Maybe Data.Text.Text), + _UpdateLoginBillingCustomData'loginBillingCustomData :: !(Data.Vector.Vector LoginBillingCustomData), + _UpdateLoginBillingCustomData'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateLoginBillingCustomData where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateLoginBillingCustomData "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginBillingCustomData'loginId + (\ x__ y__ -> x__ {_UpdateLoginBillingCustomData'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateLoginBillingCustomData "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginBillingCustomData'loginId + (\ x__ y__ -> x__ {_UpdateLoginBillingCustomData'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateLoginBillingCustomData "loginBillingCustomData" [LoginBillingCustomData] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginBillingCustomData'loginBillingCustomData + (\ x__ y__ + -> x__ + {_UpdateLoginBillingCustomData'loginBillingCustomData = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateLoginBillingCustomData "vec'loginBillingCustomData" (Data.Vector.Vector LoginBillingCustomData) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginBillingCustomData'loginBillingCustomData + (\ x__ y__ + -> x__ + {_UpdateLoginBillingCustomData'loginBillingCustomData = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateLoginBillingCustomData where + messageName _ + = Data.Text.pack "common_1.UpdateLoginBillingCustomData" + packedMessageDescriptor _ + = "\n\ + \\FSUpdateLoginBillingCustomData\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2[\n\ + \\EMlogin_billing_custom_data\CAN\STX \ETX(\v2 .common_1.LoginBillingCustomDataR\SYNloginBillingCustomData" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor UpdateLoginBillingCustomData + loginBillingCustomData__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_billing_custom_data" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LoginBillingCustomData) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"loginBillingCustomData")) :: + Data.ProtoLens.FieldDescriptor UpdateLoginBillingCustomData + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor), + (Data.ProtoLens.Tag 2, loginBillingCustomData__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateLoginBillingCustomData'_unknownFields + (\ x__ y__ + -> x__ {_UpdateLoginBillingCustomData'_unknownFields = y__}) + defMessage + = UpdateLoginBillingCustomData'_constructor + {_UpdateLoginBillingCustomData'loginId = Prelude.Nothing, + _UpdateLoginBillingCustomData'loginBillingCustomData = Data.Vector.Generic.empty, + _UpdateLoginBillingCustomData'_unknownFields = []} + parseMessage + = let + loop :: + UpdateLoginBillingCustomData + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld LoginBillingCustomData + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateLoginBillingCustomData + loop x mutable'loginBillingCustomData + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'loginBillingCustomData <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'loginBillingCustomData) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'loginBillingCustomData") + frozen'loginBillingCustomData x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + mutable'loginBillingCustomData + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "login_billing_custom_data" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'loginBillingCustomData y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'loginBillingCustomData + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'loginBillingCustomData <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'loginBillingCustomData) + "UpdateLoginBillingCustomData" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'loginBillingCustomData") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UpdateLoginBillingCustomData where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateLoginBillingCustomData'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateLoginBillingCustomData'loginId x__) + (Control.DeepSeq.deepseq + (_UpdateLoginBillingCustomData'loginBillingCustomData x__) ())) +{- | Fields : + -} +data UpdateLoginBillingCustomDataResult + = UpdateLoginBillingCustomDataResult'_constructor {_UpdateLoginBillingCustomDataResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateLoginBillingCustomDataResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateLoginBillingCustomDataResult where + messageName _ + = Data.Text.pack "common_1.UpdateLoginBillingCustomDataResult" + packedMessageDescriptor _ + = "\n\ + \\"UpdateLoginBillingCustomDataResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateLoginBillingCustomDataResult'_unknownFields + (\ x__ y__ + -> x__ {_UpdateLoginBillingCustomDataResult'_unknownFields = y__}) + defMessage + = UpdateLoginBillingCustomDataResult'_constructor + {_UpdateLoginBillingCustomDataResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateLoginBillingCustomDataResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateLoginBillingCustomDataResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "UpdateLoginBillingCustomDataResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateLoginBillingCustomDataResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateLoginBillingCustomDataResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginId' @:: Lens' UpdateLoginExchangeMemberIdList Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'loginId' @:: Lens' UpdateLoginExchangeMemberIdList (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.memberIdsToSet' @:: Lens' UpdateLoginExchangeMemberIdList [LoginExchangeMemberId]@ + * 'Proto.CMS.Common1_Fields.vec'memberIdsToSet' @:: Lens' UpdateLoginExchangeMemberIdList (Data.Vector.Vector LoginExchangeMemberId)@ + * 'Proto.CMS.Common1_Fields.memberIdsToRemove' @:: Lens' UpdateLoginExchangeMemberIdList [Tuple]@ + * 'Proto.CMS.Common1_Fields.vec'memberIdsToRemove' @:: Lens' UpdateLoginExchangeMemberIdList (Data.Vector.Vector Tuple)@ -} +data UpdateLoginExchangeMemberIdList + = UpdateLoginExchangeMemberIdList'_constructor {_UpdateLoginExchangeMemberIdList'loginId :: !(Prelude.Maybe Data.Text.Text), + _UpdateLoginExchangeMemberIdList'memberIdsToSet :: !(Data.Vector.Vector LoginExchangeMemberId), + _UpdateLoginExchangeMemberIdList'memberIdsToRemove :: !(Data.Vector.Vector Tuple), + _UpdateLoginExchangeMemberIdList'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateLoginExchangeMemberIdList where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateLoginExchangeMemberIdList "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginExchangeMemberIdList'loginId + (\ x__ y__ + -> x__ {_UpdateLoginExchangeMemberIdList'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateLoginExchangeMemberIdList "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginExchangeMemberIdList'loginId + (\ x__ y__ + -> x__ {_UpdateLoginExchangeMemberIdList'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateLoginExchangeMemberIdList "memberIdsToSet" [LoginExchangeMemberId] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginExchangeMemberIdList'memberIdsToSet + (\ x__ y__ + -> x__ {_UpdateLoginExchangeMemberIdList'memberIdsToSet = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateLoginExchangeMemberIdList "vec'memberIdsToSet" (Data.Vector.Vector LoginExchangeMemberId) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginExchangeMemberIdList'memberIdsToSet + (\ x__ y__ + -> x__ {_UpdateLoginExchangeMemberIdList'memberIdsToSet = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateLoginExchangeMemberIdList "memberIdsToRemove" [Tuple] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginExchangeMemberIdList'memberIdsToRemove + (\ x__ y__ + -> x__ {_UpdateLoginExchangeMemberIdList'memberIdsToRemove = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateLoginExchangeMemberIdList "vec'memberIdsToRemove" (Data.Vector.Vector Tuple) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginExchangeMemberIdList'memberIdsToRemove + (\ x__ y__ + -> x__ {_UpdateLoginExchangeMemberIdList'memberIdsToRemove = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateLoginExchangeMemberIdList where + messageName _ + = Data.Text.pack "common_1.UpdateLoginExchangeMemberIdList" + packedMessageDescriptor _ + = "\n\ + \\USUpdateLoginExchangeMemberIdList\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2J\n\ + \\DC1member_ids_to_set\CAN\STX \ETX(\v2\US.common_1.LoginExchangeMemberIdR\SOmemberIdsToSet\DC2@\n\ + \\DC4member_ids_to_remove\CAN\ETX \ETX(\v2\SI.common_1.TupleR\DC1memberIdsToRemove" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor UpdateLoginExchangeMemberIdList + memberIdsToSet__field_descriptor + = Data.ProtoLens.FieldDescriptor + "member_ids_to_set" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LoginExchangeMemberId) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"memberIdsToSet")) :: + Data.ProtoLens.FieldDescriptor UpdateLoginExchangeMemberIdList + memberIdsToRemove__field_descriptor + = Data.ProtoLens.FieldDescriptor + "member_ids_to_remove" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Tuple) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"memberIdsToRemove")) :: + Data.ProtoLens.FieldDescriptor UpdateLoginExchangeMemberIdList + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor), + (Data.ProtoLens.Tag 2, memberIdsToSet__field_descriptor), + (Data.ProtoLens.Tag 3, memberIdsToRemove__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateLoginExchangeMemberIdList'_unknownFields + (\ x__ y__ + -> x__ {_UpdateLoginExchangeMemberIdList'_unknownFields = y__}) + defMessage + = UpdateLoginExchangeMemberIdList'_constructor + {_UpdateLoginExchangeMemberIdList'loginId = Prelude.Nothing, + _UpdateLoginExchangeMemberIdList'memberIdsToSet = Data.Vector.Generic.empty, + _UpdateLoginExchangeMemberIdList'memberIdsToRemove = Data.Vector.Generic.empty, + _UpdateLoginExchangeMemberIdList'_unknownFields = []} + parseMessage + = let + loop :: + UpdateLoginExchangeMemberIdList + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Tuple + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld LoginExchangeMemberId + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateLoginExchangeMemberIdList + loop x mutable'memberIdsToRemove mutable'memberIdsToSet + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'memberIdsToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'memberIdsToRemove) + frozen'memberIdsToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'memberIdsToSet) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'memberIdsToRemove") + frozen'memberIdsToRemove + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'memberIdsToSet") + frozen'memberIdsToSet x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + mutable'memberIdsToRemove mutable'memberIdsToSet + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "member_ids_to_set" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'memberIdsToSet y) + loop x mutable'memberIdsToRemove v + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "member_ids_to_remove" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'memberIdsToRemove y) + loop x v mutable'memberIdsToSet + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'memberIdsToRemove mutable'memberIdsToSet + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'memberIdsToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'memberIdsToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'memberIdsToRemove + mutable'memberIdsToSet) + "UpdateLoginExchangeMemberIdList" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'memberIdsToSet") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'memberIdsToRemove") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData UpdateLoginExchangeMemberIdList where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateLoginExchangeMemberIdList'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateLoginExchangeMemberIdList'loginId x__) + (Control.DeepSeq.deepseq + (_UpdateLoginExchangeMemberIdList'memberIdsToSet x__) + (Control.DeepSeq.deepseq + (_UpdateLoginExchangeMemberIdList'memberIdsToRemove x__) ()))) +{- | Fields : + -} +data UpdateLoginExchangeMemberIdListResult + = UpdateLoginExchangeMemberIdListResult'_constructor {_UpdateLoginExchangeMemberIdListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateLoginExchangeMemberIdListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateLoginExchangeMemberIdListResult where + messageName _ + = Data.Text.pack "common_1.UpdateLoginExchangeMemberIdListResult" + packedMessageDescriptor _ + = "\n\ + \%UpdateLoginExchangeMemberIdListResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateLoginExchangeMemberIdListResult'_unknownFields + (\ x__ y__ + -> x__ + {_UpdateLoginExchangeMemberIdListResult'_unknownFields = y__}) + defMessage + = UpdateLoginExchangeMemberIdListResult'_constructor + {_UpdateLoginExchangeMemberIdListResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateLoginExchangeMemberIdListResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateLoginExchangeMemberIdListResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "UpdateLoginExchangeMemberIdListResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateLoginExchangeMemberIdListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateLoginExchangeMemberIdListResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.loginSettings' @:: Lens' UpdateLoginSettings LoginSettings@ + * 'Proto.CMS.Common1_Fields.maybe'loginSettings' @:: Lens' UpdateLoginSettings (Prelude.Maybe LoginSettings)@ -} +data UpdateLoginSettings + = UpdateLoginSettings'_constructor {_UpdateLoginSettings'loginSettings :: !(Prelude.Maybe LoginSettings), + _UpdateLoginSettings'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateLoginSettings where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateLoginSettings "loginSettings" LoginSettings where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginSettings'loginSettings + (\ x__ y__ -> x__ {_UpdateLoginSettings'loginSettings = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateLoginSettings "maybe'loginSettings" (Prelude.Maybe LoginSettings) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateLoginSettings'loginSettings + (\ x__ y__ -> x__ {_UpdateLoginSettings'loginSettings = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateLoginSettings where + messageName _ = Data.Text.pack "common_1.UpdateLoginSettings" + packedMessageDescriptor _ + = "\n\ + \\DC3UpdateLoginSettings\DC2>\n\ + \\SOlogin_settings\CAN\SOH \SOH(\v2\ETB.common_1.LoginSettingsR\rloginSettings" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginSettings__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_settings" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LoginSettings) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginSettings")) :: + Data.ProtoLens.FieldDescriptor UpdateLoginSettings + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginSettings__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateLoginSettings'_unknownFields + (\ x__ y__ -> x__ {_UpdateLoginSettings'_unknownFields = y__}) + defMessage + = UpdateLoginSettings'_constructor + {_UpdateLoginSettings'loginSettings = Prelude.Nothing, + _UpdateLoginSettings'_unknownFields = []} + parseMessage + = let + loop :: + UpdateLoginSettings + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateLoginSettings + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "login_settings" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"loginSettings") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateLoginSettings" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'loginSettings") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData UpdateLoginSettings where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateLoginSettings'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateLoginSettings'loginSettings x__) ()) +{- | Fields : + -} +data UpdateLoginSettingsResult + = UpdateLoginSettingsResult'_constructor {_UpdateLoginSettingsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateLoginSettingsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateLoginSettingsResult where + messageName _ = Data.Text.pack "common_1.UpdateLoginSettingsResult" + packedMessageDescriptor _ + = "\n\ + \\EMUpdateLoginSettingsResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateLoginSettingsResult'_unknownFields + (\ x__ y__ + -> x__ {_UpdateLoginSettingsResult'_unknownFields = y__}) + defMessage + = UpdateLoginSettingsResult'_constructor + {_UpdateLoginSettingsResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateLoginSettingsResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateLoginSettingsResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateLoginSettingsResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateLoginSettingsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateLoginSettingsResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.user' @:: Lens' UpdateUser User@ + * 'Proto.CMS.Common1_Fields.maybe'user' @:: Lens' UpdateUser (Prelude.Maybe User)@ + * 'Proto.CMS.Common1_Fields.obsoleteOriginalUser' @:: Lens' UpdateUser User@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteOriginalUser' @:: Lens' UpdateUser (Prelude.Maybe User)@ -} +data UpdateUser + = UpdateUser'_constructor {_UpdateUser'user :: !(Prelude.Maybe User), + _UpdateUser'obsoleteOriginalUser :: !(Prelude.Maybe User), + _UpdateUser'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateUser where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateUser "user" User where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateUser'user (\ x__ y__ -> x__ {_UpdateUser'user = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateUser "maybe'user" (Prelude.Maybe User) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateUser'user (\ x__ y__ -> x__ {_UpdateUser'user = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateUser "obsoleteOriginalUser" User where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateUser'obsoleteOriginalUser + (\ x__ y__ -> x__ {_UpdateUser'obsoleteOriginalUser = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateUser "maybe'obsoleteOriginalUser" (Prelude.Maybe User) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateUser'obsoleteOriginalUser + (\ x__ y__ -> x__ {_UpdateUser'obsoleteOriginalUser = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateUser where + messageName _ = Data.Text.pack "common_1.UpdateUser" + packedMessageDescriptor _ + = "\n\ + \\n\ + \UpdateUser\DC2\"\n\ + \\EOTuser\CAN\SOH \SOH(\v2\SO.common_1.UserR\EOTuser\DC2H\n\ + \\SYNobsolete_original_user\CAN\STX \SOH(\v2\SO.common_1.UserR\DC4obsoleteOriginalUserB\STX\CAN\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + user__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor User) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'user")) :: + Data.ProtoLens.FieldDescriptor UpdateUser + obsoleteOriginalUser__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_original_user" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor User) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteOriginalUser")) :: + Data.ProtoLens.FieldDescriptor UpdateUser + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, user__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteOriginalUser__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateUser'_unknownFields + (\ x__ y__ -> x__ {_UpdateUser'_unknownFields = y__}) + defMessage + = UpdateUser'_constructor + {_UpdateUser'user = Prelude.Nothing, + _UpdateUser'obsoleteOriginalUser = Prelude.Nothing, + _UpdateUser'_unknownFields = []} + parseMessage + = let + loop :: + UpdateUser -> Data.ProtoLens.Encoding.Bytes.Parser UpdateUser + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "user" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"user") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_original_user" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteOriginalUser") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateUser" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'user") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteOriginalUser") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UpdateUser where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateUser'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateUser'user x__) + (Control.DeepSeq.deepseq + (_UpdateUser'obsoleteOriginalUser x__) ())) +{- | Fields : + -} +data UpdateUserResult + = UpdateUserResult'_constructor {_UpdateUserResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateUserResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateUserResult where + messageName _ = Data.Text.pack "common_1.UpdateUserResult" + packedMessageDescriptor _ + = "\n\ + \\DLEUpdateUserResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateUserResult'_unknownFields + (\ x__ y__ -> x__ {_UpdateUserResult'_unknownFields = y__}) + defMessage + = UpdateUserResult'_constructor + {_UpdateUserResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateUserResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateUserResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateUserResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateUserResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateUserResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.clearedFields' @:: Lens' User [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'clearedFields' @:: Lens' User (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.id' @:: Lens' User Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'id' @:: Lens' User (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.userName' @:: Lens' User Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'userName' @:: Lens' User (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.obsoleteFirstName' @:: Lens' User Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteFirstName' @:: Lens' User (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.obsoleteLastName' @:: Lens' User Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteLastName' @:: Lens' User (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.obsoleteEmail' @:: Lens' User Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteEmail' @:: Lens' User (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.customerId' @:: Lens' User Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'customerId' @:: Lens' User (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.subscriberType' @:: Lens' User Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'subscriberType' @:: Lens' User (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.removalDate' @:: Lens' User Data.Int.Int64@ + * 'Proto.CMS.Common1_Fields.maybe'removalDate' @:: Lens' User (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Common1_Fields.systemId' @:: Lens' User Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'systemId' @:: Lens' User (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.traderId' @:: Lens' User Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'traderId' @:: Lens' User (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.enforcedConstraintGroup' @:: Lens' User [Data.Text.Text]@ + * 'Proto.CMS.Common1_Fields.vec'enforcedConstraintGroup' @:: Lens' User (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.currency' @:: Lens' User Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'currency' @:: Lens' User (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.domain' @:: Lens' User Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'domain' @:: Lens' User (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.removed' @:: Lens' User Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'removed' @:: Lens' User (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.class'' @:: Lens' User Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'class'' @:: Lens' User (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.isTemporary' @:: Lens' User Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'isTemporary' @:: Lens' User (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.isActive' @:: Lens' User Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'isActive' @:: Lens' User (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.expirationTime' @:: Lens' User Data.Int.Int64@ + * 'Proto.CMS.Common1_Fields.maybe'expirationTime' @:: Lens' User (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Common1_Fields.castUserId' @:: Lens' User Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'castUserId' @:: Lens' User (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.scope' @:: Lens' User Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'scope' @:: Lens' User (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.enforceIpWhitelist' @:: Lens' User Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'enforceIpWhitelist' @:: Lens' User (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.ipWhitelist' @:: Lens' User [Data.Text.Text]@ + * 'Proto.CMS.Common1_Fields.vec'ipWhitelist' @:: Lens' User (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.profileId' @:: Lens' User Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'profileId' @:: Lens' User (Prelude.Maybe Data.Text.Text)@ -} +data User + = User'_constructor {_User'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _User'id :: !(Prelude.Maybe Data.Text.Text), + _User'userName :: !(Prelude.Maybe Data.Text.Text), + _User'obsoleteFirstName :: !(Prelude.Maybe Data.Text.Text), + _User'obsoleteLastName :: !(Prelude.Maybe Data.Text.Text), + _User'obsoleteEmail :: !(Prelude.Maybe Data.Text.Text), + _User'customerId :: !(Prelude.Maybe Data.Text.Text), + _User'subscriberType :: !(Prelude.Maybe Data.Word.Word32), + _User'removalDate :: !(Prelude.Maybe Data.Int.Int64), + _User'systemId :: !(Prelude.Maybe Data.Text.Text), + _User'traderId :: !(Prelude.Maybe Data.Text.Text), + _User'enforcedConstraintGroup :: !(Data.Vector.Vector Data.Text.Text), + _User'currency :: !(Prelude.Maybe Data.Text.Text), + _User'domain :: !(Prelude.Maybe Data.Word.Word32), + _User'removed :: !(Prelude.Maybe Prelude.Bool), + _User'class' :: !(Prelude.Maybe Data.Word.Word32), + _User'isTemporary :: !(Prelude.Maybe Prelude.Bool), + _User'isActive :: !(Prelude.Maybe Prelude.Bool), + _User'expirationTime :: !(Prelude.Maybe Data.Int.Int64), + _User'castUserId :: !(Prelude.Maybe Data.Text.Text), + _User'scope :: !(Prelude.Maybe Data.Word.Word32), + _User'enforceIpWhitelist :: !(Prelude.Maybe Prelude.Bool), + _User'ipWhitelist :: !(Data.Vector.Vector Data.Text.Text), + _User'profileId :: !(Prelude.Maybe Data.Text.Text), + _User'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show User where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField User "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'clearedFields (\ x__ y__ -> x__ {_User'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField User "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'clearedFields (\ x__ y__ -> x__ {_User'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'id (\ x__ y__ -> x__ {_User'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'id (\ x__ y__ -> x__ {_User'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "userName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'userName (\ x__ y__ -> x__ {_User'userName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'userName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'userName (\ x__ y__ -> x__ {_User'userName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "obsoleteFirstName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'obsoleteFirstName + (\ x__ y__ -> x__ {_User'obsoleteFirstName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'obsoleteFirstName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'obsoleteFirstName + (\ x__ y__ -> x__ {_User'obsoleteFirstName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "obsoleteLastName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'obsoleteLastName + (\ x__ y__ -> x__ {_User'obsoleteLastName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'obsoleteLastName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'obsoleteLastName + (\ x__ y__ -> x__ {_User'obsoleteLastName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "obsoleteEmail" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'obsoleteEmail (\ x__ y__ -> x__ {_User'obsoleteEmail = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'obsoleteEmail" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'obsoleteEmail (\ x__ y__ -> x__ {_User'obsoleteEmail = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "customerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'customerId (\ x__ y__ -> x__ {_User'customerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'customerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'customerId (\ x__ y__ -> x__ {_User'customerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "subscriberType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'subscriberType + (\ x__ y__ -> x__ {_User'subscriberType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'subscriberType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'subscriberType + (\ x__ y__ -> x__ {_User'subscriberType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "removalDate" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'removalDate (\ x__ y__ -> x__ {_User'removalDate = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'removalDate" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'removalDate (\ x__ y__ -> x__ {_User'removalDate = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "systemId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'systemId (\ x__ y__ -> x__ {_User'systemId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'systemId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'systemId (\ x__ y__ -> x__ {_User'systemId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "traderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'traderId (\ x__ y__ -> x__ {_User'traderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'traderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'traderId (\ x__ y__ -> x__ {_User'traderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "enforcedConstraintGroup" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'enforcedConstraintGroup + (\ x__ y__ -> x__ {_User'enforcedConstraintGroup = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField User "vec'enforcedConstraintGroup" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'enforcedConstraintGroup + (\ x__ y__ -> x__ {_User'enforcedConstraintGroup = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "currency" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'currency (\ x__ y__ -> x__ {_User'currency = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'currency" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'currency (\ x__ y__ -> x__ {_User'currency = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "domain" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'domain (\ x__ y__ -> x__ {_User'domain = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'domain" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'domain (\ x__ y__ -> x__ {_User'domain = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "removed" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'removed (\ x__ y__ -> x__ {_User'removed = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'removed" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'removed (\ x__ y__ -> x__ {_User'removed = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "class'" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'class' (\ x__ y__ -> x__ {_User'class' = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'class'" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'class' (\ x__ y__ -> x__ {_User'class' = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "isTemporary" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'isTemporary (\ x__ y__ -> x__ {_User'isTemporary = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'isTemporary" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'isTemporary (\ x__ y__ -> x__ {_User'isTemporary = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "isActive" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'isActive (\ x__ y__ -> x__ {_User'isActive = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'isActive" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'isActive (\ x__ y__ -> x__ {_User'isActive = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "expirationTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'expirationTime + (\ x__ y__ -> x__ {_User'expirationTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'expirationTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'expirationTime + (\ x__ y__ -> x__ {_User'expirationTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "castUserId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'castUserId (\ x__ y__ -> x__ {_User'castUserId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'castUserId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'castUserId (\ x__ y__ -> x__ {_User'castUserId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "scope" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'scope (\ x__ y__ -> x__ {_User'scope = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'scope" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'scope (\ x__ y__ -> x__ {_User'scope = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "enforceIpWhitelist" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'enforceIpWhitelist + (\ x__ y__ -> x__ {_User'enforceIpWhitelist = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'enforceIpWhitelist" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'enforceIpWhitelist + (\ x__ y__ -> x__ {_User'enforceIpWhitelist = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "ipWhitelist" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'ipWhitelist (\ x__ y__ -> x__ {_User'ipWhitelist = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField User "vec'ipWhitelist" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'ipWhitelist (\ x__ y__ -> x__ {_User'ipWhitelist = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField User "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'profileId (\ x__ y__ -> x__ {_User'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField User "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _User'profileId (\ x__ y__ -> x__ {_User'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Message User where + messageName _ = Data.Text.pack "common_1.User" + packedMessageDescriptor _ + = "\n\ + \\EOTUser\DC2%\n\ + \\SOcleared_fields\CAN\ETB \ETX(\rR\rclearedFields\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\ESC\n\ + \\tuser_name\CAN\STX \SOH(\tR\buserName\DC22\n\ + \\DC3obsolete_first_name\CAN\ETX \SOH(\tR\DC1obsoleteFirstNameB\STX\CAN\SOH\DC20\n\ + \\DC2obsolete_last_name\CAN\EOT \SOH(\tR\DLEobsoleteLastNameB\STX\CAN\SOH\DC2)\n\ + \\SOobsolete_email\CAN\ENQ \SOH(\tR\robsoleteEmailB\STX\CAN\SOH\DC2\US\n\ + \\vcustomer_id\CAN\ACK \SOH(\tR\n\ + \customerId\DC2'\n\ + \\SIsubscriber_type\CAN\a \SOH(\rR\SOsubscriberType\DC2!\n\ + \\fremoval_date\CAN\b \SOH(\DC2R\vremovalDate\DC2\ESC\n\ + \\tsystem_id\CAN\t \SOH(\tR\bsystemId\DC2\ESC\n\ + \\ttrader_id\CAN\n\ + \ \SOH(\tR\btraderId\DC2:\n\ + \\EMenforced_constraint_group\CAN\v \ETX(\tR\ETBenforcedConstraintGroup\DC2\SUB\n\ + \\bcurrency\CAN\f \SOH(\tR\bcurrency\DC2\SYN\n\ + \\ACKdomain\CAN\r \SOH(\rR\ACKdomain\DC2\CAN\n\ + \\aremoved\CAN\SO \SOH(\bR\aremoved\DC2\DC4\n\ + \\ENQclass\CAN\SI \SOH(\rR\ENQclass\DC2!\n\ + \\fis_temporary\CAN\DLE \SOH(\bR\visTemporary\DC2\ESC\n\ + \\tis_active\CAN\DC1 \SOH(\bR\bisActive\DC2'\n\ + \\SIexpiration_time\CAN\DC2 \SOH(\DC2R\SOexpirationTime\DC2 \n\ + \\fcast_user_id\CAN\DC3 \SOH(\tR\n\ + \castUserId\DC2\DC4\n\ + \\ENQscope\CAN\DC4 \SOH(\rR\ENQscope\DC20\n\ + \\DC4enforce_ip_whitelist\CAN\NAK \SOH(\bR\DC2enforceIpWhitelist\DC2!\n\ + \\fip_whitelist\CAN\SYN \ETX(\tR\vipWhitelist\DC2\GS\n\ + \\n\ + \profile_id\CAN\CAN \SOH(\tR\tprofileId\"&\n\ + \\SOSubscriberType\DC2\a\n\ + \\ETXPRO\DLE\NUL\DC2\v\n\ + \\aNON_PRO\DLE\SOH\"J\n\ + \\n\ + \LoginClass\DC2\v\n\ + \\aREGULAR\DLE\SOH\DC2\SO\n\ + \\n\ + \FIX_DIRECT\DLE\STX\DC2\DC1\n\ + \\rORDER_HANDLER\DLE\ETX\DC2\f\n\ + \\bTEMPLATE\DLE\EOT" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor User + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor User + userName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'userName")) :: + Data.ProtoLens.FieldDescriptor User + obsoleteFirstName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_first_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteFirstName")) :: + Data.ProtoLens.FieldDescriptor User + obsoleteLastName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_last_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteLastName")) :: + Data.ProtoLens.FieldDescriptor User + obsoleteEmail__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_email" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteEmail")) :: + Data.ProtoLens.FieldDescriptor User + customerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerId")) :: + Data.ProtoLens.FieldDescriptor User + subscriberType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "subscriber_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'subscriberType")) :: + Data.ProtoLens.FieldDescriptor User + removalDate__field_descriptor + = Data.ProtoLens.FieldDescriptor + "removal_date" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removalDate")) :: + Data.ProtoLens.FieldDescriptor User + systemId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "system_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'systemId")) :: + Data.ProtoLens.FieldDescriptor User + traderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trader_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'traderId")) :: + Data.ProtoLens.FieldDescriptor User + enforcedConstraintGroup__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforced_constraint_group" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"enforcedConstraintGroup")) :: + Data.ProtoLens.FieldDescriptor User + currency__field_descriptor + = Data.ProtoLens.FieldDescriptor + "currency" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'currency")) :: + Data.ProtoLens.FieldDescriptor User + domain__field_descriptor + = Data.ProtoLens.FieldDescriptor + "domain" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'domain")) :: + Data.ProtoLens.FieldDescriptor User + removed__field_descriptor + = Data.ProtoLens.FieldDescriptor + "removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removed")) :: + Data.ProtoLens.FieldDescriptor User + class'__field_descriptor + = Data.ProtoLens.FieldDescriptor + "class" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'class'")) :: + Data.ProtoLens.FieldDescriptor User + isTemporary__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_temporary" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isTemporary")) :: + Data.ProtoLens.FieldDescriptor User + isActive__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_active" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isActive")) :: + Data.ProtoLens.FieldDescriptor User + expirationTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "expiration_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'expirationTime")) :: + Data.ProtoLens.FieldDescriptor User + castUserId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cast_user_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'castUserId")) :: + Data.ProtoLens.FieldDescriptor User + scope__field_descriptor + = Data.ProtoLens.FieldDescriptor + "scope" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'scope")) :: + Data.ProtoLens.FieldDescriptor User + enforceIpWhitelist__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_ip_whitelist" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'enforceIpWhitelist")) :: + Data.ProtoLens.FieldDescriptor User + ipWhitelist__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ip_whitelist" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"ipWhitelist")) :: + Data.ProtoLens.FieldDescriptor User + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor User + in + Data.Map.fromList + [(Data.ProtoLens.Tag 23, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, userName__field_descriptor), + (Data.ProtoLens.Tag 3, obsoleteFirstName__field_descriptor), + (Data.ProtoLens.Tag 4, obsoleteLastName__field_descriptor), + (Data.ProtoLens.Tag 5, obsoleteEmail__field_descriptor), + (Data.ProtoLens.Tag 6, customerId__field_descriptor), + (Data.ProtoLens.Tag 7, subscriberType__field_descriptor), + (Data.ProtoLens.Tag 8, removalDate__field_descriptor), + (Data.ProtoLens.Tag 9, systemId__field_descriptor), + (Data.ProtoLens.Tag 10, traderId__field_descriptor), + (Data.ProtoLens.Tag 11, enforcedConstraintGroup__field_descriptor), + (Data.ProtoLens.Tag 12, currency__field_descriptor), + (Data.ProtoLens.Tag 13, domain__field_descriptor), + (Data.ProtoLens.Tag 14, removed__field_descriptor), + (Data.ProtoLens.Tag 15, class'__field_descriptor), + (Data.ProtoLens.Tag 16, isTemporary__field_descriptor), + (Data.ProtoLens.Tag 17, isActive__field_descriptor), + (Data.ProtoLens.Tag 18, expirationTime__field_descriptor), + (Data.ProtoLens.Tag 19, castUserId__field_descriptor), + (Data.ProtoLens.Tag 20, scope__field_descriptor), + (Data.ProtoLens.Tag 21, enforceIpWhitelist__field_descriptor), + (Data.ProtoLens.Tag 22, ipWhitelist__field_descriptor), + (Data.ProtoLens.Tag 24, profileId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _User'_unknownFields + (\ x__ y__ -> x__ {_User'_unknownFields = y__}) + defMessage + = User'_constructor + {_User'clearedFields = Data.Vector.Generic.empty, + _User'id = Prelude.Nothing, _User'userName = Prelude.Nothing, + _User'obsoleteFirstName = Prelude.Nothing, + _User'obsoleteLastName = Prelude.Nothing, + _User'obsoleteEmail = Prelude.Nothing, + _User'customerId = Prelude.Nothing, + _User'subscriberType = Prelude.Nothing, + _User'removalDate = Prelude.Nothing, + _User'systemId = Prelude.Nothing, _User'traderId = Prelude.Nothing, + _User'enforcedConstraintGroup = Data.Vector.Generic.empty, + _User'currency = Prelude.Nothing, _User'domain = Prelude.Nothing, + _User'removed = Prelude.Nothing, _User'class' = Prelude.Nothing, + _User'isTemporary = Prelude.Nothing, + _User'isActive = Prelude.Nothing, + _User'expirationTime = Prelude.Nothing, + _User'castUserId = Prelude.Nothing, _User'scope = Prelude.Nothing, + _User'enforceIpWhitelist = Prelude.Nothing, + _User'ipWhitelist = Data.Vector.Generic.empty, + _User'profileId = Prelude.Nothing, _User'_unknownFields = []} + parseMessage + = let + loop :: + User + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser User + loop + x + mutable'clearedFields + mutable'enforcedConstraintGroup + mutable'ipWhitelist + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + frozen'enforcedConstraintGroup <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'enforcedConstraintGroup) + frozen'ipWhitelist <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'ipWhitelist) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'enforcedConstraintGroup") + frozen'enforcedConstraintGroup + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'ipWhitelist") + frozen'ipWhitelist x)))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 184 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x v mutable'enforcedConstraintGroup mutable'ipWhitelist + 186 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x y mutable'enforcedConstraintGroup mutable'ipWhitelist + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"userName") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_first_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteFirstName") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_last_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteLastName") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_email" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteEmail") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"customerId") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "subscriber_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"subscriberType") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "removal_date" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"removalDate") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "system_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"systemId") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trader_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"traderId") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 90 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "enforced_constraint_group" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'enforcedConstraintGroup y) + loop x mutable'clearedFields v mutable'ipWhitelist + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "currency" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"currency") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 104 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "domain" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"domain") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 112 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "removed" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"removed") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 120 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "class" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"class'") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 128 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_temporary" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isTemporary") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 136 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_active" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isActive") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 144 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "expiration_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"expirationTime") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 154 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "cast_user_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"castUserId") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 160 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "scope" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"scope") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 168 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_ip_whitelist" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"enforceIpWhitelist") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + 178 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "ip_whitelist" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'ipWhitelist y) + loop x mutable'clearedFields mutable'enforcedConstraintGroup v + 194 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'clearedFields mutable'enforcedConstraintGroup + mutable'ipWhitelist + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'enforcedConstraintGroup <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'ipWhitelist <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'clearedFields + mutable'enforcedConstraintGroup mutable'ipWhitelist) + "User" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 184) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'userName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteFirstName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteLastName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteEmail") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'customerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'subscriberType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'removalDate") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'systemId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'traderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'enforcedConstraintGroup") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'currency") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'domain") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 104) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'removed") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 112) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'class'") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 120) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'isTemporary") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 128) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'isActive") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 136) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'expirationTime") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 144) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'castUserId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 154) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'scope") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 160) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'enforceIpWhitelist") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 168) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 178) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'ipWhitelist") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'profileId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 194) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))))))))))))) +instance Control.DeepSeq.NFData User where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_User'_unknownFields x__) + (Control.DeepSeq.deepseq + (_User'clearedFields x__) + (Control.DeepSeq.deepseq + (_User'id x__) + (Control.DeepSeq.deepseq + (_User'userName x__) + (Control.DeepSeq.deepseq + (_User'obsoleteFirstName x__) + (Control.DeepSeq.deepseq + (_User'obsoleteLastName x__) + (Control.DeepSeq.deepseq + (_User'obsoleteEmail x__) + (Control.DeepSeq.deepseq + (_User'customerId x__) + (Control.DeepSeq.deepseq + (_User'subscriberType x__) + (Control.DeepSeq.deepseq + (_User'removalDate x__) + (Control.DeepSeq.deepseq + (_User'systemId x__) + (Control.DeepSeq.deepseq + (_User'traderId x__) + (Control.DeepSeq.deepseq + (_User'enforcedConstraintGroup x__) + (Control.DeepSeq.deepseq + (_User'currency x__) + (Control.DeepSeq.deepseq + (_User'domain x__) + (Control.DeepSeq.deepseq + (_User'removed x__) + (Control.DeepSeq.deepseq + (_User'class' x__) + (Control.DeepSeq.deepseq + (_User'isTemporary x__) + (Control.DeepSeq.deepseq + (_User'isActive x__) + (Control.DeepSeq.deepseq + (_User'expirationTime x__) + (Control.DeepSeq.deepseq + (_User'castUserId x__) + (Control.DeepSeq.deepseq + (_User'scope x__) + (Control.DeepSeq.deepseq + (_User'enforceIpWhitelist + x__) + (Control.DeepSeq.deepseq + (_User'ipWhitelist + x__) + (Control.DeepSeq.deepseq + (_User'profileId + x__) + ())))))))))))))))))))))))) +data User'LoginClass + = User'REGULAR | + User'FIX_DIRECT | + User'ORDER_HANDLER | + User'TEMPLATE + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum User'LoginClass where + maybeToEnum 1 = Prelude.Just User'REGULAR + maybeToEnum 2 = Prelude.Just User'FIX_DIRECT + maybeToEnum 3 = Prelude.Just User'ORDER_HANDLER + maybeToEnum 4 = Prelude.Just User'TEMPLATE + maybeToEnum _ = Prelude.Nothing + showEnum User'REGULAR = "REGULAR" + showEnum User'FIX_DIRECT = "FIX_DIRECT" + showEnum User'ORDER_HANDLER = "ORDER_HANDLER" + showEnum User'TEMPLATE = "TEMPLATE" + readEnum k + | (Prelude.==) k "REGULAR" = Prelude.Just User'REGULAR + | (Prelude.==) k "FIX_DIRECT" = Prelude.Just User'FIX_DIRECT + | (Prelude.==) k "ORDER_HANDLER" = Prelude.Just User'ORDER_HANDLER + | (Prelude.==) k "TEMPLATE" = Prelude.Just User'TEMPLATE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded User'LoginClass where + minBound = User'REGULAR + maxBound = User'TEMPLATE +instance Prelude.Enum User'LoginClass where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum LoginClass: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum User'REGULAR = 1 + fromEnum User'FIX_DIRECT = 2 + fromEnum User'ORDER_HANDLER = 3 + fromEnum User'TEMPLATE = 4 + succ User'TEMPLATE + = Prelude.error + "User'LoginClass.succ: bad argument User'TEMPLATE. This value would be out of bounds." + succ User'REGULAR = User'FIX_DIRECT + succ User'FIX_DIRECT = User'ORDER_HANDLER + succ User'ORDER_HANDLER = User'TEMPLATE + pred User'REGULAR + = Prelude.error + "User'LoginClass.pred: bad argument User'REGULAR. This value would be out of bounds." + pred User'FIX_DIRECT = User'REGULAR + pred User'ORDER_HANDLER = User'FIX_DIRECT + pred User'TEMPLATE = User'ORDER_HANDLER + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault User'LoginClass where + fieldDefault = User'REGULAR +instance Control.DeepSeq.NFData User'LoginClass where + rnf x__ = Prelude.seq x__ () +data User'SubscriberType + = User'PRO | User'NON_PRO + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum User'SubscriberType where + maybeToEnum 0 = Prelude.Just User'PRO + maybeToEnum 1 = Prelude.Just User'NON_PRO + maybeToEnum _ = Prelude.Nothing + showEnum User'PRO = "PRO" + showEnum User'NON_PRO = "NON_PRO" + readEnum k + | (Prelude.==) k "PRO" = Prelude.Just User'PRO + | (Prelude.==) k "NON_PRO" = Prelude.Just User'NON_PRO + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded User'SubscriberType where + minBound = User'PRO + maxBound = User'NON_PRO +instance Prelude.Enum User'SubscriberType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum SubscriberType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum User'PRO = 0 + fromEnum User'NON_PRO = 1 + succ User'NON_PRO + = Prelude.error + "User'SubscriberType.succ: bad argument User'NON_PRO. This value would be out of bounds." + succ User'PRO = User'NON_PRO + pred User'PRO + = Prelude.error + "User'SubscriberType.pred: bad argument User'PRO. This value would be out of bounds." + pred User'NON_PRO = User'PRO + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault User'SubscriberType where + fieldDefault = User'PRO +instance Control.DeepSeq.NFData User'SubscriberType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.userId' @:: Lens' UserInfoRequest Data.Text.Text@ -} +data UserInfoRequest + = UserInfoRequest'_constructor {_UserInfoRequest'userId :: !Data.Text.Text, + _UserInfoRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UserInfoRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UserInfoRequest "userId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserInfoRequest'userId + (\ x__ y__ -> x__ {_UserInfoRequest'userId = y__})) + Prelude.id +instance Data.ProtoLens.Message UserInfoRequest where + messageName _ = Data.Text.pack "common_1.UserInfoRequest" + packedMessageDescriptor _ + = "\n\ + \\SIUserInfoRequest\DC2\ETB\n\ + \\auser_id\CAN\EOT \STX(\tR\ACKuserId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + userId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"userId")) :: + Data.ProtoLens.FieldDescriptor UserInfoRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 4, userId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UserInfoRequest'_unknownFields + (\ x__ y__ -> x__ {_UserInfoRequest'_unknownFields = y__}) + defMessage + = UserInfoRequest'_constructor + {_UserInfoRequest'userId = Data.ProtoLens.fieldDefault, + _UserInfoRequest'_unknownFields = []} + parseMessage + = let + loop :: + UserInfoRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser UserInfoRequest + loop x required'userId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'userId then (:) "user_id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"userId") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'userId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "UserInfoRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"userId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData UserInfoRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UserInfoRequest'_unknownFields x__) + (Control.DeepSeq.deepseq (_UserInfoRequest'userId x__) ()) +{- | Fields : + + * 'Proto.CMS.Common1_Fields.messageType' @:: Lens' UserMessage Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.source' @:: Lens' UserMessage Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'source' @:: Lens' UserMessage (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.subject' @:: Lens' UserMessage Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'subject' @:: Lens' UserMessage (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.text' @:: Lens' UserMessage Proto.Common.Shared1.Text@ + * 'Proto.CMS.Common1_Fields.expirationUtcTime' @:: Lens' UserMessage Data.Int.Int64@ + * 'Proto.CMS.Common1_Fields.maybe'expirationUtcTime' @:: Lens' UserMessage (Prelude.Maybe Data.Int.Int64)@ -} +data UserMessage + = UserMessage'_constructor {_UserMessage'messageType :: !Data.Word.Word32, + _UserMessage'source :: !(Prelude.Maybe Data.Text.Text), + _UserMessage'subject :: !(Prelude.Maybe Data.Text.Text), + _UserMessage'text :: !Proto.Common.Shared1.Text, + _UserMessage'expirationUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _UserMessage'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UserMessage where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UserMessage "messageType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserMessage'messageType + (\ x__ y__ -> x__ {_UserMessage'messageType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserMessage "source" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserMessage'source (\ x__ y__ -> x__ {_UserMessage'source = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserMessage "maybe'source" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserMessage'source (\ x__ y__ -> x__ {_UserMessage'source = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserMessage "subject" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserMessage'subject + (\ x__ y__ -> x__ {_UserMessage'subject = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserMessage "maybe'subject" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserMessage'subject + (\ x__ y__ -> x__ {_UserMessage'subject = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserMessage "text" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserMessage'text (\ x__ y__ -> x__ {_UserMessage'text = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserMessage "expirationUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserMessage'expirationUtcTime + (\ x__ y__ -> x__ {_UserMessage'expirationUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserMessage "maybe'expirationUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserMessage'expirationUtcTime + (\ x__ y__ -> x__ {_UserMessage'expirationUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Message UserMessage where + messageName _ = Data.Text.pack "common_1.UserMessage" + packedMessageDescriptor _ + = "\n\ + \\vUserMessage\DC2!\n\ + \\fmessage_type\CAN\SOH \STX(\rR\vmessageType\DC2\SYN\n\ + \\ACKsource\CAN\STX \SOH(\tR\ACKsource\DC2\CAN\n\ + \\asubject\CAN\ETX \SOH(\tR\asubject\DC2\"\n\ + \\EOTtext\CAN\EOT \STX(\v2\SO.shared_1.TextR\EOTtext\DC2.\n\ + \\DC3expiration_utc_time\CAN\ENQ \SOH(\DC2R\DC1expirationUtcTime\"A\n\ + \\vMessageType\DC2\DC2\n\ + \\SOCRITICAL_ERROR\DLE\SOH\DC2\v\n\ + \\aWARNING\DLE\STX\DC2\b\n\ + \\EOTINFO\DLE\ETX\DC2\a\n\ + \\ETXLOG\DLE\EOT" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + messageType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "message_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"messageType")) :: + Data.ProtoLens.FieldDescriptor UserMessage + source__field_descriptor + = Data.ProtoLens.FieldDescriptor + "source" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'source")) :: + Data.ProtoLens.FieldDescriptor UserMessage + subject__field_descriptor + = Data.ProtoLens.FieldDescriptor + "subject" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'subject")) :: + Data.ProtoLens.FieldDescriptor UserMessage + text__field_descriptor + = Data.ProtoLens.FieldDescriptor + "text" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"text")) :: + Data.ProtoLens.FieldDescriptor UserMessage + expirationUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "expiration_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'expirationUtcTime")) :: + Data.ProtoLens.FieldDescriptor UserMessage + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, messageType__field_descriptor), + (Data.ProtoLens.Tag 2, source__field_descriptor), + (Data.ProtoLens.Tag 3, subject__field_descriptor), + (Data.ProtoLens.Tag 4, text__field_descriptor), + (Data.ProtoLens.Tag 5, expirationUtcTime__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UserMessage'_unknownFields + (\ x__ y__ -> x__ {_UserMessage'_unknownFields = y__}) + defMessage + = UserMessage'_constructor + {_UserMessage'messageType = Data.ProtoLens.fieldDefault, + _UserMessage'source = Prelude.Nothing, + _UserMessage'subject = Prelude.Nothing, + _UserMessage'text = Data.ProtoLens.defMessage, + _UserMessage'expirationUtcTime = Prelude.Nothing, + _UserMessage'_unknownFields = []} + parseMessage + = let + loop :: + UserMessage + -> Prelude.Bool + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser UserMessage + loop x required'messageType required'text + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'messageType then (:) "message_type" else Prelude.id) + ((if required'text then (:) "text" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "message_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"messageType") y x) + Prelude.False required'text + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "source" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"source") y x) + required'messageType required'text + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "subject" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"subject") y x) + required'messageType required'text + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "text" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"text") y x) + required'messageType Prelude.False + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "expiration_utc_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"expirationUtcTime") y x) + required'messageType required'text + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'messageType required'text + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "UserMessage" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"messageType") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'source") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'subject") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view (Data.ProtoLens.Field.field @"text") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'expirationUtcTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData UserMessage where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UserMessage'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UserMessage'messageType x__) + (Control.DeepSeq.deepseq + (_UserMessage'source x__) + (Control.DeepSeq.deepseq + (_UserMessage'subject x__) + (Control.DeepSeq.deepseq + (_UserMessage'text x__) + (Control.DeepSeq.deepseq + (_UserMessage'expirationUtcTime x__) ()))))) +data UserMessage'MessageType + = UserMessage'CRITICAL_ERROR | + UserMessage'WARNING | + UserMessage'INFO | + UserMessage'LOG + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum UserMessage'MessageType where + maybeToEnum 1 = Prelude.Just UserMessage'CRITICAL_ERROR + maybeToEnum 2 = Prelude.Just UserMessage'WARNING + maybeToEnum 3 = Prelude.Just UserMessage'INFO + maybeToEnum 4 = Prelude.Just UserMessage'LOG + maybeToEnum _ = Prelude.Nothing + showEnum UserMessage'CRITICAL_ERROR = "CRITICAL_ERROR" + showEnum UserMessage'WARNING = "WARNING" + showEnum UserMessage'INFO = "INFO" + showEnum UserMessage'LOG = "LOG" + readEnum k + | (Prelude.==) k "CRITICAL_ERROR" + = Prelude.Just UserMessage'CRITICAL_ERROR + | (Prelude.==) k "WARNING" = Prelude.Just UserMessage'WARNING + | (Prelude.==) k "INFO" = Prelude.Just UserMessage'INFO + | (Prelude.==) k "LOG" = Prelude.Just UserMessage'LOG + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded UserMessage'MessageType where + minBound = UserMessage'CRITICAL_ERROR + maxBound = UserMessage'LOG +instance Prelude.Enum UserMessage'MessageType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum MessageType: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum UserMessage'CRITICAL_ERROR = 1 + fromEnum UserMessage'WARNING = 2 + fromEnum UserMessage'INFO = 3 + fromEnum UserMessage'LOG = 4 + succ UserMessage'LOG + = Prelude.error + "UserMessage'MessageType.succ: bad argument UserMessage'LOG. This value would be out of bounds." + succ UserMessage'CRITICAL_ERROR = UserMessage'WARNING + succ UserMessage'WARNING = UserMessage'INFO + succ UserMessage'INFO = UserMessage'LOG + pred UserMessage'CRITICAL_ERROR + = Prelude.error + "UserMessage'MessageType.pred: bad argument UserMessage'CRITICAL_ERROR. This value would be out of bounds." + pred UserMessage'WARNING = UserMessage'CRITICAL_ERROR + pred UserMessage'INFO = UserMessage'WARNING + pred UserMessage'LOG = UserMessage'INFO + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault UserMessage'MessageType where + fieldDefault = UserMessage'CRITICAL_ERROR +instance Control.DeepSeq.NFData UserMessage'MessageType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.obsoleteText' @:: Lens' UserSearchRequest Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'obsoleteText' @:: Lens' UserSearchRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.obsoleteSearchCriteria' @:: Lens' UserSearchRequest [Data.Word.Word32]@ + * 'Proto.CMS.Common1_Fields.vec'obsoleteSearchCriteria' @:: Lens' UserSearchRequest (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.searchOptions' @:: Lens' UserSearchRequest [SearchOption]@ + * 'Proto.CMS.Common1_Fields.vec'searchOptions' @:: Lens' UserSearchRequest (Data.Vector.Vector SearchOption)@ + * 'Proto.CMS.Common1_Fields.allMatchMode' @:: Lens' UserSearchRequest Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'allMatchMode' @:: Lens' UserSearchRequest (Prelude.Maybe Prelude.Bool)@ -} +data UserSearchRequest + = UserSearchRequest'_constructor {_UserSearchRequest'obsoleteText :: !(Prelude.Maybe Data.Text.Text), + _UserSearchRequest'obsoleteSearchCriteria :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _UserSearchRequest'searchOptions :: !(Data.Vector.Vector SearchOption), + _UserSearchRequest'allMatchMode :: !(Prelude.Maybe Prelude.Bool), + _UserSearchRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UserSearchRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UserSearchRequest "obsoleteText" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchRequest'obsoleteText + (\ x__ y__ -> x__ {_UserSearchRequest'obsoleteText = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserSearchRequest "maybe'obsoleteText" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchRequest'obsoleteText + (\ x__ y__ -> x__ {_UserSearchRequest'obsoleteText = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchRequest "obsoleteSearchCriteria" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchRequest'obsoleteSearchCriteria + (\ x__ y__ + -> x__ {_UserSearchRequest'obsoleteSearchCriteria = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UserSearchRequest "vec'obsoleteSearchCriteria" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchRequest'obsoleteSearchCriteria + (\ x__ y__ + -> x__ {_UserSearchRequest'obsoleteSearchCriteria = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchRequest "searchOptions" [SearchOption] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchRequest'searchOptions + (\ x__ y__ -> x__ {_UserSearchRequest'searchOptions = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UserSearchRequest "vec'searchOptions" (Data.Vector.Vector SearchOption) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchRequest'searchOptions + (\ x__ y__ -> x__ {_UserSearchRequest'searchOptions = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchRequest "allMatchMode" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_UserSearchRequest'allMatchMode = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField UserSearchRequest "maybe'allMatchMode" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_UserSearchRequest'allMatchMode = y__})) + Prelude.id +instance Data.ProtoLens.Message UserSearchRequest where + messageName _ = Data.Text.pack "common_1.UserSearchRequest" + packedMessageDescriptor _ + = "\n\ + \\DC1UserSearchRequest\DC2'\n\ + \\robsolete_text\CAN\SOH \SOH(\tR\fobsoleteTextB\STX\CAN\SOH\DC2<\n\ + \\CANobsolete_search_criteria\CAN\STX \ETX(\rR\SYNobsoleteSearchCriteriaB\STX\CAN\SOH\DC2=\n\ + \\SOsearch_options\CAN\ETX \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\EOT \SOH(\b:\ENQfalseR\fallMatchMode\"\196\STX\n\ + \\SOSearchCriteria\DC2\v\n\ + \\aUSER_ID\DLE\SOH\DC2\r\n\ + \\tUSER_NAME\DLE\EOT\DC2\US\n\ + \\ESCPROFILE_SALES_SERIES_NUMBER\DLE\ENQ\DC2\GS\n\ + \\EMPROFILE_SALES_SERIES_NAME\DLE\ACK\DC2\DC3\n\ + \\SISALES_SERIES_ID\DLE\a\DC2\SI\n\ + \\vCUSTOMER_ID\DLE\b\DC2\DLE\n\ + \\fBROKERAGE_ID\DLE\t\DC2\DC2\n\ + \\SOBROKERAGE_NAME\DLE\n\ + \\DC2\t\n\ + \\ENQCLASS\DLE\v\DC2\DLE\n\ + \\fLOGIN_DOMAIN\DLE\f\DC2\SO\n\ + \\n\ + \PROFILE_ID\DLE\r\DC2\ESC\n\ + \\ETBPROFILE_SALES_SERIES_ID\DLE\SO\DC2\DC3\n\ + \\SIAUTH_PARTNER_ID\DLE\SI\DC2\DC4\n\ + \\DLEEXTERNAL_USER_ID\DLE\DLE\DC2\NAK\n\ + \\DC1AUTH_PARTNER_NAME\DLE\DC1" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteText__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_text" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteText")) :: + Data.ProtoLens.FieldDescriptor UserSearchRequest + obsoleteSearchCriteria__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_search_criteria" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"obsoleteSearchCriteria")) :: + Data.ProtoLens.FieldDescriptor UserSearchRequest + searchOptions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "search_options" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SearchOption) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"searchOptions")) :: + Data.ProtoLens.FieldDescriptor UserSearchRequest + allMatchMode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "all_match_mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allMatchMode")) :: + Data.ProtoLens.FieldDescriptor UserSearchRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteText__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteSearchCriteria__field_descriptor), + (Data.ProtoLens.Tag 3, searchOptions__field_descriptor), + (Data.ProtoLens.Tag 4, allMatchMode__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UserSearchRequest'_unknownFields + (\ x__ y__ -> x__ {_UserSearchRequest'_unknownFields = y__}) + defMessage + = UserSearchRequest'_constructor + {_UserSearchRequest'obsoleteText = Prelude.Nothing, + _UserSearchRequest'obsoleteSearchCriteria = Data.Vector.Generic.empty, + _UserSearchRequest'searchOptions = Data.Vector.Generic.empty, + _UserSearchRequest'allMatchMode = Prelude.Nothing, + _UserSearchRequest'_unknownFields = []} + parseMessage + = let + loop :: + UserSearchRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld SearchOption + -> Data.ProtoLens.Encoding.Bytes.Parser UserSearchRequest + loop x mutable'obsoleteSearchCriteria mutable'searchOptions + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'obsoleteSearchCriteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'obsoleteSearchCriteria) + frozen'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'searchOptions) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria") + frozen'obsoleteSearchCriteria + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'searchOptions") + frozen'searchOptions x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_text" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteText") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + 16 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_search_criteria" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'obsoleteSearchCriteria y) + loop x v mutable'searchOptions + 18 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_search_criteria" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'obsoleteSearchCriteria) + loop x y mutable'searchOptions + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "search_options" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'searchOptions y) + loop x mutable'obsoleteSearchCriteria v + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "all_match_mode" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allMatchMode") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'obsoleteSearchCriteria mutable'searchOptions + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'obsoleteSearchCriteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'obsoleteSearchCriteria + mutable'searchOptions) + "UserSearchRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteText") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'searchOptions") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allMatchMode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData UserSearchRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UserSearchRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UserSearchRequest'obsoleteText x__) + (Control.DeepSeq.deepseq + (_UserSearchRequest'obsoleteSearchCriteria x__) + (Control.DeepSeq.deepseq + (_UserSearchRequest'searchOptions x__) + (Control.DeepSeq.deepseq + (_UserSearchRequest'allMatchMode x__) ())))) +data UserSearchRequest'SearchCriteria + = UserSearchRequest'USER_ID | + UserSearchRequest'USER_NAME | + UserSearchRequest'PROFILE_SALES_SERIES_NUMBER | + UserSearchRequest'PROFILE_SALES_SERIES_NAME | + UserSearchRequest'SALES_SERIES_ID | + UserSearchRequest'CUSTOMER_ID | + UserSearchRequest'BROKERAGE_ID | + UserSearchRequest'BROKERAGE_NAME | + UserSearchRequest'CLASS | + UserSearchRequest'LOGIN_DOMAIN | + UserSearchRequest'PROFILE_ID | + UserSearchRequest'PROFILE_SALES_SERIES_ID | + UserSearchRequest'AUTH_PARTNER_ID | + UserSearchRequest'EXTERNAL_USER_ID | + UserSearchRequest'AUTH_PARTNER_NAME + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum UserSearchRequest'SearchCriteria where + maybeToEnum 1 = Prelude.Just UserSearchRequest'USER_ID + maybeToEnum 4 = Prelude.Just UserSearchRequest'USER_NAME + maybeToEnum 5 + = Prelude.Just UserSearchRequest'PROFILE_SALES_SERIES_NUMBER + maybeToEnum 6 + = Prelude.Just UserSearchRequest'PROFILE_SALES_SERIES_NAME + maybeToEnum 7 = Prelude.Just UserSearchRequest'SALES_SERIES_ID + maybeToEnum 8 = Prelude.Just UserSearchRequest'CUSTOMER_ID + maybeToEnum 9 = Prelude.Just UserSearchRequest'BROKERAGE_ID + maybeToEnum 10 = Prelude.Just UserSearchRequest'BROKERAGE_NAME + maybeToEnum 11 = Prelude.Just UserSearchRequest'CLASS + maybeToEnum 12 = Prelude.Just UserSearchRequest'LOGIN_DOMAIN + maybeToEnum 13 = Prelude.Just UserSearchRequest'PROFILE_ID + maybeToEnum 14 + = Prelude.Just UserSearchRequest'PROFILE_SALES_SERIES_ID + maybeToEnum 15 = Prelude.Just UserSearchRequest'AUTH_PARTNER_ID + maybeToEnum 16 = Prelude.Just UserSearchRequest'EXTERNAL_USER_ID + maybeToEnum 17 = Prelude.Just UserSearchRequest'AUTH_PARTNER_NAME + maybeToEnum _ = Prelude.Nothing + showEnum UserSearchRequest'USER_ID = "USER_ID" + showEnum UserSearchRequest'USER_NAME = "USER_NAME" + showEnum UserSearchRequest'PROFILE_SALES_SERIES_NUMBER + = "PROFILE_SALES_SERIES_NUMBER" + showEnum UserSearchRequest'PROFILE_SALES_SERIES_NAME + = "PROFILE_SALES_SERIES_NAME" + showEnum UserSearchRequest'SALES_SERIES_ID = "SALES_SERIES_ID" + showEnum UserSearchRequest'CUSTOMER_ID = "CUSTOMER_ID" + showEnum UserSearchRequest'BROKERAGE_ID = "BROKERAGE_ID" + showEnum UserSearchRequest'BROKERAGE_NAME = "BROKERAGE_NAME" + showEnum UserSearchRequest'CLASS = "CLASS" + showEnum UserSearchRequest'LOGIN_DOMAIN = "LOGIN_DOMAIN" + showEnum UserSearchRequest'PROFILE_ID = "PROFILE_ID" + showEnum UserSearchRequest'PROFILE_SALES_SERIES_ID + = "PROFILE_SALES_SERIES_ID" + showEnum UserSearchRequest'AUTH_PARTNER_ID = "AUTH_PARTNER_ID" + showEnum UserSearchRequest'EXTERNAL_USER_ID = "EXTERNAL_USER_ID" + showEnum UserSearchRequest'AUTH_PARTNER_NAME = "AUTH_PARTNER_NAME" + readEnum k + | (Prelude.==) k "USER_ID" = Prelude.Just UserSearchRequest'USER_ID + | (Prelude.==) k "USER_NAME" + = Prelude.Just UserSearchRequest'USER_NAME + | (Prelude.==) k "PROFILE_SALES_SERIES_NUMBER" + = Prelude.Just UserSearchRequest'PROFILE_SALES_SERIES_NUMBER + | (Prelude.==) k "PROFILE_SALES_SERIES_NAME" + = Prelude.Just UserSearchRequest'PROFILE_SALES_SERIES_NAME + | (Prelude.==) k "SALES_SERIES_ID" + = Prelude.Just UserSearchRequest'SALES_SERIES_ID + | (Prelude.==) k "CUSTOMER_ID" + = Prelude.Just UserSearchRequest'CUSTOMER_ID + | (Prelude.==) k "BROKERAGE_ID" + = Prelude.Just UserSearchRequest'BROKERAGE_ID + | (Prelude.==) k "BROKERAGE_NAME" + = Prelude.Just UserSearchRequest'BROKERAGE_NAME + | (Prelude.==) k "CLASS" = Prelude.Just UserSearchRequest'CLASS + | (Prelude.==) k "LOGIN_DOMAIN" + = Prelude.Just UserSearchRequest'LOGIN_DOMAIN + | (Prelude.==) k "PROFILE_ID" + = Prelude.Just UserSearchRequest'PROFILE_ID + | (Prelude.==) k "PROFILE_SALES_SERIES_ID" + = Prelude.Just UserSearchRequest'PROFILE_SALES_SERIES_ID + | (Prelude.==) k "AUTH_PARTNER_ID" + = Prelude.Just UserSearchRequest'AUTH_PARTNER_ID + | (Prelude.==) k "EXTERNAL_USER_ID" + = Prelude.Just UserSearchRequest'EXTERNAL_USER_ID + | (Prelude.==) k "AUTH_PARTNER_NAME" + = Prelude.Just UserSearchRequest'AUTH_PARTNER_NAME + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded UserSearchRequest'SearchCriteria where + minBound = UserSearchRequest'USER_ID + maxBound = UserSearchRequest'AUTH_PARTNER_NAME +instance Prelude.Enum UserSearchRequest'SearchCriteria where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum SearchCriteria: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum UserSearchRequest'USER_ID = 1 + fromEnum UserSearchRequest'USER_NAME = 4 + fromEnum UserSearchRequest'PROFILE_SALES_SERIES_NUMBER = 5 + fromEnum UserSearchRequest'PROFILE_SALES_SERIES_NAME = 6 + fromEnum UserSearchRequest'SALES_SERIES_ID = 7 + fromEnum UserSearchRequest'CUSTOMER_ID = 8 + fromEnum UserSearchRequest'BROKERAGE_ID = 9 + fromEnum UserSearchRequest'BROKERAGE_NAME = 10 + fromEnum UserSearchRequest'CLASS = 11 + fromEnum UserSearchRequest'LOGIN_DOMAIN = 12 + fromEnum UserSearchRequest'PROFILE_ID = 13 + fromEnum UserSearchRequest'PROFILE_SALES_SERIES_ID = 14 + fromEnum UserSearchRequest'AUTH_PARTNER_ID = 15 + fromEnum UserSearchRequest'EXTERNAL_USER_ID = 16 + fromEnum UserSearchRequest'AUTH_PARTNER_NAME = 17 + succ UserSearchRequest'AUTH_PARTNER_NAME + = Prelude.error + "UserSearchRequest'SearchCriteria.succ: bad argument UserSearchRequest'AUTH_PARTNER_NAME. This value would be out of bounds." + succ UserSearchRequest'USER_ID = UserSearchRequest'USER_NAME + succ UserSearchRequest'USER_NAME + = UserSearchRequest'PROFILE_SALES_SERIES_NUMBER + succ UserSearchRequest'PROFILE_SALES_SERIES_NUMBER + = UserSearchRequest'PROFILE_SALES_SERIES_NAME + succ UserSearchRequest'PROFILE_SALES_SERIES_NAME + = UserSearchRequest'SALES_SERIES_ID + succ UserSearchRequest'SALES_SERIES_ID + = UserSearchRequest'CUSTOMER_ID + succ UserSearchRequest'CUSTOMER_ID = UserSearchRequest'BROKERAGE_ID + succ UserSearchRequest'BROKERAGE_ID + = UserSearchRequest'BROKERAGE_NAME + succ UserSearchRequest'BROKERAGE_NAME = UserSearchRequest'CLASS + succ UserSearchRequest'CLASS = UserSearchRequest'LOGIN_DOMAIN + succ UserSearchRequest'LOGIN_DOMAIN = UserSearchRequest'PROFILE_ID + succ UserSearchRequest'PROFILE_ID + = UserSearchRequest'PROFILE_SALES_SERIES_ID + succ UserSearchRequest'PROFILE_SALES_SERIES_ID + = UserSearchRequest'AUTH_PARTNER_ID + succ UserSearchRequest'AUTH_PARTNER_ID + = UserSearchRequest'EXTERNAL_USER_ID + succ UserSearchRequest'EXTERNAL_USER_ID + = UserSearchRequest'AUTH_PARTNER_NAME + pred UserSearchRequest'USER_ID + = Prelude.error + "UserSearchRequest'SearchCriteria.pred: bad argument UserSearchRequest'USER_ID. This value would be out of bounds." + pred UserSearchRequest'USER_NAME = UserSearchRequest'USER_ID + pred UserSearchRequest'PROFILE_SALES_SERIES_NUMBER + = UserSearchRequest'USER_NAME + pred UserSearchRequest'PROFILE_SALES_SERIES_NAME + = UserSearchRequest'PROFILE_SALES_SERIES_NUMBER + pred UserSearchRequest'SALES_SERIES_ID + = UserSearchRequest'PROFILE_SALES_SERIES_NAME + pred UserSearchRequest'CUSTOMER_ID + = UserSearchRequest'SALES_SERIES_ID + pred UserSearchRequest'BROKERAGE_ID = UserSearchRequest'CUSTOMER_ID + pred UserSearchRequest'BROKERAGE_NAME + = UserSearchRequest'BROKERAGE_ID + pred UserSearchRequest'CLASS = UserSearchRequest'BROKERAGE_NAME + pred UserSearchRequest'LOGIN_DOMAIN = UserSearchRequest'CLASS + pred UserSearchRequest'PROFILE_ID = UserSearchRequest'LOGIN_DOMAIN + pred UserSearchRequest'PROFILE_SALES_SERIES_ID + = UserSearchRequest'PROFILE_ID + pred UserSearchRequest'AUTH_PARTNER_ID + = UserSearchRequest'PROFILE_SALES_SERIES_ID + pred UserSearchRequest'EXTERNAL_USER_ID + = UserSearchRequest'AUTH_PARTNER_ID + pred UserSearchRequest'AUTH_PARTNER_NAME + = UserSearchRequest'EXTERNAL_USER_ID + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault UserSearchRequest'SearchCriteria where + fieldDefault = UserSearchRequest'USER_ID +instance Control.DeepSeq.NFData UserSearchRequest'SearchCriteria where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Common1_Fields.userId' @:: Lens' UserSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.userName' @:: Lens' UserSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.firstName' @:: Lens' UserSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'firstName' @:: Lens' UserSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.lastName' @:: Lens' UserSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'lastName' @:: Lens' UserSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.customerId' @:: Lens' UserSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'customerId' @:: Lens' UserSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.customerName' @:: Lens' UserSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'customerName' @:: Lens' UserSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.customerBrokerageName' @:: Lens' UserSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'customerBrokerageName' @:: Lens' UserSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.removed' @:: Lens' UserSearchResultRecord Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'removed' @:: Lens' UserSearchResultRecord (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.class'' @:: Lens' UserSearchResultRecord Data.Word.Word32@ + * 'Proto.CMS.Common1_Fields.maybe'class'' @:: Lens' UserSearchResultRecord (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Common1_Fields.isTemporary' @:: Lens' UserSearchResultRecord Prelude.Bool@ + * 'Proto.CMS.Common1_Fields.maybe'isTemporary' @:: Lens' UserSearchResultRecord (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Common1_Fields.profileId' @:: Lens' UserSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Common1_Fields.maybe'profileId' @:: Lens' UserSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Common1_Fields.externalAuth' @:: Lens' UserSearchResultRecord ExternalAuth@ + * 'Proto.CMS.Common1_Fields.maybe'externalAuth' @:: Lens' UserSearchResultRecord (Prelude.Maybe ExternalAuth)@ -} +data UserSearchResultRecord + = UserSearchResultRecord'_constructor {_UserSearchResultRecord'userId :: !Data.Text.Text, + _UserSearchResultRecord'userName :: !Data.Text.Text, + _UserSearchResultRecord'firstName :: !(Prelude.Maybe Data.Text.Text), + _UserSearchResultRecord'lastName :: !(Prelude.Maybe Data.Text.Text), + _UserSearchResultRecord'customerId :: !(Prelude.Maybe Data.Text.Text), + _UserSearchResultRecord'customerName :: !(Prelude.Maybe Data.Text.Text), + _UserSearchResultRecord'customerBrokerageName :: !(Prelude.Maybe Data.Text.Text), + _UserSearchResultRecord'removed :: !(Prelude.Maybe Prelude.Bool), + _UserSearchResultRecord'class' :: !(Prelude.Maybe Data.Word.Word32), + _UserSearchResultRecord'isTemporary :: !(Prelude.Maybe Prelude.Bool), + _UserSearchResultRecord'profileId :: !(Prelude.Maybe Data.Text.Text), + _UserSearchResultRecord'externalAuth :: !(Prelude.Maybe ExternalAuth), + _UserSearchResultRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UserSearchResultRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "userId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'userId + (\ x__ y__ -> x__ {_UserSearchResultRecord'userId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "userName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'userName + (\ x__ y__ -> x__ {_UserSearchResultRecord'userName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "firstName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'firstName + (\ x__ y__ -> x__ {_UserSearchResultRecord'firstName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "maybe'firstName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'firstName + (\ x__ y__ -> x__ {_UserSearchResultRecord'firstName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "lastName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'lastName + (\ x__ y__ -> x__ {_UserSearchResultRecord'lastName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "maybe'lastName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'lastName + (\ x__ y__ -> x__ {_UserSearchResultRecord'lastName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "customerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'customerId + (\ x__ y__ -> x__ {_UserSearchResultRecord'customerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "maybe'customerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'customerId + (\ x__ y__ -> x__ {_UserSearchResultRecord'customerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "customerName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'customerName + (\ x__ y__ -> x__ {_UserSearchResultRecord'customerName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "maybe'customerName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'customerName + (\ x__ y__ -> x__ {_UserSearchResultRecord'customerName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "customerBrokerageName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'customerBrokerageName + (\ x__ y__ + -> x__ {_UserSearchResultRecord'customerBrokerageName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "maybe'customerBrokerageName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'customerBrokerageName + (\ x__ y__ + -> x__ {_UserSearchResultRecord'customerBrokerageName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "removed" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'removed + (\ x__ y__ -> x__ {_UserSearchResultRecord'removed = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "maybe'removed" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'removed + (\ x__ y__ -> x__ {_UserSearchResultRecord'removed = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "class'" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'class' + (\ x__ y__ -> x__ {_UserSearchResultRecord'class' = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "maybe'class'" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'class' + (\ x__ y__ -> x__ {_UserSearchResultRecord'class' = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "isTemporary" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'isTemporary + (\ x__ y__ -> x__ {_UserSearchResultRecord'isTemporary = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "maybe'isTemporary" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'isTemporary + (\ x__ y__ -> x__ {_UserSearchResultRecord'isTemporary = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'profileId + (\ x__ y__ -> x__ {_UserSearchResultRecord'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'profileId + (\ x__ y__ -> x__ {_UserSearchResultRecord'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "externalAuth" ExternalAuth where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'externalAuth + (\ x__ y__ -> x__ {_UserSearchResultRecord'externalAuth = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UserSearchResultRecord "maybe'externalAuth" (Prelude.Maybe ExternalAuth) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UserSearchResultRecord'externalAuth + (\ x__ y__ -> x__ {_UserSearchResultRecord'externalAuth = y__})) + Prelude.id +instance Data.ProtoLens.Message UserSearchResultRecord where + messageName _ = Data.Text.pack "common_1.UserSearchResultRecord" + packedMessageDescriptor _ + = "\n\ + \\SYNUserSearchResultRecord\DC2\ETB\n\ + \\auser_id\CAN\SOH \STX(\tR\ACKuserId\DC2\ESC\n\ + \\tuser_name\CAN\STX \STX(\tR\buserName\DC2\GS\n\ + \\n\ + \first_name\CAN\ETX \SOH(\tR\tfirstName\DC2\ESC\n\ + \\tlast_name\CAN\EOT \SOH(\tR\blastName\DC2\US\n\ + \\vcustomer_id\CAN\ENQ \SOH(\tR\n\ + \customerId\DC2#\n\ + \\rcustomer_name\CAN\ACK \SOH(\tR\fcustomerName\DC26\n\ + \\ETBcustomer_brokerage_name\CAN\a \SOH(\tR\NAKcustomerBrokerageName\DC2\CAN\n\ + \\aremoved\CAN\b \SOH(\bR\aremoved\DC2\DC4\n\ + \\ENQclass\CAN\t \SOH(\rR\ENQclass\DC2!\n\ + \\fis_temporary\CAN\n\ + \ \SOH(\bR\visTemporary\DC2\GS\n\ + \\n\ + \profile_id\CAN\v \SOH(\tR\tprofileId\DC2;\n\ + \\rexternal_auth\CAN\f \SOH(\v2\SYN.common_1.ExternalAuthR\fexternalAuth" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + userId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"userId")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + userName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"userName")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + firstName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "first_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'firstName")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + lastName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "last_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'lastName")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + customerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerId")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + customerName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerName")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + customerBrokerageName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_brokerage_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerBrokerageName")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + removed__field_descriptor + = Data.ProtoLens.FieldDescriptor + "removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removed")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + class'__field_descriptor + = Data.ProtoLens.FieldDescriptor + "class" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'class'")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + isTemporary__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_temporary" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isTemporary")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + externalAuth__field_descriptor + = Data.ProtoLens.FieldDescriptor + "external_auth" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ExternalAuth) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'externalAuth")) :: + Data.ProtoLens.FieldDescriptor UserSearchResultRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, userId__field_descriptor), + (Data.ProtoLens.Tag 2, userName__field_descriptor), + (Data.ProtoLens.Tag 3, firstName__field_descriptor), + (Data.ProtoLens.Tag 4, lastName__field_descriptor), + (Data.ProtoLens.Tag 5, customerId__field_descriptor), + (Data.ProtoLens.Tag 6, customerName__field_descriptor), + (Data.ProtoLens.Tag 7, customerBrokerageName__field_descriptor), + (Data.ProtoLens.Tag 8, removed__field_descriptor), + (Data.ProtoLens.Tag 9, class'__field_descriptor), + (Data.ProtoLens.Tag 10, isTemporary__field_descriptor), + (Data.ProtoLens.Tag 11, profileId__field_descriptor), + (Data.ProtoLens.Tag 12, externalAuth__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UserSearchResultRecord'_unknownFields + (\ x__ y__ -> x__ {_UserSearchResultRecord'_unknownFields = y__}) + defMessage + = UserSearchResultRecord'_constructor + {_UserSearchResultRecord'userId = Data.ProtoLens.fieldDefault, + _UserSearchResultRecord'userName = Data.ProtoLens.fieldDefault, + _UserSearchResultRecord'firstName = Prelude.Nothing, + _UserSearchResultRecord'lastName = Prelude.Nothing, + _UserSearchResultRecord'customerId = Prelude.Nothing, + _UserSearchResultRecord'customerName = Prelude.Nothing, + _UserSearchResultRecord'customerBrokerageName = Prelude.Nothing, + _UserSearchResultRecord'removed = Prelude.Nothing, + _UserSearchResultRecord'class' = Prelude.Nothing, + _UserSearchResultRecord'isTemporary = Prelude.Nothing, + _UserSearchResultRecord'profileId = Prelude.Nothing, + _UserSearchResultRecord'externalAuth = Prelude.Nothing, + _UserSearchResultRecord'_unknownFields = []} + parseMessage + = let + loop :: + UserSearchResultRecord + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser UserSearchResultRecord + loop x required'userId required'userName + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'userId then (:) "user_id" else Prelude.id) + ((if required'userName then (:) "user_name" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"userId") y x) + Prelude.False required'userName + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"userName") y x) + required'userId Prelude.False + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "first_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"firstName") y x) + required'userId required'userName + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "last_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"lastName") y x) + required'userId required'userName + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"customerId") y x) + required'userId required'userName + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"customerName") y x) + required'userId required'userName + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_brokerage_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"customerBrokerageName") y x) + required'userId required'userName + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "removed" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"removed") y x) + required'userId required'userName + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "class" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"class'") y x) + required'userId required'userName + 80 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_temporary" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isTemporary") y x) + required'userId required'userName + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + required'userId required'userName + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "external_auth" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"externalAuth") y x) + required'userId required'userName + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'userId required'userName + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "UserSearchResultRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"userId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"userName") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'firstName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'lastName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'customerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'customerName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'customerBrokerageName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'removed") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'class'") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isTemporary") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 80) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'externalAuth") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x))))))))))))) +instance Control.DeepSeq.NFData UserSearchResultRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UserSearchResultRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'userId x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'userName x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'firstName x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'lastName x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'customerId x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'customerName x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'customerBrokerageName x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'removed x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'class' x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'isTemporary x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'profileId x__) + (Control.DeepSeq.deepseq + (_UserSearchResultRecord'externalAuth x__) + ())))))))))))) +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\DC2CMS/common_1.proto\DC2\bcommon_1\SUB\NAKcommon/shared_1.proto\"\249\SOH\n\ + \\vUserMessage\DC2!\n\ + \\fmessage_type\CAN\SOH \STX(\rR\vmessageType\DC2\SYN\n\ + \\ACKsource\CAN\STX \SOH(\tR\ACKsource\DC2\CAN\n\ + \\asubject\CAN\ETX \SOH(\tR\asubject\DC2\"\n\ + \\EOTtext\CAN\EOT \STX(\v2\SO.shared_1.TextR\EOTtext\DC2.\n\ + \\DC3expiration_utc_time\CAN\ENQ \SOH(\DC2R\DC1expirationUtcTime\"A\n\ + \\vMessageType\DC2\DC2\n\ + \\SOCRITICAL_ERROR\DLE\SOH\DC2\v\n\ + \\aWARNING\DLE\STX\DC2\b\n\ + \\EOTINFO\DLE\ETX\DC2\a\n\ + \\ETXLOG\DLE\EOT\"\186\EOT\n\ + \\ENQLogon\DC24\n\ + \\SYNprotocol_version_minor\CAN\SOH \SOH(\rR\DC4protocolVersionMinor\DC24\n\ + \\SYNprotocol_version_major\CAN\STX \SOH(\rR\DC4protocolVersionMajor\DC2\ESC\n\ + \\tuser_name\CAN\ETX \SOH(\tR\buserName\DC2\SUB\n\ + \\bpassword\CAN\EOT \SOH(\tR\bpassword\DC2\"\n\ + \\rclient_app_id\CAN\ENQ \SOH(\tR\vclientAppId\DC2%\n\ + \\SOclient_version\CAN\ACK \SOH(\tR\rclientVersion\DC2)\n\ + \\DLEsession_settings\CAN\a \ETX(\rR\SIsessionSettings\DC26\n\ + \\ETBdrop_concurrent_session\CAN\b \SOH(\bR\NAKdropConcurrentSession\DC2#\n\ + \\rprivate_label\CAN\t \SOH(\tR\fprivateLabel\DC2!\n\ + \\faccess_token\CAN\n\ + \ \SOH(\tR\vaccessToken\DC2Q\n\ + \\"subscribe_on_request_status_change\CAN\v \SOH(\b:\ENQfalseR\RSsubscribeOnRequestStatusChange\"C\n\ + \\SOSessionSetting\DC2\EM\n\ + \\NAKALLOW_SESSION_RESTORE\DLE\SOH\DC2\SYN\n\ + \\DC2ALLOW_SESSION_JOIN\DLE\STX\"\173\STX\n\ + \\DC4RestoreOrJoinSession\DC2#\n\ + \\rsession_token\CAN\SOH \STX(\tR\fsessionToken\DC2\"\n\ + \\rclient_app_id\CAN\STX \STX(\tR\vclientAppId\DC2*\n\ + \\DC1client_ip_address\CAN\ETX \SOH(\tR\SIclientIpAddress\DC2Q\n\ + \\"subscribe_on_request_status_change\CAN\EOT \SOH(\b:\ENQfalseR\RSsubscribeOnRequestStatusChange\DC2%\n\ + \\SOoperation_type\CAN\ENQ \SOH(\rR\roperationType\"&\n\ + \\rOperationType\DC2\v\n\ + \\aRESTORE\DLE\SOH\DC2\b\n\ + \\EOTJOIN\DLE\STX\"\b\n\ + \\ACKLogoff\"F\n\ + \\vCredentials\DC2\ESC\n\ + \\tuser_name\CAN\SOH \STX(\tR\buserName\DC2\SUB\n\ + \\bpassword\CAN\STX \SOH(\tR\bpassword\"\254\SOH\n\ + \\vLogonResult\DC24\n\ + \\SYNprotocol_version_minor\CAN\SOH \STX(\rR\DC4protocolVersionMinor\DC24\n\ + \\SYNprotocol_version_major\CAN\STX \STX(\rR\DC4protocolVersionMajor\DC2)\n\ + \\DLEoperation_status\CAN\ETX \STX(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\EOT \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2#\n\ + \\rsession_token\CAN\ENQ \SOH(\tR\fsessionToken\"|\n\ + \\SUBRestoreOrJoinSessionResult\DC2)\n\ + \\DLEoperation_status\CAN\SOH \STX(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\STX \SOH(\v2\SO.shared_1.TextR\ferrorMessage\"3\n\ + \\tLoggedOff\DC2&\n\ + \\ACKreason\CAN\STX \SOH(\v2\SO.shared_1.TextR\ACKreason\" \n\ + \\RSEntitlementCategoryListRequest\"Q\n\ + \\EMEntitlementServiceRequest\DC24\n\ + \\SYNentitlement_service_id\CAN\SOH \STX(\rR\DC4entitlementServiceId\"r\n\ + \\GSEntitlementServiceListRequest\DC2!\n\ + \\fbrokerage_id\CAN\SOH \ETX(\tR\vbrokerageId\DC2.\n\ + \\SIinclude_retired\CAN\STX \SOH(\b:\ENQfalseR\SOincludeRetired\"\152\b\n\ + \\DC2EntitlementService\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \STX(\v2\SO.shared_1.TextR\EOTname\DC2\US\n\ + \\vcategory_id\CAN\ETX \ETX(\rR\n\ + \categoryId\DC2%\n\ + \\ENQprice\CAN\EOT \ETX(\v2\SI.common_1.PriceR\ENQprice\DC20\n\ + \\vdescription\CAN\ENQ \STX(\v2\SO.shared_1.TextR\vdescription\DC2-\n\ + \\DC2authorization_type\CAN\ACK \STX(\rR\DC1authorizationType\DC2?\n\ + \\n\ + \constraint\CAN\a \ETX(\v2\US.common_1.EntitlementConstraintR\n\ + \constraint\DC2B\n\ + \\ESCobsolete_agreement_required\CAN\b \SOH(\bR\EMobsoleteAgreementRequiredB\STX\CAN\SOH\DC2A\n\ + \\DC2obsolete_agreement\CAN\t \SOH(\v2\SO.shared_1.TextR\DC1obsoleteAgreementB\STX\CAN\SOH\DC2'\n\ + \\SIsubscriber_type\CAN\n\ + \ \SOH(\rR\SOsubscriberType\DC2<\n\ + \\SUBbilling_brokerage_required\CAN\v \SOH(\bR\CANbillingBrokerageRequired\DC2#\n\ + \\rlogin_domains\CAN\f \ETX(\rR\floginDomains\DC2\CAN\n\ + \\aoptions\CAN\r \ETX(\rR\aoptions\DC26\n\ + \\ENQitems\CAN\SO \ETX(\v2 .common_1.EntitlementServiceItemR\ENQitems\DC21\n\ + \\DC4brokerage_assignable\CAN\SI \SOH(\bR\DC3brokerageAssignable\DC2H\n\ + \ brokerage_authorization_required\CAN\DLE \SOH(\bR\RSbrokerageAuthorizationRequired\DC2\CAN\n\ + \\adefault\CAN\DC1 \SOH(\bR\adefault\DC2-\n\ + \\DC3visible_by_cqg_only\CAN\DC2 \SOH(\bR\DLEvisibleByCqgOnly\DC2#\n\ + \\rcontract_type\CAN\DC3 \SOH(\tR\fcontractType\"W\n\ + \\DC1AuthorizationType\DC2\DLE\n\ + \\fDISABLE_ONLY\DLE\SOH\DC2\r\n\ + \\tVIEW_ONLY\DLE\STX\DC2\SI\n\ + \\vENABLE_ONLY\DLE\ETX\DC2\DLE\n\ + \\fFULL_CONTROL\DLE\EOT\";\n\ + \\rServiceOption\DC2\DC4\n\ + \\DLEONLY_FOR_TRADERS\DLE\SOH\DC2\DC4\n\ + \\DLEFREE_FOR_TRADERS\DLE\STX\"\134\SOH\n\ + \\SYNEntitlementServiceItem\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC28\n\ + \\EOTtype\CAN\STX \SOH(\v2$.common_1.EntitlementServiceItemTypeR\EOTtype\DC2\"\n\ + \\EOTname\CAN\ETX \SOH(\v2\SO.shared_1.TextR\EOTname\"\168\SOH\n\ + \\SUBEntitlementServiceItemType\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname\DC20\n\ + \\vdescription\CAN\ETX \SOH(\v2\SO.shared_1.TextR\vdescription\DC2$\n\ + \\SOis_market_data\CAN\EOT \SOH(\bR\fisMarketData\"9\n\ + \\ENQPrice\DC2\SUB\n\ + \\bcurrency\CAN\SOH \STX(\tR\bcurrency\DC2\DC4\n\ + \\ENQvalue\CAN\STX \STX(\SOHR\ENQvalue\"\190\SOH\n\ + \\DC3EntitlementCategory\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \STX(\v2\SO.shared_1.TextR\EOTname\DC2@\n\ + \\fsub_category\CAN\ETX \ETX(\v2\GS.common_1.EntitlementCategoryR\vsubCategory\DC21\n\ + \\DC4brokerage_assignable\CAN\EOT \SOH(\bR\DC3brokerageAssignable\"\131\STX\n\ + \\NAKEntitlementConstraint\DC2'\n\ + \\SIconstraint_type\CAN\SOH \STX(\rR\SOconstraintType\DC2$\n\ + \\SOref_service_id\CAN\STX \SOH(\rR\frefServiceId\DC2)\n\ + \\DLEconstraint_group\CAN\ETX \SOH(\tR\SIconstraintGroup\"p\n\ + \\EOTType\DC2\v\n\ + \\aEXCLUDE\DLE\SOH\DC2\v\n\ + \\aWARNING\DLE\STX\DC2\SYN\n\ + \\DC2MANDATORY_ONLY_ONE\DLE\ETX\DC2\f\n\ + \\bPICK_ONE\DLE\EOT\DC2\NAK\n\ + \\DC1PRODUCT_WHITELIST\DLE\ENQ\DC2\DC1\n\ + \\rINCLUDE_ITEMS\DLE\ACK\"*\n\ + \\SIUserInfoRequest\DC2\ETB\n\ + \\auser_id\CAN\EOT \STX(\tR\ACKuserId\"\187\a\n\ + \\EOTUser\DC2%\n\ + \\SOcleared_fields\CAN\ETB \ETX(\rR\rclearedFields\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\ESC\n\ + \\tuser_name\CAN\STX \SOH(\tR\buserName\DC22\n\ + \\DC3obsolete_first_name\CAN\ETX \SOH(\tR\DC1obsoleteFirstNameB\STX\CAN\SOH\DC20\n\ + \\DC2obsolete_last_name\CAN\EOT \SOH(\tR\DLEobsoleteLastNameB\STX\CAN\SOH\DC2)\n\ + \\SOobsolete_email\CAN\ENQ \SOH(\tR\robsoleteEmailB\STX\CAN\SOH\DC2\US\n\ + \\vcustomer_id\CAN\ACK \SOH(\tR\n\ + \customerId\DC2'\n\ + \\SIsubscriber_type\CAN\a \SOH(\rR\SOsubscriberType\DC2!\n\ + \\fremoval_date\CAN\b \SOH(\DC2R\vremovalDate\DC2\ESC\n\ + \\tsystem_id\CAN\t \SOH(\tR\bsystemId\DC2\ESC\n\ + \\ttrader_id\CAN\n\ + \ \SOH(\tR\btraderId\DC2:\n\ + \\EMenforced_constraint_group\CAN\v \ETX(\tR\ETBenforcedConstraintGroup\DC2\SUB\n\ + \\bcurrency\CAN\f \SOH(\tR\bcurrency\DC2\SYN\n\ + \\ACKdomain\CAN\r \SOH(\rR\ACKdomain\DC2\CAN\n\ + \\aremoved\CAN\SO \SOH(\bR\aremoved\DC2\DC4\n\ + \\ENQclass\CAN\SI \SOH(\rR\ENQclass\DC2!\n\ + \\fis_temporary\CAN\DLE \SOH(\bR\visTemporary\DC2\ESC\n\ + \\tis_active\CAN\DC1 \SOH(\bR\bisActive\DC2'\n\ + \\SIexpiration_time\CAN\DC2 \SOH(\DC2R\SOexpirationTime\DC2 \n\ + \\fcast_user_id\CAN\DC3 \SOH(\tR\n\ + \castUserId\DC2\DC4\n\ + \\ENQscope\CAN\DC4 \SOH(\rR\ENQscope\DC20\n\ + \\DC4enforce_ip_whitelist\CAN\NAK \SOH(\bR\DC2enforceIpWhitelist\DC2!\n\ + \\fip_whitelist\CAN\SYN \ETX(\tR\vipWhitelist\DC2\GS\n\ + \\n\ + \profile_id\CAN\CAN \SOH(\tR\tprofileId\"&\n\ + \\SOSubscriberType\DC2\a\n\ + \\ETXPRO\DLE\NUL\DC2\v\n\ + \\aNON_PRO\DLE\SOH\"J\n\ + \\n\ + \LoginClass\DC2\v\n\ + \\aREGULAR\DLE\SOH\DC2\SO\n\ + \\n\ + \FIX_DIRECT\DLE\STX\DC2\DC1\n\ + \\rORDER_HANDLER\DLE\ETX\DC2\f\n\ + \\bTEMPLATE\DLE\EOT\"\166\a\n\ + \\rLoginSettings\DC2%\n\ + \\SOcleared_fields\CAN\a \ETX(\rR\rclearedFields\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2A\n\ + \\GSpreferred_connection_point_id\CAN\STX \SOH(\tR\SUBpreferredConnectionPointId\DC2<\n\ + \\SUBconcurrent_sessions_number\CAN\ETX \SOH(\rR\CANconcurrentSessionsNumber\DC24\n\ + \\SYNpassword_never_expires\CAN\EOT \SOH(\bR\DC4passwordNeverExpires\DC2A\n\ + \\ESCobsolete_is_strategy_runner\CAN\ENQ \SOH(\bR\CANobsoleteIsStrategyRunnerB\STX\CAN\SOH\DC2E\n\ + \\USpreferred_connection_point_name\CAN\ACK \SOH(\tR\FSpreferredConnectionPointName\DC2&\n\ + \\SIlinked_login_id\CAN\b \SOH(\tR\rlinkedLoginId\DC2;\n\ + \\rexternal_auth\CAN\t \SOH(\v2\SYN.common_1.ExternalAuthR\fexternalAuth\DC2*\n\ + \\DC1daily_logon_limit\CAN\n\ + \ \SOH(\rR\SIdailyLogonLimit\DC2*\n\ + \\DC1daily_logon_count\CAN\v \SOH(\rR\SIdailyLogonCount\DC23\n\ + \\NAKauthentication_system\CAN\f \SOH(\tR\DC4authenticationSystem\DC2;\n\ + \\SUBallow_exceed_account_limit\CAN\r \SOH(\bR\ETBallowExceedAccountLimit\DC2?\n\ + \\FSon_session_disconnect_action\CAN\SO \SOH(\rR\EMonSessionDisconnectAction\DC2K\n\ + \\"reconnect_timeout_after_disconnect\CAN\SI \SOH(\rR\USreconnectTimeoutAfterDisconnect\DC2\ESC\n\ + \\ttime_zone\CAN\DLE \SOH(\tR\btimeZone\"8\n\ + \\DLEDisconnectAction\DC2\v\n\ + \\aNOTHING\DLE\SOH\DC2\n\ + \\n\ + \\ACKCANCEL\DLE\STX\DC2\v\n\ + \\aSUSPEND\DLE\ETX\"\173\EOT\n\ + \\DC1UserSearchRequest\DC2'\n\ + \\robsolete_text\CAN\SOH \SOH(\tR\fobsoleteTextB\STX\CAN\SOH\DC2<\n\ + \\CANobsolete_search_criteria\CAN\STX \ETX(\rR\SYNobsoleteSearchCriteriaB\STX\CAN\SOH\DC2=\n\ + \\SOsearch_options\CAN\ETX \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\EOT \SOH(\b:\ENQfalseR\fallMatchMode\"\196\STX\n\ + \\SOSearchCriteria\DC2\v\n\ + \\aUSER_ID\DLE\SOH\DC2\r\n\ + \\tUSER_NAME\DLE\EOT\DC2\US\n\ + \\ESCPROFILE_SALES_SERIES_NUMBER\DLE\ENQ\DC2\GS\n\ + \\EMPROFILE_SALES_SERIES_NAME\DLE\ACK\DC2\DC3\n\ + \\SISALES_SERIES_ID\DLE\a\DC2\SI\n\ + \\vCUSTOMER_ID\DLE\b\DC2\DLE\n\ + \\fBROKERAGE_ID\DLE\t\DC2\DC2\n\ + \\SOBROKERAGE_NAME\DLE\n\ + \\DC2\t\n\ + \\ENQCLASS\DLE\v\DC2\DLE\n\ + \\fLOGIN_DOMAIN\DLE\f\DC2\SO\n\ + \\n\ + \PROFILE_ID\DLE\r\DC2\ESC\n\ + \\ETBPROFILE_SALES_SERIES_ID\DLE\SO\DC2\DC3\n\ + \\SIAUTH_PARTNER_ID\DLE\SI\DC2\DC4\n\ + \\DLEEXTERNAL_USER_ID\DLE\DLE\DC2\NAK\n\ + \\DC1AUTH_PARTNER_NAME\DLE\DC1\"\183\ETX\n\ + \\SYNUserSearchResultRecord\DC2\ETB\n\ + \\auser_id\CAN\SOH \STX(\tR\ACKuserId\DC2\ESC\n\ + \\tuser_name\CAN\STX \STX(\tR\buserName\DC2\GS\n\ + \\n\ + \first_name\CAN\ETX \SOH(\tR\tfirstName\DC2\ESC\n\ + \\tlast_name\CAN\EOT \SOH(\tR\blastName\DC2\US\n\ + \\vcustomer_id\CAN\ENQ \SOH(\tR\n\ + \customerId\DC2#\n\ + \\rcustomer_name\CAN\ACK \SOH(\tR\fcustomerName\DC26\n\ + \\ETBcustomer_brokerage_name\CAN\a \SOH(\tR\NAKcustomerBrokerageName\DC2\CAN\n\ + \\aremoved\CAN\b \SOH(\bR\aremoved\DC2\DC4\n\ + \\ENQclass\CAN\t \SOH(\rR\ENQclass\DC2!\n\ + \\fis_temporary\CAN\n\ + \ \SOH(\bR\visTemporary\DC2\GS\n\ + \\n\ + \profile_id\CAN\v \SOH(\tR\tprofileId\DC2;\n\ + \\rexternal_auth\CAN\f \SOH(\v2\SYN.common_1.ExternalAuthR\fexternalAuth\"\239\EOT\n\ + \\tCloneUser\DC2$\n\ + \\SOsource_user_id\CAN\SOH \SOH(\tR\fsourceUserId\DC2*\n\ + \\DC1new_user_username\CAN\STX \SOH(\tR\SInewUserUsername\DC2B\n\ + \\FSobsolete_new_user_first_name\CAN\ETX \SOH(\tR\CANobsoleteNewUserFirstNameB\STX\CAN\SOH\DC2@\n\ + \\ESCobsolete_new_user_last_name\CAN\EOT \SOH(\tR\ETBobsoleteNewUserLastNameB\STX\CAN\SOH\DC2P\n\ + \\EMobsolete_new_user_address\CAN\ENQ \SOH(\v2\DC1.common_1.AddressR\SYNobsoleteNewUserAddressB\STX\CAN\SOH\DC2]\n\ + \\FSnew_user_contact_information\CAN\ACK \SOH(\v2\FS.common_1.ContactInformationR\EMnewUserContactInformation\DC2J\n\ + \ obsolete_new_user_middle_initial\CAN\a \SOH(\tR\FSobsoleteNewUserMiddleInitialB\STX\CAN\SOH\DC2*\n\ + \\DC1target_profile_id\CAN\b \SOH(\tR\SItargetProfileId\DC2(\n\ + \\DLEno_welcome_email\CAN\t \SOH(\bR\SOnoWelcomeEmail\DC27\n\ + \\CANnew_profile_brokerage_id\CAN\n\ + \ \SOH(\tR\NAKnewProfileBrokerageId\"W\n\ + \\SICloneUserResult\DC2\RS\n\ + \\vnew_user_id\CAN\SOH \STX(\tR\tnewUserId\DC2$\n\ + \\SOnew_profile_id\CAN\STX \SOH(\tR\fnewProfileId\"\189\STX\n\ + \\aAddress\DC2%\n\ + \\SOcleared_fields\CAN\t \ETX(\rR\rclearedFields\DC2\CAN\n\ + \\acountry\CAN\SOH \SOH(\tR\acountry\DC2\DC4\n\ + \\ENQstate\CAN\STX \SOH(\tR\ENQstate\DC2\DC2\n\ + \\EOTcity\CAN\ETX \SOH(\tR\EOTcity\DC2\DLE\n\ + \\ETXzip\CAN\EOT \SOH(\tR\ETXzip\DC2\CAN\n\ + \\aaddress\CAN\ENQ \SOH(\tR\aaddress\DC2\ESC\n\ + \\taddress_2\CAN\ACK \SOH(\tR\baddress2\DC2\DC2\n\ + \\EOTname\CAN\a \SOH(\tR\EOTname\DC2%\n\ + \\SOaddress_status\CAN\b \SOH(\rR\raddressStatus\"C\n\ + \\rAddressStatus\DC2\v\n\ + \\aINVALID\DLE\NUL\DC2\t\n\ + \\ENQVALID\DLE\SOH\DC2\DC1\n\ + \\rNO_VALIDATION\DLE\STX\DC2\a\n\ + \\ETXNEW\DLE\ETX\"\238\SOH\n\ + \\DC2ContactInformation\DC2%\n\ + \\ENQemail\CAN\SOH \ETX(\v2\SI.common_1.EmailR\ENQemail\DC2%\n\ + \\ENQphone\CAN\STX \ETX(\v2\SI.common_1.PhoneR\ENQphone\DC2!\n\ + \\ETXfax\CAN\ETX \ETX(\v2\SI.common_1.PhoneR\ETXfax\DC2\GS\n\ + \\n\ + \first_name\CAN\EOT \SOH(\tR\tfirstName\DC2\ESC\n\ + \\tlast_name\CAN\ENQ \SOH(\tR\blastName\DC2+\n\ + \\aaddress\CAN\ACK \ETX(\v2\DC1.common_1.AddressR\aaddress\"\GS\n\ + \\ENQEmail\DC2\DC4\n\ + \\ENQemail\CAN\SOH \STX(\tR\ENQemail\"\US\n\ + \\ENQPhone\DC2\SYN\n\ + \\ACKnumber\CAN\SOH \STX(\tR\ACKnumber\"0\n\ + \\n\ + \CreateUser\DC2\"\n\ + \\EOTuser\CAN\SOH \STX(\v2\SO.common_1.UserR\EOTuser\"z\n\ + \\n\ + \UpdateUser\DC2\"\n\ + \\EOTuser\CAN\SOH \SOH(\v2\SO.common_1.UserR\EOTuser\DC2H\n\ + \\SYNobsolete_original_user\CAN\STX \SOH(\v2\SO.common_1.UserR\DC4obsoleteOriginalUserB\STX\CAN\SOH\"\FS\n\ + \\n\ + \RemoveUser\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\tR\STXid\"\GS\n\ + \\vRestoreUser\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\tR\STXid\"\"\n\ + \\DLECreateUserResult\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\"\DC2\n\ + \\DLEUpdateUserResult\"\DC3\n\ + \\DC1RestoreUserResult\"\DC2\n\ + \\DLERemoveUserResult\"\144\SOH\n\ + \\SOLookupProperty\DC2\DC2\n\ + \\EOTtype\CAN\SOH \STX(\rR\EOTtype\DC2\DC4\n\ + \\ENQvalue\CAN\STX \STX(\tR\ENQvalue\DC2\"\n\ + \\EOTname\CAN\ETX \STX(\v2\SO.shared_1.TextR\EOTname\DC20\n\ + \\vdescription\CAN\EOT \SOH(\v2\SO.shared_1.TextR\vdescription\"@\n\ + \\EMLookupPropertyListRequest\DC2#\n\ + \\rproperty_type\CAN\SOH \ETX(\rR\fpropertyType\"]\n\ + \\CANLookupPropertyListResult\DC2A\n\ + \\SIlookup_property\CAN\SOH \ETX(\v2\CAN.common_1.LookupPropertyR\SOlookupProperty\"\206\STX\n\ + \\CANSalesSeriesSearchRequest\DC2'\n\ + \\robsolete_text\CAN\SOH \SOH(\tR\fobsoleteTextB\STX\CAN\SOH\DC2<\n\ + \\CANobsolete_search_criteria\CAN\STX \ETX(\rR\SYNobsoleteSearchCriteriaB\STX\CAN\SOH\DC2=\n\ + \\SOsearch_options\CAN\ETX \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\EOT \SOH(\b:\ENQfalseR\fallMatchMode\"_\n\ + \\SOSearchCriteria\DC2\ACK\n\ + \\STXID\DLE\SOH\DC2\n\ + \\n\ + \\ACKNUMBER\DLE\STX\DC2\b\n\ + \\EOTNAME\DLE\ETX\DC2\DLE\n\ + \\fBROKERAGE_ID\DLE\EOT\DC2\SO\n\ + \\n\ + \FIRST_NAME\DLE\ENQ\DC2\r\n\ + \\tLAST_NAME\DLE\ACK\"\135\STX\n\ + \\GSSalesSeriesSearchResultRecord\DC2&\n\ + \\SIsales_series_id\CAN\SOH \SOH(\tR\rsalesSeriesId\DC2*\n\ + \\DC1sales_series_name\CAN\STX \SOH(\tR\SIsalesSeriesName\DC2.\n\ + \\DC3sales_series_number\CAN\ETX \SOH(\tR\DC1salesSeriesNumber\DC2!\n\ + \\fbrokerage_id\CAN\EOT \SOH(\tR\vbrokerageId\DC2%\n\ + \\SObrokerage_name\CAN\ENQ \SOH(\tR\rbrokerageName\DC2\CAN\n\ + \\aremoved\CAN\ACK \SOH(\bR\aremoved\"K\n\ + \\ENQTuple\DC2\DC4\n\ + \\ENQfirst\CAN\SOH \SOH(\tR\ENQfirst\DC2\SYN\n\ + \\ACKsecond\CAN\STX \SOH(\tR\ACKsecond\DC2\DC4\n\ + \\ENQthird\CAN\ETX \SOH(\tR\ENQthird\"\222\SOH\n\ + \+CustomerSalesSeriesAuthorizationListRequest\DC2\US\n\ + \\vcustomer_id\CAN\SOH \SOH(\tR\n\ + \customerId\DC2&\n\ + \\SIsales_series_id\CAN\STX \SOH(\tR\rsalesSeriesId\DC2\DLE\n\ + \\ETXtop\CAN\ETX \SOH(\rR\ETXtop\DC2\GS\n\ + \\n\ + \profile_id\CAN\EOT \SOH(\tR\tprofileId\DC25\n\ + \\ETBprofile_sales_series_id\CAN\ENQ \SOH(\tR\DC4profileSalesSeriesId\"\170\SOH\n\ + \*UpdateCustomerSalesSeriesAuthorizationList\DC2C\n\ + \\flinks_to_set\CAN\SOH \ETX(\v2!.common_1.CustomerSalesSeriesLinkR\n\ + \linksToSet\DC27\n\ + \\SIlinks_to_remove\CAN\STX \ETX(\v2\SI.common_1.TupleR\rlinksToRemove\"\181\SOH\n\ + \*CustomerSalesSeriesAuthorizationListResult\DC2`\n\ + \\ESCcustomer_sales_series_links\CAN\SOH \ETX(\v2!.common_1.CustomerSalesSeriesLinkR\CANcustomerSalesSeriesLinks\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete\"2\n\ + \0UpdateCustomerSalesSeriesAuthorizationListResult\"\148\STX\n\ + \\ETBCustomerSalesSeriesLink\DC2\US\n\ + \\vcustomer_id\CAN\SOH \SOH(\tR\n\ + \customerId\DC2&\n\ + \\SIsales_series_id\CAN\STX \SOH(\tR\rsalesSeriesId\DC2*\n\ + \\DC1sales_series_name\CAN\ETX \SOH(\tR\SIsalesSeriesName\DC2.\n\ + \\DC3sales_series_number\CAN\EOT \SOH(\tR\DC1salesSeriesNumber\DC2\GS\n\ + \\n\ + \profile_id\CAN\ENQ \SOH(\tR\tprofileId\DC25\n\ + \\ETBprofile_sales_series_id\CAN\ACK \SOH(\tR\DC4profileSalesSeriesId\"1\n\ + \\DC4LoginSettingsRequest\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\"U\n\ + \\DC3LoginSettingsResult\DC2>\n\ + \\SOlogin_settings\CAN\SOH \SOH(\v2\ETB.common_1.LoginSettingsR\rloginSettings\"U\n\ + \\DC3UpdateLoginSettings\DC2>\n\ + \\SOlogin_settings\CAN\SOH \SOH(\v2\ETB.common_1.LoginSettingsR\rloginSettings\"\ESC\n\ + \\EMUpdateLoginSettingsResult\"=\n\ + \ LoginExchangeMemberIdListRequest\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\"l\n\ + \\USLoginExchangeMemberIdListResult\DC2I\n\ + \\DLElogin_member_ids\CAN\SOH \ETX(\v2\US.common_1.LoginExchangeMemberIdR\SOloginMemberIds\"p\n\ + \\NAKLoginExchangeMemberId\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2\US\n\ + \\vexchange_id\CAN\STX \SOH(\tR\n\ + \exchangeId\DC2\ESC\n\ + \\tmember_id\CAN\ETX \SOH(\tR\bmemberId\"\202\SOH\n\ + \\USUpdateLoginExchangeMemberIdList\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2J\n\ + \\DC1member_ids_to_set\CAN\STX \ETX(\v2\US.common_1.LoginExchangeMemberIdR\SOmemberIdsToSet\DC2@\n\ + \\DC4member_ids_to_remove\CAN\ETX \ETX(\v2\SI.common_1.TupleR\DC1memberIdsToRemove\"'\n\ + \%UpdateLoginExchangeMemberIdListResult\"*\n\ + \\rActivateLogin\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\"\157\SOH\n\ + \\SIDeactivateLogin\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2'\n\ + \\SIexpiration_time\CAN\STX \SOH(\DC2R\SOexpirationTime\DC2F\n\ + \\FSclean_up_event_subscriptions\CAN\ETX \SOH(\b:\ENQfalseR\EMcleanUpEventSubscriptions\"\NAK\n\ + \\DC3ActivateLoginResult\"\ETB\n\ + \\NAKDeactivateLoginResult\"_\n\ + \\ETBEraseCurrentCredentials\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2)\n\ + \\DLEcredential_types\CAN\STX \ETX(\rR\SIcredentialTypes\"\US\n\ + \\GSEraseCurrentCredentialsResult\"\203\SOH\n\ + \\fSearchOption\DC2\DC2\n\ + \\EOTtext\CAN\SOH \SOH(\tR\EOTtext\DC2\SUB\n\ + \\bcriteria\CAN\STX \ETX(\rR\bcriteria\DC2#\n\ + \\rmatching_rule\CAN\ETX \SOH(\rR\fmatchingRule\"f\n\ + \\fMatchingRule\DC2\f\n\ + \\bCONTAINS\DLE\NUL\DC2\SI\n\ + \\vSTARTS_WITH\DLE\SOH\DC2\r\n\ + \\tENDS_WITH\DLE\STX\DC2\DC2\n\ + \\SOEXACT_EQUALITY\DLE\ETX\DC2\DC4\n\ + \\DLEIN_MATCHING_RULE\DLE\EOT\"A\n\ + \\vNamedEntity\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname\"\DEL\n\ + \\DC1UpdateEntityLinks\DC21\n\ + \\flinks_to_set\CAN\SOH \ETX(\v2\SI.common_1.TupleR\n\ + \linksToSet\DC27\n\ + \\SIlinks_to_remove\CAN\STX \ETX(\v2\SI.common_1.TupleR\rlinksToRemove\"\EM\n\ + \\ETBUpdateEntityLinksResult\";\n\ + \\ETBLinkedEntityListRequest\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\DLE\n\ + \\ETXtop\CAN\STX \SOH(\rR\ETXtop\"r\n\ + \\SYNLinkedEntityListResult\DC21\n\ + \\bentities\CAN\SOH \ETX(\v2\NAK.common_1.NamedEntityR\bentities\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete\"|\n\ + \\NAKSalesSeriesListResult\DC2<\n\ + \\fsales_series\CAN\SOH \ETX(\v2\EM.common_1.SalesSeriesInfoR\vsalesSeries\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete\"\156\SOH\n\ + \\SISalesSeriesInfo\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2*\n\ + \\DC1sales_series_name\CAN\STX \SOH(\tR\SIsalesSeriesName\DC2.\n\ + \\DC3sales_series_number\CAN\ETX \SOH(\tR\DC1salesSeriesNumber\DC2\GS\n\ + \\n\ + \profile_id\CAN\EOT \SOH(\tR\tprofileId\"I\n\ + \\fExternalAuth\DC2\GS\n\ + \\n\ + \partner_id\CAN\SOH \SOH(\tR\tpartnerId\DC2\SUB\n\ + \\busername\CAN\STX \SOH(\tR\busername\"\150\SOH\n\ + \\FSUpdateLoginBillingCustomData\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2[\n\ + \\EMlogin_billing_custom_data\CAN\STX \ETX(\v2 .common_1.LoginBillingCustomDataR\SYNloginBillingCustomData\"$\n\ + \\"UpdateLoginBillingCustomDataResult\"g\n\ + \\SYNLoginBillingCustomData\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2.\n\ + \\DC3billing_custom_data\CAN\STX \ETX(\tR\DC1billingCustomData\":\n\ + \\GSLoginBillingCustomDataRequest\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\"{\n\ + \\FSLoginBillingCustomDataResult\DC2[\n\ + \\EMlogin_billing_custom_data\CAN\SOH \ETX(\v2 .common_1.LoginBillingCustomDataR\SYNloginBillingCustomData\"\CAN\n\ + \\SYNTradingFeaturesRequest\"x\n\ + \\NAKTradingFeaturesResult\DC2_\n\ + \\SUBtrading_interface_elements\CAN\SOH \ETX(\v2!.common_1.TradingInterfaceElementR\CANtradingInterfaceElements\"p\n\ + \\ETBTradingInterfaceElement\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname\DC2!\n\ + \\fdisable_only\CAN\ETX \SOH(\bR\vdisableOnly\"\140\EOT\n\ + \\aProfile\DC2%\n\ + \\SOcleared_fields\CAN\t \ETX(\rR\rclearedFields\DC2\US\n\ + \\vcustomer_id\CAN\SOH \SOH(\tR\n\ + \customerId\DC2\GS\n\ + \\n\ + \legal_type\CAN\STX \SOH(\rR\tlegalType\DC2\DC2\n\ + \\EOTname\CAN\ETX \SOH(\tR\EOTname\DC2M\n\ + \\DC3contact_information\CAN\EOT \SOH(\v2\FS.common_1.ContactInformationR\DC2contactInformation\DC2.\n\ + \\DC3linked_brokerage_id\CAN\ENQ \SOH(\tR\DC1linkedBrokerageId\DC2\CAN\n\ + \\aremoved\CAN\ACK \SOH(\bR\aremoved\DC2H\n\ + \\RSobsolete_authentication_system\CAN\a \SOH(\tR\FSobsoleteAuthenticationSystemB\STX\CAN\SOH\DC2$\n\ + \\fprofile_type\CAN\b \SOH(\r:\SOH1R\vprofileType\DC2\GS\n\ + \\n\ + \profile_id\CAN\v \SOH(\tR\tprofileId\DC2&\n\ + \\SIsales_series_id\CAN\f \SOH(\tR\rsalesSeriesId\DC2\SYN\n\ + \\ACKnumber\CAN\r \SOH(\tR\ACKnumber\DC2\RS\n\ + \\n\ + \simplified\CAN\SO \SOH(\bR\n\ + \simplified\"\r\n\ + \\vDataRequest\"0\n\ + \\DC1EntityDataRequest\DC2\ESC\n\ + \\tentity_id\CAN\SOH \SOH(\tR\bentityId\"2\n\ + \\DC3EntitiesDataRequest\DC2\ESC\n\ + \\tentity_id\CAN\SOH \ETX(\tR\bentityId*f\n\ + \\SIOperationStatus\DC2\v\n\ + \\aSUCCESS\DLE\SOH\DC2\v\n\ + \\aFAILURE\DLE\STX\DC2\f\n\ + \\bACCEPTED\DLE\ETX\DC2\n\ + \\n\ + \\ACKQUEUED\DLE\EOT\DC2\DC1\n\ + \\rIN_PROCESSING\DLE\ENQ\DC2\f\n\ + \\bCANCELED\DLE\ACK*C\n\ + \\vLoginDomain\DC2\NAK\n\ + \\DC1CQG_TRADE_ROUTING\DLE\STX\DC2\SO\n\ + \\n\ + \CQG_SYSTEM\DLE\ETX\DC2\r\n\ + \\tCQG_ADMIN\DLE\EOT*\168\SOH\n\ + \\CANCommonLookupPropertyType\DC2\SUB\n\ + \\NAKAUTHENTICATION_SYSTEM\DLE\201\SOH\DC2\NAK\n\ + \\DLECONNECTION_POINT\DLE\202\SOH\DC2\r\n\ + \\bEXCHANGE\DLE\203\SOH\DC2\f\n\ + \\aCOUNTRY\DLE\204\SOH\DC2\v\n\ + \\ACKREGION\DLE\205\SOH\DC2\DC3\n\ + \\SOLOG_EVENT_TYPE\DLE\206\SOH\DC2\SUB\n\ + \\NAKREGEX_VALIDATION_RULE\DLE\207\SOH*\182\SOH\n\ + \\SUBAuthServerSpecialOperation\DC2\DC2\n\ + \\SOCOMPLETE_LOGON\DLE\NUL\DC2\DLE\n\ + \\fSET_PASSWORD\DLE\SOH\DC2\ETB\n\ + \\DC3SETUP_SECOND_FACTOR\DLE\STX\DC2\ESC\n\ + \\ETBCHANGE_EXPIRED_PASSWORD\DLE\ETX\DC2\DC2\n\ + \\SOSIGN_AGREEMENT\DLE\EOT\DC2\DLE\n\ + \\fVERIFY_PHONE\DLE\ENQ\DC2\SYN\n\ + \\DC2PASS_CERTIFICATION\DLE\ACK*8\n\ + \\SOCredentialType\DC2\DC3\n\ + \\SISTATIC_PASSWORD\DLE\SOH\DC2\DC1\n\ + \\rSECOND_FACTOR\DLE\STX*\140\SOH\n\ + \\n\ + \EntityType\DC2\ETB\n\ + \\DC3ENTITY_TYPE_ACCOUNT\DLE\SOH\DC2\NAK\n\ + \\DC1ENTITY_TYPE_ORDER\DLE\STX\DC2\NAK\n\ + \\DC1ENTITY_TYPE_LOGIN\DLE\ETX\DC2\ETB\n\ + \\DC3ENTITY_TYPE_PROFILE\DLE\EOT\DC2\RS\n\ + \\SUBENTITY_TYPE_LEGAL_DOCUMENT\DLE\ENQ*\218\STX\n\ + \\SILogonResultCode\DC2\DC1\n\ + \\rLOGON_SUCCESS\DLE\NUL\DC2\DC1\n\ + \\rLOGON_FAILURE\DLEe\DC2\ETB\n\ + \\DC3NO_ONETIME_PASSWORD\DLEg\DC2\DC4\n\ + \\DLEPASSWORD_EXPIRED\DLEh\DC2\DC1\n\ + \\rROUTINE_ERROR\DLEi\DC2\DC4\n\ + \\DLEWRONG_PARAMETERS\DLEj\DC2\NAK\n\ + \\DC1USER_AUTO_LOCKOUT\DLEk\DC2\ETB\n\ + \\DC3USER_MANUAL_LOCKOUT\DLEl\DC2\US\n\ + \\ESCSECOND_FACTOR_INIT_REQUIRED\DLEm\DC2\ETB\n\ + \\DC3INCOMPATIBLE_CLIENT\DLEn\DC2\SYN\n\ + \\DC2UNSIGNED_AGREEMENT\DLEo\DC2\DC3\n\ + \\SITOO_MANY_LOGONS\DLEp\DC2\US\n\ + \\ESCPHONE_VERIFICATION_REQUIRED\DLEq\DC2\DC1\n\ + \\rACCESS_DENIED\DLEr*D\n\ + \\SIAdminLoginScope\DC2\a\n\ + \\ETXCQG\DLE\SOH\DC2\r\n\ + \\tBROKERAGE\DLE\STX\DC2\r\n\ + \\tSALES_REP\DLE\ETX\DC2\n\ + \\n\ + \\ACKTRADER\DLE\EOT*x\n\ + \\DLEAuthActivityType\DC2\t\n\ + \\ENQLOGIN\DLE\SOH\DC2\DC3\n\ + \\SIPASSWORD_CHANGE\DLE\STX\DC2\DC1\n\ + \\rCLEAR_LOCKOUT\DLE\ETX\DC2\SO\n\ + \\n\ + \CHANGE_2FA\DLE\EOT\DC2\r\n\ + \\tERASE_2FA\DLE\ENQ\DC2\DC2\n\ + \\SOERASE_PASSWORD\DLE\ACK*^\n\ + \\tLegalType\DC2\SO\n\ + \\n\ + \INDIVIDUAL\DLE\SOH\DC2\t\n\ + \\ENQJOINT\DLE\STX\DC2\v\n\ + \\aLIMITED\DLE\ETX\DC2\t\n\ + \\ENQTRUST\DLE\EOT\DC2\r\n\ + \\tCORPORATE\DLE\ENQ\DC2\SI\n\ + \\vPARTNERSHIP\DLE\ACK*\152\SOH\n\ + \\vProfileType\DC2\EM\n\ + \\NAKPROFILE_TYPE_CUSTOMER\DLE\SOH\DC2\SYN\n\ + \\DC2PROFILE_TYPE_ADMIN\DLE\STX\DC2\SUB\n\ + \\SYNPROFILE_TYPE_BROKERAGE\DLE\ETX\DC2\ESC\n\ + \\ETBPROFILE_TYPE_SUBSCRIBER\DLE\EOT\DC2\GS\n\ + \\EMPROFILE_TYPE_SALES_SERIES\DLE\ENQ*\158\ETX\n\ + \\DC2InternalEntityType\DC2 \n\ + \\FSINTERNAL_ENTITY_TYPE_ACCOUNT\DLE\SOH\DC2\RS\n\ + \\SUBINTERNAL_ENTITY_TYPE_ORDER\DLE\STX\DC2\US\n\ + \\ESCINTERNAL_ENTITY_TYPE_TRADER\DLE\ETX\DC2!\n\ + \\GSINTERNAL_ENTITY_TYPE_CUSTOMER\DLE\EOT\DC2\US\n\ + \\ESCINTERNAL_ENTITY_TYPE_SYSTEM\DLE\ENQ\DC2\"\n\ + \\RSINTERNAL_ENTITY_TYPE_CAST_USER\DLE\ACK\DC2%\n\ + \!INTERNAL_ENTITY_TYPE_SALES_SERIES\DLE\a\DC2\FS\n\ + \\CANINTERNAL_ENTITY_TYPE_FCM\DLE\b\DC2$\n\ + \ INTERNAL_ENTITY_TYPE_ROUTE_GROUP\DLE\t\DC2!\n\ + \\GSINTERNAL_ENTITY_TYPE_EXCHANGE\DLE\n\ + \\DC2/\n\ + \+INTERNAL_ENTITY_TYPE_EXECUTION_SYSTEM_ROUTE\DLE\vJ\130\192\ETX\n\ + \\a\DC2\ENQ\ENQ\NUL\165\r\SOH\n\ + \f\n\ + \\SOH\f\DC2\ETX\ENQ\NUL\DC22\\ CQG common messages in API Protocols\n\ + \\n\ + \ Last changes were made on 15 Feb 2024\n\ + \ Version 1.59\n\ + \\n\ + \\t\n\ + \\STX\ETX\NUL\DC2\ETX\a\NUL\US\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\t\NUL\DC1\n\ + \]\n\ + \\STX\EOT\NUL\DC2\EOT\SI\NUL.\SOH\SUB\SYN Message from server.\n\ + \29//------------------------------------------\n\ + \// Messages\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\SI\b\DC3\n\ + \$\n\ + \\EOT\EOT\NUL\EOT\NUL\DC2\EOT\DC2\EOT\US\ENQ\SUB\SYN Type of the message.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\EOT\NUL\SOH\DC2\ETX\DC2\t\DC4\n\ + \(\n\ + \\ACK\EOT\NUL\EOT\NUL\STX\NUL\DC2\ETX\NAK\b\ESC\SUB\EM Critical error message.\n\ + \\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\NUL\SOH\DC2\ETX\NAK\b\SYN\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\NUL\STX\DC2\ETX\NAK\EM\SUB\n\ + \\EM\n\ + \\ACK\EOT\NUL\EOT\NUL\STX\SOH\DC2\ETX\CAN\b\DC4\SUB\n\ + \ Warning.\n\ + \\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\SOH\SOH\DC2\ETX\CAN\b\SI\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\SOH\STX\DC2\ETX\CAN\DC2\DC3\n\ + \%\n\ + \\ACK\EOT\NUL\EOT\NUL\STX\STX\DC2\ETX\ESC\b\DC1\SUB\SYN General information.\n\ + \\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\STX\SOH\DC2\ETX\ESC\b\f\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\STX\STX\DC2\ETX\ESC\SI\DLE\n\ + \Z\n\ + \\ACK\EOT\NUL\EOT\NUL\STX\ETX\DC2\ETX\RS\b\DLE\SUBK This message shouldn't be visible for users, only dumped into a log file.\n\ + \\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\ETX\SOH\DC2\ETX\RS\b\v\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\ETX\STX\DC2\ETX\RS\SO\SI\n\ + \C\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX!\EOT%\SUB6 This field is associated with MessageType enum type.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX!\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX!\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX!\DC4 \n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX!#$\n\ + \7\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX$\EOT\US\SUB* Information about source of the message.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX$\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX$\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX$\DC4\SUB\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX$\GS\RS\n\ + \\US\n\ + \\EOT\EOT\NUL\STX\STX\DC2\ETX'\EOT \SUB\DC2 Message subject.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\EOT\DC2\ETX'\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX'\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX'\DC4\ESC\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX'\RS\US\n\ + \\FS\n\ + \\EOT\EOT\NUL\STX\ETX\DC2\ETX*\EOT$\SUB\SI Message text.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\EOT\DC2\ETX*\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ACK\DC2\ETX*\r\SUB\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX*\ESC\US\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX*\"#\n\ + \o\n\ + \\EOT\EOT\NUL\STX\EOT\DC2\ETX-\EOT,\SUBb Optional time when this message is expired, it should be hidden from user after this time (UTC).\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\EOT\DC2\ETX-\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\ENQ\DC2\ETX-\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX-\DC4'\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX-*+\n\ + \9\n\ + \\STX\EOT\SOH\DC2\EOT2\NULh\SOH\SUB- Logon to the system and open a new session.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX2\b\r\n\ + \>\n\ + \\EOT\EOT\SOH\EOT\NUL\DC2\EOT5\EOT@\ENQ\SUB0 Session settings for additional functionality.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\EOT\NUL\SOH\DC2\ETX5\t\ETB\n\ + \\229\STX\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\NUL\DC2\ETX:\b\"\SUB\213\STX Allows restoring session in case of an accidental disconnect (see RestoreOrJoinSession message).\n\ + \ If the setting is not specified then termination of the last connection also terminates the session without ability to restore it.\n\ + \ For security reasons clients should not specify this setting without using the restore session functionality.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\NUL\SOH\DC2\ETX:\b\GS\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\NUL\STX\DC2\ETX: !\n\ + \\147\ETX\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\SOH\DC2\ETX?\b\US\SUB\131\ETX Allows other new connections to join the session (see RestoreOrJoinSession message) and work concurrently.\n\ + \ If the setting is not specified then the session can have only one connection at each moment and a new connection pushes the old one out (if the session restore is allowed).\n\ + \ For security reasons clients should not specify this setting without using join session functionality.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\SOH\SOH\DC2\ETX?\b\SUB\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\SOH\STX\DC2\ETX?\GS\RS\n\ + \\137\SOH\n\ + \\EOT\EOT\SOH\STX\NUL\DC2\ETXC\EOT/\SUB| [required] Current protocol version that is used by a client. Client has to fill it with values from ProtocolVersion enum.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\EOT\DC2\ETXC\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETXC\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETXC\DC4*\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETXC-.\n\ + \\v\n\ + \\EOT\EOT\SOH\STX\SOH\DC2\ETXD\EOT/\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETXD\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETXD\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETXD\DC4*\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETXD-.\n\ + \@\n\ + \\EOT\EOT\SOH\STX\STX\DC2\ETXH\EOT\"\SUB3 Username.\n\ + \ Ignored when access_token is provided.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\EOT\DC2\ETXH\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ENQ\DC2\ETXH\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETXH\DC4\GS\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETXH !\n\ + \E\n\ + \\EOT\EOT\SOH\STX\ETX\DC2\ETXL\EOT!\SUB8 User password.\n\ + \ Ignored when access_token is provided.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\EOT\DC2\ETXL\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ENQ\DC2\ETXL\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETXL\DC4\FS\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETXL\US \n\ + \m\n\ + \\EOT\EOT\SOH\STX\EOT\DC2\ETXP\EOT&\SUB` Identifier of a client application as assigned by CQG.\n\ + \ Ignored when access_token is provided.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\EOT\DC2\ETXP\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ENQ\DC2\ETXP\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\SOH\DC2\ETXP\DC4!\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ETX\DC2\ETXP$%\n\ + \/\n\ + \\EOT\EOT\SOH\STX\ENQ\DC2\ETXS\EOT'\SUB\" Version of a client application.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\EOT\DC2\ETXS\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\ENQ\DC2\ETXS\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\SOH\DC2\ETXS\DC4\"\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\ETX\DC2\ETXS%&\n\ + \k\n\ + \\EOT\EOT\SOH\STX\ACK\DC2\ETXW\EOT)\SUB^ List of settings for a new session.\n\ + \ This field is associated with SessionSetting enum type.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\EOT\DC2\ETXW\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\ENQ\DC2\ETXW\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\SOH\DC2\ETXW\DC4$\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\ETX\DC2\ETXW'(\n\ + \\157\STX\n\ + \\EOT\EOT\SOH\STX\a\DC2\ETX\\\EOT.\SUB\143\STX Optional field that indicates if possible concurrent sessions for this user should be forcedly dropped.\n\ + \ If it is set to false then Logon may fail with corresponding error message.\n\ + \ If it is omitted or set to true then concurrent sessions for this user will be dropped.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\EOT\DC2\ETX\\\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\ENQ\DC2\ETX\\\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\SOH\DC2\ETX\\\DC2)\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\ETX\DC2\ETX\\,-\n\ + \J\n\ + \\EOT\EOT\SOH\STX\b\DC2\ETX`\EOT&\SUB= Private label name.\n\ + \ Ignored when access_token is provided.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\EOT\DC2\ETX`\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\ENQ\DC2\ETX`\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\SOH\DC2\ETX`\DC4!\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\ETX\DC2\ETX`$%\n\ + \1\n\ + \\EOT\EOT\SOH\STX\t\DC2\ETXc\EOT&\SUB$ Access token from CQG auth server.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\EOT\DC2\ETXc\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\ENQ\DC2\ETXc\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\SOH\DC2\ETXc\DC4 \n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\ETX\DC2\ETXc#%\n\ + \\134\SOH\n\ + \\EOT\EOT\SOH\STX\n\ + \\DC2\ETXg\EOTL\SUBy Indicates that CMS API must notify client with additional requests statuses:\n\ + \ ACCEPTED, QUEUED, IN_PROCESSING, CANCELED\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\n\ + \\EOT\DC2\ETXg\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\n\ + \\ENQ\DC2\ETXg\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\n\ + \\SOH\DC2\ETXg\DC24\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\n\ + \\ETX\DC2\ETXg79\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\n\ + \\b\DC2\ETXg:K\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\n\ + \\a\DC2\ETXgEJ\n\ + \\212\STX\n\ + \\STX\EOT\STX\DC2\ENQn\NUL\137\SOH\SOH\SUB\198\STX Client request to restore session because of accidental disconnect or join the same session.\n\ + \ In non-trusted mode, this operation is possible only from the same IP address.\n\ + \ Permissions to use this functionality is regulated by ALLOW_SESSION_RESTORE/ALLOW_SESSION_JOIN session settings\n\ + \ which are specified in Logon message.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\STX\SOH\DC2\ETXn\b\FS\n\ + \2\n\ + \\EOT\EOT\STX\EOT\NUL\DC2\EOTq\EOTx\ENQ\SUB$ Type of operation on user session.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\EOT\NUL\SOH\DC2\ETXq\t\SYN\n\ + \!\n\ + \\ACK\EOT\STX\EOT\NUL\STX\NUL\DC2\ETXt\b\DC4\SUB\DC2 Restore session.\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\NUL\SOH\DC2\ETXt\b\SI\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\NUL\STX\DC2\ETXt\DC2\DC3\n\ + \\RS\n\ + \\ACK\EOT\STX\EOT\NUL\STX\SOH\DC2\ETXw\b\DC1\SUB\SI Join session.\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\SOH\SOH\DC2\ETXw\b\f\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\SOH\STX\DC2\ETXw\SI\DLE\n\ + \a\n\ + \\EOT\EOT\STX\STX\NUL\DC2\ETX{\EOT&\SUBT Token of the session to restore or join, it has limited lifetime after disconnect.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\EOT\DC2\ETX{\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETX{\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX{\DC4!\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX{$%\n\ + \G\n\ + \\EOT\EOT\STX\STX\SOH\DC2\ETX~\EOT&\SUB: Identifier of the client application as assigned by CQG.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\EOT\DC2\ETX~\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ENQ\DC2\ETX~\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETX~\DC4!\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETX~$%\n\ + \\132\SOH\n\ + \\EOT\EOT\STX\STX\STX\DC2\EOT\129\SOH\EOT*\SUBv Can be used by trusted clients (components connected in trust mode) to specify real client IP they act on behalf of.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\EOT\DC2\EOT\129\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\ENQ\DC2\EOT\129\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\SOH\DC2\EOT\129\SOH\DC4%\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\ETX\DC2\EOT\129\SOH()\n\ + \\135\SOH\n\ + \\EOT\EOT\STX\STX\ETX\DC2\EOT\133\SOH\EOTK\SUBy Indicates that CMS API must notify client with additional requests statuses:\n\ + \ ACCEPTED, QUEUED, IN_PROCESSING, CANCELED\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\EOT\DC2\EOT\133\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\ENQ\DC2\EOT\133\SOH\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\SOH\DC2\EOT\133\SOH\DC24\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\ETX\DC2\EOT\133\SOH78\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\b\DC2\EOT\133\SOH9J\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\a\DC2\EOT\133\SOHDI\n\ + \A\n\ + \\EOT\EOT\STX\STX\EOT\DC2\EOT\136\SOH\EOT'\SUB3 This field is associated with OperationType enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\EOT\DC2\EOT\136\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\ENQ\DC2\EOT\136\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\SOH\DC2\EOT\136\SOH\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\ETX\DC2\EOT\136\SOH%&\n\ + \\US\n\ + \\STX\EOT\ETX\DC2\ACK\140\SOH\NUL\142\SOH\SOH\SUB\DC1 Logoff session.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ETX\SOH\DC2\EOT\140\SOH\b\SO\n\ + \\f\n\ + \\STX\EOT\EOT\DC2\ACK\144\SOH\NUL\151\SOH\SOH\n\ + \\v\n\ + \\ETX\EOT\EOT\SOH\DC2\EOT\144\SOH\b\DC3\n\ + \#\n\ + \\EOT\EOT\EOT\STX\NUL\DC2\EOT\147\SOH\EOT\"\SUB\NAK User name to login.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\EOT\DC2\EOT\147\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\EOT\147\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\EOT\147\SOH\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\EOT\147\SOH !\n\ + \\RS\n\ + \\EOT\EOT\EOT\STX\SOH\DC2\EOT\150\SOH\EOT!\SUB\DLE User password.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\EOT\DC2\EOT\150\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\ENQ\DC2\EOT\150\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\EOT\150\SOH\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\EOT\150\SOH\US \n\ + \.\n\ + \\STX\EOT\ENQ\DC2\ACK\154\SOH\NUL\169\SOH\SOH\SUB Result of the Logon operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ENQ\SOH\DC2\EOT\154\SOH\b\DC3\n\ + \M\n\ + \\EOT\EOT\ENQ\STX\NUL\DC2\EOT\157\SOH\EOT/\SUB? Current protocol version of the server. For information only.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\EOT\DC2\EOT\157\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\ENQ\DC2\EOT\157\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\EOT\157\SOH\DC4*\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\EOT\157\SOH-.\n\ + \\f\n\ + \\EOT\EOT\ENQ\STX\SOH\DC2\EOT\158\SOH\EOT/\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\EOT\DC2\EOT\158\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\ENQ\DC2\EOT\158\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\SOH\DC2\EOT\158\SOH\DC4*\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\ETX\DC2\EOT\158\SOH-.\n\ + \V\n\ + \\EOT\EOT\ENQ\STX\STX\DC2\EOT\162\SOH\EOT)\SUBH Operation status.\n\ + \ This field is associated with OperationStatus enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\EOT\DC2\EOT\162\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\ENQ\DC2\EOT\162\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\SOH\DC2\EOT\162\SOH\DC4$\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\ETX\DC2\EOT\162\SOH'(\n\ + \1\n\ + \\EOT\EOT\ENQ\STX\ETX\DC2\EOT\165\SOH\EOT-\SUB# Message in case of logon failure.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\EOT\DC2\EOT\165\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\ACK\DC2\EOT\165\SOH\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\SOH\DC2\EOT\165\SOH\ESC(\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\ETX\DC2\EOT\165\SOH+,\n\ + \:\n\ + \\EOT\EOT\ENQ\STX\EOT\DC2\EOT\168\SOH\EOT&\SUB, Token of a new session if logon succeeded.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\EOT\DC2\EOT\168\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\ENQ\DC2\EOT\168\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\SOH\DC2\EOT\168\SOH\DC4!\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\ETX\DC2\EOT\168\SOH$%\n\ + \:\n\ + \\STX\EOT\ACK\DC2\ACK\172\SOH\NUL\179\SOH\SOH\SUB, Result of session restore or join attempt.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ACK\SOH\DC2\EOT\172\SOH\b\"\n\ + \C\n\ + \\EOT\EOT\ACK\STX\NUL\DC2\EOT\175\SOH\EOT)\SUB5 This field is associated with OperationStatus enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\EOT\DC2\EOT\175\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\EOT\175\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\EOT\175\SOH\DC4$\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\EOT\175\SOH'(\n\ + \+\n\ + \\EOT\EOT\ACK\STX\SOH\DC2\EOT\178\SOH\EOT-\SUB\GS Message in case of failure.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\EOT\DC2\EOT\178\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\ACK\DC2\EOT\178\SOH\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\SOH\DC2\EOT\178\SOH\ESC(\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\ETX\DC2\EOT\178\SOH+,\n\ + \o\n\ + \\STX\EOT\a\DC2\ACK\183\SOH\NUL\187\SOH\SOH\SUBa Server notification about closing user's session,\n\ + \ server closes connection after this message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\a\SOH\DC2\EOT\183\SOH\b\DC1\n\ + \\RS\n\ + \\EOT\EOT\a\STX\NUL\DC2\EOT\186\SOH\EOT&\SUB\DLE Logoff reason.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\EOT\DC2\EOT\186\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\ACK\DC2\EOT\186\SOH\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\SOH\DC2\EOT\186\SOH\ESC!\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\ETX\DC2\EOT\186\SOH$%\n\ + \2\n\ + \\STX\EOT\b\DC2\ACK\190\SOH\NUL\192\SOH\SOH\SUB$ Request of entitlement categories.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\b\SOH\DC2\EOT\190\SOH\b&\n\ + \;\n\ + \\STX\EOT\t\DC2\ACK\195\SOH\NUL\199\SOH\SOH\SUB- Request of entitlement service information.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\t\SOH\DC2\EOT\195\SOH\b!\n\ + \,\n\ + \\EOT\EOT\t\STX\NUL\DC2\EOT\198\SOH\EOT/\SUB\RS Id of the requested service.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\EOT\DC2\EOT\198\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\ENQ\DC2\EOT\198\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\SOH\DC2\EOT\198\SOH\DC4*\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\ETX\DC2\EOT\198\SOH-.\n\ + \]\n\ + \\STX\EOT\n\ + \\DC2\ACK\203\SOH\NUL\211\SOH\SOH\SUBO Request of entitlement service list\n\ + \ available for the current session login.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\n\ + \\SOH\DC2\EOT\203\SOH\b%\n\ + \w\n\ + \\EOT\EOT\n\ + \\STX\NUL\DC2\EOT\206\SOH\ETX$\SUBi Optional list of brokerage IDs. If it is not specified all brokerages for current session will be used.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\EOT\DC2\EOT\206\SOH\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\ENQ\DC2\EOT\206\SOH\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\SOH\DC2\EOT\206\SOH\DC3\US\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\ETX\DC2\EOT\206\SOH\"#\n\ + \{\n\ + \\EOT\EOT\n\ + \\STX\SOH\DC2\EOT\210\SOH\ETX7\SUBm Indicates that CMS API must return retired services as well.\n\ + \ By default retired services are not returned.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\EOT\DC2\EOT\210\SOH\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\ENQ\DC2\EOT\210\SOH\f\DLE\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\SOH\DC2\EOT\210\SOH\DC1 \n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\ETX\DC2\EOT\210\SOH#$\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\b\DC2\EOT\210\SOH%6\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\a\DC2\EOT\210\SOH05\n\ + \,\n\ + \\STX\EOT\v\DC2\ACK\214\SOH\NUL\166\STX\SOH\SUB\RS Entitlement Service details.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\v\SOH\DC2\EOT\214\SOH\b\SUB\n\ + \-\n\ + \\EOT\EOT\v\EOT\NUL\DC2\ACK\217\SOH\EOT\223\SOH\ENQ\SUB\GS Service authorization type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\EOT\NUL\SOH\DC2\EOT\217\SOH\t\SUB\n\ + \\SO\n\ + \\ACK\EOT\v\EOT\NUL\STX\NUL\DC2\EOT\219\SOH\b\EM\n\ + \\SI\n\ + \\a\EOT\v\EOT\NUL\STX\NUL\SOH\DC2\EOT\219\SOH\b\DC4\n\ + \\SI\n\ + \\a\EOT\v\EOT\NUL\STX\NUL\STX\DC2\EOT\219\SOH\ETB\CAN\n\ + \\SO\n\ + \\ACK\EOT\v\EOT\NUL\STX\SOH\DC2\EOT\220\SOH\b\SYN\n\ + \\SI\n\ + \\a\EOT\v\EOT\NUL\STX\SOH\SOH\DC2\EOT\220\SOH\b\DC1\n\ + \\SI\n\ + \\a\EOT\v\EOT\NUL\STX\SOH\STX\DC2\EOT\220\SOH\DC4\NAK\n\ + \\SO\n\ + \\ACK\EOT\v\EOT\NUL\STX\STX\DC2\EOT\221\SOH\b\CAN\n\ + \\SI\n\ + \\a\EOT\v\EOT\NUL\STX\STX\SOH\DC2\EOT\221\SOH\b\DC3\n\ + \\SI\n\ + \\a\EOT\v\EOT\NUL\STX\STX\STX\DC2\EOT\221\SOH\SYN\ETB\n\ + \\SO\n\ + \\ACK\EOT\v\EOT\NUL\STX\ETX\DC2\EOT\222\SOH\b\EM\n\ + \\SI\n\ + \\a\EOT\v\EOT\NUL\STX\ETX\SOH\DC2\EOT\222\SOH\b\DC4\n\ + \\SI\n\ + \\a\EOT\v\EOT\NUL\STX\ETX\STX\DC2\EOT\222\SOH\ETB\CAN\n\ + \*\n\ + \\EOT\EOT\v\EOT\SOH\DC2\ACK\226\SOH\EOT\230\SOH\ENQ\SUB\SUB Special service options.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\EOT\SOH\SOH\DC2\EOT\226\SOH\t\SYN\n\ + \\SO\n\ + \\ACK\EOT\v\EOT\SOH\STX\NUL\DC2\EOT\228\SOH\b\GS\n\ + \\SI\n\ + \\a\EOT\v\EOT\SOH\STX\NUL\SOH\DC2\EOT\228\SOH\b\CAN\n\ + \\SI\n\ + \\a\EOT\v\EOT\SOH\STX\NUL\STX\DC2\EOT\228\SOH\ESC\FS\n\ + \\SO\n\ + \\ACK\EOT\v\EOT\SOH\STX\SOH\DC2\EOT\229\SOH\b\GS\n\ + \\SI\n\ + \\a\EOT\v\EOT\SOH\STX\SOH\SOH\DC2\EOT\229\SOH\b\CAN\n\ + \\SI\n\ + \\a\EOT\v\EOT\SOH\STX\SOH\STX\DC2\EOT\229\SOH\ESC\FS\n\ + \\ESC\n\ + \\EOT\EOT\v\STX\NUL\DC2\EOT\233\SOH\EOT\ESC\SUB\r Identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\EOT\DC2\EOT\233\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\ENQ\DC2\EOT\233\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\SOH\DC2\EOT\233\SOH\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\ETX\DC2\EOT\233\SOH\EM\SUB\n\ + \\NAK\n\ + \\EOT\EOT\v\STX\SOH\DC2\EOT\236\SOH\EOT$\SUB\a Name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\EOT\DC2\EOT\236\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\ACK\DC2\EOT\236\SOH\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\SOH\DC2\EOT\236\SOH\ESC\US\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\ETX\DC2\EOT\236\SOH\"#\n\ + \:\n\ + \\EOT\EOT\v\STX\STX\DC2\EOT\239\SOH\EOT$\SUB, List of assigned entitlement category IDs.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\EOT\DC2\EOT\239\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\ENQ\DC2\EOT\239\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\SOH\DC2\EOT\239\SOH\DC4\US\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\ETX\DC2\EOT\239\SOH\"#\n\ + \\US\n\ + \\EOT\EOT\v\STX\ETX\DC2\EOT\242\SOH\EOT\GS\SUB\DC1 Service prices.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\EOT\DC2\EOT\242\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\ACK\DC2\EOT\242\SOH\r\DC2\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\SOH\DC2\EOT\242\SOH\DC3\CAN\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\ETX\DC2\EOT\242\SOH\ESC\FS\n\ + \\FS\n\ + \\EOT\EOT\v\STX\EOT\DC2\EOT\245\SOH\EOT+\SUB\SO Description.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\EOT\EOT\DC2\EOT\245\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\EOT\ACK\DC2\EOT\245\SOH\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\v\STX\EOT\SOH\DC2\EOT\245\SOH\ESC&\n\ + \\r\n\ + \\ENQ\EOT\v\STX\EOT\ETX\DC2\EOT\245\SOH)*\n\ + \r\n\ + \\EOT\EOT\v\STX\ENQ\DC2\EOT\249\SOH\EOT+\SUBd Authorization Type.\n\ + \ This field is associated with EntitlementService.AuthorizationType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ENQ\EOT\DC2\EOT\249\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ENQ\ENQ\DC2\EOT\249\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ENQ\SOH\DC2\EOT\249\SOH\DC4&\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ENQ\ETX\DC2\EOT\249\SOH)*\n\ + \1\n\ + \\EOT\EOT\v\STX\ACK\DC2\EOT\252\SOH\EOT2\SUB# List of this service constraints.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ACK\EOT\DC2\EOT\252\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ACK\ACK\DC2\EOT\252\SOH\r\"\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ACK\SOH\DC2\EOT\252\SOH#-\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ACK\ETX\DC2\EOT\252\SOH01\n\ + \\138\SOH\n\ + \\EOT\EOT\v\STX\a\DC2\EOT\128\STX\EOTD\SUB| [obsolete] Indicates if a separate agreement is required according to\n\ + \ original service provider rules (False if omitted).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\a\EOT\DC2\EOT\128\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\a\ENQ\DC2\EOT\128\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\v\STX\a\SOH\DC2\EOT\128\STX\DC2-\n\ + \\r\n\ + \\ENQ\EOT\v\STX\a\ETX\DC2\EOT\128\STX01\n\ + \\r\n\ + \\ENQ\EOT\v\STX\a\b\DC2\EOT\128\STX2C\n\ + \\SO\n\ + \\ACK\EOT\v\STX\a\b\ETX\DC2\EOT\128\STX3B\n\ + \3\n\ + \\EOT\EOT\v\STX\b\DC2\EOT\131\STX\EOTD\SUB% [obsolete] Optional agreement text.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\b\EOT\DC2\EOT\131\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\b\ACK\DC2\EOT\131\STX\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\v\STX\b\SOH\DC2\EOT\131\STX\ESC-\n\ + \\r\n\ + \\ENQ\EOT\v\STX\b\ETX\DC2\EOT\131\STX01\n\ + \\r\n\ + \\ENQ\EOT\v\STX\b\b\DC2\EOT\131\STX2C\n\ + \\SO\n\ + \\ACK\EOT\v\STX\b\b\ETX\DC2\EOT\131\STX3B\n\ + \\187\SOH\n\ + \\EOT\EOT\v\STX\t\DC2\EOT\136\STX\EOT)\SUB\172\SOH Optional link of a service to a subscriber type.\n\ + \ The service is allowed for any subscriber type if omitted.\n\ + \ This field is associated with User.SubscriberType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\t\EOT\DC2\EOT\136\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\t\ENQ\DC2\EOT\136\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\t\SOH\DC2\EOT\136\STX\DC4#\n\ + \\r\n\ + \\ENQ\EOT\v\STX\t\ETX\DC2\EOT\136\STX&(\n\ + \l\n\ + \\EOT\EOT\v\STX\n\ + \\DC2\EOT\139\STX\EOT2\SUB^ Indicates whether billing brokerage is mandatory in order to enable the service for a login.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\n\ + \\EOT\DC2\EOT\139\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\n\ + \\ENQ\DC2\EOT\139\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\v\STX\n\ + \\SOH\DC2\EOT\139\STX\DC2,\n\ + \\r\n\ + \\ENQ\EOT\v\STX\n\ + \\ETX\DC2\EOT\139\STX/1\n\ + \T\n\ + \\EOT\EOT\v\STX\v\DC2\EOT\143\STX\EOT'\SUBF Login domains.\n\ + \ This field is associated with LoginDomain enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\v\EOT\DC2\EOT\143\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\v\ENQ\DC2\EOT\143\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\v\SOH\DC2\EOT\143\STX\DC4!\n\ + \\r\n\ + \\ENQ\EOT\v\STX\v\ETX\DC2\EOT\143\STX$&\n\ + \k\n\ + \\EOT\EOT\v\STX\f\DC2\EOT\147\STX\EOT!\SUB] Special options.\n\ + \ This field is associated with EntitlementService.ServiceOption enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\f\EOT\DC2\EOT\147\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\f\ENQ\DC2\EOT\147\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\f\SOH\DC2\EOT\147\STX\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOT\v\STX\f\ETX\DC2\EOT\147\STX\RS \n\ + \\US\n\ + \\EOT\EOT\v\STX\r\DC2\EOT\150\STX\EOT/\SUB\DC1 Included items.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\r\EOT\DC2\EOT\150\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\r\ACK\DC2\EOT\150\STX\r#\n\ + \\r\n\ + \\ENQ\EOT\v\STX\r\SOH\DC2\EOT\150\STX$)\n\ + \\r\n\ + \\ENQ\EOT\v\STX\r\ETX\DC2\EOT\150\STX,.\n\ + \\\\n\ + \\EOT\EOT\v\STX\SO\DC2\EOT\153\STX\EOT,\SUBN Indicates whether brokerage can be assigned for the services in for a login.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SO\EOT\DC2\EOT\153\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SO\ENQ\DC2\EOT\153\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SO\SOH\DC2\EOT\153\STX\DC2&\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SO\ETX\DC2\EOT\153\STX)+\n\ + \\130\SOH\n\ + \\EOT\EOT\v\STX\SI\DC2\EOT\156\STX\EOT8\SUBt Indicates whether service requires explicit brokerage authorization in order to be available for brokerage logins.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SI\EOT\DC2\EOT\156\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SI\ENQ\DC2\EOT\156\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SI\SOH\DC2\EOT\156\STX\DC22\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SI\ETX\DC2\EOT\156\STX57\n\ + \H\n\ + \\EOT\EOT\v\STX\DLE\DC2\EOT\159\STX\EOT\US\SUB: Service will be added to newly created login by default.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DLE\EOT\DC2\EOT\159\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DLE\ENQ\DC2\EOT\159\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DLE\SOH\DC2\EOT\159\STX\DC2\EM\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DLE\ETX\DC2\EOT\159\STX\FS\RS\n\ + \6\n\ + \\EOT\EOT\v\STX\DC1\DC2\EOT\162\STX\EOT+\SUB( Service is visible by CQG admins only.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DC1\EOT\DC2\EOT\162\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DC1\ENQ\DC2\EOT\162\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DC1\SOH\DC2\EOT\162\STX\DC2%\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DC1\ETX\DC2\EOT\162\STX(*\n\ + \\139\SOH\n\ + \\EOT\EOT\v\STX\DC2\DC2\EOT\165\STX\EOT'\SUB} Entitlement Service Contract requirement. This value is corresponding appropriate INFO value for entitlement contract type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DC2\EOT\DC2\EOT\165\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DC2\ENQ\DC2\EOT\165\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DC2\SOH\DC2\EOT\165\STX\DC4!\n\ + \\r\n\ + \\ENQ\EOT\v\STX\DC2\ETX\DC2\EOT\165\STX$&\n\ + \-\n\ + \\STX\EOT\f\DC2\ACK\169\STX\NUL\179\STX\SOH\SUB\US Entitlement item description.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\f\SOH\DC2\EOT\169\STX\b\RS\n\ + \$\n\ + \\EOT\EOT\f\STX\NUL\DC2\EOT\172\STX\EOT\ESC\SUB\SYN Entitlement Item ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\EOT\DC2\EOT\172\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\ENQ\DC2\EOT\172\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\SOH\DC2\EOT\172\STX\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\ETX\DC2\EOT\172\STX\EM\SUB\n\ + \)\n\ + \\EOT\EOT\f\STX\SOH\DC2\EOT\175\STX\EOT1\SUB\ESC Entitlement Item Type ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\f\STX\SOH\EOT\DC2\EOT\175\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\f\STX\SOH\ACK\DC2\EOT\175\STX\r'\n\ + \\r\n\ + \\ENQ\EOT\f\STX\SOH\SOH\DC2\EOT\175\STX(,\n\ + \\r\n\ + \\ENQ\EOT\f\STX\SOH\ETX\DC2\EOT\175\STX/0\n\ + \\SUB\n\ + \\EOT\EOT\f\STX\STX\DC2\EOT\178\STX\EOT$\SUB\f Item name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\f\STX\STX\EOT\DC2\EOT\178\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\f\STX\STX\ACK\DC2\EOT\178\STX\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\f\STX\STX\SOH\DC2\EOT\178\STX\ESC\US\n\ + \\r\n\ + \\ENQ\EOT\f\STX\STX\ETX\DC2\EOT\178\STX\"#\n\ + \&\n\ + \\STX\EOT\r\DC2\ACK\182\STX\NUL\195\STX\SOH\SUB\CAN Entitlement item type.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\r\SOH\DC2\EOT\182\STX\b\"\n\ + \0\n\ + \\EOT\EOT\r\STX\NUL\DC2\EOT\185\STX\EOT\ESC\SUB\" Type ID in INFO DB (INFO Value).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\EOT\DC2\EOT\185\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\ENQ\DC2\EOT\185\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\SOH\DC2\EOT\185\STX\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\ETX\DC2\EOT\185\STX\EM\SUB\n\ + \\SUB\n\ + \\EOT\EOT\r\STX\SOH\DC2\EOT\188\STX\EOT$\SUB\f Type name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\EOT\DC2\EOT\188\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\ACK\DC2\EOT\188\STX\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\SOH\DC2\EOT\188\STX\ESC\US\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\ETX\DC2\EOT\188\STX\"#\n\ + \!\n\ + \\EOT\EOT\r\STX\STX\DC2\EOT\191\STX\EOT+\SUB\DC3 Type description.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\r\STX\STX\EOT\DC2\EOT\191\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\r\STX\STX\ACK\DC2\EOT\191\STX\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\r\STX\STX\SOH\DC2\EOT\191\STX\ESC&\n\ + \\r\n\ + \\ENQ\EOT\r\STX\STX\ETX\DC2\EOT\191\STX)*\n\ + \G\n\ + \\EOT\EOT\r\STX\ETX\DC2\EOT\194\STX\EOT%\SUB9 Determines whether item type is exchange (market data).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\r\STX\ETX\EOT\DC2\EOT\194\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\r\STX\ETX\ENQ\DC2\EOT\194\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\r\STX\ETX\SOH\DC2\EOT\194\STX\DC2 \n\ + \\r\n\ + \\ENQ\EOT\r\STX\ETX\ETX\DC2\EOT\194\STX#$\n\ + \,\n\ + \\STX\EOT\SO\DC2\ACK\198\STX\NUL\205\STX\SOH\SUB\RS Price as currency and value.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SO\SOH\DC2\EOT\198\STX\b\r\n\ + \D\n\ + \\EOT\EOT\SO\STX\NUL\DC2\EOT\201\STX\EOT!\SUB6 Currency code (real currency code is ISO 4217 based.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\EOT\DC2\EOT\201\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\ENQ\DC2\EOT\201\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\SOH\DC2\EOT\201\STX\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\ETX\DC2\EOT\201\STX\US \n\ + \4\n\ + \\EOT\EOT\SO\STX\SOH\DC2\EOT\204\STX\EOT\RS\SUB& Price value in a specified currency.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\EOT\DC2\EOT\204\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\ENQ\DC2\EOT\204\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\SOH\DC2\EOT\204\STX\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\ETX\DC2\EOT\204\STX\FS\GS\n\ + \(\n\ + \\STX\EOT\SI\DC2\ACK\208\STX\NUL\221\STX\SOH\SUB\SUB Category of entitlement.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SI\SOH\DC2\EOT\208\STX\b\ESC\n\ + \\FS\n\ + \\EOT\EOT\SI\STX\NUL\DC2\EOT\211\STX\EOT\ESC\SUB\SO Category ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\EOT\DC2\EOT\211\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\ENQ\DC2\EOT\211\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\SOH\DC2\EOT\211\STX\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\ETX\DC2\EOT\211\STX\EM\SUB\n\ + \\RS\n\ + \\EOT\EOT\SI\STX\SOH\DC2\EOT\214\STX\EOT$\SUB\DLE Category name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\EOT\DC2\EOT\214\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\ACK\DC2\EOT\214\STX\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\SOH\DC2\EOT\214\STX\ESC\US\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\ETX\DC2\EOT\214\STX\"#\n\ + \'\n\ + \\EOT\EOT\SI\STX\STX\DC2\EOT\217\STX\EOT2\SUB\EM List of sub-categories.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\STX\EOT\DC2\EOT\217\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\STX\ACK\DC2\EOT\217\STX\r \n\ + \\r\n\ + \\ENQ\EOT\SI\STX\STX\SOH\DC2\EOT\217\STX!-\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\STX\ETX\DC2\EOT\217\STX01\n\ + \i\n\ + \\EOT\EOT\SI\STX\ETX\DC2\EOT\220\STX\EOT+\SUB[ Indicates whether brokerage can be assigned for the services in the catogory for a login.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ETX\EOT\DC2\EOT\220\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ETX\ENQ\DC2\EOT\220\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ETX\SOH\DC2\EOT\220\STX\DC2&\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ETX\ETX\DC2\EOT\220\STX)*\n\ + \&\n\ + \\STX\EOT\DLE\DC2\ACK\224\STX\NUL\130\ETX\SOH\SUB\CAN Entitlement constraint\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DLE\SOH\DC2\EOT\224\STX\b\GS\n\ + \\"\n\ + \\EOT\EOT\DLE\EOT\NUL\DC2\ACK\227\STX\EOT\249\STX\ENQ\SUB\DC2 Constraint type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\EOT\NUL\SOH\DC2\EOT\227\STX\t\r\n\ + \H\n\ + \\ACK\EOT\DLE\EOT\NUL\STX\NUL\DC2\EOT\230\STX\b\DC4\SUB8 The services in the constraint are mutually exclusive.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\NUL\SOH\DC2\EOT\230\STX\b\SI\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\NUL\STX\DC2\EOT\230\STX\DC2\DC3\n\ + \\143\STX\n\ + \\ACK\EOT\DLE\EOT\NUL\STX\SOH\DC2\EOT\235\STX\b\DC4\SUB\254\SOH Warning constraints are used where two services would normally not be allowed together\n\ + \ because one is a subset of the other, but we can't use the exclude constraint because\n\ + \ we need to allow the user to try out a version of the more extensive service.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\SOH\SOH\DC2\EOT\235\STX\b\SI\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\SOH\STX\DC2\EOT\235\STX\DC2\DC3\n\ + \\174\SOH\n\ + \\ACK\EOT\DLE\EOT\NUL\STX\STX\DC2\EOT\239\STX\b\US\SUB\157\SOH One of the services is mandatory within constraint group but only one service\n\ + \ from the group can be selected at the same time (if enforced for this user).\n\ + \\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\STX\SOH\DC2\EOT\239\STX\b\SUB\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\STX\STX\DC2\EOT\239\STX\GS\RS\n\ + \S\n\ + \\ACK\EOT\DLE\EOT\NUL\STX\ETX\DC2\EOT\242\STX\b\NAK\SUBC Only one service from the group can be selected at the same time.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\ETX\SOH\DC2\EOT\242\STX\b\DLE\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\ETX\STX\DC2\EOT\242\STX\DC3\DC4\n\ + \R\n\ + \\ACK\EOT\DLE\EOT\NUL\STX\EOT\DC2\EOT\245\STX\b\RS\SUBB Only service in whitelist works with particular product service.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\EOT\SOH\DC2\EOT\245\STX\b\EM\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\EOT\STX\DC2\EOT\245\STX\FS\GS\n\ + \n\n\ + \\ACK\EOT\DLE\EOT\NUL\STX\ENQ\DC2\EOT\248\STX\b\SUB\SUB^ Constraint to show that all service entitlement items are implicitly included in ref-service\n\ + \\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\ENQ\SOH\DC2\EOT\248\STX\b\NAK\n\ + \\SI\n\ + \\a\EOT\DLE\EOT\NUL\STX\ENQ\STX\DC2\EOT\248\STX\CAN\EM\n\ + \S\n\ + \\EOT\EOT\DLE\STX\NUL\DC2\EOT\251\STX\EOT(\SUBE This field is associated with EntitlementConstraint.Type enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\EOT\DC2\EOT\251\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\ENQ\DC2\EOT\251\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\SOH\DC2\EOT\251\STX\DC4#\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\ETX\DC2\EOT\251\STX&'\n\ + \&\n\ + \\EOT\EOT\DLE\STX\SOH\DC2\EOT\254\STX\EOT'\SUB\CAN Referenced service id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\EOT\DC2\EOT\254\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\ENQ\DC2\EOT\254\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\SOH\DC2\EOT\254\STX\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\ETX\DC2\EOT\254\STX%&\n\ + \@\n\ + \\EOT\EOT\DLE\STX\STX\DC2\EOT\129\ETX\EOT)\SUB2 Constraint group name for some constraint types.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\EOT\DC2\EOT\129\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\ENQ\DC2\EOT\129\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\SOH\DC2\EOT\129\ETX\DC4$\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\ETX\DC2\EOT\129\ETX'(\n\ + \,\n\ + \\STX\EOT\DC1\DC2\ACK\133\ETX\NUL\137\ETX\SOH\SUB\RS Request of user information.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC1\SOH\DC2\EOT\133\ETX\b\ETB\n\ + \4\n\ + \\EOT\EOT\DC1\STX\NUL\DC2\EOT\136\ETX\EOT \SUB& User ID to request user information.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\EOT\DC2\EOT\136\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\ENQ\DC2\EOT\136\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\SOH\DC2\EOT\136\ETX\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\ETX\DC2\EOT\136\ETX\RS\US\n\ + \!\n\ + \\STX\EOT\DC2\DC2\ACK\140\ETX\NUL\133\EOT\SOH\SUB\DC3 User information.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC2\SOH\DC2\EOT\140\ETX\b\f\n\ + \\"\n\ + \\EOT\EOT\DC2\EOT\NUL\DC2\ACK\143\ETX\EOT\150\ETX\ENQ\SUB\DC2 Subscriber Type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\EOT\NUL\SOH\DC2\EOT\143\ETX\t\ETB\n\ + \*\n\ + \\ACK\EOT\DC2\EOT\NUL\STX\NUL\DC2\EOT\146\ETX\b\DLE\SUB\SUB Professional subscriber.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\NUL\STX\NUL\SOH\DC2\EOT\146\ETX\b\v\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\NUL\STX\NUL\STX\DC2\EOT\146\ETX\SO\SI\n\ + \.\n\ + \\ACK\EOT\DC2\EOT\NUL\STX\SOH\DC2\EOT\149\ETX\b\DC4\SUB\RS Non-professional subscriber.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\NUL\STX\SOH\SOH\DC2\EOT\149\ETX\b\SI\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\NUL\STX\SOH\STX\DC2\EOT\149\ETX\DC2\DC3\n\ + \+\n\ + \\EOT\EOT\DC2\EOT\SOH\DC2\ACK\153\ETX\EOT\166\ETX\ENQ\SUB\ESC Defines classes of login.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\EOT\SOH\SOH\DC2\EOT\153\ETX\t\DC3\n\ + \,\n\ + \\ACK\EOT\DC2\EOT\SOH\STX\NUL\DC2\EOT\156\ETX\b\DC4\SUB\FS Regular login for trading.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\SOH\STX\NUL\SOH\DC2\EOT\156\ETX\b\SI\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\SOH\STX\NUL\STX\DC2\EOT\156\ETX\DC2\DC3\n\ + \*\n\ + \\ACK\EOT\DC2\EOT\SOH\STX\SOH\DC2\EOT\159\ETX\b\ETB\SUB\SUB Fix direct access login.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\SOH\STX\SOH\SOH\DC2\EOT\159\ETX\b\DC2\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\SOH\STX\SOH\STX\DC2\EOT\159\ETX\NAK\SYN\n\ + \&\n\ + \\ACK\EOT\DC2\EOT\SOH\STX\STX\DC2\EOT\162\ETX\b\SUB\SUB\SYN Order handler login.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\SOH\STX\STX\SOH\DC2\EOT\162\ETX\b\NAK\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\SOH\STX\STX\STX\DC2\EOT\162\ETX\CAN\EM\n\ + \2\n\ + \\ACK\EOT\DC2\EOT\SOH\STX\ETX\DC2\EOT\165\ETX\b\NAK\SUB\" Template login for cloning only.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\SOH\STX\ETX\SOH\DC2\EOT\165\ETX\b\DLE\n\ + \\SI\n\ + \\a\EOT\DC2\EOT\SOH\STX\ETX\STX\DC2\EOT\165\ETX\DC3\DC4\n\ + \C\n\ + \\EOT\EOT\DC2\STX\NUL\DC2\EOT\169\ETX\EOT(\SUB5 List of field ids to clear during update operation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\EOT\DC2\EOT\169\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\ENQ\DC2\EOT\169\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\SOH\DC2\EOT\169\ETX\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\ETX\DC2\EOT\169\ETX%'\n\ + \b\n\ + \\EOT\EOT\DC2\STX\SOH\DC2\EOT\173\ETX\EOT\ESC\SUBT [required-update] User Identifier.\n\ + \ The value is ignored for CreateUser operation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\EOT\DC2\EOT\173\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\ENQ\DC2\EOT\173\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\SOH\DC2\EOT\173\ETX\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\ETX\DC2\EOT\173\ETX\EM\SUB\n\ + \>\n\ + \\EOT\EOT\DC2\STX\STX\DC2\EOT\176\ETX\EOT\"\SUB0 [required-create] User name (max length = 32).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\STX\EOT\DC2\EOT\176\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\STX\ENQ\DC2\EOT\176\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\STX\SOH\DC2\EOT\176\ETX\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\STX\ETX\DC2\EOT\176\ETX !\n\ + \=\n\ + \\EOT\EOT\DC2\STX\ETX\DC2\EOT\179\ETX\EOT>\SUB/ [obsolete] User first name (max length = 20).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ETX\EOT\DC2\EOT\179\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ETX\ENQ\DC2\EOT\179\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ETX\SOH\DC2\EOT\179\ETX\DC4'\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ETX\ETX\DC2\EOT\179\ETX*+\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ETX\b\DC2\EOT\179\ETX,=\n\ + \\SO\n\ + \\ACK\EOT\DC2\STX\ETX\b\ETX\DC2\EOT\179\ETX-<\n\ + \<\n\ + \\EOT\EOT\DC2\STX\EOT\DC2\EOT\182\ETX\EOT=\SUB. [obsolete] User last name (max length = 25).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\EOT\EOT\DC2\EOT\182\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\EOT\ENQ\DC2\EOT\182\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\EOT\SOH\DC2\EOT\182\ETX\DC4&\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\EOT\ETX\DC2\EOT\182\ETX)*\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\EOT\b\DC2\EOT\182\ETX+<\n\ + \\SO\n\ + \\ACK\EOT\DC2\STX\EOT\b\ETX\DC2\EOT\182\ETX,;\n\ + \9\n\ + \\EOT\EOT\DC2\STX\ENQ\DC2\EOT\185\ETX\EOT9\SUB+ [obsolete] User e-mail (max length = 60).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ENQ\EOT\DC2\EOT\185\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ENQ\ENQ\DC2\EOT\185\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ENQ\SOH\DC2\EOT\185\ETX\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ENQ\ETX\DC2\EOT\185\ETX%&\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ENQ\b\DC2\EOT\185\ETX'8\n\ + \\SO\n\ + \\ACK\EOT\DC2\STX\ENQ\b\ETX\DC2\EOT\185\ETX(7\n\ + \O\n\ + \\EOT\EOT\DC2\STX\ACK\DC2\EOT\189\ETX\EOT$\SUBA [immutable-update] Linked customer id.\n\ + \ Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ACK\EOT\DC2\EOT\189\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ACK\ENQ\DC2\EOT\189\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ACK\SOH\DC2\EOT\189\ETX\DC4\US\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ACK\ETX\DC2\EOT\189\ETX\"#\n\ + \\191\SOH\n\ + \\EOT\EOT\DC2\STX\a\DC2\EOT\194\ETX\EOT(\SUB\176\SOH [required-create] Subscriber Type. PRO by default when created.\n\ + \ This field is associated with User.SubscriberType enum type.\n\ + \ Supported login domains: system, trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\a\EOT\DC2\EOT\194\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\a\ENQ\DC2\EOT\194\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\a\SOH\DC2\EOT\194\ETX\DC4#\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\a\ETX\DC2\EOT\194\ETX&'\n\ + \\188\SOH\n\ + \\EOT\EOT\DC2\STX\b\DC2\EOT\199\ETX\EOT%\SUB\173\SOH Date till the user is alive and then the user will be removed.\n\ + \ Datetime format is used but only date part is used, time part is ignored.\n\ + \ Supported login domains: system.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\b\EOT\DC2\EOT\199\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\b\ENQ\DC2\EOT\199\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\b\SOH\DC2\EOT\199\ETX\DC4 \n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\b\ETX\DC2\EOT\199\ETX#$\n\ + \:\n\ + \\EOT\EOT\DC2\STX\t\DC2\EOT\202\ETX\EOT\"\SUB, [immutable] Identifier of CQG System user.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\t\EOT\DC2\EOT\202\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\t\ENQ\DC2\EOT\202\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\t\SOH\DC2\EOT\202\ETX\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\t\ETX\DC2\EOT\202\ETX !\n\ + \=\n\ + \\EOT\EOT\DC2\STX\n\ + \\DC2\EOT\205\ETX\EOT#\SUB/ [immutable] Identifier of Trade Routing user.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\n\ + \\EOT\DC2\EOT\205\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\n\ + \\ENQ\DC2\EOT\205\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\n\ + \\SOH\DC2\EOT\205\ETX\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\n\ + \\ETX\DC2\EOT\205\ETX \"\n\ + \N\n\ + \\EOT\EOT\DC2\STX\v\DC2\EOT\208\ETX\EOT3\SUB@ [immutable] List of enforced mandatory constraint group names.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\v\EOT\DC2\EOT\208\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\v\ENQ\DC2\EOT\208\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\v\SOH\DC2\EOT\208\ETX\DC4-\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\v\ETX\DC2\EOT\208\ETX02\n\ + \<\n\ + \\EOT\EOT\DC2\STX\f\DC2\EOT\211\ETX\EOT\"\SUB. [immutable] Billing currency code (ISO 4217)\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\f\EOT\DC2\EOT\211\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\f\ENQ\DC2\EOT\211\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\f\SOH\DC2\EOT\211\ETX\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\f\ETX\DC2\EOT\211\ETX\US!\n\ + \w\n\ + \\EOT\EOT\DC2\STX\r\DC2\EOT\215\ETX\EOT \SUBi [required-create][immutable-update] Login domain.\n\ + \ This field is associated with LoginDomain enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\r\EOT\DC2\EOT\215\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\r\ENQ\DC2\EOT\215\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\r\SOH\DC2\EOT\215\ETX\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\r\ETX\DC2\EOT\215\ETX\GS\US\n\ + \)\n\ + \\EOT\EOT\DC2\STX\SO\DC2\EOT\218\ETX\EOT\US\SUB\ESC [immutable] Removed flag.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SO\EOT\DC2\EOT\218\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SO\ENQ\DC2\EOT\218\ETX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SO\SOH\DC2\EOT\218\ETX\DC2\EM\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SO\ETX\DC2\EOT\218\ETX\FS\RS\n\ + \\209\SOH\n\ + \\EOT\EOT\DC2\STX\SI\DC2\EOT\224\ETX\EOT\US\SUB\194\SOH [immutable-update] Login class.\n\ + \ If not provided during create, default used - regular class.\n\ + \ This field is associated with User.LoginClass enum type.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SI\EOT\DC2\EOT\224\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SI\ENQ\DC2\EOT\224\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SI\SOH\DC2\EOT\224\ETX\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SI\ETX\DC2\EOT\224\ETX\FS\RS\n\ + \\201\SOH\n\ + \\EOT\EOT\DC2\STX\DLE\DC2\EOT\229\ETX\EOT$\SUB\186\SOH [immutable] Indicates whether login is used for demo access.\n\ + \ It cannot be used during login creation and cannot be changed for existing login.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DLE\EOT\DC2\EOT\229\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DLE\ENQ\DC2\EOT\229\ETX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DLE\SOH\DC2\EOT\229\ETX\DC2\RS\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DLE\ETX\DC2\EOT\229\ETX!#\n\ + \w\n\ + \\EOT\EOT\DC2\STX\DC1\DC2\EOT\233\ETX\EOT!\SUBi [immutable] Determines, whether login can be used for trading.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC1\EOT\DC2\EOT\233\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC1\ENQ\DC2\EOT\233\ETX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC1\SOH\DC2\EOT\233\ETX\DC2\ESC\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC1\ETX\DC2\EOT\233\ETX\RS \n\ + \\140\SOH\n\ + \\EOT\EOT\DC2\STX\DC2\DC2\EOT\237\ETX\EOT)\SUB~ [immutable] Date and Time, when login is deactivated and can't be used for trading.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC2\EOT\DC2\EOT\237\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC2\ENQ\DC2\EOT\237\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC2\SOH\DC2\EOT\237\ETX\DC4#\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC2\ETX\DC2\EOT\237\ETX&(\n\ + \4\n\ + \\EOT\EOT\DC2\STX\DC3\DC2\EOT\240\ETX\EOT&\SUB& [immutable] Identifier of CAST user.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC3\EOT\DC2\EOT\240\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC3\ENQ\DC2\EOT\240\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC3\SOH\DC2\EOT\240\ETX\DC4 \n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC3\ETX\DC2\EOT\240\ETX#%\n\ + \z\n\ + \\EOT\EOT\DC2\STX\DC4\DC2\EOT\245\ETX\EOT\US\SUBl Admin login's scope.\n\ + \ Supported login domains: admin.\n\ + \ This field is associated with AdminLoginScope enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC4\EOT\DC2\EOT\245\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC4\ENQ\DC2\EOT\245\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC4\SOH\DC2\EOT\245\ETX\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\DC4\ETX\DC2\EOT\245\ETX\FS\RS\n\ + \[\n\ + \\EOT\EOT\DC2\STX\NAK\DC2\EOT\249\ETX\EOT,\SUBM Enforce IP whitelist check.\n\ + \ Supported login domains: admin, trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NAK\EOT\DC2\EOT\249\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NAK\ENQ\DC2\EOT\249\ETX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NAK\SOH\DC2\EOT\249\ETX\DC2&\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NAK\ETX\DC2\EOT\249\ETX)+\n\ + \s\n\ + \\EOT\EOT\DC2\STX\SYN\DC2\EOT\253\ETX\EOT&\SUBe [erasable] IP addresses whitelist in CIDR notation.\n\ + \ Supported login domains: admin, trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SYN\EOT\DC2\EOT\253\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SYN\ENQ\DC2\EOT\253\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SYN\SOH\DC2\EOT\253\ETX\DC4 \n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SYN\ETX\DC2\EOT\253\ETX#%\n\ + \\179\SOH\n\ + \\EOT\EOT\DC2\STX\ETB\DC2\EOT\132\EOT\EOT$\SUB\130\SOH [immutable-update][required-create] Owner profile id.\n\ + \ Has priority over customer_id.\n\ + \ Supported profile types: admin, customer.\n\ + \2 23 is used for cleared_fields.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ETB\EOT\DC2\EOT\132\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ETB\ENQ\DC2\EOT\132\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ETB\SOH\DC2\EOT\132\EOT\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\ETB\ETX\DC2\EOT\132\EOT!#\n\ + \*\n\ + \\STX\EOT\DC3\DC2\ACK\136\EOT\NUL\216\EOT\SOH\SUB\FS Additional login settings.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC3\SOH\DC2\EOT\136\EOT\b\NAK\n\ + \>\n\ + \\EOT\EOT\DC3\EOT\NUL\DC2\ACK\139\EOT\EOT\149\EOT\ENQ\SUB. Defines actions on login session disconnect.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\EOT\NUL\SOH\DC2\EOT\139\EOT\t\EM\n\ + \%\n\ + \\ACK\EOT\DC3\EOT\NUL\STX\NUL\DC2\EOT\142\EOT\b\DC4\SUB\NAK No specific action.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC3\EOT\NUL\STX\NUL\SOH\DC2\EOT\142\EOT\b\SI\n\ + \\SI\n\ + \\a\EOT\DC3\EOT\NUL\STX\NUL\STX\DC2\EOT\142\EOT\DC2\DC3\n\ + \ \n\ + \\ACK\EOT\DC3\EOT\NUL\STX\SOH\DC2\EOT\145\EOT\b\DC3\SUB\DLE Cancel orders.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC3\EOT\NUL\STX\SOH\SOH\DC2\EOT\145\EOT\b\SO\n\ + \\SI\n\ + \\a\EOT\DC3\EOT\NUL\STX\SOH\STX\DC2\EOT\145\EOT\DC1\DC2\n\ + \!\n\ + \\ACK\EOT\DC3\EOT\NUL\STX\STX\DC2\EOT\148\EOT\b\DC4\SUB\DC1 Suspend orders.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC3\EOT\NUL\STX\STX\SOH\DC2\EOT\148\EOT\b\SI\n\ + \\SI\n\ + \\a\EOT\DC3\EOT\NUL\STX\STX\STX\DC2\EOT\148\EOT\DC2\DC3\n\ + \C\n\ + \\EOT\EOT\DC3\STX\NUL\DC2\EOT\152\EOT\EOT'\SUB5 List of field ids to clear during update operation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\EOT\DC2\EOT\152\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\ENQ\DC2\EOT\152\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\SOH\DC2\EOT\152\EOT\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\ETX\DC2\EOT\152\EOT%&\n\ + \,\n\ + \\EOT\EOT\DC3\STX\SOH\DC2\EOT\155\EOT\EOT!\SUB\RS [required] Login Identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\EOT\DC2\EOT\155\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\ENQ\DC2\EOT\155\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\SOH\DC2\EOT\155\EOT\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\ETX\DC2\EOT\155\EOT\US \n\ + \\151\STX\n\ + \\EOT\EOT\DC3\STX\STX\DC2\EOT\161\EOT\EOT6\SUB\136\STX Preferred connection point.\n\ + \ The values are associated with location_1.ConnectionPointListRequest.\n\ + \ In update operation if connection point requires brokerage authorization,\n\ + \ then brokerage of login's customer profile must be authorized on this connection point.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\EOT\DC2\EOT\161\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\ENQ\DC2\EOT\161\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\SOH\DC2\EOT\161\EOT\DC41\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\ETX\DC2\EOT\161\EOT45\n\ + \\140\SOH\n\ + \\EOT\EOT\DC3\STX\ETX\DC2\EOT\165\EOT\EOT3\SUB~ [erasable] Possible concurrent sessions number per one IP.\n\ + \ View and modify access to this field is limited for Admin users.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ETX\EOT\DC2\EOT\165\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ETX\ENQ\DC2\EOT\165\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ETX\SOH\DC2\EOT\165\EOT\DC4.\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ETX\ETX\DC2\EOT\165\EOT12\n\ + \:\n\ + \\EOT\EOT\DC3\STX\EOT\DC2\EOT\168\EOT\EOT-\SUB, Determines whether password never expires.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\EOT\EOT\DC2\EOT\168\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\EOT\ENQ\DC2\EOT\168\EOT\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\EOT\SOH\DC2\EOT\168\EOT\DC2(\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\EOT\ETX\DC2\EOT\168\EOT+,\n\ + \I\n\ + \\EOT\EOT\DC3\STX\ENQ\DC2\EOT\171\EOT\EOTD\SUB; [obsolete] Strategies can be executed through this login.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ENQ\EOT\DC2\EOT\171\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ENQ\ENQ\DC2\EOT\171\EOT\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ENQ\SOH\DC2\EOT\171\EOT\DC2-\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ENQ\ETX\DC2\EOT\171\EOT01\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ENQ\b\DC2\EOT\171\EOT2C\n\ + \\SO\n\ + \\ACK\EOT\DC3\STX\ENQ\b\ETX\DC2\EOT\171\EOT3B\n\ + \}\n\ + \\EOT\EOT\DC3\STX\ACK\DC2\EOT\174\EOT\EOT8\SUBo [immutable] This can be used in case when preferred_connection_point_id is missing in connection points list.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ACK\EOT\DC2\EOT\174\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ACK\ENQ\DC2\EOT\174\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ACK\SOH\DC2\EOT\174\EOT\DC43\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\ACK\ETX\DC2\EOT\174\EOT67\n\ + \\204\STX\n\ + \\EOT\EOT\DC3\STX\a\DC2\EOT\181\EOT\EOT(\SUB\189\STX [erasable] Linked login for operations on behave of.\n\ + \ In case of admin login, this linked login can be only order-handler trade-routing login,\n\ + \ which is used for order operations going to exchange.\n\ + \ In case of trade-routing login, this linked login can be only admin login,\n\ + \ which is used for operations in CMS API.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\a\EOT\DC2\EOT\181\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\a\ENQ\DC2\EOT\181\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\a\SOH\DC2\EOT\181\EOT\DC4#\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\a\ETX\DC2\EOT\181\EOT&'\n\ + \g\n\ + \\EOT\EOT\DC3\STX\b\DC2\EOT\185\EOT\EOT,\SUBY Parameters of external authentication, if any.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\b\EOT\DC2\EOT\185\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\b\ACK\DC2\EOT\185\EOT\r\EM\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\b\SOH\DC2\EOT\185\EOT\SUB'\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\b\ETX\DC2\EOT\185\EOT*+\n\ + \m\n\ + \\EOT\EOT\DC3\STX\t\DC2\EOT\189\EOT\EOT+\SUB_ Per-user override of limit of allowed logons per day. Zero or absent field\n\ + \ mean no override.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\t\EOT\DC2\EOT\189\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\t\ENQ\DC2\EOT\189\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\t\SOH\DC2\EOT\189\EOT\DC4%\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\t\ETX\DC2\EOT\189\EOT(*\n\ + \\227\SOH\n\ + \\EOT\EOT\DC3\STX\n\ + \\DC2\EOT\194\EOT\EOT+\SUB\212\SOH [immutable] Number of performed logons for current day. Absent field means zero.\n\ + \ Note: This property is intentionally mutable, allowing reset of the logon counter by FCMs/ops.\n\ + \ Note: day boundary is 00:00 UTC.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\n\ + \\EOT\DC2\EOT\194\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\n\ + \\ENQ\DC2\EOT\194\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\n\ + \\SOH\DC2\EOT\194\EOT\DC4%\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\n\ + \\ETX\DC2\EOT\194\EOT(*\n\ + \\192\SOH\n\ + \\EOT\EOT\DC3\STX\v\DC2\EOT\199\EOT\EOT/\SUB\177\SOH Authentication system identifier.\n\ + \ LookupPropertyListRequest { property_type = CommonLookupPropertyType.AUTHENTICATION_SYSTEM }\n\ + \ Supported login domains: trade-routing, admin.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\v\EOT\DC2\EOT\199\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\v\ENQ\DC2\EOT\199\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\v\SOH\DC2\EOT\199\EOT\DC4)\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\v\ETX\DC2\EOT\199\EOT,.\n\ + \g\n\ + \\EOT\EOT\DC3\STX\f\DC2\EOT\202\EOT\EOT2\SUBY [immutable] Determines whether login is allowed to exceed account authorizations limit.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\f\EOT\DC2\EOT\202\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\f\ENQ\DC2\EOT\202\EOT\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\f\SOH\DC2\EOT\202\EOT\DC2,\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\f\ETX\DC2\EOT\202\EOT/1\n\ + \\129\SOH\n\ + \\EOT\EOT\DC3\STX\r\DC2\EOT\206\EOT\EOT6\SUBs This field is associated with LoginSettings.DisconnectActions enum type.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\r\EOT\DC2\EOT\206\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\r\ENQ\DC2\EOT\206\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\r\SOH\DC2\EOT\206\EOT\DC40\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\r\ETX\DC2\EOT\206\EOT35\n\ + \\236\SOH\n\ + \\EOT\EOT\DC3\STX\SO\DC2\EOT\211\EOT\EOT<\SUB\221\SOH Timeout in seconds. If the login reconnects during this period, orders won't be canceled/suspended.\n\ + \ Applied only if on_session_disconnect_action field does not equal to NOTHING.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SO\EOT\DC2\EOT\211\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SO\ENQ\DC2\EOT\211\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SO\SOH\DC2\EOT\211\EOT\DC46\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SO\ETX\DC2\EOT\211\EOT9;\n\ + \\169\SOH\n\ + \\EOT\EOT\DC3\STX\SI\DC2\EOT\215\EOT\EOT#\SUB\154\SOH Time zone in IANA (Olson) format: \"Area/Location\". See https://www.iana.org/time-zones\n\ + \ Sets preferred time zone for date/time in notification messages.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SI\EOT\DC2\EOT\215\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SI\ENQ\DC2\EOT\215\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SI\SOH\DC2\EOT\215\EOT\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SI\ETX\DC2\EOT\215\EOT \"\n\ + \-\n\ + \\STX\EOT\DC4\DC2\ACK\219\EOT\NUL\174\ENQ\SOH\SUB\US Request to search for a user.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC4\SOH\DC2\EOT\219\EOT\b\EM\n\ + \:\n\ + \\EOT\EOT\DC4\EOT\NUL\DC2\ACK\222\EOT\EOT\158\ENQ\ENQ\SUB* List of possible search refine criteria.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\EOT\NUL\SOH\DC2\EOT\222\EOT\t\ETB\n\ + \p\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\NUL\DC2\EOT\226\EOT\b\DC4\SUB` Search by user_id.\n\ + \ With 'CONTAINS' rule, minimal query text length is limited with 3 symbols.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\NUL\SOH\DC2\EOT\226\EOT\b\SI\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\NUL\STX\DC2\EOT\226\EOT\DC2\DC3\n\ + \r\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\SOH\DC2\EOT\230\EOT\b\SYN\SUBb Search by user name.\n\ + \ With 'CONTAINS' rule, minimal query text length is limited with 3 symbols.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\SOH\SOH\DC2\EOT\230\EOT\b\DC1\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\SOH\STX\DC2\EOT\230\EOT\DC4\NAK\n\ + \8\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\STX\DC2\EOT\233\EOT\b(\SUB( Search by profile sales series number.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\STX\SOH\DC2\EOT\233\EOT\b#\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\STX\STX\DC2\EOT\233\EOT&'\n\ + \6\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\ETX\DC2\EOT\236\EOT\b&\SUB& Search by profile sales series name.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\ETX\SOH\DC2\EOT\236\EOT\b!\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\ETX\STX\DC2\EOT\236\EOT$%\n\ + \R\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\EOT\DC2\EOT\240\EOT\b\FS\SUBB Search by sales series ID.\n\ + \ Use PROFILE_SALES_SERIES_ID instead.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\EOT\SOH\DC2\EOT\240\EOT\b\ETB\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\EOT\STX\DC2\EOT\240\EOT\SUB\ESC\n\ + \\133\STX\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\ENQ\DC2\EOT\246\EOT\b\CAN\SUB\244\SOH Search by customer ID for all linked users.\n\ + \ With 'CONTAINS' rule, minimal query text length is limited with 3 symbols.\n\ + \ In case of system logins, only EXACT_EQUALITY rule is used, regardless provided rule in request.\n\ + \ Use PROFILE_ID instead.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\ENQ\SOH\DC2\EOT\246\EOT\b\DC3\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\ENQ\STX\DC2\EOT\246\EOT\SYN\ETB\n\ + \U\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\ACK\DC2\EOT\250\EOT\b\EM\SUBE Search by authorized brokerage id.\n\ + \ Supported login domains: admin.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\ACK\SOH\DC2\EOT\250\EOT\b\DC4\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\ACK\STX\DC2\EOT\250\EOT\ETB\CAN\n\ + \W\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\a\DC2\EOT\254\EOT\b\FS\SUBG Search by authorized brokerage name.\n\ + \ Supported login domains: admin.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\a\SOH\DC2\EOT\254\EOT\b\SYN\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\a\STX\DC2\EOT\254\EOT\EM\ESC\n\ + \\231\SOH\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\b\DC2\EOT\132\ENQ\b\DC3\SUB\214\SOH Login class.\n\ + \ Supported login domains: trade-routing.\n\ + \ This field is associated with User.LoginClass enum type.\n\ + \ LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\b\SOH\DC2\EOT\132\ENQ\b\r\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\b\STX\DC2\EOT\132\ENQ\DLE\DC2\n\ + \\187\SOH\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\t\DC2\EOT\137\ENQ\b\SUB\SUB\170\SOH Login domain.\n\ + \ This field is associated with LoginDomain enum type.\n\ + \ LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\t\SOH\DC2\EOT\137\ENQ\b\DC4\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\t\STX\DC2\EOT\137\ENQ\ETB\EM\n\ + \\252\SOH\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\n\ + \\DC2\EOT\142\ENQ\b\CAN\SUB\235\SOH Search by profile (customer/admin) ID for all linked users.\n\ + \ With 'CONTAINS' rule, minimal query text length is limited with 3 symbols.\n\ + \ In case of system logins, only EXACT_EQUALITY rule is used, regardless provided rule in request.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\n\ + \\SOH\DC2\EOT\142\ENQ\b\DC2\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\n\ + \\STX\DC2\EOT\142\ENQ\NAK\ETB\n\ + \4\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\v\DC2\EOT\145\ENQ\b%\SUB$ Search by profile sales series ID.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\v\SOH\DC2\EOT\145\ENQ\b\US\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\v\STX\DC2\EOT\145\ENQ\"$\n\ + \n\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\f\DC2\EOT\149\ENQ\b\GS\SUB^ Search by assigned authentication partner identifier\n\ + \ Supported login domain: trade-routing.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\f\SOH\DC2\EOT\149\ENQ\b\ETB\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\f\STX\DC2\EOT\149\ENQ\SUB\FS\n\ + \\DEL\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\r\DC2\EOT\153\ENQ\b\RS\SUBo Search by id of user (username) registered for authentication partner\n\ + \ Supported login domain: trade-routing.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\r\SOH\DC2\EOT\153\ENQ\b\CAN\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\r\STX\DC2\EOT\153\ENQ\ESC\GS\n\ + \h\n\ + \\ACK\EOT\DC4\EOT\NUL\STX\SO\DC2\EOT\157\ENQ\b\US\SUBX Search by assigned authentication partner name\n\ + \ Supported login domain: trade-routing.\n\ + \\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\SO\SOH\DC2\EOT\157\ENQ\b\EM\n\ + \\SI\n\ + \\a\EOT\DC4\EOT\NUL\STX\SO\STX\DC2\EOT\157\ENQ\FS\RS\n\ + \*\n\ + \\EOT\EOT\DC4\STX\NUL\DC2\EOT\161\ENQ\EOT8\SUB\FS [obsolete] Text to search.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\EOT\DC2\EOT\161\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\ENQ\DC2\EOT\161\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\SOH\DC2\EOT\161\ENQ\DC4!\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\ETX\DC2\EOT\161\ENQ$%\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\b\DC2\EOT\161\ENQ&7\n\ + \\SO\n\ + \\ACK\EOT\DC4\STX\NUL\b\ETX\DC2\EOT\161\ENQ'6\n\ + \\158\SOH\n\ + \\EOT\EOT\DC4\STX\SOH\DC2\EOT\166\ENQ\EOTE\SUB\143\SOH [obsolete] List of search options.\n\ + \ This field is associated with SearchCriteria enum type.\n\ + \ Empty list means search by any possible options.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\EOT\DC2\EOT\166\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\ENQ\DC2\EOT\166\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\SOH\DC2\EOT\166\ENQ\DC4,\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\ETX\DC2\EOT\166\ENQ/0\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\b\DC2\EOT\166\ENQ1D\n\ + \\SO\n\ + \\ACK\EOT\DC4\STX\SOH\b\ETX\DC2\EOT\166\ENQ2C\n\ + \h\n\ + \\EOT\EOT\DC4\STX\STX\DC2\EOT\169\ENQ\EOT-\SUBZ List of search options. Each option has its own search text, criteria and matching rule.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\STX\EOT\DC2\EOT\169\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\STX\ACK\DC2\EOT\169\ENQ\r\EM\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\STX\SOH\DC2\EOT\169\ENQ\SUB(\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\STX\ETX\DC2\EOT\169\ENQ+,\n\ + \h\n\ + \\EOT\EOT\DC4\STX\ETX\DC2\EOT\173\ENQ\EOT7\SUBZ Indicates, whether all criteria must match at once.\n\ + \ By default any criteria must match.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ETX\EOT\DC2\EOT\173\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ETX\ENQ\DC2\EOT\173\ENQ\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ETX\SOH\DC2\EOT\173\ENQ\DC2 \n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ETX\ETX\DC2\EOT\173\ENQ#$\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ETX\b\DC2\EOT\173\ENQ%6\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ETX\a\DC2\EOT\173\ENQ05\n\ + \*\n\ + \\STX\EOT\NAK\DC2\ACK\177\ENQ\NUL\216\ENQ\SOH\SUB\FS User search result record.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\NAK\SOH\DC2\EOT\177\ENQ\b\RS\n\ + \ \n\ + \\EOT\EOT\NAK\STX\NUL\DC2\EOT\180\ENQ\EOT \SUB\DC2 User identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\EOT\DC2\EOT\180\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\ENQ\DC2\EOT\180\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\SOH\DC2\EOT\180\ENQ\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\ETX\DC2\EOT\180\ENQ\RS\US\n\ + \\SUB\n\ + \\EOT\EOT\NAK\STX\SOH\DC2\EOT\183\ENQ\EOT\"\SUB\f User name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\EOT\DC2\EOT\183\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\ENQ\DC2\EOT\183\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\SOH\DC2\EOT\183\ENQ\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\ETX\DC2\EOT\183\ENQ !\n\ + \&\n\ + \\EOT\EOT\NAK\STX\STX\DC2\EOT\186\ENQ\EOT#\SUB\CAN Customer's first name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\STX\EOT\DC2\EOT\186\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\STX\ENQ\DC2\EOT\186\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\STX\SOH\DC2\EOT\186\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\STX\ETX\DC2\EOT\186\ENQ!\"\n\ + \%\n\ + \\EOT\EOT\NAK\STX\ETX\DC2\EOT\189\ENQ\EOT\"\SUB\ETB Customer's last name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ETX\EOT\DC2\EOT\189\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ETX\ENQ\DC2\EOT\189\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ETX\SOH\DC2\EOT\189\ENQ\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ETX\ETX\DC2\EOT\189\ENQ !\n\ + \5\n\ + \\EOT\EOT\NAK\STX\EOT\DC2\EOT\193\ENQ\EOT$\SUB' Customer id.\n\ + \ Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\EOT\EOT\DC2\EOT\193\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\EOT\ENQ\DC2\EOT\193\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\EOT\SOH\DC2\EOT\193\ENQ\DC4\US\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\EOT\ETX\DC2\EOT\193\ENQ\"#\n\ + \\RS\n\ + \\EOT\EOT\NAK\STX\ENQ\DC2\EOT\196\ENQ\EOT&\SUB\DLE Customer name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ENQ\EOT\DC2\EOT\196\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ENQ\ENQ\DC2\EOT\196\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ENQ\SOH\DC2\EOT\196\ENQ\DC4!\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ENQ\ETX\DC2\EOT\196\ENQ$%\n\ + \*\n\ + \\EOT\EOT\NAK\STX\ACK\DC2\EOT\199\ENQ\EOT0\SUB\FS Customer's brokerage name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ACK\EOT\DC2\EOT\199\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ACK\ENQ\DC2\EOT\199\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ACK\SOH\DC2\EOT\199\ENQ\DC4+\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\ACK\ETX\DC2\EOT\199\ENQ./\n\ + \\GS\n\ + \\EOT\EOT\NAK\STX\a\DC2\EOT\202\ENQ\EOT\RS\SUB\SI Removed flag.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\a\EOT\DC2\EOT\202\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\a\ENQ\DC2\EOT\202\ENQ\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\a\SOH\DC2\EOT\202\ENQ\DC2\EM\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\a\ETX\DC2\EOT\202\ENQ\FS\GS\n\ + \U\n\ + \\EOT\EOT\NAK\STX\b\DC2\EOT\206\ENQ\EOT\RS\SUBG User class.\n\ + \ This field is associated with User.LoginClass enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\b\EOT\DC2\EOT\206\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\b\ENQ\DC2\EOT\206\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\b\SOH\DC2\EOT\206\ENQ\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\b\ETX\DC2\EOT\206\ENQ\FS\GS\n\ + \/\n\ + \\EOT\EOT\NAK\STX\t\DC2\EOT\209\ENQ\EOT$\SUB! Temporary user for demo access.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\t\EOT\DC2\EOT\209\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\t\ENQ\DC2\EOT\209\ENQ\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\t\SOH\DC2\EOT\209\ENQ\DC2\RS\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\t\ETX\DC2\EOT\209\ENQ!#\n\ + \!\n\ + \\EOT\EOT\NAK\STX\n\ + \\DC2\EOT\212\ENQ\EOT$\SUB\DC3 Owner profile id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\n\ + \\EOT\DC2\EOT\212\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\n\ + \\ENQ\DC2\EOT\212\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\n\ + \\SOH\DC2\EOT\212\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\n\ + \\ETX\DC2\EOT\212\ENQ!#\n\ + \>\n\ + \\EOT\EOT\NAK\STX\v\DC2\EOT\215\ENQ\EOT-\SUB0 Parameters of external authentication, if any.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\v\EOT\DC2\EOT\215\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\v\ACK\DC2\EOT\215\ENQ\r\EM\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\v\SOH\DC2\EOT\215\ENQ\SUB'\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\v\ETX\DC2\EOT\215\ENQ*,\n\ + \\161\SOH\n\ + \\STX\EOT\SYN\DC2\ACK\221\ENQ\NUL\255\ENQ\SOH\SUB\146\SOH Clone traderouting login.\n\ + \ When target_profile_id is provided, new user will be linked with it,\n\ + \ otherwise new customer profile will be created.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SYN\SOH\DC2\EOT\221\ENQ\b\DC1\n\ + \2\n\ + \\EOT\EOT\SYN\STX\NUL\DC2\EOT\224\ENQ\EOT'\SUB$ [required] Source user identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\EOT\DC2\EOT\224\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\ENQ\DC2\EOT\224\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\SOH\DC2\EOT\224\ENQ\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\ETX\DC2\EOT\224\ENQ%&\n\ + \?\n\ + \\EOT\EOT\SYN\STX\SOH\DC2\EOT\227\ENQ\EOT*\SUB1 [required] New user username (max length = 32).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\EOT\DC2\EOT\227\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\ENQ\DC2\EOT\227\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\SOH\DC2\EOT\227\ENQ\DC4%\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\ETX\DC2\EOT\227\ENQ()\n\ + \A\n\ + \\EOT\EOT\SYN\STX\STX\DC2\EOT\230\ENQ\EOTG\SUB3 [obsolete] New user first name (max length = 20).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\EOT\DC2\EOT\230\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\ENQ\DC2\EOT\230\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\SOH\DC2\EOT\230\ENQ\DC40\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\ETX\DC2\EOT\230\ENQ34\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\b\DC2\EOT\230\ENQ5F\n\ + \\SO\n\ + \\ACK\EOT\SYN\STX\STX\b\ETX\DC2\EOT\230\ENQ6E\n\ + \@\n\ + \\EOT\EOT\SYN\STX\ETX\DC2\EOT\233\ENQ\EOTF\SUB2 [obsolete] New user last name (max length = 25).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\EOT\DC2\EOT\233\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\ENQ\DC2\EOT\233\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\SOH\DC2\EOT\233\ENQ\DC4/\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\ETX\DC2\EOT\233\ENQ23\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\b\DC2\EOT\233\ENQ4E\n\ + \\SO\n\ + \\ACK\EOT\SYN\STX\ETX\b\ETX\DC2\EOT\233\ENQ5D\n\ + \,\n\ + \\EOT\EOT\SYN\STX\EOT\DC2\EOT\236\ENQ\EOTE\SUB\RS [obsolete] New user address.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\EOT\DC2\EOT\236\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\ACK\DC2\EOT\236\ENQ\r\DC4\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\SOH\DC2\EOT\236\ENQ\NAK.\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\ETX\DC2\EOT\236\ENQ12\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\b\DC2\EOT\236\ENQ3D\n\ + \\SO\n\ + \\ACK\EOT\SYN\STX\EOT\b\ETX\DC2\EOT\236\ENQ4C\n\ + \\139\SOH\n\ + \\EOT\EOT\SYN\STX\ENQ\DC2\EOT\240\ENQ\EOTA\SUB} Contact information of new customer profile that will be linked with new login.\n\ + \ Mutually exclusive with target_profile_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ENQ\EOT\DC2\EOT\240\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ENQ\ACK\DC2\EOT\240\ENQ\r\US\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ENQ\SOH\DC2\EOT\240\ENQ <\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ENQ\ETX\DC2\EOT\240\ENQ?@\n\ + \D\n\ + \\EOT\EOT\SYN\STX\ACK\DC2\EOT\243\ENQ\EOTK\SUB6 [obsolete] New user middle initial (max length = 1).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ACK\EOT\DC2\EOT\243\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ACK\ENQ\DC2\EOT\243\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ACK\SOH\DC2\EOT\243\ENQ\DC44\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ACK\ETX\DC2\EOT\243\ENQ78\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ACK\b\DC2\EOT\243\ENQ9J\n\ + \\SO\n\ + \\ACK\EOT\SYN\STX\ACK\b\ETX\DC2\EOT\243\ENQ:I\n\ + \\132\SOH\n\ + \\EOT\EOT\SYN\STX\a\DC2\EOT\247\ENQ\EOT*\SUBv Existing customer profile that new login will be linked with.\n\ + \ Mutually exclusive with new_user_contact_information.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\a\EOT\DC2\EOT\247\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\a\ENQ\DC2\EOT\247\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\a\SOH\DC2\EOT\247\ENQ\DC4%\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\a\ETX\DC2\EOT\247\ENQ()\n\ + \Z\n\ + \\EOT\EOT\SYN\STX\b\DC2\EOT\250\ENQ\EOT'\SUBL This flag if set to true prohibit to send welcome email for cloned trader.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\b\EOT\DC2\EOT\250\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\b\ENQ\DC2\EOT\250\ENQ\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\b\SOH\DC2\EOT\250\ENQ\DC2\"\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\b\ETX\DC2\EOT\250\ENQ%&\n\ + \\166\SOH\n\ + \\EOT\EOT\SYN\STX\t\DC2\EOT\254\ENQ\EOT2\SUB\151\SOH Brokerage_id for new customer profile. If not provided it is copied from customer profile of source user.\n\ + \ Mutually exclusive with target_profile_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\t\EOT\DC2\EOT\254\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\t\ENQ\DC2\EOT\254\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\t\SOH\DC2\EOT\254\ENQ\DC4,\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\t\ETX\DC2\EOT\254\ENQ/1\n\ + \\f\n\ + \\STX\EOT\ETB\DC2\ACK\129\ACK\NUL\136\ACK\SOH\n\ + \\v\n\ + \\ETX\EOT\ETB\SOH\DC2\EOT\129\ACK\b\ETB\n\ + \2\n\ + \\EOT\EOT\ETB\STX\NUL\DC2\EOT\132\ACK\EOT$\SUB$ New traderouting login identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\EOT\DC2\EOT\132\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\ENQ\DC2\EOT\132\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\SOH\DC2\EOT\132\ACK\DC4\US\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\ETX\DC2\EOT\132\ACK\"#\n\ + \7\n\ + \\EOT\EOT\ETB\STX\SOH\DC2\EOT\135\ACK\EOT'\SUB) New linked customer profile identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\SOH\EOT\DC2\EOT\135\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\SOH\ENQ\DC2\EOT\135\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\SOH\SOH\DC2\EOT\135\ACK\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\SOH\ETX\DC2\EOT\135\ACK%&\n\ + \$\n\ + \\STX\EOT\CAN\DC2\ACK\139\ACK\NUL\179\ACK\SOH\SUB\SYN Address information.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\CAN\SOH\DC2\EOT\139\ACK\b\SI\n\ + \E\n\ + \\EOT\EOT\CAN\EOT\NUL\DC2\ACK\142\ACK\EOT\148\ACK\ENQ\SUB5 List of possible validation statuses of an address.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\EOT\NUL\SOH\DC2\EOT\142\ACK\t\SYN\n\ + \\SO\n\ + \\ACK\EOT\CAN\EOT\NUL\STX\NUL\DC2\EOT\144\ACK\b\DC4\n\ + \\SI\n\ + \\a\EOT\CAN\EOT\NUL\STX\NUL\SOH\DC2\EOT\144\ACK\b\SI\n\ + \\SI\n\ + \\a\EOT\CAN\EOT\NUL\STX\NUL\STX\DC2\EOT\144\ACK\DC2\DC3\n\ + \\SO\n\ + \\ACK\EOT\CAN\EOT\NUL\STX\SOH\DC2\EOT\145\ACK\b\DC2\n\ + \\SI\n\ + \\a\EOT\CAN\EOT\NUL\STX\SOH\SOH\DC2\EOT\145\ACK\b\r\n\ + \\SI\n\ + \\a\EOT\CAN\EOT\NUL\STX\SOH\STX\DC2\EOT\145\ACK\DLE\DC1\n\ + \\SO\n\ + \\ACK\EOT\CAN\EOT\NUL\STX\STX\DC2\EOT\146\ACK\b\SUB\n\ + \\SI\n\ + \\a\EOT\CAN\EOT\NUL\STX\STX\SOH\DC2\EOT\146\ACK\b\NAK\n\ + \\SI\n\ + \\a\EOT\CAN\EOT\NUL\STX\STX\STX\DC2\EOT\146\ACK\CAN\EM\n\ + \\SO\n\ + \\ACK\EOT\CAN\EOT\NUL\STX\ETX\DC2\EOT\147\ACK\b\DLE\n\ + \\SI\n\ + \\a\EOT\CAN\EOT\NUL\STX\ETX\SOH\DC2\EOT\147\ACK\b\v\n\ + \\SI\n\ + \\a\EOT\CAN\EOT\NUL\STX\ETX\STX\DC2\EOT\147\ACK\SO\SI\n\ + \o\n\ + \\EOT\EOT\CAN\STX\NUL\DC2\EOT\151\ACK\EOT'\SUBa List of field ids to clear. Erasable fields must be defined in a message where Address is used.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\EOT\DC2\EOT\151\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\ENQ\DC2\EOT\151\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\SOH\DC2\EOT\151\ACK\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\ETX\DC2\EOT\151\ACK%&\n\ + \?\n\ + \\EOT\EOT\CAN\STX\SOH\DC2\EOT\154\ACK\EOT \SUB1 Country code (ISO 3166 based) (max length = 2).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\EOT\DC2\EOT\154\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\ENQ\DC2\EOT\154\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\SOH\DC2\EOT\154\ACK\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\ETX\DC2\EOT\154\ACK\RS\US\n\ + \=\n\ + \\EOT\EOT\CAN\STX\STX\DC2\EOT\157\ACK\EOT\RS\SUB/ State code (ISO 3166 based) (max length = 2).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\STX\EOT\DC2\EOT\157\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\STX\ENQ\DC2\EOT\157\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\STX\SOH\DC2\EOT\157\ACK\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\STX\ETX\DC2\EOT\157\ACK\FS\GS\n\ + \'\n\ + \\EOT\EOT\CAN\STX\ETX\DC2\EOT\160\ACK\EOT\GS\SUB\EM City (max length = 25).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ETX\EOT\DC2\EOT\160\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ETX\ENQ\DC2\EOT\160\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ETX\SOH\DC2\EOT\160\ACK\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ETX\ETX\DC2\EOT\160\ACK\ESC\FS\n\ + \1\n\ + \\EOT\EOT\CAN\STX\EOT\DC2\EOT\163\ACK\EOT\FS\SUB# ZIP/Postal code (max length = 9).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\EOT\EOT\DC2\EOT\163\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\EOT\ENQ\DC2\EOT\163\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\EOT\SOH\DC2\EOT\163\ACK\DC4\ETB\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\EOT\ETX\DC2\EOT\163\ACK\SUB\ESC\n\ + \1\n\ + \\EOT\EOT\CAN\STX\ENQ\DC2\EOT\166\ACK\EOT \SUB# Address line 1 (max length = 58).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ENQ\EOT\DC2\EOT\166\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ENQ\ENQ\DC2\EOT\166\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ENQ\SOH\DC2\EOT\166\ACK\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ENQ\ETX\DC2\EOT\166\ACK\RS\US\n\ + \1\n\ + \\EOT\EOT\CAN\STX\ACK\DC2\EOT\169\ACK\EOT\"\SUB# Address line 2 (max length = 58).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ACK\EOT\DC2\EOT\169\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ACK\ENQ\DC2\EOT\169\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ACK\SOH\DC2\EOT\169\ACK\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ACK\ETX\DC2\EOT\169\ACK !\n\ + \7\n\ + \\EOT\EOT\CAN\STX\a\DC2\EOT\172\ACK\EOT\GS\SUB) Name of address for its identification.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\a\EOT\DC2\EOT\172\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\a\ENQ\DC2\EOT\172\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\a\SOH\DC2\EOT\172\ACK\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\a\ETX\DC2\EOT\172\ACK\ESC\FS\n\ + \q\n\ + \\EOT\EOT\CAN\STX\b\DC2\EOT\176\ACK\EOT'\SUBc Validation status of the address.\n\ + \ This field is associated with Address.AddressStatus enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\b\EOT\DC2\EOT\176\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\b\ENQ\DC2\EOT\176\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\b\SOH\DC2\EOT\176\ACK\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\b\ETX\DC2\EOT\176\ACK%&\n\ + \$\n\ + \\STX\EOT\EM\DC2\ACK\182\ACK\NUL\205\ACK\SOH\SUB\SYN Contact information.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\EM\SOH\DC2\EOT\182\ACK\b\SUB\n\ + \N\n\ + \\EOT\EOT\EM\STX\NUL\DC2\EOT\186\ACK\EOT\GS\SUB@ List of e-mail addresses.\n\ + \ Maximum allowed size is 2 elements.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\NUL\EOT\DC2\EOT\186\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\NUL\ACK\DC2\EOT\186\ACK\r\DC2\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\NUL\SOH\DC2\EOT\186\ACK\DC3\CAN\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\NUL\ETX\DC2\EOT\186\ACK\ESC\FS\n\ + \D\n\ + \\EOT\EOT\EM\STX\SOH\DC2\EOT\190\ACK\EOT\GS\SUB6 List of phones.\n\ + \ Maximum allowed size is 3 elements.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\SOH\EOT\DC2\EOT\190\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\SOH\ACK\DC2\EOT\190\ACK\r\DC2\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\SOH\SOH\DC2\EOT\190\ACK\DC3\CAN\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\SOH\ETX\DC2\EOT\190\ACK\ESC\FS\n\ + \B\n\ + \\EOT\EOT\EM\STX\STX\DC2\EOT\194\ACK\EOT\ESC\SUB4 List of faxes.\n\ + \ Maximum allowed size is 1 element.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\STX\EOT\DC2\EOT\194\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\STX\ACK\DC2\EOT\194\ACK\r\DC2\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\STX\SOH\DC2\EOT\194\ACK\DC3\SYN\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\STX\ETX\DC2\EOT\194\ACK\EM\SUB\n\ + \5\n\ + \\EOT\EOT\EM\STX\ETX\DC2\EOT\197\ACK\EOT#\SUB' Contact first name (max length = 20).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\ETX\EOT\DC2\EOT\197\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\ETX\ENQ\DC2\EOT\197\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\ETX\SOH\DC2\EOT\197\ACK\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\ETX\ETX\DC2\EOT\197\ACK!\"\n\ + \4\n\ + \\EOT\EOT\EM\STX\EOT\DC2\EOT\200\ACK\EOT\"\SUB& Contact last name (max length = 25).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\EOT\EOT\DC2\EOT\200\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\EOT\ENQ\DC2\EOT\200\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\EOT\SOH\DC2\EOT\200\ACK\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\EOT\ETX\DC2\EOT\200\ACK !\n\ + \M\n\ + \\EOT\EOT\EM\STX\ENQ\DC2\EOT\204\ACK\EOT!\SUB? Mail address information.\n\ + \ Maximum allowed size is 1 element.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\ENQ\EOT\DC2\EOT\204\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\ENQ\ACK\DC2\EOT\204\ACK\r\DC4\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\ENQ\SOH\DC2\EOT\204\ACK\NAK\FS\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\ENQ\ETX\DC2\EOT\204\ACK\US \n\ + \+\n\ + \\STX\EOT\SUB\DC2\ACK\208\ACK\NUL\213\ACK\SOH\SUB\GS e-mail address information.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SUB\SOH\DC2\EOT\208\ACK\b\r\n\ + \\128\SOH\n\ + \\EOT\EOT\SUB\STX\NUL\DC2\EOT\212\ACK\EOT\RS\SUBr e-mail (max length = 60).\n\ + \ It should be valid email address according to RFC 5322 standard or single period '.'.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\NUL\EOT\DC2\EOT\212\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\NUL\ENQ\DC2\EOT\212\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\NUL\SOH\DC2\EOT\212\ACK\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\NUL\ETX\DC2\EOT\212\ACK\FS\GS\n\ + \\"\n\ + \\STX\EOT\ESC\DC2\ACK\216\ACK\NUL\220\ACK\SOH\SUB\DC4 Phone information.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ESC\SOH\DC2\EOT\216\ACK\b\r\n\ + \/\n\ + \\EOT\EOT\ESC\STX\NUL\DC2\EOT\219\ACK\EOT\US\SUB! Phone number (max length = 20).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\EOT\DC2\EOT\219\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\ENQ\DC2\EOT\219\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\SOH\DC2\EOT\219\ACK\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\ETX\DC2\EOT\219\ACK\GS\RS\n\ + \&\n\ + \\STX\EOT\FS\DC2\ACK\223\ACK\NUL\227\ACK\SOH\SUB\CAN Create user operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\FS\SOH\DC2\EOT\223\ACK\b\DC2\n\ + \\US\n\ + \\EOT\EOT\FS\STX\NUL\DC2\EOT\226\ACK\EOT\ESC\SUB\DC1 User to create.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\EOT\DC2\EOT\226\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\ACK\DC2\EOT\226\ACK\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\SOH\DC2\EOT\226\ACK\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\ETX\DC2\EOT\226\ACK\EM\SUB\n\ + \&\n\ + \\STX\EOT\GS\DC2\ACK\230\ACK\NUL\238\ACK\SOH\SUB\CAN Update user operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\GS\SOH\DC2\EOT\230\ACK\b\DC2\n\ + \T\n\ + \\EOT\EOT\GS\STX\NUL\DC2\EOT\234\ACK\EOT\ESC\SUBF [required] User to update.\n\ + \ Only fields for update must be provided.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\EOT\DC2\EOT\234\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\ACK\DC2\EOT\234\ACK\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\SOH\DC2\EOT\234\ACK\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\ETX\DC2\EOT\234\ACK\EM\SUB\n\ + \7\n\ + \\EOT\EOT\GS\STX\SOH\DC2\EOT\237\ACK\EOTA\SUB) [obsolete] Use only user field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\EOT\DC2\EOT\237\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\ACK\DC2\EOT\237\ACK\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\SOH\DC2\EOT\237\ACK\DC2(\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\ETX\DC2\EOT\237\ACK+,\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\SOH\b\DC2\EOT\237\ACK-@\n\ + \\SO\n\ + \\ACK\EOT\GS\STX\SOH\b\ETX\DC2\EOT\237\ACK.?\n\ + \&\n\ + \\STX\EOT\RS\DC2\ACK\241\ACK\NUL\245\ACK\SOH\SUB\CAN Remove user operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\RS\SOH\DC2\EOT\241\ACK\b\DC2\n\ + \*\n\ + \\EOT\EOT\RS\STX\NUL\DC2\EOT\244\ACK\EOT\ESC\SUB\FS User identifier to remove.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\NUL\EOT\DC2\EOT\244\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\NUL\ENQ\DC2\EOT\244\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\NUL\SOH\DC2\EOT\244\ACK\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\NUL\ETX\DC2\EOT\244\ACK\EM\SUB\n\ + \'\n\ + \\STX\EOT\US\DC2\ACK\248\ACK\NUL\252\ACK\SOH\SUB\EM Restore user operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\US\SOH\DC2\EOT\248\ACK\b\DC3\n\ + \+\n\ + \\EOT\EOT\US\STX\NUL\DC2\EOT\251\ACK\EOT\ESC\SUB\GS User identifier to restore.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\EOT\DC2\EOT\251\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\ENQ\DC2\EOT\251\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\SOH\DC2\EOT\251\ACK\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\ETX\DC2\EOT\251\ACK\EM\SUB\n\ + \0\n\ + \\STX\EOT \DC2\ACK\255\ACK\NUL\131\a\SOH\SUB\" Result of create user operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT \SOH\DC2\EOT\255\ACK\b\CAN\n\ + \/\n\ + \\EOT\EOT \STX\NUL\DC2\EOT\130\a\EOT\ESC\SUB! Assigned user id, if succeeded.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\EOT\DC2\EOT\130\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\ENQ\DC2\EOT\130\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\SOH\DC2\EOT\130\a\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\ETX\DC2\EOT\130\a\EM\SUB\n\ + \0\n\ + \\STX\EOT!\DC2\ACK\134\a\NUL\136\a\SOH\SUB\" Result of update user operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT!\SOH\DC2\EOT\134\a\b\CAN\n\ + \1\n\ + \\STX\EOT\"\DC2\ACK\139\a\NUL\141\a\SOH\SUB# Result of restore user operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\"\SOH\DC2\EOT\139\a\b\EM\n\ + \0\n\ + \\STX\EOT#\DC2\ACK\144\a\NUL\146\a\SOH\SUB\" Result of remove user operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT#\SOH\DC2\EOT\144\a\b\CAN\n\ + \`\n\ + \\STX\EOT$\DC2\ACK\149\a\NUL\163\a\SOH\SUBR This entity is used as a common list of name - value pairs for different fields.\n\ + \\n\ + \\v\n\ + \\ETX\EOT$\SOH\DC2\EOT\149\a\b\SYN\n\ + \h\n\ + \\EOT\EOT$\STX\NUL\DC2\EOT\152\a\EOT\GS\SUBZ The value is associated with Lookup Property type enum defined within the request scope.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\EOT\DC2\EOT\152\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\ENQ\DC2\EOT\152\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\SOH\DC2\EOT\152\a\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\ETX\DC2\EOT\152\a\ESC\FS\n\ + \\132\SOH\n\ + \\EOT\EOT$\STX\SOH\DC2\EOT\156\a\EOT\RS\SUBv Property Value.\n\ + \ This value must be provided as corresponding field value (usually _id) in specific message.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT$\STX\SOH\EOT\DC2\EOT\156\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT$\STX\SOH\ENQ\DC2\EOT\156\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT$\STX\SOH\SOH\DC2\EOT\156\a\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT$\STX\SOH\ETX\DC2\EOT\156\a\FS\GS\n\ + \\RS\n\ + \\EOT\EOT$\STX\STX\DC2\EOT\159\a\EOT$\SUB\DLE Property Name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT$\STX\STX\EOT\DC2\EOT\159\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT$\STX\STX\ACK\DC2\EOT\159\a\r\SUB\n\ + \\r\n\ + \\ENQ\EOT$\STX\STX\SOH\DC2\EOT\159\a\ESC\US\n\ + \\r\n\ + \\ENQ\EOT$\STX\STX\ETX\DC2\EOT\159\a\"#\n\ + \.\n\ + \\EOT\EOT$\STX\ETX\DC2\EOT\162\a\EOT+\SUB Optional property description.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT$\STX\ETX\EOT\DC2\EOT\162\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT$\STX\ETX\ACK\DC2\EOT\162\a\r\SUB\n\ + \\r\n\ + \\ENQ\EOT$\STX\ETX\SOH\DC2\EOT\162\a\ESC&\n\ + \\r\n\ + \\ENQ\EOT$\STX\ETX\ETX\DC2\EOT\162\a)*\n\ + \0\n\ + \\STX\EOT%\DC2\ACK\166\a\NUL\172\a\SOH\SUB\" Get a list of lookup properties.\n\ + \\n\ + \\v\n\ + \\ETX\EOT%\SOH\DC2\EOT\166\a\b!\n\ + \\186\SOH\n\ + \\EOT\EOT%\STX\NUL\DC2\EOT\171\a\EOT&\SUB\171\SOH List of property types to request.\n\ + \ Empty list means all types are requested.\n\ + \ The values are associated with Lookup Property type enum defined within the request scope.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\EOT\DC2\EOT\171\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\ENQ\DC2\EOT\171\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\SOH\DC2\EOT\171\a\DC4!\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\ETX\DC2\EOT\171\a$%\n\ + \>\n\ + \\STX\EOT&\DC2\ACK\175\a\NUL\179\a\SOH\SUB0 Result of a list of lookup properties request.\n\ + \\n\ + \\v\n\ + \\ETX\EOT&\SOH\DC2\EOT\175\a\b \n\ + \4\n\ + \\EOT\EOT&\STX\NUL\DC2\EOT\178\a\EOT0\SUB& List of requested lookup properties.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT&\STX\NUL\EOT\DC2\EOT\178\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT&\STX\NUL\ACK\DC2\EOT\178\a\r\ESC\n\ + \\r\n\ + \\ENQ\EOT&\STX\NUL\SOH\DC2\EOT\178\a\FS+\n\ + \\r\n\ + \\ENQ\EOT&\STX\NUL\ETX\DC2\EOT\178\a./\n\ + \(\n\ + \\STX\EOT'\DC2\ACK\182\a\NUL\218\a\SOH\SUB\SUB Search for sales series.\n\ + \\n\ + \\v\n\ + \\ETX\EOT'\SOH\DC2\EOT\182\a\b \n\ + \:\n\ + \\EOT\EOT'\EOT\NUL\DC2\ACK\185\a\EOT\202\a\ENQ\SUB* List of possible search refine criteria.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT'\EOT\NUL\SOH\DC2\EOT\185\a\t\ETB\n\ + \,\n\ + \\ACK\EOT'\EOT\NUL\STX\NUL\DC2\EOT\188\a\b\SI\SUB\FS Search by sales series ID.\n\ + \\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\NUL\SOH\DC2\EOT\188\a\b\n\ + \\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\NUL\STX\DC2\EOT\188\a\r\SO\n\ + \0\n\ + \\ACK\EOT'\EOT\NUL\STX\SOH\DC2\EOT\191\a\b\DC3\SUB Search by sales series number.\n\ + \\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\SOH\SOH\DC2\EOT\191\a\b\SO\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\SOH\STX\DC2\EOT\191\a\DC1\DC2\n\ + \.\n\ + \\ACK\EOT'\EOT\NUL\STX\STX\DC2\EOT\194\a\b\DC1\SUB\RS Search by sales series name.\n\ + \\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\STX\SOH\DC2\EOT\194\a\b\f\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\STX\STX\DC2\EOT\194\a\SI\DLE\n\ + \)\n\ + \\ACK\EOT'\EOT\NUL\STX\ETX\DC2\EOT\197\a\b\EM\SUB\EM Search by brokerage id.\n\ + \\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\ETX\SOH\DC2\EOT\197\a\b\DC4\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\ETX\STX\DC2\EOT\197\a\ETB\CAN\n\ + \\SO\n\ + \\ACK\EOT'\EOT\NUL\STX\EOT\DC2\EOT\199\a\b\ETB\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\EOT\SOH\DC2\EOT\199\a\b\DC2\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\EOT\STX\DC2\EOT\199\a\NAK\SYN\n\ + \\SO\n\ + \\ACK\EOT'\EOT\NUL\STX\ENQ\DC2\EOT\201\a\b\SYN\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\ENQ\SOH\DC2\EOT\201\a\b\DC1\n\ + \\SI\n\ + \\a\EOT'\EOT\NUL\STX\ENQ\STX\DC2\EOT\201\a\DC4\NAK\n\ + \*\n\ + \\EOT\EOT'\STX\NUL\DC2\EOT\205\a\EOT:\SUB\FS [obsolete] Text to search.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\EOT\DC2\EOT\205\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\ENQ\DC2\EOT\205\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\SOH\DC2\EOT\205\a\DC4!\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\ETX\DC2\EOT\205\a$%\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\b\DC2\EOT\205\a&9\n\ + \\SO\n\ + \\ACK\EOT'\STX\NUL\b\ETX\DC2\EOT\205\a'8\n\ + \\158\SOH\n\ + \\EOT\EOT'\STX\SOH\DC2\EOT\210\a\EOTC\SUB\143\SOH [obsolete] List of search options.\n\ + \ This field is associated with SearchCriteria enum type.\n\ + \ Empty list means search by any possible options.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\EOT\DC2\EOT\210\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\ENQ\DC2\EOT\210\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\SOH\DC2\EOT\210\a\DC4,\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\ETX\DC2\EOT\210\a/0\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\b\DC2\EOT\210\a1B\n\ + \\SO\n\ + \\ACK\EOT'\STX\SOH\b\ETX\DC2\EOT\210\a2A\n\ + \h\n\ + \\EOT\EOT'\STX\STX\DC2\EOT\213\a\EOT-\SUBZ List of search options. Each option has its own search text, criteria and matching rule.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT'\STX\STX\EOT\DC2\EOT\213\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT'\STX\STX\ACK\DC2\EOT\213\a\r\EM\n\ + \\r\n\ + \\ENQ\EOT'\STX\STX\SOH\DC2\EOT\213\a\SUB(\n\ + \\r\n\ + \\ENQ\EOT'\STX\STX\ETX\DC2\EOT\213\a+,\n\ + \h\n\ + \\EOT\EOT'\STX\ETX\DC2\EOT\217\a\EOT7\SUBZ Indicates, whether all criteria must match at once.\n\ + \ By default any criteria must match.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT'\STX\ETX\EOT\DC2\EOT\217\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT'\STX\ETX\ENQ\DC2\EOT\217\a\r\DC1\n\ + \\r\n\ + \\ENQ\EOT'\STX\ETX\SOH\DC2\EOT\217\a\DC2 \n\ + \\r\n\ + \\ENQ\EOT'\STX\ETX\ETX\DC2\EOT\217\a#$\n\ + \\r\n\ + \\ENQ\EOT'\STX\ETX\b\DC2\EOT\217\a%6\n\ + \\r\n\ + \\ENQ\EOT'\STX\ETX\a\DC2\EOT\217\a05\n\ + \5\n\ + \\STX\EOT(\DC2\ACK\221\a\NUL\234\a\SOH\SUB' Represents single found sales series.\n\ + \\n\ + \\v\n\ + \\ETX\EOT(\SOH\DC2\EOT\221\a\b%\n\ + \\f\n\ + \\EOT\EOT(\STX\NUL\DC2\EOT\223\a\EOT(\n\ + \\r\n\ + \\ENQ\EOT(\STX\NUL\EOT\DC2\EOT\223\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT(\STX\NUL\ENQ\DC2\EOT\223\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT(\STX\NUL\SOH\DC2\EOT\223\a\DC4#\n\ + \\r\n\ + \\ENQ\EOT(\STX\NUL\ETX\DC2\EOT\223\a&'\n\ + \\f\n\ + \\EOT\EOT(\STX\SOH\DC2\EOT\225\a\EOT*\n\ + \\r\n\ + \\ENQ\EOT(\STX\SOH\EOT\DC2\EOT\225\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT(\STX\SOH\ENQ\DC2\EOT\225\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT(\STX\SOH\SOH\DC2\EOT\225\a\DC4%\n\ + \\r\n\ + \\ENQ\EOT(\STX\SOH\ETX\DC2\EOT\225\a()\n\ + \\f\n\ + \\EOT\EOT(\STX\STX\DC2\EOT\227\a\EOT,\n\ + \\r\n\ + \\ENQ\EOT(\STX\STX\EOT\DC2\EOT\227\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT(\STX\STX\ENQ\DC2\EOT\227\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT(\STX\STX\SOH\DC2\EOT\227\a\DC4'\n\ + \\r\n\ + \\ENQ\EOT(\STX\STX\ETX\DC2\EOT\227\a*+\n\ + \\f\n\ + \\EOT\EOT(\STX\ETX\DC2\EOT\229\a\EOT%\n\ + \\r\n\ + \\ENQ\EOT(\STX\ETX\EOT\DC2\EOT\229\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT(\STX\ETX\ENQ\DC2\EOT\229\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT(\STX\ETX\SOH\DC2\EOT\229\a\DC4 \n\ + \\r\n\ + \\ENQ\EOT(\STX\ETX\ETX\DC2\EOT\229\a#$\n\ + \\f\n\ + \\EOT\EOT(\STX\EOT\DC2\EOT\231\a\EOT'\n\ + \\r\n\ + \\ENQ\EOT(\STX\EOT\EOT\DC2\EOT\231\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT(\STX\EOT\ENQ\DC2\EOT\231\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT(\STX\EOT\SOH\DC2\EOT\231\a\DC4\"\n\ + \\r\n\ + \\ENQ\EOT(\STX\EOT\ETX\DC2\EOT\231\a%&\n\ + \\f\n\ + \\EOT\EOT(\STX\ENQ\DC2\EOT\233\a\EOT\RS\n\ + \\r\n\ + \\ENQ\EOT(\STX\ENQ\EOT\DC2\EOT\233\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT(\STX\ENQ\ENQ\DC2\EOT\233\a\r\DC1\n\ + \\r\n\ + \\ENQ\EOT(\STX\ENQ\SOH\DC2\EOT\233\a\DC2\EM\n\ + \\r\n\ + \\ENQ\EOT(\STX\ENQ\ETX\DC2\EOT\233\a\FS\GS\n\ + \6\n\ + \\STX\EOT)\DC2\ACK\237\a\NUL\242\a\SOH\SUB( Common tuple message of string values.\n\ + \\n\ + \\v\n\ + \\ETX\EOT)\SOH\DC2\EOT\237\a\b\r\n\ + \\f\n\ + \\EOT\EOT)\STX\NUL\DC2\EOT\239\a\EOT\RS\n\ + \\r\n\ + \\ENQ\EOT)\STX\NUL\EOT\DC2\EOT\239\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT)\STX\NUL\ENQ\DC2\EOT\239\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT)\STX\NUL\SOH\DC2\EOT\239\a\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT)\STX\NUL\ETX\DC2\EOT\239\a\FS\GS\n\ + \\f\n\ + \\EOT\EOT)\STX\SOH\DC2\EOT\240\a\EOT\US\n\ + \\r\n\ + \\ENQ\EOT)\STX\SOH\EOT\DC2\EOT\240\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT)\STX\SOH\ENQ\DC2\EOT\240\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT)\STX\SOH\SOH\DC2\EOT\240\a\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOT)\STX\SOH\ETX\DC2\EOT\240\a\GS\RS\n\ + \\f\n\ + \\EOT\EOT)\STX\STX\DC2\EOT\241\a\EOT\RS\n\ + \\r\n\ + \\ENQ\EOT)\STX\STX\EOT\DC2\EOT\241\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT)\STX\STX\ENQ\DC2\EOT\241\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT)\STX\STX\SOH\DC2\EOT\241\a\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT)\STX\STX\ETX\DC2\EOT\241\a\FS\GS\n\ + \\193\STX\n\ + \\STX\EOT*\DC2\ACK\248\a\NUL\141\b\SOH\SUB\178\STX Customer to sales series authorization list request message.\n\ + \ By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records.\n\ + \ Set parameter top to a larger number to receive more.\n\ + \ Either customer_id or sales_series_id or profile_id or profile_sales_series_id is required (mutually exclusive).\n\ + \\n\ + \\v\n\ + \\ETX\EOT*\SOH\DC2\EOT\248\a\b3\n\ + \5\n\ + \\EOT\EOT*\STX\NUL\DC2\EOT\252\a\EOT$\SUB' Customer ID.\n\ + \ Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT*\STX\NUL\EOT\DC2\EOT\252\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT*\STX\NUL\ENQ\DC2\EOT\252\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT*\STX\NUL\SOH\DC2\EOT\252\a\DC4\US\n\ + \\r\n\ + \\ENQ\EOT*\STX\NUL\ETX\DC2\EOT\252\a\"#\n\ + \F\n\ + \\EOT\EOT*\STX\SOH\DC2\EOT\128\b\EOT(\SUB8 Sales series ID.\n\ + \ Use profile_sales_series_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT*\STX\SOH\EOT\DC2\EOT\128\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT*\STX\SOH\ENQ\DC2\EOT\128\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT*\STX\SOH\SOH\DC2\EOT\128\b\DC4#\n\ + \\r\n\ + \\ENQ\EOT*\STX\SOH\ETX\DC2\EOT\128\b&'\n\ + \Q\n\ + \\EOT\EOT*\STX\STX\DC2\EOT\131\b\EOT\FS\SUBC optionally restrict results by returning the first 'top' records.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT*\STX\STX\EOT\DC2\EOT\131\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT*\STX\STX\ENQ\DC2\EOT\131\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT*\STX\STX\SOH\DC2\EOT\131\b\DC4\ETB\n\ + \\r\n\ + \\ENQ\EOT*\STX\STX\ETX\DC2\EOT\131\b\SUB\ESC\n\ + \^\n\ + \\EOT\EOT*\STX\ETX\DC2\EOT\136\b\EOT#\SUBP Profile ID.\n\ + \ Has priority over customer_id.\n\ + \ Supported types: customer, admin.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT*\STX\ETX\EOT\DC2\EOT\136\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT*\STX\ETX\ENQ\DC2\EOT\136\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT*\STX\ETX\SOH\DC2\EOT\136\b\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT*\STX\ETX\ETX\DC2\EOT\136\b!\"\n\ + \L\n\ + \\EOT\EOT*\STX\EOT\DC2\EOT\140\b\EOT0\SUB> Profile sales series ID.\n\ + \ Has priority over sales_series_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT*\STX\EOT\EOT\DC2\EOT\140\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT*\STX\EOT\ENQ\DC2\EOT\140\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT*\STX\EOT\SOH\DC2\EOT\140\b\DC4+\n\ + \\r\n\ + \\ENQ\EOT*\STX\EOT\ETX\DC2\EOT\140\b./\n\ + \M\n\ + \\STX\EOT+\DC2\ACK\144\b\NUL\152\b\SOH\SUB? Update customer to sales series authorization list operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT+\SOH\DC2\EOT\144\b\b2\n\ + \r\n\ + \\EOT\EOT+\STX\NUL\DC2\EOT\148\b\EOT6\SUBd Links to add.\n\ + \ Authorization is added if it does not exist with this customer and sales series id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT+\STX\NUL\EOT\DC2\EOT\148\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT+\STX\NUL\ACK\DC2\EOT\148\b\r$\n\ + \\r\n\ + \\ENQ\EOT+\STX\NUL\SOH\DC2\EOT\148\b%1\n\ + \\r\n\ + \\ENQ\EOT+\STX\NUL\ETX\DC2\EOT\148\b45\n\ + \v\n\ + \\EOT\EOT+\STX\SOH\DC2\EOT\151\b\EOT'\SUBh Links to remove. First - customer id (profile id), second - sales series id (profile sales series id).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT+\STX\SOH\EOT\DC2\EOT\151\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT+\STX\SOH\ACK\DC2\EOT\151\b\r\DC2\n\ + \\r\n\ + \\ENQ\EOT+\STX\SOH\SOH\DC2\EOT\151\b\DC3\"\n\ + \\r\n\ + \\ENQ\EOT+\STX\SOH\ETX\DC2\EOT\151\b%&\n\ + \K\n\ + \\STX\EOT,\DC2\ACK\155\b\NUL\163\b\SOH\SUB= Customer to sales series authorization list result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT,\SOH\DC2\EOT\155\b\b2\n\ + \E\n\ + \\EOT\EOT,\STX\NUL\DC2\EOT\158\b\EOTE\SUB7 List of customer to sales series authorization links.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT,\STX\NUL\EOT\DC2\EOT\158\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT,\STX\NUL\ACK\DC2\EOT\158\b\r$\n\ + \\r\n\ + \\ENQ\EOT,\STX\NUL\SOH\DC2\EOT\158\b%@\n\ + \\r\n\ + \\ENQ\EOT,\STX\NUL\ETX\DC2\EOT\158\bCD\n\ + \r\n\ + \\EOT\EOT,\STX\SOH\DC2\EOT\162\b\EOT3\SUBd This flag is set to true if all results are sent\n\ + \ and nothing was filtered out by 'top' parameter.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT,\STX\SOH\EOT\DC2\EOT\162\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT,\STX\SOH\ENQ\DC2\EOT\162\b\r\DC1\n\ + \\r\n\ + \\ENQ\EOT,\STX\SOH\SOH\DC2\EOT\162\b\DC2\GS\n\ + \\r\n\ + \\ENQ\EOT,\STX\SOH\ETX\DC2\EOT\162\b !\n\ + \\r\n\ + \\ENQ\EOT,\STX\SOH\b\DC2\EOT\162\b\"2\n\ + \\r\n\ + \\ENQ\EOT,\STX\SOH\a\DC2\EOT\162\b-1\n\ + \\152\SOH\n\ + \\STX\EOT-\DC2\ACK\166\b\NUL\169\b\SOH\SUBA Result of customer to sales series authorization list updation.\n\ + \\"G If message is received then authorizations were updated successfully.\n\ + \\n\ + \\v\n\ + \\ETX\EOT-\SOH\DC2\EOT\166\b\b8\n\ + \<\n\ + \\STX\EOT.\DC2\ACK\172\b\NUL\196\b\SOH\SUB. Customer to sales series authorization link.\n\ + \\n\ + \\v\n\ + \\ETX\EOT.\SOH\DC2\EOT\172\b\b\US\n\ + \5\n\ + \\EOT\EOT.\STX\NUL\DC2\EOT\176\b\EOT$\SUB' Customer ID.\n\ + \ Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\NUL\EOT\DC2\EOT\176\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\NUL\ENQ\DC2\EOT\176\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT.\STX\NUL\SOH\DC2\EOT\176\b\DC4\US\n\ + \\r\n\ + \\ENQ\EOT.\STX\NUL\ETX\DC2\EOT\176\b\"#\n\ + \F\n\ + \\EOT\EOT.\STX\SOH\DC2\EOT\180\b\EOT(\SUB8 Sales series ID.\n\ + \ Use profile_sales_series_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\SOH\EOT\DC2\EOT\180\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\SOH\ENQ\DC2\EOT\180\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT.\STX\SOH\SOH\DC2\EOT\180\b\DC4#\n\ + \\r\n\ + \\ENQ\EOT.\STX\SOH\ETX\DC2\EOT\180\b&'\n\ + \.\n\ + \\EOT\EOT.\STX\STX\DC2\EOT\183\b\EOT*\SUB [immutable] Sales series name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\STX\EOT\DC2\EOT\183\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\STX\ENQ\DC2\EOT\183\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT.\STX\STX\SOH\DC2\EOT\183\b\DC4%\n\ + \\r\n\ + \\ENQ\EOT.\STX\STX\ETX\DC2\EOT\183\b()\n\ + \0\n\ + \\EOT\EOT.\STX\ETX\DC2\EOT\186\b\EOT,\SUB\" [immutable] Sales series number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\ETX\EOT\DC2\EOT\186\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\ETX\ENQ\DC2\EOT\186\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT.\STX\ETX\SOH\DC2\EOT\186\b\DC4'\n\ + \\r\n\ + \\ENQ\EOT.\STX\ETX\ETX\DC2\EOT\186\b*+\n\ + \n\n\ + \\EOT\EOT.\STX\EOT\DC2\EOT\191\b\EOT#\SUB` [required] Main profile id.\n\ + \ Has priority over customer_id.\n\ + \ Supported types: customer, admin.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\EOT\EOT\DC2\EOT\191\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\EOT\ENQ\DC2\EOT\191\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT.\STX\EOT\SOH\DC2\EOT\191\b\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT.\STX\EOT\ETX\DC2\EOT\191\b!\"\n\ + \W\n\ + \\EOT\EOT.\STX\ENQ\DC2\EOT\195\b\EOT0\SUBI [required] Sales series profile id.\n\ + \ Has priority over sales_series_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\ENQ\EOT\DC2\EOT\195\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\ENQ\ENQ\DC2\EOT\195\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT.\STX\ENQ\SOH\DC2\EOT\195\b\DC4+\n\ + \\r\n\ + \\ENQ\EOT.\STX\ENQ\ETX\DC2\EOT\195\b./\n\ + \2\n\ + \\STX\EOT/\DC2\ACK\199\b\NUL\203\b\SOH\SUB$ Login additional settings request.\n\ + \\n\ + \\v\n\ + \\ETX\EOT/\SOH\DC2\EOT\199\b\b\FS\n\ + \,\n\ + \\EOT\EOT/\STX\NUL\DC2\EOT\202\b\EOT!\SUB\RS [required] Login identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\NUL\EOT\DC2\EOT\202\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\NUL\ENQ\DC2\EOT\202\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT/\STX\NUL\SOH\DC2\EOT\202\b\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT/\STX\NUL\ETX\DC2\EOT\202\b\US \n\ + \/\n\ + \\STX\EOT0\DC2\ACK\206\b\NUL\210\b\SOH\SUB! Result of LoginSettingsRequest.\n\ + \\n\ + \\v\n\ + \\ETX\EOT0\SOH\DC2\EOT\206\b\b\ESC\n\ + \\US\n\ + \\EOT\EOT0\STX\NUL\DC2\EOT\209\b\EOT.\SUB\DC1 Login settings.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\NUL\EOT\DC2\EOT\209\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\NUL\ACK\DC2\EOT\209\b\r\SUB\n\ + \\r\n\ + \\ENQ\EOT0\STX\NUL\SOH\DC2\EOT\209\b\ESC)\n\ + \\r\n\ + \\ENQ\EOT0\STX\NUL\ETX\DC2\EOT\209\b,-\n\ + \&\n\ + \\STX\EOT1\DC2\ACK\213\b\NUL\217\b\SOH\SUB\CAN Update Login settings.\n\ + \\n\ + \\v\n\ + \\ETX\EOT1\SOH\DC2\EOT\213\b\b\ESC\n\ + \*\n\ + \\EOT\EOT1\STX\NUL\DC2\EOT\216\b\EOT.\SUB\FS [required] Login settings.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT1\STX\NUL\EOT\DC2\EOT\216\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT1\STX\NUL\ACK\DC2\EOT\216\b\r\SUB\n\ + \\r\n\ + \\ENQ\EOT1\STX\NUL\SOH\DC2\EOT\216\b\ESC)\n\ + \\r\n\ + \\ENQ\EOT1\STX\NUL\ETX\DC2\EOT\216\b,-\n\ + \i\n\ + \\STX\EOT2\DC2\ACK\220\b\NUL\223\b\SOH\SUB Result of UpdateLoginSettings.\n\ + \\"9 If message is received then operation was successfully.\n\ + \\n\ + \\v\n\ + \\ETX\EOT2\SOH\DC2\EOT\220\b\b!\n\ + \,\n\ + \\STX\EOT3\DC2\ACK\226\b\NUL\230\b\SOH\SUB\RS Requests login's member ids.\n\ + \\n\ + \\v\n\ + \\ETX\EOT3\SOH\DC2\EOT\226\b\b(\n\ + \,\n\ + \\EOT\EOT3\STX\NUL\DC2\EOT\229\b\EOT!\SUB\RS [required] Login identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT3\STX\NUL\EOT\DC2\EOT\229\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT3\STX\NUL\ENQ\DC2\EOT\229\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT3\STX\NUL\SOH\DC2\EOT\229\b\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT3\STX\NUL\ETX\DC2\EOT\229\b\US \n\ + \,\n\ + \\STX\EOT4\DC2\ACK\233\b\NUL\237\b\SOH\SUB\RS Requests login's member ids.\n\ + \\n\ + \\v\n\ + \\ETX\EOT4\SOH\DC2\EOT\233\b\b'\n\ + \\ESC\n\ + \\EOT\EOT4\STX\NUL\DC2\EOT\236\b\EOT8\SUB\r Member ids.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT4\STX\NUL\EOT\DC2\EOT\236\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT4\STX\NUL\ACK\DC2\EOT\236\b\r\"\n\ + \\r\n\ + \\ENQ\EOT4\STX\NUL\SOH\DC2\EOT\236\b#3\n\ + \\r\n\ + \\ENQ\EOT4\STX\NUL\ETX\DC2\EOT\236\b67\n\ + \ \n\ + \\STX\EOT5\DC2\ACK\240\b\NUL\251\b\SOH\SUB\DC2 Login member id.\n\ + \\n\ + \\v\n\ + \\ETX\EOT5\SOH\DC2\EOT\240\b\b\GS\n\ + \,\n\ + \\EOT\EOT5\STX\NUL\DC2\EOT\243\b\EOT!\SUB\RS [required] Login identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT5\STX\NUL\EOT\DC2\EOT\243\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT5\STX\NUL\ENQ\DC2\EOT\243\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT5\STX\NUL\SOH\DC2\EOT\243\b\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT5\STX\NUL\ETX\DC2\EOT\243\b\US \n\ + \\128\SOH\n\ + \\EOT\EOT5\STX\SOH\DC2\EOT\247\b\EOT$\SUBr [required] Exchange identifier.\n\ + \ LookupPropertyListRequest { property_type = CommonLookupPropertyType.EXCHANGE }\n\ + \\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\EOT\DC2\EOT\247\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\ENQ\DC2\EOT\247\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\SOH\DC2\EOT\247\b\DC4\US\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\ETX\DC2\EOT\247\b\"#\n\ + \6\n\ + \\EOT\EOT5\STX\STX\DC2\EOT\250\b\EOT\"\SUB( [required] Exchange member identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT5\STX\STX\EOT\DC2\EOT\250\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT5\STX\STX\ENQ\DC2\EOT\250\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT5\STX\STX\SOH\DC2\EOT\250\b\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT5\STX\STX\ETX\DC2\EOT\250\b !\n\ + \5\n\ + \\STX\EOT6\DC2\ACK\254\b\NUL\137\t\SOH\SUB' Update login exchange member id list.\n\ + \\n\ + \\v\n\ + \\ETX\EOT6\SOH\DC2\EOT\254\b\b'\n\ + \9\n\ + \\EOT\EOT6\STX\NUL\DC2\EOT\129\t\EOT!\SUB+ [required] Login id to update member ids.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT6\STX\NUL\EOT\DC2\EOT\129\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT6\STX\NUL\ENQ\DC2\EOT\129\t\r\DC3\n\ + \\r\n\ + \\ENQ\EOT6\STX\NUL\SOH\DC2\EOT\129\t\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT6\STX\NUL\ETX\DC2\EOT\129\t\US \n\ + \,\n\ + \\EOT\EOT6\STX\SOH\DC2\EOT\132\t\EOT9\SUB\RS Member ids to add or change.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\EOT\DC2\EOT\132\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\ACK\DC2\EOT\132\t\r\"\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\SOH\DC2\EOT\132\t#4\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\ETX\DC2\EOT\132\t78\n\ + \o\n\ + \\EOT\EOT6\STX\STX\DC2\EOT\136\t\EOT5\SUBa Member ids to remove from login.\n\ + \ First - login id [required], second - exchange id [required].\n\ + \\n\ + \\r\n\ + \\ENQ\EOT6\STX\STX\EOT\DC2\EOT\136\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT6\STX\STX\ACK\DC2\EOT\136\t\r\ESC\n\ + \\r\n\ + \\ENQ\EOT6\STX\STX\SOH\DC2\EOT\136\t\FS0\n\ + \\r\n\ + \\ENQ\EOT6\STX\STX\ETX\DC2\EOT\136\t34\n\ + \u\n\ + \\STX\EOT7\DC2\ACK\140\t\NUL\143\t\SOH\SUB, Result of UpdateLoginExchangeMemberIdList.\n\ + \\"9 If message is received then operation was successfully.\n\ + \\n\ + \\v\n\ + \\ETX\EOT7\SOH\DC2\EOT\140\t\b-\n\ + \)\n\ + \\STX\EOT8\DC2\ACK\146\t\NUL\150\t\SOH\SUB\ESC Activate login operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT8\SOH\DC2\EOT\146\t\b\NAK\n\ + \8\n\ + \\EOT\EOT8\STX\NUL\DC2\EOT\149\t\EOT!\SUB* [required] Login identifier to activate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT8\STX\NUL\EOT\DC2\EOT\149\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT8\STX\NUL\ENQ\DC2\EOT\149\t\r\DC3\n\ + \\r\n\ + \\ENQ\EOT8\STX\NUL\SOH\DC2\EOT\149\t\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT8\STX\NUL\ETX\DC2\EOT\149\t\US \n\ + \+\n\ + \\STX\EOT9\DC2\ACK\153\t\NUL\164\t\SOH\SUB\GS Deactivate login operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT9\SOH\DC2\EOT\153\t\b\ETB\n\ + \:\n\ + \\EOT\EOT9\STX\NUL\DC2\EOT\156\t\EOT!\SUB, [required] Login identifier to deactivate.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT9\STX\NUL\EOT\DC2\EOT\156\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT9\STX\NUL\ENQ\DC2\EOT\156\t\r\DC3\n\ + \\r\n\ + \\ENQ\EOT9\STX\NUL\SOH\DC2\EOT\156\t\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT9\STX\NUL\ETX\DC2\EOT\156\t\US \n\ + \=\n\ + \\EOT\EOT9\STX\SOH\DC2\EOT\159\t\EOT(\SUB/ Date and time when login will be deactivated.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT9\STX\SOH\EOT\DC2\EOT\159\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT9\STX\SOH\ENQ\DC2\EOT\159\t\r\DC3\n\ + \\r\n\ + \\ENQ\EOT9\STX\SOH\SOH\DC2\EOT\159\t\DC4#\n\ + \\r\n\ + \\ENQ\EOT9\STX\SOH\ETX\DC2\EOT\159\t&'\n\ + \\140\SOH\n\ + \\EOT\EOT9\STX\STX\DC2\EOT\163\t\EOTE\SUB~ Flag to show that event subscription must be removed.\n\ + \ Could be set only on immediate deactivation (absent expiration_time).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT9\STX\STX\EOT\DC2\EOT\163\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT9\STX\STX\ENQ\DC2\EOT\163\t\r\DC1\n\ + \\r\n\ + \\ENQ\EOT9\STX\STX\SOH\DC2\EOT\163\t\DC2.\n\ + \\r\n\ + \\ENQ\EOT9\STX\STX\ETX\DC2\EOT\163\t12\n\ + \\r\n\ + \\ENQ\EOT9\STX\STX\b\DC2\EOT\163\t3D\n\ + \\r\n\ + \\ENQ\EOT9\STX\STX\a\DC2\EOT\163\t>C\n\ + \'\n\ + \\STX\EOT:\DC2\ACK\167\t\NUL\169\t\SOH\SUB\EM Result of ActivateLogin\n\ + \\n\ + \\v\n\ + \\ETX\EOT:\SOH\DC2\EOT\167\t\b\ESC\n\ + \)\n\ + \\STX\EOT;\DC2\ACK\172\t\NUL\174\t\SOH\SUB\ESC Result of DeactivateLogin\n\ + \\n\ + \\v\n\ + \\ETX\EOT;\SOH\DC2\EOT\172\t\b\GS\n\ + \>\n\ + \\STX\EOT<\DC2\ACK\177\t\NUL\185\t\SOH\SUB0 Erases current credentials of specified types.\n\ + \\n\ + \\v\n\ + \\ETX\EOT<\SOH\DC2\EOT\177\t\b\US\n\ + \,\n\ + \\EOT\EOT<\STX\NUL\DC2\EOT\180\t\EOT!\SUB\RS [required] Login identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT<\STX\NUL\EOT\DC2\EOT\180\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT<\STX\NUL\ENQ\DC2\EOT\180\t\r\DC3\n\ + \\r\n\ + \\ENQ\EOT<\STX\NUL\SOH\DC2\EOT\180\t\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT<\STX\NUL\ETX\DC2\EOT\180\t\US \n\ + \j\n\ + \\EOT\EOT<\STX\SOH\DC2\EOT\184\t\EOT)\SUB\\ List of credentials to erase.\n\ + \ This filed is associated with common_1.CredentialType enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT<\STX\SOH\EOT\DC2\EOT\184\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT<\STX\SOH\ENQ\DC2\EOT\184\t\r\DC3\n\ + \\r\n\ + \\ENQ\EOT<\STX\SOH\SOH\DC2\EOT\184\t\DC4$\n\ + \\r\n\ + \\ENQ\EOT<\STX\SOH\ETX\DC2\EOT\184\t'(\n\ + \1\n\ + \\STX\EOT=\DC2\ACK\188\t\NUL\190\t\SOH\SUB# Result of EraseCurrentCredentials\n\ + \\n\ + \\v\n\ + \\ETX\EOT=\SOH\DC2\EOT\188\t\b%\n\ + \=\n\ + \\STX\EOT>\DC2\ACK\193\t\NUL\221\t\SOH\SUB/ Represents search option for search requests.\n\ + \\n\ + \\v\n\ + \\ETX\EOT>\SOH\DC2\EOT\193\t\b\DC4\n\ + \\SO\n\ + \\EOT\EOT>\EOT\NUL\DC2\ACK\195\t\EOT\206\t\ENQ\n\ + \\r\n\ + \\ENQ\EOT>\EOT\NUL\SOH\DC2\EOT\195\t\t\NAK\n\ + \\SO\n\ + \\ACK\EOT>\EOT\NUL\STX\NUL\DC2\EOT\197\t\b\NAK\n\ + \\SI\n\ + \\a\EOT>\EOT\NUL\STX\NUL\SOH\DC2\EOT\197\t\b\DLE\n\ + \\SI\n\ + \\a\EOT>\EOT\NUL\STX\NUL\STX\DC2\EOT\197\t\DC3\DC4\n\ + \\SO\n\ + \\ACK\EOT>\EOT\NUL\STX\SOH\DC2\EOT\198\t\b\CAN\n\ + \\SI\n\ + \\a\EOT>\EOT\NUL\STX\SOH\SOH\DC2\EOT\198\t\b\DC3\n\ + \\SI\n\ + \\a\EOT>\EOT\NUL\STX\SOH\STX\DC2\EOT\198\t\SYN\ETB\n\ + \\SO\n\ + \\ACK\EOT>\EOT\NUL\STX\STX\DC2\EOT\199\t\b\SYN\n\ + \\SI\n\ + \\a\EOT>\EOT\NUL\STX\STX\SOH\DC2\EOT\199\t\b\DC1\n\ + \\SI\n\ + \\a\EOT>\EOT\NUL\STX\STX\STX\DC2\EOT\199\t\DC4\NAK\n\ + \\SO\n\ + \\ACK\EOT>\EOT\NUL\STX\ETX\DC2\EOT\200\t\b\ESC\n\ + \\SI\n\ + \\a\EOT>\EOT\NUL\STX\ETX\SOH\DC2\EOT\200\t\b\SYN\n\ + \\SI\n\ + \\a\EOT>\EOT\NUL\STX\ETX\STX\DC2\EOT\200\t\EM\SUB\n\ + \\202\SOH\n\ + \\ACK\EOT>\EOT\NUL\STX\EOT\DC2\EOT\205\t\b\GS\SUB\185\SOH Only criteria marked as supported for this rule can be used with.\n\ + \ Format: value1,value2. Where each value matches by EXACT_EQUALITY.\n\ + \ Searches records that match any of these values.\n\ + \\n\ + \\SI\n\ + \\a\EOT>\EOT\NUL\STX\EOT\SOH\DC2\EOT\205\t\b\CAN\n\ + \\SI\n\ + \\a\EOT>\EOT\NUL\STX\EOT\STX\DC2\EOT\205\t\ESC\FS\n\ + \E\n\ + \\EOT\EOT>\STX\NUL\DC2\EOT\210\t\EOT\GS\SUB7 [required] Text to search.\n\ + \ Empty text is prohibited.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT>\STX\NUL\EOT\DC2\EOT\210\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT>\STX\NUL\ENQ\DC2\EOT\210\t\r\DC3\n\ + \\r\n\ + \\ENQ\EOT>\STX\NUL\SOH\DC2\EOT\210\t\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOT>\STX\NUL\ETX\DC2\EOT\210\t\ESC\FS\n\ + \\147\STX\n\ + \\EOT\EOT>\STX\SOH\DC2\EOT\216\t\EOT!\SUB\132\STX Search criteria.\n\ + \ For each type of search request corresponding enum values should be used.\n\ + \ Empty means search by any possible criterion.\n\ + \ Regardless 'all match mode' set on search request level, criteria given here match between each other with 'any' mode.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT>\STX\SOH\EOT\DC2\EOT\216\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT>\STX\SOH\ENQ\DC2\EOT\216\t\r\DC3\n\ + \\r\n\ + \\ENQ\EOT>\STX\SOH\SOH\DC2\EOT\216\t\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT>\STX\SOH\ETX\DC2\EOT\216\t\US \n\ + \\190\SOH\n\ + \\EOT\EOT>\STX\STX\DC2\EOT\220\t\EOT&\SUB\175\SOH Comparing matching rule. Associated with MatchingRule enum.\n\ + \ By default all matching rules are used in the following order: EXACT_EQUALITY, STARTS_WITH, ENDS_WITH, CONTAINS.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT>\STX\STX\EOT\DC2\EOT\220\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT>\STX\STX\ENQ\DC2\EOT\220\t\r\DC3\n\ + \\r\n\ + \\ENQ\EOT>\STX\STX\SOH\DC2\EOT\220\t\DC4!\n\ + \\r\n\ + \\ENQ\EOT>\STX\STX\ETX\DC2\EOT\220\t$%\n\ + \e\n\ + \\STX\ENQ\NUL\DC2\ACK\228\t\NUL\247\t\SOH\SUB\CAN Operation result enum.\n\ + \2=//------------------------------------------\n\ + \// Enumerations\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\NUL\SOH\DC2\EOT\228\t\ENQ\DC4\n\ + \\"\n\ + \\EOT\ENQ\NUL\STX\NUL\DC2\EOT\231\t\EOT\DLE\SUB\DC4 Successful result.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\NUL\SOH\DC2\EOT\231\t\EOT\v\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\NUL\STX\DC2\EOT\231\t\SO\SI\n\ + \\RS\n\ + \\EOT\ENQ\NUL\STX\SOH\DC2\EOT\234\t\EOT\DLE\SUB\DLE Failed result.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\SOH\SOH\DC2\EOT\234\t\EOT\v\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\SOH\STX\DC2\EOT\234\t\SO\SI\n\ + \P\n\ + \\EOT\ENQ\NUL\STX\STX\DC2\EOT\237\t\EOT\DC1\SUBB Request accepted by CMS API and will be scheduled for processing\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\STX\SOH\DC2\EOT\237\t\EOT\f\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\STX\STX\DC2\EOT\237\t\SI\DLE\n\ + \<\n\ + \\EOT\ENQ\NUL\STX\ETX\DC2\EOT\240\t\EOT\SI\SUB. Request was defered in CMS API Waiting Queue\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\ETX\SOH\DC2\EOT\240\t\EOT\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\ETX\STX\DC2\EOT\240\t\r\SO\n\ + \5\n\ + \\EOT\ENQ\NUL\STX\EOT\DC2\EOT\243\t\EOT\SYN\SUB' Request processing started by CMS API\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\EOT\SOH\DC2\EOT\243\t\EOT\DC1\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\EOT\STX\DC2\EOT\243\t\DC4\NAK\n\ + \8\n\ + \\EOT\ENQ\NUL\STX\ENQ\DC2\EOT\246\t\EOT\DC1\SUB* Request was cancelled from Waiting Queue\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\ENQ\SOH\DC2\EOT\246\t\EOT\f\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\ENQ\STX\DC2\EOT\246\t\SI\DLE\n\ + \/\n\ + \\STX\ENQ\SOH\DC2\ACK\250\t\NUL\132\n\ + \\SOH\SUB! Domain of the login information\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\SOH\SOH\DC2\EOT\250\t\ENQ\DLE\n\ + \)\n\ + \\EOT\ENQ\SOH\STX\NUL\DC2\EOT\253\t\EOT\SUB\SUB\ESC CQG Gateway login domain.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\NUL\SOH\DC2\EOT\253\t\EOT\NAK\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\NUL\STX\DC2\EOT\253\t\CAN\EM\n\ + \<\n\ + \\EOT\ENQ\SOH\STX\SOH\DC2\EOT\128\n\ + \\EOT\DC3\SUB. CQG System (IC, QTrader, etc.) login domain.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\SOH\SOH\DC2\EOT\128\n\ + \\EOT\SO\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\SOH\STX\DC2\EOT\128\n\ + \\DC1\DC2\n\ + \:\n\ + \\EOT\ENQ\SOH\STX\STX\DC2\EOT\131\n\ + \\EOT\DC2\SUB, CQG Admin (CMS, CAST, CAST2) login domain.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\STX\SOH\DC2\EOT\131\n\ + \\EOT\r\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\STX\STX\DC2\EOT\131\n\ + \\DLE\DC1\n\ + \2\n\ + \\STX\ENQ\STX\DC2\ACK\135\n\ + \\NUL\150\n\ + \\SOH\SUB$ Types of common lookup properties.\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\STX\SOH\DC2\EOT\135\n\ + \\ENQ\GS\n\ + \\f\n\ + \\EOT\ENQ\STX\STX\NUL\DC2\EOT\137\n\ + \\EOT \n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\NUL\SOH\DC2\EOT\137\n\ + \\EOT\EM\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\NUL\STX\DC2\EOT\137\n\ + \\FS\US\n\ + \\f\n\ + \\EOT\ENQ\STX\STX\SOH\DC2\EOT\139\n\ + \\EOT\ESC\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\SOH\SOH\DC2\EOT\139\n\ + \\EOT\DC4\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\SOH\STX\DC2\EOT\139\n\ + \\ETB\SUB\n\ + \\f\n\ + \\EOT\ENQ\STX\STX\STX\DC2\EOT\141\n\ + \\EOT\DC3\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\STX\SOH\DC2\EOT\141\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\STX\STX\DC2\EOT\141\n\ + \\SI\DC2\n\ + \\f\n\ + \\EOT\ENQ\STX\STX\ETX\DC2\EOT\143\n\ + \\EOT\DC2\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\ETX\SOH\DC2\EOT\143\n\ + \\EOT\v\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\ETX\STX\DC2\EOT\143\n\ + \\SO\DC1\n\ + \\f\n\ + \\EOT\ENQ\STX\STX\EOT\DC2\EOT\145\n\ + \\EOT\DC1\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\EOT\SOH\DC2\EOT\145\n\ + \\EOT\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\EOT\STX\DC2\EOT\145\n\ + \\r\DLE\n\ + \\f\n\ + \\EOT\ENQ\STX\STX\ENQ\DC2\EOT\147\n\ + \\EOT\EM\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\ENQ\SOH\DC2\EOT\147\n\ + \\EOT\DC2\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\ENQ\STX\DC2\EOT\147\n\ + \\NAK\CAN\n\ + \\f\n\ + \\EOT\ENQ\STX\STX\ACK\DC2\EOT\149\n\ + \\EOT \n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\ACK\SOH\DC2\EOT\149\n\ + \\EOT\EM\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\ACK\STX\DC2\EOT\149\n\ + \\FS\US\n\ + \F\n\ + \\STX\ENQ\ETX\DC2\ACK\153\n\ + \\NUL\181\n\ + \\SOH\SUB8 List of allowed AuthServer special service operations.\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\ETX\SOH\DC2\EOT\153\n\ + \\ENQ\US\n\ + \\208\STX\n\ + \\EOT\ENQ\ETX\STX\NUL\DC2\EOT\162\n\ + \\EOT\ETB\SUB\193\STX Complete regular logon that was previously failed due to required operations\n\ + \ exist for logon. This operation is enabled only for SSTs returned by AuthServer\n\ + \ in LogonResult when logon fails with one of following codes:\n\ + \ - PASSWORD_EXPIRED;\n\ + \ - UNSIGNED_AGREEMENT;\n\ + \ - OPERATIONS_REQUIRED;\n\ + \ - SECOND_FACTOR_INIT_REQUIRED.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\NUL\SOH\DC2\EOT\162\n\ + \\EOT\DC2\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\NUL\STX\DC2\EOT\162\n\ + \\NAK\SYN\n\ + \J\n\ + \\EOT\ENQ\ETX\STX\SOH\DC2\EOT\165\n\ + \\EOT\NAK\SUB< Set static password without providing old static password.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\SOH\SOH\DC2\EOT\165\n\ + \\EOT\DLE\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\SOH\STX\DC2\EOT\165\n\ + \\DC3\DC4\n\ + \H\n\ + \\EOT\ENQ\ETX\STX\STX\DC2\EOT\168\n\ + \\EOT\FS\SUB: Setup new second factor regardless if it is set already.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\STX\SOH\DC2\EOT\168\n\ + \\EOT\ETB\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\STX\STX\DC2\EOT\168\n\ + \\SUB\ESC\n\ + \/\n\ + \\EOT\ENQ\ETX\STX\ETX\DC2\EOT\171\n\ + \\EOT \SUB! Change expired static password.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\ETX\SOH\DC2\EOT\171\n\ + \\EOT\ESC\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\ETX\STX\DC2\EOT\171\n\ + \\RS\US\n\ + \\"\n\ + \\EOT\ENQ\ETX\STX\EOT\DC2\EOT\174\n\ + \\EOT\ETB\SUB\DC4 Sign agreement(s).\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\EOT\SOH\DC2\EOT\174\n\ + \\EOT\DC2\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\EOT\STX\DC2\EOT\174\n\ + \\NAK\SYN\n\ + \+\n\ + \\EOT\ENQ\ETX\STX\ENQ\DC2\EOT\177\n\ + \\EOT\NAK\SUB\GS Verify user's phone number.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\ENQ\SOH\DC2\EOT\177\n\ + \\EOT\DLE\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\ENQ\STX\DC2\EOT\177\n\ + \\DC3\DC4\n\ + \+\n\ + \\EOT\ENQ\ETX\STX\ACK\DC2\EOT\180\n\ + \\EOT\ESC\SUB\GS Pass certification request.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\ACK\SOH\DC2\EOT\180\n\ + \\EOT\SYN\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\ACK\STX\DC2\EOT\180\n\ + \\EM\SUB\n\ + \)\n\ + \\STX\ENQ\EOT\DC2\ACK\184\n\ + \\NUL\188\n\ + \\SOH\SUB\ESC List of credential types.\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\EOT\SOH\DC2\EOT\184\n\ + \\ENQ\DC3\n\ + \\f\n\ + \\EOT\ENQ\EOT\STX\NUL\DC2\EOT\186\n\ + \\EOT\CAN\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\NUL\SOH\DC2\EOT\186\n\ + \\EOT\DC3\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\NUL\STX\DC2\EOT\186\n\ + \\SYN\ETB\n\ + \\f\n\ + \\EOT\ENQ\EOT\STX\SOH\DC2\EOT\187\n\ + \\EOT\SYN\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\SOH\SOH\DC2\EOT\187\n\ + \\EOT\DC1\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\SOH\STX\DC2\EOT\187\n\ + \\DC4\NAK\n\ + \*\n\ + \\STX\ENQ\ENQ\DC2\ACK\191\n\ + \\NUL\198\n\ + \\SOH\SUB\FS List of possible entities.\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\ENQ\SOH\DC2\EOT\191\n\ + \\ENQ\SI\n\ + \\f\n\ + \\EOT\ENQ\ENQ\STX\NUL\DC2\EOT\193\n\ + \\EOT\FS\n\ + \\r\n\ + \\ENQ\ENQ\ENQ\STX\NUL\SOH\DC2\EOT\193\n\ + \\EOT\ETB\n\ + \\r\n\ + \\ENQ\ENQ\ENQ\STX\NUL\STX\DC2\EOT\193\n\ + \\SUB\ESC\n\ + \\f\n\ + \\EOT\ENQ\ENQ\STX\SOH\DC2\EOT\194\n\ + \\EOT\SUB\n\ + \\r\n\ + \\ENQ\ENQ\ENQ\STX\SOH\SOH\DC2\EOT\194\n\ + \\EOT\NAK\n\ + \\r\n\ + \\ENQ\ENQ\ENQ\STX\SOH\STX\DC2\EOT\194\n\ + \\CAN\EM\n\ + \\f\n\ + \\EOT\ENQ\ENQ\STX\STX\DC2\EOT\195\n\ + \\EOT\SUB\n\ + \\r\n\ + \\ENQ\ENQ\ENQ\STX\STX\SOH\DC2\EOT\195\n\ + \\EOT\NAK\n\ + \\r\n\ + \\ENQ\ENQ\ENQ\STX\STX\STX\DC2\EOT\195\n\ + \\CAN\EM\n\ + \\f\n\ + \\EOT\ENQ\ENQ\STX\ETX\DC2\EOT\196\n\ + \\EOT\FS\n\ + \\r\n\ + \\ENQ\ENQ\ENQ\STX\ETX\SOH\DC2\EOT\196\n\ + \\EOT\ETB\n\ + \\r\n\ + \\ENQ\ENQ\ENQ\STX\ETX\STX\DC2\EOT\196\n\ + \\SUB\ESC\n\ + \\f\n\ + \\EOT\ENQ\ENQ\STX\EOT\DC2\EOT\197\n\ + \\EOT#\n\ + \\r\n\ + \\ENQ\ENQ\ENQ\STX\EOT\SOH\DC2\EOT\197\n\ + \\EOT\RS\n\ + \\r\n\ + \\ENQ\ENQ\ENQ\STX\EOT\STX\DC2\EOT\197\n\ + \!\"\n\ + \\f\n\ + \\STX\ENQ\ACK\DC2\ACK\200\n\ + \\NUL\246\n\ + \\SOH\n\ + \\v\n\ + \\ETX\ENQ\ACK\SOH\DC2\EOT\200\n\ + \\ENQ\DC4\n\ + \A\n\ + \\EOT\ENQ\ACK\STX\NUL\DC2\EOT\204\n\ + \\EOT\SYN\SUB3// success codes\n\ + \ User is logged in to the system.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\NUL\SOH\DC2\EOT\204\n\ + \\EOT\DC1\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\NUL\STX\DC2\EOT\204\n\ + \\DC4\NAK\n\ + \8\n\ + \\EOT\ENQ\ACK\STX\SOH\DC2\EOT\208\n\ + \\EOT\CAN\SUB*// failure codes (100+)\n\ + \ General failure.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\SOH\SOH\DC2\EOT\208\n\ + \\EOT\DC1\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\SOH\STX\DC2\EOT\208\n\ + \\DC4\ETB\n\ + \v\n\ + \\EOT\ENQ\ACK\STX\STX\DC2\EOT\212\n\ + \\EOT\RS\SUBh One-time password is required for this user but it was not sent, repeat logon\n\ + \ with one-time password.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\STX\SOH\DC2\EOT\212\n\ + \\EOT\ETB\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\STX\STX\DC2\EOT\212\n\ + \\SUB\GS\n\ + \T\n\ + \\EOT\ENQ\ACK\STX\ETX\DC2\EOT\215\n\ + \\EOT\ESC\SUBF User password is expired, only change password operation is allowed.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\ETX\SOH\DC2\EOT\215\n\ + \\EOT\DC4\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\ETX\STX\DC2\EOT\215\n\ + \\ETB\SUB\n\ + \\144\SOH\n\ + \\EOT\ENQ\ACK\STX\EOT\DC2\EOT\218\n\ + \\EOT\CAN\SUB\129\SOH The negotiation rules for LogonRoutineClient have been violated, e.g. user has specified several fields at once in one message.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\EOT\SOH\DC2\EOT\218\n\ + \\EOT\DC1\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\EOT\STX\DC2\EOT\218\n\ + \\DC4\ETB\n\ + \;\n\ + \\EOT\ENQ\ACK\STX\ENQ\DC2\EOT\221\n\ + \\EOT\ESC\SUB- Some fields in LogonInit have wrong values.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\ENQ\SOH\DC2\EOT\221\n\ + \\EOT\DC4\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\ENQ\STX\DC2\EOT\221\n\ + \\ETB\SUB\n\ + \7\n\ + \\EOT\ENQ\ACK\STX\ACK\DC2\EOT\224\n\ + \\EOT\FS\SUB) User has been locked out by the system.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\ACK\SOH\DC2\EOT\224\n\ + \\EOT\NAK\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\ACK\STX\DC2\EOT\224\n\ + \\CAN\ESC\n\ + \3\n\ + \\EOT\ENQ\ACK\STX\a\DC2\EOT\227\n\ + \\EOT\RS\SUB% User has been locked out by admins.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\a\SOH\DC2\EOT\227\n\ + \\EOT\ETB\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\a\STX\DC2\EOT\227\n\ + \\SUB\GS\n\ + \\DEL\n\ + \\EOT\ENQ\ACK\STX\b\DC2\EOT\230\n\ + \\EOT&\SUBq Second factor authentication is required from this user, but it is not initialised, initialize and repeat logon\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\b\SOH\DC2\EOT\230\n\ + \\EOT\US\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\b\STX\DC2\EOT\230\n\ + \\"%\n\ + \d\n\ + \\EOT\ENQ\ACK\STX\t\DC2\EOT\233\n\ + \\EOT\RS\SUBV Client application version isn't supported, the client application must be upgraded.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\t\SOH\DC2\EOT\233\n\ + \\EOT\ETB\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\t\STX\DC2\EOT\233\n\ + \\SUB\GS\n\ + \J\n\ + \\EOT\ENQ\ACK\STX\n\ + \\DC2\EOT\236\n\ + \\EOT\GS\SUB< There is unsigned/rejected agreement(s) that denies logon.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\n\ + \\SOH\DC2\EOT\236\n\ + \\EOT\SYN\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\n\ + \\STX\DC2\EOT\236\n\ + \\EM\FS\n\ + \7\n\ + \\EOT\ENQ\ACK\STX\v\DC2\EOT\239\n\ + \\EOT\SUB\SUB) User exceeded allowed number of logons.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\v\SOH\DC2\EOT\239\n\ + \\EOT\DC3\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\v\STX\DC2\EOT\239\n\ + \\SYN\EM\n\ + \@\n\ + \\EOT\ENQ\ACK\STX\f\DC2\EOT\242\n\ + \\EOT&\SUB2 Verification of user's phone number is required.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\f\SOH\DC2\EOT\242\n\ + \\EOT\US\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\f\STX\DC2\EOT\242\n\ + \\"%\n\ + \1\n\ + \\EOT\ENQ\ACK\STX\r\DC2\EOT\245\n\ + \\EOT\CAN\SUB# No resources granted to the user.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\r\SOH\DC2\EOT\245\n\ + \\EOT\DC1\n\ + \\r\n\ + \\ENQ\ENQ\ACK\STX\r\STX\DC2\EOT\245\n\ + \\DC4\ETB\n\ + \-\n\ + \\STX\ENQ\a\DC2\ACK\249\n\ + \\NUL\255\n\ + \\SOH\SUB\US Represents admin login scope.\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\a\SOH\DC2\EOT\249\n\ + \\ENQ\DC4\n\ + \\f\n\ + \\EOT\ENQ\a\STX\NUL\DC2\EOT\251\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\ENQ\a\STX\NUL\SOH\DC2\EOT\251\n\ + \\EOT\a\n\ + \\r\n\ + \\ENQ\ENQ\a\STX\NUL\STX\DC2\EOT\251\n\ + \\n\ + \\v\n\ + \\f\n\ + \\EOT\ENQ\a\STX\SOH\DC2\EOT\252\n\ + \\EOT\DC2\n\ + \\r\n\ + \\ENQ\ENQ\a\STX\SOH\SOH\DC2\EOT\252\n\ + \\EOT\r\n\ + \\r\n\ + \\ENQ\ENQ\a\STX\SOH\STX\DC2\EOT\252\n\ + \\DLE\DC1\n\ + \\f\n\ + \\EOT\ENQ\a\STX\STX\DC2\EOT\253\n\ + \\EOT\DC2\n\ + \\r\n\ + \\ENQ\ENQ\a\STX\STX\SOH\DC2\EOT\253\n\ + \\EOT\r\n\ + \\r\n\ + \\ENQ\ENQ\a\STX\STX\STX\DC2\EOT\253\n\ + \\DLE\DC1\n\ + \\f\n\ + \\EOT\ENQ\a\STX\ETX\DC2\EOT\254\n\ + \\EOT\SI\n\ + \\r\n\ + \\ENQ\ENQ\a\STX\ETX\SOH\DC2\EOT\254\n\ + \\EOT\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\a\STX\ETX\STX\DC2\EOT\254\n\ + \\r\SO\n\ + \9\n\ + \\STX\EOT?\DC2\ACK\130\v\NUL\137\v\SOH\SUB+ Represents common message of id and name.\n\ + \\n\ + \\v\n\ + \\ETX\EOT?\SOH\DC2\EOT\130\v\b\DC3\n\ + \\ESC\n\ + \\EOT\EOT?\STX\NUL\DC2\EOT\133\v\EOT\ESC\SUB\r Identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\EOT\DC2\EOT\133\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\ENQ\DC2\EOT\133\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\SOH\DC2\EOT\133\v\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\ETX\DC2\EOT\133\v\EM\SUB\n\ + \\NAK\n\ + \\EOT\EOT?\STX\SOH\DC2\EOT\136\v\EOT$\SUB\a Name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT?\STX\SOH\EOT\DC2\EOT\136\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOT?\STX\SOH\ACK\DC2\EOT\136\v\r\SUB\n\ + \\r\n\ + \\ENQ\EOT?\STX\SOH\SOH\DC2\EOT\136\v\ESC\US\n\ + \\r\n\ + \\ENQ\EOT?\STX\SOH\ETX\DC2\EOT\136\v\"#\n\ + \W\n\ + \\STX\EOT@\DC2\ACK\140\v\NUL\147\v\SOH\SUBI Represents template message for adding/removing links between entities.\n\ + \\n\ + \\v\n\ + \\ETX\EOT@\SOH\DC2\EOT\140\v\b\EM\n\ + \G\n\ + \\EOT\EOT@\STX\NUL\DC2\EOT\143\v\EOT$\SUB9 Links to add. Tuple.First, Tuple.Second are [required].\n\ + \\n\ + \\r\n\ + \\ENQ\EOT@\STX\NUL\EOT\DC2\EOT\143\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOT@\STX\NUL\ACK\DC2\EOT\143\v\r\DC2\n\ + \\r\n\ + \\ENQ\EOT@\STX\NUL\SOH\DC2\EOT\143\v\DC3\US\n\ + \\r\n\ + \\ENQ\EOT@\STX\NUL\ETX\DC2\EOT\143\v\"#\n\ + \J\n\ + \\EOT\EOT@\STX\SOH\DC2\EOT\146\v\EOT'\SUB< Links to remove. Tuple.First, Tuple.Second are [required].\n\ + \\n\ + \\r\n\ + \\ENQ\EOT@\STX\SOH\EOT\DC2\EOT\146\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOT@\STX\SOH\ACK\DC2\EOT\146\v\r\DC2\n\ + \\r\n\ + \\ENQ\EOT@\STX\SOH\SOH\DC2\EOT\146\v\DC3\"\n\ + \\r\n\ + \\ENQ\EOT@\STX\SOH\ETX\DC2\EOT\146\v%&\n\ + \w\n\ + \\STX\EOTA\DC2\ACK\150\v\NUL\153\v\SOH\SUB* Result of update entity links operation.\n\ + \\"= If message is received then links was updated successfully.\n\ + \\n\ + \\v\n\ + \\ETX\EOTA\SOH\DC2\EOT\150\v\b\US\n\ + \\222\SOH\n\ + \\STX\EOTB\DC2\ACK\158\v\NUL\165\v\SOH\SUB\207\SOH Represents template message for requesting linked entities for some entity.\n\ + \ By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records.\n\ + \ Set parameter top to a larger number to receive more.\n\ + \\n\ + \\v\n\ + \\ETX\EOTB\SOH\DC2\EOT\158\v\b\US\n\ + \\"\n\ + \\EOT\EOTB\STX\NUL\DC2\EOT\161\v\EOT\ESC\SUB\DC4 Entity identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTB\STX\NUL\EOT\DC2\EOT\161\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTB\STX\NUL\ENQ\DC2\EOT\161\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTB\STX\NUL\SOH\DC2\EOT\161\v\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOTB\STX\NUL\ETX\DC2\EOT\161\v\EM\SUB\n\ + \Q\n\ + \\EOT\EOTB\STX\SOH\DC2\EOT\164\v\EOT\FS\SUBC optionally restrict results by returning the first 'top' records.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTB\STX\SOH\EOT\DC2\EOT\164\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTB\STX\SOH\ENQ\DC2\EOT\164\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTB\STX\SOH\SOH\DC2\EOT\164\v\DC4\ETB\n\ + \\r\n\ + \\ENQ\EOTB\STX\SOH\ETX\DC2\EOT\164\v\SUB\ESC\n\ + \<\n\ + \\STX\EOTC\DC2\ACK\168\v\NUL\175\v\SOH\SUB. Result of linked entities request operation.\n\ + \\n\ + \\v\n\ + \\ETX\EOTC\SOH\DC2\EOT\168\v\b\RS\n\ + \\f\n\ + \\EOT\EOTC\STX\NUL\DC2\EOT\170\v\EOT&\n\ + \\r\n\ + \\ENQ\EOTC\STX\NUL\EOT\DC2\EOT\170\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTC\STX\NUL\ACK\DC2\EOT\170\v\r\CAN\n\ + \\r\n\ + \\ENQ\EOTC\STX\NUL\SOH\DC2\EOT\170\v\EM!\n\ + \\r\n\ + \\ENQ\EOTC\STX\NUL\ETX\DC2\EOT\170\v$%\n\ + \r\n\ + \\EOT\EOTC\STX\SOH\DC2\EOT\174\v\EOT3\SUBd This flag is set to true if all results are sent\n\ + \ and nothing was filtered out by 'top' parameter.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTC\STX\SOH\EOT\DC2\EOT\174\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTC\STX\SOH\ENQ\DC2\EOT\174\v\r\DC1\n\ + \\r\n\ + \\ENQ\EOTC\STX\SOH\SOH\DC2\EOT\174\v\DC2\GS\n\ + \\r\n\ + \\ENQ\EOTC\STX\SOH\ETX\DC2\EOT\174\v !\n\ + \\r\n\ + \\ENQ\EOTC\STX\SOH\b\DC2\EOT\174\v\"2\n\ + \\r\n\ + \\ENQ\EOTC\STX\SOH\a\DC2\EOT\174\v-1\n\ + \<\n\ + \\STX\EOTD\DC2\ACK\178\v\NUL\185\v\SOH\SUB. Common message for sales series list result.\n\ + \\n\ + \\v\n\ + \\ETX\EOTD\SOH\DC2\EOT\178\v\b\GS\n\ + \\f\n\ + \\EOT\EOTD\STX\NUL\DC2\EOT\180\v\EOT.\n\ + \\r\n\ + \\ENQ\EOTD\STX\NUL\EOT\DC2\EOT\180\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTD\STX\NUL\ACK\DC2\EOT\180\v\r\FS\n\ + \\r\n\ + \\ENQ\EOTD\STX\NUL\SOH\DC2\EOT\180\v\GS)\n\ + \\r\n\ + \\ENQ\EOTD\STX\NUL\ETX\DC2\EOT\180\v,-\n\ + \r\n\ + \\EOT\EOTD\STX\SOH\DC2\EOT\184\v\EOT3\SUBd This flag is set to true if all results are sent\n\ + \ and nothing was filtered out by 'top' parameter.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTD\STX\SOH\EOT\DC2\EOT\184\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTD\STX\SOH\ENQ\DC2\EOT\184\v\r\DC1\n\ + \\r\n\ + \\ENQ\EOTD\STX\SOH\SOH\DC2\EOT\184\v\DC2\GS\n\ + \\r\n\ + \\ENQ\EOTD\STX\SOH\ETX\DC2\EOT\184\v !\n\ + \\r\n\ + \\ENQ\EOTD\STX\SOH\b\DC2\EOT\184\v\"2\n\ + \\r\n\ + \\ENQ\EOTD\STX\SOH\a\DC2\EOT\184\v-1\n\ + \(\n\ + \\STX\EOTE\DC2\ACK\188\v\NUL\201\v\SOH\SUB\SUB Represents sales series.\n\ + \\n\ + \\v\n\ + \\ETX\EOTE\SOH\DC2\EOT\188\v\b\ETB\n\ + \ \n\ + \\EOT\EOTE\STX\NUL\DC2\EOT\191\v\EOT\ESC\SUB\DC2 Sales series ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTE\STX\NUL\EOT\DC2\EOT\191\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTE\STX\NUL\ENQ\DC2\EOT\191\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTE\STX\NUL\SOH\DC2\EOT\191\v\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOTE\STX\NUL\ETX\DC2\EOT\191\v\EM\SUB\n\ + \\"\n\ + \\EOT\EOTE\STX\SOH\DC2\EOT\194\v\EOT*\SUB\DC4 Sales series name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTE\STX\SOH\EOT\DC2\EOT\194\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTE\STX\SOH\ENQ\DC2\EOT\194\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTE\STX\SOH\SOH\DC2\EOT\194\v\DC4%\n\ + \\r\n\ + \\ENQ\EOTE\STX\SOH\ETX\DC2\EOT\194\v()\n\ + \$\n\ + \\EOT\EOTE\STX\STX\DC2\EOT\197\v\EOT,\SUB\SYN Sales series number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTE\STX\STX\EOT\DC2\EOT\197\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTE\STX\STX\ENQ\DC2\EOT\197\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTE\STX\STX\SOH\DC2\EOT\197\v\DC4'\n\ + \\r\n\ + \\ENQ\EOTE\STX\STX\ETX\DC2\EOT\197\v*+\n\ + \(\n\ + \\EOT\EOTE\STX\ETX\DC2\EOT\200\v\EOT#\SUB\SUB Sales series profile id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTE\STX\ETX\EOT\DC2\EOT\200\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTE\STX\ETX\ENQ\DC2\EOT\200\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTE\STX\ETX\SOH\DC2\EOT\200\v\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTE\STX\ETX\ETX\DC2\EOT\200\v!\"\n\ + \.\n\ + \\STX\ENQ\b\DC2\ACK\204\v\NUL\223\v\SOH\SUB Authentication activity types.\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\b\SOH\DC2\EOT\204\v\ENQ\NAK\n\ + \\SYN\n\ + \\EOT\ENQ\b\STX\NUL\DC2\EOT\207\v\EOT\SO\SUB\b Login.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\NUL\SOH\DC2\EOT\207\v\EOT\t\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\NUL\STX\DC2\EOT\207\v\f\r\n\ + \ \n\ + \\EOT\ENQ\b\STX\SOH\DC2\EOT\210\v\EOT\CAN\SUB\DC2 Password change.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\SOH\SOH\DC2\EOT\210\v\EOT\DC3\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\SOH\STX\DC2\EOT\210\v\SYN\ETB\n\ + \*\n\ + \\EOT\ENQ\b\STX\STX\DC2\EOT\213\v\EOT\SYN\SUB\FS Clear lockout (from CAST).\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\STX\SOH\DC2\EOT\213\v\EOT\DC1\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\STX\STX\DC2\EOT\213\v\DC4\NAK\n\ + \\SUB\n\ + \\EOT\ENQ\b\STX\ETX\DC2\EOT\216\v\EOT\DC3\SUB\f Change 2FA\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\ETX\SOH\DC2\EOT\216\v\EOT\SO\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\ETX\STX\DC2\EOT\216\v\DC1\DC2\n\ + \\EM\n\ + \\EOT\ENQ\b\STX\EOT\DC2\EOT\219\v\EOT\DC2\SUB\v Erase 2FA\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\EOT\SOH\DC2\EOT\219\v\EOT\r\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\EOT\STX\DC2\EOT\219\v\DLE\DC1\n\ + \\RS\n\ + \\EOT\ENQ\b\STX\ENQ\DC2\EOT\222\v\EOT\ETB\SUB\DLE Erase password\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\ENQ\SOH\DC2\EOT\222\v\EOT\DC2\n\ + \\r\n\ + \\ENQ\ENQ\b\STX\ENQ\STX\DC2\EOT\222\v\NAK\SYN\n\ + \6\n\ + \\STX\EOTF\DC2\ACK\226\v\NUL\234\v\SOH\SUB( Parameters of external authentication.\n\ + \\n\ + \\v\n\ + \\ETX\EOTF\SOH\DC2\EOT\226\v\b\DC4\n\ + \I\n\ + \\EOT\EOTF\STX\NUL\DC2\EOT\229\v\EOT#\SUB; [required] ID of external authentication partner, if any.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTF\STX\NUL\EOT\DC2\EOT\229\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTF\STX\NUL\ENQ\DC2\EOT\229\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTF\STX\NUL\SOH\DC2\EOT\229\v\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTF\STX\NUL\ETX\DC2\EOT\229\v!\"\n\ + \~\n\ + \\EOT\EOTF\STX\SOH\DC2\EOT\233\v\EOT!\SUBp [required] Username as registered by authentication partner, if any (max length = 255).\n\ + \ UTF8 encoding string.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTF\STX\SOH\EOT\DC2\EOT\233\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTF\STX\SOH\ENQ\DC2\EOT\233\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTF\STX\SOH\SOH\DC2\EOT\233\v\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTF\STX\SOH\ETX\DC2\EOT\233\v\US \n\ + \=\n\ + \\STX\EOTG\DC2\ACK\237\v\NUL\244\v\SOH\SUB/ Request for update login billing custom data.\n\ + \\n\ + \\v\n\ + \\ETX\EOTG\SOH\DC2\EOT\237\v\b$\n\ + \,\n\ + \\EOT\EOTG\STX\NUL\DC2\EOT\240\v\EOT!\SUB\RS [required] Login identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTG\STX\NUL\EOT\DC2\EOT\240\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTG\STX\NUL\ENQ\DC2\EOT\240\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTG\STX\NUL\SOH\DC2\EOT\240\v\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTG\STX\NUL\ETX\DC2\EOT\240\v\US \n\ + \5\n\ + \\EOT\EOTG\STX\SOH\DC2\EOT\243\v\EOTB\SUB' [required] Login billing custom data.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTG\STX\SOH\EOT\DC2\EOT\243\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTG\STX\SOH\ACK\DC2\EOT\243\v\r#\n\ + \\r\n\ + \\ENQ\EOTG\STX\SOH\SOH\DC2\EOT\243\v$=\n\ + \\r\n\ + \\ENQ\EOTG\STX\SOH\ETX\DC2\EOT\243\v@A\n\ + \7\n\ + \\STX\EOTH\DC2\ACK\247\v\NUL\249\v\SOH\SUB) Result of UpdateLoginBillingCustomData.\n\ + \\n\ + \\v\n\ + \\ETX\EOTH\SOH\DC2\EOT\247\v\b*\n\ + \\f\n\ + \\STX\EOTI\DC2\ACK\251\v\NUL\131\f\SOH\n\ + \\v\n\ + \\ETX\EOTI\SOH\DC2\EOT\251\v\b\RS\n\ + \5\n\ + \\EOT\EOTI\STX\NUL\DC2\EOT\254\v\EOT#\SUB' [required-update] Account identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTI\STX\NUL\EOT\DC2\EOT\254\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTI\STX\NUL\ENQ\DC2\EOT\254\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTI\STX\NUL\SOH\DC2\EOT\254\v\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTI\STX\NUL\ETX\DC2\EOT\254\v!\"\n\ + \L\n\ + \\EOT\EOTI\STX\SOH\DC2\EOT\130\f\EOT,\SUB> Billing custom data.\n\ + \ Maximum count is 3 (max length = 256).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTI\STX\SOH\EOT\DC2\EOT\130\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTI\STX\SOH\ENQ\DC2\EOT\130\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTI\STX\SOH\SOH\DC2\EOT\130\f\DC4'\n\ + \\r\n\ + \\ENQ\EOTI\STX\SOH\ETX\DC2\EOT\130\f*+\n\ + \5\n\ + \\STX\EOTJ\DC2\ACK\134\f\NUL\138\f\SOH\SUB' Request of login billing custom data.\n\ + \\n\ + \\v\n\ + \\ETX\EOTJ\SOH\DC2\EOT\134\f\b%\n\ + \,\n\ + \\EOT\EOTJ\STX\NUL\DC2\EOT\137\f\EOT!\SUB\RS [required] Login identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTJ\STX\NUL\EOT\DC2\EOT\137\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTJ\STX\NUL\ENQ\DC2\EOT\137\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTJ\STX\NUL\SOH\DC2\EOT\137\f\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTJ\STX\NUL\ETX\DC2\EOT\137\f\US \n\ + \8\n\ + \\STX\EOTK\DC2\ACK\141\f\NUL\145\f\SOH\SUB* Result of LoginBillingCustomDataRequest.\n\ + \\n\ + \\v\n\ + \\ETX\EOTK\SOH\DC2\EOT\141\f\b$\n\ + \*\n\ + \\EOT\EOTK\STX\NUL\DC2\EOT\144\f\EOTB\SUB\FS Login billing custom data.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTK\STX\NUL\EOT\DC2\EOT\144\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTK\STX\NUL\ACK\DC2\EOT\144\f\r#\n\ + \\r\n\ + \\ENQ\EOTK\STX\NUL\SOH\DC2\EOT\144\f$=\n\ + \\r\n\ + \\ENQ\EOTK\STX\NUL\ETX\DC2\EOT\144\f@A\n\ + \\f\n\ + \\STX\EOTL\DC2\ACK\147\f\NUL\149\f\SOH\n\ + \\v\n\ + \\ETX\EOTL\SOH\DC2\EOT\147\f\b\RS\n\ + \\f\n\ + \\STX\EOTM\DC2\ACK\151\f\NUL\154\f\SOH\n\ + \\v\n\ + \\ETX\EOTM\SOH\DC2\EOT\151\f\b\GS\n\ + \\f\n\ + \\EOT\EOTM\STX\NUL\DC2\EOT\153\f\EOTD\n\ + \\r\n\ + \\ENQ\EOTM\STX\NUL\EOT\DC2\EOT\153\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTM\STX\NUL\ACK\DC2\EOT\153\f\r$\n\ + \\r\n\ + \\ENQ\EOTM\STX\NUL\SOH\DC2\EOT\153\f%?\n\ + \\r\n\ + \\ENQ\EOTM\STX\NUL\ETX\DC2\EOT\153\fBC\n\ + \\f\n\ + \\STX\EOTN\DC2\ACK\156\f\NUL\167\f\SOH\n\ + \\v\n\ + \\ETX\EOTN\SOH\DC2\EOT\156\f\b\US\n\ + \4\n\ + \\EOT\EOTN\STX\NUL\DC2\EOT\159\f\EOT\ESC\SUB& ID of the trading interface element.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTN\STX\NUL\EOT\DC2\EOT\159\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTN\STX\NUL\ENQ\DC2\EOT\159\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTN\STX\NUL\SOH\DC2\EOT\159\f\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOTN\STX\NUL\ETX\DC2\EOT\159\f\EM\SUB\n\ + \2\n\ + \\EOT\EOTN\STX\SOH\DC2\EOT\162\f\EOT$\SUB$ Name of trading interface element.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTN\STX\SOH\EOT\DC2\EOT\162\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTN\STX\SOH\ACK\DC2\EOT\162\f\r\SUB\n\ + \\r\n\ + \\ENQ\EOTN\STX\SOH\SOH\DC2\EOT\162\f\ESC\US\n\ + \\r\n\ + \\ENQ\EOTN\STX\SOH\ETX\DC2\EOT\162\f\"#\n\ + \f\n\ + \\EOT\EOTN\STX\STX\DC2\EOT\166\f\EOT#\SUBX Indicates if trading interface is not allowed to be enabled\n\ + \ and can be only disabled.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTN\STX\STX\EOT\DC2\EOT\166\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTN\STX\STX\ENQ\DC2\EOT\166\f\r\DC1\n\ + \\r\n\ + \\ENQ\EOTN\STX\STX\SOH\DC2\EOT\166\f\DC2\RS\n\ + \\r\n\ + \\ENQ\EOTN\STX\STX\ETX\DC2\EOT\166\f!\"\n\ + \$\n\ + \\STX\EOTO\DC2\ACK\170\f\NUL\229\f\SOH\SUB\SYN Profile information.\n\ + \\n\ + \\v\n\ + \\ETX\EOTO\SOH\DC2\EOT\170\f\b\SI\n\ + \C\n\ + \\EOT\EOTO\STX\NUL\DC2\EOT\173\f\EOT'\SUB5 List of field ids to clear during update operation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\NUL\EOT\DC2\EOT\173\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\NUL\ENQ\DC2\EOT\173\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTO\STX\NUL\SOH\DC2\EOT\173\f\DC4\"\n\ + \\r\n\ + \\ENQ\EOTO\STX\NUL\ETX\DC2\EOT\173\f%&\n\ + \\161\SOH\n\ + \\EOT\EOTO\STX\SOH\DC2\EOT\178\f\EOT$\SUB\146\SOH [immutable] Associated customer.\n\ + \ [required-update] for customer and admin profile type and profile_id is not provided.\n\ + \ Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\SOH\EOT\DC2\EOT\178\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\SOH\ENQ\DC2\EOT\178\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTO\STX\SOH\SOH\DC2\EOT\178\f\DC4\US\n\ + \\r\n\ + \\ENQ\EOTO\STX\SOH\ETX\DC2\EOT\178\f\"#\n\ + \\212\SOH\n\ + \\EOT\EOTO\STX\STX\DC2\EOT\184\f\EOT#\SUB\197\SOH [required-create] Profile legal type.\n\ + \ Profile of admin profile type can be only Individual.\n\ + \ This field is associated with common_1.LegalType enum type.\n\ + \ Supported profile type: customer, admin.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\STX\EOT\DC2\EOT\184\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\STX\ENQ\DC2\EOT\184\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTO\STX\STX\SOH\DC2\EOT\184\f\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTO\STX\STX\ETX\DC2\EOT\184\f!\"\n\ + \\158\SOH\n\ + \\EOT\EOTO\STX\ETX\DC2\EOT\189\f\EOT\GS\SUB\143\SOH Profile name (max length = 32).\n\ + \ [required-create] for customer/admin and non-Individual legal types.\n\ + \ [immutable] for Individual legal type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\ETX\EOT\DC2\EOT\189\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\ETX\ENQ\DC2\EOT\189\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTO\STX\ETX\SOH\DC2\EOT\189\f\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTO\STX\ETX\ETX\DC2\EOT\189\f\ESC\FS\n\ + \,\n\ + \\EOT\EOTO\STX\EOT\DC2\EOT\192\f\EOT8\SUB\RS Profile contact information.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\EOT\EOT\DC2\EOT\192\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\EOT\ACK\DC2\EOT\192\f\r\US\n\ + \\r\n\ + \\ENQ\EOTO\STX\EOT\SOH\DC2\EOT\192\f 3\n\ + \\r\n\ + \\ENQ\EOTO\STX\EOT\ETX\DC2\EOT\192\f67\n\ + \\133\SOH\n\ + \\EOT\EOTO\STX\ENQ\DC2\EOT\197\f\EOT,\SUBw Brokerage ID.\n\ + \ [erasable] only for admin profile type.\n\ + \ [required-create] for customer and sales series profile type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\ENQ\EOT\DC2\EOT\197\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\ENQ\ENQ\DC2\EOT\197\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTO\STX\ENQ\SOH\DC2\EOT\197\f\DC4'\n\ + \\r\n\ + \\ENQ\EOTO\STX\ENQ\ETX\DC2\EOT\197\f*+\n\ + \)\n\ + \\EOT\EOTO\STX\ACK\DC2\EOT\200\f\EOT\RS\SUB\ESC [immutable] Removed flag.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\ACK\EOT\DC2\EOT\200\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\ACK\ENQ\DC2\EOT\200\f\r\DC1\n\ + \\r\n\ + \\ENQ\EOTO\STX\ACK\SOH\DC2\EOT\200\f\DC2\EM\n\ + \\r\n\ + \\ENQ\EOTO\STX\ACK\ETX\DC2\EOT\200\f\FS\GS\n\ + \\252\SOH\n\ + \\EOT\EOTO\STX\a\DC2\EOT\205\f\EOTK\SUB\237\SOH [obsolete] Authentication system of login (LoginSettings.authentication_system field) must be used instead.\n\ + \ Profile's authentication system.\n\ + \ LookupPropertyListRequest { property_type = CommonLookupPropertyType.AUTHENTICATION_SYSTEM }\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\a\EOT\DC2\EOT\205\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\a\ENQ\DC2\EOT\205\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTO\STX\a\SOH\DC2\EOT\205\f\DC42\n\ + \\r\n\ + \\ENQ\EOTO\STX\a\ETX\DC2\EOT\205\f56\n\ + \\r\n\ + \\ENQ\EOTO\STX\a\b\DC2\EOT\205\f7J\n\ + \\SO\n\ + \\ACK\EOTO\STX\a\b\ETX\DC2\EOT\205\f8I\n\ + \\162\SOH\n\ + \\EOT\EOTO\STX\b\DC2\EOT\210\f\EOT3\SUB\147\SOH Profile type - represents main type of profile.\n\ + \ This field is associated with ProfileType enum type.\n\ + \ [immutable] for sales series profile type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\b\EOT\DC2\EOT\210\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\b\ENQ\DC2\EOT\210\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTO\STX\b\SOH\DC2\EOT\210\f\DC4 \n\ + \\r\n\ + \\ENQ\EOTO\STX\b\ETX\DC2\EOT\210\f#$\n\ + \\r\n\ + \\ENQ\EOTO\STX\b\b\DC2\EOT\210\f%2\n\ + \\r\n\ + \\ENQ\EOTO\STX\b\a\DC2\EOT\210\f01\n\ + \\204\SOH\n\ + \\EOT\EOTO\STX\t\DC2\EOT\217\f\EOT$\SUB\156\SOH [required-update] Profile identifier.\n\ + \ For backward compatibility if customer_id is given, it isn't required during update.\n\ + \ Has priority over customer_id\n\ + \2\US 9 is used for cleared_fields.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\t\EOT\DC2\EOT\217\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\t\ENQ\DC2\EOT\217\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTO\STX\t\SOH\DC2\EOT\217\f\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTO\STX\t\ETX\DC2\EOT\217\f!#\n\ + \7\n\ + \\EOT\EOTO\STX\n\ + \\DC2\EOT\220\f\EOT)\SUB) [immutable] Associated sales series id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\n\ + \\EOT\DC2\EOT\220\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\n\ + \\ENQ\DC2\EOT\220\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTO\STX\n\ + \\SOH\DC2\EOT\220\f\DC4#\n\ + \\r\n\ + \\ENQ\EOTO\STX\n\ + \\ETX\DC2\EOT\220\f&(\n\ + \b\n\ + \\EOT\EOTO\STX\v\DC2\EOT\224\f\EOT \SUBT Unique number (max length = 16).\n\ + \ [required-create] for sales series profile type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\v\EOT\DC2\EOT\224\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\v\ENQ\DC2\EOT\224\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTO\STX\v\SOH\DC2\EOT\224\f\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOTO\STX\v\ETX\DC2\EOT\224\f\GS\US\n\ + \\147\SOH\n\ + \\EOT\EOTO\STX\f\DC2\EOT\228\f\EOT\"\SUB\132\SOH Determines, whether profile is simplified, used for cases of auto-generation.\n\ + \ Only name is required in this case during creation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\f\EOT\DC2\EOT\228\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\f\ENQ\DC2\EOT\228\f\r\DC1\n\ + \\r\n\ + \\ENQ\EOTO\STX\f\SOH\DC2\EOT\228\f\DC2\FS\n\ + \\r\n\ + \\ENQ\EOTO\STX\f\ETX\DC2\EOT\228\f\US!\n\ + \1\n\ + \\STX\EOTP\DC2\ACK\232\f\NUL\234\f\SOH\SUB# Generic message to retrieve data.\n\ + \\n\ + \\v\n\ + \\ETX\EOTP\SOH\DC2\EOT\232\f\b\DC3\n\ + \M\n\ + \\STX\EOTQ\DC2\ACK\237\f\NUL\241\f\SOH\SUB? Generic message to retrieve data associated with some entity.\n\ + \\n\ + \\v\n\ + \\ETX\EOTQ\SOH\DC2\EOT\237\f\b\EM\n\ + \-\n\ + \\EOT\EOTQ\STX\NUL\DC2\EOT\240\f\EOT\"\SUB\US [required] Entity identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTQ\STX\NUL\EOT\DC2\EOT\240\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTQ\STX\NUL\ENQ\DC2\EOT\240\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTQ\STX\NUL\SOH\DC2\EOT\240\f\DC4\GS\n\ + \\r\n\ + \\ENQ\EOTQ\STX\NUL\ETX\DC2\EOT\240\f !\n\ + \\f\n\ + \\STX\EOTR\DC2\ACK\243\f\NUL\247\f\SOH\n\ + \\v\n\ + \\ETX\EOTR\SOH\DC2\EOT\243\f\b\ESC\n\ + \0\n\ + \\EOT\EOTR\STX\NUL\DC2\EOT\246\f\EOT\"\SUB\" [required] Entities identifiers.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTR\STX\NUL\EOT\DC2\EOT\246\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTR\STX\NUL\ENQ\DC2\EOT\246\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTR\STX\NUL\SOH\DC2\EOT\246\f\DC4\GS\n\ + \\r\n\ + \\ENQ\EOTR\STX\NUL\ETX\DC2\EOT\246\f !\n\ + \5\n\ + \\STX\ENQ\t\DC2\ACK\250\f\NUL\141\r\SOH\SUB' List of possible profile legal types.\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\t\SOH\DC2\EOT\250\f\ENQ\SO\n\ + \\ESC\n\ + \\EOT\ENQ\t\STX\NUL\DC2\EOT\253\f\EOT\DC3\SUB\r Individual.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\NUL\SOH\DC2\EOT\253\f\EOT\SO\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\NUL\STX\DC2\EOT\253\f\DC1\DC2\n\ + \$\n\ + \\EOT\ENQ\t\STX\SOH\DC2\EOT\128\r\EOT\SO\SUB\SYN Joint-stock company.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\SOH\SOH\DC2\EOT\128\r\EOT\t\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\SOH\STX\DC2\EOT\128\r\f\r\n\ + \$\n\ + \\EOT\ENQ\t\STX\STX\DC2\EOT\131\r\EOT\DLE\SUB\SYN Limited partnership.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\STX\SOH\DC2\EOT\131\r\EOT\v\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\STX\STX\DC2\EOT\131\r\SO\SI\n\ + \\RS\n\ + \\EOT\ENQ\t\STX\ETX\DC2\EOT\134\r\EOT\SO\SUB\DLE Trust company.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\ETX\SOH\DC2\EOT\134\r\EOT\t\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\ETX\STX\DC2\EOT\134\r\f\r\n\ + \ \n\ + \\EOT\ENQ\t\STX\EOT\DC2\EOT\137\r\EOT\DC2\SUB\DC2 Corporate group.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\EOT\SOH\DC2\EOT\137\r\EOT\r\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\EOT\STX\DC2\EOT\137\r\DLE\DC1\n\ + \$\n\ + \\EOT\ENQ\t\STX\ENQ\DC2\EOT\140\r\EOT\DC4\SUB\SYN General partnership.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\ENQ\SOH\DC2\EOT\140\r\EOT\SI\n\ + \\r\n\ + \\ENQ\ENQ\t\STX\ENQ\STX\DC2\EOT\140\r\DC2\DC3\n\ + \\f\n\ + \\STX\ENQ\n\ + \\DC2\ACK\143\r\NUL\150\r\SOH\n\ + \\v\n\ + \\ETX\ENQ\n\ + \\SOH\DC2\EOT\143\r\ENQ\DLE\n\ + \\f\n\ + \\EOT\ENQ\n\ + \\STX\NUL\DC2\EOT\145\r\EOT\RS\n\ + \\r\n\ + \\ENQ\ENQ\n\ + \\STX\NUL\SOH\DC2\EOT\145\r\EOT\EM\n\ + \\r\n\ + \\ENQ\ENQ\n\ + \\STX\NUL\STX\DC2\EOT\145\r\FS\GS\n\ + \\f\n\ + \\EOT\ENQ\n\ + \\STX\SOH\DC2\EOT\146\r\EOT\ESC\n\ + \\r\n\ + \\ENQ\ENQ\n\ + \\STX\SOH\SOH\DC2\EOT\146\r\EOT\SYN\n\ + \\r\n\ + \\ENQ\ENQ\n\ + \\STX\SOH\STX\DC2\EOT\146\r\EM\SUB\n\ + \\f\n\ + \\EOT\ENQ\n\ + \\STX\STX\DC2\EOT\147\r\EOT\US\n\ + \\r\n\ + \\ENQ\ENQ\n\ + \\STX\STX\SOH\DC2\EOT\147\r\EOT\SUB\n\ + \\r\n\ + \\ENQ\ENQ\n\ + \\STX\STX\STX\DC2\EOT\147\r\GS\RS\n\ + \\f\n\ + \\EOT\ENQ\n\ + \\STX\ETX\DC2\EOT\148\r\EOT \n\ + \\r\n\ + \\ENQ\ENQ\n\ + \\STX\ETX\SOH\DC2\EOT\148\r\EOT\ESC\n\ + \\r\n\ + \\ENQ\ENQ\n\ + \\STX\ETX\STX\DC2\EOT\148\r\RS\US\n\ + \\f\n\ + \\EOT\ENQ\n\ + \\STX\EOT\DC2\EOT\149\r\EOT\"\n\ + \\r\n\ + \\ENQ\ENQ\n\ + \\STX\EOT\SOH\DC2\EOT\149\r\EOT\GS\n\ + \\r\n\ + \\ENQ\ENQ\n\ + \\STX\EOT\STX\DC2\EOT\149\r !\n\ + \\f\n\ + \\STX\ENQ\v\DC2\ACK\152\r\NUL\165\r\SOH\n\ + \\v\n\ + \\ETX\ENQ\v\SOH\DC2\EOT\152\r\ENQ\ETB\n\ + \\f\n\ + \\EOT\ENQ\v\STX\NUL\DC2\EOT\154\r\EOT%\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\NUL\SOH\DC2\EOT\154\r\EOT \n\ + \\r\n\ + \\ENQ\ENQ\v\STX\NUL\STX\DC2\EOT\154\r#$\n\ + \\f\n\ + \\EOT\ENQ\v\STX\SOH\DC2\EOT\155\r\EOT#\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\SOH\SOH\DC2\EOT\155\r\EOT\RS\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\SOH\STX\DC2\EOT\155\r!\"\n\ + \\f\n\ + \\EOT\ENQ\v\STX\STX\DC2\EOT\156\r\EOT$\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\STX\SOH\DC2\EOT\156\r\EOT\US\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\STX\STX\DC2\EOT\156\r\"#\n\ + \\f\n\ + \\EOT\ENQ\v\STX\ETX\DC2\EOT\157\r\EOT&\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\ETX\SOH\DC2\EOT\157\r\EOT!\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\ETX\STX\DC2\EOT\157\r$%\n\ + \\f\n\ + \\EOT\ENQ\v\STX\EOT\DC2\EOT\158\r\EOT$\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\EOT\SOH\DC2\EOT\158\r\EOT\US\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\EOT\STX\DC2\EOT\158\r\"#\n\ + \\f\n\ + \\EOT\ENQ\v\STX\ENQ\DC2\EOT\159\r\EOT'\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\ENQ\SOH\DC2\EOT\159\r\EOT\"\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\ENQ\STX\DC2\EOT\159\r%&\n\ + \\f\n\ + \\EOT\ENQ\v\STX\ACK\DC2\EOT\160\r\EOT*\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\ACK\SOH\DC2\EOT\160\r\EOT%\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\ACK\STX\DC2\EOT\160\r()\n\ + \\f\n\ + \\EOT\ENQ\v\STX\a\DC2\EOT\161\r\EOT!\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\a\SOH\DC2\EOT\161\r\EOT\FS\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\a\STX\DC2\EOT\161\r\US \n\ + \\f\n\ + \\EOT\ENQ\v\STX\b\DC2\EOT\162\r\EOT)\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\b\SOH\DC2\EOT\162\r\EOT$\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\b\STX\DC2\EOT\162\r'(\n\ + \\f\n\ + \\EOT\ENQ\v\STX\t\DC2\EOT\163\r\EOT'\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\t\SOH\DC2\EOT\163\r\EOT!\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\t\STX\DC2\EOT\163\r$&\n\ + \\f\n\ + \\EOT\ENQ\v\STX\n\ + \\DC2\EOT\164\r\EOT5\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\n\ + \\SOH\DC2\EOT\164\r\EOT/\n\ + \\r\n\ + \\ENQ\ENQ\v\STX\n\ + \\STX\DC2\EOT\164\r24" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Common1_Fields.hs b/cqg-cms-api-proto/src/Proto/CMS/Common1_Fields.hs new file mode 100644 index 0000000..08e9c84 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Common1_Fields.hs @@ -0,0 +1,2032 @@ +{- This file was auto-generated from CMS/common_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Common1_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.Common.Shared1 +accessToken :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accessToken" a) => + Lens.Family2.LensLike' f s a +accessToken = Data.ProtoLens.Field.field @"accessToken" +accountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountId" a) => + Lens.Family2.LensLike' f s a +accountId = Data.ProtoLens.Field.field @"accountId" +address :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "address" a) => + Lens.Family2.LensLike' f s a +address = Data.ProtoLens.Field.field @"address" +address2 :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "address2" a) => + Lens.Family2.LensLike' f s a +address2 = Data.ProtoLens.Field.field @"address2" +addressStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "addressStatus" a) => + Lens.Family2.LensLike' f s a +addressStatus = Data.ProtoLens.Field.field @"addressStatus" +allMatchMode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allMatchMode" a) => + Lens.Family2.LensLike' f s a +allMatchMode = Data.ProtoLens.Field.field @"allMatchMode" +allowExceedAccountLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowExceedAccountLimit" a) => + Lens.Family2.LensLike' f s a +allowExceedAccountLimit + = Data.ProtoLens.Field.field @"allowExceedAccountLimit" +authenticationSystem :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "authenticationSystem" a) => + Lens.Family2.LensLike' f s a +authenticationSystem + = Data.ProtoLens.Field.field @"authenticationSystem" +authorizationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "authorizationType" a) => + Lens.Family2.LensLike' f s a +authorizationType = Data.ProtoLens.Field.field @"authorizationType" +billingBrokerageRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "billingBrokerageRequired" a) => + Lens.Family2.LensLike' f s a +billingBrokerageRequired + = Data.ProtoLens.Field.field @"billingBrokerageRequired" +billingCustomData :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "billingCustomData" a) => + Lens.Family2.LensLike' f s a +billingCustomData = Data.ProtoLens.Field.field @"billingCustomData" +brokerageAssignable :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageAssignable" a) => + Lens.Family2.LensLike' f s a +brokerageAssignable + = Data.ProtoLens.Field.field @"brokerageAssignable" +brokerageAuthorizationRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageAuthorizationRequired" a) => + Lens.Family2.LensLike' f s a +brokerageAuthorizationRequired + = Data.ProtoLens.Field.field @"brokerageAuthorizationRequired" +brokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageId" a) => + Lens.Family2.LensLike' f s a +brokerageId = Data.ProtoLens.Field.field @"brokerageId" +brokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageName" a) => + Lens.Family2.LensLike' f s a +brokerageName = Data.ProtoLens.Field.field @"brokerageName" +castUserId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "castUserId" a) => + Lens.Family2.LensLike' f s a +castUserId = Data.ProtoLens.Field.field @"castUserId" +categoryId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "categoryId" a) => + Lens.Family2.LensLike' f s a +categoryId = Data.ProtoLens.Field.field @"categoryId" +city :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "city" a) => + Lens.Family2.LensLike' f s a +city = Data.ProtoLens.Field.field @"city" +class' :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "class'" a) => + Lens.Family2.LensLike' f s a +class' = Data.ProtoLens.Field.field @"class'" +cleanUpEventSubscriptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cleanUpEventSubscriptions" a) => + Lens.Family2.LensLike' f s a +cleanUpEventSubscriptions + = Data.ProtoLens.Field.field @"cleanUpEventSubscriptions" +clearedFields :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clearedFields" a) => + Lens.Family2.LensLike' f s a +clearedFields = Data.ProtoLens.Field.field @"clearedFields" +clientAppId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientAppId" a) => + Lens.Family2.LensLike' f s a +clientAppId = Data.ProtoLens.Field.field @"clientAppId" +clientIpAddress :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientIpAddress" a) => + Lens.Family2.LensLike' f s a +clientIpAddress = Data.ProtoLens.Field.field @"clientIpAddress" +clientVersion :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientVersion" a) => + Lens.Family2.LensLike' f s a +clientVersion = Data.ProtoLens.Field.field @"clientVersion" +concurrentSessionsNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "concurrentSessionsNumber" a) => + Lens.Family2.LensLike' f s a +concurrentSessionsNumber + = Data.ProtoLens.Field.field @"concurrentSessionsNumber" +constraint :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "constraint" a) => + Lens.Family2.LensLike' f s a +constraint = Data.ProtoLens.Field.field @"constraint" +constraintGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "constraintGroup" a) => + Lens.Family2.LensLike' f s a +constraintGroup = Data.ProtoLens.Field.field @"constraintGroup" +constraintType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "constraintType" a) => + Lens.Family2.LensLike' f s a +constraintType = Data.ProtoLens.Field.field @"constraintType" +contactInformation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contactInformation" a) => + Lens.Family2.LensLike' f s a +contactInformation + = Data.ProtoLens.Field.field @"contactInformation" +contractType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractType" a) => + Lens.Family2.LensLike' f s a +contractType = Data.ProtoLens.Field.field @"contractType" +country :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "country" a) => + Lens.Family2.LensLike' f s a +country = Data.ProtoLens.Field.field @"country" +credentialTypes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "credentialTypes" a) => + Lens.Family2.LensLike' f s a +credentialTypes = Data.ProtoLens.Field.field @"credentialTypes" +criteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "criteria" a) => + Lens.Family2.LensLike' f s a +criteria = Data.ProtoLens.Field.field @"criteria" +currency :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "currency" a) => + Lens.Family2.LensLike' f s a +currency = Data.ProtoLens.Field.field @"currency" +customerBrokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "customerBrokerageName" a) => + Lens.Family2.LensLike' f s a +customerBrokerageName + = Data.ProtoLens.Field.field @"customerBrokerageName" +customerId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "customerId" a) => + Lens.Family2.LensLike' f s a +customerId = Data.ProtoLens.Field.field @"customerId" +customerName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "customerName" a) => + Lens.Family2.LensLike' f s a +customerName = Data.ProtoLens.Field.field @"customerName" +customerSalesSeriesLinks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "customerSalesSeriesLinks" a) => + Lens.Family2.LensLike' f s a +customerSalesSeriesLinks + = Data.ProtoLens.Field.field @"customerSalesSeriesLinks" +dailyLogonCount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "dailyLogonCount" a) => + Lens.Family2.LensLike' f s a +dailyLogonCount = Data.ProtoLens.Field.field @"dailyLogonCount" +dailyLogonLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "dailyLogonLimit" a) => + Lens.Family2.LensLike' f s a +dailyLogonLimit = Data.ProtoLens.Field.field @"dailyLogonLimit" +default' :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "default'" a) => + Lens.Family2.LensLike' f s a +default' = Data.ProtoLens.Field.field @"default'" +description :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "description" a) => + Lens.Family2.LensLike' f s a +description = Data.ProtoLens.Field.field @"description" +disableOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "disableOnly" a) => + Lens.Family2.LensLike' f s a +disableOnly = Data.ProtoLens.Field.field @"disableOnly" +domain :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "domain" a) => + Lens.Family2.LensLike' f s a +domain = Data.ProtoLens.Field.field @"domain" +dropConcurrentSession :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "dropConcurrentSession" a) => + Lens.Family2.LensLike' f s a +dropConcurrentSession + = Data.ProtoLens.Field.field @"dropConcurrentSession" +email :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "email" a) => + Lens.Family2.LensLike' f s a +email = Data.ProtoLens.Field.field @"email" +enforceIpWhitelist :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceIpWhitelist" a) => + Lens.Family2.LensLike' f s a +enforceIpWhitelist + = Data.ProtoLens.Field.field @"enforceIpWhitelist" +enforcedConstraintGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforcedConstraintGroup" a) => + Lens.Family2.LensLike' f s a +enforcedConstraintGroup + = Data.ProtoLens.Field.field @"enforcedConstraintGroup" +entities :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entities" a) => + Lens.Family2.LensLike' f s a +entities = Data.ProtoLens.Field.field @"entities" +entitlementServiceId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlementServiceId" a) => + Lens.Family2.LensLike' f s a +entitlementServiceId + = Data.ProtoLens.Field.field @"entitlementServiceId" +entityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entityId" a) => + Lens.Family2.LensLike' f s a +entityId = Data.ProtoLens.Field.field @"entityId" +errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "errorMessage" a) => + Lens.Family2.LensLike' f s a +errorMessage = Data.ProtoLens.Field.field @"errorMessage" +exchangeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "exchangeId" a) => + Lens.Family2.LensLike' f s a +exchangeId = Data.ProtoLens.Field.field @"exchangeId" +expirationTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "expirationTime" a) => + Lens.Family2.LensLike' f s a +expirationTime = Data.ProtoLens.Field.field @"expirationTime" +expirationUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "expirationUtcTime" a) => + Lens.Family2.LensLike' f s a +expirationUtcTime = Data.ProtoLens.Field.field @"expirationUtcTime" +externalAuth :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "externalAuth" a) => + Lens.Family2.LensLike' f s a +externalAuth = Data.ProtoLens.Field.field @"externalAuth" +fax :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "fax" a) => + Lens.Family2.LensLike' f s a +fax = Data.ProtoLens.Field.field @"fax" +first :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "first" a) => + Lens.Family2.LensLike' f s a +first = Data.ProtoLens.Field.field @"first" +firstName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "firstName" a) => + Lens.Family2.LensLike' f s a +firstName = Data.ProtoLens.Field.field @"firstName" +id :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "id" a) => + Lens.Family2.LensLike' f s a +id = Data.ProtoLens.Field.field @"id" +includeRetired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "includeRetired" a) => + Lens.Family2.LensLike' f s a +includeRetired = Data.ProtoLens.Field.field @"includeRetired" +ipWhitelist :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "ipWhitelist" a) => + Lens.Family2.LensLike' f s a +ipWhitelist = Data.ProtoLens.Field.field @"ipWhitelist" +isActive :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isActive" a) => + Lens.Family2.LensLike' f s a +isActive = Data.ProtoLens.Field.field @"isActive" +isComplete :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isComplete" a) => + Lens.Family2.LensLike' f s a +isComplete = Data.ProtoLens.Field.field @"isComplete" +isMarketData :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isMarketData" a) => + Lens.Family2.LensLike' f s a +isMarketData = Data.ProtoLens.Field.field @"isMarketData" +isTemporary :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isTemporary" a) => + Lens.Family2.LensLike' f s a +isTemporary = Data.ProtoLens.Field.field @"isTemporary" +items :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "items" a) => + Lens.Family2.LensLike' f s a +items = Data.ProtoLens.Field.field @"items" +lastName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "lastName" a) => + Lens.Family2.LensLike' f s a +lastName = Data.ProtoLens.Field.field @"lastName" +legalType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "legalType" a) => + Lens.Family2.LensLike' f s a +legalType = Data.ProtoLens.Field.field @"legalType" +linkedBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "linkedBrokerageId" a) => + Lens.Family2.LensLike' f s a +linkedBrokerageId = Data.ProtoLens.Field.field @"linkedBrokerageId" +linkedLoginId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "linkedLoginId" a) => + Lens.Family2.LensLike' f s a +linkedLoginId = Data.ProtoLens.Field.field @"linkedLoginId" +linksToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "linksToRemove" a) => + Lens.Family2.LensLike' f s a +linksToRemove = Data.ProtoLens.Field.field @"linksToRemove" +linksToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "linksToSet" a) => + Lens.Family2.LensLike' f s a +linksToSet = Data.ProtoLens.Field.field @"linksToSet" +loginBillingCustomData :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginBillingCustomData" a) => + Lens.Family2.LensLike' f s a +loginBillingCustomData + = Data.ProtoLens.Field.field @"loginBillingCustomData" +loginDomains :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginDomains" a) => + Lens.Family2.LensLike' f s a +loginDomains = Data.ProtoLens.Field.field @"loginDomains" +loginId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "loginId" a) => + Lens.Family2.LensLike' f s a +loginId = Data.ProtoLens.Field.field @"loginId" +loginMemberIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginMemberIds" a) => + Lens.Family2.LensLike' f s a +loginMemberIds = Data.ProtoLens.Field.field @"loginMemberIds" +loginSettings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginSettings" a) => + Lens.Family2.LensLike' f s a +loginSettings = Data.ProtoLens.Field.field @"loginSettings" +lookupProperty :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "lookupProperty" a) => + Lens.Family2.LensLike' f s a +lookupProperty = Data.ProtoLens.Field.field @"lookupProperty" +matchingRule :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "matchingRule" a) => + Lens.Family2.LensLike' f s a +matchingRule = Data.ProtoLens.Field.field @"matchingRule" +maybe'accessToken :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accessToken" a) => + Lens.Family2.LensLike' f s a +maybe'accessToken = Data.ProtoLens.Field.field @"maybe'accessToken" +maybe'accountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountId" a) => + Lens.Family2.LensLike' f s a +maybe'accountId = Data.ProtoLens.Field.field @"maybe'accountId" +maybe'address :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'address" a) => + Lens.Family2.LensLike' f s a +maybe'address = Data.ProtoLens.Field.field @"maybe'address" +maybe'address2 :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'address2" a) => + Lens.Family2.LensLike' f s a +maybe'address2 = Data.ProtoLens.Field.field @"maybe'address2" +maybe'addressStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'addressStatus" a) => + Lens.Family2.LensLike' f s a +maybe'addressStatus + = Data.ProtoLens.Field.field @"maybe'addressStatus" +maybe'allMatchMode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allMatchMode" a) => + Lens.Family2.LensLike' f s a +maybe'allMatchMode + = Data.ProtoLens.Field.field @"maybe'allMatchMode" +maybe'allowExceedAccountLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allowExceedAccountLimit" a) => + Lens.Family2.LensLike' f s a +maybe'allowExceedAccountLimit + = Data.ProtoLens.Field.field @"maybe'allowExceedAccountLimit" +maybe'authenticationSystem :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'authenticationSystem" a) => + Lens.Family2.LensLike' f s a +maybe'authenticationSystem + = Data.ProtoLens.Field.field @"maybe'authenticationSystem" +maybe'billingBrokerageRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'billingBrokerageRequired" a) => + Lens.Family2.LensLike' f s a +maybe'billingBrokerageRequired + = Data.ProtoLens.Field.field @"maybe'billingBrokerageRequired" +maybe'brokerageAssignable :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'brokerageAssignable" a) => + Lens.Family2.LensLike' f s a +maybe'brokerageAssignable + = Data.ProtoLens.Field.field @"maybe'brokerageAssignable" +maybe'brokerageAuthorizationRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'brokerageAuthorizationRequired" a) => + Lens.Family2.LensLike' f s a +maybe'brokerageAuthorizationRequired + = Data.ProtoLens.Field.field + @"maybe'brokerageAuthorizationRequired" +maybe'brokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'brokerageId" a) => + Lens.Family2.LensLike' f s a +maybe'brokerageId = Data.ProtoLens.Field.field @"maybe'brokerageId" +maybe'brokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'brokerageName" a) => + Lens.Family2.LensLike' f s a +maybe'brokerageName + = Data.ProtoLens.Field.field @"maybe'brokerageName" +maybe'castUserId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'castUserId" a) => + Lens.Family2.LensLike' f s a +maybe'castUserId = Data.ProtoLens.Field.field @"maybe'castUserId" +maybe'city :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'city" a) => + Lens.Family2.LensLike' f s a +maybe'city = Data.ProtoLens.Field.field @"maybe'city" +maybe'class' :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'class'" a) => + Lens.Family2.LensLike' f s a +maybe'class' = Data.ProtoLens.Field.field @"maybe'class'" +maybe'cleanUpEventSubscriptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cleanUpEventSubscriptions" a) => + Lens.Family2.LensLike' f s a +maybe'cleanUpEventSubscriptions + = Data.ProtoLens.Field.field @"maybe'cleanUpEventSubscriptions" +maybe'clientAppId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'clientAppId" a) => + Lens.Family2.LensLike' f s a +maybe'clientAppId = Data.ProtoLens.Field.field @"maybe'clientAppId" +maybe'clientIpAddress :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'clientIpAddress" a) => + Lens.Family2.LensLike' f s a +maybe'clientIpAddress + = Data.ProtoLens.Field.field @"maybe'clientIpAddress" +maybe'clientVersion :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'clientVersion" a) => + Lens.Family2.LensLike' f s a +maybe'clientVersion + = Data.ProtoLens.Field.field @"maybe'clientVersion" +maybe'concurrentSessionsNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'concurrentSessionsNumber" a) => + Lens.Family2.LensLike' f s a +maybe'concurrentSessionsNumber + = Data.ProtoLens.Field.field @"maybe'concurrentSessionsNumber" +maybe'constraintGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'constraintGroup" a) => + Lens.Family2.LensLike' f s a +maybe'constraintGroup + = Data.ProtoLens.Field.field @"maybe'constraintGroup" +maybe'contactInformation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'contactInformation" a) => + Lens.Family2.LensLike' f s a +maybe'contactInformation + = Data.ProtoLens.Field.field @"maybe'contactInformation" +maybe'contractType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'contractType" a) => + Lens.Family2.LensLike' f s a +maybe'contractType + = Data.ProtoLens.Field.field @"maybe'contractType" +maybe'country :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'country" a) => + Lens.Family2.LensLike' f s a +maybe'country = Data.ProtoLens.Field.field @"maybe'country" +maybe'currency :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'currency" a) => + Lens.Family2.LensLike' f s a +maybe'currency = Data.ProtoLens.Field.field @"maybe'currency" +maybe'customerBrokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'customerBrokerageName" a) => + Lens.Family2.LensLike' f s a +maybe'customerBrokerageName + = Data.ProtoLens.Field.field @"maybe'customerBrokerageName" +maybe'customerId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'customerId" a) => + Lens.Family2.LensLike' f s a +maybe'customerId = Data.ProtoLens.Field.field @"maybe'customerId" +maybe'customerName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'customerName" a) => + Lens.Family2.LensLike' f s a +maybe'customerName + = Data.ProtoLens.Field.field @"maybe'customerName" +maybe'dailyLogonCount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'dailyLogonCount" a) => + Lens.Family2.LensLike' f s a +maybe'dailyLogonCount + = Data.ProtoLens.Field.field @"maybe'dailyLogonCount" +maybe'dailyLogonLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'dailyLogonLimit" a) => + Lens.Family2.LensLike' f s a +maybe'dailyLogonLimit + = Data.ProtoLens.Field.field @"maybe'dailyLogonLimit" +maybe'default' :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'default'" a) => + Lens.Family2.LensLike' f s a +maybe'default' = Data.ProtoLens.Field.field @"maybe'default'" +maybe'description :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'description" a) => + Lens.Family2.LensLike' f s a +maybe'description = Data.ProtoLens.Field.field @"maybe'description" +maybe'disableOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'disableOnly" a) => + Lens.Family2.LensLike' f s a +maybe'disableOnly = Data.ProtoLens.Field.field @"maybe'disableOnly" +maybe'domain :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'domain" a) => + Lens.Family2.LensLike' f s a +maybe'domain = Data.ProtoLens.Field.field @"maybe'domain" +maybe'dropConcurrentSession :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'dropConcurrentSession" a) => + Lens.Family2.LensLike' f s a +maybe'dropConcurrentSession + = Data.ProtoLens.Field.field @"maybe'dropConcurrentSession" +maybe'enforceIpWhitelist :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceIpWhitelist" a) => + Lens.Family2.LensLike' f s a +maybe'enforceIpWhitelist + = Data.ProtoLens.Field.field @"maybe'enforceIpWhitelist" +maybe'entityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'entityId" a) => + Lens.Family2.LensLike' f s a +maybe'entityId = Data.ProtoLens.Field.field @"maybe'entityId" +maybe'errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'errorMessage" a) => + Lens.Family2.LensLike' f s a +maybe'errorMessage + = Data.ProtoLens.Field.field @"maybe'errorMessage" +maybe'exchangeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'exchangeId" a) => + Lens.Family2.LensLike' f s a +maybe'exchangeId = Data.ProtoLens.Field.field @"maybe'exchangeId" +maybe'expirationTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'expirationTime" a) => + Lens.Family2.LensLike' f s a +maybe'expirationTime + = Data.ProtoLens.Field.field @"maybe'expirationTime" +maybe'expirationUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'expirationUtcTime" a) => + Lens.Family2.LensLike' f s a +maybe'expirationUtcTime + = Data.ProtoLens.Field.field @"maybe'expirationUtcTime" +maybe'externalAuth :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'externalAuth" a) => + Lens.Family2.LensLike' f s a +maybe'externalAuth + = Data.ProtoLens.Field.field @"maybe'externalAuth" +maybe'first :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'first" a) => + Lens.Family2.LensLike' f s a +maybe'first = Data.ProtoLens.Field.field @"maybe'first" +maybe'firstName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'firstName" a) => + Lens.Family2.LensLike' f s a +maybe'firstName = Data.ProtoLens.Field.field @"maybe'firstName" +maybe'id :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'id" a) => + Lens.Family2.LensLike' f s a +maybe'id = Data.ProtoLens.Field.field @"maybe'id" +maybe'includeRetired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'includeRetired" a) => + Lens.Family2.LensLike' f s a +maybe'includeRetired + = Data.ProtoLens.Field.field @"maybe'includeRetired" +maybe'isActive :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isActive" a) => + Lens.Family2.LensLike' f s a +maybe'isActive = Data.ProtoLens.Field.field @"maybe'isActive" +maybe'isComplete :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isComplete" a) => + Lens.Family2.LensLike' f s a +maybe'isComplete = Data.ProtoLens.Field.field @"maybe'isComplete" +maybe'isMarketData :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isMarketData" a) => + Lens.Family2.LensLike' f s a +maybe'isMarketData + = Data.ProtoLens.Field.field @"maybe'isMarketData" +maybe'isTemporary :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isTemporary" a) => + Lens.Family2.LensLike' f s a +maybe'isTemporary = Data.ProtoLens.Field.field @"maybe'isTemporary" +maybe'lastName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'lastName" a) => + Lens.Family2.LensLike' f s a +maybe'lastName = Data.ProtoLens.Field.field @"maybe'lastName" +maybe'legalType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'legalType" a) => + Lens.Family2.LensLike' f s a +maybe'legalType = Data.ProtoLens.Field.field @"maybe'legalType" +maybe'linkedBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'linkedBrokerageId" a) => + Lens.Family2.LensLike' f s a +maybe'linkedBrokerageId + = Data.ProtoLens.Field.field @"maybe'linkedBrokerageId" +maybe'linkedLoginId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'linkedLoginId" a) => + Lens.Family2.LensLike' f s a +maybe'linkedLoginId + = Data.ProtoLens.Field.field @"maybe'linkedLoginId" +maybe'loginId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginId" a) => + Lens.Family2.LensLike' f s a +maybe'loginId = Data.ProtoLens.Field.field @"maybe'loginId" +maybe'loginSettings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginSettings" a) => + Lens.Family2.LensLike' f s a +maybe'loginSettings + = Data.ProtoLens.Field.field @"maybe'loginSettings" +maybe'matchingRule :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'matchingRule" a) => + Lens.Family2.LensLike' f s a +maybe'matchingRule + = Data.ProtoLens.Field.field @"maybe'matchingRule" +maybe'memberId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'memberId" a) => + Lens.Family2.LensLike' f s a +maybe'memberId = Data.ProtoLens.Field.field @"maybe'memberId" +maybe'name :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'name" a) => + Lens.Family2.LensLike' f s a +maybe'name = Data.ProtoLens.Field.field @"maybe'name" +maybe'newProfileBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'newProfileBrokerageId" a) => + Lens.Family2.LensLike' f s a +maybe'newProfileBrokerageId + = Data.ProtoLens.Field.field @"maybe'newProfileBrokerageId" +maybe'newProfileId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'newProfileId" a) => + Lens.Family2.LensLike' f s a +maybe'newProfileId + = Data.ProtoLens.Field.field @"maybe'newProfileId" +maybe'newUserContactInformation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'newUserContactInformation" a) => + Lens.Family2.LensLike' f s a +maybe'newUserContactInformation + = Data.ProtoLens.Field.field @"maybe'newUserContactInformation" +maybe'newUserUsername :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'newUserUsername" a) => + Lens.Family2.LensLike' f s a +maybe'newUserUsername + = Data.ProtoLens.Field.field @"maybe'newUserUsername" +maybe'noWelcomeEmail :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'noWelcomeEmail" a) => + Lens.Family2.LensLike' f s a +maybe'noWelcomeEmail + = Data.ProtoLens.Field.field @"maybe'noWelcomeEmail" +maybe'number :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'number" a) => + Lens.Family2.LensLike' f s a +maybe'number = Data.ProtoLens.Field.field @"maybe'number" +maybe'obsoleteAgreement :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteAgreement" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteAgreement + = Data.ProtoLens.Field.field @"maybe'obsoleteAgreement" +maybe'obsoleteAgreementRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteAgreementRequired" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteAgreementRequired + = Data.ProtoLens.Field.field @"maybe'obsoleteAgreementRequired" +maybe'obsoleteAuthenticationSystem :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteAuthenticationSystem" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteAuthenticationSystem + = Data.ProtoLens.Field.field @"maybe'obsoleteAuthenticationSystem" +maybe'obsoleteEmail :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteEmail" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteEmail + = Data.ProtoLens.Field.field @"maybe'obsoleteEmail" +maybe'obsoleteFirstName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteFirstName" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteFirstName + = Data.ProtoLens.Field.field @"maybe'obsoleteFirstName" +maybe'obsoleteIsStrategyRunner :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteIsStrategyRunner" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteIsStrategyRunner + = Data.ProtoLens.Field.field @"maybe'obsoleteIsStrategyRunner" +maybe'obsoleteLastName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteLastName" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteLastName + = Data.ProtoLens.Field.field @"maybe'obsoleteLastName" +maybe'obsoleteNewUserAddress :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteNewUserAddress" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteNewUserAddress + = Data.ProtoLens.Field.field @"maybe'obsoleteNewUserAddress" +maybe'obsoleteNewUserFirstName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteNewUserFirstName" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteNewUserFirstName + = Data.ProtoLens.Field.field @"maybe'obsoleteNewUserFirstName" +maybe'obsoleteNewUserLastName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteNewUserLastName" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteNewUserLastName + = Data.ProtoLens.Field.field @"maybe'obsoleteNewUserLastName" +maybe'obsoleteNewUserMiddleInitial :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteNewUserMiddleInitial" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteNewUserMiddleInitial + = Data.ProtoLens.Field.field @"maybe'obsoleteNewUserMiddleInitial" +maybe'obsoleteOriginalUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteOriginalUser" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteOriginalUser + = Data.ProtoLens.Field.field @"maybe'obsoleteOriginalUser" +maybe'obsoleteText :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteText" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteText + = Data.ProtoLens.Field.field @"maybe'obsoleteText" +maybe'onSessionDisconnectAction :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'onSessionDisconnectAction" a) => + Lens.Family2.LensLike' f s a +maybe'onSessionDisconnectAction + = Data.ProtoLens.Field.field @"maybe'onSessionDisconnectAction" +maybe'operationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'operationType" a) => + Lens.Family2.LensLike' f s a +maybe'operationType + = Data.ProtoLens.Field.field @"maybe'operationType" +maybe'partnerId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'partnerId" a) => + Lens.Family2.LensLike' f s a +maybe'partnerId = Data.ProtoLens.Field.field @"maybe'partnerId" +maybe'password :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'password" a) => + Lens.Family2.LensLike' f s a +maybe'password = Data.ProtoLens.Field.field @"maybe'password" +maybe'passwordNeverExpires :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'passwordNeverExpires" a) => + Lens.Family2.LensLike' f s a +maybe'passwordNeverExpires + = Data.ProtoLens.Field.field @"maybe'passwordNeverExpires" +maybe'preferredConnectionPointId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'preferredConnectionPointId" a) => + Lens.Family2.LensLike' f s a +maybe'preferredConnectionPointId + = Data.ProtoLens.Field.field @"maybe'preferredConnectionPointId" +maybe'preferredConnectionPointName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'preferredConnectionPointName" a) => + Lens.Family2.LensLike' f s a +maybe'preferredConnectionPointName + = Data.ProtoLens.Field.field @"maybe'preferredConnectionPointName" +maybe'privateLabel :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'privateLabel" a) => + Lens.Family2.LensLike' f s a +maybe'privateLabel + = Data.ProtoLens.Field.field @"maybe'privateLabel" +maybe'profileId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profileId" a) => + Lens.Family2.LensLike' f s a +maybe'profileId = Data.ProtoLens.Field.field @"maybe'profileId" +maybe'profileSalesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profileSalesSeriesId" a) => + Lens.Family2.LensLike' f s a +maybe'profileSalesSeriesId + = Data.ProtoLens.Field.field @"maybe'profileSalesSeriesId" +maybe'profileType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profileType" a) => + Lens.Family2.LensLike' f s a +maybe'profileType = Data.ProtoLens.Field.field @"maybe'profileType" +maybe'protocolVersionMajor :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'protocolVersionMajor" a) => + Lens.Family2.LensLike' f s a +maybe'protocolVersionMajor + = Data.ProtoLens.Field.field @"maybe'protocolVersionMajor" +maybe'protocolVersionMinor :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'protocolVersionMinor" a) => + Lens.Family2.LensLike' f s a +maybe'protocolVersionMinor + = Data.ProtoLens.Field.field @"maybe'protocolVersionMinor" +maybe'reason :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'reason" a) => + Lens.Family2.LensLike' f s a +maybe'reason = Data.ProtoLens.Field.field @"maybe'reason" +maybe'reconnectTimeoutAfterDisconnect :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'reconnectTimeoutAfterDisconnect" a) => + Lens.Family2.LensLike' f s a +maybe'reconnectTimeoutAfterDisconnect + = Data.ProtoLens.Field.field + @"maybe'reconnectTimeoutAfterDisconnect" +maybe'refServiceId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'refServiceId" a) => + Lens.Family2.LensLike' f s a +maybe'refServiceId + = Data.ProtoLens.Field.field @"maybe'refServiceId" +maybe'removalDate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'removalDate" a) => + Lens.Family2.LensLike' f s a +maybe'removalDate = Data.ProtoLens.Field.field @"maybe'removalDate" +maybe'removed :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'removed" a) => + Lens.Family2.LensLike' f s a +maybe'removed = Data.ProtoLens.Field.field @"maybe'removed" +maybe'salesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'salesSeriesId" a) => + Lens.Family2.LensLike' f s a +maybe'salesSeriesId + = Data.ProtoLens.Field.field @"maybe'salesSeriesId" +maybe'salesSeriesName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'salesSeriesName" a) => + Lens.Family2.LensLike' f s a +maybe'salesSeriesName + = Data.ProtoLens.Field.field @"maybe'salesSeriesName" +maybe'salesSeriesNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'salesSeriesNumber" a) => + Lens.Family2.LensLike' f s a +maybe'salesSeriesNumber + = Data.ProtoLens.Field.field @"maybe'salesSeriesNumber" +maybe'scope :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'scope" a) => + Lens.Family2.LensLike' f s a +maybe'scope = Data.ProtoLens.Field.field @"maybe'scope" +maybe'second :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'second" a) => + Lens.Family2.LensLike' f s a +maybe'second = Data.ProtoLens.Field.field @"maybe'second" +maybe'sessionToken :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'sessionToken" a) => + Lens.Family2.LensLike' f s a +maybe'sessionToken + = Data.ProtoLens.Field.field @"maybe'sessionToken" +maybe'simplified :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'simplified" a) => + Lens.Family2.LensLike' f s a +maybe'simplified = Data.ProtoLens.Field.field @"maybe'simplified" +maybe'source :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'source" a) => + Lens.Family2.LensLike' f s a +maybe'source = Data.ProtoLens.Field.field @"maybe'source" +maybe'sourceUserId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'sourceUserId" a) => + Lens.Family2.LensLike' f s a +maybe'sourceUserId + = Data.ProtoLens.Field.field @"maybe'sourceUserId" +maybe'state :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'state" a) => + Lens.Family2.LensLike' f s a +maybe'state = Data.ProtoLens.Field.field @"maybe'state" +maybe'subject :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'subject" a) => + Lens.Family2.LensLike' f s a +maybe'subject = Data.ProtoLens.Field.field @"maybe'subject" +maybe'subscribeOnRequestStatusChange :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'subscribeOnRequestStatusChange" a) => + Lens.Family2.LensLike' f s a +maybe'subscribeOnRequestStatusChange + = Data.ProtoLens.Field.field + @"maybe'subscribeOnRequestStatusChange" +maybe'subscriberType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'subscriberType" a) => + Lens.Family2.LensLike' f s a +maybe'subscriberType + = Data.ProtoLens.Field.field @"maybe'subscriberType" +maybe'systemId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'systemId" a) => + Lens.Family2.LensLike' f s a +maybe'systemId = Data.ProtoLens.Field.field @"maybe'systemId" +maybe'targetProfileId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'targetProfileId" a) => + Lens.Family2.LensLike' f s a +maybe'targetProfileId + = Data.ProtoLens.Field.field @"maybe'targetProfileId" +maybe'text :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'text" a) => + Lens.Family2.LensLike' f s a +maybe'text = Data.ProtoLens.Field.field @"maybe'text" +maybe'third :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'third" a) => + Lens.Family2.LensLike' f s a +maybe'third = Data.ProtoLens.Field.field @"maybe'third" +maybe'timeZone :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'timeZone" a) => + Lens.Family2.LensLike' f s a +maybe'timeZone = Data.ProtoLens.Field.field @"maybe'timeZone" +maybe'top :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'top" a) => + Lens.Family2.LensLike' f s a +maybe'top = Data.ProtoLens.Field.field @"maybe'top" +maybe'traderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'traderId" a) => + Lens.Family2.LensLike' f s a +maybe'traderId = Data.ProtoLens.Field.field @"maybe'traderId" +maybe'type' :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'type'" a) => + Lens.Family2.LensLike' f s a +maybe'type' = Data.ProtoLens.Field.field @"maybe'type'" +maybe'user :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'user" a) => + Lens.Family2.LensLike' f s a +maybe'user = Data.ProtoLens.Field.field @"maybe'user" +maybe'userName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'userName" a) => + Lens.Family2.LensLike' f s a +maybe'userName = Data.ProtoLens.Field.field @"maybe'userName" +maybe'username :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'username" a) => + Lens.Family2.LensLike' f s a +maybe'username = Data.ProtoLens.Field.field @"maybe'username" +maybe'visibleByCqgOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'visibleByCqgOnly" a) => + Lens.Family2.LensLike' f s a +maybe'visibleByCqgOnly + = Data.ProtoLens.Field.field @"maybe'visibleByCqgOnly" +maybe'zip :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'zip" a) => + Lens.Family2.LensLike' f s a +maybe'zip = Data.ProtoLens.Field.field @"maybe'zip" +memberId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "memberId" a) => + Lens.Family2.LensLike' f s a +memberId = Data.ProtoLens.Field.field @"memberId" +memberIdsToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "memberIdsToRemove" a) => + Lens.Family2.LensLike' f s a +memberIdsToRemove = Data.ProtoLens.Field.field @"memberIdsToRemove" +memberIdsToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "memberIdsToSet" a) => + Lens.Family2.LensLike' f s a +memberIdsToSet = Data.ProtoLens.Field.field @"memberIdsToSet" +messageType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "messageType" a) => + Lens.Family2.LensLike' f s a +messageType = Data.ProtoLens.Field.field @"messageType" +name :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "name" a) => + Lens.Family2.LensLike' f s a +name = Data.ProtoLens.Field.field @"name" +newProfileBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newProfileBrokerageId" a) => + Lens.Family2.LensLike' f s a +newProfileBrokerageId + = Data.ProtoLens.Field.field @"newProfileBrokerageId" +newProfileId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newProfileId" a) => + Lens.Family2.LensLike' f s a +newProfileId = Data.ProtoLens.Field.field @"newProfileId" +newUserContactInformation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newUserContactInformation" a) => + Lens.Family2.LensLike' f s a +newUserContactInformation + = Data.ProtoLens.Field.field @"newUserContactInformation" +newUserId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newUserId" a) => + Lens.Family2.LensLike' f s a +newUserId = Data.ProtoLens.Field.field @"newUserId" +newUserUsername :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newUserUsername" a) => + Lens.Family2.LensLike' f s a +newUserUsername = Data.ProtoLens.Field.field @"newUserUsername" +noWelcomeEmail :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "noWelcomeEmail" a) => + Lens.Family2.LensLike' f s a +noWelcomeEmail = Data.ProtoLens.Field.field @"noWelcomeEmail" +number :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "number" a) => + Lens.Family2.LensLike' f s a +number = Data.ProtoLens.Field.field @"number" +obsoleteAgreement :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteAgreement" a) => + Lens.Family2.LensLike' f s a +obsoleteAgreement = Data.ProtoLens.Field.field @"obsoleteAgreement" +obsoleteAgreementRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteAgreementRequired" a) => + Lens.Family2.LensLike' f s a +obsoleteAgreementRequired + = Data.ProtoLens.Field.field @"obsoleteAgreementRequired" +obsoleteAuthenticationSystem :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteAuthenticationSystem" a) => + Lens.Family2.LensLike' f s a +obsoleteAuthenticationSystem + = Data.ProtoLens.Field.field @"obsoleteAuthenticationSystem" +obsoleteEmail :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteEmail" a) => + Lens.Family2.LensLike' f s a +obsoleteEmail = Data.ProtoLens.Field.field @"obsoleteEmail" +obsoleteFirstName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteFirstName" a) => + Lens.Family2.LensLike' f s a +obsoleteFirstName = Data.ProtoLens.Field.field @"obsoleteFirstName" +obsoleteIsStrategyRunner :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteIsStrategyRunner" a) => + Lens.Family2.LensLike' f s a +obsoleteIsStrategyRunner + = Data.ProtoLens.Field.field @"obsoleteIsStrategyRunner" +obsoleteLastName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteLastName" a) => + Lens.Family2.LensLike' f s a +obsoleteLastName = Data.ProtoLens.Field.field @"obsoleteLastName" +obsoleteNewUserAddress :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteNewUserAddress" a) => + Lens.Family2.LensLike' f s a +obsoleteNewUserAddress + = Data.ProtoLens.Field.field @"obsoleteNewUserAddress" +obsoleteNewUserFirstName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteNewUserFirstName" a) => + Lens.Family2.LensLike' f s a +obsoleteNewUserFirstName + = Data.ProtoLens.Field.field @"obsoleteNewUserFirstName" +obsoleteNewUserLastName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteNewUserLastName" a) => + Lens.Family2.LensLike' f s a +obsoleteNewUserLastName + = Data.ProtoLens.Field.field @"obsoleteNewUserLastName" +obsoleteNewUserMiddleInitial :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteNewUserMiddleInitial" a) => + Lens.Family2.LensLike' f s a +obsoleteNewUserMiddleInitial + = Data.ProtoLens.Field.field @"obsoleteNewUserMiddleInitial" +obsoleteOriginalUser :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteOriginalUser" a) => + Lens.Family2.LensLike' f s a +obsoleteOriginalUser + = Data.ProtoLens.Field.field @"obsoleteOriginalUser" +obsoleteSearchCriteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteSearchCriteria" a) => + Lens.Family2.LensLike' f s a +obsoleteSearchCriteria + = Data.ProtoLens.Field.field @"obsoleteSearchCriteria" +obsoleteText :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteText" a) => + Lens.Family2.LensLike' f s a +obsoleteText = Data.ProtoLens.Field.field @"obsoleteText" +onSessionDisconnectAction :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "onSessionDisconnectAction" a) => + Lens.Family2.LensLike' f s a +onSessionDisconnectAction + = Data.ProtoLens.Field.field @"onSessionDisconnectAction" +operationStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operationStatus" a) => + Lens.Family2.LensLike' f s a +operationStatus = Data.ProtoLens.Field.field @"operationStatus" +operationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operationType" a) => + Lens.Family2.LensLike' f s a +operationType = Data.ProtoLens.Field.field @"operationType" +options :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "options" a) => + Lens.Family2.LensLike' f s a +options = Data.ProtoLens.Field.field @"options" +partnerId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "partnerId" a) => + Lens.Family2.LensLike' f s a +partnerId = Data.ProtoLens.Field.field @"partnerId" +password :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "password" a) => + Lens.Family2.LensLike' f s a +password = Data.ProtoLens.Field.field @"password" +passwordNeverExpires :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "passwordNeverExpires" a) => + Lens.Family2.LensLike' f s a +passwordNeverExpires + = Data.ProtoLens.Field.field @"passwordNeverExpires" +phone :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "phone" a) => + Lens.Family2.LensLike' f s a +phone = Data.ProtoLens.Field.field @"phone" +preferredConnectionPointId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "preferredConnectionPointId" a) => + Lens.Family2.LensLike' f s a +preferredConnectionPointId + = Data.ProtoLens.Field.field @"preferredConnectionPointId" +preferredConnectionPointName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "preferredConnectionPointName" a) => + Lens.Family2.LensLike' f s a +preferredConnectionPointName + = Data.ProtoLens.Field.field @"preferredConnectionPointName" +price :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "price" a) => + Lens.Family2.LensLike' f s a +price = Data.ProtoLens.Field.field @"price" +privateLabel :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "privateLabel" a) => + Lens.Family2.LensLike' f s a +privateLabel = Data.ProtoLens.Field.field @"privateLabel" +profileId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileId" a) => + Lens.Family2.LensLike' f s a +profileId = Data.ProtoLens.Field.field @"profileId" +profileSalesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileSalesSeriesId" a) => + Lens.Family2.LensLike' f s a +profileSalesSeriesId + = Data.ProtoLens.Field.field @"profileSalesSeriesId" +profileType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileType" a) => + Lens.Family2.LensLike' f s a +profileType = Data.ProtoLens.Field.field @"profileType" +propertyType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "propertyType" a) => + Lens.Family2.LensLike' f s a +propertyType = Data.ProtoLens.Field.field @"propertyType" +protocolVersionMajor :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "protocolVersionMajor" a) => + Lens.Family2.LensLike' f s a +protocolVersionMajor + = Data.ProtoLens.Field.field @"protocolVersionMajor" +protocolVersionMinor :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "protocolVersionMinor" a) => + Lens.Family2.LensLike' f s a +protocolVersionMinor + = Data.ProtoLens.Field.field @"protocolVersionMinor" +reason :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "reason" a) => + Lens.Family2.LensLike' f s a +reason = Data.ProtoLens.Field.field @"reason" +reconnectTimeoutAfterDisconnect :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "reconnectTimeoutAfterDisconnect" a) => + Lens.Family2.LensLike' f s a +reconnectTimeoutAfterDisconnect + = Data.ProtoLens.Field.field @"reconnectTimeoutAfterDisconnect" +refServiceId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "refServiceId" a) => + Lens.Family2.LensLike' f s a +refServiceId = Data.ProtoLens.Field.field @"refServiceId" +removalDate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "removalDate" a) => + Lens.Family2.LensLike' f s a +removalDate = Data.ProtoLens.Field.field @"removalDate" +removed :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "removed" a) => + Lens.Family2.LensLike' f s a +removed = Data.ProtoLens.Field.field @"removed" +salesSeries :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "salesSeries" a) => + Lens.Family2.LensLike' f s a +salesSeries = Data.ProtoLens.Field.field @"salesSeries" +salesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "salesSeriesId" a) => + Lens.Family2.LensLike' f s a +salesSeriesId = Data.ProtoLens.Field.field @"salesSeriesId" +salesSeriesName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "salesSeriesName" a) => + Lens.Family2.LensLike' f s a +salesSeriesName = Data.ProtoLens.Field.field @"salesSeriesName" +salesSeriesNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "salesSeriesNumber" a) => + Lens.Family2.LensLike' f s a +salesSeriesNumber = Data.ProtoLens.Field.field @"salesSeriesNumber" +scope :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "scope" a) => + Lens.Family2.LensLike' f s a +scope = Data.ProtoLens.Field.field @"scope" +searchOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "searchOptions" a) => + Lens.Family2.LensLike' f s a +searchOptions = Data.ProtoLens.Field.field @"searchOptions" +second :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "second" a) => + Lens.Family2.LensLike' f s a +second = Data.ProtoLens.Field.field @"second" +sessionSettings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "sessionSettings" a) => + Lens.Family2.LensLike' f s a +sessionSettings = Data.ProtoLens.Field.field @"sessionSettings" +sessionToken :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "sessionToken" a) => + Lens.Family2.LensLike' f s a +sessionToken = Data.ProtoLens.Field.field @"sessionToken" +simplified :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "simplified" a) => + Lens.Family2.LensLike' f s a +simplified = Data.ProtoLens.Field.field @"simplified" +source :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "source" a) => + Lens.Family2.LensLike' f s a +source = Data.ProtoLens.Field.field @"source" +sourceUserId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "sourceUserId" a) => + Lens.Family2.LensLike' f s a +sourceUserId = Data.ProtoLens.Field.field @"sourceUserId" +state :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "state" a) => + Lens.Family2.LensLike' f s a +state = Data.ProtoLens.Field.field @"state" +subCategory :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "subCategory" a) => + Lens.Family2.LensLike' f s a +subCategory = Data.ProtoLens.Field.field @"subCategory" +subject :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "subject" a) => + Lens.Family2.LensLike' f s a +subject = Data.ProtoLens.Field.field @"subject" +subscribeOnRequestStatusChange :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "subscribeOnRequestStatusChange" a) => + Lens.Family2.LensLike' f s a +subscribeOnRequestStatusChange + = Data.ProtoLens.Field.field @"subscribeOnRequestStatusChange" +subscriberType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "subscriberType" a) => + Lens.Family2.LensLike' f s a +subscriberType = Data.ProtoLens.Field.field @"subscriberType" +systemId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "systemId" a) => + Lens.Family2.LensLike' f s a +systemId = Data.ProtoLens.Field.field @"systemId" +targetProfileId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "targetProfileId" a) => + Lens.Family2.LensLike' f s a +targetProfileId = Data.ProtoLens.Field.field @"targetProfileId" +text :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "text" a) => + Lens.Family2.LensLike' f s a +text = Data.ProtoLens.Field.field @"text" +third :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "third" a) => + Lens.Family2.LensLike' f s a +third = Data.ProtoLens.Field.field @"third" +timeZone :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "timeZone" a) => + Lens.Family2.LensLike' f s a +timeZone = Data.ProtoLens.Field.field @"timeZone" +top :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "top" a) => + Lens.Family2.LensLike' f s a +top = Data.ProtoLens.Field.field @"top" +traderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "traderId" a) => + Lens.Family2.LensLike' f s a +traderId = Data.ProtoLens.Field.field @"traderId" +tradingInterfaceElements :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradingInterfaceElements" a) => + Lens.Family2.LensLike' f s a +tradingInterfaceElements + = Data.ProtoLens.Field.field @"tradingInterfaceElements" +type' :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "type'" a) => + Lens.Family2.LensLike' f s a +type' = Data.ProtoLens.Field.field @"type'" +user :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "user" a) => + Lens.Family2.LensLike' f s a +user = Data.ProtoLens.Field.field @"user" +userId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "userId" a) => + Lens.Family2.LensLike' f s a +userId = Data.ProtoLens.Field.field @"userId" +userName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "userName" a) => + Lens.Family2.LensLike' f s a +userName = Data.ProtoLens.Field.field @"userName" +username :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "username" a) => + Lens.Family2.LensLike' f s a +username = Data.ProtoLens.Field.field @"username" +value :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "value" a) => + Lens.Family2.LensLike' f s a +value = Data.ProtoLens.Field.field @"value" +vec'address :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'address" a) => + Lens.Family2.LensLike' f s a +vec'address = Data.ProtoLens.Field.field @"vec'address" +vec'billingCustomData :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'billingCustomData" a) => + Lens.Family2.LensLike' f s a +vec'billingCustomData + = Data.ProtoLens.Field.field @"vec'billingCustomData" +vec'brokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'brokerageId" a) => + Lens.Family2.LensLike' f s a +vec'brokerageId = Data.ProtoLens.Field.field @"vec'brokerageId" +vec'categoryId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'categoryId" a) => + Lens.Family2.LensLike' f s a +vec'categoryId = Data.ProtoLens.Field.field @"vec'categoryId" +vec'clearedFields :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'clearedFields" a) => + Lens.Family2.LensLike' f s a +vec'clearedFields = Data.ProtoLens.Field.field @"vec'clearedFields" +vec'constraint :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'constraint" a) => + Lens.Family2.LensLike' f s a +vec'constraint = Data.ProtoLens.Field.field @"vec'constraint" +vec'credentialTypes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'credentialTypes" a) => + Lens.Family2.LensLike' f s a +vec'credentialTypes + = Data.ProtoLens.Field.field @"vec'credentialTypes" +vec'criteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'criteria" a) => + Lens.Family2.LensLike' f s a +vec'criteria = Data.ProtoLens.Field.field @"vec'criteria" +vec'customerSalesSeriesLinks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'customerSalesSeriesLinks" a) => + Lens.Family2.LensLike' f s a +vec'customerSalesSeriesLinks + = Data.ProtoLens.Field.field @"vec'customerSalesSeriesLinks" +vec'email :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'email" a) => + Lens.Family2.LensLike' f s a +vec'email = Data.ProtoLens.Field.field @"vec'email" +vec'enforcedConstraintGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'enforcedConstraintGroup" a) => + Lens.Family2.LensLike' f s a +vec'enforcedConstraintGroup + = Data.ProtoLens.Field.field @"vec'enforcedConstraintGroup" +vec'entities :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'entities" a) => + Lens.Family2.LensLike' f s a +vec'entities = Data.ProtoLens.Field.field @"vec'entities" +vec'entityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'entityId" a) => + Lens.Family2.LensLike' f s a +vec'entityId = Data.ProtoLens.Field.field @"vec'entityId" +vec'fax :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "vec'fax" a) => + Lens.Family2.LensLike' f s a +vec'fax = Data.ProtoLens.Field.field @"vec'fax" +vec'ipWhitelist :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'ipWhitelist" a) => + Lens.Family2.LensLike' f s a +vec'ipWhitelist = Data.ProtoLens.Field.field @"vec'ipWhitelist" +vec'items :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'items" a) => + Lens.Family2.LensLike' f s a +vec'items = Data.ProtoLens.Field.field @"vec'items" +vec'linksToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'linksToRemove" a) => + Lens.Family2.LensLike' f s a +vec'linksToRemove = Data.ProtoLens.Field.field @"vec'linksToRemove" +vec'linksToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'linksToSet" a) => + Lens.Family2.LensLike' f s a +vec'linksToSet = Data.ProtoLens.Field.field @"vec'linksToSet" +vec'loginBillingCustomData :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'loginBillingCustomData" a) => + Lens.Family2.LensLike' f s a +vec'loginBillingCustomData + = Data.ProtoLens.Field.field @"vec'loginBillingCustomData" +vec'loginDomains :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'loginDomains" a) => + Lens.Family2.LensLike' f s a +vec'loginDomains = Data.ProtoLens.Field.field @"vec'loginDomains" +vec'loginMemberIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'loginMemberIds" a) => + Lens.Family2.LensLike' f s a +vec'loginMemberIds + = Data.ProtoLens.Field.field @"vec'loginMemberIds" +vec'lookupProperty :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'lookupProperty" a) => + Lens.Family2.LensLike' f s a +vec'lookupProperty + = Data.ProtoLens.Field.field @"vec'lookupProperty" +vec'memberIdsToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'memberIdsToRemove" a) => + Lens.Family2.LensLike' f s a +vec'memberIdsToRemove + = Data.ProtoLens.Field.field @"vec'memberIdsToRemove" +vec'memberIdsToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'memberIdsToSet" a) => + Lens.Family2.LensLike' f s a +vec'memberIdsToSet + = Data.ProtoLens.Field.field @"vec'memberIdsToSet" +vec'obsoleteSearchCriteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'obsoleteSearchCriteria" a) => + Lens.Family2.LensLike' f s a +vec'obsoleteSearchCriteria + = Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria" +vec'options :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'options" a) => + Lens.Family2.LensLike' f s a +vec'options = Data.ProtoLens.Field.field @"vec'options" +vec'phone :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'phone" a) => + Lens.Family2.LensLike' f s a +vec'phone = Data.ProtoLens.Field.field @"vec'phone" +vec'price :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'price" a) => + Lens.Family2.LensLike' f s a +vec'price = Data.ProtoLens.Field.field @"vec'price" +vec'propertyType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'propertyType" a) => + Lens.Family2.LensLike' f s a +vec'propertyType = Data.ProtoLens.Field.field @"vec'propertyType" +vec'salesSeries :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'salesSeries" a) => + Lens.Family2.LensLike' f s a +vec'salesSeries = Data.ProtoLens.Field.field @"vec'salesSeries" +vec'searchOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'searchOptions" a) => + Lens.Family2.LensLike' f s a +vec'searchOptions = Data.ProtoLens.Field.field @"vec'searchOptions" +vec'sessionSettings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'sessionSettings" a) => + Lens.Family2.LensLike' f s a +vec'sessionSettings + = Data.ProtoLens.Field.field @"vec'sessionSettings" +vec'subCategory :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'subCategory" a) => + Lens.Family2.LensLike' f s a +vec'subCategory = Data.ProtoLens.Field.field @"vec'subCategory" +vec'tradingInterfaceElements :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'tradingInterfaceElements" a) => + Lens.Family2.LensLike' f s a +vec'tradingInterfaceElements + = Data.ProtoLens.Field.field @"vec'tradingInterfaceElements" +visibleByCqgOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "visibleByCqgOnly" a) => + Lens.Family2.LensLike' f s a +visibleByCqgOnly = Data.ProtoLens.Field.field @"visibleByCqgOnly" +zip :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "zip" a) => + Lens.Family2.LensLike' f s a +zip = Data.ProtoLens.Field.field @"zip" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Location1.hs b/cqg-cms-api-proto/src/Proto/CMS/Location1.hs new file mode 100644 index 0000000..8b08f8a --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Location1.hs @@ -0,0 +1,1401 @@ +{- This file was auto-generated from CMS/location_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Location1 ( + ConnectionPoint(), ConnectionPointListRequest(), + ConnectionPointListResult(), LocationScopeRequest(), + LocationScopeResult() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.Common1 +import qualified Proto.Common.Shared1 +{- | Fields : + + * 'Proto.CMS.Location1_Fields.id' @:: Lens' ConnectionPoint Data.Text.Text@ + * 'Proto.CMS.Location1_Fields.maybe'id' @:: Lens' ConnectionPoint (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Location1_Fields.name' @:: Lens' ConnectionPoint Proto.Common.Shared1.Text@ + * 'Proto.CMS.Location1_Fields.maybe'name' @:: Lens' ConnectionPoint (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Location1_Fields.tradeLocationId' @:: Lens' ConnectionPoint Data.Text.Text@ + * 'Proto.CMS.Location1_Fields.maybe'tradeLocationId' @:: Lens' ConnectionPoint (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Location1_Fields.brokerageAuthorizationRequired' @:: Lens' ConnectionPoint Prelude.Bool@ + * 'Proto.CMS.Location1_Fields.maybe'brokerageAuthorizationRequired' @:: Lens' ConnectionPoint (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Location1_Fields.authorizedBrokerageIds' @:: Lens' ConnectionPoint [Data.Text.Text]@ + * 'Proto.CMS.Location1_Fields.vec'authorizedBrokerageIds' @:: Lens' ConnectionPoint (Data.Vector.Vector Data.Text.Text)@ -} +data ConnectionPoint + = ConnectionPoint'_constructor {_ConnectionPoint'id :: !(Prelude.Maybe Data.Text.Text), + _ConnectionPoint'name :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _ConnectionPoint'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _ConnectionPoint'brokerageAuthorizationRequired :: !(Prelude.Maybe Prelude.Bool), + _ConnectionPoint'authorizedBrokerageIds :: !(Data.Vector.Vector Data.Text.Text), + _ConnectionPoint'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ConnectionPoint where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ConnectionPoint "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPoint'id (\ x__ y__ -> x__ {_ConnectionPoint'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ConnectionPoint "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPoint'id (\ x__ y__ -> x__ {_ConnectionPoint'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ConnectionPoint "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPoint'name + (\ x__ y__ -> x__ {_ConnectionPoint'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ConnectionPoint "maybe'name" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPoint'name + (\ x__ y__ -> x__ {_ConnectionPoint'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ConnectionPoint "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPoint'tradeLocationId + (\ x__ y__ -> x__ {_ConnectionPoint'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ConnectionPoint "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPoint'tradeLocationId + (\ x__ y__ -> x__ {_ConnectionPoint'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ConnectionPoint "brokerageAuthorizationRequired" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPoint'brokerageAuthorizationRequired + (\ x__ y__ + -> x__ {_ConnectionPoint'brokerageAuthorizationRequired = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ConnectionPoint "maybe'brokerageAuthorizationRequired" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPoint'brokerageAuthorizationRequired + (\ x__ y__ + -> x__ {_ConnectionPoint'brokerageAuthorizationRequired = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ConnectionPoint "authorizedBrokerageIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPoint'authorizedBrokerageIds + (\ x__ y__ -> x__ {_ConnectionPoint'authorizedBrokerageIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ConnectionPoint "vec'authorizedBrokerageIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPoint'authorizedBrokerageIds + (\ x__ y__ -> x__ {_ConnectionPoint'authorizedBrokerageIds = y__})) + Prelude.id +instance Data.ProtoLens.Message ConnectionPoint where + messageName _ = Data.Text.pack "location_1.ConnectionPoint" + packedMessageDescriptor _ + = "\n\ + \\SIConnectionPoint\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2H\n\ + \ brokerage_authorization_required\CAN\EOT \SOH(\bR\RSbrokerageAuthorizationRequired\DC28\n\ + \\CANauthorized_brokerage_ids\CAN\ENQ \ETX(\tR\SYNauthorizedBrokerageIds" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor ConnectionPoint + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor ConnectionPoint + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor ConnectionPoint + brokerageAuthorizationRequired__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_authorization_required" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'brokerageAuthorizationRequired")) :: + Data.ProtoLens.FieldDescriptor ConnectionPoint + authorizedBrokerageIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "authorized_brokerage_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"authorizedBrokerageIds")) :: + Data.ProtoLens.FieldDescriptor ConnectionPoint + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 4, + brokerageAuthorizationRequired__field_descriptor), + (Data.ProtoLens.Tag 5, authorizedBrokerageIds__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ConnectionPoint'_unknownFields + (\ x__ y__ -> x__ {_ConnectionPoint'_unknownFields = y__}) + defMessage + = ConnectionPoint'_constructor + {_ConnectionPoint'id = Prelude.Nothing, + _ConnectionPoint'name = Prelude.Nothing, + _ConnectionPoint'tradeLocationId = Prelude.Nothing, + _ConnectionPoint'brokerageAuthorizationRequired = Prelude.Nothing, + _ConnectionPoint'authorizedBrokerageIds = Data.Vector.Generic.empty, + _ConnectionPoint'_unknownFields = []} + parseMessage + = let + loop :: + ConnectionPoint + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser ConnectionPoint + loop x mutable'authorizedBrokerageIds + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'authorizedBrokerageIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'authorizedBrokerageIds) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'authorizedBrokerageIds") + frozen'authorizedBrokerageIds x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + mutable'authorizedBrokerageIds + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + mutable'authorizedBrokerageIds + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + mutable'authorizedBrokerageIds + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "brokerage_authorization_required" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAuthorizationRequired") + y x) + mutable'authorizedBrokerageIds + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "authorized_brokerage_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'authorizedBrokerageIds y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'authorizedBrokerageIds + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'authorizedBrokerageIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'authorizedBrokerageIds) + "ConnectionPoint" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'brokerageAuthorizationRequired") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'authorizedBrokerageIds") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData ConnectionPoint where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ConnectionPoint'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ConnectionPoint'id x__) + (Control.DeepSeq.deepseq + (_ConnectionPoint'name x__) + (Control.DeepSeq.deepseq + (_ConnectionPoint'tradeLocationId x__) + (Control.DeepSeq.deepseq + (_ConnectionPoint'brokerageAuthorizationRequired x__) + (Control.DeepSeq.deepseq + (_ConnectionPoint'authorizedBrokerageIds x__) ()))))) +{- | Fields : + + * 'Proto.CMS.Location1_Fields.brokerageIds' @:: Lens' ConnectionPointListRequest [Data.Text.Text]@ + * 'Proto.CMS.Location1_Fields.vec'brokerageIds' @:: Lens' ConnectionPointListRequest (Data.Vector.Vector Data.Text.Text)@ -} +data ConnectionPointListRequest + = ConnectionPointListRequest'_constructor {_ConnectionPointListRequest'brokerageIds :: !(Data.Vector.Vector Data.Text.Text), + _ConnectionPointListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ConnectionPointListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ConnectionPointListRequest "brokerageIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPointListRequest'brokerageIds + (\ x__ y__ + -> x__ {_ConnectionPointListRequest'brokerageIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ConnectionPointListRequest "vec'brokerageIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPointListRequest'brokerageIds + (\ x__ y__ + -> x__ {_ConnectionPointListRequest'brokerageIds = y__})) + Prelude.id +instance Data.ProtoLens.Message ConnectionPointListRequest where + messageName _ + = Data.Text.pack "location_1.ConnectionPointListRequest" + packedMessageDescriptor _ + = "\n\ + \\SUBConnectionPointListRequest\DC2#\n\ + \\rbrokerage_ids\CAN\SOH \ETX(\tR\fbrokerageIds" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + brokerageIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"brokerageIds")) :: + Data.ProtoLens.FieldDescriptor ConnectionPointListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, brokerageIds__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ConnectionPointListRequest'_unknownFields + (\ x__ y__ + -> x__ {_ConnectionPointListRequest'_unknownFields = y__}) + defMessage + = ConnectionPointListRequest'_constructor + {_ConnectionPointListRequest'brokerageIds = Data.Vector.Generic.empty, + _ConnectionPointListRequest'_unknownFields = []} + parseMessage + = let + loop :: + ConnectionPointListRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser ConnectionPointListRequest + loop x mutable'brokerageIds + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'brokerageIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'brokerageIds) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'brokerageIds") + frozen'brokerageIds x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'brokerageIds y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'brokerageIds + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'brokerageIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'brokerageIds) + "ConnectionPointListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'brokerageIds") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData ConnectionPointListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ConnectionPointListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ConnectionPointListRequest'brokerageIds x__) ()) +{- | Fields : + + * 'Proto.CMS.Location1_Fields.connectionPoints' @:: Lens' ConnectionPointListResult [ConnectionPoint]@ + * 'Proto.CMS.Location1_Fields.vec'connectionPoints' @:: Lens' ConnectionPointListResult (Data.Vector.Vector ConnectionPoint)@ -} +data ConnectionPointListResult + = ConnectionPointListResult'_constructor {_ConnectionPointListResult'connectionPoints :: !(Data.Vector.Vector ConnectionPoint), + _ConnectionPointListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ConnectionPointListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ConnectionPointListResult "connectionPoints" [ConnectionPoint] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPointListResult'connectionPoints + (\ x__ y__ + -> x__ {_ConnectionPointListResult'connectionPoints = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ConnectionPointListResult "vec'connectionPoints" (Data.Vector.Vector ConnectionPoint) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConnectionPointListResult'connectionPoints + (\ x__ y__ + -> x__ {_ConnectionPointListResult'connectionPoints = y__})) + Prelude.id +instance Data.ProtoLens.Message ConnectionPointListResult where + messageName _ + = Data.Text.pack "location_1.ConnectionPointListResult" + packedMessageDescriptor _ + = "\n\ + \\EMConnectionPointListResult\DC2H\n\ + \\DC1connection_points\CAN\SOH \ETX(\v2\ESC.location_1.ConnectionPointR\DLEconnectionPoints" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + connectionPoints__field_descriptor + = Data.ProtoLens.FieldDescriptor + "connection_points" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ConnectionPoint) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"connectionPoints")) :: + Data.ProtoLens.FieldDescriptor ConnectionPointListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, connectionPoints__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ConnectionPointListResult'_unknownFields + (\ x__ y__ + -> x__ {_ConnectionPointListResult'_unknownFields = y__}) + defMessage + = ConnectionPointListResult'_constructor + {_ConnectionPointListResult'connectionPoints = Data.Vector.Generic.empty, + _ConnectionPointListResult'_unknownFields = []} + parseMessage + = let + loop :: + ConnectionPointListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ConnectionPoint + -> Data.ProtoLens.Encoding.Bytes.Parser ConnectionPointListResult + loop x mutable'connectionPoints + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'connectionPoints <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'connectionPoints) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'connectionPoints") + frozen'connectionPoints x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "connection_points" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'connectionPoints y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'connectionPoints + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'connectionPoints <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'connectionPoints) + "ConnectionPointListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'connectionPoints") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData ConnectionPointListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ConnectionPointListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ConnectionPointListResult'connectionPoints x__) ()) +{- | Fields : + + * 'Proto.CMS.Location1_Fields.id' @:: Lens' LocationScopeRequest Data.Word.Word32@ + * 'Proto.CMS.Location1_Fields.maybe'id' @:: Lens' LocationScopeRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Location1_Fields.connectionPointListRequest' @:: Lens' LocationScopeRequest ConnectionPointListRequest@ + * 'Proto.CMS.Location1_Fields.maybe'connectionPointListRequest' @:: Lens' LocationScopeRequest (Prelude.Maybe ConnectionPointListRequest)@ -} +data LocationScopeRequest + = LocationScopeRequest'_constructor {_LocationScopeRequest'id :: !(Prelude.Maybe Data.Word.Word32), + _LocationScopeRequest'connectionPointListRequest :: !(Prelude.Maybe ConnectionPointListRequest), + _LocationScopeRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LocationScopeRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LocationScopeRequest "id" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeRequest'id + (\ x__ y__ -> x__ {_LocationScopeRequest'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LocationScopeRequest "maybe'id" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeRequest'id + (\ x__ y__ -> x__ {_LocationScopeRequest'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LocationScopeRequest "connectionPointListRequest" ConnectionPointListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeRequest'connectionPointListRequest + (\ x__ y__ + -> x__ {_LocationScopeRequest'connectionPointListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField LocationScopeRequest "maybe'connectionPointListRequest" (Prelude.Maybe ConnectionPointListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeRequest'connectionPointListRequest + (\ x__ y__ + -> x__ {_LocationScopeRequest'connectionPointListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Message LocationScopeRequest where + messageName _ = Data.Text.pack "location_1.LocationScopeRequest" + packedMessageDescriptor _ + = "\n\ + \\DC4LocationScopeRequest\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\rR\STXid\DC2i\n\ + \\GSconnection_point_list_request\CAN\STX \SOH(\v2&.location_1.ConnectionPointListRequestR\SUBconnectionPointListRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor LocationScopeRequest + connectionPointListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "connection_point_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ConnectionPointListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'connectionPointListRequest")) :: + Data.ProtoLens.FieldDescriptor LocationScopeRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, + connectionPointListRequest__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LocationScopeRequest'_unknownFields + (\ x__ y__ -> x__ {_LocationScopeRequest'_unknownFields = y__}) + defMessage + = LocationScopeRequest'_constructor + {_LocationScopeRequest'id = Prelude.Nothing, + _LocationScopeRequest'connectionPointListRequest = Prelude.Nothing, + _LocationScopeRequest'_unknownFields = []} + parseMessage + = let + loop :: + LocationScopeRequest + -> Data.ProtoLens.Encoding.Bytes.Parser LocationScopeRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "connection_point_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"connectionPointListRequest") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LocationScopeRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'connectionPointListRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData LocationScopeRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LocationScopeRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LocationScopeRequest'id x__) + (Control.DeepSeq.deepseq + (_LocationScopeRequest'connectionPointListRequest x__) ())) +{- | Fields : + + * 'Proto.CMS.Location1_Fields.requestId' @:: Lens' LocationScopeResult Data.Word.Word32@ + * 'Proto.CMS.Location1_Fields.maybe'requestId' @:: Lens' LocationScopeResult (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Location1_Fields.trackingNumber' @:: Lens' LocationScopeResult Data.Word.Word64@ + * 'Proto.CMS.Location1_Fields.maybe'trackingNumber' @:: Lens' LocationScopeResult (Prelude.Maybe Data.Word.Word64)@ + * 'Proto.CMS.Location1_Fields.operationStatus' @:: Lens' LocationScopeResult Data.Word.Word32@ + * 'Proto.CMS.Location1_Fields.maybe'operationStatus' @:: Lens' LocationScopeResult (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Location1_Fields.errorMessage' @:: Lens' LocationScopeResult Proto.Common.Shared1.Text@ + * 'Proto.CMS.Location1_Fields.maybe'errorMessage' @:: Lens' LocationScopeResult (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Location1_Fields.connectionPointListResult' @:: Lens' LocationScopeResult ConnectionPointListResult@ + * 'Proto.CMS.Location1_Fields.maybe'connectionPointListResult' @:: Lens' LocationScopeResult (Prelude.Maybe ConnectionPointListResult)@ -} +data LocationScopeResult + = LocationScopeResult'_constructor {_LocationScopeResult'requestId :: !(Prelude.Maybe Data.Word.Word32), + _LocationScopeResult'trackingNumber :: !(Prelude.Maybe Data.Word.Word64), + _LocationScopeResult'operationStatus :: !(Prelude.Maybe Data.Word.Word32), + _LocationScopeResult'errorMessage :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _LocationScopeResult'connectionPointListResult :: !(Prelude.Maybe ConnectionPointListResult), + _LocationScopeResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LocationScopeResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LocationScopeResult "requestId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeResult'requestId + (\ x__ y__ -> x__ {_LocationScopeResult'requestId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LocationScopeResult "maybe'requestId" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeResult'requestId + (\ x__ y__ -> x__ {_LocationScopeResult'requestId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LocationScopeResult "trackingNumber" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeResult'trackingNumber + (\ x__ y__ -> x__ {_LocationScopeResult'trackingNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LocationScopeResult "maybe'trackingNumber" (Prelude.Maybe Data.Word.Word64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeResult'trackingNumber + (\ x__ y__ -> x__ {_LocationScopeResult'trackingNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LocationScopeResult "operationStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeResult'operationStatus + (\ x__ y__ -> x__ {_LocationScopeResult'operationStatus = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LocationScopeResult "maybe'operationStatus" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeResult'operationStatus + (\ x__ y__ -> x__ {_LocationScopeResult'operationStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LocationScopeResult "errorMessage" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeResult'errorMessage + (\ x__ y__ -> x__ {_LocationScopeResult'errorMessage = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField LocationScopeResult "maybe'errorMessage" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeResult'errorMessage + (\ x__ y__ -> x__ {_LocationScopeResult'errorMessage = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LocationScopeResult "connectionPointListResult" ConnectionPointListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeResult'connectionPointListResult + (\ x__ y__ + -> x__ {_LocationScopeResult'connectionPointListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField LocationScopeResult "maybe'connectionPointListResult" (Prelude.Maybe ConnectionPointListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LocationScopeResult'connectionPointListResult + (\ x__ y__ + -> x__ {_LocationScopeResult'connectionPointListResult = y__})) + Prelude.id +instance Data.ProtoLens.Message LocationScopeResult where + messageName _ = Data.Text.pack "location_1.LocationScopeResult" + packedMessageDescriptor _ + = "\n\ + \\DC3LocationScopeResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \SOH(\rR\trequestId\DC2'\n\ + \\SItracking_number\CAN\STX \SOH(\EOTR\SOtrackingNumber\DC2)\n\ + \\DLEoperation_status\CAN\ETX \SOH(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\EOT \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2f\n\ + \\FSconnection_point_list_result\CAN\ENQ \SOH(\v2%.location_1.ConnectionPointListResultR\EMconnectionPointListResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + requestId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "request_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'requestId")) :: + Data.ProtoLens.FieldDescriptor LocationScopeResult + trackingNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "tracking_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'trackingNumber")) :: + Data.ProtoLens.FieldDescriptor LocationScopeResult + operationStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'operationStatus")) :: + Data.ProtoLens.FieldDescriptor LocationScopeResult + errorMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "error_message" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'errorMessage")) :: + Data.ProtoLens.FieldDescriptor LocationScopeResult + connectionPointListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "connection_point_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ConnectionPointListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'connectionPointListResult")) :: + Data.ProtoLens.FieldDescriptor LocationScopeResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, requestId__field_descriptor), + (Data.ProtoLens.Tag 2, trackingNumber__field_descriptor), + (Data.ProtoLens.Tag 3, operationStatus__field_descriptor), + (Data.ProtoLens.Tag 4, errorMessage__field_descriptor), + (Data.ProtoLens.Tag 5, + connectionPointListResult__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LocationScopeResult'_unknownFields + (\ x__ y__ -> x__ {_LocationScopeResult'_unknownFields = y__}) + defMessage + = LocationScopeResult'_constructor + {_LocationScopeResult'requestId = Prelude.Nothing, + _LocationScopeResult'trackingNumber = Prelude.Nothing, + _LocationScopeResult'operationStatus = Prelude.Nothing, + _LocationScopeResult'errorMessage = Prelude.Nothing, + _LocationScopeResult'connectionPointListResult = Prelude.Nothing, + _LocationScopeResult'_unknownFields = []} + parseMessage + = let + loop :: + LocationScopeResult + -> Data.ProtoLens.Encoding.Bytes.Parser LocationScopeResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "request_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "tracking_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"trackingNumber") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationStatus") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "error_message" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"errorMessage") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "connection_point_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"connectionPointListResult") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LocationScopeResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'requestId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'trackingNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'operationStatus") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'errorMessage") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'connectionPointListResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData LocationScopeResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LocationScopeResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LocationScopeResult'requestId x__) + (Control.DeepSeq.deepseq + (_LocationScopeResult'trackingNumber x__) + (Control.DeepSeq.deepseq + (_LocationScopeResult'operationStatus x__) + (Control.DeepSeq.deepseq + (_LocationScopeResult'errorMessage x__) + (Control.DeepSeq.deepseq + (_LocationScopeResult'connectionPointListResult x__) ()))))) +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\DC4CMS/location_1.proto\DC2\n\ + \location_1\SUB\NAKcommon/shared_1.proto\SUB\DC2CMS/common_1.proto\"\145\SOH\n\ + \\DC4LocationScopeRequest\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\rR\STXid\DC2i\n\ + \\GSconnection_point_list_request\CAN\STX \SOH(\v2&.location_1.ConnectionPointListRequestR\SUBconnectionPointListRequest\"\165\STX\n\ + \\DC3LocationScopeResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \SOH(\rR\trequestId\DC2'\n\ + \\SItracking_number\CAN\STX \SOH(\EOTR\SOtrackingNumber\DC2)\n\ + \\DLEoperation_status\CAN\ETX \SOH(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\EOT \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2f\n\ + \\FSconnection_point_list_result\CAN\ENQ \SOH(\v2%.location_1.ConnectionPointListResultR\EMconnectionPointListResult\"A\n\ + \\SUBConnectionPointListRequest\DC2#\n\ + \\rbrokerage_ids\CAN\SOH \ETX(\tR\fbrokerageIds\"e\n\ + \\EMConnectionPointListResult\DC2H\n\ + \\DC1connection_points\CAN\SOH \ETX(\v2\ESC.location_1.ConnectionPointR\DLEconnectionPoints\"\245\SOH\n\ + \\SIConnectionPoint\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2H\n\ + \ brokerage_authorization_required\CAN\EOT \SOH(\bR\RSbrokerageAuthorizationRequired\DC28\n\ + \\CANauthorized_brokerage_ids\CAN\ENQ \ETX(\tR\SYNauthorizedBrokerageIdsJ\159\DLE\n\ + \\ACK\DC2\EOT\STX\NULD\SOH\n\ + \-\n\ + \\SOH\f\DC2\ETX\STX\NUL\DC22# CMS API Location entity Protocol.\n\ + \\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\EOT\NUL\DC3\n\ + \\t\n\ + \\STX\ETX\NUL\DC2\ETX\ACK\NUL\US\n\ + \\t\n\ + \\STX\ETX\SOH\DC2\ETX\a\NUL\FS\n\ + \\n\ + \\n\ + \\STX\EOT\NUL\DC2\EOT\t\NUL\DC1\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\t\b\FS\n\ + \b\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX\r\EOT\ESC\SUBU [required] Request identifier.\n\ + \ It should be unique to match with operation result.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX\r\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\r\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\r\DC4\SYN\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\r\EM\SUB\n\ + \-\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX\DLE\EOTJ\SUB Request for connection points.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX\DLE\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX\DLE\r'\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\DLE(E\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\DLEHI\n\ + \\n\ + \\n\ + \\STX\EOT\SOH\DC2\EOT\DC3\NUL%\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX\DC3\b\ESC\n\ + \-\n\ + \\EOT\EOT\SOH\STX\NUL\DC2\ETX\SYN\EOT#\SUB ID of a corresponding request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\EOT\DC2\ETX\SYN\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETX\SYN\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX\SYN\DC4\RS\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX\SYN!\"\n\ + \f\n\ + \\EOT\EOT\SOH\STX\SOH\DC2\ETX\SUB\EOT(\SUBY Request tracking number generated by CMS API\n\ + \ Used by client to cancel deferred request\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETX\SUB\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETX\SUB\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX\SUB\DC4#\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX\SUB&'\n\ + \^\n\ + \\EOT\EOT\SOH\STX\STX\DC2\ETX\RS\EOT)\SUBQ Operation status.\n\ + \ This field is associated with common_1.OperationStatus enum.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\EOT\DC2\ETX\RS\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ENQ\DC2\ETX\RS\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETX\RS\DC4$\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETX\RS'(\n\ + \\US\n\ + \\EOT\EOT\SOH\STX\ETX\DC2\ETX!\EOT-\SUB\DC2 Failure details.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\EOT\DC2\ETX!\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ACK\DC2\ETX!\r\SUB\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETX!\ESC(\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETX!+,\n\ + \/\n\ + \\EOT\EOT\SOH\STX\EOT\DC2\ETX$\EOTH\SUB\" Available connection point list.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\EOT\DC2\ETX$\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ACK\DC2\ETX$\r&\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\SOH\DC2\ETX$'C\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ETX\DC2\ETX$FG\n\ + \.\n\ + \\STX\EOT\STX\DC2\EOT(\NUL-\SOH\SUB\" Get a list of connection points.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\STX\SOH\DC2\ETX(\b\"\n\ + \\206\SOH\n\ + \\EOT\EOT\STX\STX\NUL\DC2\ETX,\EOT'\SUB\192\SOH Brokerages to which connection points with brokerage_authorization_required must have authorization.\n\ + \ If not provided all connection points available to current admin login will be returned.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\EOT\DC2\ETX,\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETX,\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX,\DC4!\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX,%&\n\ + \\n\ + \\n\ + \\STX\EOT\ETX\DC2\EOT/\NUL2\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\ETX\SOH\DC2\ETX/\b!\n\ + \\v\n\ + \\EOT\EOT\ETX\STX\NUL\DC2\ETX1\EOT3\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\EOT\DC2\ETX1\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ACK\DC2\ETX1\r\FS\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETX1\GS.\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETX112\n\ + \\n\ + \\n\ + \\STX\EOT\EOT\DC2\EOT4\NULD\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\EOT\SOH\DC2\ETX4\b\ETB\n\ + \.\n\ + \\EOT\EOT\EOT\STX\NUL\DC2\ETX7\EOT\ESC\SUB! [required] Connection Point id.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\EOT\DC2\ETX7\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\ETX7\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\ETX7\DC4\SYN\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\ETX7\EM\SUB\n\ + \0\n\ + \\EOT\EOT\EOT\STX\SOH\DC2\ETX:\EOT$\SUB# [required] Connection Point Name.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\EOT\DC2\ETX:\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\ACK\DC2\ETX:\r\SUB\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\ETX:\ESC\US\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\ETX:\"#\n\ + \4\n\ + \\EOT\EOT\EOT\STX\STX\DC2\ETX=\EOT*\SUB' [required] Corresponding location id.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\EOT\DC2\ETX=\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\ENQ\DC2\ETX=\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\SOH\DC2\ETX=\DC4%\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\ETX\DC2\ETX=()\n\ + \`\n\ + \\EOT\EOT\EOT\STX\ETX\DC2\ETX@\EOT7\SUBS [required] Flag, indicating if connection point requires brokerage authorization.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ETX\EOT\DC2\ETX@\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ETX\ENQ\DC2\ETX@\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ETX\SOH\DC2\ETX@\DC22\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ETX\ETX\DC2\ETX@56\n\ + \f\n\ + \\EOT\EOT\EOT\STX\EOT\DC2\ETXC\EOT1\SUBY Brokerages which have authorization for connection point, which requires authorization.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\EOT\EOT\DC2\ETXC\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\EOT\ENQ\DC2\ETXC\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\EOT\SOH\DC2\ETXC\DC4,\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\EOT\ETX\DC2\ETXC/0" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Location1_Fields.hs b/cqg-cms-api-proto/src/Proto/CMS/Location1_Fields.hs new file mode 100644 index 0000000..1ac07eb --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Location1_Fields.hs @@ -0,0 +1,199 @@ +{- This file was auto-generated from CMS/location_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Location1_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.Common1 +import qualified Proto.Common.Shared1 +authorizedBrokerageIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "authorizedBrokerageIds" a) => + Lens.Family2.LensLike' f s a +authorizedBrokerageIds + = Data.ProtoLens.Field.field @"authorizedBrokerageIds" +brokerageAuthorizationRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageAuthorizationRequired" a) => + Lens.Family2.LensLike' f s a +brokerageAuthorizationRequired + = Data.ProtoLens.Field.field @"brokerageAuthorizationRequired" +brokerageIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageIds" a) => + Lens.Family2.LensLike' f s a +brokerageIds = Data.ProtoLens.Field.field @"brokerageIds" +connectionPointListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "connectionPointListRequest" a) => + Lens.Family2.LensLike' f s a +connectionPointListRequest + = Data.ProtoLens.Field.field @"connectionPointListRequest" +connectionPointListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "connectionPointListResult" a) => + Lens.Family2.LensLike' f s a +connectionPointListResult + = Data.ProtoLens.Field.field @"connectionPointListResult" +connectionPoints :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "connectionPoints" a) => + Lens.Family2.LensLike' f s a +connectionPoints = Data.ProtoLens.Field.field @"connectionPoints" +errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "errorMessage" a) => + Lens.Family2.LensLike' f s a +errorMessage = Data.ProtoLens.Field.field @"errorMessage" +id :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "id" a) => + Lens.Family2.LensLike' f s a +id = Data.ProtoLens.Field.field @"id" +maybe'brokerageAuthorizationRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'brokerageAuthorizationRequired" a) => + Lens.Family2.LensLike' f s a +maybe'brokerageAuthorizationRequired + = Data.ProtoLens.Field.field + @"maybe'brokerageAuthorizationRequired" +maybe'connectionPointListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'connectionPointListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'connectionPointListRequest + = Data.ProtoLens.Field.field @"maybe'connectionPointListRequest" +maybe'connectionPointListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'connectionPointListResult" a) => + Lens.Family2.LensLike' f s a +maybe'connectionPointListResult + = Data.ProtoLens.Field.field @"maybe'connectionPointListResult" +maybe'errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'errorMessage" a) => + Lens.Family2.LensLike' f s a +maybe'errorMessage + = Data.ProtoLens.Field.field @"maybe'errorMessage" +maybe'id :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'id" a) => + Lens.Family2.LensLike' f s a +maybe'id = Data.ProtoLens.Field.field @"maybe'id" +maybe'name :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'name" a) => + Lens.Family2.LensLike' f s a +maybe'name = Data.ProtoLens.Field.field @"maybe'name" +maybe'operationStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'operationStatus" a) => + Lens.Family2.LensLike' f s a +maybe'operationStatus + = Data.ProtoLens.Field.field @"maybe'operationStatus" +maybe'requestId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'requestId" a) => + Lens.Family2.LensLike' f s a +maybe'requestId = Data.ProtoLens.Field.field @"maybe'requestId" +maybe'trackingNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'trackingNumber" a) => + Lens.Family2.LensLike' f s a +maybe'trackingNumber + = Data.ProtoLens.Field.field @"maybe'trackingNumber" +maybe'tradeLocationId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradeLocationId" a) => + Lens.Family2.LensLike' f s a +maybe'tradeLocationId + = Data.ProtoLens.Field.field @"maybe'tradeLocationId" +name :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "name" a) => + Lens.Family2.LensLike' f s a +name = Data.ProtoLens.Field.field @"name" +operationStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operationStatus" a) => + Lens.Family2.LensLike' f s a +operationStatus = Data.ProtoLens.Field.field @"operationStatus" +requestId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "requestId" a) => + Lens.Family2.LensLike' f s a +requestId = Data.ProtoLens.Field.field @"requestId" +trackingNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "trackingNumber" a) => + Lens.Family2.LensLike' f s a +trackingNumber = Data.ProtoLens.Field.field @"trackingNumber" +tradeLocationId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradeLocationId" a) => + Lens.Family2.LensLike' f s a +tradeLocationId = Data.ProtoLens.Field.field @"tradeLocationId" +vec'authorizedBrokerageIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'authorizedBrokerageIds" a) => + Lens.Family2.LensLike' f s a +vec'authorizedBrokerageIds + = Data.ProtoLens.Field.field @"vec'authorizedBrokerageIds" +vec'brokerageIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'brokerageIds" a) => + Lens.Family2.LensLike' f s a +vec'brokerageIds = Data.ProtoLens.Field.field @"vec'brokerageIds" +vec'connectionPoints :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'connectionPoints" a) => + Lens.Family2.LensLike' f s a +vec'connectionPoints + = Data.ProtoLens.Field.field @"vec'connectionPoints" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/LogEvent1.hs b/cqg-cms-api-proto/src/Proto/CMS/LogEvent1.hs new file mode 100644 index 0000000..d7605b5 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/LogEvent1.hs @@ -0,0 +1,1491 @@ +{- This file was auto-generated from CMS/log_event_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.LogEvent1 ( + EventLogSearchRequest(), EventLogSearchRequest'SearchCriteria(..), + EventLogSearchRequest'SearchCriteria(), EventLogSearchResult(), + EventLogSearchResultRecord() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.Common1 +{- | Fields : + + * 'Proto.CMS.LogEvent1_Fields.top' @:: Lens' EventLogSearchRequest Data.Word.Word32@ + * 'Proto.CMS.LogEvent1_Fields.maybe'top' @:: Lens' EventLogSearchRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.LogEvent1_Fields.searchOptions' @:: Lens' EventLogSearchRequest [Proto.CMS.Common1.SearchOption]@ + * 'Proto.CMS.LogEvent1_Fields.vec'searchOptions' @:: Lens' EventLogSearchRequest (Data.Vector.Vector Proto.CMS.Common1.SearchOption)@ -} +data EventLogSearchRequest + = EventLogSearchRequest'_constructor {_EventLogSearchRequest'top :: !(Prelude.Maybe Data.Word.Word32), + _EventLogSearchRequest'searchOptions :: !(Data.Vector.Vector Proto.CMS.Common1.SearchOption), + _EventLogSearchRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EventLogSearchRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EventLogSearchRequest "top" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchRequest'top + (\ x__ y__ -> x__ {_EventLogSearchRequest'top = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchRequest "maybe'top" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchRequest'top + (\ x__ y__ -> x__ {_EventLogSearchRequest'top = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchRequest "searchOptions" [Proto.CMS.Common1.SearchOption] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchRequest'searchOptions + (\ x__ y__ -> x__ {_EventLogSearchRequest'searchOptions = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EventLogSearchRequest "vec'searchOptions" (Data.Vector.Vector Proto.CMS.Common1.SearchOption) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchRequest'searchOptions + (\ x__ y__ -> x__ {_EventLogSearchRequest'searchOptions = y__})) + Prelude.id +instance Data.ProtoLens.Message EventLogSearchRequest where + messageName _ = Data.Text.pack "log_event_1.EventLogSearchRequest" + packedMessageDescriptor _ + = "\n\ + \\NAKEventLogSearchRequest\DC2\DLE\n\ + \\ETXtop\CAN\SOH \SOH(\rR\ETXtop\DC2=\n\ + \\SOsearch_options\CAN\STX \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\"\132\SOH\n\ + \\SOSearchCriteria\DC2\f\n\ + \\bEVENT_ID\DLE\SOH\DC2\DC1\n\ + \\rEVENT_TYPE_ID\DLE\STX\DC2\DC2\n\ + \\SOEVENT_GROUP_ID\DLE\ETX\DC2\DC2\n\ + \\SOENTITY_TYPE_ID\DLE\EOT\DC2\r\n\ + \\tENTITY_ID\DLE\ENQ\DC2\r\n\ + \\tFROM_DATE\DLE\ACK\DC2\v\n\ + \\aTO_DATE\DLE\a" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + top__field_descriptor + = Data.ProtoLens.FieldDescriptor + "top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'top")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchRequest + searchOptions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "search_options" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.SearchOption) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"searchOptions")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, top__field_descriptor), + (Data.ProtoLens.Tag 2, searchOptions__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EventLogSearchRequest'_unknownFields + (\ x__ y__ -> x__ {_EventLogSearchRequest'_unknownFields = y__}) + defMessage + = EventLogSearchRequest'_constructor + {_EventLogSearchRequest'top = Prelude.Nothing, + _EventLogSearchRequest'searchOptions = Data.Vector.Generic.empty, + _EventLogSearchRequest'_unknownFields = []} + parseMessage + = let + loop :: + EventLogSearchRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.SearchOption + -> Data.ProtoLens.Encoding.Bytes.Parser EventLogSearchRequest + loop x mutable'searchOptions + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'searchOptions) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'searchOptions") + frozen'searchOptions x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "top" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"top") y x) + mutable'searchOptions + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "search_options" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'searchOptions y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'searchOptions + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'searchOptions) + "EventLogSearchRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'top") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'searchOptions") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData EventLogSearchRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EventLogSearchRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EventLogSearchRequest'top x__) + (Control.DeepSeq.deepseq + (_EventLogSearchRequest'searchOptions x__) ())) +data EventLogSearchRequest'SearchCriteria + = EventLogSearchRequest'EVENT_ID | + EventLogSearchRequest'EVENT_TYPE_ID | + EventLogSearchRequest'EVENT_GROUP_ID | + EventLogSearchRequest'ENTITY_TYPE_ID | + EventLogSearchRequest'ENTITY_ID | + EventLogSearchRequest'FROM_DATE | + EventLogSearchRequest'TO_DATE + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum EventLogSearchRequest'SearchCriteria where + maybeToEnum 1 = Prelude.Just EventLogSearchRequest'EVENT_ID + maybeToEnum 2 = Prelude.Just EventLogSearchRequest'EVENT_TYPE_ID + maybeToEnum 3 = Prelude.Just EventLogSearchRequest'EVENT_GROUP_ID + maybeToEnum 4 = Prelude.Just EventLogSearchRequest'ENTITY_TYPE_ID + maybeToEnum 5 = Prelude.Just EventLogSearchRequest'ENTITY_ID + maybeToEnum 6 = Prelude.Just EventLogSearchRequest'FROM_DATE + maybeToEnum 7 = Prelude.Just EventLogSearchRequest'TO_DATE + maybeToEnum _ = Prelude.Nothing + showEnum EventLogSearchRequest'EVENT_ID = "EVENT_ID" + showEnum EventLogSearchRequest'EVENT_TYPE_ID = "EVENT_TYPE_ID" + showEnum EventLogSearchRequest'EVENT_GROUP_ID = "EVENT_GROUP_ID" + showEnum EventLogSearchRequest'ENTITY_TYPE_ID = "ENTITY_TYPE_ID" + showEnum EventLogSearchRequest'ENTITY_ID = "ENTITY_ID" + showEnum EventLogSearchRequest'FROM_DATE = "FROM_DATE" + showEnum EventLogSearchRequest'TO_DATE = "TO_DATE" + readEnum k + | (Prelude.==) k "EVENT_ID" + = Prelude.Just EventLogSearchRequest'EVENT_ID + | (Prelude.==) k "EVENT_TYPE_ID" + = Prelude.Just EventLogSearchRequest'EVENT_TYPE_ID + | (Prelude.==) k "EVENT_GROUP_ID" + = Prelude.Just EventLogSearchRequest'EVENT_GROUP_ID + | (Prelude.==) k "ENTITY_TYPE_ID" + = Prelude.Just EventLogSearchRequest'ENTITY_TYPE_ID + | (Prelude.==) k "ENTITY_ID" + = Prelude.Just EventLogSearchRequest'ENTITY_ID + | (Prelude.==) k "FROM_DATE" + = Prelude.Just EventLogSearchRequest'FROM_DATE + | (Prelude.==) k "TO_DATE" + = Prelude.Just EventLogSearchRequest'TO_DATE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded EventLogSearchRequest'SearchCriteria where + minBound = EventLogSearchRequest'EVENT_ID + maxBound = EventLogSearchRequest'TO_DATE +instance Prelude.Enum EventLogSearchRequest'SearchCriteria where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum SearchCriteria: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum EventLogSearchRequest'EVENT_ID = 1 + fromEnum EventLogSearchRequest'EVENT_TYPE_ID = 2 + fromEnum EventLogSearchRequest'EVENT_GROUP_ID = 3 + fromEnum EventLogSearchRequest'ENTITY_TYPE_ID = 4 + fromEnum EventLogSearchRequest'ENTITY_ID = 5 + fromEnum EventLogSearchRequest'FROM_DATE = 6 + fromEnum EventLogSearchRequest'TO_DATE = 7 + succ EventLogSearchRequest'TO_DATE + = Prelude.error + "EventLogSearchRequest'SearchCriteria.succ: bad argument EventLogSearchRequest'TO_DATE. This value would be out of bounds." + succ EventLogSearchRequest'EVENT_ID + = EventLogSearchRequest'EVENT_TYPE_ID + succ EventLogSearchRequest'EVENT_TYPE_ID + = EventLogSearchRequest'EVENT_GROUP_ID + succ EventLogSearchRequest'EVENT_GROUP_ID + = EventLogSearchRequest'ENTITY_TYPE_ID + succ EventLogSearchRequest'ENTITY_TYPE_ID + = EventLogSearchRequest'ENTITY_ID + succ EventLogSearchRequest'ENTITY_ID + = EventLogSearchRequest'FROM_DATE + succ EventLogSearchRequest'FROM_DATE + = EventLogSearchRequest'TO_DATE + pred EventLogSearchRequest'EVENT_ID + = Prelude.error + "EventLogSearchRequest'SearchCriteria.pred: bad argument EventLogSearchRequest'EVENT_ID. This value would be out of bounds." + pred EventLogSearchRequest'EVENT_TYPE_ID + = EventLogSearchRequest'EVENT_ID + pred EventLogSearchRequest'EVENT_GROUP_ID + = EventLogSearchRequest'EVENT_TYPE_ID + pred EventLogSearchRequest'ENTITY_TYPE_ID + = EventLogSearchRequest'EVENT_GROUP_ID + pred EventLogSearchRequest'ENTITY_ID + = EventLogSearchRequest'ENTITY_TYPE_ID + pred EventLogSearchRequest'FROM_DATE + = EventLogSearchRequest'ENTITY_ID + pred EventLogSearchRequest'TO_DATE + = EventLogSearchRequest'FROM_DATE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault EventLogSearchRequest'SearchCriteria where + fieldDefault = EventLogSearchRequest'EVENT_ID +instance Control.DeepSeq.NFData EventLogSearchRequest'SearchCriteria where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.LogEvent1_Fields.eventLogRecord' @:: Lens' EventLogSearchResult [EventLogSearchResultRecord]@ + * 'Proto.CMS.LogEvent1_Fields.vec'eventLogRecord' @:: Lens' EventLogSearchResult (Data.Vector.Vector EventLogSearchResultRecord)@ + * 'Proto.CMS.LogEvent1_Fields.isComplete' @:: Lens' EventLogSearchResult Prelude.Bool@ + * 'Proto.CMS.LogEvent1_Fields.maybe'isComplete' @:: Lens' EventLogSearchResult (Prelude.Maybe Prelude.Bool)@ -} +data EventLogSearchResult + = EventLogSearchResult'_constructor {_EventLogSearchResult'eventLogRecord :: !(Data.Vector.Vector EventLogSearchResultRecord), + _EventLogSearchResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _EventLogSearchResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EventLogSearchResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EventLogSearchResult "eventLogRecord" [EventLogSearchResultRecord] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResult'eventLogRecord + (\ x__ y__ -> x__ {_EventLogSearchResult'eventLogRecord = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EventLogSearchResult "vec'eventLogRecord" (Data.Vector.Vector EventLogSearchResultRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResult'eventLogRecord + (\ x__ y__ -> x__ {_EventLogSearchResult'eventLogRecord = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResult'isComplete + (\ x__ y__ -> x__ {_EventLogSearchResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField EventLogSearchResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResult'isComplete + (\ x__ y__ -> x__ {_EventLogSearchResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Message EventLogSearchResult where + messageName _ = Data.Text.pack "log_event_1.EventLogSearchResult" + packedMessageDescriptor _ + = "\n\ + \\DC4EventLogSearchResult\DC2Q\n\ + \\DLEevent_log_record\CAN\SOH \ETX(\v2'.log_event_1.EventLogSearchResultRecordR\SOeventLogRecord\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + eventLogRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "event_log_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EventLogSearchResultRecord) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"eventLogRecord")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, eventLogRecord__field_descriptor), + (Data.ProtoLens.Tag 2, isComplete__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EventLogSearchResult'_unknownFields + (\ x__ y__ -> x__ {_EventLogSearchResult'_unknownFields = y__}) + defMessage + = EventLogSearchResult'_constructor + {_EventLogSearchResult'eventLogRecord = Data.Vector.Generic.empty, + _EventLogSearchResult'isComplete = Prelude.Nothing, + _EventLogSearchResult'_unknownFields = []} + parseMessage + = let + loop :: + EventLogSearchResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld EventLogSearchResultRecord + -> Data.ProtoLens.Encoding.Bytes.Parser EventLogSearchResult + loop x mutable'eventLogRecord + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'eventLogRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'eventLogRecord) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'eventLogRecord") + frozen'eventLogRecord x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "event_log_record" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'eventLogRecord y) + loop x v + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + mutable'eventLogRecord + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'eventLogRecord + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'eventLogRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'eventLogRecord) + "EventLogSearchResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'eventLogRecord") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData EventLogSearchResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EventLogSearchResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResult'eventLogRecord x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResult'isComplete x__) ())) +{- | Fields : + + * 'Proto.CMS.LogEvent1_Fields.eventId' @:: Lens' EventLogSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.LogEvent1_Fields.maybe'eventId' @:: Lens' EventLogSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.LogEvent1_Fields.eventGroupId' @:: Lens' EventLogSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.LogEvent1_Fields.maybe'eventGroupId' @:: Lens' EventLogSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.LogEvent1_Fields.eventGroupName' @:: Lens' EventLogSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.LogEvent1_Fields.maybe'eventGroupName' @:: Lens' EventLogSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.LogEvent1_Fields.eventTypeId' @:: Lens' EventLogSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.LogEvent1_Fields.maybe'eventTypeId' @:: Lens' EventLogSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.LogEvent1_Fields.eventTypeName' @:: Lens' EventLogSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.LogEvent1_Fields.maybe'eventTypeName' @:: Lens' EventLogSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.LogEvent1_Fields.eventTime' @:: Lens' EventLogSearchResultRecord Data.Int.Int64@ + * 'Proto.CMS.LogEvent1_Fields.maybe'eventTime' @:: Lens' EventLogSearchResultRecord (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.LogEvent1_Fields.loginId' @:: Lens' EventLogSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.LogEvent1_Fields.maybe'loginId' @:: Lens' EventLogSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.LogEvent1_Fields.loginName' @:: Lens' EventLogSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.LogEvent1_Fields.maybe'loginName' @:: Lens' EventLogSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.LogEvent1_Fields.entityTypeId' @:: Lens' EventLogSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.LogEvent1_Fields.maybe'entityTypeId' @:: Lens' EventLogSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.LogEvent1_Fields.entityId' @:: Lens' EventLogSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.LogEvent1_Fields.maybe'entityId' @:: Lens' EventLogSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.LogEvent1_Fields.text' @:: Lens' EventLogSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.LogEvent1_Fields.maybe'text' @:: Lens' EventLogSearchResultRecord (Prelude.Maybe Data.Text.Text)@ -} +data EventLogSearchResultRecord + = EventLogSearchResultRecord'_constructor {_EventLogSearchResultRecord'eventId :: !(Prelude.Maybe Data.Text.Text), + _EventLogSearchResultRecord'eventGroupId :: !(Prelude.Maybe Data.Text.Text), + _EventLogSearchResultRecord'eventGroupName :: !(Prelude.Maybe Data.Text.Text), + _EventLogSearchResultRecord'eventTypeId :: !(Prelude.Maybe Data.Text.Text), + _EventLogSearchResultRecord'eventTypeName :: !(Prelude.Maybe Data.Text.Text), + _EventLogSearchResultRecord'eventTime :: !(Prelude.Maybe Data.Int.Int64), + _EventLogSearchResultRecord'loginId :: !(Prelude.Maybe Data.Text.Text), + _EventLogSearchResultRecord'loginName :: !(Prelude.Maybe Data.Text.Text), + _EventLogSearchResultRecord'entityTypeId :: !(Prelude.Maybe Data.Text.Text), + _EventLogSearchResultRecord'entityId :: !(Prelude.Maybe Data.Text.Text), + _EventLogSearchResultRecord'text :: !(Prelude.Maybe Data.Text.Text), + _EventLogSearchResultRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EventLogSearchResultRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "eventId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventId + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'eventId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "maybe'eventId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventId + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'eventId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "eventGroupId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventGroupId + (\ x__ y__ + -> x__ {_EventLogSearchResultRecord'eventGroupId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "maybe'eventGroupId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventGroupId + (\ x__ y__ + -> x__ {_EventLogSearchResultRecord'eventGroupId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "eventGroupName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventGroupName + (\ x__ y__ + -> x__ {_EventLogSearchResultRecord'eventGroupName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "maybe'eventGroupName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventGroupName + (\ x__ y__ + -> x__ {_EventLogSearchResultRecord'eventGroupName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "eventTypeId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventTypeId + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'eventTypeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "maybe'eventTypeId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventTypeId + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'eventTypeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "eventTypeName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventTypeName + (\ x__ y__ + -> x__ {_EventLogSearchResultRecord'eventTypeName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "maybe'eventTypeName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventTypeName + (\ x__ y__ + -> x__ {_EventLogSearchResultRecord'eventTypeName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "eventTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventTime + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'eventTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "maybe'eventTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'eventTime + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'eventTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'loginId + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'loginId + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "loginName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'loginName + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'loginName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "maybe'loginName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'loginName + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'loginName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "entityTypeId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'entityTypeId + (\ x__ y__ + -> x__ {_EventLogSearchResultRecord'entityTypeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "maybe'entityTypeId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'entityTypeId + (\ x__ y__ + -> x__ {_EventLogSearchResultRecord'entityTypeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "entityId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'entityId + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'entityId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "maybe'entityId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'entityId + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'entityId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "text" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'text + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'text = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EventLogSearchResultRecord "maybe'text" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'text + (\ x__ y__ -> x__ {_EventLogSearchResultRecord'text = y__})) + Prelude.id +instance Data.ProtoLens.Message EventLogSearchResultRecord where + messageName _ + = Data.Text.pack "log_event_1.EventLogSearchResultRecord" + packedMessageDescriptor _ + = "\n\ + \\SUBEventLogSearchResultRecord\DC2\EM\n\ + \\bevent_id\CAN\SOH \SOH(\tR\aeventId\DC2$\n\ + \\SOevent_group_id\CAN\STX \SOH(\tR\feventGroupId\DC2(\n\ + \\DLEevent_group_name\CAN\ETX \SOH(\tR\SOeventGroupName\DC2\"\n\ + \\revent_type_id\CAN\EOT \SOH(\tR\veventTypeId\DC2&\n\ + \\SIevent_type_name\CAN\ENQ \SOH(\tR\reventTypeName\DC2\GS\n\ + \\n\ + \event_time\CAN\ACK \SOH(\DC2R\teventTime\DC2\EM\n\ + \\blogin_id\CAN\a \SOH(\tR\aloginId\DC2\GS\n\ + \\n\ + \login_name\CAN\b \SOH(\tR\tloginName\DC2$\n\ + \\SOentity_type_id\CAN\t \SOH(\tR\fentityTypeId\DC2\ESC\n\ + \\tentity_id\CAN\n\ + \ \SOH(\tR\bentityId\DC2\DC2\n\ + \\EOTtext\CAN\v \SOH(\tR\EOTtext" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + eventId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "event_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'eventId")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResultRecord + eventGroupId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "event_group_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'eventGroupId")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResultRecord + eventGroupName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "event_group_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'eventGroupName")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResultRecord + eventTypeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "event_type_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'eventTypeId")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResultRecord + eventTypeName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "event_type_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'eventTypeName")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResultRecord + eventTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "event_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'eventTime")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResultRecord + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResultRecord + loginName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginName")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResultRecord + entityTypeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entity_type_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'entityTypeId")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResultRecord + entityId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entity_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'entityId")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResultRecord + text__field_descriptor + = Data.ProtoLens.FieldDescriptor + "text" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'text")) :: + Data.ProtoLens.FieldDescriptor EventLogSearchResultRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, eventId__field_descriptor), + (Data.ProtoLens.Tag 2, eventGroupId__field_descriptor), + (Data.ProtoLens.Tag 3, eventGroupName__field_descriptor), + (Data.ProtoLens.Tag 4, eventTypeId__field_descriptor), + (Data.ProtoLens.Tag 5, eventTypeName__field_descriptor), + (Data.ProtoLens.Tag 6, eventTime__field_descriptor), + (Data.ProtoLens.Tag 7, loginId__field_descriptor), + (Data.ProtoLens.Tag 8, loginName__field_descriptor), + (Data.ProtoLens.Tag 9, entityTypeId__field_descriptor), + (Data.ProtoLens.Tag 10, entityId__field_descriptor), + (Data.ProtoLens.Tag 11, text__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EventLogSearchResultRecord'_unknownFields + (\ x__ y__ + -> x__ {_EventLogSearchResultRecord'_unknownFields = y__}) + defMessage + = EventLogSearchResultRecord'_constructor + {_EventLogSearchResultRecord'eventId = Prelude.Nothing, + _EventLogSearchResultRecord'eventGroupId = Prelude.Nothing, + _EventLogSearchResultRecord'eventGroupName = Prelude.Nothing, + _EventLogSearchResultRecord'eventTypeId = Prelude.Nothing, + _EventLogSearchResultRecord'eventTypeName = Prelude.Nothing, + _EventLogSearchResultRecord'eventTime = Prelude.Nothing, + _EventLogSearchResultRecord'loginId = Prelude.Nothing, + _EventLogSearchResultRecord'loginName = Prelude.Nothing, + _EventLogSearchResultRecord'entityTypeId = Prelude.Nothing, + _EventLogSearchResultRecord'entityId = Prelude.Nothing, + _EventLogSearchResultRecord'text = Prelude.Nothing, + _EventLogSearchResultRecord'_unknownFields = []} + parseMessage + = let + loop :: + EventLogSearchResultRecord + -> Data.ProtoLens.Encoding.Bytes.Parser EventLogSearchResultRecord + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "event_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"eventId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "event_group_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"eventGroupId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "event_group_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"eventGroupName") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "event_type_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"eventTypeId") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "event_type_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"eventTypeName") y x) + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "event_time" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"eventTime") y x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"loginName") y x) + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "entity_type_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"entityTypeId") y x) + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "entity_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"entityId") y x) + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "text" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"text") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "EventLogSearchResultRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'eventId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'eventGroupId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'eventGroupName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'eventTypeId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'eventTypeName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'eventTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'loginName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'entityTypeId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'entityId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'text") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x)))))))))))) +instance Control.DeepSeq.NFData EventLogSearchResultRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'eventId x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'eventGroupId x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'eventGroupName x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'eventTypeId x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'eventTypeName x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'eventTime x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'loginId x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'loginName x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'entityTypeId x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'entityId x__) + (Control.DeepSeq.deepseq + (_EventLogSearchResultRecord'text x__) ()))))))))))) +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\NAKCMS/log_event_1.proto\DC2\vlog_event_1\SUB\DC2CMS/common_1.proto\"\239\SOH\n\ + \\NAKEventLogSearchRequest\DC2\DLE\n\ + \\ETXtop\CAN\SOH \SOH(\rR\ETXtop\DC2=\n\ + \\SOsearch_options\CAN\STX \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\"\132\SOH\n\ + \\SOSearchCriteria\DC2\f\n\ + \\bEVENT_ID\DLE\SOH\DC2\DC1\n\ + \\rEVENT_TYPE_ID\DLE\STX\DC2\DC2\n\ + \\SOEVENT_GROUP_ID\DLE\ETX\DC2\DC2\n\ + \\SOENTITY_TYPE_ID\DLE\EOT\DC2\r\n\ + \\tENTITY_ID\DLE\ENQ\DC2\r\n\ + \\tFROM_DATE\DLE\ACK\DC2\v\n\ + \\aTO_DATE\DLE\a\"\144\SOH\n\ + \\DC4EventLogSearchResult\DC2Q\n\ + \\DLEevent_log_record\CAN\SOH \ETX(\v2'.log_event_1.EventLogSearchResultRecordR\SOeventLogRecord\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete\"\131\ETX\n\ + \\SUBEventLogSearchResultRecord\DC2\EM\n\ + \\bevent_id\CAN\SOH \SOH(\tR\aeventId\DC2$\n\ + \\SOevent_group_id\CAN\STX \SOH(\tR\feventGroupId\DC2(\n\ + \\DLEevent_group_name\CAN\ETX \SOH(\tR\SOeventGroupName\DC2\"\n\ + \\revent_type_id\CAN\EOT \SOH(\tR\veventTypeId\DC2&\n\ + \\SIevent_type_name\CAN\ENQ \SOH(\tR\reventTypeName\DC2\GS\n\ + \\n\ + \event_time\CAN\ACK \SOH(\DC2R\teventTime\DC2\EM\n\ + \\blogin_id\CAN\a \SOH(\tR\aloginId\DC2\GS\n\ + \\n\ + \login_name\CAN\b \SOH(\tR\tloginName\DC2$\n\ + \\SOentity_type_id\CAN\t \SOH(\tR\fentityTypeId\DC2\ESC\n\ + \\tentity_id\CAN\n\ + \ \SOH(\tR\bentityId\DC2\DC2\n\ + \\EOTtext\CAN\v \SOH(\tR\EOTtextJ\139\DC4\n\ + \\ACK\DC2\EOT\STX\NULV\SOH\n\ + \I\n\ + \\SOH\f\DC2\ETX\STX\NUL\DC22? CQG Customer Management System API log event extend protocol.\n\ + \\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\EOT\NUL\DC4\n\ + \\t\n\ + \\STX\ETX\NUL\DC2\ETX\ACK\NUL\FS\n\ + \\n\ + \\n\ + \\STX\EOT\NUL\DC2\EOT\b\NUL'\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\b\b\GS\n\ + \\136\SOH\n\ + \\EOT\EOT\NUL\EOT\NUL\DC2\EOT\f\EOT \ENQ\SUBz List of possible search refine criteria.\n\ + \ All criteria only one per search option and with exact_equality matching rule.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\EOT\NUL\SOH\DC2\ETX\f\t\ETB\n\ + \\r\n\ + \\ACK\EOT\NUL\EOT\NUL\STX\NUL\DC2\ETX\SO\b\NAK\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\NUL\SOH\DC2\ETX\SO\b\DLE\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\NUL\STX\DC2\ETX\SO\DC3\DC4\n\ + \\137\SOH\n\ + \\ACK\EOT\NUL\EOT\NUL\STX\SOH\DC2\ETX\DC2\b\SUB\SUBz LookupPropertyListRequest { property_type = CommonLookupPropertyType.LOG_EVENT_TYPE }\n\ + \ Can be used with MatchingRule.IN.\n\ + \\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\SOH\SOH\DC2\ETX\DC2\b\NAK\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\SOH\STX\DC2\ETX\DC2\CAN\EM\n\ + \\r\n\ + \\ACK\EOT\NUL\EOT\NUL\STX\STX\DC2\ETX\DC4\b\ESC\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\STX\SOH\DC2\ETX\DC4\b\SYN\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\STX\STX\DC2\ETX\DC4\EM\SUB\n\ + \M\n\ + \\ACK\EOT\NUL\EOT\NUL\STX\ETX\DC2\ETX\ETB\b\ESC\SUB> This field is associated with common_1.EntityType enum type.\n\ + \\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\ETX\SOH\DC2\ETX\ETB\b\SYN\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\ETX\STX\DC2\ETX\ETB\EM\SUB\n\ + \\r\n\ + \\ACK\EOT\NUL\EOT\NUL\STX\EOT\DC2\ETX\EM\b\SYN\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\EOT\SOH\DC2\ETX\EM\b\DC1\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\EOT\STX\DC2\ETX\EM\DC4\NAK\n\ + \&\n\ + \\ACK\EOT\NUL\EOT\NUL\STX\ENQ\DC2\ETX\FS\b\SYN\SUB\ETB Unix timestamp (UTC).\n\ + \\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\ENQ\SOH\DC2\ETX\FS\b\DC1\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\ENQ\STX\DC2\ETX\FS\DC4\NAK\n\ + \&\n\ + \\ACK\EOT\NUL\EOT\NUL\STX\ACK\DC2\ETX\US\b\DC4\SUB\ETB Unix timestamp (UTC).\n\ + \\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\ACK\SOH\DC2\ETX\US\b\SI\n\ + \\SO\n\ + \\a\EOT\NUL\EOT\NUL\STX\ACK\STX\DC2\ETX\US\DC2\DC3\n\ + \X\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX#\EOT\FS\SUBK Optionally restrict matched results by returning the first 'top' records.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX#\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX#\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX#\DC4\ETB\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX#\SUB\ESC\n\ + \g\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX&\EOT6\SUBZ List of search options. Each option has its own search text, criteria and matching rule.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX&\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX&\r\"\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX&45\n\ + \\n\ + \\n\ + \\STX\EOT\SOH\DC2\EOT)\NUL1\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX)\b\FS\n\ + \(\n\ + \\EOT\EOT\SOH\STX\NUL\DC2\ETX,\EOT=\SUB\ESC List of found event logs.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\EOT\DC2\ETX,\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ACK\DC2\ETX,\r'\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX,(8\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX,;<\n\ + \q\n\ + \\EOT\EOT\SOH\STX\SOH\DC2\ETX0\EOT3\SUBd This flag is set to true if all results are sent\n\ + \ and nothing was filtered out by 'top' parameter.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETX0\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETX0\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX0\DC2\GS\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX0 !\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\b\DC2\ETX0\"2\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\a\DC2\ETX0-1\n\ + \\n\ + \\n\ + \\STX\EOT\STX\DC2\EOT3\NULV\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\STX\SOH\DC2\ETX3\b\"\n\ + \\CAN\n\ + \\EOT\EOT\STX\STX\NUL\DC2\ETX6\EOT!\SUB\v Event id.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\EOT\DC2\ETX6\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETX6\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX6\DC4\FS\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX6\US \n\ + \\RS\n\ + \\EOT\EOT\STX\STX\SOH\DC2\ETX9\EOT'\SUB\DC1 Event group id.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\EOT\DC2\ETX9\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ENQ\DC2\ETX9\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETX9\DC4\"\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETX9%&\n\ + \ \n\ + \\EOT\EOT\STX\STX\STX\DC2\ETX<\EOT)\SUB\DC3 Event group name;\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\EOT\DC2\ETX<\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ENQ\DC2\ETX<\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\SOH\DC2\ETX<\DC4$\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ETX\DC2\ETX<'(\n\ + \\GS\n\ + \\EOT\EOT\STX\STX\ETX\DC2\ETX?\EOT&\SUB\DLE Event type id.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\EOT\DC2\ETX?\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ENQ\DC2\ETX?\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\SOH\DC2\ETX?\DC4!\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ETX\DC2\ETX?$%\n\ + \\US\n\ + \\EOT\EOT\STX\STX\EOT\DC2\ETXB\EOT(\SUB\DC2 Event type name.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\EOT\DC2\ETXB\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\ENQ\DC2\ETXB\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\SOH\DC2\ETXB\DC4#\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\ETX\DC2\ETXB&'\n\ + \!\n\ + \\EOT\EOT\STX\STX\ENQ\DC2\ETXE\EOT#\SUB\DC4 Event time in UTC.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ENQ\EOT\DC2\ETXE\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ENQ\ENQ\DC2\ETXE\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ENQ\SOH\DC2\ETXE\DC4\RS\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ENQ\ETX\DC2\ETXE!\"\n\ + \\CAN\n\ + \\EOT\EOT\STX\STX\ACK\DC2\ETXH\EOT!\SUB\v Login id.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ACK\EOT\DC2\ETXH\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ACK\ENQ\DC2\ETXH\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ACK\SOH\DC2\ETXH\DC4\FS\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ACK\ETX\DC2\ETXH\US \n\ + \Q\n\ + \\EOT\EOT\STX\STX\a\DC2\ETXK\EOT#\SUBD Login name (if current session login is authorized on this login).\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\a\EOT\DC2\ETXK\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\a\ENQ\DC2\ETXK\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\a\SOH\DC2\ETXK\DC4\RS\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\a\ETX\DC2\ETXK!\"\n\ + \\\\n\ + \\EOT\EOT\STX\STX\b\DC2\ETXO\EOT'\SUBO Entity type id.\n\ + \ This field is associated with common_1.EntityType enum type.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\b\EOT\DC2\ETXO\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\b\ENQ\DC2\ETXO\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\b\SOH\DC2\ETXO\DC4\"\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\b\ETX\DC2\ETXO%&\n\ + \ \n\ + \\EOT\EOT\STX\STX\t\DC2\ETXR\EOT#\SUB\DC3 Target entity id.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\t\EOT\DC2\ETXR\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\t\ENQ\DC2\ETXR\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\t\SOH\DC2\ETXR\DC4\GS\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\t\ETX\DC2\ETXR \"\n\ + \\CAN\n\ + \\EOT\EOT\STX\STX\n\ + \\DC2\ETXU\EOT\RS\SUB\v Log text.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\n\ + \\EOT\DC2\ETXU\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\n\ + \\ENQ\DC2\ETXU\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\n\ + \\SOH\DC2\ETXU\DC4\CAN\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\n\ + \\ETX\DC2\ETXU\ESC\GS" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/LogEvent1_Fields.hs b/cqg-cms-api-proto/src/Proto/CMS/LogEvent1_Fields.hs new file mode 100644 index 0000000..90047ff --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/LogEvent1_Fields.hs @@ -0,0 +1,211 @@ +{- This file was auto-generated from CMS/log_event_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.LogEvent1_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.Common1 +entityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entityId" a) => + Lens.Family2.LensLike' f s a +entityId = Data.ProtoLens.Field.field @"entityId" +entityTypeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entityTypeId" a) => + Lens.Family2.LensLike' f s a +entityTypeId = Data.ProtoLens.Field.field @"entityTypeId" +eventGroupId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "eventGroupId" a) => + Lens.Family2.LensLike' f s a +eventGroupId = Data.ProtoLens.Field.field @"eventGroupId" +eventGroupName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "eventGroupName" a) => + Lens.Family2.LensLike' f s a +eventGroupName = Data.ProtoLens.Field.field @"eventGroupName" +eventId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "eventId" a) => + Lens.Family2.LensLike' f s a +eventId = Data.ProtoLens.Field.field @"eventId" +eventLogRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "eventLogRecord" a) => + Lens.Family2.LensLike' f s a +eventLogRecord = Data.ProtoLens.Field.field @"eventLogRecord" +eventTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "eventTime" a) => + Lens.Family2.LensLike' f s a +eventTime = Data.ProtoLens.Field.field @"eventTime" +eventTypeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "eventTypeId" a) => + Lens.Family2.LensLike' f s a +eventTypeId = Data.ProtoLens.Field.field @"eventTypeId" +eventTypeName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "eventTypeName" a) => + Lens.Family2.LensLike' f s a +eventTypeName = Data.ProtoLens.Field.field @"eventTypeName" +isComplete :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isComplete" a) => + Lens.Family2.LensLike' f s a +isComplete = Data.ProtoLens.Field.field @"isComplete" +loginId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "loginId" a) => + Lens.Family2.LensLike' f s a +loginId = Data.ProtoLens.Field.field @"loginId" +loginName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginName" a) => + Lens.Family2.LensLike' f s a +loginName = Data.ProtoLens.Field.field @"loginName" +maybe'entityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'entityId" a) => + Lens.Family2.LensLike' f s a +maybe'entityId = Data.ProtoLens.Field.field @"maybe'entityId" +maybe'entityTypeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'entityTypeId" a) => + Lens.Family2.LensLike' f s a +maybe'entityTypeId + = Data.ProtoLens.Field.field @"maybe'entityTypeId" +maybe'eventGroupId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'eventGroupId" a) => + Lens.Family2.LensLike' f s a +maybe'eventGroupId + = Data.ProtoLens.Field.field @"maybe'eventGroupId" +maybe'eventGroupName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'eventGroupName" a) => + Lens.Family2.LensLike' f s a +maybe'eventGroupName + = Data.ProtoLens.Field.field @"maybe'eventGroupName" +maybe'eventId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'eventId" a) => + Lens.Family2.LensLike' f s a +maybe'eventId = Data.ProtoLens.Field.field @"maybe'eventId" +maybe'eventTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'eventTime" a) => + Lens.Family2.LensLike' f s a +maybe'eventTime = Data.ProtoLens.Field.field @"maybe'eventTime" +maybe'eventTypeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'eventTypeId" a) => + Lens.Family2.LensLike' f s a +maybe'eventTypeId = Data.ProtoLens.Field.field @"maybe'eventTypeId" +maybe'eventTypeName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'eventTypeName" a) => + Lens.Family2.LensLike' f s a +maybe'eventTypeName + = Data.ProtoLens.Field.field @"maybe'eventTypeName" +maybe'isComplete :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isComplete" a) => + Lens.Family2.LensLike' f s a +maybe'isComplete = Data.ProtoLens.Field.field @"maybe'isComplete" +maybe'loginId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginId" a) => + Lens.Family2.LensLike' f s a +maybe'loginId = Data.ProtoLens.Field.field @"maybe'loginId" +maybe'loginName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginName" a) => + Lens.Family2.LensLike' f s a +maybe'loginName = Data.ProtoLens.Field.field @"maybe'loginName" +maybe'text :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'text" a) => + Lens.Family2.LensLike' f s a +maybe'text = Data.ProtoLens.Field.field @"maybe'text" +maybe'top :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'top" a) => + Lens.Family2.LensLike' f s a +maybe'top = Data.ProtoLens.Field.field @"maybe'top" +searchOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "searchOptions" a) => + Lens.Family2.LensLike' f s a +searchOptions = Data.ProtoLens.Field.field @"searchOptions" +text :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "text" a) => + Lens.Family2.LensLike' f s a +text = Data.ProtoLens.Field.field @"text" +top :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "top" a) => + Lens.Family2.LensLike' f s a +top = Data.ProtoLens.Field.field @"top" +vec'eventLogRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'eventLogRecord" a) => + Lens.Family2.LensLike' f s a +vec'eventLogRecord + = Data.ProtoLens.Field.field @"vec'eventLogRecord" +vec'searchOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'searchOptions" a) => + Lens.Family2.LensLike' f s a +vec'searchOptions = Data.ProtoLens.Field.field @"vec'searchOptions" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Login1.hs b/cqg-cms-api-proto/src/Proto/CMS/Login1.hs new file mode 100644 index 0000000..706294c --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Login1.hs @@ -0,0 +1,1769 @@ +{- This file was auto-generated from CMS/login_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Login1 ( + AssignedBrokerage(), LoginEntitlementService(), + ModifyLoginEntitlementService(), + ModifyLoginEntitlementServiceResult(), + RestrictedEntitlementService() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +{- | Fields : + + * 'Proto.CMS.Login1_Fields.brokerageId' @:: Lens' AssignedBrokerage Data.Text.Text@ + * 'Proto.CMS.Login1_Fields.maybe'brokerageId' @:: Lens' AssignedBrokerage (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Login1_Fields.waiveBaseCharge' @:: Lens' AssignedBrokerage Prelude.Bool@ + * 'Proto.CMS.Login1_Fields.maybe'waiveBaseCharge' @:: Lens' AssignedBrokerage (Prelude.Maybe Prelude.Bool)@ -} +data AssignedBrokerage + = AssignedBrokerage'_constructor {_AssignedBrokerage'brokerageId :: !(Prelude.Maybe Data.Text.Text), + _AssignedBrokerage'waiveBaseCharge :: !(Prelude.Maybe Prelude.Bool), + _AssignedBrokerage'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AssignedBrokerage where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AssignedBrokerage "brokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AssignedBrokerage'brokerageId + (\ x__ y__ -> x__ {_AssignedBrokerage'brokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AssignedBrokerage "maybe'brokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AssignedBrokerage'brokerageId + (\ x__ y__ -> x__ {_AssignedBrokerage'brokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AssignedBrokerage "waiveBaseCharge" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AssignedBrokerage'waiveBaseCharge + (\ x__ y__ -> x__ {_AssignedBrokerage'waiveBaseCharge = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AssignedBrokerage "maybe'waiveBaseCharge" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AssignedBrokerage'waiveBaseCharge + (\ x__ y__ -> x__ {_AssignedBrokerage'waiveBaseCharge = y__})) + Prelude.id +instance Data.ProtoLens.Message AssignedBrokerage where + messageName _ = Data.Text.pack "login_1.AssignedBrokerage" + packedMessageDescriptor _ + = "\n\ + \\DC1AssignedBrokerage\DC2!\n\ + \\fbrokerage_id\CAN\SOH \SOH(\tR\vbrokerageId\DC2*\n\ + \\DC1waive_base_charge\CAN\STX \SOH(\bR\SIwaiveBaseCharge" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + brokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageId")) :: + Data.ProtoLens.FieldDescriptor AssignedBrokerage + waiveBaseCharge__field_descriptor + = Data.ProtoLens.FieldDescriptor + "waive_base_charge" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'waiveBaseCharge")) :: + Data.ProtoLens.FieldDescriptor AssignedBrokerage + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, brokerageId__field_descriptor), + (Data.ProtoLens.Tag 2, waiveBaseCharge__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AssignedBrokerage'_unknownFields + (\ x__ y__ -> x__ {_AssignedBrokerage'_unknownFields = y__}) + defMessage + = AssignedBrokerage'_constructor + {_AssignedBrokerage'brokerageId = Prelude.Nothing, + _AssignedBrokerage'waiveBaseCharge = Prelude.Nothing, + _AssignedBrokerage'_unknownFields = []} + parseMessage + = let + loop :: + AssignedBrokerage + -> Data.ProtoLens.Encoding.Bytes.Parser AssignedBrokerage + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"brokerageId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "waive_base_charge" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"waiveBaseCharge") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AssignedBrokerage" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'waiveBaseCharge") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData AssignedBrokerage where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AssignedBrokerage'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AssignedBrokerage'brokerageId x__) + (Control.DeepSeq.deepseq + (_AssignedBrokerage'waiveBaseCharge x__) ())) +{- | Fields : + + * 'Proto.CMS.Login1_Fields.loginId' @:: Lens' LoginEntitlementService Data.Text.Text@ + * 'Proto.CMS.Login1_Fields.maybe'loginId' @:: Lens' LoginEntitlementService (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Login1_Fields.entitlementServiceId' @:: Lens' LoginEntitlementService Data.Word.Word32@ + * 'Proto.CMS.Login1_Fields.maybe'entitlementServiceId' @:: Lens' LoginEntitlementService (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Login1_Fields.fromUtcTime' @:: Lens' LoginEntitlementService Data.Int.Int64@ + * 'Proto.CMS.Login1_Fields.maybe'fromUtcTime' @:: Lens' LoginEntitlementService (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Login1_Fields._obsoleteToUtcTime' @:: Lens' LoginEntitlementService Data.Int.Int64@ + * 'Proto.CMS.Login1_Fields.maybe'_obsoleteToUtcTime' @:: Lens' LoginEntitlementService (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Login1_Fields.billingBrokerageId' @:: Lens' LoginEntitlementService Data.Text.Text@ + * 'Proto.CMS.Login1_Fields.maybe'billingBrokerageId' @:: Lens' LoginEntitlementService (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Login1_Fields.assignedBrokerages' @:: Lens' LoginEntitlementService [AssignedBrokerage]@ + * 'Proto.CMS.Login1_Fields.vec'assignedBrokerages' @:: Lens' LoginEntitlementService (Data.Vector.Vector AssignedBrokerage)@ + * 'Proto.CMS.Login1_Fields.active' @:: Lens' LoginEntitlementService Prelude.Bool@ + * 'Proto.CMS.Login1_Fields.maybe'active' @:: Lens' LoginEntitlementService (Prelude.Maybe Prelude.Bool)@ -} +data LoginEntitlementService + = LoginEntitlementService'_constructor {_LoginEntitlementService'loginId :: !(Prelude.Maybe Data.Text.Text), + _LoginEntitlementService'entitlementServiceId :: !(Prelude.Maybe Data.Word.Word32), + _LoginEntitlementService'fromUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _LoginEntitlementService'_obsoleteToUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _LoginEntitlementService'billingBrokerageId :: !(Prelude.Maybe Data.Text.Text), + _LoginEntitlementService'assignedBrokerages :: !(Data.Vector.Vector AssignedBrokerage), + _LoginEntitlementService'active :: !(Prelude.Maybe Prelude.Bool), + _LoginEntitlementService'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LoginEntitlementService where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LoginEntitlementService "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'loginId + (\ x__ y__ -> x__ {_LoginEntitlementService'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginEntitlementService "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'loginId + (\ x__ y__ -> x__ {_LoginEntitlementService'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginEntitlementService "entitlementServiceId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'entitlementServiceId + (\ x__ y__ + -> x__ {_LoginEntitlementService'entitlementServiceId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginEntitlementService "maybe'entitlementServiceId" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'entitlementServiceId + (\ x__ y__ + -> x__ {_LoginEntitlementService'entitlementServiceId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginEntitlementService "fromUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'fromUtcTime + (\ x__ y__ -> x__ {_LoginEntitlementService'fromUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginEntitlementService "maybe'fromUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'fromUtcTime + (\ x__ y__ -> x__ {_LoginEntitlementService'fromUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginEntitlementService "_obsoleteToUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'_obsoleteToUtcTime + (\ x__ y__ + -> x__ {_LoginEntitlementService'_obsoleteToUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginEntitlementService "maybe'_obsoleteToUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'_obsoleteToUtcTime + (\ x__ y__ + -> x__ {_LoginEntitlementService'_obsoleteToUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginEntitlementService "billingBrokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'billingBrokerageId + (\ x__ y__ + -> x__ {_LoginEntitlementService'billingBrokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginEntitlementService "maybe'billingBrokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'billingBrokerageId + (\ x__ y__ + -> x__ {_LoginEntitlementService'billingBrokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginEntitlementService "assignedBrokerages" [AssignedBrokerage] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'assignedBrokerages + (\ x__ y__ + -> x__ {_LoginEntitlementService'assignedBrokerages = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LoginEntitlementService "vec'assignedBrokerages" (Data.Vector.Vector AssignedBrokerage) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'assignedBrokerages + (\ x__ y__ + -> x__ {_LoginEntitlementService'assignedBrokerages = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LoginEntitlementService "active" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'active + (\ x__ y__ -> x__ {_LoginEntitlementService'active = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LoginEntitlementService "maybe'active" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LoginEntitlementService'active + (\ x__ y__ -> x__ {_LoginEntitlementService'active = y__})) + Prelude.id +instance Data.ProtoLens.Message LoginEntitlementService where + messageName _ = Data.Text.pack "login_1.LoginEntitlementService" + packedMessageDescriptor _ + = "\n\ + \\ETBLoginEntitlementService\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC24\n\ + \\SYNentitlement_service_id\CAN\STX \SOH(\rR\DC4entitlementServiceId\DC2\"\n\ + \\rfrom_utc_time\CAN\ETX \SOH(\DC2R\vfromUtcTime\DC24\n\ + \\NAK_obsolete_to_utc_time\CAN\EOT \SOH(\DC2R\DC1ObsoleteToUtcTimeB\STX\CAN\SOH\DC20\n\ + \\DC4billing_brokerage_id\CAN\ENQ \SOH(\tR\DC2billingBrokerageId\DC2K\n\ + \\DC3assigned_brokerages\CAN\ACK \ETX(\v2\SUB.login_1.AssignedBrokerageR\DC2assignedBrokerages\DC2\SYN\n\ + \\ACKactive\CAN\a \SOH(\bR\ACKactive" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor LoginEntitlementService + entitlementServiceId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_service_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'entitlementServiceId")) :: + Data.ProtoLens.FieldDescriptor LoginEntitlementService + fromUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "from_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fromUtcTime")) :: + Data.ProtoLens.FieldDescriptor LoginEntitlementService + _obsoleteToUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "_obsolete_to_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'_obsoleteToUtcTime")) :: + Data.ProtoLens.FieldDescriptor LoginEntitlementService + billingBrokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "billing_brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'billingBrokerageId")) :: + Data.ProtoLens.FieldDescriptor LoginEntitlementService + assignedBrokerages__field_descriptor + = Data.ProtoLens.FieldDescriptor + "assigned_brokerages" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AssignedBrokerage) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"assignedBrokerages")) :: + Data.ProtoLens.FieldDescriptor LoginEntitlementService + active__field_descriptor + = Data.ProtoLens.FieldDescriptor + "active" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'active")) :: + Data.ProtoLens.FieldDescriptor LoginEntitlementService + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor), + (Data.ProtoLens.Tag 2, entitlementServiceId__field_descriptor), + (Data.ProtoLens.Tag 3, fromUtcTime__field_descriptor), + (Data.ProtoLens.Tag 4, _obsoleteToUtcTime__field_descriptor), + (Data.ProtoLens.Tag 5, billingBrokerageId__field_descriptor), + (Data.ProtoLens.Tag 6, assignedBrokerages__field_descriptor), + (Data.ProtoLens.Tag 7, active__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LoginEntitlementService'_unknownFields + (\ x__ y__ -> x__ {_LoginEntitlementService'_unknownFields = y__}) + defMessage + = LoginEntitlementService'_constructor + {_LoginEntitlementService'loginId = Prelude.Nothing, + _LoginEntitlementService'entitlementServiceId = Prelude.Nothing, + _LoginEntitlementService'fromUtcTime = Prelude.Nothing, + _LoginEntitlementService'_obsoleteToUtcTime = Prelude.Nothing, + _LoginEntitlementService'billingBrokerageId = Prelude.Nothing, + _LoginEntitlementService'assignedBrokerages = Data.Vector.Generic.empty, + _LoginEntitlementService'active = Prelude.Nothing, + _LoginEntitlementService'_unknownFields = []} + parseMessage + = let + loop :: + LoginEntitlementService + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AssignedBrokerage + -> Data.ProtoLens.Encoding.Bytes.Parser LoginEntitlementService + loop x mutable'assignedBrokerages + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'assignedBrokerages <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'assignedBrokerages) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'assignedBrokerages") + frozen'assignedBrokerages x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + mutable'assignedBrokerages + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "entitlement_service_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"entitlementServiceId") y x) + mutable'assignedBrokerages + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "from_utc_time" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fromUtcTime") y x) + mutable'assignedBrokerages + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "_obsolete_to_utc_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"_obsoleteToUtcTime") y x) + mutable'assignedBrokerages + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "billing_brokerage_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"billingBrokerageId") y x) + mutable'assignedBrokerages + 50 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "assigned_brokerages" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'assignedBrokerages y) + loop x v + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "active" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"active") y x) + mutable'assignedBrokerages + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'assignedBrokerages + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'assignedBrokerages <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'assignedBrokerages) + "LoginEntitlementService" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'entitlementServiceId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'fromUtcTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'_obsoleteToUtcTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'billingBrokerageId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'assignedBrokerages") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'active") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData LoginEntitlementService where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LoginEntitlementService'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LoginEntitlementService'loginId x__) + (Control.DeepSeq.deepseq + (_LoginEntitlementService'entitlementServiceId x__) + (Control.DeepSeq.deepseq + (_LoginEntitlementService'fromUtcTime x__) + (Control.DeepSeq.deepseq + (_LoginEntitlementService'_obsoleteToUtcTime x__) + (Control.DeepSeq.deepseq + (_LoginEntitlementService'billingBrokerageId x__) + (Control.DeepSeq.deepseq + (_LoginEntitlementService'assignedBrokerages x__) + (Control.DeepSeq.deepseq + (_LoginEntitlementService'active x__) ()))))))) +{- | Fields : + + * 'Proto.CMS.Login1_Fields.loginId' @:: Lens' ModifyLoginEntitlementService Data.Text.Text@ + * 'Proto.CMS.Login1_Fields.maybe'loginId' @:: Lens' ModifyLoginEntitlementService (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Login1_Fields.entitlementServiceToSet' @:: Lens' ModifyLoginEntitlementService [RestrictedEntitlementService]@ + * 'Proto.CMS.Login1_Fields.vec'entitlementServiceToSet' @:: Lens' ModifyLoginEntitlementService (Data.Vector.Vector RestrictedEntitlementService)@ + * 'Proto.CMS.Login1_Fields.entitlementServiceIdToRemove' @:: Lens' ModifyLoginEntitlementService [Data.Word.Word32]@ + * 'Proto.CMS.Login1_Fields.vec'entitlementServiceIdToRemove' @:: Lens' ModifyLoginEntitlementService (Data.Vector.Unboxed.Vector Data.Word.Word32)@ -} +data ModifyLoginEntitlementService + = ModifyLoginEntitlementService'_constructor {_ModifyLoginEntitlementService'loginId :: !(Prelude.Maybe Data.Text.Text), + _ModifyLoginEntitlementService'entitlementServiceToSet :: !(Data.Vector.Vector RestrictedEntitlementService), + _ModifyLoginEntitlementService'entitlementServiceIdToRemove :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _ModifyLoginEntitlementService'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ModifyLoginEntitlementService where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ModifyLoginEntitlementService "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ModifyLoginEntitlementService'loginId + (\ x__ y__ -> x__ {_ModifyLoginEntitlementService'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ModifyLoginEntitlementService "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ModifyLoginEntitlementService'loginId + (\ x__ y__ -> x__ {_ModifyLoginEntitlementService'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ModifyLoginEntitlementService "entitlementServiceToSet" [RestrictedEntitlementService] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ModifyLoginEntitlementService'entitlementServiceToSet + (\ x__ y__ + -> x__ + {_ModifyLoginEntitlementService'entitlementServiceToSet = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ModifyLoginEntitlementService "vec'entitlementServiceToSet" (Data.Vector.Vector RestrictedEntitlementService) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ModifyLoginEntitlementService'entitlementServiceToSet + (\ x__ y__ + -> x__ + {_ModifyLoginEntitlementService'entitlementServiceToSet = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ModifyLoginEntitlementService "entitlementServiceIdToRemove" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ModifyLoginEntitlementService'entitlementServiceIdToRemove + (\ x__ y__ + -> x__ + {_ModifyLoginEntitlementService'entitlementServiceIdToRemove = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ModifyLoginEntitlementService "vec'entitlementServiceIdToRemove" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ModifyLoginEntitlementService'entitlementServiceIdToRemove + (\ x__ y__ + -> x__ + {_ModifyLoginEntitlementService'entitlementServiceIdToRemove = y__})) + Prelude.id +instance Data.ProtoLens.Message ModifyLoginEntitlementService where + messageName _ + = Data.Text.pack "login_1.ModifyLoginEntitlementService" + packedMessageDescriptor _ + = "\n\ + \\GSModifyLoginEntitlementService\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2b\n\ + \\SUBentitlement_service_to_set\CAN\STX \ETX(\v2%.login_1.RestrictedEntitlementServiceR\ETBentitlementServiceToSet\DC2F\n\ + \ entitlement_service_id_to_remove\CAN\ETX \ETX(\rR\FSentitlementServiceIdToRemove" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor ModifyLoginEntitlementService + entitlementServiceToSet__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_service_to_set" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RestrictedEntitlementService) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"entitlementServiceToSet")) :: + Data.ProtoLens.FieldDescriptor ModifyLoginEntitlementService + entitlementServiceIdToRemove__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_service_id_to_remove" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"entitlementServiceIdToRemove")) :: + Data.ProtoLens.FieldDescriptor ModifyLoginEntitlementService + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, loginId__field_descriptor), + (Data.ProtoLens.Tag 2, entitlementServiceToSet__field_descriptor), + (Data.ProtoLens.Tag 3, + entitlementServiceIdToRemove__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ModifyLoginEntitlementService'_unknownFields + (\ x__ y__ + -> x__ {_ModifyLoginEntitlementService'_unknownFields = y__}) + defMessage + = ModifyLoginEntitlementService'_constructor + {_ModifyLoginEntitlementService'loginId = Prelude.Nothing, + _ModifyLoginEntitlementService'entitlementServiceToSet = Data.Vector.Generic.empty, + _ModifyLoginEntitlementService'entitlementServiceIdToRemove = Data.Vector.Generic.empty, + _ModifyLoginEntitlementService'_unknownFields = []} + parseMessage + = let + loop :: + ModifyLoginEntitlementService + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld RestrictedEntitlementService + -> Data.ProtoLens.Encoding.Bytes.Parser ModifyLoginEntitlementService + loop + x + mutable'entitlementServiceIdToRemove + mutable'entitlementServiceToSet + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'entitlementServiceIdToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'entitlementServiceIdToRemove) + frozen'entitlementServiceToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'entitlementServiceToSet) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'entitlementServiceIdToRemove") + frozen'entitlementServiceIdToRemove + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'entitlementServiceToSet") + frozen'entitlementServiceToSet x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + mutable'entitlementServiceIdToRemove + mutable'entitlementServiceToSet + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "entitlement_service_to_set" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'entitlementServiceToSet y) + loop x mutable'entitlementServiceIdToRemove v + 24 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "entitlement_service_id_to_remove" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'entitlementServiceIdToRemove y) + loop x v mutable'entitlementServiceToSet + 26 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "entitlement_service_id_to_remove" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'entitlementServiceIdToRemove) + loop x y mutable'entitlementServiceToSet + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'entitlementServiceIdToRemove + mutable'entitlementServiceToSet + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'entitlementServiceIdToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'entitlementServiceToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'entitlementServiceIdToRemove + mutable'entitlementServiceToSet) + "ModifyLoginEntitlementService" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'entitlementServiceToSet") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'entitlementServiceIdToRemove") + _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData ModifyLoginEntitlementService where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ModifyLoginEntitlementService'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ModifyLoginEntitlementService'loginId x__) + (Control.DeepSeq.deepseq + (_ModifyLoginEntitlementService'entitlementServiceToSet x__) + (Control.DeepSeq.deepseq + (_ModifyLoginEntitlementService'entitlementServiceIdToRemove x__) + ()))) +{- | Fields : + + * 'Proto.CMS.Login1_Fields._obsoleteRestrictedEntitlementService' @:: Lens' ModifyLoginEntitlementServiceResult [RestrictedEntitlementService]@ + * 'Proto.CMS.Login1_Fields.vec'_obsoleteRestrictedEntitlementService' @:: Lens' ModifyLoginEntitlementServiceResult (Data.Vector.Vector RestrictedEntitlementService)@ -} +data ModifyLoginEntitlementServiceResult + = ModifyLoginEntitlementServiceResult'_constructor {_ModifyLoginEntitlementServiceResult'_obsoleteRestrictedEntitlementService :: !(Data.Vector.Vector RestrictedEntitlementService), + _ModifyLoginEntitlementServiceResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ModifyLoginEntitlementServiceResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ModifyLoginEntitlementServiceResult "_obsoleteRestrictedEntitlementService" [RestrictedEntitlementService] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ModifyLoginEntitlementServiceResult'_obsoleteRestrictedEntitlementService + (\ x__ y__ + -> x__ + {_ModifyLoginEntitlementServiceResult'_obsoleteRestrictedEntitlementService = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ModifyLoginEntitlementServiceResult "vec'_obsoleteRestrictedEntitlementService" (Data.Vector.Vector RestrictedEntitlementService) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ModifyLoginEntitlementServiceResult'_obsoleteRestrictedEntitlementService + (\ x__ y__ + -> x__ + {_ModifyLoginEntitlementServiceResult'_obsoleteRestrictedEntitlementService = y__})) + Prelude.id +instance Data.ProtoLens.Message ModifyLoginEntitlementServiceResult where + messageName _ + = Data.Text.pack "login_1.ModifyLoginEntitlementServiceResult" + packedMessageDescriptor _ + = "\n\ + \#ModifyLoginEntitlementServiceResult\DC2\129\SOH\n\ + \(_obsolete_restricted_entitlement_service\CAN\SOH \ETX(\v2%.login_1.RestrictedEntitlementServiceR$ObsoleteRestrictedEntitlementServiceB\STX\CAN\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + _obsoleteRestrictedEntitlementService__field_descriptor + = Data.ProtoLens.FieldDescriptor + "_obsolete_restricted_entitlement_service" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RestrictedEntitlementService) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field + @"_obsoleteRestrictedEntitlementService")) :: + Data.ProtoLens.FieldDescriptor ModifyLoginEntitlementServiceResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, + _obsoleteRestrictedEntitlementService__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ModifyLoginEntitlementServiceResult'_unknownFields + (\ x__ y__ + -> x__ {_ModifyLoginEntitlementServiceResult'_unknownFields = y__}) + defMessage + = ModifyLoginEntitlementServiceResult'_constructor + {_ModifyLoginEntitlementServiceResult'_obsoleteRestrictedEntitlementService = Data.Vector.Generic.empty, + _ModifyLoginEntitlementServiceResult'_unknownFields = []} + parseMessage + = let + loop :: + ModifyLoginEntitlementServiceResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld RestrictedEntitlementService + -> Data.ProtoLens.Encoding.Bytes.Parser ModifyLoginEntitlementServiceResult + loop x mutable'_obsoleteRestrictedEntitlementService + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'_obsoleteRestrictedEntitlementService <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'_obsoleteRestrictedEntitlementService) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"vec'_obsoleteRestrictedEntitlementService") + frozen'_obsoleteRestrictedEntitlementService x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "_obsolete_restricted_entitlement_service" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'_obsoleteRestrictedEntitlementService y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'_obsoleteRestrictedEntitlementService + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'_obsoleteRestrictedEntitlementService <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage + mutable'_obsoleteRestrictedEntitlementService) + "ModifyLoginEntitlementServiceResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'_obsoleteRestrictedEntitlementService") + _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData ModifyLoginEntitlementServiceResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ModifyLoginEntitlementServiceResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ModifyLoginEntitlementServiceResult'_obsoleteRestrictedEntitlementService + x__) + ()) +{- | Fields : + + * 'Proto.CMS.Login1_Fields.entitlementServiceId' @:: Lens' RestrictedEntitlementService Data.Word.Word32@ + * 'Proto.CMS.Login1_Fields.maybe'entitlementServiceId' @:: Lens' RestrictedEntitlementService (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Login1_Fields.fromUtcTime' @:: Lens' RestrictedEntitlementService Data.Int.Int64@ + * 'Proto.CMS.Login1_Fields.maybe'fromUtcTime' @:: Lens' RestrictedEntitlementService (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Login1_Fields._obsoleteToUtcTime' @:: Lens' RestrictedEntitlementService Data.Int.Int64@ + * 'Proto.CMS.Login1_Fields.maybe'_obsoleteToUtcTime' @:: Lens' RestrictedEntitlementService (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Login1_Fields.billingBrokerageId' @:: Lens' RestrictedEntitlementService Data.Text.Text@ + * 'Proto.CMS.Login1_Fields.maybe'billingBrokerageId' @:: Lens' RestrictedEntitlementService (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Login1_Fields.assignedBrokerages' @:: Lens' RestrictedEntitlementService [AssignedBrokerage]@ + * 'Proto.CMS.Login1_Fields.vec'assignedBrokerages' @:: Lens' RestrictedEntitlementService (Data.Vector.Vector AssignedBrokerage)@ -} +data RestrictedEntitlementService + = RestrictedEntitlementService'_constructor {_RestrictedEntitlementService'entitlementServiceId :: !(Prelude.Maybe Data.Word.Word32), + _RestrictedEntitlementService'fromUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _RestrictedEntitlementService'_obsoleteToUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _RestrictedEntitlementService'billingBrokerageId :: !(Prelude.Maybe Data.Text.Text), + _RestrictedEntitlementService'assignedBrokerages :: !(Data.Vector.Vector AssignedBrokerage), + _RestrictedEntitlementService'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RestrictedEntitlementService where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RestrictedEntitlementService "entitlementServiceId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestrictedEntitlementService'entitlementServiceId + (\ x__ y__ + -> x__ {_RestrictedEntitlementService'entitlementServiceId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RestrictedEntitlementService "maybe'entitlementServiceId" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestrictedEntitlementService'entitlementServiceId + (\ x__ y__ + -> x__ {_RestrictedEntitlementService'entitlementServiceId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RestrictedEntitlementService "fromUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestrictedEntitlementService'fromUtcTime + (\ x__ y__ + -> x__ {_RestrictedEntitlementService'fromUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RestrictedEntitlementService "maybe'fromUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestrictedEntitlementService'fromUtcTime + (\ x__ y__ + -> x__ {_RestrictedEntitlementService'fromUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RestrictedEntitlementService "_obsoleteToUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestrictedEntitlementService'_obsoleteToUtcTime + (\ x__ y__ + -> x__ {_RestrictedEntitlementService'_obsoleteToUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RestrictedEntitlementService "maybe'_obsoleteToUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestrictedEntitlementService'_obsoleteToUtcTime + (\ x__ y__ + -> x__ {_RestrictedEntitlementService'_obsoleteToUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RestrictedEntitlementService "billingBrokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestrictedEntitlementService'billingBrokerageId + (\ x__ y__ + -> x__ {_RestrictedEntitlementService'billingBrokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RestrictedEntitlementService "maybe'billingBrokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestrictedEntitlementService'billingBrokerageId + (\ x__ y__ + -> x__ {_RestrictedEntitlementService'billingBrokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RestrictedEntitlementService "assignedBrokerages" [AssignedBrokerage] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestrictedEntitlementService'assignedBrokerages + (\ x__ y__ + -> x__ {_RestrictedEntitlementService'assignedBrokerages = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField RestrictedEntitlementService "vec'assignedBrokerages" (Data.Vector.Vector AssignedBrokerage) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestrictedEntitlementService'assignedBrokerages + (\ x__ y__ + -> x__ {_RestrictedEntitlementService'assignedBrokerages = y__})) + Prelude.id +instance Data.ProtoLens.Message RestrictedEntitlementService where + messageName _ + = Data.Text.pack "login_1.RestrictedEntitlementService" + packedMessageDescriptor _ + = "\n\ + \\FSRestrictedEntitlementService\DC24\n\ + \\SYNentitlement_service_id\CAN\SOH \SOH(\rR\DC4entitlementServiceId\DC2\"\n\ + \\rfrom_utc_time\CAN\STX \SOH(\DC2R\vfromUtcTime\DC24\n\ + \\NAK_obsolete_to_utc_time\CAN\ETX \SOH(\DC2R\DC1ObsoleteToUtcTimeB\STX\CAN\SOH\DC20\n\ + \\DC4billing_brokerage_id\CAN\EOT \SOH(\tR\DC2billingBrokerageId\DC2K\n\ + \\DC3assigned_brokerages\CAN\ENQ \ETX(\v2\SUB.login_1.AssignedBrokerageR\DC2assignedBrokerages" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + entitlementServiceId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_service_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'entitlementServiceId")) :: + Data.ProtoLens.FieldDescriptor RestrictedEntitlementService + fromUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "from_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fromUtcTime")) :: + Data.ProtoLens.FieldDescriptor RestrictedEntitlementService + _obsoleteToUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "_obsolete_to_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'_obsoleteToUtcTime")) :: + Data.ProtoLens.FieldDescriptor RestrictedEntitlementService + billingBrokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "billing_brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'billingBrokerageId")) :: + Data.ProtoLens.FieldDescriptor RestrictedEntitlementService + assignedBrokerages__field_descriptor + = Data.ProtoLens.FieldDescriptor + "assigned_brokerages" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AssignedBrokerage) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"assignedBrokerages")) :: + Data.ProtoLens.FieldDescriptor RestrictedEntitlementService + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, entitlementServiceId__field_descriptor), + (Data.ProtoLens.Tag 2, fromUtcTime__field_descriptor), + (Data.ProtoLens.Tag 3, _obsoleteToUtcTime__field_descriptor), + (Data.ProtoLens.Tag 4, billingBrokerageId__field_descriptor), + (Data.ProtoLens.Tag 5, assignedBrokerages__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RestrictedEntitlementService'_unknownFields + (\ x__ y__ + -> x__ {_RestrictedEntitlementService'_unknownFields = y__}) + defMessage + = RestrictedEntitlementService'_constructor + {_RestrictedEntitlementService'entitlementServiceId = Prelude.Nothing, + _RestrictedEntitlementService'fromUtcTime = Prelude.Nothing, + _RestrictedEntitlementService'_obsoleteToUtcTime = Prelude.Nothing, + _RestrictedEntitlementService'billingBrokerageId = Prelude.Nothing, + _RestrictedEntitlementService'assignedBrokerages = Data.Vector.Generic.empty, + _RestrictedEntitlementService'_unknownFields = []} + parseMessage + = let + loop :: + RestrictedEntitlementService + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AssignedBrokerage + -> Data.ProtoLens.Encoding.Bytes.Parser RestrictedEntitlementService + loop x mutable'assignedBrokerages + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'assignedBrokerages <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'assignedBrokerages) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'assignedBrokerages") + frozen'assignedBrokerages x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "entitlement_service_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"entitlementServiceId") y x) + mutable'assignedBrokerages + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "from_utc_time" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fromUtcTime") y x) + mutable'assignedBrokerages + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "_obsolete_to_utc_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"_obsoleteToUtcTime") y x) + mutable'assignedBrokerages + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "billing_brokerage_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"billingBrokerageId") y x) + mutable'assignedBrokerages + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "assigned_brokerages" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'assignedBrokerages y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'assignedBrokerages + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'assignedBrokerages <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'assignedBrokerages) + "RestrictedEntitlementService" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'entitlementServiceId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'fromUtcTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'_obsoleteToUtcTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'billingBrokerageId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'assignedBrokerages") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData RestrictedEntitlementService where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RestrictedEntitlementService'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RestrictedEntitlementService'entitlementServiceId x__) + (Control.DeepSeq.deepseq + (_RestrictedEntitlementService'fromUtcTime x__) + (Control.DeepSeq.deepseq + (_RestrictedEntitlementService'_obsoleteToUtcTime x__) + (Control.DeepSeq.deepseq + (_RestrictedEntitlementService'billingBrokerageId x__) + (Control.DeepSeq.deepseq + (_RestrictedEntitlementService'assignedBrokerages x__) ()))))) +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\DC1CMS/login_1.proto\DC2\alogin_1\"\219\STX\n\ + \\ETBLoginEntitlementService\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC24\n\ + \\SYNentitlement_service_id\CAN\STX \SOH(\rR\DC4entitlementServiceId\DC2\"\n\ + \\rfrom_utc_time\CAN\ETX \SOH(\DC2R\vfromUtcTime\DC24\n\ + \\NAK_obsolete_to_utc_time\CAN\EOT \SOH(\DC2R\DC1ObsoleteToUtcTimeB\STX\CAN\SOH\DC20\n\ + \\DC4billing_brokerage_id\CAN\ENQ \SOH(\tR\DC2billingBrokerageId\DC2K\n\ + \\DC3assigned_brokerages\CAN\ACK \ETX(\v2\SUB.login_1.AssignedBrokerageR\DC2assignedBrokerages\DC2\SYN\n\ + \\ACKactive\CAN\a \SOH(\bR\ACKactive\"b\n\ + \\DC1AssignedBrokerage\DC2!\n\ + \\fbrokerage_id\CAN\SOH \SOH(\tR\vbrokerageId\DC2*\n\ + \\DC1waive_base_charge\CAN\STX \SOH(\bR\SIwaiveBaseCharge\"\173\STX\n\ + \\FSRestrictedEntitlementService\DC24\n\ + \\SYNentitlement_service_id\CAN\SOH \SOH(\rR\DC4entitlementServiceId\DC2\"\n\ + \\rfrom_utc_time\CAN\STX \SOH(\DC2R\vfromUtcTime\DC24\n\ + \\NAK_obsolete_to_utc_time\CAN\ETX \SOH(\DC2R\DC1ObsoleteToUtcTimeB\STX\CAN\SOH\DC20\n\ + \\DC4billing_brokerage_id\CAN\EOT \SOH(\tR\DC2billingBrokerageId\DC2K\n\ + \\DC3assigned_brokerages\CAN\ENQ \ETX(\v2\SUB.login_1.AssignedBrokerageR\DC2assignedBrokerages\"\230\SOH\n\ + \\GSModifyLoginEntitlementService\DC2\EM\n\ + \\blogin_id\CAN\SOH \SOH(\tR\aloginId\DC2b\n\ + \\SUBentitlement_service_to_set\CAN\STX \ETX(\v2%.login_1.RestrictedEntitlementServiceR\ETBentitlementServiceToSet\DC2F\n\ + \ entitlement_service_id_to_remove\CAN\ETX \ETX(\rR\FSentitlementServiceIdToRemove\"\169\SOH\n\ + \#ModifyLoginEntitlementServiceResult\DC2\129\SOH\n\ + \(_obsolete_restricted_entitlement_service\CAN\SOH \ETX(\v2%.login_1.RestrictedEntitlementServiceR$ObsoleteRestrictedEntitlementServiceB\STX\CAN\SOHJ\181\SYN\n\ + \\ACK\DC2\EOT\STX\NULO\SOH\n\ + \*\n\ + \\SOH\f\DC2\ETX\STX\NUL\DC22 CMS API Login entity Protocol.\n\ + \\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\EOT\NUL\DLE\n\ + \*\n\ + \\STX\EOT\NUL\DC2\EOT\a\NUL\GS\SOH\SUB\RS Service assigned to a login.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\a\b\US\n\ + \(\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX\n\ + \\EOT!\SUB\ESC [required] ID of a login.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX\n\ + \\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\n\ + \\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\n\ + \\DC4\FS\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\n\ + \\US \n\ + \.\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX\r\EOT/\SUB! [required] Assigned service ID.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX\r\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX\r\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\r\DC4*\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\r-.\n\ + \i\n\ + \\EOT\EOT\NUL\STX\STX\DC2\ETX\DLE\EOT&\SUB\\ [immutable] Time when this entitlement was enabled or is planned to enabled for the login.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\EOT\DC2\ETX\DLE\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX\DLE\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX\DLE\DC4!\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX\DLE$%\n\ + \]\n\ + \\EOT\EOT\NUL\STX\ETX\DC2\ETX\DC3\EOT@\SUBP [obsolete] Time when this entitlement is planned to be disabled for the login.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\EOT\DC2\ETX\DC3\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ENQ\DC2\ETX\DC3\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX\DC3\DC4)\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX\DC3,-\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\b\DC2\ETX\DC3.?\n\ + \\r\n\ + \\ACK\EOT\NUL\STX\ETX\b\ETX\DC2\ETX\DC3/>\n\ + \M\n\ + \\EOT\EOT\NUL\STX\EOT\DC2\ETX\SYN\EOT-\SUB@ ID of brokerage who is responsible for billing of the service.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\EOT\DC2\ETX\SYN\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\ENQ\DC2\ETX\SYN\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX\SYN\DC4(\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX\SYN+,\n\ + \N\n\ + \\EOT\EOT\NUL\STX\ENQ\DC2\ETX\EM\EOT7\SUBA Brokerages assigned to Entitlement service (only for products).\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ENQ\EOT\DC2\ETX\EM\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ENQ\ACK\DC2\ETX\EM\r\RS\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETX\EM\US2\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETX\EM56\n\ + \5\n\ + \\EOT\EOT\NUL\STX\ACK\DC2\ETX\FS\EOT\GS\SUB( Determines, whether service is active.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ACK\EOT\DC2\ETX\FS\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ACK\ENQ\DC2\ETX\FS\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETX\FS\DC2\CAN\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETX\FS\ESC\FS\n\ + \8\n\ + \\STX\EOT\SOH\DC2\EOT \NUL'\SOH\SUB, Brokerage assigned to Entitlement service.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX \b\EM\n\ + \'\n\ + \\EOT\EOT\SOH\STX\NUL\DC2\ETX#\EOT%\SUB\SUB [required] Brokerage ID.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\EOT\DC2\ETX#\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETX#\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX#\DC4 \n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX##$\n\ + \u\n\ + \\EOT\EOT\SOH\STX\SOH\DC2\ETX&\EOT(\SUBh If True - brokerage is charged for service not by price, but by usage; otherwise - by price, as usual.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETX&\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETX&\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX&\DC2#\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX&&'\n\ + \:\n\ + \\STX\EOT\STX\DC2\EOT*\NUL:\SOH\SUB. Service with an optional restriction period.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\STX\SOH\DC2\ETX*\b$\n\ + \%\n\ + \\EOT\EOT\STX\STX\NUL\DC2\ETX-\EOT/\SUB\CAN [required] Service ID.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\EOT\DC2\ETX-\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETX-\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX-\DC4*\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX--.\n\ + \i\n\ + \\EOT\EOT\STX\STX\SOH\DC2\ETX0\EOT&\SUB\\ [immutable] Time when this entitlement was enabled or is planned to enabled for the login.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\EOT\DC2\ETX0\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ENQ\DC2\ETX0\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETX0\DC4!\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETX0$%\n\ + \]\n\ + \\EOT\EOT\STX\STX\STX\DC2\ETX3\EOT@\SUBP [obsolete] Time when this entitlement is planned to be disabled for the login.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\EOT\DC2\ETX3\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ENQ\DC2\ETX3\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\SOH\DC2\ETX3\DC4)\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ETX\DC2\ETX3,-\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\b\DC2\ETX3.?\n\ + \\r\n\ + \\ACK\EOT\STX\STX\STX\b\ETX\DC2\ETX3/>\n\ + \B\n\ + \\EOT\EOT\STX\STX\ETX\DC2\ETX6\EOT-\SUB5 ID of brokerage who will pay for the service usage.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\EOT\DC2\ETX6\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ENQ\DC2\ETX6\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\SOH\DC2\ETX6\DC4(\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ETX\DC2\ETX6+,\n\ + \R\n\ + \\EOT\EOT\STX\STX\EOT\DC2\ETX9\EOT7\SUBE All brokerages assigned to Entitlement service (only for products).\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\EOT\DC2\ETX9\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\ACK\DC2\ETX9\r\RS\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\SOH\DC2\ETX9\US2\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\ETX\DC2\ETX956\n\ + \:\n\ + \\STX\EOT\ETX\DC2\EOT=\NULH\SOH\SUB. Modify login entitlement services operation.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\ETX\SOH\DC2\ETX=\b%\n\ + \B\n\ + \\EOT\EOT\ETX\STX\NUL\DC2\ETX@\EOT!\SUB5 [required] Login id to modify the list of services.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\EOT\DC2\ETX@\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\ETX@\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETX@\DC4\FS\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETX@\US \n\ + \r\n\ + \\EOT\EOT\ETX\STX\SOH\DC2\ETXD\EOTI\SUBe Services to add.\n\ + \ Services to change restriction periods, billing brokerage or assigned brokerages.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\EOT\DC2\ETXD\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\ACK\DC2\ETXD\r)\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\ETXD*D\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\ETXDGH\n\ + \\"\n\ + \\EOT\EOT\ETX\STX\STX\DC2\ETXG\EOT9\SUB\NAK Services to remove.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\STX\EOT\DC2\ETXG\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\STX\ENQ\DC2\ETXG\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\STX\SOH\DC2\ETXG\DC44\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\STX\ETX\DC2\ETXG78\n\ + \C\n\ + \\STX\EOT\EOT\DC2\EOTK\NULO\SOH\SUB7 Result of modify login entitlement service operation.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\EOT\SOH\DC2\ETXK\b+\n\ + \P\n\ + \\EOT\EOT\EOT\STX\NUL\DC2\ETXN\EOTi\SUBC [obsolete] List of login entitlement services after modification.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\EOT\DC2\ETXN\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\ACK\DC2\ETXN\r)\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\ETXN*R\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\ETXNUV\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\b\DC2\ETXNWh\n\ + \\r\n\ + \\ACK\EOT\EOT\STX\NUL\b\ETX\DC2\ETXNXg" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Login1_Fields.hs b/cqg-cms-api-proto/src/Proto/CMS/Login1_Fields.hs new file mode 100644 index 0000000..170ce73 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Login1_Fields.hs @@ -0,0 +1,188 @@ +{- This file was auto-generated from CMS/login_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Login1_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +_obsoleteRestrictedEntitlementService :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "_obsoleteRestrictedEntitlementService" a) => + Lens.Family2.LensLike' f s a +_obsoleteRestrictedEntitlementService + = Data.ProtoLens.Field.field + @"_obsoleteRestrictedEntitlementService" +_obsoleteToUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "_obsoleteToUtcTime" a) => + Lens.Family2.LensLike' f s a +_obsoleteToUtcTime + = Data.ProtoLens.Field.field @"_obsoleteToUtcTime" +active :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "active" a) => + Lens.Family2.LensLike' f s a +active = Data.ProtoLens.Field.field @"active" +assignedBrokerages :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "assignedBrokerages" a) => + Lens.Family2.LensLike' f s a +assignedBrokerages + = Data.ProtoLens.Field.field @"assignedBrokerages" +billingBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "billingBrokerageId" a) => + Lens.Family2.LensLike' f s a +billingBrokerageId + = Data.ProtoLens.Field.field @"billingBrokerageId" +brokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageId" a) => + Lens.Family2.LensLike' f s a +brokerageId = Data.ProtoLens.Field.field @"brokerageId" +entitlementServiceId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlementServiceId" a) => + Lens.Family2.LensLike' f s a +entitlementServiceId + = Data.ProtoLens.Field.field @"entitlementServiceId" +entitlementServiceIdToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlementServiceIdToRemove" a) => + Lens.Family2.LensLike' f s a +entitlementServiceIdToRemove + = Data.ProtoLens.Field.field @"entitlementServiceIdToRemove" +entitlementServiceToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlementServiceToSet" a) => + Lens.Family2.LensLike' f s a +entitlementServiceToSet + = Data.ProtoLens.Field.field @"entitlementServiceToSet" +fromUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fromUtcTime" a) => + Lens.Family2.LensLike' f s a +fromUtcTime = Data.ProtoLens.Field.field @"fromUtcTime" +loginId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "loginId" a) => + Lens.Family2.LensLike' f s a +loginId = Data.ProtoLens.Field.field @"loginId" +maybe'_obsoleteToUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'_obsoleteToUtcTime" a) => + Lens.Family2.LensLike' f s a +maybe'_obsoleteToUtcTime + = Data.ProtoLens.Field.field @"maybe'_obsoleteToUtcTime" +maybe'active :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'active" a) => + Lens.Family2.LensLike' f s a +maybe'active = Data.ProtoLens.Field.field @"maybe'active" +maybe'billingBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'billingBrokerageId" a) => + Lens.Family2.LensLike' f s a +maybe'billingBrokerageId + = Data.ProtoLens.Field.field @"maybe'billingBrokerageId" +maybe'brokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'brokerageId" a) => + Lens.Family2.LensLike' f s a +maybe'brokerageId = Data.ProtoLens.Field.field @"maybe'brokerageId" +maybe'entitlementServiceId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'entitlementServiceId" a) => + Lens.Family2.LensLike' f s a +maybe'entitlementServiceId + = Data.ProtoLens.Field.field @"maybe'entitlementServiceId" +maybe'fromUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'fromUtcTime" a) => + Lens.Family2.LensLike' f s a +maybe'fromUtcTime = Data.ProtoLens.Field.field @"maybe'fromUtcTime" +maybe'loginId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginId" a) => + Lens.Family2.LensLike' f s a +maybe'loginId = Data.ProtoLens.Field.field @"maybe'loginId" +maybe'waiveBaseCharge :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'waiveBaseCharge" a) => + Lens.Family2.LensLike' f s a +maybe'waiveBaseCharge + = Data.ProtoLens.Field.field @"maybe'waiveBaseCharge" +vec'_obsoleteRestrictedEntitlementService :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'_obsoleteRestrictedEntitlementService" a) => + Lens.Family2.LensLike' f s a +vec'_obsoleteRestrictedEntitlementService + = Data.ProtoLens.Field.field + @"vec'_obsoleteRestrictedEntitlementService" +vec'assignedBrokerages :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'assignedBrokerages" a) => + Lens.Family2.LensLike' f s a +vec'assignedBrokerages + = Data.ProtoLens.Field.field @"vec'assignedBrokerages" +vec'entitlementServiceIdToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'entitlementServiceIdToRemove" a) => + Lens.Family2.LensLike' f s a +vec'entitlementServiceIdToRemove + = Data.ProtoLens.Field.field @"vec'entitlementServiceIdToRemove" +vec'entitlementServiceToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'entitlementServiceToSet" a) => + Lens.Family2.LensLike' f s a +vec'entitlementServiceToSet + = Data.ProtoLens.Field.field @"vec'entitlementServiceToSet" +waiveBaseCharge :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "waiveBaseCharge" a) => + Lens.Family2.LensLike' f s a +waiveBaseCharge = Data.ProtoLens.Field.field @"waiveBaseCharge" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Metadata1.hs b/cqg-cms-api-proto/src/Proto/CMS/Metadata1.hs new file mode 100644 index 0000000..5bf5042 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Metadata1.hs @@ -0,0 +1,1919 @@ +{- This file was auto-generated from CMS/metadata_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Metadata1 ( + ContractSearchRequest(), ContractSearchRequest'SearchCriteria(..), + ContractSearchRequest'SearchCriteria(), ContractSearchResult(), + ContractSearchResultRecord(), MetadataScopeRequest(), + MetadataScopeResult() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.Common1 +import qualified Proto.Common.Shared1 +{- | Fields : + + * 'Proto.CMS.Metadata1_Fields.top' @:: Lens' ContractSearchRequest Data.Word.Word32@ + * 'Proto.CMS.Metadata1_Fields.maybe'top' @:: Lens' ContractSearchRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Metadata1_Fields.searchOptions' @:: Lens' ContractSearchRequest [Proto.CMS.Common1.SearchOption]@ + * 'Proto.CMS.Metadata1_Fields.vec'searchOptions' @:: Lens' ContractSearchRequest (Data.Vector.Vector Proto.CMS.Common1.SearchOption)@ + * 'Proto.CMS.Metadata1_Fields.allMatchMode' @:: Lens' ContractSearchRequest Prelude.Bool@ + * 'Proto.CMS.Metadata1_Fields.maybe'allMatchMode' @:: Lens' ContractSearchRequest (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Metadata1_Fields.includeNonTradable' @:: Lens' ContractSearchRequest Prelude.Bool@ + * 'Proto.CMS.Metadata1_Fields.maybe'includeNonTradable' @:: Lens' ContractSearchRequest (Prelude.Maybe Prelude.Bool)@ -} +data ContractSearchRequest + = ContractSearchRequest'_constructor {_ContractSearchRequest'top :: !(Prelude.Maybe Data.Word.Word32), + _ContractSearchRequest'searchOptions :: !(Data.Vector.Vector Proto.CMS.Common1.SearchOption), + _ContractSearchRequest'allMatchMode :: !(Prelude.Maybe Prelude.Bool), + _ContractSearchRequest'includeNonTradable :: !(Prelude.Maybe Prelude.Bool), + _ContractSearchRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ContractSearchRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ContractSearchRequest "top" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchRequest'top + (\ x__ y__ -> x__ {_ContractSearchRequest'top = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ContractSearchRequest "maybe'top" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchRequest'top + (\ x__ y__ -> x__ {_ContractSearchRequest'top = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractSearchRequest "searchOptions" [Proto.CMS.Common1.SearchOption] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchRequest'searchOptions + (\ x__ y__ -> x__ {_ContractSearchRequest'searchOptions = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ContractSearchRequest "vec'searchOptions" (Data.Vector.Vector Proto.CMS.Common1.SearchOption) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchRequest'searchOptions + (\ x__ y__ -> x__ {_ContractSearchRequest'searchOptions = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractSearchRequest "allMatchMode" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_ContractSearchRequest'allMatchMode = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField ContractSearchRequest "maybe'allMatchMode" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_ContractSearchRequest'allMatchMode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractSearchRequest "includeNonTradable" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchRequest'includeNonTradable + (\ x__ y__ + -> x__ {_ContractSearchRequest'includeNonTradable = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField ContractSearchRequest "maybe'includeNonTradable" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchRequest'includeNonTradable + (\ x__ y__ + -> x__ {_ContractSearchRequest'includeNonTradable = y__})) + Prelude.id +instance Data.ProtoLens.Message ContractSearchRequest where + messageName _ = Data.Text.pack "metadata_1.ContractSearchRequest" + packedMessageDescriptor _ + = "\n\ + \\NAKContractSearchRequest\DC2\DLE\n\ + \\ETXtop\CAN\SOH \SOH(\rR\ETXtop\DC2=\n\ + \\SOsearch_options\CAN\STX \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\ETX \SOH(\b:\ENQfalseR\fallMatchMode\DC27\n\ + \\DC4include_non_tradable\CAN\EOT \SOH(\b:\ENQfalseR\DC2includeNonTradable\"y\n\ + \\SOSearchCriteria\DC2\DC1\n\ + \\rCONTRACT_NAME\DLE\SOH\DC2\EM\n\ + \\NAKFUNGIBLE_COMMODITY_ID\DLE\STX\DC2\SYN\n\ + \\DC2INSTRUMENT_TYPE_ID\DLE\ETX\DC2\SI\n\ + \\vCONTRACT_ID\DLE\EOT\DC2\DLE\n\ + \\fCOMMODITY_ID\DLE\ENQ" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + top__field_descriptor + = Data.ProtoLens.FieldDescriptor + "top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'top")) :: + Data.ProtoLens.FieldDescriptor ContractSearchRequest + searchOptions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "search_options" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.SearchOption) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"searchOptions")) :: + Data.ProtoLens.FieldDescriptor ContractSearchRequest + allMatchMode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "all_match_mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allMatchMode")) :: + Data.ProtoLens.FieldDescriptor ContractSearchRequest + includeNonTradable__field_descriptor + = Data.ProtoLens.FieldDescriptor + "include_non_tradable" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'includeNonTradable")) :: + Data.ProtoLens.FieldDescriptor ContractSearchRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, top__field_descriptor), + (Data.ProtoLens.Tag 2, searchOptions__field_descriptor), + (Data.ProtoLens.Tag 3, allMatchMode__field_descriptor), + (Data.ProtoLens.Tag 4, includeNonTradable__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ContractSearchRequest'_unknownFields + (\ x__ y__ -> x__ {_ContractSearchRequest'_unknownFields = y__}) + defMessage + = ContractSearchRequest'_constructor + {_ContractSearchRequest'top = Prelude.Nothing, + _ContractSearchRequest'searchOptions = Data.Vector.Generic.empty, + _ContractSearchRequest'allMatchMode = Prelude.Nothing, + _ContractSearchRequest'includeNonTradable = Prelude.Nothing, + _ContractSearchRequest'_unknownFields = []} + parseMessage + = let + loop :: + ContractSearchRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.SearchOption + -> Data.ProtoLens.Encoding.Bytes.Parser ContractSearchRequest + loop x mutable'searchOptions + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'searchOptions) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'searchOptions") + frozen'searchOptions x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "top" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"top") y x) + mutable'searchOptions + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "search_options" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'searchOptions y) + loop x v + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "all_match_mode" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allMatchMode") y x) + mutable'searchOptions + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "include_non_tradable" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"includeNonTradable") y x) + mutable'searchOptions + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'searchOptions + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'searchOptions) + "ContractSearchRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'top") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'searchOptions") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allMatchMode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'includeNonTradable") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData ContractSearchRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ContractSearchRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ContractSearchRequest'top x__) + (Control.DeepSeq.deepseq + (_ContractSearchRequest'searchOptions x__) + (Control.DeepSeq.deepseq + (_ContractSearchRequest'allMatchMode x__) + (Control.DeepSeq.deepseq + (_ContractSearchRequest'includeNonTradable x__) ())))) +data ContractSearchRequest'SearchCriteria + = ContractSearchRequest'CONTRACT_NAME | + ContractSearchRequest'FUNGIBLE_COMMODITY_ID | + ContractSearchRequest'INSTRUMENT_TYPE_ID | + ContractSearchRequest'CONTRACT_ID | + ContractSearchRequest'COMMODITY_ID + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum ContractSearchRequest'SearchCriteria where + maybeToEnum 1 = Prelude.Just ContractSearchRequest'CONTRACT_NAME + maybeToEnum 2 + = Prelude.Just ContractSearchRequest'FUNGIBLE_COMMODITY_ID + maybeToEnum 3 + = Prelude.Just ContractSearchRequest'INSTRUMENT_TYPE_ID + maybeToEnum 4 = Prelude.Just ContractSearchRequest'CONTRACT_ID + maybeToEnum 5 = Prelude.Just ContractSearchRequest'COMMODITY_ID + maybeToEnum _ = Prelude.Nothing + showEnum ContractSearchRequest'CONTRACT_NAME = "CONTRACT_NAME" + showEnum ContractSearchRequest'FUNGIBLE_COMMODITY_ID + = "FUNGIBLE_COMMODITY_ID" + showEnum ContractSearchRequest'INSTRUMENT_TYPE_ID + = "INSTRUMENT_TYPE_ID" + showEnum ContractSearchRequest'CONTRACT_ID = "CONTRACT_ID" + showEnum ContractSearchRequest'COMMODITY_ID = "COMMODITY_ID" + readEnum k + | (Prelude.==) k "CONTRACT_NAME" + = Prelude.Just ContractSearchRequest'CONTRACT_NAME + | (Prelude.==) k "FUNGIBLE_COMMODITY_ID" + = Prelude.Just ContractSearchRequest'FUNGIBLE_COMMODITY_ID + | (Prelude.==) k "INSTRUMENT_TYPE_ID" + = Prelude.Just ContractSearchRequest'INSTRUMENT_TYPE_ID + | (Prelude.==) k "CONTRACT_ID" + = Prelude.Just ContractSearchRequest'CONTRACT_ID + | (Prelude.==) k "COMMODITY_ID" + = Prelude.Just ContractSearchRequest'COMMODITY_ID + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded ContractSearchRequest'SearchCriteria where + minBound = ContractSearchRequest'CONTRACT_NAME + maxBound = ContractSearchRequest'COMMODITY_ID +instance Prelude.Enum ContractSearchRequest'SearchCriteria where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum SearchCriteria: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum ContractSearchRequest'CONTRACT_NAME = 1 + fromEnum ContractSearchRequest'FUNGIBLE_COMMODITY_ID = 2 + fromEnum ContractSearchRequest'INSTRUMENT_TYPE_ID = 3 + fromEnum ContractSearchRequest'CONTRACT_ID = 4 + fromEnum ContractSearchRequest'COMMODITY_ID = 5 + succ ContractSearchRequest'COMMODITY_ID + = Prelude.error + "ContractSearchRequest'SearchCriteria.succ: bad argument ContractSearchRequest'COMMODITY_ID. This value would be out of bounds." + succ ContractSearchRequest'CONTRACT_NAME + = ContractSearchRequest'FUNGIBLE_COMMODITY_ID + succ ContractSearchRequest'FUNGIBLE_COMMODITY_ID + = ContractSearchRequest'INSTRUMENT_TYPE_ID + succ ContractSearchRequest'INSTRUMENT_TYPE_ID + = ContractSearchRequest'CONTRACT_ID + succ ContractSearchRequest'CONTRACT_ID + = ContractSearchRequest'COMMODITY_ID + pred ContractSearchRequest'CONTRACT_NAME + = Prelude.error + "ContractSearchRequest'SearchCriteria.pred: bad argument ContractSearchRequest'CONTRACT_NAME. This value would be out of bounds." + pred ContractSearchRequest'FUNGIBLE_COMMODITY_ID + = ContractSearchRequest'CONTRACT_NAME + pred ContractSearchRequest'INSTRUMENT_TYPE_ID + = ContractSearchRequest'FUNGIBLE_COMMODITY_ID + pred ContractSearchRequest'CONTRACT_ID + = ContractSearchRequest'INSTRUMENT_TYPE_ID + pred ContractSearchRequest'COMMODITY_ID + = ContractSearchRequest'CONTRACT_ID + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault ContractSearchRequest'SearchCriteria where + fieldDefault = ContractSearchRequest'CONTRACT_NAME +instance Control.DeepSeq.NFData ContractSearchRequest'SearchCriteria where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Metadata1_Fields.contractRecord' @:: Lens' ContractSearchResult [ContractSearchResultRecord]@ + * 'Proto.CMS.Metadata1_Fields.vec'contractRecord' @:: Lens' ContractSearchResult (Data.Vector.Vector ContractSearchResultRecord)@ + * 'Proto.CMS.Metadata1_Fields.isComplete' @:: Lens' ContractSearchResult Prelude.Bool@ + * 'Proto.CMS.Metadata1_Fields.maybe'isComplete' @:: Lens' ContractSearchResult (Prelude.Maybe Prelude.Bool)@ -} +data ContractSearchResult + = ContractSearchResult'_constructor {_ContractSearchResult'contractRecord :: !(Data.Vector.Vector ContractSearchResultRecord), + _ContractSearchResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _ContractSearchResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ContractSearchResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ContractSearchResult "contractRecord" [ContractSearchResultRecord] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResult'contractRecord + (\ x__ y__ -> x__ {_ContractSearchResult'contractRecord = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ContractSearchResult "vec'contractRecord" (Data.Vector.Vector ContractSearchResultRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResult'contractRecord + (\ x__ y__ -> x__ {_ContractSearchResult'contractRecord = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractSearchResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResult'isComplete + (\ x__ y__ -> x__ {_ContractSearchResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField ContractSearchResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResult'isComplete + (\ x__ y__ -> x__ {_ContractSearchResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Message ContractSearchResult where + messageName _ = Data.Text.pack "metadata_1.ContractSearchResult" + packedMessageDescriptor _ + = "\n\ + \\DC4ContractSearchResult\DC2O\n\ + \\SIcontract_record\CAN\SOH \ETX(\v2&.metadata_1.ContractSearchResultRecordR\SOcontractRecord\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + contractRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ContractSearchResultRecord) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"contractRecord")) :: + Data.ProtoLens.FieldDescriptor ContractSearchResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor ContractSearchResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, contractRecord__field_descriptor), + (Data.ProtoLens.Tag 2, isComplete__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ContractSearchResult'_unknownFields + (\ x__ y__ -> x__ {_ContractSearchResult'_unknownFields = y__}) + defMessage + = ContractSearchResult'_constructor + {_ContractSearchResult'contractRecord = Data.Vector.Generic.empty, + _ContractSearchResult'isComplete = Prelude.Nothing, + _ContractSearchResult'_unknownFields = []} + parseMessage + = let + loop :: + ContractSearchResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ContractSearchResultRecord + -> Data.ProtoLens.Encoding.Bytes.Parser ContractSearchResult + loop x mutable'contractRecord + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'contractRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'contractRecord) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'contractRecord") + frozen'contractRecord x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "contract_record" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'contractRecord y) + loop x v + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + mutable'contractRecord + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'contractRecord + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'contractRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'contractRecord) + "ContractSearchResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'contractRecord") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData ContractSearchResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ContractSearchResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ContractSearchResult'contractRecord x__) + (Control.DeepSeq.deepseq + (_ContractSearchResult'isComplete x__) ())) +{- | Fields : + + * 'Proto.CMS.Metadata1_Fields.contractId' @:: Lens' ContractSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Metadata1_Fields.maybe'contractId' @:: Lens' ContractSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Metadata1_Fields.contractName' @:: Lens' ContractSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Metadata1_Fields.maybe'contractName' @:: Lens' ContractSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Metadata1_Fields.contractFullName' @:: Lens' ContractSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Metadata1_Fields.maybe'contractFullName' @:: Lens' ContractSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Metadata1_Fields.commodityId' @:: Lens' ContractSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Metadata1_Fields.maybe'commodityId' @:: Lens' ContractSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Metadata1_Fields.instrumentTypeId' @:: Lens' ContractSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Metadata1_Fields.maybe'instrumentTypeId' @:: Lens' ContractSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Metadata1_Fields.fungibleCommodityId' @:: Lens' ContractSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Metadata1_Fields.maybe'fungibleCommodityId' @:: Lens' ContractSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Metadata1_Fields.description' @:: Lens' ContractSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Metadata1_Fields.maybe'description' @:: Lens' ContractSearchResultRecord (Prelude.Maybe Data.Text.Text)@ -} +data ContractSearchResultRecord + = ContractSearchResultRecord'_constructor {_ContractSearchResultRecord'contractId :: !(Prelude.Maybe Data.Text.Text), + _ContractSearchResultRecord'contractName :: !(Prelude.Maybe Data.Text.Text), + _ContractSearchResultRecord'contractFullName :: !(Prelude.Maybe Data.Text.Text), + _ContractSearchResultRecord'commodityId :: !(Prelude.Maybe Data.Text.Text), + _ContractSearchResultRecord'instrumentTypeId :: !(Prelude.Maybe Data.Text.Text), + _ContractSearchResultRecord'fungibleCommodityId :: !(Prelude.Maybe Data.Text.Text), + _ContractSearchResultRecord'description :: !(Prelude.Maybe Data.Text.Text), + _ContractSearchResultRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ContractSearchResultRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "contractId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'contractId + (\ x__ y__ -> x__ {_ContractSearchResultRecord'contractId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "maybe'contractId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'contractId + (\ x__ y__ -> x__ {_ContractSearchResultRecord'contractId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "contractName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'contractName + (\ x__ y__ + -> x__ {_ContractSearchResultRecord'contractName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "maybe'contractName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'contractName + (\ x__ y__ + -> x__ {_ContractSearchResultRecord'contractName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "contractFullName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'contractFullName + (\ x__ y__ + -> x__ {_ContractSearchResultRecord'contractFullName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "maybe'contractFullName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'contractFullName + (\ x__ y__ + -> x__ {_ContractSearchResultRecord'contractFullName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "commodityId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'commodityId + (\ x__ y__ -> x__ {_ContractSearchResultRecord'commodityId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "maybe'commodityId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'commodityId + (\ x__ y__ -> x__ {_ContractSearchResultRecord'commodityId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "instrumentTypeId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'instrumentTypeId + (\ x__ y__ + -> x__ {_ContractSearchResultRecord'instrumentTypeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "maybe'instrumentTypeId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'instrumentTypeId + (\ x__ y__ + -> x__ {_ContractSearchResultRecord'instrumentTypeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "fungibleCommodityId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'fungibleCommodityId + (\ x__ y__ + -> x__ {_ContractSearchResultRecord'fungibleCommodityId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "maybe'fungibleCommodityId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'fungibleCommodityId + (\ x__ y__ + -> x__ {_ContractSearchResultRecord'fungibleCommodityId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "description" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'description + (\ x__ y__ -> x__ {_ContractSearchResultRecord'description = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ContractSearchResultRecord "maybe'description" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'description + (\ x__ y__ -> x__ {_ContractSearchResultRecord'description = y__})) + Prelude.id +instance Data.ProtoLens.Message ContractSearchResultRecord where + messageName _ + = Data.Text.pack "metadata_1.ContractSearchResultRecord" + packedMessageDescriptor _ + = "\n\ + \\SUBContractSearchResultRecord\DC2\US\n\ + \\vcontract_id\CAN\SOH \SOH(\tR\n\ + \contractId\DC2#\n\ + \\rcontract_name\CAN\STX \SOH(\tR\fcontractName\DC2,\n\ + \\DC2contract_full_name\CAN\ETX \SOH(\tR\DLEcontractFullName\DC2!\n\ + \\fcommodity_id\CAN\EOT \SOH(\tR\vcommodityId\DC2,\n\ + \\DC2instrument_type_id\CAN\ENQ \SOH(\tR\DLEinstrumentTypeId\DC22\n\ + \\NAKfungible_commodity_id\CAN\ACK \SOH(\tR\DC3fungibleCommodityId\DC2 \n\ + \\vdescription\CAN\a \SOH(\tR\vdescription" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + contractId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractId")) :: + Data.ProtoLens.FieldDescriptor ContractSearchResultRecord + contractName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractName")) :: + Data.ProtoLens.FieldDescriptor ContractSearchResultRecord + contractFullName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_full_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractFullName")) :: + Data.ProtoLens.FieldDescriptor ContractSearchResultRecord + commodityId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "commodity_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'commodityId")) :: + Data.ProtoLens.FieldDescriptor ContractSearchResultRecord + instrumentTypeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "instrument_type_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'instrumentTypeId")) :: + Data.ProtoLens.FieldDescriptor ContractSearchResultRecord + fungibleCommodityId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fungible_commodity_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fungibleCommodityId")) :: + Data.ProtoLens.FieldDescriptor ContractSearchResultRecord + description__field_descriptor + = Data.ProtoLens.FieldDescriptor + "description" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'description")) :: + Data.ProtoLens.FieldDescriptor ContractSearchResultRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, contractId__field_descriptor), + (Data.ProtoLens.Tag 2, contractName__field_descriptor), + (Data.ProtoLens.Tag 3, contractFullName__field_descriptor), + (Data.ProtoLens.Tag 4, commodityId__field_descriptor), + (Data.ProtoLens.Tag 5, instrumentTypeId__field_descriptor), + (Data.ProtoLens.Tag 6, fungibleCommodityId__field_descriptor), + (Data.ProtoLens.Tag 7, description__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ContractSearchResultRecord'_unknownFields + (\ x__ y__ + -> x__ {_ContractSearchResultRecord'_unknownFields = y__}) + defMessage + = ContractSearchResultRecord'_constructor + {_ContractSearchResultRecord'contractId = Prelude.Nothing, + _ContractSearchResultRecord'contractName = Prelude.Nothing, + _ContractSearchResultRecord'contractFullName = Prelude.Nothing, + _ContractSearchResultRecord'commodityId = Prelude.Nothing, + _ContractSearchResultRecord'instrumentTypeId = Prelude.Nothing, + _ContractSearchResultRecord'fungibleCommodityId = Prelude.Nothing, + _ContractSearchResultRecord'description = Prelude.Nothing, + _ContractSearchResultRecord'_unknownFields = []} + parseMessage + = let + loop :: + ContractSearchResultRecord + -> Data.ProtoLens.Encoding.Bytes.Parser ContractSearchResultRecord + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"contractId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractName") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_full_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractFullName") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "commodity_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"commodityId") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "instrument_type_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"instrumentTypeId") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "fungible_commodity_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"fungibleCommodityId") y x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "description" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"description") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ContractSearchResultRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'contractId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'contractName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'contractFullName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'commodityId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'instrumentTypeId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'fungibleCommodityId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'description") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData ContractSearchResultRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ContractSearchResultRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ContractSearchResultRecord'contractId x__) + (Control.DeepSeq.deepseq + (_ContractSearchResultRecord'contractName x__) + (Control.DeepSeq.deepseq + (_ContractSearchResultRecord'contractFullName x__) + (Control.DeepSeq.deepseq + (_ContractSearchResultRecord'commodityId x__) + (Control.DeepSeq.deepseq + (_ContractSearchResultRecord'instrumentTypeId x__) + (Control.DeepSeq.deepseq + (_ContractSearchResultRecord'fungibleCommodityId x__) + (Control.DeepSeq.deepseq + (_ContractSearchResultRecord'description x__) ()))))))) +{- | Fields : + + * 'Proto.CMS.Metadata1_Fields.id' @:: Lens' MetadataScopeRequest Data.Word.Word32@ + * 'Proto.CMS.Metadata1_Fields.maybe'id' @:: Lens' MetadataScopeRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Metadata1_Fields.contractSearchRequest' @:: Lens' MetadataScopeRequest ContractSearchRequest@ + * 'Proto.CMS.Metadata1_Fields.maybe'contractSearchRequest' @:: Lens' MetadataScopeRequest (Prelude.Maybe ContractSearchRequest)@ -} +data MetadataScopeRequest + = MetadataScopeRequest'_constructor {_MetadataScopeRequest'id :: !(Prelude.Maybe Data.Word.Word32), + _MetadataScopeRequest'contractSearchRequest :: !(Prelude.Maybe ContractSearchRequest), + _MetadataScopeRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show MetadataScopeRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField MetadataScopeRequest "id" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeRequest'id + (\ x__ y__ -> x__ {_MetadataScopeRequest'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField MetadataScopeRequest "maybe'id" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeRequest'id + (\ x__ y__ -> x__ {_MetadataScopeRequest'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MetadataScopeRequest "contractSearchRequest" ContractSearchRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeRequest'contractSearchRequest + (\ x__ y__ + -> x__ {_MetadataScopeRequest'contractSearchRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField MetadataScopeRequest "maybe'contractSearchRequest" (Prelude.Maybe ContractSearchRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeRequest'contractSearchRequest + (\ x__ y__ + -> x__ {_MetadataScopeRequest'contractSearchRequest = y__})) + Prelude.id +instance Data.ProtoLens.Message MetadataScopeRequest where + messageName _ = Data.Text.pack "metadata_1.MetadataScopeRequest" + packedMessageDescriptor _ + = "\n\ + \\DC4MetadataScopeRequest\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\rR\STXid\DC2Y\n\ + \\ETBcontract_search_request\CAN\STX \SOH(\v2!.metadata_1.ContractSearchRequestR\NAKcontractSearchRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor MetadataScopeRequest + contractSearchRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_search_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ContractSearchRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractSearchRequest")) :: + Data.ProtoLens.FieldDescriptor MetadataScopeRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, contractSearchRequest__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _MetadataScopeRequest'_unknownFields + (\ x__ y__ -> x__ {_MetadataScopeRequest'_unknownFields = y__}) + defMessage + = MetadataScopeRequest'_constructor + {_MetadataScopeRequest'id = Prelude.Nothing, + _MetadataScopeRequest'contractSearchRequest = Prelude.Nothing, + _MetadataScopeRequest'_unknownFields = []} + parseMessage + = let + loop :: + MetadataScopeRequest + -> Data.ProtoLens.Encoding.Bytes.Parser MetadataScopeRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "contract_search_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractSearchRequest") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "MetadataScopeRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'contractSearchRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData MetadataScopeRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_MetadataScopeRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_MetadataScopeRequest'id x__) + (Control.DeepSeq.deepseq + (_MetadataScopeRequest'contractSearchRequest x__) ())) +{- | Fields : + + * 'Proto.CMS.Metadata1_Fields.requestId' @:: Lens' MetadataScopeResult Data.Word.Word32@ + * 'Proto.CMS.Metadata1_Fields.maybe'requestId' @:: Lens' MetadataScopeResult (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Metadata1_Fields.trackingNumber' @:: Lens' MetadataScopeResult Data.Word.Word64@ + * 'Proto.CMS.Metadata1_Fields.maybe'trackingNumber' @:: Lens' MetadataScopeResult (Prelude.Maybe Data.Word.Word64)@ + * 'Proto.CMS.Metadata1_Fields.operationStatus' @:: Lens' MetadataScopeResult Data.Word.Word32@ + * 'Proto.CMS.Metadata1_Fields.maybe'operationStatus' @:: Lens' MetadataScopeResult (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Metadata1_Fields.errorMessage' @:: Lens' MetadataScopeResult Proto.Common.Shared1.Text@ + * 'Proto.CMS.Metadata1_Fields.maybe'errorMessage' @:: Lens' MetadataScopeResult (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Metadata1_Fields.contractSearchResult' @:: Lens' MetadataScopeResult ContractSearchResult@ + * 'Proto.CMS.Metadata1_Fields.maybe'contractSearchResult' @:: Lens' MetadataScopeResult (Prelude.Maybe ContractSearchResult)@ -} +data MetadataScopeResult + = MetadataScopeResult'_constructor {_MetadataScopeResult'requestId :: !(Prelude.Maybe Data.Word.Word32), + _MetadataScopeResult'trackingNumber :: !(Prelude.Maybe Data.Word.Word64), + _MetadataScopeResult'operationStatus :: !(Prelude.Maybe Data.Word.Word32), + _MetadataScopeResult'errorMessage :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _MetadataScopeResult'contractSearchResult :: !(Prelude.Maybe ContractSearchResult), + _MetadataScopeResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show MetadataScopeResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField MetadataScopeResult "requestId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeResult'requestId + (\ x__ y__ -> x__ {_MetadataScopeResult'requestId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField MetadataScopeResult "maybe'requestId" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeResult'requestId + (\ x__ y__ -> x__ {_MetadataScopeResult'requestId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MetadataScopeResult "trackingNumber" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeResult'trackingNumber + (\ x__ y__ -> x__ {_MetadataScopeResult'trackingNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField MetadataScopeResult "maybe'trackingNumber" (Prelude.Maybe Data.Word.Word64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeResult'trackingNumber + (\ x__ y__ -> x__ {_MetadataScopeResult'trackingNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MetadataScopeResult "operationStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeResult'operationStatus + (\ x__ y__ -> x__ {_MetadataScopeResult'operationStatus = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField MetadataScopeResult "maybe'operationStatus" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeResult'operationStatus + (\ x__ y__ -> x__ {_MetadataScopeResult'operationStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MetadataScopeResult "errorMessage" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeResult'errorMessage + (\ x__ y__ -> x__ {_MetadataScopeResult'errorMessage = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField MetadataScopeResult "maybe'errorMessage" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeResult'errorMessage + (\ x__ y__ -> x__ {_MetadataScopeResult'errorMessage = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MetadataScopeResult "contractSearchResult" ContractSearchResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeResult'contractSearchResult + (\ x__ y__ + -> x__ {_MetadataScopeResult'contractSearchResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField MetadataScopeResult "maybe'contractSearchResult" (Prelude.Maybe ContractSearchResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MetadataScopeResult'contractSearchResult + (\ x__ y__ + -> x__ {_MetadataScopeResult'contractSearchResult = y__})) + Prelude.id +instance Data.ProtoLens.Message MetadataScopeResult where + messageName _ = Data.Text.pack "metadata_1.MetadataScopeResult" + packedMessageDescriptor _ + = "\n\ + \\DC3MetadataScopeResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \SOH(\rR\trequestId\DC2'\n\ + \\SItracking_number\CAN\STX \SOH(\EOTR\SOtrackingNumber\DC2)\n\ + \\DLEoperation_status\CAN\ETX \SOH(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\EOT \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2V\n\ + \\SYNcontract_search_result\CAN\ENQ \SOH(\v2 .metadata_1.ContractSearchResultR\DC4contractSearchResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + requestId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "request_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'requestId")) :: + Data.ProtoLens.FieldDescriptor MetadataScopeResult + trackingNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "tracking_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'trackingNumber")) :: + Data.ProtoLens.FieldDescriptor MetadataScopeResult + operationStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'operationStatus")) :: + Data.ProtoLens.FieldDescriptor MetadataScopeResult + errorMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "error_message" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'errorMessage")) :: + Data.ProtoLens.FieldDescriptor MetadataScopeResult + contractSearchResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_search_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ContractSearchResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractSearchResult")) :: + Data.ProtoLens.FieldDescriptor MetadataScopeResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, requestId__field_descriptor), + (Data.ProtoLens.Tag 2, trackingNumber__field_descriptor), + (Data.ProtoLens.Tag 3, operationStatus__field_descriptor), + (Data.ProtoLens.Tag 4, errorMessage__field_descriptor), + (Data.ProtoLens.Tag 5, contractSearchResult__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _MetadataScopeResult'_unknownFields + (\ x__ y__ -> x__ {_MetadataScopeResult'_unknownFields = y__}) + defMessage + = MetadataScopeResult'_constructor + {_MetadataScopeResult'requestId = Prelude.Nothing, + _MetadataScopeResult'trackingNumber = Prelude.Nothing, + _MetadataScopeResult'operationStatus = Prelude.Nothing, + _MetadataScopeResult'errorMessage = Prelude.Nothing, + _MetadataScopeResult'contractSearchResult = Prelude.Nothing, + _MetadataScopeResult'_unknownFields = []} + parseMessage + = let + loop :: + MetadataScopeResult + -> Data.ProtoLens.Encoding.Bytes.Parser MetadataScopeResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "request_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "tracking_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"trackingNumber") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationStatus") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "error_message" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"errorMessage") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "contract_search_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractSearchResult") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "MetadataScopeResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'requestId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'trackingNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'operationStatus") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'errorMessage") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'contractSearchResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData MetadataScopeResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_MetadataScopeResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_MetadataScopeResult'requestId x__) + (Control.DeepSeq.deepseq + (_MetadataScopeResult'trackingNumber x__) + (Control.DeepSeq.deepseq + (_MetadataScopeResult'operationStatus x__) + (Control.DeepSeq.deepseq + (_MetadataScopeResult'errorMessage x__) + (Control.DeepSeq.deepseq + (_MetadataScopeResult'contractSearchResult x__) ()))))) +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\DC4CMS/metadata_1.proto\DC2\n\ + \metadata_1\SUB\NAKcommon/shared_1.proto\SUB\DC2CMS/common_1.proto\"\129\SOH\n\ + \\DC4MetadataScopeRequest\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\rR\STXid\DC2Y\n\ + \\ETBcontract_search_request\CAN\STX \SOH(\v2!.metadata_1.ContractSearchRequestR\NAKcontractSearchRequest\"\149\STX\n\ + \\DC3MetadataScopeResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \SOH(\rR\trequestId\DC2'\n\ + \\SItracking_number\CAN\STX \SOH(\EOTR\SOtrackingNumber\DC2)\n\ + \\DLEoperation_status\CAN\ETX \SOH(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\EOT \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2V\n\ + \\SYNcontract_search_result\CAN\ENQ \SOH(\v2 .metadata_1.ContractSearchResultR\DC4contractSearchResult\"\201\STX\n\ + \\NAKContractSearchRequest\DC2\DLE\n\ + \\ETXtop\CAN\SOH \SOH(\rR\ETXtop\DC2=\n\ + \\SOsearch_options\CAN\STX \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\ETX \SOH(\b:\ENQfalseR\fallMatchMode\DC27\n\ + \\DC4include_non_tradable\CAN\EOT \SOH(\b:\ENQfalseR\DC2includeNonTradable\"y\n\ + \\SOSearchCriteria\DC2\DC1\n\ + \\rCONTRACT_NAME\DLE\SOH\DC2\EM\n\ + \\NAKFUNGIBLE_COMMODITY_ID\DLE\STX\DC2\SYN\n\ + \\DC2INSTRUMENT_TYPE_ID\DLE\ETX\DC2\SI\n\ + \\vCONTRACT_ID\DLE\EOT\DC2\DLE\n\ + \\fCOMMODITY_ID\DLE\ENQ\"\142\SOH\n\ + \\DC4ContractSearchResult\DC2O\n\ + \\SIcontract_record\CAN\SOH \ETX(\v2&.metadata_1.ContractSearchResultRecordR\SOcontractRecord\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete\"\183\STX\n\ + \\SUBContractSearchResultRecord\DC2\US\n\ + \\vcontract_id\CAN\SOH \SOH(\tR\n\ + \contractId\DC2#\n\ + \\rcontract_name\CAN\STX \SOH(\tR\fcontractName\DC2,\n\ + \\DC2contract_full_name\CAN\ETX \SOH(\tR\DLEcontractFullName\DC2!\n\ + \\fcommodity_id\CAN\EOT \SOH(\tR\vcommodityId\DC2,\n\ + \\DC2instrument_type_id\CAN\ENQ \SOH(\tR\DLEinstrumentTypeId\DC22\n\ + \\NAKfungible_commodity_id\CAN\ACK \SOH(\tR\DC3fungibleCommodityId\DC2 \n\ + \\vdescription\CAN\a \SOH(\tR\vdescriptionJ\160\CAN\n\ + \\ACK\DC2\EOT\STX\NULg\SOH\n\ + \P\n\ + \\SOH\f\DC2\ETX\STX\NUL\DC22F CQG Customer Management System API Markets metadata extend protocol.\n\ + \\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\EOT\NUL\DC3\n\ + \\t\n\ + \\STX\ETX\NUL\DC2\ETX\ACK\NUL\US\n\ + \\t\n\ + \\STX\ETX\SOH\DC2\ETX\a\NUL\FS\n\ + \\n\ + \\n\ + \\STX\EOT\NUL\DC2\EOT\t\NUL\DC1\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\t\b\FS\n\ + \`\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX\r\EOT\ESC\SUBS [required] Request identifier.\n\ + \ It should be unique to match with request result.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX\r\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\r\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\r\DC4\SYN\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\r\EM\SUB\n\ + \4\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX\DLE\EOT?\SUB' Allows to search supported contracts.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX\DLE\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX\DLE\r\"\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\DLE#:\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\DLE=>\n\ + \\n\ + \\n\ + \\STX\EOT\SOH\DC2\EOT\DC3\NUL$\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX\DC3\b\ESC\n\ + \-\n\ + \\EOT\EOT\SOH\STX\NUL\DC2\ETX\SYN\EOT#\SUB ID of a corresponding request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\EOT\DC2\ETX\SYN\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETX\SYN\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX\SYN\DC4\RS\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX\SYN!\"\n\ + \f\n\ + \\EOT\EOT\SOH\STX\SOH\DC2\ETX\SUB\EOT(\SUBY Request tracking number generated by CMS API\n\ + \ Used by client to cancel deferred request\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETX\SUB\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETX\SUB\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX\SUB\DC4#\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX\SUB&'\n\ + \^\n\ + \\EOT\EOT\SOH\STX\STX\DC2\ETX\RS\EOT)\SUBQ Operation status.\n\ + \ This field is associated with common_1.OperationStatus enum.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\EOT\DC2\ETX\RS\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ENQ\DC2\ETX\RS\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETX\RS\DC4$\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETX\RS'(\n\ + \\US\n\ + \\EOT\EOT\SOH\STX\ETX\DC2\ETX!\EOT-\SUB\DC2 Failure details.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\EOT\DC2\ETX!\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ACK\DC2\ETX!\r\SUB\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETX!\ESC(\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETX!+,\n\ + \\v\n\ + \\EOT\EOT\SOH\STX\EOT\DC2\ETX#\EOT=\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\EOT\DC2\ETX#\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ACK\DC2\ETX#\r!\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\SOH\DC2\ETX#\"8\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ETX\DC2\ETX#;<\n\ + \\n\ + \\n\ + \\STX\EOT\STX\DC2\EOT&\NULD\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\STX\SOH\DC2\ETX&\b\GS\n\ + \8\n\ + \\EOT\EOT\STX\EOT\NUL\DC2\EOT)\EOT5\ENQ\SUB* List of possible search refine criteria.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\EOT\NUL\SOH\DC2\ETX)\t\ETB\n\ + \+\n\ + \\ACK\EOT\STX\EOT\NUL\STX\NUL\DC2\ETX,\b\SUB\SUB\FS Display name (like EPZ16).\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\NUL\SOH\DC2\ETX,\b\NAK\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\NUL\STX\DC2\ETX,\CAN\EM\n\ + \\r\n\ + \\ACK\EOT\STX\EOT\NUL\STX\SOH\DC2\ETX.\b\"\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\SOH\SOH\DC2\ETX.\b\GS\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\SOH\STX\DC2\ETX. !\n\ + \\r\n\ + \\ACK\EOT\STX\EOT\NUL\STX\STX\DC2\ETX0\b\US\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\STX\SOH\DC2\ETX0\b\SUB\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\STX\STX\DC2\ETX0\GS\RS\n\ + \\r\n\ + \\ACK\EOT\STX\EOT\NUL\STX\ETX\DC2\ETX2\b\CAN\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\ETX\SOH\DC2\ETX2\b\DC3\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\ETX\STX\DC2\ETX2\SYN\ETB\n\ + \\r\n\ + \\ACK\EOT\STX\EOT\NUL\STX\EOT\DC2\ETX4\b\EM\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\EOT\SOH\DC2\ETX4\b\DC4\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\EOT\STX\DC2\ETX4\ETB\CAN\n\ + \X\n\ + \\EOT\EOT\STX\STX\NUL\DC2\ETX8\EOT\FS\SUBK Optionally restrict matched results by returning the first 'top' records.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\EOT\DC2\ETX8\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETX8\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX8\DC4\ETB\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX8\SUB\ESC\n\ + \g\n\ + \\EOT\EOT\STX\STX\SOH\DC2\ETX;\EOT6\SUBZ List of search options. Each option has its own search text, criteria and matching rule.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\EOT\DC2\ETX;\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ACK\DC2\ETX;\r\"\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETX;#1\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETX;45\n\ + \g\n\ + \\EOT\EOT\STX\STX\STX\DC2\ETX?\EOT7\SUBZ Indicates, whether all criteria must match at once.\n\ + \ By default any criteria must match.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\EOT\DC2\ETX?\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ENQ\DC2\ETX?\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\SOH\DC2\ETX?\DC2 \n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ETX\DC2\ETX?#$\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\b\DC2\ETX?%6\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\a\DC2\ETX?05\n\ + \v\n\ + \\EOT\EOT\STX\STX\ETX\DC2\ETXC\EOT=\SUBi Indicates weather include tradable contracts or not.\n\ + \ By default, only tradable contracts are returned.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\EOT\DC2\ETXC\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ENQ\DC2\ETXC\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\SOH\DC2\ETXC\DC2&\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ETX\DC2\ETXC)*\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\b\DC2\ETXC+<\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\a\DC2\ETXC6;\n\ + \\n\ + \\n\ + \\STX\EOT\ETX\DC2\EOTF\NULN\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\ETX\SOH\DC2\ETXF\b\FS\n\ + \'\n\ + \\EOT\EOT\ETX\STX\NUL\DC2\ETXI\EOT<\SUB\SUB List of found contracts.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\EOT\DC2\ETXI\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ACK\DC2\ETXI\r'\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETXI(7\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETXI:;\n\ + \q\n\ + \\EOT\EOT\ETX\STX\SOH\DC2\ETXM\EOT3\SUBd This flag is set to true if all results are sent\n\ + \ and nothing was filtered out by 'top' parameter.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\EOT\DC2\ETXM\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\ENQ\DC2\ETXM\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\ETXM\DC2\GS\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\ETXM !\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\b\DC2\ETXM\"2\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\a\DC2\ETXM-1\n\ + \;\n\ + \\STX\EOT\EOT\DC2\EOTQ\NULg\SOH\SUB/ Information about one of the found contracts.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\EOT\SOH\DC2\ETXQ\b\"\n\ + \\v\n\ + \\EOT\EOT\EOT\STX\NUL\DC2\ETXS\EOT$\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\EOT\DC2\ETXS\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\ETXS\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\ETXS\DC4\US\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\ETXS\"#\n\ + \C\n\ + \\EOT\EOT\EOT\STX\SOH\DC2\ETXW\EOT&\SUB6 Short (display) version of the name.\n\ + \ Example: EPZ16\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\EOT\DC2\ETXW\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\ENQ\DC2\ETXW\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\ETXW\DC4!\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\ETXW$%\n\ + \#\n\ + \\EOT\EOT\EOT\STX\STX\DC2\ETXZ\EOT+\SUB\SYN Example: F.US.EP.Z16\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\EOT\DC2\ETXZ\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\ENQ\DC2\ETXZ\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\SOH\DC2\ETXZ\DC4&\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\ETX\DC2\ETXZ)*\n\ + \\DC4\n\ + \\EOT\EOT\EOT\STX\ETX\DC2\ETX]\EOT%\SUB\a XBit.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ETX\EOT\DC2\ETX]\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ETX\ENQ\DC2\ETX]\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ETX\SOH\DC2\ETX]\DC4 \n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ETX\ETX\DC2\ETX]#$\n\ + \\US\n\ + \\EOT\EOT\EOT\STX\EOT\DC2\ETX`\EOT+\SUB\DC2 Instrument type.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\EOT\EOT\DC2\ETX`\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\EOT\ENQ\DC2\ETX`\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\EOT\SOH\DC2\ETX`\DC4&\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\EOT\ETX\DC2\ETX`)*\n\ + \%\n\ + \\EOT\EOT\EOT\STX\ENQ\DC2\ETXc\EOT.\SUB\CAN Fungible commodity id.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ENQ\EOT\DC2\ETXc\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ENQ\ENQ\DC2\ETXc\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ENQ\SOH\DC2\ETXc\DC4)\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ENQ\ETX\DC2\ETXc,-\n\ + \$\n\ + \\EOT\EOT\EOT\STX\ACK\DC2\ETXf\EOT$\SUB\ETB Contract description.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ACK\EOT\DC2\ETXf\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ACK\ENQ\DC2\ETXf\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ACK\SOH\DC2\ETXf\DC4\US\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\ACK\ETX\DC2\ETXf\"#" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Metadata1_Fields.hs b/cqg-cms-api-proto/src/Proto/CMS/Metadata1_Fields.hs new file mode 100644 index 0000000..5e12542 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Metadata1_Fields.hs @@ -0,0 +1,285 @@ +{- This file was auto-generated from CMS/metadata_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Metadata1_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.Common1 +import qualified Proto.Common.Shared1 +allMatchMode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allMatchMode" a) => + Lens.Family2.LensLike' f s a +allMatchMode = Data.ProtoLens.Field.field @"allMatchMode" +commodityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "commodityId" a) => + Lens.Family2.LensLike' f s a +commodityId = Data.ProtoLens.Field.field @"commodityId" +contractFullName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractFullName" a) => + Lens.Family2.LensLike' f s a +contractFullName = Data.ProtoLens.Field.field @"contractFullName" +contractId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractId" a) => + Lens.Family2.LensLike' f s a +contractId = Data.ProtoLens.Field.field @"contractId" +contractName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractName" a) => + Lens.Family2.LensLike' f s a +contractName = Data.ProtoLens.Field.field @"contractName" +contractRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractRecord" a) => + Lens.Family2.LensLike' f s a +contractRecord = Data.ProtoLens.Field.field @"contractRecord" +contractSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractSearchRequest" a) => + Lens.Family2.LensLike' f s a +contractSearchRequest + = Data.ProtoLens.Field.field @"contractSearchRequest" +contractSearchResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractSearchResult" a) => + Lens.Family2.LensLike' f s a +contractSearchResult + = Data.ProtoLens.Field.field @"contractSearchResult" +description :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "description" a) => + Lens.Family2.LensLike' f s a +description = Data.ProtoLens.Field.field @"description" +errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "errorMessage" a) => + Lens.Family2.LensLike' f s a +errorMessage = Data.ProtoLens.Field.field @"errorMessage" +fungibleCommodityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fungibleCommodityId" a) => + Lens.Family2.LensLike' f s a +fungibleCommodityId + = Data.ProtoLens.Field.field @"fungibleCommodityId" +id :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "id" a) => + Lens.Family2.LensLike' f s a +id = Data.ProtoLens.Field.field @"id" +includeNonTradable :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "includeNonTradable" a) => + Lens.Family2.LensLike' f s a +includeNonTradable + = Data.ProtoLens.Field.field @"includeNonTradable" +instrumentTypeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "instrumentTypeId" a) => + Lens.Family2.LensLike' f s a +instrumentTypeId = Data.ProtoLens.Field.field @"instrumentTypeId" +isComplete :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isComplete" a) => + Lens.Family2.LensLike' f s a +isComplete = Data.ProtoLens.Field.field @"isComplete" +maybe'allMatchMode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allMatchMode" a) => + Lens.Family2.LensLike' f s a +maybe'allMatchMode + = Data.ProtoLens.Field.field @"maybe'allMatchMode" +maybe'commodityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'commodityId" a) => + Lens.Family2.LensLike' f s a +maybe'commodityId = Data.ProtoLens.Field.field @"maybe'commodityId" +maybe'contractFullName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'contractFullName" a) => + Lens.Family2.LensLike' f s a +maybe'contractFullName + = Data.ProtoLens.Field.field @"maybe'contractFullName" +maybe'contractId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'contractId" a) => + Lens.Family2.LensLike' f s a +maybe'contractId = Data.ProtoLens.Field.field @"maybe'contractId" +maybe'contractName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'contractName" a) => + Lens.Family2.LensLike' f s a +maybe'contractName + = Data.ProtoLens.Field.field @"maybe'contractName" +maybe'contractSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'contractSearchRequest" a) => + Lens.Family2.LensLike' f s a +maybe'contractSearchRequest + = Data.ProtoLens.Field.field @"maybe'contractSearchRequest" +maybe'contractSearchResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'contractSearchResult" a) => + Lens.Family2.LensLike' f s a +maybe'contractSearchResult + = Data.ProtoLens.Field.field @"maybe'contractSearchResult" +maybe'description :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'description" a) => + Lens.Family2.LensLike' f s a +maybe'description = Data.ProtoLens.Field.field @"maybe'description" +maybe'errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'errorMessage" a) => + Lens.Family2.LensLike' f s a +maybe'errorMessage + = Data.ProtoLens.Field.field @"maybe'errorMessage" +maybe'fungibleCommodityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'fungibleCommodityId" a) => + Lens.Family2.LensLike' f s a +maybe'fungibleCommodityId + = Data.ProtoLens.Field.field @"maybe'fungibleCommodityId" +maybe'id :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'id" a) => + Lens.Family2.LensLike' f s a +maybe'id = Data.ProtoLens.Field.field @"maybe'id" +maybe'includeNonTradable :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'includeNonTradable" a) => + Lens.Family2.LensLike' f s a +maybe'includeNonTradable + = Data.ProtoLens.Field.field @"maybe'includeNonTradable" +maybe'instrumentTypeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'instrumentTypeId" a) => + Lens.Family2.LensLike' f s a +maybe'instrumentTypeId + = Data.ProtoLens.Field.field @"maybe'instrumentTypeId" +maybe'isComplete :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isComplete" a) => + Lens.Family2.LensLike' f s a +maybe'isComplete = Data.ProtoLens.Field.field @"maybe'isComplete" +maybe'operationStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'operationStatus" a) => + Lens.Family2.LensLike' f s a +maybe'operationStatus + = Data.ProtoLens.Field.field @"maybe'operationStatus" +maybe'requestId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'requestId" a) => + Lens.Family2.LensLike' f s a +maybe'requestId = Data.ProtoLens.Field.field @"maybe'requestId" +maybe'top :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'top" a) => + Lens.Family2.LensLike' f s a +maybe'top = Data.ProtoLens.Field.field @"maybe'top" +maybe'trackingNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'trackingNumber" a) => + Lens.Family2.LensLike' f s a +maybe'trackingNumber + = Data.ProtoLens.Field.field @"maybe'trackingNumber" +operationStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operationStatus" a) => + Lens.Family2.LensLike' f s a +operationStatus = Data.ProtoLens.Field.field @"operationStatus" +requestId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "requestId" a) => + Lens.Family2.LensLike' f s a +requestId = Data.ProtoLens.Field.field @"requestId" +searchOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "searchOptions" a) => + Lens.Family2.LensLike' f s a +searchOptions = Data.ProtoLens.Field.field @"searchOptions" +top :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "top" a) => + Lens.Family2.LensLike' f s a +top = Data.ProtoLens.Field.field @"top" +trackingNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "trackingNumber" a) => + Lens.Family2.LensLike' f s a +trackingNumber = Data.ProtoLens.Field.field @"trackingNumber" +vec'contractRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'contractRecord" a) => + Lens.Family2.LensLike' f s a +vec'contractRecord + = Data.ProtoLens.Field.field @"vec'contractRecord" +vec'searchOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'searchOptions" a) => + Lens.Family2.LensLike' f s a +vec'searchOptions = Data.ProtoLens.Field.field @"vec'searchOptions" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Order1.hs b/cqg-cms-api-proto/src/Proto/CMS/Order1.hs new file mode 100644 index 0000000..4595873 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Order1.hs @@ -0,0 +1,2172 @@ +{- This file was auto-generated from CMS/order_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Order1 ( + BatchOrdersOperation(), BatchOrdersOperationActionResult(), + BatchOrdersOperationCriteria(), BatchOrdersOperationResult(), + BatchOrdersOperationSecondaryCriteria(), + BatchOrdersOperationSecondaryCriteria'OrderOperationType(..), + BatchOrdersOperationSecondaryCriteria'OrderOperationType() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +{- | Fields : + + * 'Proto.CMS.Order1_Fields.batchOrdersOperationCriteria' @:: Lens' BatchOrdersOperation BatchOrdersOperationCriteria@ + * 'Proto.CMS.Order1_Fields.maybe'batchOrdersOperationCriteria' @:: Lens' BatchOrdersOperation (Prelude.Maybe BatchOrdersOperationCriteria)@ + * 'Proto.CMS.Order1_Fields.batchOrdersOperationSecondaryCriteria' @:: Lens' BatchOrdersOperation BatchOrdersOperationSecondaryCriteria@ + * 'Proto.CMS.Order1_Fields.maybe'batchOrdersOperationSecondaryCriteria' @:: Lens' BatchOrdersOperation (Prelude.Maybe BatchOrdersOperationSecondaryCriteria)@ -} +data BatchOrdersOperation + = BatchOrdersOperation'_constructor {_BatchOrdersOperation'batchOrdersOperationCriteria :: !(Prelude.Maybe BatchOrdersOperationCriteria), + _BatchOrdersOperation'batchOrdersOperationSecondaryCriteria :: !(Prelude.Maybe BatchOrdersOperationSecondaryCriteria), + _BatchOrdersOperation'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show BatchOrdersOperation where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperation "batchOrdersOperationCriteria" BatchOrdersOperationCriteria where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperation'batchOrdersOperationCriteria + (\ x__ y__ + -> x__ {_BatchOrdersOperation'batchOrdersOperationCriteria = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField BatchOrdersOperation "maybe'batchOrdersOperationCriteria" (Prelude.Maybe BatchOrdersOperationCriteria) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperation'batchOrdersOperationCriteria + (\ x__ y__ + -> x__ {_BatchOrdersOperation'batchOrdersOperationCriteria = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperation "batchOrdersOperationSecondaryCriteria" BatchOrdersOperationSecondaryCriteria where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperation'batchOrdersOperationSecondaryCriteria + (\ x__ y__ + -> x__ + {_BatchOrdersOperation'batchOrdersOperationSecondaryCriteria = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField BatchOrdersOperation "maybe'batchOrdersOperationSecondaryCriteria" (Prelude.Maybe BatchOrdersOperationSecondaryCriteria) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperation'batchOrdersOperationSecondaryCriteria + (\ x__ y__ + -> x__ + {_BatchOrdersOperation'batchOrdersOperationSecondaryCriteria = y__})) + Prelude.id +instance Data.ProtoLens.Message BatchOrdersOperation where + messageName _ = Data.Text.pack "order_1.BatchOrdersOperation" + packedMessageDescriptor _ + = "\n\ + \\DC4BatchOrdersOperation\DC2l\n\ + \\USbatch_orders_operation_criteria\CAN\SOH \SOH(\v2%.order_1.BatchOrdersOperationCriteriaR\FSbatchOrdersOperationCriteria\DC2\136\SOH\n\ + \)batch_orders_operation_secondary_criteria\CAN\STX \SOH(\v2..order_1.BatchOrdersOperationSecondaryCriteriaR%batchOrdersOperationSecondaryCriteria" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + batchOrdersOperationCriteria__field_descriptor + = Data.ProtoLens.FieldDescriptor + "batch_orders_operation_criteria" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor BatchOrdersOperationCriteria) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'batchOrdersOperationCriteria")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperation + batchOrdersOperationSecondaryCriteria__field_descriptor + = Data.ProtoLens.FieldDescriptor + "batch_orders_operation_secondary_criteria" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor BatchOrdersOperationSecondaryCriteria) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'batchOrdersOperationSecondaryCriteria")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperation + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, + batchOrdersOperationCriteria__field_descriptor), + (Data.ProtoLens.Tag 2, + batchOrdersOperationSecondaryCriteria__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _BatchOrdersOperation'_unknownFields + (\ x__ y__ -> x__ {_BatchOrdersOperation'_unknownFields = y__}) + defMessage + = BatchOrdersOperation'_constructor + {_BatchOrdersOperation'batchOrdersOperationCriteria = Prelude.Nothing, + _BatchOrdersOperation'batchOrdersOperationSecondaryCriteria = Prelude.Nothing, + _BatchOrdersOperation'_unknownFields = []} + parseMessage + = let + loop :: + BatchOrdersOperation + -> Data.ProtoLens.Encoding.Bytes.Parser BatchOrdersOperation + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "batch_orders_operation_criteria" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"batchOrdersOperationCriteria") y + x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "batch_orders_operation_secondary_criteria" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"batchOrdersOperationSecondaryCriteria") + y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "BatchOrdersOperation" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'batchOrdersOperationCriteria") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'batchOrdersOperationSecondaryCriteria") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData BatchOrdersOperation where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_BatchOrdersOperation'_unknownFields x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperation'batchOrdersOperationCriteria x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperation'batchOrdersOperationSecondaryCriteria x__) + ())) +{- | Fields : + + * 'Proto.CMS.Order1_Fields.riskServerInstanceId' @:: Lens' BatchOrdersOperationActionResult Data.Text.Text@ + * 'Proto.CMS.Order1_Fields.maybe'riskServerInstanceId' @:: Lens' BatchOrdersOperationActionResult (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Order1_Fields.processedOrdersCount' @:: Lens' BatchOrdersOperationActionResult Data.Word.Word32@ + * 'Proto.CMS.Order1_Fields.maybe'processedOrdersCount' @:: Lens' BatchOrdersOperationActionResult (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Order1_Fields.resultDescription' @:: Lens' BatchOrdersOperationActionResult Data.Text.Text@ + * 'Proto.CMS.Order1_Fields.maybe'resultDescription' @:: Lens' BatchOrdersOperationActionResult (Prelude.Maybe Data.Text.Text)@ -} +data BatchOrdersOperationActionResult + = BatchOrdersOperationActionResult'_constructor {_BatchOrdersOperationActionResult'riskServerInstanceId :: !(Prelude.Maybe Data.Text.Text), + _BatchOrdersOperationActionResult'processedOrdersCount :: !(Prelude.Maybe Data.Word.Word32), + _BatchOrdersOperationActionResult'resultDescription :: !(Prelude.Maybe Data.Text.Text), + _BatchOrdersOperationActionResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show BatchOrdersOperationActionResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationActionResult "riskServerInstanceId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationActionResult'riskServerInstanceId + (\ x__ y__ + -> x__ + {_BatchOrdersOperationActionResult'riskServerInstanceId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationActionResult "maybe'riskServerInstanceId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationActionResult'riskServerInstanceId + (\ x__ y__ + -> x__ + {_BatchOrdersOperationActionResult'riskServerInstanceId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationActionResult "processedOrdersCount" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationActionResult'processedOrdersCount + (\ x__ y__ + -> x__ + {_BatchOrdersOperationActionResult'processedOrdersCount = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationActionResult "maybe'processedOrdersCount" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationActionResult'processedOrdersCount + (\ x__ y__ + -> x__ + {_BatchOrdersOperationActionResult'processedOrdersCount = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationActionResult "resultDescription" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationActionResult'resultDescription + (\ x__ y__ + -> x__ + {_BatchOrdersOperationActionResult'resultDescription = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationActionResult "maybe'resultDescription" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationActionResult'resultDescription + (\ x__ y__ + -> x__ + {_BatchOrdersOperationActionResult'resultDescription = y__})) + Prelude.id +instance Data.ProtoLens.Message BatchOrdersOperationActionResult where + messageName _ + = Data.Text.pack "order_1.BatchOrdersOperationActionResult" + packedMessageDescriptor _ + = "\n\ + \ BatchOrdersOperationActionResult\DC25\n\ + \\ETBrisk_server_instance_id\CAN\SOH \SOH(\tR\DC4riskServerInstanceId\DC24\n\ + \\SYNprocessed_orders_count\CAN\STX \SOH(\rR\DC4processedOrdersCount\DC2-\n\ + \\DC2result_description\CAN\ETX \SOH(\tR\DC1resultDescription" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + riskServerInstanceId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "risk_server_instance_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'riskServerInstanceId")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationActionResult + processedOrdersCount__field_descriptor + = Data.ProtoLens.FieldDescriptor + "processed_orders_count" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'processedOrdersCount")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationActionResult + resultDescription__field_descriptor + = Data.ProtoLens.FieldDescriptor + "result_description" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'resultDescription")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationActionResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, riskServerInstanceId__field_descriptor), + (Data.ProtoLens.Tag 2, processedOrdersCount__field_descriptor), + (Data.ProtoLens.Tag 3, resultDescription__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _BatchOrdersOperationActionResult'_unknownFields + (\ x__ y__ + -> x__ {_BatchOrdersOperationActionResult'_unknownFields = y__}) + defMessage + = BatchOrdersOperationActionResult'_constructor + {_BatchOrdersOperationActionResult'riskServerInstanceId = Prelude.Nothing, + _BatchOrdersOperationActionResult'processedOrdersCount = Prelude.Nothing, + _BatchOrdersOperationActionResult'resultDescription = Prelude.Nothing, + _BatchOrdersOperationActionResult'_unknownFields = []} + parseMessage + = let + loop :: + BatchOrdersOperationActionResult + -> Data.ProtoLens.Encoding.Bytes.Parser BatchOrdersOperationActionResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "risk_server_instance_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"riskServerInstanceId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "processed_orders_count" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"processedOrdersCount") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "result_description" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"resultDescription") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "BatchOrdersOperationActionResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'riskServerInstanceId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'processedOrdersCount") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'resultDescription") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData BatchOrdersOperationActionResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_BatchOrdersOperationActionResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationActionResult'riskServerInstanceId x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationActionResult'processedOrdersCount x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationActionResult'resultDescription x__) ()))) +{- | Fields : + + * 'Proto.CMS.Order1_Fields.brokerageIds' @:: Lens' BatchOrdersOperationCriteria [Data.Text.Text]@ + * 'Proto.CMS.Order1_Fields.vec'brokerageIds' @:: Lens' BatchOrdersOperationCriteria (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Order1_Fields.profileIds' @:: Lens' BatchOrdersOperationCriteria [Data.Text.Text]@ + * 'Proto.CMS.Order1_Fields.vec'profileIds' @:: Lens' BatchOrdersOperationCriteria (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Order1_Fields.accountIds' @:: Lens' BatchOrdersOperationCriteria [Data.Text.Text]@ + * 'Proto.CMS.Order1_Fields.vec'accountIds' @:: Lens' BatchOrdersOperationCriteria (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Order1_Fields.loginIds' @:: Lens' BatchOrdersOperationCriteria [Data.Text.Text]@ + * 'Proto.CMS.Order1_Fields.vec'loginIds' @:: Lens' BatchOrdersOperationCriteria (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Order1_Fields.routeGroupIds' @:: Lens' BatchOrdersOperationCriteria [Data.Text.Text]@ + * 'Proto.CMS.Order1_Fields.vec'routeGroupIds' @:: Lens' BatchOrdersOperationCriteria (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Order1_Fields.routeCodes' @:: Lens' BatchOrdersOperationCriteria [Data.Text.Text]@ + * 'Proto.CMS.Order1_Fields.vec'routeCodes' @:: Lens' BatchOrdersOperationCriteria (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Order1_Fields.contractIds' @:: Lens' BatchOrdersOperationCriteria [Data.Text.Text]@ + * 'Proto.CMS.Order1_Fields.vec'contractIds' @:: Lens' BatchOrdersOperationCriteria (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Order1_Fields.internalAlgorithmsIds' @:: Lens' BatchOrdersOperationCriteria [Data.Text.Text]@ + * 'Proto.CMS.Order1_Fields.vec'internalAlgorithmsIds' @:: Lens' BatchOrdersOperationCriteria (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Order1_Fields.externalAlgorithmsIds' @:: Lens' BatchOrdersOperationCriteria [Data.Text.Text]@ + * 'Proto.CMS.Order1_Fields.vec'externalAlgorithmsIds' @:: Lens' BatchOrdersOperationCriteria (Data.Vector.Vector Data.Text.Text)@ -} +data BatchOrdersOperationCriteria + = BatchOrdersOperationCriteria'_constructor {_BatchOrdersOperationCriteria'brokerageIds :: !(Data.Vector.Vector Data.Text.Text), + _BatchOrdersOperationCriteria'profileIds :: !(Data.Vector.Vector Data.Text.Text), + _BatchOrdersOperationCriteria'accountIds :: !(Data.Vector.Vector Data.Text.Text), + _BatchOrdersOperationCriteria'loginIds :: !(Data.Vector.Vector Data.Text.Text), + _BatchOrdersOperationCriteria'routeGroupIds :: !(Data.Vector.Vector Data.Text.Text), + _BatchOrdersOperationCriteria'routeCodes :: !(Data.Vector.Vector Data.Text.Text), + _BatchOrdersOperationCriteria'contractIds :: !(Data.Vector.Vector Data.Text.Text), + _BatchOrdersOperationCriteria'internalAlgorithmsIds :: !(Data.Vector.Vector Data.Text.Text), + _BatchOrdersOperationCriteria'externalAlgorithmsIds :: !(Data.Vector.Vector Data.Text.Text), + _BatchOrdersOperationCriteria'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show BatchOrdersOperationCriteria where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "brokerageIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'brokerageIds + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'brokerageIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "vec'brokerageIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'brokerageIds + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'brokerageIds = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "profileIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'profileIds + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'profileIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "vec'profileIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'profileIds + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'profileIds = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "accountIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'accountIds + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'accountIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "vec'accountIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'accountIds + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'accountIds = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "loginIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'loginIds + (\ x__ y__ -> x__ {_BatchOrdersOperationCriteria'loginIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "vec'loginIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'loginIds + (\ x__ y__ -> x__ {_BatchOrdersOperationCriteria'loginIds = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "routeGroupIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'routeGroupIds + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'routeGroupIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "vec'routeGroupIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'routeGroupIds + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'routeGroupIds = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "routeCodes" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'routeCodes + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'routeCodes = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "vec'routeCodes" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'routeCodes + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'routeCodes = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "contractIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'contractIds + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'contractIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "vec'contractIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'contractIds + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'contractIds = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "internalAlgorithmsIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'internalAlgorithmsIds + (\ x__ y__ + -> x__ + {_BatchOrdersOperationCriteria'internalAlgorithmsIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "vec'internalAlgorithmsIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'internalAlgorithmsIds + (\ x__ y__ + -> x__ + {_BatchOrdersOperationCriteria'internalAlgorithmsIds = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "externalAlgorithmsIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'externalAlgorithmsIds + (\ x__ y__ + -> x__ + {_BatchOrdersOperationCriteria'externalAlgorithmsIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationCriteria "vec'externalAlgorithmsIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'externalAlgorithmsIds + (\ x__ y__ + -> x__ + {_BatchOrdersOperationCriteria'externalAlgorithmsIds = y__})) + Prelude.id +instance Data.ProtoLens.Message BatchOrdersOperationCriteria where + messageName _ + = Data.Text.pack "order_1.BatchOrdersOperationCriteria" + packedMessageDescriptor _ + = "\n\ + \\FSBatchOrdersOperationCriteria\DC2#\n\ + \\rbrokerage_ids\CAN\SOH \ETX(\tR\fbrokerageIds\DC2\US\n\ + \\vprofile_ids\CAN\STX \ETX(\tR\n\ + \profileIds\DC2\US\n\ + \\vaccount_ids\CAN\ETX \ETX(\tR\n\ + \accountIds\DC2\ESC\n\ + \\tlogin_ids\CAN\EOT \ETX(\tR\bloginIds\DC2&\n\ + \\SIroute_group_ids\CAN\ENQ \ETX(\tR\rrouteGroupIds\DC2\US\n\ + \\vroute_codes\CAN\ACK \ETX(\tR\n\ + \routeCodes\DC2!\n\ + \\fcontract_ids\CAN\a \ETX(\tR\vcontractIds\DC26\n\ + \\ETBinternal_algorithms_ids\CAN\b \ETX(\tR\NAKinternalAlgorithmsIds\DC26\n\ + \\ETBexternal_algorithms_ids\CAN\t \ETX(\tR\NAKexternalAlgorithmsIds" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + brokerageIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"brokerageIds")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationCriteria + profileIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"profileIds")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationCriteria + accountIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"accountIds")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationCriteria + loginIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"loginIds")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationCriteria + routeGroupIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route_group_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"routeGroupIds")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationCriteria + routeCodes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route_codes" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"routeCodes")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationCriteria + contractIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"contractIds")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationCriteria + internalAlgorithmsIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "internal_algorithms_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"internalAlgorithmsIds")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationCriteria + externalAlgorithmsIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "external_algorithms_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"externalAlgorithmsIds")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationCriteria + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, brokerageIds__field_descriptor), + (Data.ProtoLens.Tag 2, profileIds__field_descriptor), + (Data.ProtoLens.Tag 3, accountIds__field_descriptor), + (Data.ProtoLens.Tag 4, loginIds__field_descriptor), + (Data.ProtoLens.Tag 5, routeGroupIds__field_descriptor), + (Data.ProtoLens.Tag 6, routeCodes__field_descriptor), + (Data.ProtoLens.Tag 7, contractIds__field_descriptor), + (Data.ProtoLens.Tag 8, internalAlgorithmsIds__field_descriptor), + (Data.ProtoLens.Tag 9, externalAlgorithmsIds__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _BatchOrdersOperationCriteria'_unknownFields + (\ x__ y__ + -> x__ {_BatchOrdersOperationCriteria'_unknownFields = y__}) + defMessage + = BatchOrdersOperationCriteria'_constructor + {_BatchOrdersOperationCriteria'brokerageIds = Data.Vector.Generic.empty, + _BatchOrdersOperationCriteria'profileIds = Data.Vector.Generic.empty, + _BatchOrdersOperationCriteria'accountIds = Data.Vector.Generic.empty, + _BatchOrdersOperationCriteria'loginIds = Data.Vector.Generic.empty, + _BatchOrdersOperationCriteria'routeGroupIds = Data.Vector.Generic.empty, + _BatchOrdersOperationCriteria'routeCodes = Data.Vector.Generic.empty, + _BatchOrdersOperationCriteria'contractIds = Data.Vector.Generic.empty, + _BatchOrdersOperationCriteria'internalAlgorithmsIds = Data.Vector.Generic.empty, + _BatchOrdersOperationCriteria'externalAlgorithmsIds = Data.Vector.Generic.empty, + _BatchOrdersOperationCriteria'_unknownFields = []} + parseMessage + = let + loop :: + BatchOrdersOperationCriteria + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser BatchOrdersOperationCriteria + loop + x + mutable'accountIds + mutable'brokerageIds + mutable'contractIds + mutable'externalAlgorithmsIds + mutable'internalAlgorithmsIds + mutable'loginIds + mutable'profileIds + mutable'routeCodes + mutable'routeGroupIds + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'accountIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'accountIds) + frozen'brokerageIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'brokerageIds) + frozen'contractIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'contractIds) + frozen'externalAlgorithmsIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'externalAlgorithmsIds) + frozen'internalAlgorithmsIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'internalAlgorithmsIds) + frozen'loginIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'loginIds) + frozen'profileIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'profileIds) + frozen'routeCodes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'routeCodes) + frozen'routeGroupIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'routeGroupIds) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'accountIds") frozen'accountIds + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'brokerageIds") + frozen'brokerageIds + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'contractIds") + frozen'contractIds + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'externalAlgorithmsIds") + frozen'externalAlgorithmsIds + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'internalAlgorithmsIds") + frozen'internalAlgorithmsIds + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'loginIds") + frozen'loginIds + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'profileIds") + frozen'profileIds + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'routeCodes") + frozen'routeCodes + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"vec'routeGroupIds") + frozen'routeGroupIds x)))))))))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'brokerageIds y) + loop + x mutable'accountIds v mutable'contractIds + mutable'externalAlgorithmsIds mutable'internalAlgorithmsIds + mutable'loginIds mutable'profileIds mutable'routeCodes + mutable'routeGroupIds + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'profileIds y) + loop + x mutable'accountIds mutable'brokerageIds mutable'contractIds + mutable'externalAlgorithmsIds mutable'internalAlgorithmsIds + mutable'loginIds v mutable'routeCodes mutable'routeGroupIds + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'accountIds y) + loop + x v mutable'brokerageIds mutable'contractIds + mutable'externalAlgorithmsIds mutable'internalAlgorithmsIds + mutable'loginIds mutable'profileIds mutable'routeCodes + mutable'routeGroupIds + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'loginIds y) + loop + x mutable'accountIds mutable'brokerageIds mutable'contractIds + mutable'externalAlgorithmsIds mutable'internalAlgorithmsIds v + mutable'profileIds mutable'routeCodes mutable'routeGroupIds + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "route_group_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'routeGroupIds y) + loop + x mutable'accountIds mutable'brokerageIds mutable'contractIds + mutable'externalAlgorithmsIds mutable'internalAlgorithmsIds + mutable'loginIds mutable'profileIds mutable'routeCodes v + 50 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "route_codes" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'routeCodes y) + loop + x mutable'accountIds mutable'brokerageIds mutable'contractIds + mutable'externalAlgorithmsIds mutable'internalAlgorithmsIds + mutable'loginIds mutable'profileIds v mutable'routeGroupIds + 58 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'contractIds y) + loop + x mutable'accountIds mutable'brokerageIds v + mutable'externalAlgorithmsIds mutable'internalAlgorithmsIds + mutable'loginIds mutable'profileIds mutable'routeCodes + mutable'routeGroupIds + 66 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "internal_algorithms_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'internalAlgorithmsIds y) + loop + x mutable'accountIds mutable'brokerageIds mutable'contractIds + mutable'externalAlgorithmsIds v mutable'loginIds + mutable'profileIds mutable'routeCodes mutable'routeGroupIds + 74 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "external_algorithms_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'externalAlgorithmsIds y) + loop + x mutable'accountIds mutable'brokerageIds mutable'contractIds v + mutable'internalAlgorithmsIds mutable'loginIds mutable'profileIds + mutable'routeCodes mutable'routeGroupIds + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'accountIds mutable'brokerageIds mutable'contractIds + mutable'externalAlgorithmsIds mutable'internalAlgorithmsIds + mutable'loginIds mutable'profileIds mutable'routeCodes + mutable'routeGroupIds + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'accountIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'brokerageIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'contractIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'externalAlgorithmsIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'internalAlgorithmsIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'loginIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'profileIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'routeCodes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'routeGroupIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'accountIds mutable'brokerageIds + mutable'contractIds mutable'externalAlgorithmsIds + mutable'internalAlgorithmsIds mutable'loginIds mutable'profileIds + mutable'routeCodes mutable'routeGroupIds) + "BatchOrdersOperationCriteria" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'brokerageIds") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'profileIds") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'accountIds") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'loginIds") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'routeGroupIds") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'routeCodes") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'contractIds") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'internalAlgorithmsIds") + _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'externalAlgorithmsIds") + _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))))) +instance Control.DeepSeq.NFData BatchOrdersOperationCriteria where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_BatchOrdersOperationCriteria'_unknownFields x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationCriteria'brokerageIds x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationCriteria'profileIds x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationCriteria'accountIds x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationCriteria'loginIds x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationCriteria'routeGroupIds x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationCriteria'routeCodes x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationCriteria'contractIds x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationCriteria'internalAlgorithmsIds x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationCriteria'externalAlgorithmsIds x__) + ()))))))))) +{- | Fields : + + * 'Proto.CMS.Order1_Fields.batchRequestGuid' @:: Lens' BatchOrdersOperationResult Data.Text.Text@ + * 'Proto.CMS.Order1_Fields.maybe'batchRequestGuid' @:: Lens' BatchOrdersOperationResult (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Order1_Fields.riskInstancesResults' @:: Lens' BatchOrdersOperationResult [BatchOrdersOperationActionResult]@ + * 'Proto.CMS.Order1_Fields.vec'riskInstancesResults' @:: Lens' BatchOrdersOperationResult (Data.Vector.Vector BatchOrdersOperationActionResult)@ -} +data BatchOrdersOperationResult + = BatchOrdersOperationResult'_constructor {_BatchOrdersOperationResult'batchRequestGuid :: !(Prelude.Maybe Data.Text.Text), + _BatchOrdersOperationResult'riskInstancesResults :: !(Data.Vector.Vector BatchOrdersOperationActionResult), + _BatchOrdersOperationResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show BatchOrdersOperationResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationResult "batchRequestGuid" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationResult'batchRequestGuid + (\ x__ y__ + -> x__ {_BatchOrdersOperationResult'batchRequestGuid = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationResult "maybe'batchRequestGuid" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationResult'batchRequestGuid + (\ x__ y__ + -> x__ {_BatchOrdersOperationResult'batchRequestGuid = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationResult "riskInstancesResults" [BatchOrdersOperationActionResult] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationResult'riskInstancesResults + (\ x__ y__ + -> x__ {_BatchOrdersOperationResult'riskInstancesResults = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationResult "vec'riskInstancesResults" (Data.Vector.Vector BatchOrdersOperationActionResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationResult'riskInstancesResults + (\ x__ y__ + -> x__ {_BatchOrdersOperationResult'riskInstancesResults = y__})) + Prelude.id +instance Data.ProtoLens.Message BatchOrdersOperationResult where + messageName _ = Data.Text.pack "order_1.BatchOrdersOperationResult" + packedMessageDescriptor _ + = "\n\ + \\SUBBatchOrdersOperationResult\DC2,\n\ + \\DC2batch_request_guid\CAN\SOH \SOH(\tR\DLEbatchRequestGuid\DC2_\n\ + \\SYNrisk_instances_results\CAN\STX \ETX(\v2).order_1.BatchOrdersOperationActionResultR\DC4riskInstancesResults" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + batchRequestGuid__field_descriptor + = Data.ProtoLens.FieldDescriptor + "batch_request_guid" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'batchRequestGuid")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationResult + riskInstancesResults__field_descriptor + = Data.ProtoLens.FieldDescriptor + "risk_instances_results" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor BatchOrdersOperationActionResult) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"riskInstancesResults")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, batchRequestGuid__field_descriptor), + (Data.ProtoLens.Tag 2, riskInstancesResults__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _BatchOrdersOperationResult'_unknownFields + (\ x__ y__ + -> x__ {_BatchOrdersOperationResult'_unknownFields = y__}) + defMessage + = BatchOrdersOperationResult'_constructor + {_BatchOrdersOperationResult'batchRequestGuid = Prelude.Nothing, + _BatchOrdersOperationResult'riskInstancesResults = Data.Vector.Generic.empty, + _BatchOrdersOperationResult'_unknownFields = []} + parseMessage + = let + loop :: + BatchOrdersOperationResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld BatchOrdersOperationActionResult + -> Data.ProtoLens.Encoding.Bytes.Parser BatchOrdersOperationResult + loop x mutable'riskInstancesResults + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'riskInstancesResults <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'riskInstancesResults) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'riskInstancesResults") + frozen'riskInstancesResults x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "batch_request_guid" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"batchRequestGuid") y x) + mutable'riskInstancesResults + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "risk_instances_results" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'riskInstancesResults y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'riskInstancesResults + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'riskInstancesResults <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'riskInstancesResults) + "BatchOrdersOperationResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'batchRequestGuid") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'riskInstancesResults") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData BatchOrdersOperationResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_BatchOrdersOperationResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationResult'batchRequestGuid x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationResult'riskInstancesResults x__) ())) +{- | Fields : + + * 'Proto.CMS.Order1_Fields.currentDayOnly' @:: Lens' BatchOrdersOperationSecondaryCriteria Prelude.Bool@ + * 'Proto.CMS.Order1_Fields.maybe'currentDayOnly' @:: Lens' BatchOrdersOperationSecondaryCriteria (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Order1_Fields.inactiveExchangeReportedOrdersOnly' @:: Lens' BatchOrdersOperationSecondaryCriteria Prelude.Bool@ + * 'Proto.CMS.Order1_Fields.maybe'inactiveExchangeReportedOrdersOnly' @:: Lens' BatchOrdersOperationSecondaryCriteria (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Order1_Fields.parkedOnly' @:: Lens' BatchOrdersOperationSecondaryCriteria Prelude.Bool@ + * 'Proto.CMS.Order1_Fields.maybe'parkedOnly' @:: Lens' BatchOrdersOperationSecondaryCriteria (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Order1_Fields.side' @:: Lens' BatchOrdersOperationSecondaryCriteria Data.Word.Word32@ + * 'Proto.CMS.Order1_Fields.maybe'side' @:: Lens' BatchOrdersOperationSecondaryCriteria (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Order1_Fields.orderOperationType' @:: Lens' BatchOrdersOperationSecondaryCriteria Data.Word.Word32@ + * 'Proto.CMS.Order1_Fields.maybe'orderOperationType' @:: Lens' BatchOrdersOperationSecondaryCriteria (Prelude.Maybe Data.Word.Word32)@ -} +data BatchOrdersOperationSecondaryCriteria + = BatchOrdersOperationSecondaryCriteria'_constructor {_BatchOrdersOperationSecondaryCriteria'currentDayOnly :: !(Prelude.Maybe Prelude.Bool), + _BatchOrdersOperationSecondaryCriteria'inactiveExchangeReportedOrdersOnly :: !(Prelude.Maybe Prelude.Bool), + _BatchOrdersOperationSecondaryCriteria'parkedOnly :: !(Prelude.Maybe Prelude.Bool), + _BatchOrdersOperationSecondaryCriteria'side :: !(Prelude.Maybe Data.Word.Word32), + _BatchOrdersOperationSecondaryCriteria'orderOperationType :: !(Prelude.Maybe Data.Word.Word32), + _BatchOrdersOperationSecondaryCriteria'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show BatchOrdersOperationSecondaryCriteria where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationSecondaryCriteria "currentDayOnly" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationSecondaryCriteria'currentDayOnly + (\ x__ y__ + -> x__ + {_BatchOrdersOperationSecondaryCriteria'currentDayOnly = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationSecondaryCriteria "maybe'currentDayOnly" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationSecondaryCriteria'currentDayOnly + (\ x__ y__ + -> x__ + {_BatchOrdersOperationSecondaryCriteria'currentDayOnly = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationSecondaryCriteria "inactiveExchangeReportedOrdersOnly" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationSecondaryCriteria'inactiveExchangeReportedOrdersOnly + (\ x__ y__ + -> x__ + {_BatchOrdersOperationSecondaryCriteria'inactiveExchangeReportedOrdersOnly = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationSecondaryCriteria "maybe'inactiveExchangeReportedOrdersOnly" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationSecondaryCriteria'inactiveExchangeReportedOrdersOnly + (\ x__ y__ + -> x__ + {_BatchOrdersOperationSecondaryCriteria'inactiveExchangeReportedOrdersOnly = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationSecondaryCriteria "parkedOnly" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationSecondaryCriteria'parkedOnly + (\ x__ y__ + -> x__ {_BatchOrdersOperationSecondaryCriteria'parkedOnly = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationSecondaryCriteria "maybe'parkedOnly" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationSecondaryCriteria'parkedOnly + (\ x__ y__ + -> x__ {_BatchOrdersOperationSecondaryCriteria'parkedOnly = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationSecondaryCriteria "side" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationSecondaryCriteria'side + (\ x__ y__ + -> x__ {_BatchOrdersOperationSecondaryCriteria'side = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationSecondaryCriteria "maybe'side" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationSecondaryCriteria'side + (\ x__ y__ + -> x__ {_BatchOrdersOperationSecondaryCriteria'side = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BatchOrdersOperationSecondaryCriteria "orderOperationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationSecondaryCriteria'orderOperationType + (\ x__ y__ + -> x__ + {_BatchOrdersOperationSecondaryCriteria'orderOperationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BatchOrdersOperationSecondaryCriteria "maybe'orderOperationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BatchOrdersOperationSecondaryCriteria'orderOperationType + (\ x__ y__ + -> x__ + {_BatchOrdersOperationSecondaryCriteria'orderOperationType = y__})) + Prelude.id +instance Data.ProtoLens.Message BatchOrdersOperationSecondaryCriteria where + messageName _ + = Data.Text.pack "order_1.BatchOrdersOperationSecondaryCriteria" + packedMessageDescriptor _ + = "\n\ + \%BatchOrdersOperationSecondaryCriteria\DC2/\n\ + \\DLEcurrent_day_only\CAN\SOH \SOH(\b:\ENQfalseR\SOcurrentDayOnly\DC2Y\n\ + \&inactive_exchange_reported_orders_only\CAN\STX \SOH(\b:\ENQfalseR\"inactiveExchangeReportedOrdersOnly\DC2&\n\ + \\vparked_only\CAN\ETX \SOH(\b:\ENQfalseR\n\ + \parkedOnly\DC2\DC2\n\ + \\EOTside\CAN\EOT \SOH(\rR\EOTside\DC20\n\ + \\DC4order_operation_type\CAN\ENQ \SOH(\rR\DC2orderOperationType\"9\n\ + \\DC2OrderOperationType\DC2\n\ + \\n\ + \\ACKCANCEL\DLE\SOH\DC2\ETB\n\ + \\DC3REFLECT_AS_CANCELED\DLE\STX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + currentDayOnly__field_descriptor + = Data.ProtoLens.FieldDescriptor + "current_day_only" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'currentDayOnly")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationSecondaryCriteria + inactiveExchangeReportedOrdersOnly__field_descriptor + = Data.ProtoLens.FieldDescriptor + "inactive_exchange_reported_orders_only" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'inactiveExchangeReportedOrdersOnly")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationSecondaryCriteria + parkedOnly__field_descriptor + = Data.ProtoLens.FieldDescriptor + "parked_only" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'parkedOnly")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationSecondaryCriteria + side__field_descriptor + = Data.ProtoLens.FieldDescriptor + "side" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'side")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationSecondaryCriteria + orderOperationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_operation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderOperationType")) :: + Data.ProtoLens.FieldDescriptor BatchOrdersOperationSecondaryCriteria + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, currentDayOnly__field_descriptor), + (Data.ProtoLens.Tag 2, + inactiveExchangeReportedOrdersOnly__field_descriptor), + (Data.ProtoLens.Tag 3, parkedOnly__field_descriptor), + (Data.ProtoLens.Tag 4, side__field_descriptor), + (Data.ProtoLens.Tag 5, orderOperationType__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _BatchOrdersOperationSecondaryCriteria'_unknownFields + (\ x__ y__ + -> x__ + {_BatchOrdersOperationSecondaryCriteria'_unknownFields = y__}) + defMessage + = BatchOrdersOperationSecondaryCriteria'_constructor + {_BatchOrdersOperationSecondaryCriteria'currentDayOnly = Prelude.Nothing, + _BatchOrdersOperationSecondaryCriteria'inactiveExchangeReportedOrdersOnly = Prelude.Nothing, + _BatchOrdersOperationSecondaryCriteria'parkedOnly = Prelude.Nothing, + _BatchOrdersOperationSecondaryCriteria'side = Prelude.Nothing, + _BatchOrdersOperationSecondaryCriteria'orderOperationType = Prelude.Nothing, + _BatchOrdersOperationSecondaryCriteria'_unknownFields = []} + parseMessage + = let + loop :: + BatchOrdersOperationSecondaryCriteria + -> Data.ProtoLens.Encoding.Bytes.Parser BatchOrdersOperationSecondaryCriteria + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "current_day_only" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"currentDayOnly") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "inactive_exchange_reported_orders_only" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"inactiveExchangeReportedOrdersOnly") + y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "parked_only" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"parkedOnly") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "side" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"side") y x) + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "order_operation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderOperationType") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "BatchOrdersOperationSecondaryCriteria" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'currentDayOnly") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'inactiveExchangeReportedOrdersOnly") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'parkedOnly") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'side") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderOperationType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData BatchOrdersOperationSecondaryCriteria where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_BatchOrdersOperationSecondaryCriteria'_unknownFields x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationSecondaryCriteria'currentDayOnly x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationSecondaryCriteria'inactiveExchangeReportedOrdersOnly + x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationSecondaryCriteria'parkedOnly x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationSecondaryCriteria'side x__) + (Control.DeepSeq.deepseq + (_BatchOrdersOperationSecondaryCriteria'orderOperationType x__) + ()))))) +data BatchOrdersOperationSecondaryCriteria'OrderOperationType + = BatchOrdersOperationSecondaryCriteria'CANCEL | + BatchOrdersOperationSecondaryCriteria'REFLECT_AS_CANCELED + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum BatchOrdersOperationSecondaryCriteria'OrderOperationType where + maybeToEnum 1 + = Prelude.Just BatchOrdersOperationSecondaryCriteria'CANCEL + maybeToEnum 2 + = Prelude.Just + BatchOrdersOperationSecondaryCriteria'REFLECT_AS_CANCELED + maybeToEnum _ = Prelude.Nothing + showEnum BatchOrdersOperationSecondaryCriteria'CANCEL = "CANCEL" + showEnum BatchOrdersOperationSecondaryCriteria'REFLECT_AS_CANCELED + = "REFLECT_AS_CANCELED" + readEnum k + | (Prelude.==) k "CANCEL" + = Prelude.Just BatchOrdersOperationSecondaryCriteria'CANCEL + | (Prelude.==) k "REFLECT_AS_CANCELED" + = Prelude.Just + BatchOrdersOperationSecondaryCriteria'REFLECT_AS_CANCELED + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded BatchOrdersOperationSecondaryCriteria'OrderOperationType where + minBound = BatchOrdersOperationSecondaryCriteria'CANCEL + maxBound + = BatchOrdersOperationSecondaryCriteria'REFLECT_AS_CANCELED +instance Prelude.Enum BatchOrdersOperationSecondaryCriteria'OrderOperationType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum OrderOperationType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum BatchOrdersOperationSecondaryCriteria'CANCEL = 1 + fromEnum BatchOrdersOperationSecondaryCriteria'REFLECT_AS_CANCELED + = 2 + succ BatchOrdersOperationSecondaryCriteria'REFLECT_AS_CANCELED + = Prelude.error + "BatchOrdersOperationSecondaryCriteria'OrderOperationType.succ: bad argument BatchOrdersOperationSecondaryCriteria'REFLECT_AS_CANCELED. This value would be out of bounds." + succ BatchOrdersOperationSecondaryCriteria'CANCEL + = BatchOrdersOperationSecondaryCriteria'REFLECT_AS_CANCELED + pred BatchOrdersOperationSecondaryCriteria'CANCEL + = Prelude.error + "BatchOrdersOperationSecondaryCriteria'OrderOperationType.pred: bad argument BatchOrdersOperationSecondaryCriteria'CANCEL. This value would be out of bounds." + pred BatchOrdersOperationSecondaryCriteria'REFLECT_AS_CANCELED + = BatchOrdersOperationSecondaryCriteria'CANCEL + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault BatchOrdersOperationSecondaryCriteria'OrderOperationType where + fieldDefault = BatchOrdersOperationSecondaryCriteria'CANCEL +instance Control.DeepSeq.NFData BatchOrdersOperationSecondaryCriteria'OrderOperationType where + rnf x__ = Prelude.seq x__ () +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\DC1CMS/order_1.proto\DC2\aorder_1\"\143\STX\n\ + \\DC4BatchOrdersOperation\DC2l\n\ + \\USbatch_orders_operation_criteria\CAN\SOH \SOH(\v2%.order_1.BatchOrdersOperationCriteriaR\FSbatchOrdersOperationCriteria\DC2\136\SOH\n\ + \)batch_orders_operation_secondary_criteria\CAN\STX \SOH(\v2..order_1.BatchOrdersOperationSecondaryCriteriaR%batchOrdersOperationSecondaryCriteria\"\254\STX\n\ + \\FSBatchOrdersOperationCriteria\DC2#\n\ + \\rbrokerage_ids\CAN\SOH \ETX(\tR\fbrokerageIds\DC2\US\n\ + \\vprofile_ids\CAN\STX \ETX(\tR\n\ + \profileIds\DC2\US\n\ + \\vaccount_ids\CAN\ETX \ETX(\tR\n\ + \accountIds\DC2\ESC\n\ + \\tlogin_ids\CAN\EOT \ETX(\tR\bloginIds\DC2&\n\ + \\SIroute_group_ids\CAN\ENQ \ETX(\tR\rrouteGroupIds\DC2\US\n\ + \\vroute_codes\CAN\ACK \ETX(\tR\n\ + \routeCodes\DC2!\n\ + \\fcontract_ids\CAN\a \ETX(\tR\vcontractIds\DC26\n\ + \\ETBinternal_algorithms_ids\CAN\b \ETX(\tR\NAKinternalAlgorithmsIds\DC26\n\ + \\ETBexternal_algorithms_ids\CAN\t \ETX(\tR\NAKexternalAlgorithmsIds\"\220\STX\n\ + \%BatchOrdersOperationSecondaryCriteria\DC2/\n\ + \\DLEcurrent_day_only\CAN\SOH \SOH(\b:\ENQfalseR\SOcurrentDayOnly\DC2Y\n\ + \&inactive_exchange_reported_orders_only\CAN\STX \SOH(\b:\ENQfalseR\"inactiveExchangeReportedOrdersOnly\DC2&\n\ + \\vparked_only\CAN\ETX \SOH(\b:\ENQfalseR\n\ + \parkedOnly\DC2\DC2\n\ + \\EOTside\CAN\EOT \SOH(\rR\EOTside\DC20\n\ + \\DC4order_operation_type\CAN\ENQ \SOH(\rR\DC2orderOperationType\"9\n\ + \\DC2OrderOperationType\DC2\n\ + \\n\ + \\ACKCANCEL\DLE\SOH\DC2\ETB\n\ + \\DC3REFLECT_AS_CANCELED\DLE\STX\"\171\SOH\n\ + \\SUBBatchOrdersOperationResult\DC2,\n\ + \\DC2batch_request_guid\CAN\SOH \SOH(\tR\DLEbatchRequestGuid\DC2_\n\ + \\SYNrisk_instances_results\CAN\STX \ETX(\v2).order_1.BatchOrdersOperationActionResultR\DC4riskInstancesResults\"\190\SOH\n\ + \ BatchOrdersOperationActionResult\DC25\n\ + \\ETBrisk_server_instance_id\CAN\SOH \SOH(\tR\DC4riskServerInstanceId\DC24\n\ + \\SYNprocessed_orders_count\CAN\STX \SOH(\rR\DC4processedOrdersCount\DC2-\n\ + \\DC2result_description\CAN\ETX \SOH(\tR\DC1resultDescriptionJ\228!\n\ + \\ACK\DC2\EOT\STX\NULj\SOH\n\ + \J\n\ + \\SOH\f\DC2\ETX\STX\NUL\DC22@ CQG Customer Management System API Orders management protocol.\n\ + \\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\EOT\NUL\DLE\n\ + \2\n\ + \\STX\EOT\NUL\DC2\EOT\a\NUL\SO\SOH\SUB& CMS message for BatchOrdersOperation\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\a\b\FS\n\ + \D\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX\n\ + \\EOTN\SUB7 [required] Main criteria to search orders for cancel.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX\n\ + \\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX\n\ + \\r)\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\n\ + \*I\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\n\ + \LM\n\ + \I\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX\r\EOTa\SUB< [required] Secondary criteria to search orders for cancel.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX\r\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX\r\r2\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\r3\\\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\r_`\n\ + \\183\SOH\n\ + \\STX\EOT\SOH\DC2\EOT\DC3\NUL3\SOH\SUB\170\SOH CMS message for BatchOrdersOperationCriteria.\n\ + \ Set of criteria to search orders for cancel.\n\ + \ Either brokerage_ids or profile_ids with sales series profiles is required.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX\DC3\b$\n\ + \q\n\ + \\EOT\EOT\SOH\STX\NUL\DC2\ETX\ETB\EOT&\SUBd ID of Brokerage to limit scope by accounts of this Brokerage.\n\ + \ [required] for cqg/brokerage scope.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\EOT\DC2\ETX\ETB\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETX\ETB\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX\ETB\DC4!\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX\ETB$%\n\ + \\172\SOH\n\ + \\EOT\EOT\SOH\STX\SOH\DC2\ETX\FS\EOT$\SUB\158\SOH ID of different profile types to limit scope by these profiles.\n\ + \ Supported profile types: admin, customer, sales series.\n\ + \ [required] for sales series scope.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETX\FS\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETX\FS\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX\FS\DC4\US\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX\FS\"#\n\ + \<\n\ + \\EOT\EOT\SOH\STX\STX\DC2\ETX\US\EOT$\SUB/ ID of Account to limit scope by this Account.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\EOT\DC2\ETX\US\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ENQ\DC2\ETX\US\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETX\US\DC4\US\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETX\US\"#\n\ + \{\n\ + \\EOT\EOT\SOH\STX\ETX\DC2\ETX#\EOT\"\SUBn Login identifier to limit scope by orders, initiated by this login.\n\ + \ Supported login domains: trade-routing.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\EOT\DC2\ETX#\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ENQ\DC2\ETX#\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETX#\DC4\GS\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETX# !\n\ + \L\n\ + \\EOT\EOT\SOH\STX\EOT\DC2\ETX&\EOT(\SUB? ID of RouteGroup to limit scope of orders by this RouteGroup.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\EOT\DC2\ETX&\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ENQ\DC2\ETX&\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\SOH\DC2\ETX&\DC4#\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ETX\DC2\ETX&&'\n\ + \@\n\ + \\EOT\EOT\SOH\STX\ENQ\DC2\ETX)\EOT$\SUB3 ID of gateway route to limit scope by this Route.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\EOT\DC2\ETX)\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\ENQ\DC2\ETX)\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\SOH\DC2\ETX)\DC4\US\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\ETX\DC2\ETX)\"#\n\ + \H\n\ + \\EOT\EOT\SOH\STX\ACK\DC2\ETX,\EOT%\SUB; ID of Contract to limit scope of orders by this Contract.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\EOT\DC2\ETX,\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\ENQ\DC2\ETX,\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\SOH\DC2\ETX,\DC4 \n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\ETX\DC2\ETX,#$\n\ + \V\n\ + \\EOT\EOT\SOH\STX\a\DC2\ETX/\EOT0\SUBI ID of MiFID CQG Algorithm to cancel orders initiated by this Algorithm.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\EOT\DC2\ETX/\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\ENQ\DC2\ETX/\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\SOH\DC2\ETX/\DC4+\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\ETX\DC2\ETX/./\n\ + \[\n\ + \\EOT\EOT\SOH\STX\b\DC2\ETX2\EOT0\SUBN ID of MiFID External Algorithm to cancel orders initiated by this Algorithm.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\EOT\DC2\ETX2\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\ENQ\DC2\ETX2\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\SOH\DC2\ETX2\DC4+\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\ETX\DC2\ETX2./\n\ + \@\n\ + \\STX\EOT\STX\DC2\EOT6\NULS\SOH\SUB4 Set of order criteria to search orders for cancel.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\STX\SOH\DC2\ETX6\b-\n\ + \*\n\ + \\EOT\EOT\STX\EOT\NUL\DC2\EOT9\EOT@\ENQ\SUB\FS Order operation type enum.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\EOT\NUL\SOH\DC2\ETX9\t\ESC\n\ + \%\n\ + \\ACK\EOT\STX\EOT\NUL\STX\NUL\DC2\ETX<\b\DC3\SUB\SYN Send cancel request.\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\NUL\SOH\DC2\ETX<\b\SO\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\NUL\STX\DC2\ETX<\DC1\DC2\n\ + \[\n\ + \\ACK\EOT\STX\EOT\NUL\STX\SOH\DC2\ETX?\b \SUBL Reflect order as canceled without sending real cancel request to exchange.\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\SOH\SOH\DC2\ETX?\b\ESC\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\SOH\STX\DC2\ETX?\RS\US\n\ + \p\n\ + \\EOT\EOT\STX\STX\NUL\DC2\ETXC\EOT9\SUBc Specifies whether only order(s) expiring during the current/nearest session should be considered.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\EOT\DC2\ETXC\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETXC\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETXC\DC2\"\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETXC%&\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\b\DC2\ETXC'8\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\NUL\a\DC2\ETXC27\n\ + \\165\SOH\n\ + \\EOT\EOT\STX\STX\SOH\DC2\ETXF\EOTO\SUB\151\SOH Specifies whether only externally reported orders that were created via dedicated reporting session (not a regular CQG session) should be considered.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\EOT\DC2\ETXF\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ENQ\DC2\ETXF\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETXF\DC28\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETXF;<\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\b\DC2\ETXF=N\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\SOH\a\DC2\ETXFHM\n\ + \\133\SOH\n\ + \\EOT\EOT\STX\STX\STX\DC2\ETXI\EOT4\SUBx Specifies state of orders to be cancelled. True - cancel only parked orders, False - cancel working and parked orders.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\EOT\DC2\ETXI\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ENQ\DC2\ETXI\r\DC1\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\SOH\DC2\ETXI\DC2\GS\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\ETX\DC2\ETXI !\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\b\DC2\ETXI\"3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\STX\a\DC2\ETXI-2\n\ + \\175\SOH\n\ + \\EOT\EOT\STX\STX\ETX\DC2\ETXN\EOT\GS\SUB\161\SOH Specifies side of orders to cancel.\n\ + \ This field is associated with OrderChain.Side enum type.\n\ + \ If this field wasn't provided it's interpreted as 'Both' option.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\EOT\DC2\ETXN\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ENQ\DC2\ETXN\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\SOH\DC2\ETXN\DC4\CAN\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\ETX\ETX\DC2\ETXN\ESC\FS\n\ + \\130\SOH\n\ + \\EOT\EOT\STX\STX\EOT\DC2\ETXR\EOT-\SUBu [required] Order operation type that needs to be performed.\n\ + \ This field is associated with OrderOperationType enum.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\EOT\DC2\ETXR\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\ENQ\DC2\ETXR\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\SOH\DC2\ETXR\DC4(\n\ + \\f\n\ + \\ENQ\EOT\STX\STX\EOT\ETX\DC2\ETXR+,\n\ + \\n\ + \\n\ + \\STX\EOT\ETX\DC2\EOTU\NUL\\\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\ETX\SOH\DC2\ETXU\b\"\n\ + \[\n\ + \\EOT\EOT\ETX\STX\NUL\DC2\ETXX\EOT+\SUBN Operation unique identifier, by which all cancel requests can be found then.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\EOT\DC2\ETXX\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\ETXX\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETXX\DC4&\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETXX)*\n\ + \\\\n\ + \\EOT\EOT\ETX\STX\SOH\DC2\ETX[\EOTI\SUBO In case of successful operation contains result of each risk server instance.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\EOT\DC2\ETX[\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\ACK\DC2\ETX[\r-\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\ETX[.D\n\ + \\f\n\ + \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\ETX[GH\n\ + \[\n\ + \\STX\EOT\EOT\DC2\EOT_\NULj\SOH\SUBO The result of the batch orders operation for a specific risk server instance.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\EOT\SOH\DC2\ETX_\b(\n\ + \\162\SOH\n\ + \\EOT\EOT\EOT\STX\NUL\DC2\ETXc\EOT0\SUB\148\SOH Risk server instance identifier.\n\ + \ LookupPropertyListRequest { property_type = traderouting_1.TradeRoutingLookupPropertyType.RISK_SERVER_INSTANCE }\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\EOT\DC2\ETXc\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\ETXc\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\ETXc\DC4+\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\ETXc./\n\ + \M\n\ + \\EOT\EOT\EOT\STX\SOH\DC2\ETXf\EOT/\SUB@ Determines count of processed orders on current risk instance.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\EOT\DC2\ETXf\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\ENQ\DC2\ETXf\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\ETXf\DC4*\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\ETXf-.\n\ + \@\n\ + \\EOT\EOT\EOT\STX\STX\DC2\ETXi\EOT+\SUB3 In case of failure action contains error message.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\EOT\DC2\ETXi\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\ENQ\DC2\ETXi\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\SOH\DC2\ETXi\DC4&\n\ + \\f\n\ + \\ENQ\EOT\EOT\STX\STX\ETX\DC2\ETXi)*" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Order1_Fields.hs b/cqg-cms-api-proto/src/Proto/CMS/Order1_Fields.hs new file mode 100644 index 0000000..556584e --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Order1_Fields.hs @@ -0,0 +1,304 @@ +{- This file was auto-generated from CMS/order_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Order1_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +accountIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountIds" a) => + Lens.Family2.LensLike' f s a +accountIds = Data.ProtoLens.Field.field @"accountIds" +batchOrdersOperationCriteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "batchOrdersOperationCriteria" a) => + Lens.Family2.LensLike' f s a +batchOrdersOperationCriteria + = Data.ProtoLens.Field.field @"batchOrdersOperationCriteria" +batchOrdersOperationSecondaryCriteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "batchOrdersOperationSecondaryCriteria" a) => + Lens.Family2.LensLike' f s a +batchOrdersOperationSecondaryCriteria + = Data.ProtoLens.Field.field + @"batchOrdersOperationSecondaryCriteria" +batchRequestGuid :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "batchRequestGuid" a) => + Lens.Family2.LensLike' f s a +batchRequestGuid = Data.ProtoLens.Field.field @"batchRequestGuid" +brokerageIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageIds" a) => + Lens.Family2.LensLike' f s a +brokerageIds = Data.ProtoLens.Field.field @"brokerageIds" +contractIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractIds" a) => + Lens.Family2.LensLike' f s a +contractIds = Data.ProtoLens.Field.field @"contractIds" +currentDayOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "currentDayOnly" a) => + Lens.Family2.LensLike' f s a +currentDayOnly = Data.ProtoLens.Field.field @"currentDayOnly" +externalAlgorithmsIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "externalAlgorithmsIds" a) => + Lens.Family2.LensLike' f s a +externalAlgorithmsIds + = Data.ProtoLens.Field.field @"externalAlgorithmsIds" +inactiveExchangeReportedOrdersOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "inactiveExchangeReportedOrdersOnly" a) => + Lens.Family2.LensLike' f s a +inactiveExchangeReportedOrdersOnly + = Data.ProtoLens.Field.field @"inactiveExchangeReportedOrdersOnly" +internalAlgorithmsIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "internalAlgorithmsIds" a) => + Lens.Family2.LensLike' f s a +internalAlgorithmsIds + = Data.ProtoLens.Field.field @"internalAlgorithmsIds" +loginIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginIds" a) => + Lens.Family2.LensLike' f s a +loginIds = Data.ProtoLens.Field.field @"loginIds" +maybe'batchOrdersOperationCriteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'batchOrdersOperationCriteria" a) => + Lens.Family2.LensLike' f s a +maybe'batchOrdersOperationCriteria + = Data.ProtoLens.Field.field @"maybe'batchOrdersOperationCriteria" +maybe'batchOrdersOperationSecondaryCriteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'batchOrdersOperationSecondaryCriteria" a) => + Lens.Family2.LensLike' f s a +maybe'batchOrdersOperationSecondaryCriteria + = Data.ProtoLens.Field.field + @"maybe'batchOrdersOperationSecondaryCriteria" +maybe'batchRequestGuid :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'batchRequestGuid" a) => + Lens.Family2.LensLike' f s a +maybe'batchRequestGuid + = Data.ProtoLens.Field.field @"maybe'batchRequestGuid" +maybe'currentDayOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'currentDayOnly" a) => + Lens.Family2.LensLike' f s a +maybe'currentDayOnly + = Data.ProtoLens.Field.field @"maybe'currentDayOnly" +maybe'inactiveExchangeReportedOrdersOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'inactiveExchangeReportedOrdersOnly" a) => + Lens.Family2.LensLike' f s a +maybe'inactiveExchangeReportedOrdersOnly + = Data.ProtoLens.Field.field + @"maybe'inactiveExchangeReportedOrdersOnly" +maybe'orderOperationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderOperationType" a) => + Lens.Family2.LensLike' f s a +maybe'orderOperationType + = Data.ProtoLens.Field.field @"maybe'orderOperationType" +maybe'parkedOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'parkedOnly" a) => + Lens.Family2.LensLike' f s a +maybe'parkedOnly = Data.ProtoLens.Field.field @"maybe'parkedOnly" +maybe'processedOrdersCount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'processedOrdersCount" a) => + Lens.Family2.LensLike' f s a +maybe'processedOrdersCount + = Data.ProtoLens.Field.field @"maybe'processedOrdersCount" +maybe'resultDescription :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'resultDescription" a) => + Lens.Family2.LensLike' f s a +maybe'resultDescription + = Data.ProtoLens.Field.field @"maybe'resultDescription" +maybe'riskServerInstanceId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'riskServerInstanceId" a) => + Lens.Family2.LensLike' f s a +maybe'riskServerInstanceId + = Data.ProtoLens.Field.field @"maybe'riskServerInstanceId" +maybe'side :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'side" a) => + Lens.Family2.LensLike' f s a +maybe'side = Data.ProtoLens.Field.field @"maybe'side" +orderOperationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderOperationType" a) => + Lens.Family2.LensLike' f s a +orderOperationType + = Data.ProtoLens.Field.field @"orderOperationType" +parkedOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "parkedOnly" a) => + Lens.Family2.LensLike' f s a +parkedOnly = Data.ProtoLens.Field.field @"parkedOnly" +processedOrdersCount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "processedOrdersCount" a) => + Lens.Family2.LensLike' f s a +processedOrdersCount + = Data.ProtoLens.Field.field @"processedOrdersCount" +profileIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileIds" a) => + Lens.Family2.LensLike' f s a +profileIds = Data.ProtoLens.Field.field @"profileIds" +resultDescription :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "resultDescription" a) => + Lens.Family2.LensLike' f s a +resultDescription = Data.ProtoLens.Field.field @"resultDescription" +riskInstancesResults :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "riskInstancesResults" a) => + Lens.Family2.LensLike' f s a +riskInstancesResults + = Data.ProtoLens.Field.field @"riskInstancesResults" +riskServerInstanceId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "riskServerInstanceId" a) => + Lens.Family2.LensLike' f s a +riskServerInstanceId + = Data.ProtoLens.Field.field @"riskServerInstanceId" +routeCodes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "routeCodes" a) => + Lens.Family2.LensLike' f s a +routeCodes = Data.ProtoLens.Field.field @"routeCodes" +routeGroupIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "routeGroupIds" a) => + Lens.Family2.LensLike' f s a +routeGroupIds = Data.ProtoLens.Field.field @"routeGroupIds" +side :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "side" a) => + Lens.Family2.LensLike' f s a +side = Data.ProtoLens.Field.field @"side" +vec'accountIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'accountIds" a) => + Lens.Family2.LensLike' f s a +vec'accountIds = Data.ProtoLens.Field.field @"vec'accountIds" +vec'brokerageIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'brokerageIds" a) => + Lens.Family2.LensLike' f s a +vec'brokerageIds = Data.ProtoLens.Field.field @"vec'brokerageIds" +vec'contractIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'contractIds" a) => + Lens.Family2.LensLike' f s a +vec'contractIds = Data.ProtoLens.Field.field @"vec'contractIds" +vec'externalAlgorithmsIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'externalAlgorithmsIds" a) => + Lens.Family2.LensLike' f s a +vec'externalAlgorithmsIds + = Data.ProtoLens.Field.field @"vec'externalAlgorithmsIds" +vec'internalAlgorithmsIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'internalAlgorithmsIds" a) => + Lens.Family2.LensLike' f s a +vec'internalAlgorithmsIds + = Data.ProtoLens.Field.field @"vec'internalAlgorithmsIds" +vec'loginIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'loginIds" a) => + Lens.Family2.LensLike' f s a +vec'loginIds = Data.ProtoLens.Field.field @"vec'loginIds" +vec'profileIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'profileIds" a) => + Lens.Family2.LensLike' f s a +vec'profileIds = Data.ProtoLens.Field.field @"vec'profileIds" +vec'riskInstancesResults :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'riskInstancesResults" a) => + Lens.Family2.LensLike' f s a +vec'riskInstancesResults + = Data.ProtoLens.Field.field @"vec'riskInstancesResults" +vec'routeCodes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'routeCodes" a) => + Lens.Family2.LensLike' f s a +vec'routeCodes = Data.ProtoLens.Field.field @"vec'routeCodes" +vec'routeGroupIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'routeGroupIds" a) => + Lens.Family2.LensLike' f s a +vec'routeGroupIds = Data.ProtoLens.Field.field @"vec'routeGroupIds" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/SessionContext1.hs b/cqg-cms-api-proto/src/Proto/CMS/SessionContext1.hs new file mode 100644 index 0000000..16b99d0 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/SessionContext1.hs @@ -0,0 +1,657 @@ +{- This file was auto-generated from CMS/session_context_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.SessionContext1 ( + SessionContextScopeRequest(), SessionContextScopeResult() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.ApiLimit1 +import qualified Proto.Common.Shared1 +{- | Fields : + + * 'Proto.CMS.SessionContext1_Fields.id' @:: Lens' SessionContextScopeRequest Data.Word.Word32@ + * 'Proto.CMS.SessionContext1_Fields.maybe'id' @:: Lens' SessionContextScopeRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.SessionContext1_Fields.apiLimitRequest' @:: Lens' SessionContextScopeRequest Proto.CMS.ApiLimit1.ApiLimitRequest@ + * 'Proto.CMS.SessionContext1_Fields.maybe'apiLimitRequest' @:: Lens' SessionContextScopeRequest (Prelude.Maybe Proto.CMS.ApiLimit1.ApiLimitRequest)@ -} +data SessionContextScopeRequest + = SessionContextScopeRequest'_constructor {_SessionContextScopeRequest'id :: !(Prelude.Maybe Data.Word.Word32), + _SessionContextScopeRequest'apiLimitRequest :: !(Prelude.Maybe Proto.CMS.ApiLimit1.ApiLimitRequest), + _SessionContextScopeRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SessionContextScopeRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SessionContextScopeRequest "id" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeRequest'id + (\ x__ y__ -> x__ {_SessionContextScopeRequest'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SessionContextScopeRequest "maybe'id" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeRequest'id + (\ x__ y__ -> x__ {_SessionContextScopeRequest'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SessionContextScopeRequest "apiLimitRequest" Proto.CMS.ApiLimit1.ApiLimitRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeRequest'apiLimitRequest + (\ x__ y__ + -> x__ {_SessionContextScopeRequest'apiLimitRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField SessionContextScopeRequest "maybe'apiLimitRequest" (Prelude.Maybe Proto.CMS.ApiLimit1.ApiLimitRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeRequest'apiLimitRequest + (\ x__ y__ + -> x__ {_SessionContextScopeRequest'apiLimitRequest = y__})) + Prelude.id +instance Data.ProtoLens.Message SessionContextScopeRequest where + messageName _ + = Data.Text.pack "session_context_1.SessionContextScopeRequest" + packedMessageDescriptor _ + = "\n\ + \\SUBSessionContextScopeRequest\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\rR\STXid\DC2H\n\ + \\DC1api_limit_request\CAN\STX \SOH(\v2\FS.api_limit_1.ApiLimitRequestR\SIapiLimitRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor SessionContextScopeRequest + apiLimitRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "api_limit_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.ApiLimit1.ApiLimitRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'apiLimitRequest")) :: + Data.ProtoLens.FieldDescriptor SessionContextScopeRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, apiLimitRequest__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SessionContextScopeRequest'_unknownFields + (\ x__ y__ + -> x__ {_SessionContextScopeRequest'_unknownFields = y__}) + defMessage + = SessionContextScopeRequest'_constructor + {_SessionContextScopeRequest'id = Prelude.Nothing, + _SessionContextScopeRequest'apiLimitRequest = Prelude.Nothing, + _SessionContextScopeRequest'_unknownFields = []} + parseMessage + = let + loop :: + SessionContextScopeRequest + -> Data.ProtoLens.Encoding.Bytes.Parser SessionContextScopeRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "api_limit_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"apiLimitRequest") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "SessionContextScopeRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'apiLimitRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData SessionContextScopeRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SessionContextScopeRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SessionContextScopeRequest'id x__) + (Control.DeepSeq.deepseq + (_SessionContextScopeRequest'apiLimitRequest x__) ())) +{- | Fields : + + * 'Proto.CMS.SessionContext1_Fields.requestId' @:: Lens' SessionContextScopeResult Data.Word.Word32@ + * 'Proto.CMS.SessionContext1_Fields.maybe'requestId' @:: Lens' SessionContextScopeResult (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.SessionContext1_Fields.operationStatus' @:: Lens' SessionContextScopeResult Data.Word.Word32@ + * 'Proto.CMS.SessionContext1_Fields.maybe'operationStatus' @:: Lens' SessionContextScopeResult (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.SessionContext1_Fields.errorMessage' @:: Lens' SessionContextScopeResult Proto.Common.Shared1.Text@ + * 'Proto.CMS.SessionContext1_Fields.maybe'errorMessage' @:: Lens' SessionContextScopeResult (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.SessionContext1_Fields.trackingNumber' @:: Lens' SessionContextScopeResult Data.Word.Word64@ + * 'Proto.CMS.SessionContext1_Fields.maybe'trackingNumber' @:: Lens' SessionContextScopeResult (Prelude.Maybe Data.Word.Word64)@ + * 'Proto.CMS.SessionContext1_Fields.apiLimitResult' @:: Lens' SessionContextScopeResult Proto.CMS.ApiLimit1.ApiLimitResult@ + * 'Proto.CMS.SessionContext1_Fields.maybe'apiLimitResult' @:: Lens' SessionContextScopeResult (Prelude.Maybe Proto.CMS.ApiLimit1.ApiLimitResult)@ -} +data SessionContextScopeResult + = SessionContextScopeResult'_constructor {_SessionContextScopeResult'requestId :: !(Prelude.Maybe Data.Word.Word32), + _SessionContextScopeResult'operationStatus :: !(Prelude.Maybe Data.Word.Word32), + _SessionContextScopeResult'errorMessage :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _SessionContextScopeResult'trackingNumber :: !(Prelude.Maybe Data.Word.Word64), + _SessionContextScopeResult'apiLimitResult :: !(Prelude.Maybe Proto.CMS.ApiLimit1.ApiLimitResult), + _SessionContextScopeResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SessionContextScopeResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SessionContextScopeResult "requestId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeResult'requestId + (\ x__ y__ -> x__ {_SessionContextScopeResult'requestId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SessionContextScopeResult "maybe'requestId" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeResult'requestId + (\ x__ y__ -> x__ {_SessionContextScopeResult'requestId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SessionContextScopeResult "operationStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeResult'operationStatus + (\ x__ y__ + -> x__ {_SessionContextScopeResult'operationStatus = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SessionContextScopeResult "maybe'operationStatus" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeResult'operationStatus + (\ x__ y__ + -> x__ {_SessionContextScopeResult'operationStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SessionContextScopeResult "errorMessage" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeResult'errorMessage + (\ x__ y__ -> x__ {_SessionContextScopeResult'errorMessage = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField SessionContextScopeResult "maybe'errorMessage" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeResult'errorMessage + (\ x__ y__ -> x__ {_SessionContextScopeResult'errorMessage = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SessionContextScopeResult "trackingNumber" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeResult'trackingNumber + (\ x__ y__ + -> x__ {_SessionContextScopeResult'trackingNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SessionContextScopeResult "maybe'trackingNumber" (Prelude.Maybe Data.Word.Word64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeResult'trackingNumber + (\ x__ y__ + -> x__ {_SessionContextScopeResult'trackingNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SessionContextScopeResult "apiLimitResult" Proto.CMS.ApiLimit1.ApiLimitResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeResult'apiLimitResult + (\ x__ y__ + -> x__ {_SessionContextScopeResult'apiLimitResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField SessionContextScopeResult "maybe'apiLimitResult" (Prelude.Maybe Proto.CMS.ApiLimit1.ApiLimitResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SessionContextScopeResult'apiLimitResult + (\ x__ y__ + -> x__ {_SessionContextScopeResult'apiLimitResult = y__})) + Prelude.id +instance Data.ProtoLens.Message SessionContextScopeResult where + messageName _ + = Data.Text.pack "session_context_1.SessionContextScopeResult" + packedMessageDescriptor _ + = "\n\ + \\EMSessionContextScopeResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \SOH(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \SOH(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\ETX \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2'\n\ + \\SItracking_number\CAN\EOT \SOH(\EOTR\SOtrackingNumber\DC2E\n\ + \\DLEapi_limit_result\CAN\ENQ \SOH(\v2\ESC.api_limit_1.ApiLimitResultR\SOapiLimitResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + requestId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "request_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'requestId")) :: + Data.ProtoLens.FieldDescriptor SessionContextScopeResult + operationStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'operationStatus")) :: + Data.ProtoLens.FieldDescriptor SessionContextScopeResult + errorMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "error_message" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'errorMessage")) :: + Data.ProtoLens.FieldDescriptor SessionContextScopeResult + trackingNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "tracking_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'trackingNumber")) :: + Data.ProtoLens.FieldDescriptor SessionContextScopeResult + apiLimitResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "api_limit_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.ApiLimit1.ApiLimitResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'apiLimitResult")) :: + Data.ProtoLens.FieldDescriptor SessionContextScopeResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, requestId__field_descriptor), + (Data.ProtoLens.Tag 2, operationStatus__field_descriptor), + (Data.ProtoLens.Tag 3, errorMessage__field_descriptor), + (Data.ProtoLens.Tag 4, trackingNumber__field_descriptor), + (Data.ProtoLens.Tag 5, apiLimitResult__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SessionContextScopeResult'_unknownFields + (\ x__ y__ + -> x__ {_SessionContextScopeResult'_unknownFields = y__}) + defMessage + = SessionContextScopeResult'_constructor + {_SessionContextScopeResult'requestId = Prelude.Nothing, + _SessionContextScopeResult'operationStatus = Prelude.Nothing, + _SessionContextScopeResult'errorMessage = Prelude.Nothing, + _SessionContextScopeResult'trackingNumber = Prelude.Nothing, + _SessionContextScopeResult'apiLimitResult = Prelude.Nothing, + _SessionContextScopeResult'_unknownFields = []} + parseMessage + = let + loop :: + SessionContextScopeResult + -> Data.ProtoLens.Encoding.Bytes.Parser SessionContextScopeResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "request_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationStatus") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "error_message" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"errorMessage") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "tracking_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"trackingNumber") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "api_limit_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"apiLimitResult") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "SessionContextScopeResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'requestId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'operationStatus") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'errorMessage") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'trackingNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'apiLimitResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData SessionContextScopeResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SessionContextScopeResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SessionContextScopeResult'requestId x__) + (Control.DeepSeq.deepseq + (_SessionContextScopeResult'operationStatus x__) + (Control.DeepSeq.deepseq + (_SessionContextScopeResult'errorMessage x__) + (Control.DeepSeq.deepseq + (_SessionContextScopeResult'trackingNumber x__) + (Control.DeepSeq.deepseq + (_SessionContextScopeResult'apiLimitResult x__) ()))))) +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\ESCCMS/session_context_1.proto\DC2\DC1session_context_1\SUB\NAKCMS/api_limit_1.proto\SUB\NAKcommon/shared_1.proto\"v\n\ + \\SUBSessionContextScopeRequest\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\rR\STXid\DC2H\n\ + \\DC1api_limit_request\CAN\STX \SOH(\v2\FS.api_limit_1.ApiLimitRequestR\SIapiLimitRequest\"\138\STX\n\ + \\EMSessionContextScopeResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \SOH(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \SOH(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\ETX \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2'\n\ + \\SItracking_number\CAN\EOT \SOH(\EOTR\SOtrackingNumber\DC2E\n\ + \\DLEapi_limit_result\CAN\ENQ \SOH(\v2\ESC.api_limit_1.ApiLimitResultR\SOapiLimitResultJ\183\b\n\ + \\ACK\DC2\EOT\STX\NUL%\SOH\n\ + \f\n\ + \\SOH\f\DC2\ETX\STX\NUL\DC22\\ CQG Customer Management System API protocol for current session configuration/information.\n\ + \\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\EOT\NUL\SUB\n\ + \\t\n\ + \\STX\ETX\NUL\DC2\ETX\ACK\NUL\US\n\ + \\t\n\ + \\STX\ETX\SOH\DC2\ETX\a\NUL\US\n\ + \\n\ + \\n\ + \\STX\EOT\NUL\DC2\EOT\t\NUL\DC1\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\t\b\"\n\ + \`\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX\r\EOT\ESC\SUBS [required] Request identifier.\n\ + \ It should be unique to match with request result.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX\r\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\r\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\r\DC4\SYN\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\r\EM\SUB\n\ + \.\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX\DLE\EOT?\SUB! CMS API session limits request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX\DLE\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX\DLE\r(\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\DLE):\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\DLE=>\n\ + \\n\ + \\n\ + \\STX\EOT\SOH\DC2\EOT\DC3\NUL%\SOH\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX\DC3\b!\n\ + \8\n\ + \\EOT\EOT\SOH\STX\NUL\DC2\ETX\SYN\EOT#\SUB+ [required] ID of a corresponding request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\EOT\DC2\ETX\SYN\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETX\SYN\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX\SYN\DC4\RS\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX\SYN!\"\n\ + \i\n\ + \\EOT\EOT\SOH\STX\SOH\DC2\ETX\SUB\EOT)\SUB\\ [required] Operation status.\n\ + \ This field is associated with common_1.OperationStatus enum.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETX\SUB\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\ETX\SUB\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX\SUB\DC4$\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX\SUB'(\n\ + \\US\n\ + \\EOT\EOT\SOH\STX\STX\DC2\ETX\GS\EOT-\SUB\DC2 Failure details.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\EOT\DC2\ETX\GS\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ACK\DC2\ETX\GS\r\SUB\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETX\GS\ESC(\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETX\GS+,\n\ + \f\n\ + \\EOT\EOT\SOH\STX\ETX\DC2\ETX!\EOT(\SUBY Request tracking number generated by CMS API\n\ + \ Used by client to cancel deferred request\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\EOT\DC2\ETX!\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ENQ\DC2\ETX!\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETX!\DC4#\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETX!&'\n\ + \-\n\ + \\EOT\EOT\SOH\STX\EOT\DC2\ETX$\EOT=\SUB CMS API session limits result.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\EOT\DC2\ETX$\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ACK\DC2\ETX$\r'\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\SOH\DC2\ETX$(8\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ETX\DC2\ETX$;<" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/SessionContext1_Fields.hs b/cqg-cms-api-proto/src/Proto/CMS/SessionContext1_Fields.hs new file mode 100644 index 0000000..457dae0 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/SessionContext1_Fields.hs @@ -0,0 +1,119 @@ +{- This file was auto-generated from CMS/session_context_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.SessionContext1_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.ApiLimit1 +import qualified Proto.Common.Shared1 +apiLimitRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "apiLimitRequest" a) => + Lens.Family2.LensLike' f s a +apiLimitRequest = Data.ProtoLens.Field.field @"apiLimitRequest" +apiLimitResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "apiLimitResult" a) => + Lens.Family2.LensLike' f s a +apiLimitResult = Data.ProtoLens.Field.field @"apiLimitResult" +errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "errorMessage" a) => + Lens.Family2.LensLike' f s a +errorMessage = Data.ProtoLens.Field.field @"errorMessage" +id :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "id" a) => + Lens.Family2.LensLike' f s a +id = Data.ProtoLens.Field.field @"id" +maybe'apiLimitRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'apiLimitRequest" a) => + Lens.Family2.LensLike' f s a +maybe'apiLimitRequest + = Data.ProtoLens.Field.field @"maybe'apiLimitRequest" +maybe'apiLimitResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'apiLimitResult" a) => + Lens.Family2.LensLike' f s a +maybe'apiLimitResult + = Data.ProtoLens.Field.field @"maybe'apiLimitResult" +maybe'errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'errorMessage" a) => + Lens.Family2.LensLike' f s a +maybe'errorMessage + = Data.ProtoLens.Field.field @"maybe'errorMessage" +maybe'id :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'id" a) => + Lens.Family2.LensLike' f s a +maybe'id = Data.ProtoLens.Field.field @"maybe'id" +maybe'operationStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'operationStatus" a) => + Lens.Family2.LensLike' f s a +maybe'operationStatus + = Data.ProtoLens.Field.field @"maybe'operationStatus" +maybe'requestId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'requestId" a) => + Lens.Family2.LensLike' f s a +maybe'requestId = Data.ProtoLens.Field.field @"maybe'requestId" +maybe'trackingNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'trackingNumber" a) => + Lens.Family2.LensLike' f s a +maybe'trackingNumber + = Data.ProtoLens.Field.field @"maybe'trackingNumber" +operationStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operationStatus" a) => + Lens.Family2.LensLike' f s a +operationStatus = Data.ProtoLens.Field.field @"operationStatus" +requestId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "requestId" a) => + Lens.Family2.LensLike' f s a +requestId = Data.ProtoLens.Field.field @"requestId" +trackingNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "trackingNumber" a) => + Lens.Family2.LensLike' f s a +trackingNumber = Data.ProtoLens.Field.field @"trackingNumber" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Traderouting1.hs b/cqg-cms-api-proto/src/Proto/CMS/Traderouting1.hs new file mode 100644 index 0000000..3a2665b --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Traderouting1.hs @@ -0,0 +1,84280 @@ +{- This file was auto-generated from CMS/traderouting_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Traderouting1 ( + Account(), Account'Class(..), Account'Class(), + Account'SubClass(..), Account'SubClass(), AccountAndUserInfo(), + AccountAvailableExchangeGroupsRequest(), + AccountAvailableRouteListRequest(), + AccountAvailableRouteListResult(), + AccountAvailableServiceGroupListRequest(), + AccountAvailableServiceGroupListResult(), AccountCluster(), + AccountClusterPriceOffset(), AccountClusterRequest(), + AccountClusterResult(), AccountCollateralRequest(), + AccountCollateralResult(), AccountEquityRequest(), + AccountEquityResult(), AccountExchangeGroupsResult(), + AccountGroup(), AccountGroup'RelationType(..), + AccountGroup'RelationType(), AccountGroupRequest(), + AccountGroupResult(), AccountInfoRequest(), AccountInfoResult(), + AccountMarketLimitsRequest(), AccountMarketLimitsResult(), + AccountPositionsRequest(), AccountPositionsResult(), + AccountRiskParametersRequest(), AccountRiskParametersResult(), + AccountRouteAttribute(), AccountRouteListRequest(), + AccountRouteListResult(), AccountRouteRecord(), + AccountRouteRecord'ForceVariableLatencyAlgo(..), + AccountRouteRecord'ForceVariableLatencyAlgo(), + AccountScopeRequest(), AccountScopeResult(), + AccountSearchRequest(), AccountSearchRequest'AccountGroupRole(..), + AccountSearchRequest'AccountGroupRole(), + AccountSearchRequest'SearchCriteria(..), + AccountSearchRequest'SearchCriteria(), AccountSearchResult(), + AccountSearchResultRecord(), AccountServiceGroupListRequest(), + AccountServiceGroupListResult(), AccountSettings(), + AccountSettings'StatementOption(..), + AccountSettings'StatementOption(), AccountSettingsRequest(), + AccountSettingsResult(), AccountTradingFeaturesRequest(), + AccountTradingFeaturesResult(), AccountTradingInterfaceElement(), + AccountTypeOverride(), AccountTypeOverrideListRequest(), + AccountTypeOverrideListResult(), + AccountUserAuthorizationListRequest(), + AccountUserAuthorizationListResult(), AccountUserLink(), + ActivateOrder(), AddFill(), AddFillResult(), AvailableRoute(), + AvailableRoute'OmnibusSupportType(..), + AvailableRoute'OmnibusSupportType(), BalanceRecord(), + BalanceRecord'BalanceOrigin(..), BalanceRecord'BalanceOrigin(), + BalanceRecordsRequest(), BalanceRecordsResult(), + BillableExchange(), BillableExchangeListRequest(), + BillableExchangeListResult(), CancelCompoundOrderTree(), + CancelCompoundOrderTreeResult(), CancelFill(), CancelOrder(), + CancelOrderResult(), ChainAccount(), CloneAccount(), + CloneAccountResult(), Collateral(), CommodityMarketLimits(), + CompoundOrder(), CompoundOrder'CompoundOrderNodeRole(..), + CompoundOrder'CompoundOrderNodeRole(), + CompoundOrder'CompoundOrderTriggerType(..), + CompoundOrder'CompoundOrderTriggerType(), + CompoundOrder'CompoundOrderType(..), + CompoundOrder'CompoundOrderType(), CompoundOrderTreeRequest(), + CompoundOrderTreeResult(), ConfirmOrderSentToExchange(), + ContractPosition(), CorrectFill(), CorrectFill'FillType(..), + CorrectFill'FillType(), CreateAccount(), CreateAccountCluster(), + CreateAccountClusterResult(), CreateAccountGroup(), + CreateAccountGroupResult(), CreateAccountResult(), + CreateBalanceRecord(), CreateBalanceRecordResult(), + CreateExternalOrder(), CreateExternalOrderResult(), + DeleteAccountPositions(), EntityAllowedToTrade(), Equity(), + ExchangeGroup(), ExchangeMarketLimits(), ExpirationLimit(), + ExpirationLimitDecimal(), ExtendedSide(..), ExtendedSide(), + FungibleCommodity(), IgnoreOrder(), InstrumentMarketLimits(), + InstrumentType(), InstrumentType'InstrumentGroupType(..), + InstrumentType'InstrumentGroupType(), + InstrumentType'MarketLimitType(..), + InstrumentType'MarketLimitType(), LegFill(), LimitMode(..), + LimitMode(), LimitValue(), LimitValueBoolean(), + LimitValueDecimal(), LimitValueDouble(), LossLimit(), + LossLimit'Type(..), LossLimit'Type(), MarketLimits(), + MarketLimitsRecord(), OpenPosition(), + OpenPosition'PositionStatus(..), OpenPosition'PositionStatus(), + OperationalDetails(), OrderChain(), OrderChain'Duration(..), + OrderChain'Duration(), OrderChain'ExecInstruction(..), + OrderChain'ExecInstruction(), OrderChain'OpenCloseType(..), + OrderChain'OpenCloseType(), OrderChain'OrderType(..), + OrderChain'OrderType(), OrderChain'Side(..), OrderChain'Side(), + OrderChain'SpeculationType(..), OrderChain'SpeculationType(), + OrderChain'Status(..), OrderChain'Status(), OrderContractLeg(), + OrderDetailsRequest(), OrderDetailsResult(), OrderFill(), + OrderFill'FillStatus(..), OrderFill'FillStatus(), OrderRequest(), + OrderRequest'RequestType(..), OrderRequest'RequestType(), + OrderRequest'State(..), OrderRequest'State(), OrderRoute(), + OrderScopeRequest(), OrderScopeResult(), OrderSearchRequest(), + OrderSearchRequest'SearchCriteria(..), + OrderSearchRequest'SearchCriteria(), OrderSearchResult(), + OrderSearchResultRecord(), OrderSizes(), OrderTrailing(), + OrderTrailing'TrailType(..), OrderTrailing'TrailType(), + OrderTransactionStatus(), OrderTransactionStatus'Status(..), + OrderTransactionStatus'Status(), PositionAndTradeLimits(), + PriceLimitMode(..), PriceLimitMode(), PurchasingPowerParameters(), + PurchasingPowerParameters'IncludeOption(..), + PurchasingPowerParameters'IncludeOption(), + ReflectAsCanceledOrder(), ReflectAsCanceledOrderResult(), + RelatedOrder(), RelatedOrderTreeRequest(), + RelatedOrderTreeResult(), RemoveAccount(), RemoveAccountGroup(), + RemoveAccountResult(), RestoreAccount(), RestoreAccountResult(), + RiskParameters(), RiskParameters'OptionsTrading(..), + RiskParameters'OptionsTrading(), RouteAlgoStrategy(), + RouteInformation(), RouteOmnibusAccount(), ServiceGroup(), + ServiceGroupAuthorizationLevel(..), + ServiceGroupAuthorizationLevel(), StrategyLeg(), + StrategyLeg'StrategyMode(..), StrategyLeg'StrategyMode(), + SubAccount(), SyntheticStrategyTreeRequest(), + SyntheticStrategyTreeResult(), TradableCommodity(), + TradePriceLimit(), TradePriceLimitPercent(), + TradePriceLimitsPercent(), TradePriceLimitsTicks(), + TradeRoutingLookupPropertyType(..), + TradeRoutingLookupPropertyType(), TradeRoutingRequest(), + TradeRoutingResult(), UpdateAccount(), UpdateAccountCluster(), + UpdateAccountClusterPriceOffsets(), + UpdateAccountClusterPriceOffsetsResult(), + UpdateAccountClusterResult(), UpdateAccountGroup(), + UpdateAccountMarketLimits(), UpdateAccountMarketLimitsResult(), + UpdateAccountResult(), UpdateAccountRiskParameters(), + UpdateAccountRiskParametersResult(), UpdateAccountRouteList(), + UpdateAccountRouteListResult(), UpdateAccountServiceGroupList(), + UpdateAccountServiceGroupListResult(), UpdateAccountSettings(), + UpdateAccountSettingsResult(), UpdateAccountTradingFeatures(), + UpdateAccountTypeOverrideList(), + UpdateAccountTypeOverrideListResult(), + UpdateAccountUserAuthorizationList(), + UpdateAccountUserAuthorizationListResult(), UpdateBalanceRecord(), + UpdateBalanceRecordResult(), UpdateRiskParameters(), + UpdateRiskParametersResult() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.Common1 +import qualified Proto.CMS.Order1 +import qualified Proto.Common.Decimal +import qualified Proto.Common.Shared1 +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' Account Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' Account (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.name' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'name' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageAccountNumber' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'brokerageAccountNumber' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteSalesSeriesNumber' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteSalesSeriesNumber' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteSalesSeriesName' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteSalesSeriesName' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteBrokerageName' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteBrokerageName' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.class'' @:: Lens' Account Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'class'' @:: Lens' Account (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.customerId' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'customerId' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.riskServerInstance' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'riskServerInstance' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountTypeId' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountTypeId' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.salesSeriesId' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'salesSeriesId' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageId' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'brokerageId' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.currency' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'currency' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.subClass' @:: Lens' Account Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'subClass' @:: Lens' Account (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.riskServerInstanceId' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'riskServerInstanceId' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteAccountClusterId' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteAccountClusterId' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.removed' @:: Lens' Account Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'removed' @:: Lens' Account (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.isMaster' @:: Lens' Account Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isMaster' @:: Lens' Account (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.groupRelationType' @:: Lens' Account Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'groupRelationType' @:: Lens' Account (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.isCollection' @:: Lens' Account Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isCollection' @:: Lens' Account (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.profileId' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'profileId' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.profileSalesSeriesId' @:: Lens' Account Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'profileSalesSeriesId' @:: Lens' Account (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.isInMigration' @:: Lens' Account Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isInMigration' @:: Lens' Account (Prelude.Maybe Prelude.Bool)@ -} +data Account + = Account'_constructor {_Account'id :: !(Prelude.Maybe Data.Int.Int32), + _Account'name :: !(Prelude.Maybe Data.Text.Text), + _Account'brokerageAccountNumber :: !(Prelude.Maybe Data.Text.Text), + _Account'obsoleteSalesSeriesNumber :: !(Prelude.Maybe Data.Text.Text), + _Account'obsoleteSalesSeriesName :: !(Prelude.Maybe Data.Text.Text), + _Account'obsoleteBrokerageName :: !(Prelude.Maybe Data.Text.Text), + _Account'class' :: !(Prelude.Maybe Data.Word.Word32), + _Account'customerId :: !(Prelude.Maybe Data.Text.Text), + _Account'riskServerInstance :: !(Prelude.Maybe Data.Text.Text), + _Account'accountTypeId :: !(Prelude.Maybe Data.Text.Text), + _Account'salesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _Account'brokerageId :: !(Prelude.Maybe Data.Text.Text), + _Account'currency :: !(Prelude.Maybe Data.Text.Text), + _Account'subClass :: !(Prelude.Maybe Data.Word.Word32), + _Account'riskServerInstanceId :: !(Prelude.Maybe Data.Text.Text), + _Account'obsoleteAccountClusterId :: !(Prelude.Maybe Data.Text.Text), + _Account'removed :: !(Prelude.Maybe Prelude.Bool), + _Account'isMaster :: !(Prelude.Maybe Prelude.Bool), + _Account'groupRelationType :: !(Prelude.Maybe Data.Word.Word32), + _Account'isCollection :: !(Prelude.Maybe Prelude.Bool), + _Account'profileId :: !(Prelude.Maybe Data.Text.Text), + _Account'profileSalesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _Account'isInMigration :: !(Prelude.Maybe Prelude.Bool), + _Account'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Account where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Account "id" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'id (\ x__ y__ -> x__ {_Account'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'id" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'id (\ x__ y__ -> x__ {_Account'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "name" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'name (\ x__ y__ -> x__ {_Account'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'name" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'name (\ x__ y__ -> x__ {_Account'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "brokerageAccountNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'brokerageAccountNumber + (\ x__ y__ -> x__ {_Account'brokerageAccountNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'brokerageAccountNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'brokerageAccountNumber + (\ x__ y__ -> x__ {_Account'brokerageAccountNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "obsoleteSalesSeriesNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'obsoleteSalesSeriesNumber + (\ x__ y__ -> x__ {_Account'obsoleteSalesSeriesNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'obsoleteSalesSeriesNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'obsoleteSalesSeriesNumber + (\ x__ y__ -> x__ {_Account'obsoleteSalesSeriesNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "obsoleteSalesSeriesName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'obsoleteSalesSeriesName + (\ x__ y__ -> x__ {_Account'obsoleteSalesSeriesName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'obsoleteSalesSeriesName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'obsoleteSalesSeriesName + (\ x__ y__ -> x__ {_Account'obsoleteSalesSeriesName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "obsoleteBrokerageName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'obsoleteBrokerageName + (\ x__ y__ -> x__ {_Account'obsoleteBrokerageName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'obsoleteBrokerageName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'obsoleteBrokerageName + (\ x__ y__ -> x__ {_Account'obsoleteBrokerageName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "class'" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'class' (\ x__ y__ -> x__ {_Account'class' = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'class'" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'class' (\ x__ y__ -> x__ {_Account'class' = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "customerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'customerId (\ x__ y__ -> x__ {_Account'customerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'customerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'customerId (\ x__ y__ -> x__ {_Account'customerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "riskServerInstance" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'riskServerInstance + (\ x__ y__ -> x__ {_Account'riskServerInstance = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'riskServerInstance" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'riskServerInstance + (\ x__ y__ -> x__ {_Account'riskServerInstance = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "accountTypeId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'accountTypeId + (\ x__ y__ -> x__ {_Account'accountTypeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'accountTypeId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'accountTypeId + (\ x__ y__ -> x__ {_Account'accountTypeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "salesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'salesSeriesId + (\ x__ y__ -> x__ {_Account'salesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'salesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'salesSeriesId + (\ x__ y__ -> x__ {_Account'salesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "brokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'brokerageId + (\ x__ y__ -> x__ {_Account'brokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'brokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'brokerageId + (\ x__ y__ -> x__ {_Account'brokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "currency" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'currency (\ x__ y__ -> x__ {_Account'currency = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'currency" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'currency (\ x__ y__ -> x__ {_Account'currency = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "subClass" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'subClass (\ x__ y__ -> x__ {_Account'subClass = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'subClass" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'subClass (\ x__ y__ -> x__ {_Account'subClass = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "riskServerInstanceId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'riskServerInstanceId + (\ x__ y__ -> x__ {_Account'riskServerInstanceId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'riskServerInstanceId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'riskServerInstanceId + (\ x__ y__ -> x__ {_Account'riskServerInstanceId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "obsoleteAccountClusterId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'obsoleteAccountClusterId + (\ x__ y__ -> x__ {_Account'obsoleteAccountClusterId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'obsoleteAccountClusterId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'obsoleteAccountClusterId + (\ x__ y__ -> x__ {_Account'obsoleteAccountClusterId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "removed" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'removed (\ x__ y__ -> x__ {_Account'removed = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'removed" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'removed (\ x__ y__ -> x__ {_Account'removed = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "isMaster" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'isMaster (\ x__ y__ -> x__ {_Account'isMaster = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'isMaster" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'isMaster (\ x__ y__ -> x__ {_Account'isMaster = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "groupRelationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'groupRelationType + (\ x__ y__ -> x__ {_Account'groupRelationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'groupRelationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'groupRelationType + (\ x__ y__ -> x__ {_Account'groupRelationType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "isCollection" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'isCollection + (\ x__ y__ -> x__ {_Account'isCollection = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'isCollection" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'isCollection + (\ x__ y__ -> x__ {_Account'isCollection = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'profileId (\ x__ y__ -> x__ {_Account'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'profileId (\ x__ y__ -> x__ {_Account'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "profileSalesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'profileSalesSeriesId + (\ x__ y__ -> x__ {_Account'profileSalesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'profileSalesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'profileSalesSeriesId + (\ x__ y__ -> x__ {_Account'profileSalesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Account "isInMigration" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'isInMigration + (\ x__ y__ -> x__ {_Account'isInMigration = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Account "maybe'isInMigration" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Account'isInMigration + (\ x__ y__ -> x__ {_Account'isInMigration = y__})) + Prelude.id +instance Data.ProtoLens.Message Account where + messageName _ = Data.Text.pack "traderouting_1.Account" + packedMessageDescriptor _ + = "\n\ + \\aAccount\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\DC1R\STXid\DC2\DC2\n\ + \\EOTname\CAN\STX \SOH(\tR\EOTname\DC28\n\ + \\CANbrokerage_account_number\CAN\ETX \SOH(\tR\SYNbrokerageAccountNumber\DC2C\n\ + \\FSobsolete_sales_series_number\CAN\EOT \SOH(\tR\EMobsoleteSalesSeriesNumberB\STX\CAN\SOH\DC2?\n\ + \\SUBobsolete_sales_series_name\CAN\ENQ \SOH(\tR\ETBobsoleteSalesSeriesNameB\STX\CAN\SOH\DC2:\n\ + \\ETBobsolete_brokerage_name\CAN\ACK \SOH(\tR\NAKobsoleteBrokerageNameB\STX\CAN\SOH\DC2\DC4\n\ + \\ENQclass\CAN\b \SOH(\rR\ENQclass\DC2\US\n\ + \\vcustomer_id\CAN\t \SOH(\tR\n\ + \customerId\DC20\n\ + \\DC4risk_server_instance\CAN\n\ + \ \SOH(\tR\DC2riskServerInstance\DC2&\n\ + \\SIaccount_type_id\CAN\v \SOH(\tR\raccountTypeId\DC2&\n\ + \\SIsales_series_id\CAN\f \SOH(\tR\rsalesSeriesId\DC2!\n\ + \\fbrokerage_id\CAN\r \SOH(\tR\vbrokerageId\DC2\SUB\n\ + \\bcurrency\CAN\SO \SOH(\tR\bcurrency\DC2\ESC\n\ + \\tsub_class\CAN\SI \SOH(\rR\bsubClass\DC25\n\ + \\ETBrisk_server_instance_id\CAN\DLE \SOH(\tR\DC4riskServerInstanceId\DC2A\n\ + \\ESCobsolete_account_cluster_id\CAN\DC1 \SOH(\tR\CANobsoleteAccountClusterIdB\STX\CAN\SOH\DC2\CAN\n\ + \\aremoved\CAN\DC2 \SOH(\bR\aremoved\DC2\ESC\n\ + \\tis_master\CAN\DC3 \SOH(\bR\bisMaster\DC2.\n\ + \\DC3group_relation_type\CAN\DC4 \SOH(\rR\DC1groupRelationType\DC2#\n\ + \\ris_collection\CAN\NAK \SOH(\bR\fisCollection\DC2\GS\n\ + \\n\ + \profile_id\CAN\SYN \SOH(\tR\tprofileId\DC25\n\ + \\ETBprofile_sales_series_id\CAN\ETB \SOH(\tR\DC4profileSalesSeriesId\DC2&\n\ + \\SIis_in_migration\CAN\CAN \SOH(\bR\risInMigration\"/\n\ + \\ENQClass\DC2\v\n\ + \\aREGULAR\DLE\SOH\DC2\f\n\ + \\bTEMPLATE\DLE\STX\DC2\v\n\ + \\aOMNIBUS\DLE\ETX\"9\n\ + \\bSubClass\DC2\NAK\n\ + \\DC1SUB_CLASS_REGULAR\DLE\SOH\DC2\SYN\n\ + \\DC2SUB_CLASS_INTERNAL\DLE\STX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor Account + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor Account + brokerageAccountNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_account_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber")) :: + Data.ProtoLens.FieldDescriptor Account + obsoleteSalesSeriesNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_sales_series_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteSalesSeriesNumber")) :: + Data.ProtoLens.FieldDescriptor Account + obsoleteSalesSeriesName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_sales_series_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteSalesSeriesName")) :: + Data.ProtoLens.FieldDescriptor Account + obsoleteBrokerageName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_brokerage_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteBrokerageName")) :: + Data.ProtoLens.FieldDescriptor Account + class'__field_descriptor + = Data.ProtoLens.FieldDescriptor + "class" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'class'")) :: + Data.ProtoLens.FieldDescriptor Account + customerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerId")) :: + Data.ProtoLens.FieldDescriptor Account + riskServerInstance__field_descriptor + = Data.ProtoLens.FieldDescriptor + "risk_server_instance" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'riskServerInstance")) :: + Data.ProtoLens.FieldDescriptor Account + accountTypeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_type_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountTypeId")) :: + Data.ProtoLens.FieldDescriptor Account + salesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesId")) :: + Data.ProtoLens.FieldDescriptor Account + brokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageId")) :: + Data.ProtoLens.FieldDescriptor Account + currency__field_descriptor + = Data.ProtoLens.FieldDescriptor + "currency" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'currency")) :: + Data.ProtoLens.FieldDescriptor Account + subClass__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sub_class" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'subClass")) :: + Data.ProtoLens.FieldDescriptor Account + riskServerInstanceId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "risk_server_instance_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'riskServerInstanceId")) :: + Data.ProtoLens.FieldDescriptor Account + obsoleteAccountClusterId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_account_cluster_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteAccountClusterId")) :: + Data.ProtoLens.FieldDescriptor Account + removed__field_descriptor + = Data.ProtoLens.FieldDescriptor + "removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removed")) :: + Data.ProtoLens.FieldDescriptor Account + isMaster__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_master" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isMaster")) :: + Data.ProtoLens.FieldDescriptor Account + groupRelationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "group_relation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'groupRelationType")) :: + Data.ProtoLens.FieldDescriptor Account + isCollection__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_collection" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isCollection")) :: + Data.ProtoLens.FieldDescriptor Account + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor Account + profileSalesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileSalesSeriesId")) :: + Data.ProtoLens.FieldDescriptor Account + isInMigration__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_in_migration" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isInMigration")) :: + Data.ProtoLens.FieldDescriptor Account + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, brokerageAccountNumber__field_descriptor), + (Data.ProtoLens.Tag 4, + obsoleteSalesSeriesNumber__field_descriptor), + (Data.ProtoLens.Tag 5, obsoleteSalesSeriesName__field_descriptor), + (Data.ProtoLens.Tag 6, obsoleteBrokerageName__field_descriptor), + (Data.ProtoLens.Tag 8, class'__field_descriptor), + (Data.ProtoLens.Tag 9, customerId__field_descriptor), + (Data.ProtoLens.Tag 10, riskServerInstance__field_descriptor), + (Data.ProtoLens.Tag 11, accountTypeId__field_descriptor), + (Data.ProtoLens.Tag 12, salesSeriesId__field_descriptor), + (Data.ProtoLens.Tag 13, brokerageId__field_descriptor), + (Data.ProtoLens.Tag 14, currency__field_descriptor), + (Data.ProtoLens.Tag 15, subClass__field_descriptor), + (Data.ProtoLens.Tag 16, riskServerInstanceId__field_descriptor), + (Data.ProtoLens.Tag 17, + obsoleteAccountClusterId__field_descriptor), + (Data.ProtoLens.Tag 18, removed__field_descriptor), + (Data.ProtoLens.Tag 19, isMaster__field_descriptor), + (Data.ProtoLens.Tag 20, groupRelationType__field_descriptor), + (Data.ProtoLens.Tag 21, isCollection__field_descriptor), + (Data.ProtoLens.Tag 22, profileId__field_descriptor), + (Data.ProtoLens.Tag 23, profileSalesSeriesId__field_descriptor), + (Data.ProtoLens.Tag 24, isInMigration__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Account'_unknownFields + (\ x__ y__ -> x__ {_Account'_unknownFields = y__}) + defMessage + = Account'_constructor + {_Account'id = Prelude.Nothing, _Account'name = Prelude.Nothing, + _Account'brokerageAccountNumber = Prelude.Nothing, + _Account'obsoleteSalesSeriesNumber = Prelude.Nothing, + _Account'obsoleteSalesSeriesName = Prelude.Nothing, + _Account'obsoleteBrokerageName = Prelude.Nothing, + _Account'class' = Prelude.Nothing, + _Account'customerId = Prelude.Nothing, + _Account'riskServerInstance = Prelude.Nothing, + _Account'accountTypeId = Prelude.Nothing, + _Account'salesSeriesId = Prelude.Nothing, + _Account'brokerageId = Prelude.Nothing, + _Account'currency = Prelude.Nothing, + _Account'subClass = Prelude.Nothing, + _Account'riskServerInstanceId = Prelude.Nothing, + _Account'obsoleteAccountClusterId = Prelude.Nothing, + _Account'removed = Prelude.Nothing, + _Account'isMaster = Prelude.Nothing, + _Account'groupRelationType = Prelude.Nothing, + _Account'isCollection = Prelude.Nothing, + _Account'profileId = Prelude.Nothing, + _Account'profileSalesSeriesId = Prelude.Nothing, + _Account'isInMigration = Prelude.Nothing, + _Account'_unknownFields = []} + parseMessage + = let + loop :: Account -> Data.ProtoLens.Encoding.Bytes.Parser Account + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "name" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_account_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAccountNumber") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_sales_series_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteSalesSeriesNumber") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_sales_series_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteSalesSeriesName") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_brokerage_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteBrokerageName") y x) + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "class" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"class'") y x) + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"customerId") y x) + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "risk_server_instance" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"riskServerInstance") y x) + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_type_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountTypeId") y x) + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesId") y x) + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"brokerageId") y x) + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "currency" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"currency") y x) + 120 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "sub_class" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"subClass") y x) + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "risk_server_instance_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"riskServerInstanceId") y x) + 138 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_account_cluster_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteAccountClusterId") y x) + 144 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "removed" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"removed") y x) + 152 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_master" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isMaster") y x) + 160 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "group_relation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"groupRelationType") y x) + 168 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_collection" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"isCollection") y x) + 178 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + 186 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"profileSalesSeriesId") y x) + 192 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_in_migration" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"isInMigration") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "Account" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteSalesSeriesNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteSalesSeriesName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteBrokerageName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'class'") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'customerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'riskServerInstance") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountTypeId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'salesSeriesId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'brokerageId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'currency") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'subClass") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 120) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'riskServerInstanceId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteAccountClusterId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'removed") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 144) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'isMaster") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 152) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'groupRelationType") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 160) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'isCollection") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 168) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'profileId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 178) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'profileSalesSeriesId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 186) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'isInMigration") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 192) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))))))))))) +instance Control.DeepSeq.NFData Account where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Account'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Account'id x__) + (Control.DeepSeq.deepseq + (_Account'name x__) + (Control.DeepSeq.deepseq + (_Account'brokerageAccountNumber x__) + (Control.DeepSeq.deepseq + (_Account'obsoleteSalesSeriesNumber x__) + (Control.DeepSeq.deepseq + (_Account'obsoleteSalesSeriesName x__) + (Control.DeepSeq.deepseq + (_Account'obsoleteBrokerageName x__) + (Control.DeepSeq.deepseq + (_Account'class' x__) + (Control.DeepSeq.deepseq + (_Account'customerId x__) + (Control.DeepSeq.deepseq + (_Account'riskServerInstance x__) + (Control.DeepSeq.deepseq + (_Account'accountTypeId x__) + (Control.DeepSeq.deepseq + (_Account'salesSeriesId x__) + (Control.DeepSeq.deepseq + (_Account'brokerageId x__) + (Control.DeepSeq.deepseq + (_Account'currency x__) + (Control.DeepSeq.deepseq + (_Account'subClass x__) + (Control.DeepSeq.deepseq + (_Account'riskServerInstanceId x__) + (Control.DeepSeq.deepseq + (_Account'obsoleteAccountClusterId x__) + (Control.DeepSeq.deepseq + (_Account'removed x__) + (Control.DeepSeq.deepseq + (_Account'isMaster x__) + (Control.DeepSeq.deepseq + (_Account'groupRelationType + x__) + (Control.DeepSeq.deepseq + (_Account'isCollection x__) + (Control.DeepSeq.deepseq + (_Account'profileId x__) + (Control.DeepSeq.deepseq + (_Account'profileSalesSeriesId + x__) + (Control.DeepSeq.deepseq + (_Account'isInMigration + x__) + ()))))))))))))))))))))))) +data Account'Class + = Account'REGULAR | Account'TEMPLATE | Account'OMNIBUS + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum Account'Class where + maybeToEnum 1 = Prelude.Just Account'REGULAR + maybeToEnum 2 = Prelude.Just Account'TEMPLATE + maybeToEnum 3 = Prelude.Just Account'OMNIBUS + maybeToEnum _ = Prelude.Nothing + showEnum Account'REGULAR = "REGULAR" + showEnum Account'TEMPLATE = "TEMPLATE" + showEnum Account'OMNIBUS = "OMNIBUS" + readEnum k + | (Prelude.==) k "REGULAR" = Prelude.Just Account'REGULAR + | (Prelude.==) k "TEMPLATE" = Prelude.Just Account'TEMPLATE + | (Prelude.==) k "OMNIBUS" = Prelude.Just Account'OMNIBUS + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded Account'Class where + minBound = Account'REGULAR + maxBound = Account'OMNIBUS +instance Prelude.Enum Account'Class where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum Class: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum Account'REGULAR = 1 + fromEnum Account'TEMPLATE = 2 + fromEnum Account'OMNIBUS = 3 + succ Account'OMNIBUS + = Prelude.error + "Account'Class.succ: bad argument Account'OMNIBUS. This value would be out of bounds." + succ Account'REGULAR = Account'TEMPLATE + succ Account'TEMPLATE = Account'OMNIBUS + pred Account'REGULAR + = Prelude.error + "Account'Class.pred: bad argument Account'REGULAR. This value would be out of bounds." + pred Account'TEMPLATE = Account'REGULAR + pred Account'OMNIBUS = Account'TEMPLATE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault Account'Class where + fieldDefault = Account'REGULAR +instance Control.DeepSeq.NFData Account'Class where + rnf x__ = Prelude.seq x__ () +data Account'SubClass + = Account'SUB_CLASS_REGULAR | Account'SUB_CLASS_INTERNAL + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum Account'SubClass where + maybeToEnum 1 = Prelude.Just Account'SUB_CLASS_REGULAR + maybeToEnum 2 = Prelude.Just Account'SUB_CLASS_INTERNAL + maybeToEnum _ = Prelude.Nothing + showEnum Account'SUB_CLASS_REGULAR = "SUB_CLASS_REGULAR" + showEnum Account'SUB_CLASS_INTERNAL = "SUB_CLASS_INTERNAL" + readEnum k + | (Prelude.==) k "SUB_CLASS_REGULAR" + = Prelude.Just Account'SUB_CLASS_REGULAR + | (Prelude.==) k "SUB_CLASS_INTERNAL" + = Prelude.Just Account'SUB_CLASS_INTERNAL + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded Account'SubClass where + minBound = Account'SUB_CLASS_REGULAR + maxBound = Account'SUB_CLASS_INTERNAL +instance Prelude.Enum Account'SubClass where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum SubClass: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum Account'SUB_CLASS_REGULAR = 1 + fromEnum Account'SUB_CLASS_INTERNAL = 2 + succ Account'SUB_CLASS_INTERNAL + = Prelude.error + "Account'SubClass.succ: bad argument Account'SUB_CLASS_INTERNAL. This value would be out of bounds." + succ Account'SUB_CLASS_REGULAR = Account'SUB_CLASS_INTERNAL + pred Account'SUB_CLASS_REGULAR + = Prelude.error + "Account'SubClass.pred: bad argument Account'SUB_CLASS_REGULAR. This value would be out of bounds." + pred Account'SUB_CLASS_INTERNAL = Account'SUB_CLASS_REGULAR + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault Account'SubClass where + fieldDefault = Account'SUB_CLASS_REGULAR +instance Control.DeepSeq.NFData Account'SubClass where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountAndUserInfo Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.userInfo' @:: Lens' AccountAndUserInfo Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.rejectDetails' @:: Lens' AccountAndUserInfo Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'rejectDetails' @:: Lens' AccountAndUserInfo (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.rejectDetailsInternal' @:: Lens' AccountAndUserInfo Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'rejectDetailsInternal' @:: Lens' AccountAndUserInfo (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.userId' @:: Lens' AccountAndUserInfo Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'userId' @:: Lens' AccountAndUserInfo (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.userName' @:: Lens' AccountAndUserInfo Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'userName' @:: Lens' AccountAndUserInfo (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountName' @:: Lens' AccountAndUserInfo Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountName' @:: Lens' AccountAndUserInfo (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageAccountNumber' @:: Lens' AccountAndUserInfo Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'brokerageAccountNumber' @:: Lens' AccountAndUserInfo (Prelude.Maybe Data.Text.Text)@ -} +data AccountAndUserInfo + = AccountAndUserInfo'_constructor {_AccountAndUserInfo'accountId :: !Data.Int.Int32, + _AccountAndUserInfo'userInfo :: !Data.Text.Text, + _AccountAndUserInfo'rejectDetails :: !(Prelude.Maybe Data.Text.Text), + _AccountAndUserInfo'rejectDetailsInternal :: !(Prelude.Maybe Data.Text.Text), + _AccountAndUserInfo'userId :: !(Prelude.Maybe Data.Text.Text), + _AccountAndUserInfo'userName :: !(Prelude.Maybe Data.Text.Text), + _AccountAndUserInfo'accountName :: !(Prelude.Maybe Data.Text.Text), + _AccountAndUserInfo'brokerageAccountNumber :: !(Prelude.Maybe Data.Text.Text), + _AccountAndUserInfo'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountAndUserInfo where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'accountId + (\ x__ y__ -> x__ {_AccountAndUserInfo'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "userInfo" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'userInfo + (\ x__ y__ -> x__ {_AccountAndUserInfo'userInfo = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "rejectDetails" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'rejectDetails + (\ x__ y__ -> x__ {_AccountAndUserInfo'rejectDetails = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "maybe'rejectDetails" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'rejectDetails + (\ x__ y__ -> x__ {_AccountAndUserInfo'rejectDetails = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "rejectDetailsInternal" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'rejectDetailsInternal + (\ x__ y__ + -> x__ {_AccountAndUserInfo'rejectDetailsInternal = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "maybe'rejectDetailsInternal" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'rejectDetailsInternal + (\ x__ y__ + -> x__ {_AccountAndUserInfo'rejectDetailsInternal = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "userId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'userId + (\ x__ y__ -> x__ {_AccountAndUserInfo'userId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "maybe'userId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'userId + (\ x__ y__ -> x__ {_AccountAndUserInfo'userId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "userName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'userName + (\ x__ y__ -> x__ {_AccountAndUserInfo'userName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "maybe'userName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'userName + (\ x__ y__ -> x__ {_AccountAndUserInfo'userName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "accountName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'accountName + (\ x__ y__ -> x__ {_AccountAndUserInfo'accountName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "maybe'accountName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'accountName + (\ x__ y__ -> x__ {_AccountAndUserInfo'accountName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "brokerageAccountNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'brokerageAccountNumber + (\ x__ y__ + -> x__ {_AccountAndUserInfo'brokerageAccountNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountAndUserInfo "maybe'brokerageAccountNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAndUserInfo'brokerageAccountNumber + (\ x__ y__ + -> x__ {_AccountAndUserInfo'brokerageAccountNumber = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountAndUserInfo where + messageName _ = Data.Text.pack "traderouting_1.AccountAndUserInfo" + packedMessageDescriptor _ + = "\n\ + \\DC2AccountAndUserInfo\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\DC2\ESC\n\ + \\tuser_info\CAN\STX \STX(\tR\buserInfo\DC2%\n\ + \\SOreject_details\CAN\ETX \SOH(\tR\rrejectDetails\DC26\n\ + \\ETBreject_details_internal\CAN\EOT \SOH(\tR\NAKrejectDetailsInternal\DC2\ETB\n\ + \\auser_id\CAN\ENQ \SOH(\tR\ACKuserId\DC2\ESC\n\ + \\tuser_name\CAN\ACK \SOH(\tR\buserName\DC2!\n\ + \\faccount_name\CAN\a \SOH(\tR\vaccountName\DC28\n\ + \\CANbrokerage_account_number\CAN\b \SOH(\tR\SYNbrokerageAccountNumber" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor AccountAndUserInfo + userInfo__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_info" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"userInfo")) :: + Data.ProtoLens.FieldDescriptor AccountAndUserInfo + rejectDetails__field_descriptor + = Data.ProtoLens.FieldDescriptor + "reject_details" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'rejectDetails")) :: + Data.ProtoLens.FieldDescriptor AccountAndUserInfo + rejectDetailsInternal__field_descriptor + = Data.ProtoLens.FieldDescriptor + "reject_details_internal" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'rejectDetailsInternal")) :: + Data.ProtoLens.FieldDescriptor AccountAndUserInfo + userId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'userId")) :: + Data.ProtoLens.FieldDescriptor AccountAndUserInfo + userName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'userName")) :: + Data.ProtoLens.FieldDescriptor AccountAndUserInfo + accountName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountName")) :: + Data.ProtoLens.FieldDescriptor AccountAndUserInfo + brokerageAccountNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_account_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber")) :: + Data.ProtoLens.FieldDescriptor AccountAndUserInfo + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, userInfo__field_descriptor), + (Data.ProtoLens.Tag 3, rejectDetails__field_descriptor), + (Data.ProtoLens.Tag 4, rejectDetailsInternal__field_descriptor), + (Data.ProtoLens.Tag 5, userId__field_descriptor), + (Data.ProtoLens.Tag 6, userName__field_descriptor), + (Data.ProtoLens.Tag 7, accountName__field_descriptor), + (Data.ProtoLens.Tag 8, brokerageAccountNumber__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountAndUserInfo'_unknownFields + (\ x__ y__ -> x__ {_AccountAndUserInfo'_unknownFields = y__}) + defMessage + = AccountAndUserInfo'_constructor + {_AccountAndUserInfo'accountId = Data.ProtoLens.fieldDefault, + _AccountAndUserInfo'userInfo = Data.ProtoLens.fieldDefault, + _AccountAndUserInfo'rejectDetails = Prelude.Nothing, + _AccountAndUserInfo'rejectDetailsInternal = Prelude.Nothing, + _AccountAndUserInfo'userId = Prelude.Nothing, + _AccountAndUserInfo'userName = Prelude.Nothing, + _AccountAndUserInfo'accountName = Prelude.Nothing, + _AccountAndUserInfo'brokerageAccountNumber = Prelude.Nothing, + _AccountAndUserInfo'_unknownFields = []} + parseMessage + = let + loop :: + AccountAndUserInfo + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountAndUserInfo + loop x required'accountId required'userInfo + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) + ((if required'userInfo then (:) "user_info" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False required'userInfo + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_info" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"userInfo") y x) + required'accountId Prelude.False + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "reject_details" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"rejectDetails") y x) + required'accountId required'userInfo + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "reject_details_internal" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"rejectDetailsInternal") y x) + required'accountId required'userInfo + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"userId") y x) + required'accountId required'userInfo + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"userName") y x) + required'accountId required'userInfo + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountName") y x) + required'accountId required'userInfo + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_account_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAccountNumber") y x) + required'accountId required'userInfo + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId required'userInfo + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "AccountAndUserInfo" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"accountId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"userInfo") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'rejectDetails") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'rejectDetailsInternal") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'userId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'userName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'brokerageAccountNumber") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))))) +instance Control.DeepSeq.NFData AccountAndUserInfo where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountAndUserInfo'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountAndUserInfo'accountId x__) + (Control.DeepSeq.deepseq + (_AccountAndUserInfo'userInfo x__) + (Control.DeepSeq.deepseq + (_AccountAndUserInfo'rejectDetails x__) + (Control.DeepSeq.deepseq + (_AccountAndUserInfo'rejectDetailsInternal x__) + (Control.DeepSeq.deepseq + (_AccountAndUserInfo'userId x__) + (Control.DeepSeq.deepseq + (_AccountAndUserInfo'userName x__) + (Control.DeepSeq.deepseq + (_AccountAndUserInfo'accountName x__) + (Control.DeepSeq.deepseq + (_AccountAndUserInfo'brokerageAccountNumber x__) ())))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountAvailableExchangeGroupsRequest Data.Int.Int32@ -} +data AccountAvailableExchangeGroupsRequest + = AccountAvailableExchangeGroupsRequest'_constructor {_AccountAvailableExchangeGroupsRequest'accountId :: !Data.Int.Int32, + _AccountAvailableExchangeGroupsRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountAvailableExchangeGroupsRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountAvailableExchangeGroupsRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAvailableExchangeGroupsRequest'accountId + (\ x__ y__ + -> x__ {_AccountAvailableExchangeGroupsRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountAvailableExchangeGroupsRequest where + messageName _ + = Data.Text.pack + "traderouting_1.AccountAvailableExchangeGroupsRequest" + packedMessageDescriptor _ + = "\n\ + \%AccountAvailableExchangeGroupsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor AccountAvailableExchangeGroupsRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountAvailableExchangeGroupsRequest'_unknownFields + (\ x__ y__ + -> x__ + {_AccountAvailableExchangeGroupsRequest'_unknownFields = y__}) + defMessage + = AccountAvailableExchangeGroupsRequest'_constructor + {_AccountAvailableExchangeGroupsRequest'accountId = Data.ProtoLens.fieldDefault, + _AccountAvailableExchangeGroupsRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountAvailableExchangeGroupsRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountAvailableExchangeGroupsRequest + loop x required'accountId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountAvailableExchangeGroupsRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"accountId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountAvailableExchangeGroupsRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountAvailableExchangeGroupsRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountAvailableExchangeGroupsRequest'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountAvailableRouteListRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AccountAvailableRouteListRequest (Prelude.Maybe Data.Text.Text)@ -} +data AccountAvailableRouteListRequest + = AccountAvailableRouteListRequest'_constructor {_AccountAvailableRouteListRequest'accountId :: !(Prelude.Maybe Data.Text.Text), + _AccountAvailableRouteListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountAvailableRouteListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountAvailableRouteListRequest "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAvailableRouteListRequest'accountId + (\ x__ y__ + -> x__ {_AccountAvailableRouteListRequest'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountAvailableRouteListRequest "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAvailableRouteListRequest'accountId + (\ x__ y__ + -> x__ {_AccountAvailableRouteListRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountAvailableRouteListRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountAvailableRouteListRequest" + packedMessageDescriptor _ + = "\n\ + \ AccountAvailableRouteListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AccountAvailableRouteListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountAvailableRouteListRequest'_unknownFields + (\ x__ y__ + -> x__ {_AccountAvailableRouteListRequest'_unknownFields = y__}) + defMessage + = AccountAvailableRouteListRequest'_constructor + {_AccountAvailableRouteListRequest'accountId = Prelude.Nothing, + _AccountAvailableRouteListRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountAvailableRouteListRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AccountAvailableRouteListRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "AccountAvailableRouteListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountAvailableRouteListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountAvailableRouteListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountAvailableRouteListRequest'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.routes' @:: Lens' AccountAvailableRouteListResult [AvailableRoute]@ + * 'Proto.CMS.Traderouting1_Fields.vec'routes' @:: Lens' AccountAvailableRouteListResult (Data.Vector.Vector AvailableRoute)@ -} +data AccountAvailableRouteListResult + = AccountAvailableRouteListResult'_constructor {_AccountAvailableRouteListResult'routes :: !(Data.Vector.Vector AvailableRoute), + _AccountAvailableRouteListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountAvailableRouteListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountAvailableRouteListResult "routes" [AvailableRoute] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAvailableRouteListResult'routes + (\ x__ y__ -> x__ {_AccountAvailableRouteListResult'routes = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountAvailableRouteListResult "vec'routes" (Data.Vector.Vector AvailableRoute) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAvailableRouteListResult'routes + (\ x__ y__ -> x__ {_AccountAvailableRouteListResult'routes = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountAvailableRouteListResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountAvailableRouteListResult" + packedMessageDescriptor _ + = "\n\ + \\USAccountAvailableRouteListResult\DC26\n\ + \\ACKroutes\CAN\SOH \ETX(\v2\RS.traderouting_1.AvailableRouteR\ACKroutes" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + routes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "routes" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AvailableRoute) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"routes")) :: + Data.ProtoLens.FieldDescriptor AccountAvailableRouteListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, routes__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountAvailableRouteListResult'_unknownFields + (\ x__ y__ + -> x__ {_AccountAvailableRouteListResult'_unknownFields = y__}) + defMessage + = AccountAvailableRouteListResult'_constructor + {_AccountAvailableRouteListResult'routes = Data.Vector.Generic.empty, + _AccountAvailableRouteListResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountAvailableRouteListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AvailableRoute + -> Data.ProtoLens.Encoding.Bytes.Parser AccountAvailableRouteListResult + loop x mutable'routes + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'routes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'routes) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'routes") frozen'routes x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "routes" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'routes y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'routes + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'routes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'routes) + "AccountAvailableRouteListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'routes") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountAvailableRouteListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountAvailableRouteListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountAvailableRouteListResult'routes x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountAvailableServiceGroupListRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AccountAvailableServiceGroupListRequest (Prelude.Maybe Data.Text.Text)@ -} +data AccountAvailableServiceGroupListRequest + = AccountAvailableServiceGroupListRequest'_constructor {_AccountAvailableServiceGroupListRequest'accountId :: !(Prelude.Maybe Data.Text.Text), + _AccountAvailableServiceGroupListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountAvailableServiceGroupListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountAvailableServiceGroupListRequest "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAvailableServiceGroupListRequest'accountId + (\ x__ y__ + -> x__ {_AccountAvailableServiceGroupListRequest'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountAvailableServiceGroupListRequest "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAvailableServiceGroupListRequest'accountId + (\ x__ y__ + -> x__ {_AccountAvailableServiceGroupListRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountAvailableServiceGroupListRequest where + messageName _ + = Data.Text.pack + "traderouting_1.AccountAvailableServiceGroupListRequest" + packedMessageDescriptor _ + = "\n\ + \'AccountAvailableServiceGroupListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AccountAvailableServiceGroupListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountAvailableServiceGroupListRequest'_unknownFields + (\ x__ y__ + -> x__ + {_AccountAvailableServiceGroupListRequest'_unknownFields = y__}) + defMessage + = AccountAvailableServiceGroupListRequest'_constructor + {_AccountAvailableServiceGroupListRequest'accountId = Prelude.Nothing, + _AccountAvailableServiceGroupListRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountAvailableServiceGroupListRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AccountAvailableServiceGroupListRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "AccountAvailableServiceGroupListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountAvailableServiceGroupListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountAvailableServiceGroupListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountAvailableServiceGroupListRequest'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.serviceGroups' @:: Lens' AccountAvailableServiceGroupListResult [ServiceGroup]@ + * 'Proto.CMS.Traderouting1_Fields.vec'serviceGroups' @:: Lens' AccountAvailableServiceGroupListResult (Data.Vector.Vector ServiceGroup)@ -} +data AccountAvailableServiceGroupListResult + = AccountAvailableServiceGroupListResult'_constructor {_AccountAvailableServiceGroupListResult'serviceGroups :: !(Data.Vector.Vector ServiceGroup), + _AccountAvailableServiceGroupListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountAvailableServiceGroupListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountAvailableServiceGroupListResult "serviceGroups" [ServiceGroup] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAvailableServiceGroupListResult'serviceGroups + (\ x__ y__ + -> x__ + {_AccountAvailableServiceGroupListResult'serviceGroups = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountAvailableServiceGroupListResult "vec'serviceGroups" (Data.Vector.Vector ServiceGroup) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountAvailableServiceGroupListResult'serviceGroups + (\ x__ y__ + -> x__ + {_AccountAvailableServiceGroupListResult'serviceGroups = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountAvailableServiceGroupListResult where + messageName _ + = Data.Text.pack + "traderouting_1.AccountAvailableServiceGroupListResult" + packedMessageDescriptor _ + = "\n\ + \&AccountAvailableServiceGroupListResult\DC2C\n\ + \\SOservice_groups\CAN\SOH \ETX(\v2\FS.traderouting_1.ServiceGroupR\rserviceGroups" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + serviceGroups__field_descriptor + = Data.ProtoLens.FieldDescriptor + "service_groups" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ServiceGroup) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"serviceGroups")) :: + Data.ProtoLens.FieldDescriptor AccountAvailableServiceGroupListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, serviceGroups__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountAvailableServiceGroupListResult'_unknownFields + (\ x__ y__ + -> x__ + {_AccountAvailableServiceGroupListResult'_unknownFields = y__}) + defMessage + = AccountAvailableServiceGroupListResult'_constructor + {_AccountAvailableServiceGroupListResult'serviceGroups = Data.Vector.Generic.empty, + _AccountAvailableServiceGroupListResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountAvailableServiceGroupListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ServiceGroup + -> Data.ProtoLens.Encoding.Bytes.Parser AccountAvailableServiceGroupListResult + loop x mutable'serviceGroups + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'serviceGroups <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'serviceGroups) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'serviceGroups") + frozen'serviceGroups x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "service_groups" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'serviceGroups y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'serviceGroups + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'serviceGroups <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'serviceGroups) + "AccountAvailableServiceGroupListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'serviceGroups") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountAvailableServiceGroupListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountAvailableServiceGroupListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountAvailableServiceGroupListResult'serviceGroups x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' AccountCluster Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' AccountCluster (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageId' @:: Lens' AccountCluster Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'brokerageId' @:: Lens' AccountCluster (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.name' @:: Lens' AccountCluster Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'name' @:: Lens' AccountCluster (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.isRemoved' @:: Lens' AccountCluster Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isRemoved' @:: Lens' AccountCluster (Prelude.Maybe Prelude.Bool)@ -} +data AccountCluster + = AccountCluster'_constructor {_AccountCluster'id :: !(Prelude.Maybe Data.Text.Text), + _AccountCluster'brokerageId :: !(Prelude.Maybe Data.Text.Text), + _AccountCluster'name :: !(Prelude.Maybe Data.Text.Text), + _AccountCluster'isRemoved :: !(Prelude.Maybe Prelude.Bool), + _AccountCluster'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountCluster where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountCluster "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountCluster'id (\ x__ y__ -> x__ {_AccountCluster'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountCluster "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountCluster'id (\ x__ y__ -> x__ {_AccountCluster'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountCluster "brokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountCluster'brokerageId + (\ x__ y__ -> x__ {_AccountCluster'brokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountCluster "maybe'brokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountCluster'brokerageId + (\ x__ y__ -> x__ {_AccountCluster'brokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountCluster "name" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountCluster'name + (\ x__ y__ -> x__ {_AccountCluster'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountCluster "maybe'name" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountCluster'name + (\ x__ y__ -> x__ {_AccountCluster'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountCluster "isRemoved" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountCluster'isRemoved + (\ x__ y__ -> x__ {_AccountCluster'isRemoved = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountCluster "maybe'isRemoved" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountCluster'isRemoved + (\ x__ y__ -> x__ {_AccountCluster'isRemoved = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountCluster where + messageName _ = Data.Text.pack "traderouting_1.AccountCluster" + packedMessageDescriptor _ + = "\n\ + \\SOAccountCluster\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2!\n\ + \\fbrokerage_id\CAN\STX \SOH(\tR\vbrokerageId\DC2\DC2\n\ + \\EOTname\CAN\ETX \SOH(\tR\EOTname\DC2\GS\n\ + \\n\ + \is_removed\CAN\EOT \SOH(\bR\tisRemoved" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor AccountCluster + brokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageId")) :: + Data.ProtoLens.FieldDescriptor AccountCluster + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor AccountCluster + isRemoved__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isRemoved")) :: + Data.ProtoLens.FieldDescriptor AccountCluster + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, brokerageId__field_descriptor), + (Data.ProtoLens.Tag 3, name__field_descriptor), + (Data.ProtoLens.Tag 4, isRemoved__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountCluster'_unknownFields + (\ x__ y__ -> x__ {_AccountCluster'_unknownFields = y__}) + defMessage + = AccountCluster'_constructor + {_AccountCluster'id = Prelude.Nothing, + _AccountCluster'brokerageId = Prelude.Nothing, + _AccountCluster'name = Prelude.Nothing, + _AccountCluster'isRemoved = Prelude.Nothing, + _AccountCluster'_unknownFields = []} + parseMessage + = let + loop :: + AccountCluster + -> Data.ProtoLens.Encoding.Bytes.Parser AccountCluster + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"brokerageId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "name" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_removed" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isRemoved") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountCluster" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isRemoved") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData AccountCluster where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountCluster'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountCluster'id x__) + (Control.DeepSeq.deepseq + (_AccountCluster'brokerageId x__) + (Control.DeepSeq.deepseq + (_AccountCluster'name x__) + (Control.DeepSeq.deepseq (_AccountCluster'isRemoved x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clearedFields' @:: Lens' AccountClusterPriceOffset [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clearedFields' @:: Lens' AccountClusterPriceOffset (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.commodityId' @:: Lens' AccountClusterPriceOffset Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'commodityId' @:: Lens' AccountClusterPriceOffset (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.instrumentTypeId' @:: Lens' AccountClusterPriceOffset Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'instrumentTypeId' @:: Lens' AccountClusterPriceOffset (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.priceOffsetTicks' @:: Lens' AccountClusterPriceOffset Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'priceOffsetTicks' @:: Lens' AccountClusterPriceOffset (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.hedgeOffsetTicks' @:: Lens' AccountClusterPriceOffset Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'hedgeOffsetTicks' @:: Lens' AccountClusterPriceOffset (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.hedgeExecInstruction' @:: Lens' AccountClusterPriceOffset [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'hedgeExecInstruction' @:: Lens' AccountClusterPriceOffset (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.icebergVisibleQtyPercent' @:: Lens' AccountClusterPriceOffset Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'icebergVisibleQtyPercent' @:: Lens' AccountClusterPriceOffset (Prelude.Maybe Data.Word.Word32)@ -} +data AccountClusterPriceOffset + = AccountClusterPriceOffset'_constructor {_AccountClusterPriceOffset'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _AccountClusterPriceOffset'commodityId :: !(Prelude.Maybe Data.Text.Text), + _AccountClusterPriceOffset'instrumentTypeId :: !(Prelude.Maybe Data.Int.Int32), + _AccountClusterPriceOffset'priceOffsetTicks :: !(Prelude.Maybe Data.Int.Int32), + _AccountClusterPriceOffset'hedgeOffsetTicks :: !(Prelude.Maybe Data.Int.Int32), + _AccountClusterPriceOffset'hedgeExecInstruction :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _AccountClusterPriceOffset'icebergVisibleQtyPercent :: !(Prelude.Maybe Data.Word.Word32), + _AccountClusterPriceOffset'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountClusterPriceOffset where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'clearedFields + (\ x__ y__ + -> x__ {_AccountClusterPriceOffset'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'clearedFields + (\ x__ y__ + -> x__ {_AccountClusterPriceOffset'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "commodityId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'commodityId + (\ x__ y__ -> x__ {_AccountClusterPriceOffset'commodityId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "maybe'commodityId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'commodityId + (\ x__ y__ -> x__ {_AccountClusterPriceOffset'commodityId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "instrumentTypeId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'instrumentTypeId + (\ x__ y__ + -> x__ {_AccountClusterPriceOffset'instrumentTypeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "maybe'instrumentTypeId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'instrumentTypeId + (\ x__ y__ + -> x__ {_AccountClusterPriceOffset'instrumentTypeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "priceOffsetTicks" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'priceOffsetTicks + (\ x__ y__ + -> x__ {_AccountClusterPriceOffset'priceOffsetTicks = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "maybe'priceOffsetTicks" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'priceOffsetTicks + (\ x__ y__ + -> x__ {_AccountClusterPriceOffset'priceOffsetTicks = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "hedgeOffsetTicks" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'hedgeOffsetTicks + (\ x__ y__ + -> x__ {_AccountClusterPriceOffset'hedgeOffsetTicks = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "maybe'hedgeOffsetTicks" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'hedgeOffsetTicks + (\ x__ y__ + -> x__ {_AccountClusterPriceOffset'hedgeOffsetTicks = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "hedgeExecInstruction" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'hedgeExecInstruction + (\ x__ y__ + -> x__ {_AccountClusterPriceOffset'hedgeExecInstruction = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "vec'hedgeExecInstruction" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'hedgeExecInstruction + (\ x__ y__ + -> x__ {_AccountClusterPriceOffset'hedgeExecInstruction = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "icebergVisibleQtyPercent" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'icebergVisibleQtyPercent + (\ x__ y__ + -> x__ + {_AccountClusterPriceOffset'icebergVisibleQtyPercent = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountClusterPriceOffset "maybe'icebergVisibleQtyPercent" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'icebergVisibleQtyPercent + (\ x__ y__ + -> x__ + {_AccountClusterPriceOffset'icebergVisibleQtyPercent = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountClusterPriceOffset where + messageName _ + = Data.Text.pack "traderouting_1.AccountClusterPriceOffset" + packedMessageDescriptor _ + = "\n\ + \\EMAccountClusterPriceOffset\DC2%\n\ + \\SOcleared_fields\CAN\a \ETX(\rR\rclearedFields\DC2!\n\ + \\fcommodity_id\CAN\SOH \SOH(\tR\vcommodityId\DC2,\n\ + \\DC2instrument_type_id\CAN\STX \SOH(\DC1R\DLEinstrumentTypeId\DC2,\n\ + \\DC2price_offset_ticks\CAN\ETX \SOH(\DC1R\DLEpriceOffsetTicks\DC2,\n\ + \\DC2hedge_offset_ticks\CAN\EOT \SOH(\DC1R\DLEhedgeOffsetTicks\DC24\n\ + \\SYNhedge_exec_instruction\CAN\ENQ \ETX(\rR\DC4hedgeExecInstruction\DC2=\n\ + \\ESCiceberg_visible_qty_percent\CAN\ACK \SOH(\rR\CANicebergVisibleQtyPercent" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor AccountClusterPriceOffset + commodityId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "commodity_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'commodityId")) :: + Data.ProtoLens.FieldDescriptor AccountClusterPriceOffset + instrumentTypeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "instrument_type_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'instrumentTypeId")) :: + Data.ProtoLens.FieldDescriptor AccountClusterPriceOffset + priceOffsetTicks__field_descriptor + = Data.ProtoLens.FieldDescriptor + "price_offset_ticks" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'priceOffsetTicks")) :: + Data.ProtoLens.FieldDescriptor AccountClusterPriceOffset + hedgeOffsetTicks__field_descriptor + = Data.ProtoLens.FieldDescriptor + "hedge_offset_ticks" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'hedgeOffsetTicks")) :: + Data.ProtoLens.FieldDescriptor AccountClusterPriceOffset + hedgeExecInstruction__field_descriptor + = Data.ProtoLens.FieldDescriptor + "hedge_exec_instruction" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"hedgeExecInstruction")) :: + Data.ProtoLens.FieldDescriptor AccountClusterPriceOffset + icebergVisibleQtyPercent__field_descriptor + = Data.ProtoLens.FieldDescriptor + "iceberg_visible_qty_percent" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'icebergVisibleQtyPercent")) :: + Data.ProtoLens.FieldDescriptor AccountClusterPriceOffset + in + Data.Map.fromList + [(Data.ProtoLens.Tag 7, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, commodityId__field_descriptor), + (Data.ProtoLens.Tag 2, instrumentTypeId__field_descriptor), + (Data.ProtoLens.Tag 3, priceOffsetTicks__field_descriptor), + (Data.ProtoLens.Tag 4, hedgeOffsetTicks__field_descriptor), + (Data.ProtoLens.Tag 5, hedgeExecInstruction__field_descriptor), + (Data.ProtoLens.Tag 6, icebergVisibleQtyPercent__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountClusterPriceOffset'_unknownFields + (\ x__ y__ + -> x__ {_AccountClusterPriceOffset'_unknownFields = y__}) + defMessage + = AccountClusterPriceOffset'_constructor + {_AccountClusterPriceOffset'clearedFields = Data.Vector.Generic.empty, + _AccountClusterPriceOffset'commodityId = Prelude.Nothing, + _AccountClusterPriceOffset'instrumentTypeId = Prelude.Nothing, + _AccountClusterPriceOffset'priceOffsetTicks = Prelude.Nothing, + _AccountClusterPriceOffset'hedgeOffsetTicks = Prelude.Nothing, + _AccountClusterPriceOffset'hedgeExecInstruction = Data.Vector.Generic.empty, + _AccountClusterPriceOffset'icebergVisibleQtyPercent = Prelude.Nothing, + _AccountClusterPriceOffset'_unknownFields = []} + parseMessage + = let + loop :: + AccountClusterPriceOffset + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser AccountClusterPriceOffset + loop x mutable'clearedFields mutable'hedgeExecInstruction + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + frozen'hedgeExecInstruction <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'hedgeExecInstruction) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'hedgeExecInstruction") + frozen'hedgeExecInstruction x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 56 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x v mutable'hedgeExecInstruction + 58 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x y mutable'hedgeExecInstruction + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "commodity_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"commodityId") y x) + mutable'clearedFields mutable'hedgeExecInstruction + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "instrument_type_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"instrumentTypeId") y x) + mutable'clearedFields mutable'hedgeExecInstruction + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "price_offset_ticks" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"priceOffsetTicks") y x) + mutable'clearedFields mutable'hedgeExecInstruction + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "hedge_offset_ticks" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"hedgeOffsetTicks") y x) + mutable'clearedFields mutable'hedgeExecInstruction + 40 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "hedge_exec_instruction" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'hedgeExecInstruction y) + loop x mutable'clearedFields v + 42 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "hedge_exec_instruction" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'hedgeExecInstruction) + loop x mutable'clearedFields y + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "iceberg_visible_qty_percent" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"icebergVisibleQtyPercent") y x) + mutable'clearedFields mutable'hedgeExecInstruction + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'clearedFields mutable'hedgeExecInstruction + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'hedgeExecInstruction <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'clearedFields + mutable'hedgeExecInstruction) + "AccountClusterPriceOffset" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'commodityId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'instrumentTypeId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'priceOffsetTicks") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'hedgeOffsetTicks") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'hedgeExecInstruction") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'icebergVisibleQtyPercent") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData AccountClusterPriceOffset where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountClusterPriceOffset'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountClusterPriceOffset'clearedFields x__) + (Control.DeepSeq.deepseq + (_AccountClusterPriceOffset'commodityId x__) + (Control.DeepSeq.deepseq + (_AccountClusterPriceOffset'instrumentTypeId x__) + (Control.DeepSeq.deepseq + (_AccountClusterPriceOffset'priceOffsetTicks x__) + (Control.DeepSeq.deepseq + (_AccountClusterPriceOffset'hedgeOffsetTicks x__) + (Control.DeepSeq.deepseq + (_AccountClusterPriceOffset'hedgeExecInstruction x__) + (Control.DeepSeq.deepseq + (_AccountClusterPriceOffset'icebergVisibleQtyPercent x__) + ()))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountClusterId' @:: Lens' AccountClusterRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountClusterId' @:: Lens' AccountClusterRequest (Prelude.Maybe Data.Text.Text)@ -} +data AccountClusterRequest + = AccountClusterRequest'_constructor {_AccountClusterRequest'accountClusterId :: !(Prelude.Maybe Data.Text.Text), + _AccountClusterRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountClusterRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountClusterRequest "accountClusterId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterRequest'accountClusterId + (\ x__ y__ -> x__ {_AccountClusterRequest'accountClusterId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountClusterRequest "maybe'accountClusterId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterRequest'accountClusterId + (\ x__ y__ -> x__ {_AccountClusterRequest'accountClusterId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountClusterRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountClusterRequest" + packedMessageDescriptor _ + = "\n\ + \\NAKAccountClusterRequest\DC2,\n\ + \\DC2account_cluster_id\CAN\SOH \SOH(\tR\DLEaccountClusterId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountClusterId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_cluster_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountClusterId")) :: + Data.ProtoLens.FieldDescriptor AccountClusterRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountClusterId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountClusterRequest'_unknownFields + (\ x__ y__ -> x__ {_AccountClusterRequest'_unknownFields = y__}) + defMessage + = AccountClusterRequest'_constructor + {_AccountClusterRequest'accountClusterId = Prelude.Nothing, + _AccountClusterRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountClusterRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AccountClusterRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_cluster_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountClusterId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountClusterRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountClusterId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountClusterRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountClusterRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountClusterRequest'accountClusterId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.obsoleteAccountCluster' @:: Lens' AccountClusterResult AccountCluster@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteAccountCluster' @:: Lens' AccountClusterResult (Prelude.Maybe AccountCluster)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteAccountClusterPriceOffsets' @:: Lens' AccountClusterResult [AccountClusterPriceOffset]@ + * 'Proto.CMS.Traderouting1_Fields.vec'obsoleteAccountClusterPriceOffsets' @:: Lens' AccountClusterResult (Data.Vector.Vector AccountClusterPriceOffset)@ -} +data AccountClusterResult + = AccountClusterResult'_constructor {_AccountClusterResult'obsoleteAccountCluster :: !(Prelude.Maybe AccountCluster), + _AccountClusterResult'obsoleteAccountClusterPriceOffsets :: !(Data.Vector.Vector AccountClusterPriceOffset), + _AccountClusterResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountClusterResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountClusterResult "obsoleteAccountCluster" AccountCluster where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterResult'obsoleteAccountCluster + (\ x__ y__ + -> x__ {_AccountClusterResult'obsoleteAccountCluster = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountClusterResult "maybe'obsoleteAccountCluster" (Prelude.Maybe AccountCluster) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterResult'obsoleteAccountCluster + (\ x__ y__ + -> x__ {_AccountClusterResult'obsoleteAccountCluster = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountClusterResult "obsoleteAccountClusterPriceOffsets" [AccountClusterPriceOffset] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterResult'obsoleteAccountClusterPriceOffsets + (\ x__ y__ + -> x__ + {_AccountClusterResult'obsoleteAccountClusterPriceOffsets = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountClusterResult "vec'obsoleteAccountClusterPriceOffsets" (Data.Vector.Vector AccountClusterPriceOffset) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountClusterResult'obsoleteAccountClusterPriceOffsets + (\ x__ y__ + -> x__ + {_AccountClusterResult'obsoleteAccountClusterPriceOffsets = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountClusterResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountClusterResult" + packedMessageDescriptor _ + = "\n\ + \\DC4AccountClusterResult\DC2\\\n\ + \\CANobsolete_account_cluster\CAN\SOH \SOH(\v2\RS.traderouting_1.AccountClusterR\SYNobsoleteAccountClusterB\STX\CAN\SOH\DC2\129\SOH\n\ + \&obsolete_account_cluster_price_offsets\CAN\STX \ETX(\v2).traderouting_1.AccountClusterPriceOffsetR\"obsoleteAccountClusterPriceOffsetsB\STX\CAN\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteAccountCluster__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_account_cluster" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountCluster) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteAccountCluster")) :: + Data.ProtoLens.FieldDescriptor AccountClusterResult + obsoleteAccountClusterPriceOffsets__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_account_cluster_price_offsets" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountClusterPriceOffset) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field + @"obsoleteAccountClusterPriceOffsets")) :: + Data.ProtoLens.FieldDescriptor AccountClusterResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteAccountCluster__field_descriptor), + (Data.ProtoLens.Tag 2, + obsoleteAccountClusterPriceOffsets__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountClusterResult'_unknownFields + (\ x__ y__ -> x__ {_AccountClusterResult'_unknownFields = y__}) + defMessage + = AccountClusterResult'_constructor + {_AccountClusterResult'obsoleteAccountCluster = Prelude.Nothing, + _AccountClusterResult'obsoleteAccountClusterPriceOffsets = Data.Vector.Generic.empty, + _AccountClusterResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountClusterResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountClusterPriceOffset + -> Data.ProtoLens.Encoding.Bytes.Parser AccountClusterResult + loop x mutable'obsoleteAccountClusterPriceOffsets + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'obsoleteAccountClusterPriceOffsets <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'obsoleteAccountClusterPriceOffsets) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"vec'obsoleteAccountClusterPriceOffsets") + frozen'obsoleteAccountClusterPriceOffsets x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_account_cluster" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteAccountCluster") y x) + mutable'obsoleteAccountClusterPriceOffsets + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "obsolete_account_cluster_price_offsets" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'obsoleteAccountClusterPriceOffsets y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'obsoleteAccountClusterPriceOffsets + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'obsoleteAccountClusterPriceOffsets <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage + mutable'obsoleteAccountClusterPriceOffsets) + "AccountClusterResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteAccountCluster") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'obsoleteAccountClusterPriceOffsets") + _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData AccountClusterResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountClusterResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountClusterResult'obsoleteAccountCluster x__) + (Control.DeepSeq.deepseq + (_AccountClusterResult'obsoleteAccountClusterPriceOffsets x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountCollateralRequest Data.Int.Int32@ -} +data AccountCollateralRequest + = AccountCollateralRequest'_constructor {_AccountCollateralRequest'accountId :: !Data.Int.Int32, + _AccountCollateralRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountCollateralRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountCollateralRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountCollateralRequest'accountId + (\ x__ y__ -> x__ {_AccountCollateralRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountCollateralRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountCollateralRequest" + packedMessageDescriptor _ + = "\n\ + \\CANAccountCollateralRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor AccountCollateralRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountCollateralRequest'_unknownFields + (\ x__ y__ -> x__ {_AccountCollateralRequest'_unknownFields = y__}) + defMessage + = AccountCollateralRequest'_constructor + {_AccountCollateralRequest'accountId = Data.ProtoLens.fieldDefault, + _AccountCollateralRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountCollateralRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountCollateralRequest + loop x required'accountId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountCollateralRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"accountId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountCollateralRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountCollateralRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountCollateralRequest'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.collateral' @:: Lens' AccountCollateralResult Collateral@ -} +data AccountCollateralResult + = AccountCollateralResult'_constructor {_AccountCollateralResult'collateral :: !Collateral, + _AccountCollateralResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountCollateralResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountCollateralResult "collateral" Collateral where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountCollateralResult'collateral + (\ x__ y__ -> x__ {_AccountCollateralResult'collateral = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountCollateralResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountCollateralResult" + packedMessageDescriptor _ + = "\n\ + \\ETBAccountCollateralResult\DC2:\n\ + \\n\ + \collateral\CAN\SOH \STX(\v2\SUB.traderouting_1.CollateralR\n\ + \collateral" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + collateral__field_descriptor + = Data.ProtoLens.FieldDescriptor + "collateral" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Collateral) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"collateral")) :: + Data.ProtoLens.FieldDescriptor AccountCollateralResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, collateral__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountCollateralResult'_unknownFields + (\ x__ y__ -> x__ {_AccountCollateralResult'_unknownFields = y__}) + defMessage + = AccountCollateralResult'_constructor + {_AccountCollateralResult'collateral = Data.ProtoLens.defMessage, + _AccountCollateralResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountCollateralResult + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountCollateralResult + loop x required'collateral + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'collateral then (:) "collateral" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "collateral" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"collateral") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'collateral + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountCollateralResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view (Data.ProtoLens.Field.field @"collateral") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountCollateralResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountCollateralResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountCollateralResult'collateral x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountEquityRequest Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.currency' @:: Lens' AccountEquityRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'currency' @:: Lens' AccountEquityRequest (Prelude.Maybe Data.Text.Text)@ -} +data AccountEquityRequest + = AccountEquityRequest'_constructor {_AccountEquityRequest'accountId :: !Data.Int.Int32, + _AccountEquityRequest'currency :: !(Prelude.Maybe Data.Text.Text), + _AccountEquityRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountEquityRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountEquityRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountEquityRequest'accountId + (\ x__ y__ -> x__ {_AccountEquityRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountEquityRequest "currency" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountEquityRequest'currency + (\ x__ y__ -> x__ {_AccountEquityRequest'currency = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountEquityRequest "maybe'currency" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountEquityRequest'currency + (\ x__ y__ -> x__ {_AccountEquityRequest'currency = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountEquityRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountEquityRequest" + packedMessageDescriptor _ + = "\n\ + \\DC4AccountEquityRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\DC2\SUB\n\ + \\bcurrency\CAN\STX \SOH(\tR\bcurrency" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor AccountEquityRequest + currency__field_descriptor + = Data.ProtoLens.FieldDescriptor + "currency" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'currency")) :: + Data.ProtoLens.FieldDescriptor AccountEquityRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, currency__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountEquityRequest'_unknownFields + (\ x__ y__ -> x__ {_AccountEquityRequest'_unknownFields = y__}) + defMessage + = AccountEquityRequest'_constructor + {_AccountEquityRequest'accountId = Data.ProtoLens.fieldDefault, + _AccountEquityRequest'currency = Prelude.Nothing, + _AccountEquityRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountEquityRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountEquityRequest + loop x required'accountId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "currency" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"currency") y x) + required'accountId + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountEquityRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"accountId") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'currency") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData AccountEquityRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountEquityRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountEquityRequest'accountId x__) + (Control.DeepSeq.deepseq (_AccountEquityRequest'currency x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.equity' @:: Lens' AccountEquityResult Equity@ -} +data AccountEquityResult + = AccountEquityResult'_constructor {_AccountEquityResult'equity :: !Equity, + _AccountEquityResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountEquityResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountEquityResult "equity" Equity where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountEquityResult'equity + (\ x__ y__ -> x__ {_AccountEquityResult'equity = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountEquityResult where + messageName _ = Data.Text.pack "traderouting_1.AccountEquityResult" + packedMessageDescriptor _ + = "\n\ + \\DC3AccountEquityResult\DC2.\n\ + \\ACKequity\CAN\SOH \STX(\v2\SYN.traderouting_1.EquityR\ACKequity" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + equity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "equity" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Equity) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"equity")) :: + Data.ProtoLens.FieldDescriptor AccountEquityResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, equity__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountEquityResult'_unknownFields + (\ x__ y__ -> x__ {_AccountEquityResult'_unknownFields = y__}) + defMessage + = AccountEquityResult'_constructor + {_AccountEquityResult'equity = Data.ProtoLens.defMessage, + _AccountEquityResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountEquityResult + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountEquityResult + loop x required'equity + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing = (if required'equity then (:) "equity" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "equity" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"equity") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'equity + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountEquityResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view (Data.ProtoLens.Field.field @"equity") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountEquityResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountEquityResult'_unknownFields x__) + (Control.DeepSeq.deepseq (_AccountEquityResult'equity x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.exchangeGroup' @:: Lens' AccountExchangeGroupsResult [ExchangeGroup]@ + * 'Proto.CMS.Traderouting1_Fields.vec'exchangeGroup' @:: Lens' AccountExchangeGroupsResult (Data.Vector.Vector ExchangeGroup)@ + * 'Proto.CMS.Traderouting1_Fields.instrumentType' @:: Lens' AccountExchangeGroupsResult [InstrumentType]@ + * 'Proto.CMS.Traderouting1_Fields.vec'instrumentType' @:: Lens' AccountExchangeGroupsResult (Data.Vector.Vector InstrumentType)@ -} +data AccountExchangeGroupsResult + = AccountExchangeGroupsResult'_constructor {_AccountExchangeGroupsResult'exchangeGroup :: !(Data.Vector.Vector ExchangeGroup), + _AccountExchangeGroupsResult'instrumentType :: !(Data.Vector.Vector InstrumentType), + _AccountExchangeGroupsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountExchangeGroupsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountExchangeGroupsResult "exchangeGroup" [ExchangeGroup] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountExchangeGroupsResult'exchangeGroup + (\ x__ y__ + -> x__ {_AccountExchangeGroupsResult'exchangeGroup = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountExchangeGroupsResult "vec'exchangeGroup" (Data.Vector.Vector ExchangeGroup) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountExchangeGroupsResult'exchangeGroup + (\ x__ y__ + -> x__ {_AccountExchangeGroupsResult'exchangeGroup = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountExchangeGroupsResult "instrumentType" [InstrumentType] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountExchangeGroupsResult'instrumentType + (\ x__ y__ + -> x__ {_AccountExchangeGroupsResult'instrumentType = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountExchangeGroupsResult "vec'instrumentType" (Data.Vector.Vector InstrumentType) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountExchangeGroupsResult'instrumentType + (\ x__ y__ + -> x__ {_AccountExchangeGroupsResult'instrumentType = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountExchangeGroupsResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountExchangeGroupsResult" + packedMessageDescriptor _ + = "\n\ + \\ESCAccountExchangeGroupsResult\DC2D\n\ + \\SOexchange_group\CAN\SOH \ETX(\v2\GS.traderouting_1.ExchangeGroupR\rexchangeGroup\DC2G\n\ + \\SIinstrument_type\CAN\STX \ETX(\v2\RS.traderouting_1.InstrumentTypeR\SOinstrumentType" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + exchangeGroup__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exchange_group" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ExchangeGroup) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"exchangeGroup")) :: + Data.ProtoLens.FieldDescriptor AccountExchangeGroupsResult + instrumentType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "instrument_type" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor InstrumentType) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"instrumentType")) :: + Data.ProtoLens.FieldDescriptor AccountExchangeGroupsResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, exchangeGroup__field_descriptor), + (Data.ProtoLens.Tag 2, instrumentType__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountExchangeGroupsResult'_unknownFields + (\ x__ y__ + -> x__ {_AccountExchangeGroupsResult'_unknownFields = y__}) + defMessage + = AccountExchangeGroupsResult'_constructor + {_AccountExchangeGroupsResult'exchangeGroup = Data.Vector.Generic.empty, + _AccountExchangeGroupsResult'instrumentType = Data.Vector.Generic.empty, + _AccountExchangeGroupsResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountExchangeGroupsResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ExchangeGroup + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld InstrumentType + -> Data.ProtoLens.Encoding.Bytes.Parser AccountExchangeGroupsResult + loop x mutable'exchangeGroup mutable'instrumentType + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'exchangeGroup <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'exchangeGroup) + frozen'instrumentType <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'instrumentType) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'exchangeGroup") + frozen'exchangeGroup + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'instrumentType") + frozen'instrumentType x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "exchange_group" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'exchangeGroup y) + loop x v mutable'instrumentType + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "instrument_type" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'instrumentType y) + loop x mutable'exchangeGroup v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'exchangeGroup mutable'instrumentType + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'exchangeGroup <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'instrumentType <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'exchangeGroup + mutable'instrumentType) + "AccountExchangeGroupsResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'exchangeGroup") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'instrumentType") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData AccountExchangeGroupsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountExchangeGroupsResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountExchangeGroupsResult'exchangeGroup x__) + (Control.DeepSeq.deepseq + (_AccountExchangeGroupsResult'instrumentType x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.groupId' @:: Lens' AccountGroup Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'groupId' @:: Lens' AccountGroup (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.masterAccountId' @:: Lens' AccountGroup Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'masterAccountId' @:: Lens' AccountGroup (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.relationType' @:: Lens' AccountGroup Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'relationType' @:: Lens' AccountGroup (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.subAccounts' @:: Lens' AccountGroup [SubAccount]@ + * 'Proto.CMS.Traderouting1_Fields.vec'subAccounts' @:: Lens' AccountGroup (Data.Vector.Vector SubAccount)@ -} +data AccountGroup + = AccountGroup'_constructor {_AccountGroup'groupId :: !(Prelude.Maybe Data.Text.Text), + _AccountGroup'masterAccountId :: !(Prelude.Maybe Data.Text.Text), + _AccountGroup'relationType :: !(Prelude.Maybe Data.Word.Word32), + _AccountGroup'subAccounts :: !(Data.Vector.Vector SubAccount), + _AccountGroup'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountGroup where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountGroup "groupId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroup'groupId + (\ x__ y__ -> x__ {_AccountGroup'groupId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountGroup "maybe'groupId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroup'groupId + (\ x__ y__ -> x__ {_AccountGroup'groupId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountGroup "masterAccountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroup'masterAccountId + (\ x__ y__ -> x__ {_AccountGroup'masterAccountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountGroup "maybe'masterAccountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroup'masterAccountId + (\ x__ y__ -> x__ {_AccountGroup'masterAccountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountGroup "relationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroup'relationType + (\ x__ y__ -> x__ {_AccountGroup'relationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountGroup "maybe'relationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroup'relationType + (\ x__ y__ -> x__ {_AccountGroup'relationType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountGroup "subAccounts" [SubAccount] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroup'subAccounts + (\ x__ y__ -> x__ {_AccountGroup'subAccounts = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountGroup "vec'subAccounts" (Data.Vector.Vector SubAccount) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroup'subAccounts + (\ x__ y__ -> x__ {_AccountGroup'subAccounts = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountGroup where + messageName _ = Data.Text.pack "traderouting_1.AccountGroup" + packedMessageDescriptor _ + = "\n\ + \\fAccountGroup\DC2\EM\n\ + \\bgroup_id\CAN\SOH \SOH(\tR\agroupId\DC2*\n\ + \\DC1master_account_id\CAN\STX \SOH(\tR\SImasterAccountId\DC2#\n\ + \\rrelation_type\CAN\ETX \SOH(\rR\frelationType\DC2=\n\ + \\fsub_accounts\CAN\EOT \ETX(\v2\SUB.traderouting_1.SubAccountR\vsubAccounts\"b\n\ + \\fRelationType\DC2\US\n\ + \\ESCMARGIN_INDEPENDENTLY_BORROW\DLE\SOH\DC2\FS\n\ + \\CANMARGIN_INDEPENDENTLY_SUM\DLE\STX\DC2\DC3\n\ + \\SIMARGIN_TOGETHER\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + groupId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "group_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'groupId")) :: + Data.ProtoLens.FieldDescriptor AccountGroup + masterAccountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "master_account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'masterAccountId")) :: + Data.ProtoLens.FieldDescriptor AccountGroup + relationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "relation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'relationType")) :: + Data.ProtoLens.FieldDescriptor AccountGroup + subAccounts__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sub_accounts" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SubAccount) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"subAccounts")) :: + Data.ProtoLens.FieldDescriptor AccountGroup + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, groupId__field_descriptor), + (Data.ProtoLens.Tag 2, masterAccountId__field_descriptor), + (Data.ProtoLens.Tag 3, relationType__field_descriptor), + (Data.ProtoLens.Tag 4, subAccounts__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountGroup'_unknownFields + (\ x__ y__ -> x__ {_AccountGroup'_unknownFields = y__}) + defMessage + = AccountGroup'_constructor + {_AccountGroup'groupId = Prelude.Nothing, + _AccountGroup'masterAccountId = Prelude.Nothing, + _AccountGroup'relationType = Prelude.Nothing, + _AccountGroup'subAccounts = Data.Vector.Generic.empty, + _AccountGroup'_unknownFields = []} + parseMessage + = let + loop :: + AccountGroup + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld SubAccount + -> Data.ProtoLens.Encoding.Bytes.Parser AccountGroup + loop x mutable'subAccounts + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'subAccounts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'subAccounts) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'subAccounts") frozen'subAccounts + x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "group_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"groupId") y x) + mutable'subAccounts + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "master_account_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"masterAccountId") y x) + mutable'subAccounts + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "relation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"relationType") y x) + mutable'subAccounts + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "sub_accounts" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'subAccounts y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'subAccounts + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'subAccounts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'subAccounts) + "AccountGroup" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'groupId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'masterAccountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'relationType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'subAccounts") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData AccountGroup where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountGroup'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountGroup'groupId x__) + (Control.DeepSeq.deepseq + (_AccountGroup'masterAccountId x__) + (Control.DeepSeq.deepseq + (_AccountGroup'relationType x__) + (Control.DeepSeq.deepseq (_AccountGroup'subAccounts x__) ())))) +data AccountGroup'RelationType + = AccountGroup'MARGIN_INDEPENDENTLY_BORROW | + AccountGroup'MARGIN_INDEPENDENTLY_SUM | + AccountGroup'MARGIN_TOGETHER + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum AccountGroup'RelationType where + maybeToEnum 1 + = Prelude.Just AccountGroup'MARGIN_INDEPENDENTLY_BORROW + maybeToEnum 2 = Prelude.Just AccountGroup'MARGIN_INDEPENDENTLY_SUM + maybeToEnum 3 = Prelude.Just AccountGroup'MARGIN_TOGETHER + maybeToEnum _ = Prelude.Nothing + showEnum AccountGroup'MARGIN_INDEPENDENTLY_BORROW + = "MARGIN_INDEPENDENTLY_BORROW" + showEnum AccountGroup'MARGIN_INDEPENDENTLY_SUM + = "MARGIN_INDEPENDENTLY_SUM" + showEnum AccountGroup'MARGIN_TOGETHER = "MARGIN_TOGETHER" + readEnum k + | (Prelude.==) k "MARGIN_INDEPENDENTLY_BORROW" + = Prelude.Just AccountGroup'MARGIN_INDEPENDENTLY_BORROW + | (Prelude.==) k "MARGIN_INDEPENDENTLY_SUM" + = Prelude.Just AccountGroup'MARGIN_INDEPENDENTLY_SUM + | (Prelude.==) k "MARGIN_TOGETHER" + = Prelude.Just AccountGroup'MARGIN_TOGETHER + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded AccountGroup'RelationType where + minBound = AccountGroup'MARGIN_INDEPENDENTLY_BORROW + maxBound = AccountGroup'MARGIN_TOGETHER +instance Prelude.Enum AccountGroup'RelationType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum RelationType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum AccountGroup'MARGIN_INDEPENDENTLY_BORROW = 1 + fromEnum AccountGroup'MARGIN_INDEPENDENTLY_SUM = 2 + fromEnum AccountGroup'MARGIN_TOGETHER = 3 + succ AccountGroup'MARGIN_TOGETHER + = Prelude.error + "AccountGroup'RelationType.succ: bad argument AccountGroup'MARGIN_TOGETHER. This value would be out of bounds." + succ AccountGroup'MARGIN_INDEPENDENTLY_BORROW + = AccountGroup'MARGIN_INDEPENDENTLY_SUM + succ AccountGroup'MARGIN_INDEPENDENTLY_SUM + = AccountGroup'MARGIN_TOGETHER + pred AccountGroup'MARGIN_INDEPENDENTLY_BORROW + = Prelude.error + "AccountGroup'RelationType.pred: bad argument AccountGroup'MARGIN_INDEPENDENTLY_BORROW. This value would be out of bounds." + pred AccountGroup'MARGIN_INDEPENDENTLY_SUM + = AccountGroup'MARGIN_INDEPENDENTLY_BORROW + pred AccountGroup'MARGIN_TOGETHER + = AccountGroup'MARGIN_INDEPENDENTLY_SUM + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault AccountGroup'RelationType where + fieldDefault = AccountGroup'MARGIN_INDEPENDENTLY_BORROW +instance Control.DeepSeq.NFData AccountGroup'RelationType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountGroupRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AccountGroupRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountGroupId' @:: Lens' AccountGroupRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountGroupId' @:: Lens' AccountGroupRequest (Prelude.Maybe Data.Text.Text)@ -} +data AccountGroupRequest + = AccountGroupRequest'_constructor {_AccountGroupRequest'accountId :: !(Prelude.Maybe Data.Text.Text), + _AccountGroupRequest'accountGroupId :: !(Prelude.Maybe Data.Text.Text), + _AccountGroupRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountGroupRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountGroupRequest "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroupRequest'accountId + (\ x__ y__ -> x__ {_AccountGroupRequest'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountGroupRequest "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroupRequest'accountId + (\ x__ y__ -> x__ {_AccountGroupRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountGroupRequest "accountGroupId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroupRequest'accountGroupId + (\ x__ y__ -> x__ {_AccountGroupRequest'accountGroupId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountGroupRequest "maybe'accountGroupId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroupRequest'accountGroupId + (\ x__ y__ -> x__ {_AccountGroupRequest'accountGroupId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountGroupRequest where + messageName _ = Data.Text.pack "traderouting_1.AccountGroupRequest" + packedMessageDescriptor _ + = "\n\ + \\DC3AccountGroupRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2(\n\ + \\DLEaccount_group_id\CAN\STX \SOH(\tR\SOaccountGroupId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AccountGroupRequest + accountGroupId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_group_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountGroupId")) :: + Data.ProtoLens.FieldDescriptor AccountGroupRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, accountGroupId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountGroupRequest'_unknownFields + (\ x__ y__ -> x__ {_AccountGroupRequest'_unknownFields = y__}) + defMessage + = AccountGroupRequest'_constructor + {_AccountGroupRequest'accountId = Prelude.Nothing, + _AccountGroupRequest'accountGroupId = Prelude.Nothing, + _AccountGroupRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountGroupRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AccountGroupRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_group_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountGroupId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountGroupRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountGroupId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData AccountGroupRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountGroupRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountGroupRequest'accountId x__) + (Control.DeepSeq.deepseq + (_AccountGroupRequest'accountGroupId x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.acountGroup' @:: Lens' AccountGroupResult AccountGroup@ + * 'Proto.CMS.Traderouting1_Fields.maybe'acountGroup' @:: Lens' AccountGroupResult (Prelude.Maybe AccountGroup)@ -} +data AccountGroupResult + = AccountGroupResult'_constructor {_AccountGroupResult'acountGroup :: !(Prelude.Maybe AccountGroup), + _AccountGroupResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountGroupResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountGroupResult "acountGroup" AccountGroup where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroupResult'acountGroup + (\ x__ y__ -> x__ {_AccountGroupResult'acountGroup = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountGroupResult "maybe'acountGroup" (Prelude.Maybe AccountGroup) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountGroupResult'acountGroup + (\ x__ y__ -> x__ {_AccountGroupResult'acountGroup = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountGroupResult where + messageName _ = Data.Text.pack "traderouting_1.AccountGroupResult" + packedMessageDescriptor _ + = "\n\ + \\DC2AccountGroupResult\DC2?\n\ + \\facount_group\CAN\SOH \SOH(\v2\FS.traderouting_1.AccountGroupR\vacountGroup" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + acountGroup__field_descriptor + = Data.ProtoLens.FieldDescriptor + "acount_group" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountGroup) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'acountGroup")) :: + Data.ProtoLens.FieldDescriptor AccountGroupResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, acountGroup__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountGroupResult'_unknownFields + (\ x__ y__ -> x__ {_AccountGroupResult'_unknownFields = y__}) + defMessage + = AccountGroupResult'_constructor + {_AccountGroupResult'acountGroup = Prelude.Nothing, + _AccountGroupResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountGroupResult + -> Data.ProtoLens.Encoding.Bytes.Parser AccountGroupResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "acount_group" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"acountGroup") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountGroupResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'acountGroup") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountGroupResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountGroupResult'_unknownFields x__) + (Control.DeepSeq.deepseq (_AccountGroupResult'acountGroup x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountInfoRequest Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AccountInfoRequest (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageAccountNumber' @:: Lens' AccountInfoRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'brokerageAccountNumber' @:: Lens' AccountInfoRequest (Prelude.Maybe Data.Text.Text)@ -} +data AccountInfoRequest + = AccountInfoRequest'_constructor {_AccountInfoRequest'accountId :: !(Prelude.Maybe Data.Int.Int32), + _AccountInfoRequest'brokerageAccountNumber :: !(Prelude.Maybe Data.Text.Text), + _AccountInfoRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountInfoRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountInfoRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountInfoRequest'accountId + (\ x__ y__ -> x__ {_AccountInfoRequest'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountInfoRequest "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountInfoRequest'accountId + (\ x__ y__ -> x__ {_AccountInfoRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountInfoRequest "brokerageAccountNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountInfoRequest'brokerageAccountNumber + (\ x__ y__ + -> x__ {_AccountInfoRequest'brokerageAccountNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountInfoRequest "maybe'brokerageAccountNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountInfoRequest'brokerageAccountNumber + (\ x__ y__ + -> x__ {_AccountInfoRequest'brokerageAccountNumber = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountInfoRequest where + messageName _ = Data.Text.pack "traderouting_1.AccountInfoRequest" + packedMessageDescriptor _ + = "\n\ + \\DC2AccountInfoRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC28\n\ + \\CANbrokerage_account_number\CAN\STX \SOH(\tR\SYNbrokerageAccountNumber" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AccountInfoRequest + brokerageAccountNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_account_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber")) :: + Data.ProtoLens.FieldDescriptor AccountInfoRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, brokerageAccountNumber__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountInfoRequest'_unknownFields + (\ x__ y__ -> x__ {_AccountInfoRequest'_unknownFields = y__}) + defMessage + = AccountInfoRequest'_constructor + {_AccountInfoRequest'accountId = Prelude.Nothing, + _AccountInfoRequest'brokerageAccountNumber = Prelude.Nothing, + _AccountInfoRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountInfoRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AccountInfoRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_account_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAccountNumber") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountInfoRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData AccountInfoRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountInfoRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountInfoRequest'accountId x__) + (Control.DeepSeq.deepseq + (_AccountInfoRequest'brokerageAccountNumber x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.account' @:: Lens' AccountInfoResult Account@ -} +data AccountInfoResult + = AccountInfoResult'_constructor {_AccountInfoResult'account :: !Account, + _AccountInfoResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountInfoResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountInfoResult "account" Account where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountInfoResult'account + (\ x__ y__ -> x__ {_AccountInfoResult'account = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountInfoResult where + messageName _ = Data.Text.pack "traderouting_1.AccountInfoResult" + packedMessageDescriptor _ + = "\n\ + \\DC1AccountInfoResult\DC21\n\ + \\aaccount\CAN\SOH \STX(\v2\ETB.traderouting_1.AccountR\aaccount" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + account__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Account) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"account")) :: + Data.ProtoLens.FieldDescriptor AccountInfoResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, account__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountInfoResult'_unknownFields + (\ x__ y__ -> x__ {_AccountInfoResult'_unknownFields = y__}) + defMessage + = AccountInfoResult'_constructor + {_AccountInfoResult'account = Data.ProtoLens.defMessage, + _AccountInfoResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountInfoResult + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountInfoResult + loop x required'account + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'account then (:) "account" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"account") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'account + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountInfoResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view (Data.ProtoLens.Field.field @"account") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountInfoResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountInfoResult'_unknownFields x__) + (Control.DeepSeq.deepseq (_AccountInfoResult'account x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountMarketLimitsRequest Data.Int.Int32@ -} +data AccountMarketLimitsRequest + = AccountMarketLimitsRequest'_constructor {_AccountMarketLimitsRequest'accountId :: !Data.Int.Int32, + _AccountMarketLimitsRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountMarketLimitsRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountMarketLimitsRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountMarketLimitsRequest'accountId + (\ x__ y__ -> x__ {_AccountMarketLimitsRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountMarketLimitsRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountMarketLimitsRequest" + packedMessageDescriptor _ + = "\n\ + \\SUBAccountMarketLimitsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor AccountMarketLimitsRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountMarketLimitsRequest'_unknownFields + (\ x__ y__ + -> x__ {_AccountMarketLimitsRequest'_unknownFields = y__}) + defMessage + = AccountMarketLimitsRequest'_constructor + {_AccountMarketLimitsRequest'accountId = Data.ProtoLens.fieldDefault, + _AccountMarketLimitsRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountMarketLimitsRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountMarketLimitsRequest + loop x required'accountId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountMarketLimitsRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"accountId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountMarketLimitsRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountMarketLimitsRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountMarketLimitsRequest'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountMarketLimits' @:: Lens' AccountMarketLimitsResult MarketLimits@ -} +data AccountMarketLimitsResult + = AccountMarketLimitsResult'_constructor {_AccountMarketLimitsResult'accountMarketLimits :: !MarketLimits, + _AccountMarketLimitsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountMarketLimitsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountMarketLimitsResult "accountMarketLimits" MarketLimits where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountMarketLimitsResult'accountMarketLimits + (\ x__ y__ + -> x__ {_AccountMarketLimitsResult'accountMarketLimits = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountMarketLimitsResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountMarketLimitsResult" + packedMessageDescriptor _ + = "\n\ + \\EMAccountMarketLimitsResult\DC2P\n\ + \\NAKaccount_market_limits\CAN\SOH \STX(\v2\FS.traderouting_1.MarketLimitsR\DC3accountMarketLimits" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountMarketLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_market_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor MarketLimits) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountMarketLimits")) :: + Data.ProtoLens.FieldDescriptor AccountMarketLimitsResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountMarketLimits__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountMarketLimitsResult'_unknownFields + (\ x__ y__ + -> x__ {_AccountMarketLimitsResult'_unknownFields = y__}) + defMessage + = AccountMarketLimitsResult'_constructor + {_AccountMarketLimitsResult'accountMarketLimits = Data.ProtoLens.defMessage, + _AccountMarketLimitsResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountMarketLimitsResult + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountMarketLimitsResult + loop x required'accountMarketLimits + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountMarketLimits then + (:) "account_market_limits" + else + Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_market_limits" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountMarketLimits") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountMarketLimits + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountMarketLimitsResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view + (Data.ProtoLens.Field.field @"accountMarketLimits") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountMarketLimitsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountMarketLimitsResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountMarketLimitsResult'accountMarketLimits x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountPositionsRequest Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AccountPositionsRequest (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.groupByContract' @:: Lens' AccountPositionsRequest Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'groupByContract' @:: Lens' AccountPositionsRequest (Prelude.Maybe Prelude.Bool)@ -} +data AccountPositionsRequest + = AccountPositionsRequest'_constructor {_AccountPositionsRequest'accountId :: !(Prelude.Maybe Data.Int.Int32), + _AccountPositionsRequest'groupByContract :: !(Prelude.Maybe Prelude.Bool), + _AccountPositionsRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountPositionsRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountPositionsRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountPositionsRequest'accountId + (\ x__ y__ -> x__ {_AccountPositionsRequest'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountPositionsRequest "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountPositionsRequest'accountId + (\ x__ y__ -> x__ {_AccountPositionsRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountPositionsRequest "groupByContract" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountPositionsRequest'groupByContract + (\ x__ y__ + -> x__ {_AccountPositionsRequest'groupByContract = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountPositionsRequest "maybe'groupByContract" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountPositionsRequest'groupByContract + (\ x__ y__ + -> x__ {_AccountPositionsRequest'groupByContract = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountPositionsRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountPositionsRequest" + packedMessageDescriptor _ + = "\n\ + \\ETBAccountPositionsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2*\n\ + \\DC1group_by_contract\CAN\STX \SOH(\bR\SIgroupByContract" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AccountPositionsRequest + groupByContract__field_descriptor + = Data.ProtoLens.FieldDescriptor + "group_by_contract" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'groupByContract")) :: + Data.ProtoLens.FieldDescriptor AccountPositionsRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, groupByContract__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountPositionsRequest'_unknownFields + (\ x__ y__ -> x__ {_AccountPositionsRequest'_unknownFields = y__}) + defMessage + = AccountPositionsRequest'_constructor + {_AccountPositionsRequest'accountId = Prelude.Nothing, + _AccountPositionsRequest'groupByContract = Prelude.Nothing, + _AccountPositionsRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountPositionsRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AccountPositionsRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "group_by_contract" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"groupByContract") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountPositionsRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'groupByContract") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData AccountPositionsRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountPositionsRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountPositionsRequest'accountId x__) + (Control.DeepSeq.deepseq + (_AccountPositionsRequest'groupByContract x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.contractPosition' @:: Lens' AccountPositionsResult [ContractPosition]@ + * 'Proto.CMS.Traderouting1_Fields.vec'contractPosition' @:: Lens' AccountPositionsResult (Data.Vector.Vector ContractPosition)@ -} +data AccountPositionsResult + = AccountPositionsResult'_constructor {_AccountPositionsResult'contractPosition :: !(Data.Vector.Vector ContractPosition), + _AccountPositionsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountPositionsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountPositionsResult "contractPosition" [ContractPosition] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountPositionsResult'contractPosition + (\ x__ y__ + -> x__ {_AccountPositionsResult'contractPosition = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountPositionsResult "vec'contractPosition" (Data.Vector.Vector ContractPosition) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountPositionsResult'contractPosition + (\ x__ y__ + -> x__ {_AccountPositionsResult'contractPosition = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountPositionsResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountPositionsResult" + packedMessageDescriptor _ + = "\n\ + \\SYNAccountPositionsResult\DC2M\n\ + \\DC1contract_position\CAN\SOH \ETX(\v2 .traderouting_1.ContractPositionR\DLEcontractPosition" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + contractPosition__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_position" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ContractPosition) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"contractPosition")) :: + Data.ProtoLens.FieldDescriptor AccountPositionsResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, contractPosition__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountPositionsResult'_unknownFields + (\ x__ y__ -> x__ {_AccountPositionsResult'_unknownFields = y__}) + defMessage + = AccountPositionsResult'_constructor + {_AccountPositionsResult'contractPosition = Data.Vector.Generic.empty, + _AccountPositionsResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountPositionsResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ContractPosition + -> Data.ProtoLens.Encoding.Bytes.Parser AccountPositionsResult + loop x mutable'contractPosition + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'contractPosition <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'contractPosition) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'contractPosition") + frozen'contractPosition x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "contract_position" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'contractPosition y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'contractPosition + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'contractPosition <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'contractPosition) + "AccountPositionsResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'contractPosition") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountPositionsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountPositionsResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountPositionsResult'contractPosition x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountRiskParametersRequest Data.Int.Int32@ -} +data AccountRiskParametersRequest + = AccountRiskParametersRequest'_constructor {_AccountRiskParametersRequest'accountId :: !Data.Int.Int32, + _AccountRiskParametersRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountRiskParametersRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountRiskParametersRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRiskParametersRequest'accountId + (\ x__ y__ -> x__ {_AccountRiskParametersRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountRiskParametersRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountRiskParametersRequest" + packedMessageDescriptor _ + = "\n\ + \\FSAccountRiskParametersRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor AccountRiskParametersRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountRiskParametersRequest'_unknownFields + (\ x__ y__ + -> x__ {_AccountRiskParametersRequest'_unknownFields = y__}) + defMessage + = AccountRiskParametersRequest'_constructor + {_AccountRiskParametersRequest'accountId = Data.ProtoLens.fieldDefault, + _AccountRiskParametersRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountRiskParametersRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountRiskParametersRequest + loop x required'accountId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountRiskParametersRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"accountId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountRiskParametersRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountRiskParametersRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountRiskParametersRequest'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountRiskParameters' @:: Lens' AccountRiskParametersResult RiskParameters@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountRiskParameters' @:: Lens' AccountRiskParametersResult (Prelude.Maybe RiskParameters)@ -} +data AccountRiskParametersResult + = AccountRiskParametersResult'_constructor {_AccountRiskParametersResult'accountRiskParameters :: !(Prelude.Maybe RiskParameters), + _AccountRiskParametersResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountRiskParametersResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountRiskParametersResult "accountRiskParameters" RiskParameters where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRiskParametersResult'accountRiskParameters + (\ x__ y__ + -> x__ {_AccountRiskParametersResult'accountRiskParameters = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountRiskParametersResult "maybe'accountRiskParameters" (Prelude.Maybe RiskParameters) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRiskParametersResult'accountRiskParameters + (\ x__ y__ + -> x__ {_AccountRiskParametersResult'accountRiskParameters = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountRiskParametersResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountRiskParametersResult" + packedMessageDescriptor _ + = "\n\ + \\ESCAccountRiskParametersResult\DC2V\n\ + \\ETBaccount_risk_parameters\CAN\SOH \SOH(\v2\RS.traderouting_1.RiskParametersR\NAKaccountRiskParameters" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountRiskParameters__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_risk_parameters" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RiskParameters) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountRiskParameters")) :: + Data.ProtoLens.FieldDescriptor AccountRiskParametersResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountRiskParameters__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountRiskParametersResult'_unknownFields + (\ x__ y__ + -> x__ {_AccountRiskParametersResult'_unknownFields = y__}) + defMessage + = AccountRiskParametersResult'_constructor + {_AccountRiskParametersResult'accountRiskParameters = Prelude.Nothing, + _AccountRiskParametersResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountRiskParametersResult + -> Data.ProtoLens.Encoding.Bytes.Parser AccountRiskParametersResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_risk_parameters" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountRiskParameters") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountRiskParametersResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountRiskParameters") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountRiskParametersResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountRiskParametersResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountRiskParametersResult'accountRiskParameters x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.name' @:: Lens' AccountRouteAttribute Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.value' @:: Lens' AccountRouteAttribute Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'value' @:: Lens' AccountRouteAttribute (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' AccountRouteAttribute Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' AccountRouteAttribute (Prelude.Maybe Data.Text.Text)@ -} +data AccountRouteAttribute + = AccountRouteAttribute'_constructor {_AccountRouteAttribute'name :: !Data.Text.Text, + _AccountRouteAttribute'value :: !(Prelude.Maybe Data.Text.Text), + _AccountRouteAttribute'id :: !(Prelude.Maybe Data.Text.Text), + _AccountRouteAttribute'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountRouteAttribute where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountRouteAttribute "name" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteAttribute'name + (\ x__ y__ -> x__ {_AccountRouteAttribute'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteAttribute "value" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteAttribute'value + (\ x__ y__ -> x__ {_AccountRouteAttribute'value = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteAttribute "maybe'value" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteAttribute'value + (\ x__ y__ -> x__ {_AccountRouteAttribute'value = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteAttribute "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteAttribute'id + (\ x__ y__ -> x__ {_AccountRouteAttribute'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteAttribute "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteAttribute'id + (\ x__ y__ -> x__ {_AccountRouteAttribute'id = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountRouteAttribute where + messageName _ + = Data.Text.pack "traderouting_1.AccountRouteAttribute" + packedMessageDescriptor _ + = "\n\ + \\NAKAccountRouteAttribute\DC2\DC2\n\ + \\EOTName\CAN\SOH \STX(\tR\EOTName\DC2\DC4\n\ + \\ENQValue\CAN\STX \SOH(\tR\ENQValue\DC2\SO\n\ + \\STXid\CAN\ETX \SOH(\tR\STXid" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "Name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"name")) :: + Data.ProtoLens.FieldDescriptor AccountRouteAttribute + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "Value" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'value")) :: + Data.ProtoLens.FieldDescriptor AccountRouteAttribute + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor AccountRouteAttribute + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, name__field_descriptor), + (Data.ProtoLens.Tag 2, value__field_descriptor), + (Data.ProtoLens.Tag 3, id__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountRouteAttribute'_unknownFields + (\ x__ y__ -> x__ {_AccountRouteAttribute'_unknownFields = y__}) + defMessage + = AccountRouteAttribute'_constructor + {_AccountRouteAttribute'name = Data.ProtoLens.fieldDefault, + _AccountRouteAttribute'value = Prelude.Nothing, + _AccountRouteAttribute'id = Prelude.Nothing, + _AccountRouteAttribute'_unknownFields = []} + parseMessage + = let + loop :: + AccountRouteAttribute + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountRouteAttribute + loop x required'name + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing = (if required'name then (:) "Name" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "Name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "Value" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + required'name + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + required'name + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'name + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountRouteAttribute" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"name") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData AccountRouteAttribute where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountRouteAttribute'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountRouteAttribute'name x__) + (Control.DeepSeq.deepseq + (_AccountRouteAttribute'value x__) + (Control.DeepSeq.deepseq (_AccountRouteAttribute'id x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountRouteListRequest Data.Int.Int32@ -} +data AccountRouteListRequest + = AccountRouteListRequest'_constructor {_AccountRouteListRequest'accountId :: !Data.Int.Int32, + _AccountRouteListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountRouteListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountRouteListRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteListRequest'accountId + (\ x__ y__ -> x__ {_AccountRouteListRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountRouteListRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountRouteListRequest" + packedMessageDescriptor _ + = "\n\ + \\ETBAccountRouteListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor AccountRouteListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountRouteListRequest'_unknownFields + (\ x__ y__ -> x__ {_AccountRouteListRequest'_unknownFields = y__}) + defMessage + = AccountRouteListRequest'_constructor + {_AccountRouteListRequest'accountId = Data.ProtoLens.fieldDefault, + _AccountRouteListRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountRouteListRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountRouteListRequest + loop x required'accountId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountRouteListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"accountId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountRouteListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountRouteListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountRouteListRequest'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountRouteRecord' @:: Lens' AccountRouteListResult [AccountRouteRecord]@ + * 'Proto.CMS.Traderouting1_Fields.vec'accountRouteRecord' @:: Lens' AccountRouteListResult (Data.Vector.Vector AccountRouteRecord)@ -} +data AccountRouteListResult + = AccountRouteListResult'_constructor {_AccountRouteListResult'accountRouteRecord :: !(Data.Vector.Vector AccountRouteRecord), + _AccountRouteListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountRouteListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountRouteListResult "accountRouteRecord" [AccountRouteRecord] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteListResult'accountRouteRecord + (\ x__ y__ + -> x__ {_AccountRouteListResult'accountRouteRecord = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountRouteListResult "vec'accountRouteRecord" (Data.Vector.Vector AccountRouteRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteListResult'accountRouteRecord + (\ x__ y__ + -> x__ {_AccountRouteListResult'accountRouteRecord = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountRouteListResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountRouteListResult" + packedMessageDescriptor _ + = "\n\ + \\SYNAccountRouteListResult\DC2T\n\ + \\DC4account_route_record\CAN\SOH \ETX(\v2\".traderouting_1.AccountRouteRecordR\DC2accountRouteRecord" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountRouteRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_route_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountRouteRecord) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"accountRouteRecord")) :: + Data.ProtoLens.FieldDescriptor AccountRouteListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountRouteRecord__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountRouteListResult'_unknownFields + (\ x__ y__ -> x__ {_AccountRouteListResult'_unknownFields = y__}) + defMessage + = AccountRouteListResult'_constructor + {_AccountRouteListResult'accountRouteRecord = Data.Vector.Generic.empty, + _AccountRouteListResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountRouteListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountRouteRecord + -> Data.ProtoLens.Encoding.Bytes.Parser AccountRouteListResult + loop x mutable'accountRouteRecord + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'accountRouteRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'accountRouteRecord) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'accountRouteRecord") + frozen'accountRouteRecord x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "account_route_record" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'accountRouteRecord y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'accountRouteRecord + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'accountRouteRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'accountRouteRecord) + "AccountRouteListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'accountRouteRecord") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountRouteListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountRouteListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountRouteListResult'accountRouteRecord x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clearedFields' @:: Lens' AccountRouteRecord [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clearedFields' @:: Lens' AccountRouteRecord (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.routeCode' @:: Lens' AccountRouteRecord Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'routeCode' @:: Lens' AccountRouteRecord (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteRouteName' @:: Lens' AccountRouteRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteRouteName' @:: Lens' AccountRouteRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.priority' @:: Lens' AccountRouteRecord Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'priority' @:: Lens' AccountRouteRecord (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.omnibusAccountId' @:: Lens' AccountRouteRecord Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'omnibusAccountId' @:: Lens' AccountRouteRecord (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteOmnibusAccountName' @:: Lens' AccountRouteRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteOmnibusAccountName' @:: Lens' AccountRouteRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.attributes' @:: Lens' AccountRouteRecord [AccountRouteAttribute]@ + * 'Proto.CMS.Traderouting1_Fields.vec'attributes' @:: Lens' AccountRouteRecord (Data.Vector.Vector AccountRouteAttribute)@ + * 'Proto.CMS.Traderouting1_Fields.isInUse' @:: Lens' AccountRouteRecord Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isInUse' @:: Lens' AccountRouteRecord (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.allowSyntheticOrderTypes' @:: Lens' AccountRouteRecord Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowSyntheticOrderTypes' @:: Lens' AccountRouteRecord (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.enableAlgoStrategiesWhitelist' @:: Lens' AccountRouteRecord Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enableAlgoStrategiesWhitelist' @:: Lens' AccountRouteRecord (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.algoStrategiesWhitelist' @:: Lens' AccountRouteRecord [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'algoStrategiesWhitelist' @:: Lens' AccountRouteRecord (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.cqgAlgoOrdersOnly' @:: Lens' AccountRouteRecord Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'cqgAlgoOrdersOnly' @:: Lens' AccountRouteRecord (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.forceVariableLatencyAlgo' @:: Lens' AccountRouteRecord Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'forceVariableLatencyAlgo' @:: Lens' AccountRouteRecord (Prelude.Maybe Data.Word.Word32)@ -} +data AccountRouteRecord + = AccountRouteRecord'_constructor {_AccountRouteRecord'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _AccountRouteRecord'routeCode :: !(Prelude.Maybe Data.Int.Int32), + _AccountRouteRecord'obsoleteRouteName :: !(Prelude.Maybe Data.Text.Text), + _AccountRouteRecord'priority :: !(Prelude.Maybe Data.Int.Int32), + _AccountRouteRecord'omnibusAccountId :: !(Prelude.Maybe Data.Int.Int32), + _AccountRouteRecord'obsoleteOmnibusAccountName :: !(Prelude.Maybe Data.Text.Text), + _AccountRouteRecord'attributes :: !(Data.Vector.Vector AccountRouteAttribute), + _AccountRouteRecord'isInUse :: !(Prelude.Maybe Prelude.Bool), + _AccountRouteRecord'allowSyntheticOrderTypes :: !(Prelude.Maybe Prelude.Bool), + _AccountRouteRecord'enableAlgoStrategiesWhitelist :: !(Prelude.Maybe Prelude.Bool), + _AccountRouteRecord'algoStrategiesWhitelist :: !(Data.Vector.Vector Data.Text.Text), + _AccountRouteRecord'cqgAlgoOrdersOnly :: !(Prelude.Maybe Prelude.Bool), + _AccountRouteRecord'forceVariableLatencyAlgo :: !(Prelude.Maybe Data.Word.Word32), + _AccountRouteRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountRouteRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'clearedFields + (\ x__ y__ -> x__ {_AccountRouteRecord'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'clearedFields + (\ x__ y__ -> x__ {_AccountRouteRecord'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "routeCode" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'routeCode + (\ x__ y__ -> x__ {_AccountRouteRecord'routeCode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "maybe'routeCode" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'routeCode + (\ x__ y__ -> x__ {_AccountRouteRecord'routeCode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "obsoleteRouteName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'obsoleteRouteName + (\ x__ y__ -> x__ {_AccountRouteRecord'obsoleteRouteName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "maybe'obsoleteRouteName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'obsoleteRouteName + (\ x__ y__ -> x__ {_AccountRouteRecord'obsoleteRouteName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "priority" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'priority + (\ x__ y__ -> x__ {_AccountRouteRecord'priority = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "maybe'priority" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'priority + (\ x__ y__ -> x__ {_AccountRouteRecord'priority = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "omnibusAccountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'omnibusAccountId + (\ x__ y__ -> x__ {_AccountRouteRecord'omnibusAccountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "maybe'omnibusAccountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'omnibusAccountId + (\ x__ y__ -> x__ {_AccountRouteRecord'omnibusAccountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "obsoleteOmnibusAccountName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'obsoleteOmnibusAccountName + (\ x__ y__ + -> x__ {_AccountRouteRecord'obsoleteOmnibusAccountName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "maybe'obsoleteOmnibusAccountName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'obsoleteOmnibusAccountName + (\ x__ y__ + -> x__ {_AccountRouteRecord'obsoleteOmnibusAccountName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "attributes" [AccountRouteAttribute] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'attributes + (\ x__ y__ -> x__ {_AccountRouteRecord'attributes = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "vec'attributes" (Data.Vector.Vector AccountRouteAttribute) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'attributes + (\ x__ y__ -> x__ {_AccountRouteRecord'attributes = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "isInUse" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'isInUse + (\ x__ y__ -> x__ {_AccountRouteRecord'isInUse = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "maybe'isInUse" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'isInUse + (\ x__ y__ -> x__ {_AccountRouteRecord'isInUse = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "allowSyntheticOrderTypes" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'allowSyntheticOrderTypes + (\ x__ y__ + -> x__ {_AccountRouteRecord'allowSyntheticOrderTypes = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "maybe'allowSyntheticOrderTypes" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'allowSyntheticOrderTypes + (\ x__ y__ + -> x__ {_AccountRouteRecord'allowSyntheticOrderTypes = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "enableAlgoStrategiesWhitelist" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'enableAlgoStrategiesWhitelist + (\ x__ y__ + -> x__ {_AccountRouteRecord'enableAlgoStrategiesWhitelist = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "maybe'enableAlgoStrategiesWhitelist" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'enableAlgoStrategiesWhitelist + (\ x__ y__ + -> x__ {_AccountRouteRecord'enableAlgoStrategiesWhitelist = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "algoStrategiesWhitelist" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'algoStrategiesWhitelist + (\ x__ y__ + -> x__ {_AccountRouteRecord'algoStrategiesWhitelist = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "vec'algoStrategiesWhitelist" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'algoStrategiesWhitelist + (\ x__ y__ + -> x__ {_AccountRouteRecord'algoStrategiesWhitelist = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "cqgAlgoOrdersOnly" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'cqgAlgoOrdersOnly + (\ x__ y__ -> x__ {_AccountRouteRecord'cqgAlgoOrdersOnly = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "maybe'cqgAlgoOrdersOnly" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'cqgAlgoOrdersOnly + (\ x__ y__ -> x__ {_AccountRouteRecord'cqgAlgoOrdersOnly = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountRouteRecord "forceVariableLatencyAlgo" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'forceVariableLatencyAlgo + (\ x__ y__ + -> x__ {_AccountRouteRecord'forceVariableLatencyAlgo = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountRouteRecord "maybe'forceVariableLatencyAlgo" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountRouteRecord'forceVariableLatencyAlgo + (\ x__ y__ + -> x__ {_AccountRouteRecord'forceVariableLatencyAlgo = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountRouteRecord where + messageName _ = Data.Text.pack "traderouting_1.AccountRouteRecord" + packedMessageDescriptor _ + = "\n\ + \\DC2AccountRouteRecord\DC2%\n\ + \\SOcleared_fields\CAN\t \ETX(\rR\rclearedFields\DC2\GS\n\ + \\n\ + \route_code\CAN\SOH \SOH(\DC1R\trouteCode\DC22\n\ + \\DC3obsolete_route_name\CAN\STX \SOH(\tR\DC1obsoleteRouteNameB\STX\CAN\SOH\DC2\SUB\n\ + \\bpriority\CAN\ETX \SOH(\DC1R\bpriority\DC2,\n\ + \\DC2omnibus_account_id\CAN\EOT \SOH(\DC1R\DLEomnibusAccountId\DC2E\n\ + \\GSobsolete_omnibus_account_name\CAN\ENQ \SOH(\tR\SUBobsoleteOmnibusAccountNameB\STX\CAN\SOH\DC2E\n\ + \\n\ + \attributes\CAN\ACK \ETX(\v2%.traderouting_1.AccountRouteAttributeR\n\ + \attributes\DC2\SUB\n\ + \\tis_in_use\CAN\a \SOH(\bR\aisInUse\DC2=\n\ + \\ESCallow_synthetic_order_types\CAN\b \SOH(\bR\CANallowSyntheticOrderTypes\DC2G\n\ + \ enable_algo_strategies_whitelist\CAN\n\ + \ \SOH(\bR\GSenableAlgoStrategiesWhitelist\DC2:\n\ + \\EMalgo_strategies_whitelist\CAN\v \ETX(\tR\ETBalgoStrategiesWhitelist\DC2/\n\ + \\DC4cqg_algo_orders_only\CAN\f \SOH(\bR\DC1cqgAlgoOrdersOnly\DC2=\n\ + \\ESCforce_variable_latency_algo\CAN\r \SOH(\rR\CANforceVariableLatencyAlgo\"^\n\ + \\CANForceVariableLatencyAlgo\DC2\f\n\ + \\bDISABLED\DLE\NUL\DC2\ETB\n\ + \\DC3NON_CQG_ALGO_ORDERS\DLE\SOH\DC2\ESC\n\ + \\ETBALL_NON_SPREADER_ORDERS\DLE\STX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + routeCode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route_code" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'routeCode")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + obsoleteRouteName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_route_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteRouteName")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + priority__field_descriptor + = Data.ProtoLens.FieldDescriptor + "priority" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'priority")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + omnibusAccountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "omnibus_account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'omnibusAccountId")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + obsoleteOmnibusAccountName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_omnibus_account_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteOmnibusAccountName")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + attributes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "attributes" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountRouteAttribute) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"attributes")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + isInUse__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_in_use" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isInUse")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + allowSyntheticOrderTypes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allow_synthetic_order_types" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowSyntheticOrderTypes")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + enableAlgoStrategiesWhitelist__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enable_algo_strategies_whitelist" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'enableAlgoStrategiesWhitelist")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + algoStrategiesWhitelist__field_descriptor + = Data.ProtoLens.FieldDescriptor + "algo_strategies_whitelist" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"algoStrategiesWhitelist")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + cqgAlgoOrdersOnly__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cqg_algo_orders_only" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cqgAlgoOrdersOnly")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + forceVariableLatencyAlgo__field_descriptor + = Data.ProtoLens.FieldDescriptor + "force_variable_latency_algo" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'forceVariableLatencyAlgo")) :: + Data.ProtoLens.FieldDescriptor AccountRouteRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 9, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, routeCode__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteRouteName__field_descriptor), + (Data.ProtoLens.Tag 3, priority__field_descriptor), + (Data.ProtoLens.Tag 4, omnibusAccountId__field_descriptor), + (Data.ProtoLens.Tag 5, + obsoleteOmnibusAccountName__field_descriptor), + (Data.ProtoLens.Tag 6, attributes__field_descriptor), + (Data.ProtoLens.Tag 7, isInUse__field_descriptor), + (Data.ProtoLens.Tag 8, allowSyntheticOrderTypes__field_descriptor), + (Data.ProtoLens.Tag 10, + enableAlgoStrategiesWhitelist__field_descriptor), + (Data.ProtoLens.Tag 11, algoStrategiesWhitelist__field_descriptor), + (Data.ProtoLens.Tag 12, cqgAlgoOrdersOnly__field_descriptor), + (Data.ProtoLens.Tag 13, + forceVariableLatencyAlgo__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountRouteRecord'_unknownFields + (\ x__ y__ -> x__ {_AccountRouteRecord'_unknownFields = y__}) + defMessage + = AccountRouteRecord'_constructor + {_AccountRouteRecord'clearedFields = Data.Vector.Generic.empty, + _AccountRouteRecord'routeCode = Prelude.Nothing, + _AccountRouteRecord'obsoleteRouteName = Prelude.Nothing, + _AccountRouteRecord'priority = Prelude.Nothing, + _AccountRouteRecord'omnibusAccountId = Prelude.Nothing, + _AccountRouteRecord'obsoleteOmnibusAccountName = Prelude.Nothing, + _AccountRouteRecord'attributes = Data.Vector.Generic.empty, + _AccountRouteRecord'isInUse = Prelude.Nothing, + _AccountRouteRecord'allowSyntheticOrderTypes = Prelude.Nothing, + _AccountRouteRecord'enableAlgoStrategiesWhitelist = Prelude.Nothing, + _AccountRouteRecord'algoStrategiesWhitelist = Data.Vector.Generic.empty, + _AccountRouteRecord'cqgAlgoOrdersOnly = Prelude.Nothing, + _AccountRouteRecord'forceVariableLatencyAlgo = Prelude.Nothing, + _AccountRouteRecord'_unknownFields = []} + parseMessage + = let + loop :: + AccountRouteRecord + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountRouteAttribute + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser AccountRouteRecord + loop + x + mutable'algoStrategiesWhitelist + mutable'attributes + mutable'clearedFields + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'algoStrategiesWhitelist <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'algoStrategiesWhitelist) + frozen'attributes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'attributes) + frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'algoStrategiesWhitelist") + frozen'algoStrategiesWhitelist + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'attributes") frozen'attributes + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields x)))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 72 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x mutable'algoStrategiesWhitelist mutable'attributes v + 74 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x mutable'algoStrategiesWhitelist mutable'attributes y + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "route_code" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"routeCode") y x) + mutable'algoStrategiesWhitelist mutable'attributes + mutable'clearedFields + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_route_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteRouteName") y x) + mutable'algoStrategiesWhitelist mutable'attributes + mutable'clearedFields + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "priority" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"priority") y x) + mutable'algoStrategiesWhitelist mutable'attributes + mutable'clearedFields + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "omnibus_account_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"omnibusAccountId") y x) + mutable'algoStrategiesWhitelist mutable'attributes + mutable'clearedFields + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_omnibus_account_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteOmnibusAccountName") y x) + mutable'algoStrategiesWhitelist mutable'attributes + mutable'clearedFields + 50 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "attributes" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'attributes y) + loop x mutable'algoStrategiesWhitelist v mutable'clearedFields + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_in_use" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isInUse") y x) + mutable'algoStrategiesWhitelist mutable'attributes + mutable'clearedFields + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "allow_synthetic_order_types" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowSyntheticOrderTypes") y x) + mutable'algoStrategiesWhitelist mutable'attributes + mutable'clearedFields + 80 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enable_algo_strategies_whitelist" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"enableAlgoStrategiesWhitelist") y + x) + mutable'algoStrategiesWhitelist mutable'attributes + mutable'clearedFields + 90 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "algo_strategies_whitelist" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'algoStrategiesWhitelist y) + loop x v mutable'attributes mutable'clearedFields + 96 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "cqg_algo_orders_only" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"cqgAlgoOrdersOnly") y x) + mutable'algoStrategiesWhitelist mutable'attributes + mutable'clearedFields + 104 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "force_variable_latency_algo" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"forceVariableLatencyAlgo") y x) + mutable'algoStrategiesWhitelist mutable'attributes + mutable'clearedFields + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'algoStrategiesWhitelist mutable'attributes + mutable'clearedFields + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'algoStrategiesWhitelist <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'attributes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'algoStrategiesWhitelist + mutable'attributes mutable'clearedFields) + "AccountRouteRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'routeCode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteRouteName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'priority") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'omnibusAccountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteOmnibusAccountName") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'attributes") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isInUse") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'allowSyntheticOrderTypes") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'enableAlgoStrategiesWhitelist") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 80) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'algoStrategiesWhitelist") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'cqgAlgoOrdersOnly") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 96) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'forceVariableLatencyAlgo") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 104) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x)))))))))))))) +instance Control.DeepSeq.NFData AccountRouteRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountRouteRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'clearedFields x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'routeCode x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'obsoleteRouteName x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'priority x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'omnibusAccountId x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'obsoleteOmnibusAccountName x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'attributes x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'isInUse x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'allowSyntheticOrderTypes x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'enableAlgoStrategiesWhitelist x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'algoStrategiesWhitelist x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'cqgAlgoOrdersOnly x__) + (Control.DeepSeq.deepseq + (_AccountRouteRecord'forceVariableLatencyAlgo + x__) + ()))))))))))))) +data AccountRouteRecord'ForceVariableLatencyAlgo + = AccountRouteRecord'DISABLED | + AccountRouteRecord'NON_CQG_ALGO_ORDERS | + AccountRouteRecord'ALL_NON_SPREADER_ORDERS + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum AccountRouteRecord'ForceVariableLatencyAlgo where + maybeToEnum 0 = Prelude.Just AccountRouteRecord'DISABLED + maybeToEnum 1 = Prelude.Just AccountRouteRecord'NON_CQG_ALGO_ORDERS + maybeToEnum 2 + = Prelude.Just AccountRouteRecord'ALL_NON_SPREADER_ORDERS + maybeToEnum _ = Prelude.Nothing + showEnum AccountRouteRecord'DISABLED = "DISABLED" + showEnum AccountRouteRecord'NON_CQG_ALGO_ORDERS + = "NON_CQG_ALGO_ORDERS" + showEnum AccountRouteRecord'ALL_NON_SPREADER_ORDERS + = "ALL_NON_SPREADER_ORDERS" + readEnum k + | (Prelude.==) k "DISABLED" + = Prelude.Just AccountRouteRecord'DISABLED + | (Prelude.==) k "NON_CQG_ALGO_ORDERS" + = Prelude.Just AccountRouteRecord'NON_CQG_ALGO_ORDERS + | (Prelude.==) k "ALL_NON_SPREADER_ORDERS" + = Prelude.Just AccountRouteRecord'ALL_NON_SPREADER_ORDERS + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded AccountRouteRecord'ForceVariableLatencyAlgo where + minBound = AccountRouteRecord'DISABLED + maxBound = AccountRouteRecord'ALL_NON_SPREADER_ORDERS +instance Prelude.Enum AccountRouteRecord'ForceVariableLatencyAlgo where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum ForceVariableLatencyAlgo: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum AccountRouteRecord'DISABLED = 0 + fromEnum AccountRouteRecord'NON_CQG_ALGO_ORDERS = 1 + fromEnum AccountRouteRecord'ALL_NON_SPREADER_ORDERS = 2 + succ AccountRouteRecord'ALL_NON_SPREADER_ORDERS + = Prelude.error + "AccountRouteRecord'ForceVariableLatencyAlgo.succ: bad argument AccountRouteRecord'ALL_NON_SPREADER_ORDERS. This value would be out of bounds." + succ AccountRouteRecord'DISABLED + = AccountRouteRecord'NON_CQG_ALGO_ORDERS + succ AccountRouteRecord'NON_CQG_ALGO_ORDERS + = AccountRouteRecord'ALL_NON_SPREADER_ORDERS + pred AccountRouteRecord'DISABLED + = Prelude.error + "AccountRouteRecord'ForceVariableLatencyAlgo.pred: bad argument AccountRouteRecord'DISABLED. This value would be out of bounds." + pred AccountRouteRecord'NON_CQG_ALGO_ORDERS + = AccountRouteRecord'DISABLED + pred AccountRouteRecord'ALL_NON_SPREADER_ORDERS + = AccountRouteRecord'NON_CQG_ALGO_ORDERS + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault AccountRouteRecord'ForceVariableLatencyAlgo where + fieldDefault = AccountRouteRecord'DISABLED +instance Control.DeepSeq.NFData AccountRouteRecord'ForceVariableLatencyAlgo where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountInfoRequest' @:: Lens' AccountScopeRequest AccountInfoRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountInfoRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountInfoRequest)@ + * 'Proto.CMS.Traderouting1_Fields.balanceRecordsRequest' @:: Lens' AccountScopeRequest BalanceRecordsRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'balanceRecordsRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe BalanceRecordsRequest)@ + * 'Proto.CMS.Traderouting1_Fields.createBalanceRecord' @:: Lens' AccountScopeRequest CreateBalanceRecord@ + * 'Proto.CMS.Traderouting1_Fields.maybe'createBalanceRecord' @:: Lens' AccountScopeRequest (Prelude.Maybe CreateBalanceRecord)@ + * 'Proto.CMS.Traderouting1_Fields.updateBalanceRecord' @:: Lens' AccountScopeRequest UpdateBalanceRecord@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateBalanceRecord' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateBalanceRecord)@ + * 'Proto.CMS.Traderouting1_Fields.accountRiskParametersRequest' @:: Lens' AccountScopeRequest AccountRiskParametersRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountRiskParametersRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountRiskParametersRequest)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteUpdateRiskParameters' @:: Lens' AccountScopeRequest UpdateRiskParameters@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteUpdateRiskParameters' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateRiskParameters)@ + * 'Proto.CMS.Traderouting1_Fields.accountSearchRequest' @:: Lens' AccountScopeRequest AccountSearchRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountSearchRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountSearchRequest)@ + * 'Proto.CMS.Traderouting1_Fields.accountRouteListRequest' @:: Lens' AccountScopeRequest AccountRouteListRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountRouteListRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountRouteListRequest)@ + * 'Proto.CMS.Traderouting1_Fields.accountUserAuthorizationListRequest' @:: Lens' AccountScopeRequest AccountUserAuthorizationListRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountUserAuthorizationListRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountUserAuthorizationListRequest)@ + * 'Proto.CMS.Traderouting1_Fields.accountSettingsRequest' @:: Lens' AccountScopeRequest AccountSettingsRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountSettingsRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountSettingsRequest)@ + * 'Proto.CMS.Traderouting1_Fields.accountAvailableExchangeGroupsRequest' @:: Lens' AccountScopeRequest AccountAvailableExchangeGroupsRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountAvailableExchangeGroupsRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountAvailableExchangeGroupsRequest)@ + * 'Proto.CMS.Traderouting1_Fields.accountMarketLimitsRequest' @:: Lens' AccountScopeRequest AccountMarketLimitsRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountMarketLimitsRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountMarketLimitsRequest)@ + * 'Proto.CMS.Traderouting1_Fields.accountPositionsRequest' @:: Lens' AccountScopeRequest AccountPositionsRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountPositionsRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountPositionsRequest)@ + * 'Proto.CMS.Traderouting1_Fields.accountEquityRequest' @:: Lens' AccountScopeRequest AccountEquityRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountEquityRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountEquityRequest)@ + * 'Proto.CMS.Traderouting1_Fields.accountCollateralRequest' @:: Lens' AccountScopeRequest AccountCollateralRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountCollateralRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountCollateralRequest)@ + * 'Proto.CMS.Traderouting1_Fields.cloneAccount' @:: Lens' AccountScopeRequest CloneAccount@ + * 'Proto.CMS.Traderouting1_Fields.maybe'cloneAccount' @:: Lens' AccountScopeRequest (Prelude.Maybe CloneAccount)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccount' @:: Lens' AccountScopeRequest UpdateAccount@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccount' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccount)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountSettings' @:: Lens' AccountScopeRequest UpdateAccountSettings@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountSettings' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccountSettings)@ + * 'Proto.CMS.Traderouting1_Fields.accountGroupRequest' @:: Lens' AccountScopeRequest AccountGroupRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountGroupRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountGroupRequest)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountRiskParameters' @:: Lens' AccountScopeRequest UpdateAccountRiskParameters@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountRiskParameters' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccountRiskParameters)@ + * 'Proto.CMS.Traderouting1_Fields.accountAvailableRouteListRequest' @:: Lens' AccountScopeRequest AccountAvailableRouteListRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountAvailableRouteListRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountAvailableRouteListRequest)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountRouteList' @:: Lens' AccountScopeRequest UpdateAccountRouteList@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountRouteList' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccountRouteList)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountMarketLimits' @:: Lens' AccountScopeRequest UpdateAccountMarketLimits@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountMarketLimits' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccountMarketLimits)@ + * 'Proto.CMS.Traderouting1_Fields.createAccount' @:: Lens' AccountScopeRequest CreateAccount@ + * 'Proto.CMS.Traderouting1_Fields.maybe'createAccount' @:: Lens' AccountScopeRequest (Prelude.Maybe CreateAccount)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteAccountClusterRequest' @:: Lens' AccountScopeRequest AccountClusterRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteAccountClusterRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountClusterRequest)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteCreateAccountCluster' @:: Lens' AccountScopeRequest CreateAccountCluster@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteCreateAccountCluster' @:: Lens' AccountScopeRequest (Prelude.Maybe CreateAccountCluster)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteUpdateAccountCluster' @:: Lens' AccountScopeRequest UpdateAccountCluster@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteUpdateAccountCluster' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccountCluster)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteUpdateAccountClusterPriceOffsets' @:: Lens' AccountScopeRequest UpdateAccountClusterPriceOffsets@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteUpdateAccountClusterPriceOffsets' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccountClusterPriceOffsets)@ + * 'Proto.CMS.Traderouting1_Fields.restoreAccount' @:: Lens' AccountScopeRequest RestoreAccount@ + * 'Proto.CMS.Traderouting1_Fields.maybe'restoreAccount' @:: Lens' AccountScopeRequest (Prelude.Maybe RestoreAccount)@ + * 'Proto.CMS.Traderouting1_Fields.accountTypeOverrideListRequest' @:: Lens' AccountScopeRequest AccountTypeOverrideListRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountTypeOverrideListRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountTypeOverrideListRequest)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountTypeOverrideList' @:: Lens' AccountScopeRequest UpdateAccountTypeOverrideList@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountTypeOverrideList' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccountTypeOverrideList)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountUserAuthorizationList' @:: Lens' AccountScopeRequest UpdateAccountUserAuthorizationList@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountUserAuthorizationList' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccountUserAuthorizationList)@ + * 'Proto.CMS.Traderouting1_Fields.removeAccount' @:: Lens' AccountScopeRequest RemoveAccount@ + * 'Proto.CMS.Traderouting1_Fields.maybe'removeAccount' @:: Lens' AccountScopeRequest (Prelude.Maybe RemoveAccount)@ + * 'Proto.CMS.Traderouting1_Fields.accountAvailableServiceGroupListRequest' @:: Lens' AccountScopeRequest AccountAvailableServiceGroupListRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountAvailableServiceGroupListRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountAvailableServiceGroupListRequest)@ + * 'Proto.CMS.Traderouting1_Fields.accountServiceGroupListRequest' @:: Lens' AccountScopeRequest AccountServiceGroupListRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountServiceGroupListRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountServiceGroupListRequest)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountServiceGroupList' @:: Lens' AccountScopeRequest UpdateAccountServiceGroupList@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountServiceGroupList' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccountServiceGroupList)@ + * 'Proto.CMS.Traderouting1_Fields.billableExchangeListRequest' @:: Lens' AccountScopeRequest BillableExchangeListRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'billableExchangeListRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe BillableExchangeListRequest)@ + * 'Proto.CMS.Traderouting1_Fields.createAccountGroup' @:: Lens' AccountScopeRequest CreateAccountGroup@ + * 'Proto.CMS.Traderouting1_Fields.maybe'createAccountGroup' @:: Lens' AccountScopeRequest (Prelude.Maybe CreateAccountGroup)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountGroup' @:: Lens' AccountScopeRequest UpdateAccountGroup@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountGroup' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccountGroup)@ + * 'Proto.CMS.Traderouting1_Fields.removeAccountGroup' @:: Lens' AccountScopeRequest RemoveAccountGroup@ + * 'Proto.CMS.Traderouting1_Fields.maybe'removeAccountGroup' @:: Lens' AccountScopeRequest (Prelude.Maybe RemoveAccountGroup)@ + * 'Proto.CMS.Traderouting1_Fields.deleteAccountPositions' @:: Lens' AccountScopeRequest DeleteAccountPositions@ + * 'Proto.CMS.Traderouting1_Fields.maybe'deleteAccountPositions' @:: Lens' AccountScopeRequest (Prelude.Maybe DeleteAccountPositions)@ + * 'Proto.CMS.Traderouting1_Fields.accountTradingFeaturesRequest' @:: Lens' AccountScopeRequest AccountTradingFeaturesRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountTradingFeaturesRequest' @:: Lens' AccountScopeRequest (Prelude.Maybe AccountTradingFeaturesRequest)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountTradingFeatures' @:: Lens' AccountScopeRequest UpdateAccountTradingFeatures@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountTradingFeatures' @:: Lens' AccountScopeRequest (Prelude.Maybe UpdateAccountTradingFeatures)@ -} +data AccountScopeRequest + = AccountScopeRequest'_constructor {_AccountScopeRequest'accountInfoRequest :: !(Prelude.Maybe AccountInfoRequest), + _AccountScopeRequest'balanceRecordsRequest :: !(Prelude.Maybe BalanceRecordsRequest), + _AccountScopeRequest'createBalanceRecord :: !(Prelude.Maybe CreateBalanceRecord), + _AccountScopeRequest'updateBalanceRecord :: !(Prelude.Maybe UpdateBalanceRecord), + _AccountScopeRequest'accountRiskParametersRequest :: !(Prelude.Maybe AccountRiskParametersRequest), + _AccountScopeRequest'obsoleteUpdateRiskParameters :: !(Prelude.Maybe UpdateRiskParameters), + _AccountScopeRequest'accountSearchRequest :: !(Prelude.Maybe AccountSearchRequest), + _AccountScopeRequest'accountRouteListRequest :: !(Prelude.Maybe AccountRouteListRequest), + _AccountScopeRequest'accountUserAuthorizationListRequest :: !(Prelude.Maybe AccountUserAuthorizationListRequest), + _AccountScopeRequest'accountSettingsRequest :: !(Prelude.Maybe AccountSettingsRequest), + _AccountScopeRequest'accountAvailableExchangeGroupsRequest :: !(Prelude.Maybe AccountAvailableExchangeGroupsRequest), + _AccountScopeRequest'accountMarketLimitsRequest :: !(Prelude.Maybe AccountMarketLimitsRequest), + _AccountScopeRequest'accountPositionsRequest :: !(Prelude.Maybe AccountPositionsRequest), + _AccountScopeRequest'accountEquityRequest :: !(Prelude.Maybe AccountEquityRequest), + _AccountScopeRequest'accountCollateralRequest :: !(Prelude.Maybe AccountCollateralRequest), + _AccountScopeRequest'cloneAccount :: !(Prelude.Maybe CloneAccount), + _AccountScopeRequest'updateAccount :: !(Prelude.Maybe UpdateAccount), + _AccountScopeRequest'updateAccountSettings :: !(Prelude.Maybe UpdateAccountSettings), + _AccountScopeRequest'accountGroupRequest :: !(Prelude.Maybe AccountGroupRequest), + _AccountScopeRequest'updateAccountRiskParameters :: !(Prelude.Maybe UpdateAccountRiskParameters), + _AccountScopeRequest'accountAvailableRouteListRequest :: !(Prelude.Maybe AccountAvailableRouteListRequest), + _AccountScopeRequest'updateAccountRouteList :: !(Prelude.Maybe UpdateAccountRouteList), + _AccountScopeRequest'updateAccountMarketLimits :: !(Prelude.Maybe UpdateAccountMarketLimits), + _AccountScopeRequest'createAccount :: !(Prelude.Maybe CreateAccount), + _AccountScopeRequest'obsoleteAccountClusterRequest :: !(Prelude.Maybe AccountClusterRequest), + _AccountScopeRequest'obsoleteCreateAccountCluster :: !(Prelude.Maybe CreateAccountCluster), + _AccountScopeRequest'obsoleteUpdateAccountCluster :: !(Prelude.Maybe UpdateAccountCluster), + _AccountScopeRequest'obsoleteUpdateAccountClusterPriceOffsets :: !(Prelude.Maybe UpdateAccountClusterPriceOffsets), + _AccountScopeRequest'restoreAccount :: !(Prelude.Maybe RestoreAccount), + _AccountScopeRequest'accountTypeOverrideListRequest :: !(Prelude.Maybe AccountTypeOverrideListRequest), + _AccountScopeRequest'updateAccountTypeOverrideList :: !(Prelude.Maybe UpdateAccountTypeOverrideList), + _AccountScopeRequest'updateAccountUserAuthorizationList :: !(Prelude.Maybe UpdateAccountUserAuthorizationList), + _AccountScopeRequest'removeAccount :: !(Prelude.Maybe RemoveAccount), + _AccountScopeRequest'accountAvailableServiceGroupListRequest :: !(Prelude.Maybe AccountAvailableServiceGroupListRequest), + _AccountScopeRequest'accountServiceGroupListRequest :: !(Prelude.Maybe AccountServiceGroupListRequest), + _AccountScopeRequest'updateAccountServiceGroupList :: !(Prelude.Maybe UpdateAccountServiceGroupList), + _AccountScopeRequest'billableExchangeListRequest :: !(Prelude.Maybe BillableExchangeListRequest), + _AccountScopeRequest'createAccountGroup :: !(Prelude.Maybe CreateAccountGroup), + _AccountScopeRequest'updateAccountGroup :: !(Prelude.Maybe UpdateAccountGroup), + _AccountScopeRequest'removeAccountGroup :: !(Prelude.Maybe RemoveAccountGroup), + _AccountScopeRequest'deleteAccountPositions :: !(Prelude.Maybe DeleteAccountPositions), + _AccountScopeRequest'accountTradingFeaturesRequest :: !(Prelude.Maybe AccountTradingFeaturesRequest), + _AccountScopeRequest'updateAccountTradingFeatures :: !(Prelude.Maybe UpdateAccountTradingFeatures), + _AccountScopeRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountScopeRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountInfoRequest" AccountInfoRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountInfoRequest + (\ x__ y__ -> x__ {_AccountScopeRequest'accountInfoRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountInfoRequest" (Prelude.Maybe AccountInfoRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountInfoRequest + (\ x__ y__ -> x__ {_AccountScopeRequest'accountInfoRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "balanceRecordsRequest" BalanceRecordsRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'balanceRecordsRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'balanceRecordsRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'balanceRecordsRequest" (Prelude.Maybe BalanceRecordsRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'balanceRecordsRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'balanceRecordsRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "createBalanceRecord" CreateBalanceRecord where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'createBalanceRecord + (\ x__ y__ + -> x__ {_AccountScopeRequest'createBalanceRecord = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'createBalanceRecord" (Prelude.Maybe CreateBalanceRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'createBalanceRecord + (\ x__ y__ + -> x__ {_AccountScopeRequest'createBalanceRecord = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "updateBalanceRecord" UpdateBalanceRecord where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateBalanceRecord + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateBalanceRecord = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'updateBalanceRecord" (Prelude.Maybe UpdateBalanceRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateBalanceRecord + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateBalanceRecord = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountRiskParametersRequest" AccountRiskParametersRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountRiskParametersRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountRiskParametersRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountRiskParametersRequest" (Prelude.Maybe AccountRiskParametersRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountRiskParametersRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountRiskParametersRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "obsoleteUpdateRiskParameters" UpdateRiskParameters where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'obsoleteUpdateRiskParameters + (\ x__ y__ + -> x__ {_AccountScopeRequest'obsoleteUpdateRiskParameters = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'obsoleteUpdateRiskParameters" (Prelude.Maybe UpdateRiskParameters) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'obsoleteUpdateRiskParameters + (\ x__ y__ + -> x__ {_AccountScopeRequest'obsoleteUpdateRiskParameters = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountSearchRequest" AccountSearchRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountSearchRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountSearchRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountSearchRequest" (Prelude.Maybe AccountSearchRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountSearchRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountSearchRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountRouteListRequest" AccountRouteListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountRouteListRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountRouteListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountRouteListRequest" (Prelude.Maybe AccountRouteListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountRouteListRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountRouteListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountUserAuthorizationListRequest" AccountUserAuthorizationListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountUserAuthorizationListRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountUserAuthorizationListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountUserAuthorizationListRequest" (Prelude.Maybe AccountUserAuthorizationListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountUserAuthorizationListRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountUserAuthorizationListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountSettingsRequest" AccountSettingsRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountSettingsRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountSettingsRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountSettingsRequest" (Prelude.Maybe AccountSettingsRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountSettingsRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountSettingsRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountAvailableExchangeGroupsRequest" AccountAvailableExchangeGroupsRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountAvailableExchangeGroupsRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountAvailableExchangeGroupsRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountAvailableExchangeGroupsRequest" (Prelude.Maybe AccountAvailableExchangeGroupsRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountAvailableExchangeGroupsRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountAvailableExchangeGroupsRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountMarketLimitsRequest" AccountMarketLimitsRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountMarketLimitsRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountMarketLimitsRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountMarketLimitsRequest" (Prelude.Maybe AccountMarketLimitsRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountMarketLimitsRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountMarketLimitsRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountPositionsRequest" AccountPositionsRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountPositionsRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountPositionsRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountPositionsRequest" (Prelude.Maybe AccountPositionsRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountPositionsRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountPositionsRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountEquityRequest" AccountEquityRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountEquityRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountEquityRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountEquityRequest" (Prelude.Maybe AccountEquityRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountEquityRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountEquityRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountCollateralRequest" AccountCollateralRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountCollateralRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountCollateralRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountCollateralRequest" (Prelude.Maybe AccountCollateralRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountCollateralRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountCollateralRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "cloneAccount" CloneAccount where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'cloneAccount + (\ x__ y__ -> x__ {_AccountScopeRequest'cloneAccount = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'cloneAccount" (Prelude.Maybe CloneAccount) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'cloneAccount + (\ x__ y__ -> x__ {_AccountScopeRequest'cloneAccount = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "updateAccount" UpdateAccount where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccount + (\ x__ y__ -> x__ {_AccountScopeRequest'updateAccount = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'updateAccount" (Prelude.Maybe UpdateAccount) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccount + (\ x__ y__ -> x__ {_AccountScopeRequest'updateAccount = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "updateAccountSettings" UpdateAccountSettings where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountSettings + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountSettings = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'updateAccountSettings" (Prelude.Maybe UpdateAccountSettings) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountSettings + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountSettings = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountGroupRequest" AccountGroupRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountGroupRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountGroupRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountGroupRequest" (Prelude.Maybe AccountGroupRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountGroupRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountGroupRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "updateAccountRiskParameters" UpdateAccountRiskParameters where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountRiskParameters + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountRiskParameters = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'updateAccountRiskParameters" (Prelude.Maybe UpdateAccountRiskParameters) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountRiskParameters + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountRiskParameters = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountAvailableRouteListRequest" AccountAvailableRouteListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountAvailableRouteListRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountAvailableRouteListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountAvailableRouteListRequest" (Prelude.Maybe AccountAvailableRouteListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountAvailableRouteListRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountAvailableRouteListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "updateAccountRouteList" UpdateAccountRouteList where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountRouteList + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountRouteList = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'updateAccountRouteList" (Prelude.Maybe UpdateAccountRouteList) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountRouteList + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountRouteList = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "updateAccountMarketLimits" UpdateAccountMarketLimits where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountMarketLimits + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountMarketLimits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'updateAccountMarketLimits" (Prelude.Maybe UpdateAccountMarketLimits) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountMarketLimits + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountMarketLimits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "createAccount" CreateAccount where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'createAccount + (\ x__ y__ -> x__ {_AccountScopeRequest'createAccount = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'createAccount" (Prelude.Maybe CreateAccount) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'createAccount + (\ x__ y__ -> x__ {_AccountScopeRequest'createAccount = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "obsoleteAccountClusterRequest" AccountClusterRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'obsoleteAccountClusterRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'obsoleteAccountClusterRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'obsoleteAccountClusterRequest" (Prelude.Maybe AccountClusterRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'obsoleteAccountClusterRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'obsoleteAccountClusterRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "obsoleteCreateAccountCluster" CreateAccountCluster where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'obsoleteCreateAccountCluster + (\ x__ y__ + -> x__ {_AccountScopeRequest'obsoleteCreateAccountCluster = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'obsoleteCreateAccountCluster" (Prelude.Maybe CreateAccountCluster) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'obsoleteCreateAccountCluster + (\ x__ y__ + -> x__ {_AccountScopeRequest'obsoleteCreateAccountCluster = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "obsoleteUpdateAccountCluster" UpdateAccountCluster where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'obsoleteUpdateAccountCluster + (\ x__ y__ + -> x__ {_AccountScopeRequest'obsoleteUpdateAccountCluster = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'obsoleteUpdateAccountCluster" (Prelude.Maybe UpdateAccountCluster) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'obsoleteUpdateAccountCluster + (\ x__ y__ + -> x__ {_AccountScopeRequest'obsoleteUpdateAccountCluster = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "obsoleteUpdateAccountClusterPriceOffsets" UpdateAccountClusterPriceOffsets where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'obsoleteUpdateAccountClusterPriceOffsets + (\ x__ y__ + -> x__ + {_AccountScopeRequest'obsoleteUpdateAccountClusterPriceOffsets = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'obsoleteUpdateAccountClusterPriceOffsets" (Prelude.Maybe UpdateAccountClusterPriceOffsets) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'obsoleteUpdateAccountClusterPriceOffsets + (\ x__ y__ + -> x__ + {_AccountScopeRequest'obsoleteUpdateAccountClusterPriceOffsets = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "restoreAccount" RestoreAccount where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'restoreAccount + (\ x__ y__ -> x__ {_AccountScopeRequest'restoreAccount = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'restoreAccount" (Prelude.Maybe RestoreAccount) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'restoreAccount + (\ x__ y__ -> x__ {_AccountScopeRequest'restoreAccount = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountTypeOverrideListRequest" AccountTypeOverrideListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountTypeOverrideListRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountTypeOverrideListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountTypeOverrideListRequest" (Prelude.Maybe AccountTypeOverrideListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountTypeOverrideListRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountTypeOverrideListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "updateAccountTypeOverrideList" UpdateAccountTypeOverrideList where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountTypeOverrideList + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountTypeOverrideList = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'updateAccountTypeOverrideList" (Prelude.Maybe UpdateAccountTypeOverrideList) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountTypeOverrideList + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountTypeOverrideList = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "updateAccountUserAuthorizationList" UpdateAccountUserAuthorizationList where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountUserAuthorizationList + (\ x__ y__ + -> x__ + {_AccountScopeRequest'updateAccountUserAuthorizationList = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'updateAccountUserAuthorizationList" (Prelude.Maybe UpdateAccountUserAuthorizationList) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountUserAuthorizationList + (\ x__ y__ + -> x__ + {_AccountScopeRequest'updateAccountUserAuthorizationList = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "removeAccount" RemoveAccount where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'removeAccount + (\ x__ y__ -> x__ {_AccountScopeRequest'removeAccount = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'removeAccount" (Prelude.Maybe RemoveAccount) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'removeAccount + (\ x__ y__ -> x__ {_AccountScopeRequest'removeAccount = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountAvailableServiceGroupListRequest" AccountAvailableServiceGroupListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountAvailableServiceGroupListRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountAvailableServiceGroupListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountAvailableServiceGroupListRequest" (Prelude.Maybe AccountAvailableServiceGroupListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountAvailableServiceGroupListRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountAvailableServiceGroupListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountServiceGroupListRequest" AccountServiceGroupListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountServiceGroupListRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountServiceGroupListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountServiceGroupListRequest" (Prelude.Maybe AccountServiceGroupListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountServiceGroupListRequest + (\ x__ y__ + -> x__ + {_AccountScopeRequest'accountServiceGroupListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "updateAccountServiceGroupList" UpdateAccountServiceGroupList where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountServiceGroupList + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountServiceGroupList = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'updateAccountServiceGroupList" (Prelude.Maybe UpdateAccountServiceGroupList) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountServiceGroupList + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountServiceGroupList = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "billableExchangeListRequest" BillableExchangeListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'billableExchangeListRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'billableExchangeListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'billableExchangeListRequest" (Prelude.Maybe BillableExchangeListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'billableExchangeListRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'billableExchangeListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "createAccountGroup" CreateAccountGroup where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'createAccountGroup + (\ x__ y__ -> x__ {_AccountScopeRequest'createAccountGroup = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'createAccountGroup" (Prelude.Maybe CreateAccountGroup) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'createAccountGroup + (\ x__ y__ -> x__ {_AccountScopeRequest'createAccountGroup = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "updateAccountGroup" UpdateAccountGroup where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountGroup + (\ x__ y__ -> x__ {_AccountScopeRequest'updateAccountGroup = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'updateAccountGroup" (Prelude.Maybe UpdateAccountGroup) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountGroup + (\ x__ y__ -> x__ {_AccountScopeRequest'updateAccountGroup = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "removeAccountGroup" RemoveAccountGroup where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'removeAccountGroup + (\ x__ y__ -> x__ {_AccountScopeRequest'removeAccountGroup = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'removeAccountGroup" (Prelude.Maybe RemoveAccountGroup) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'removeAccountGroup + (\ x__ y__ -> x__ {_AccountScopeRequest'removeAccountGroup = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "deleteAccountPositions" DeleteAccountPositions where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'deleteAccountPositions + (\ x__ y__ + -> x__ {_AccountScopeRequest'deleteAccountPositions = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'deleteAccountPositions" (Prelude.Maybe DeleteAccountPositions) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'deleteAccountPositions + (\ x__ y__ + -> x__ {_AccountScopeRequest'deleteAccountPositions = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "accountTradingFeaturesRequest" AccountTradingFeaturesRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountTradingFeaturesRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountTradingFeaturesRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'accountTradingFeaturesRequest" (Prelude.Maybe AccountTradingFeaturesRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'accountTradingFeaturesRequest + (\ x__ y__ + -> x__ {_AccountScopeRequest'accountTradingFeaturesRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeRequest "updateAccountTradingFeatures" UpdateAccountTradingFeatures where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountTradingFeatures + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountTradingFeatures = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeRequest "maybe'updateAccountTradingFeatures" (Prelude.Maybe UpdateAccountTradingFeatures) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeRequest'updateAccountTradingFeatures + (\ x__ y__ + -> x__ {_AccountScopeRequest'updateAccountTradingFeatures = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountScopeRequest where + messageName _ = Data.Text.pack "traderouting_1.AccountScopeRequest" + packedMessageDescriptor _ + = "\n\ + \\DC3AccountScopeRequest\DC2T\n\ + \\DC4account_info_request\CAN\SOH \SOH(\v2\".traderouting_1.AccountInfoRequestR\DC2accountInfoRequest\DC2]\n\ + \\ETBbalance_records_request\CAN\STX \SOH(\v2%.traderouting_1.BalanceRecordsRequestR\NAKbalanceRecordsRequest\DC2W\n\ + \\NAKcreate_balance_record\CAN\ETX \SOH(\v2#.traderouting_1.CreateBalanceRecordR\DC3createBalanceRecord\DC2W\n\ + \\NAKupdate_balance_record\CAN\EOT \SOH(\v2#.traderouting_1.UpdateBalanceRecordR\DC3updateBalanceRecord\DC2s\n\ + \\USaccount_risk_parameters_request\CAN\ENQ \SOH(\v2,.traderouting_1.AccountRiskParametersRequestR\FSaccountRiskParametersRequest\DC2o\n\ + \\USobsolete_update_risk_parameters\CAN\ACK \SOH(\v2$.traderouting_1.UpdateRiskParametersR\FSobsoleteUpdateRiskParametersB\STX\CAN\SOH\DC2Z\n\ + \\SYNaccount_search_request\CAN\a \SOH(\v2$.traderouting_1.AccountSearchRequestR\DC4accountSearchRequest\DC2d\n\ + \\SUBaccount_route_list_request\CAN\b \SOH(\v2'.traderouting_1.AccountRouteListRequestR\ETBaccountRouteListRequest\DC2\137\SOH\n\ + \'account_user_authorization_list_request\CAN\t \SOH(\v23.traderouting_1.AccountUserAuthorizationListRequestR#accountUserAuthorizationListRequest\DC2`\n\ + \\CANaccount_settings_request\CAN\n\ + \ \SOH(\v2&.traderouting_1.AccountSettingsRequestR\SYNaccountSettingsRequest\DC2\143\SOH\n\ + \)account_available_exchange_groups_request\CAN\v \SOH(\v25.traderouting_1.AccountAvailableExchangeGroupsRequestR%accountAvailableExchangeGroupsRequest\DC2m\n\ + \\GSaccount_market_limits_request\CAN\f \SOH(\v2*.traderouting_1.AccountMarketLimitsRequestR\SUBaccountMarketLimitsRequest\DC2c\n\ + \\EMaccount_positions_request\CAN\r \SOH(\v2'.traderouting_1.AccountPositionsRequestR\ETBaccountPositionsRequest\DC2Z\n\ + \\SYNaccount_equity_request\CAN\SO \SOH(\v2$.traderouting_1.AccountEquityRequestR\DC4accountEquityRequest\DC2f\n\ + \\SUBaccount_collateral_request\CAN\SI \SOH(\v2(.traderouting_1.AccountCollateralRequestR\CANaccountCollateralRequest\DC2A\n\ + \\rclone_account\CAN\DLE \SOH(\v2\FS.traderouting_1.CloneAccountR\fcloneAccount\DC2D\n\ + \\SOupdate_account\CAN\DC1 \SOH(\v2\GS.traderouting_1.UpdateAccountR\rupdateAccount\DC2]\n\ + \\ETBupdate_account_settings\CAN\DC2 \SOH(\v2%.traderouting_1.UpdateAccountSettingsR\NAKupdateAccountSettings\DC2W\n\ + \\NAKaccount_group_request\CAN\DC3 \SOH(\v2#.traderouting_1.AccountGroupRequestR\DC3accountGroupRequest\DC2p\n\ + \\RSupdate_account_risk_parameters\CAN\DC4 \SOH(\v2+.traderouting_1.UpdateAccountRiskParametersR\ESCupdateAccountRiskParameters\DC2\128\SOH\n\ + \$account_available_route_list_request\CAN\NAK \SOH(\v20.traderouting_1.AccountAvailableRouteListRequestR accountAvailableRouteListRequest\DC2a\n\ + \\EMupdate_account_route_list\CAN\SYN \SOH(\v2&.traderouting_1.UpdateAccountRouteListR\SYNupdateAccountRouteList\DC2j\n\ + \\FSupdate_account_market_limits\CAN\ETB \SOH(\v2).traderouting_1.UpdateAccountMarketLimitsR\EMupdateAccountMarketLimits\DC2D\n\ + \\SOcreate_account\CAN\CAN \SOH(\v2\GS.traderouting_1.CreateAccountR\rcreateAccount\DC2r\n\ + \ obsolete_account_cluster_request\CAN\EM \SOH(\v2%.traderouting_1.AccountClusterRequestR\GSobsoleteAccountClusterRequestB\STX\CAN\SOH\DC2o\n\ + \\USobsolete_create_account_cluster\CAN\SUB \SOH(\v2$.traderouting_1.CreateAccountClusterR\FSobsoleteCreateAccountClusterB\STX\CAN\SOH\DC2o\n\ + \\USobsolete_update_account_cluster\CAN\ESC \SOH(\v2$.traderouting_1.UpdateAccountClusterR\FSobsoleteUpdateAccountClusterB\STX\CAN\SOH\DC2\149\SOH\n\ + \-obsolete_update_account_cluster_price_offsets\CAN\FS \SOH(\v20.traderouting_1.UpdateAccountClusterPriceOffsetsR(obsoleteUpdateAccountClusterPriceOffsetsB\STX\CAN\SOH\DC2G\n\ + \\SIrestore_account\CAN\GS \SOH(\v2\RS.traderouting_1.RestoreAccountR\SOrestoreAccount\DC2z\n\ + \\"account_type_override_list_request\CAN\RS \SOH(\v2..traderouting_1.AccountTypeOverrideListRequestR\RSaccountTypeOverrideListRequest\DC2w\n\ + \!update_account_type_override_list\CAN\US \SOH(\v2-.traderouting_1.UpdateAccountTypeOverrideListR\GSupdateAccountTypeOverrideList\DC2\134\SOH\n\ + \&update_account_user_authorization_list\CAN \SOH(\v22.traderouting_1.UpdateAccountUserAuthorizationListR\"updateAccountUserAuthorizationList\DC2D\n\ + \\SOremove_account\CAN! \SOH(\v2\GS.traderouting_1.RemoveAccountR\rremoveAccount\DC2\150\SOH\n\ + \,account_available_service_group_list_request\CAN\" \SOH(\v27.traderouting_1.AccountAvailableServiceGroupListRequestR'accountAvailableServiceGroupListRequest\DC2z\n\ + \\"account_service_group_list_request\CAN# \SOH(\v2..traderouting_1.AccountServiceGroupListRequestR\RSaccountServiceGroupListRequest\DC2w\n\ + \!update_account_service_group_list\CAN$ \SOH(\v2-.traderouting_1.UpdateAccountServiceGroupListR\GSupdateAccountServiceGroupList\DC2p\n\ + \\RSbillable_exchange_list_request\CAN% \SOH(\v2+.traderouting_1.BillableExchangeListRequestR\ESCbillableExchangeListRequest\DC2T\n\ + \\DC4create_account_group\CAN& \SOH(\v2\".traderouting_1.CreateAccountGroupR\DC2createAccountGroup\DC2T\n\ + \\DC4update_account_group\CAN' \SOH(\v2\".traderouting_1.UpdateAccountGroupR\DC2updateAccountGroup\DC2T\n\ + \\DC4remove_account_group\CAN( \SOH(\v2\".traderouting_1.RemoveAccountGroupR\DC2removeAccountGroup\DC2`\n\ + \\CANdelete_account_positions\CAN) \SOH(\v2&.traderouting_1.DeleteAccountPositionsR\SYNdeleteAccountPositions\DC2v\n\ + \ account_trading_features_request\CAN* \SOH(\v2-.traderouting_1.AccountTradingFeaturesRequestR\GSaccountTradingFeaturesRequest\DC2s\n\ + \\USupdate_account_trading_features\CAN+ \SOH(\v2,.traderouting_1.UpdateAccountTradingFeaturesR\FSupdateAccountTradingFeatures" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountInfoRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_info_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountInfoRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountInfoRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + balanceRecordsRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "balance_records_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor BalanceRecordsRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'balanceRecordsRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + createBalanceRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_balance_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateBalanceRecord) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createBalanceRecord")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + updateBalanceRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_balance_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateBalanceRecord) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateBalanceRecord")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountRiskParametersRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_risk_parameters_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountRiskParametersRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountRiskParametersRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + obsoleteUpdateRiskParameters__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_update_risk_parameters" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateRiskParameters) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateRiskParameters")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountSearchRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_search_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountSearchRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountSearchRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountRouteListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_route_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountRouteListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountRouteListRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountUserAuthorizationListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_user_authorization_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountUserAuthorizationListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountUserAuthorizationListRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountSettingsRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_settings_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountSettingsRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountSettingsRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountAvailableExchangeGroupsRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_available_exchange_groups_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountAvailableExchangeGroupsRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountAvailableExchangeGroupsRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountMarketLimitsRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_market_limits_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountMarketLimitsRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountMarketLimitsRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountPositionsRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_positions_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountPositionsRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountPositionsRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountEquityRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_equity_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountEquityRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountEquityRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountCollateralRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_collateral_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountCollateralRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountCollateralRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + cloneAccount__field_descriptor + = Data.ProtoLens.FieldDescriptor + "clone_account" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CloneAccount) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cloneAccount")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + updateAccount__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccount) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateAccount")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + updateAccountSettings__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_settings" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountSettings) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateAccountSettings")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountGroupRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_group_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountGroupRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountGroupRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + updateAccountRiskParameters__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_risk_parameters" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountRiskParameters) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountRiskParameters")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountAvailableRouteListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_available_route_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountAvailableRouteListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountAvailableRouteListRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + updateAccountRouteList__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_route_list" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountRouteList) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateAccountRouteList")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + updateAccountMarketLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_market_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountMarketLimits) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateAccountMarketLimits")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + createAccount__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_account" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateAccount) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createAccount")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + obsoleteAccountClusterRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_account_cluster_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountClusterRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteAccountClusterRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + obsoleteCreateAccountCluster__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_create_account_cluster" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateAccountCluster) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteCreateAccountCluster")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + obsoleteUpdateAccountCluster__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_update_account_cluster" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountCluster) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateAccountCluster")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + obsoleteUpdateAccountClusterPriceOffsets__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_update_account_cluster_price_offsets" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountClusterPriceOffsets) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateAccountClusterPriceOffsets")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + restoreAccount__field_descriptor + = Data.ProtoLens.FieldDescriptor + "restore_account" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RestoreAccount) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'restoreAccount")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountTypeOverrideListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_type_override_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountTypeOverrideListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountTypeOverrideListRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + updateAccountTypeOverrideList__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_type_override_list" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountTypeOverrideList) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountTypeOverrideList")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + updateAccountUserAuthorizationList__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_user_authorization_list" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountUserAuthorizationList) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountUserAuthorizationList")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + removeAccount__field_descriptor + = Data.ProtoLens.FieldDescriptor + "remove_account" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RemoveAccount) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removeAccount")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountAvailableServiceGroupListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_available_service_group_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountAvailableServiceGroupListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountAvailableServiceGroupListRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountServiceGroupListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_service_group_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountServiceGroupListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountServiceGroupListRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + updateAccountServiceGroupList__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_service_group_list" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountServiceGroupList) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountServiceGroupList")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + billableExchangeListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "billable_exchange_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor BillableExchangeListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'billableExchangeListRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + createAccountGroup__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_account_group" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateAccountGroup) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createAccountGroup")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + updateAccountGroup__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_group" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountGroup) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateAccountGroup")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + removeAccountGroup__field_descriptor + = Data.ProtoLens.FieldDescriptor + "remove_account_group" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RemoveAccountGroup) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removeAccountGroup")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + deleteAccountPositions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "delete_account_positions" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor DeleteAccountPositions) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'deleteAccountPositions")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + accountTradingFeaturesRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_trading_features_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountTradingFeaturesRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountTradingFeaturesRequest")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + updateAccountTradingFeatures__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_trading_features" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountTradingFeatures) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountTradingFeatures")) :: + Data.ProtoLens.FieldDescriptor AccountScopeRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountInfoRequest__field_descriptor), + (Data.ProtoLens.Tag 2, balanceRecordsRequest__field_descriptor), + (Data.ProtoLens.Tag 3, createBalanceRecord__field_descriptor), + (Data.ProtoLens.Tag 4, updateBalanceRecord__field_descriptor), + (Data.ProtoLens.Tag 5, + accountRiskParametersRequest__field_descriptor), + (Data.ProtoLens.Tag 6, + obsoleteUpdateRiskParameters__field_descriptor), + (Data.ProtoLens.Tag 7, accountSearchRequest__field_descriptor), + (Data.ProtoLens.Tag 8, accountRouteListRequest__field_descriptor), + (Data.ProtoLens.Tag 9, + accountUserAuthorizationListRequest__field_descriptor), + (Data.ProtoLens.Tag 10, accountSettingsRequest__field_descriptor), + (Data.ProtoLens.Tag 11, + accountAvailableExchangeGroupsRequest__field_descriptor), + (Data.ProtoLens.Tag 12, + accountMarketLimitsRequest__field_descriptor), + (Data.ProtoLens.Tag 13, accountPositionsRequest__field_descriptor), + (Data.ProtoLens.Tag 14, accountEquityRequest__field_descriptor), + (Data.ProtoLens.Tag 15, + accountCollateralRequest__field_descriptor), + (Data.ProtoLens.Tag 16, cloneAccount__field_descriptor), + (Data.ProtoLens.Tag 17, updateAccount__field_descriptor), + (Data.ProtoLens.Tag 18, updateAccountSettings__field_descriptor), + (Data.ProtoLens.Tag 19, accountGroupRequest__field_descriptor), + (Data.ProtoLens.Tag 20, + updateAccountRiskParameters__field_descriptor), + (Data.ProtoLens.Tag 21, + accountAvailableRouteListRequest__field_descriptor), + (Data.ProtoLens.Tag 22, updateAccountRouteList__field_descriptor), + (Data.ProtoLens.Tag 23, + updateAccountMarketLimits__field_descriptor), + (Data.ProtoLens.Tag 24, createAccount__field_descriptor), + (Data.ProtoLens.Tag 25, + obsoleteAccountClusterRequest__field_descriptor), + (Data.ProtoLens.Tag 26, + obsoleteCreateAccountCluster__field_descriptor), + (Data.ProtoLens.Tag 27, + obsoleteUpdateAccountCluster__field_descriptor), + (Data.ProtoLens.Tag 28, + obsoleteUpdateAccountClusterPriceOffsets__field_descriptor), + (Data.ProtoLens.Tag 29, restoreAccount__field_descriptor), + (Data.ProtoLens.Tag 30, + accountTypeOverrideListRequest__field_descriptor), + (Data.ProtoLens.Tag 31, + updateAccountTypeOverrideList__field_descriptor), + (Data.ProtoLens.Tag 32, + updateAccountUserAuthorizationList__field_descriptor), + (Data.ProtoLens.Tag 33, removeAccount__field_descriptor), + (Data.ProtoLens.Tag 34, + accountAvailableServiceGroupListRequest__field_descriptor), + (Data.ProtoLens.Tag 35, + accountServiceGroupListRequest__field_descriptor), + (Data.ProtoLens.Tag 36, + updateAccountServiceGroupList__field_descriptor), + (Data.ProtoLens.Tag 37, + billableExchangeListRequest__field_descriptor), + (Data.ProtoLens.Tag 38, createAccountGroup__field_descriptor), + (Data.ProtoLens.Tag 39, updateAccountGroup__field_descriptor), + (Data.ProtoLens.Tag 40, removeAccountGroup__field_descriptor), + (Data.ProtoLens.Tag 41, deleteAccountPositions__field_descriptor), + (Data.ProtoLens.Tag 42, + accountTradingFeaturesRequest__field_descriptor), + (Data.ProtoLens.Tag 43, + updateAccountTradingFeatures__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountScopeRequest'_unknownFields + (\ x__ y__ -> x__ {_AccountScopeRequest'_unknownFields = y__}) + defMessage + = AccountScopeRequest'_constructor + {_AccountScopeRequest'accountInfoRequest = Prelude.Nothing, + _AccountScopeRequest'balanceRecordsRequest = Prelude.Nothing, + _AccountScopeRequest'createBalanceRecord = Prelude.Nothing, + _AccountScopeRequest'updateBalanceRecord = Prelude.Nothing, + _AccountScopeRequest'accountRiskParametersRequest = Prelude.Nothing, + _AccountScopeRequest'obsoleteUpdateRiskParameters = Prelude.Nothing, + _AccountScopeRequest'accountSearchRequest = Prelude.Nothing, + _AccountScopeRequest'accountRouteListRequest = Prelude.Nothing, + _AccountScopeRequest'accountUserAuthorizationListRequest = Prelude.Nothing, + _AccountScopeRequest'accountSettingsRequest = Prelude.Nothing, + _AccountScopeRequest'accountAvailableExchangeGroupsRequest = Prelude.Nothing, + _AccountScopeRequest'accountMarketLimitsRequest = Prelude.Nothing, + _AccountScopeRequest'accountPositionsRequest = Prelude.Nothing, + _AccountScopeRequest'accountEquityRequest = Prelude.Nothing, + _AccountScopeRequest'accountCollateralRequest = Prelude.Nothing, + _AccountScopeRequest'cloneAccount = Prelude.Nothing, + _AccountScopeRequest'updateAccount = Prelude.Nothing, + _AccountScopeRequest'updateAccountSettings = Prelude.Nothing, + _AccountScopeRequest'accountGroupRequest = Prelude.Nothing, + _AccountScopeRequest'updateAccountRiskParameters = Prelude.Nothing, + _AccountScopeRequest'accountAvailableRouteListRequest = Prelude.Nothing, + _AccountScopeRequest'updateAccountRouteList = Prelude.Nothing, + _AccountScopeRequest'updateAccountMarketLimits = Prelude.Nothing, + _AccountScopeRequest'createAccount = Prelude.Nothing, + _AccountScopeRequest'obsoleteAccountClusterRequest = Prelude.Nothing, + _AccountScopeRequest'obsoleteCreateAccountCluster = Prelude.Nothing, + _AccountScopeRequest'obsoleteUpdateAccountCluster = Prelude.Nothing, + _AccountScopeRequest'obsoleteUpdateAccountClusterPriceOffsets = Prelude.Nothing, + _AccountScopeRequest'restoreAccount = Prelude.Nothing, + _AccountScopeRequest'accountTypeOverrideListRequest = Prelude.Nothing, + _AccountScopeRequest'updateAccountTypeOverrideList = Prelude.Nothing, + _AccountScopeRequest'updateAccountUserAuthorizationList = Prelude.Nothing, + _AccountScopeRequest'removeAccount = Prelude.Nothing, + _AccountScopeRequest'accountAvailableServiceGroupListRequest = Prelude.Nothing, + _AccountScopeRequest'accountServiceGroupListRequest = Prelude.Nothing, + _AccountScopeRequest'updateAccountServiceGroupList = Prelude.Nothing, + _AccountScopeRequest'billableExchangeListRequest = Prelude.Nothing, + _AccountScopeRequest'createAccountGroup = Prelude.Nothing, + _AccountScopeRequest'updateAccountGroup = Prelude.Nothing, + _AccountScopeRequest'removeAccountGroup = Prelude.Nothing, + _AccountScopeRequest'deleteAccountPositions = Prelude.Nothing, + _AccountScopeRequest'accountTradingFeaturesRequest = Prelude.Nothing, + _AccountScopeRequest'updateAccountTradingFeatures = Prelude.Nothing, + _AccountScopeRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountScopeRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AccountScopeRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_info_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountInfoRequest") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "balance_records_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"balanceRecordsRequest") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_balance_record" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"createBalanceRecord") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_balance_record" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateBalanceRecord") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_risk_parameters_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountRiskParametersRequest") y + x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_update_risk_parameters" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteUpdateRiskParameters") y + x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_search_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountSearchRequest") y x) + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_route_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountRouteListRequest") y x) + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_user_authorization_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"accountUserAuthorizationListRequest") + y x) + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_settings_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountSettingsRequest") y x) + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_available_exchange_groups_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"accountAvailableExchangeGroupsRequest") + y x) + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_market_limits_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountMarketLimitsRequest") y x) + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_positions_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountPositionsRequest") y x) + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_equity_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountEquityRequest") y x) + 122 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_collateral_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountCollateralRequest") y x) + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "clone_account" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"cloneAccount") y x) + 138 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccount") y x) + 146 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_settings" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountSettings") y x) + 154 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_group_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountGroupRequest") y x) + 162 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_risk_parameters" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountRiskParameters") y + x) + 170 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_available_route_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"accountAvailableRouteListRequest") + y x) + 178 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_route_list" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountRouteList") y x) + 186 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_market_limits" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountMarketLimits") y x) + 194 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_account" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"createAccount") y x) + 202 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_account_cluster_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteAccountClusterRequest") y + x) + 210 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_create_account_cluster" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCreateAccountCluster") y + x) + 218 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_update_account_cluster" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteUpdateAccountCluster") y + x) + 226 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_update_account_cluster_price_offsets" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"obsoleteUpdateAccountClusterPriceOffsets") + y x) + 234 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "restore_account" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"restoreAccount") y x) + 242 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_type_override_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountTypeOverrideListRequest") + y x) + 250 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_type_override_list" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountTypeOverrideList") y + x) + 258 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_user_authorization_list" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"updateAccountUserAuthorizationList") + y x) + 266 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "remove_account" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"removeAccount") y x) + 274 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_available_service_group_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"accountAvailableServiceGroupListRequest") + y x) + 282 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_service_group_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountServiceGroupListRequest") + y x) + 290 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_service_group_list" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountServiceGroupList") y + x) + 298 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "billable_exchange_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"billableExchangeListRequest") y + x) + 306 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_account_group" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"createAccountGroup") y x) + 314 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_group" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountGroup") y x) + 322 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "remove_account_group" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"removeAccountGroup") y x) + 330 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "delete_account_positions" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"deleteAccountPositions") y x) + 338 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_trading_features_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountTradingFeaturesRequest") y + x) + 346 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_trading_features" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountTradingFeatures") y + x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountScopeRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountInfoRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'balanceRecordsRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'createBalanceRecord") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'updateBalanceRecord") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountRiskParametersRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateRiskParameters") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountSearchRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountRouteListRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountUserAuthorizationListRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountSettingsRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountAvailableExchangeGroupsRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountMarketLimitsRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountPositionsRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountEquityRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountCollateralRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'cloneAccount") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccount") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountSettings") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 146) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountGroupRequest") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 154) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountRiskParameters") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 162) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountAvailableRouteListRequest") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 170) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountRouteList") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 178) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountMarketLimits") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 186) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'createAccount") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 194) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteAccountClusterRequest") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 202) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteCreateAccountCluster") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 210) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateAccountCluster") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 218) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateAccountClusterPriceOffsets") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 226) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'restoreAccount") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 234) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountTypeOverrideListRequest") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 242) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountTypeOverrideList") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 250) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountUserAuthorizationList") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 258) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'removeAccount") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 266) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountAvailableServiceGroupListRequest") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 274) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountServiceGroupListRequest") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 282) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountServiceGroupList") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 290) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'billableExchangeListRequest") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 298) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'createAccountGroup") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 306) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountGroup") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 314) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'removeAccountGroup") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 322) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'deleteAccountPositions") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 330) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountTradingFeaturesRequest") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 338) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountTradingFeatures") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 346) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))))))))))))))))))))))))))))))) +instance Control.DeepSeq.NFData AccountScopeRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountScopeRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountInfoRequest x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'balanceRecordsRequest x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'createBalanceRecord x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'updateBalanceRecord x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountRiskParametersRequest x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'obsoleteUpdateRiskParameters x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountSearchRequest x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountRouteListRequest x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountUserAuthorizationListRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountSettingsRequest x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountAvailableExchangeGroupsRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountMarketLimitsRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountPositionsRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountEquityRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountCollateralRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'cloneAccount x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'updateAccount + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'updateAccountSettings + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountGroupRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'updateAccountRiskParameters + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountAvailableRouteListRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'updateAccountRouteList + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'updateAccountMarketLimits + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'createAccount + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'obsoleteAccountClusterRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'obsoleteCreateAccountCluster + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'obsoleteUpdateAccountCluster + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'obsoleteUpdateAccountClusterPriceOffsets + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'restoreAccount + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountTypeOverrideListRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'updateAccountTypeOverrideList + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'updateAccountUserAuthorizationList + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'removeAccount + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountAvailableServiceGroupListRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountServiceGroupListRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'updateAccountServiceGroupList + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'billableExchangeListRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'createAccountGroup + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'updateAccountGroup + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'removeAccountGroup + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'deleteAccountPositions + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'accountTradingFeaturesRequest + x__) + (Control.DeepSeq.deepseq + (_AccountScopeRequest'updateAccountTradingFeatures + x__) + ()))))))))))))))))))))))))))))))))))))))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountInfoResult' @:: Lens' AccountScopeResult AccountInfoResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountInfoResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountInfoResult)@ + * 'Proto.CMS.Traderouting1_Fields.balanceRecordsResult' @:: Lens' AccountScopeResult BalanceRecordsResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'balanceRecordsResult' @:: Lens' AccountScopeResult (Prelude.Maybe BalanceRecordsResult)@ + * 'Proto.CMS.Traderouting1_Fields.createBalanceRecordResult' @:: Lens' AccountScopeResult CreateBalanceRecordResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'createBalanceRecordResult' @:: Lens' AccountScopeResult (Prelude.Maybe CreateBalanceRecordResult)@ + * 'Proto.CMS.Traderouting1_Fields.updateBalanceRecordResult' @:: Lens' AccountScopeResult UpdateBalanceRecordResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateBalanceRecordResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateBalanceRecordResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountRiskParametersResult' @:: Lens' AccountScopeResult AccountRiskParametersResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountRiskParametersResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountRiskParametersResult)@ + * 'Proto.CMS.Traderouting1_Fields.updateRiskParametersResult' @:: Lens' AccountScopeResult UpdateRiskParametersResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateRiskParametersResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateRiskParametersResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountSearchResult' @:: Lens' AccountScopeResult AccountSearchResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountSearchResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountSearchResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountRouteListResult' @:: Lens' AccountScopeResult AccountRouteListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountRouteListResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountRouteListResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountUserAuthorizationListResult' @:: Lens' AccountScopeResult AccountUserAuthorizationListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountUserAuthorizationListResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountUserAuthorizationListResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountSettingsResult' @:: Lens' AccountScopeResult AccountSettingsResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountSettingsResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountSettingsResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountExchangeGroupsResult' @:: Lens' AccountScopeResult AccountExchangeGroupsResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountExchangeGroupsResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountExchangeGroupsResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountMarketLimitsResult' @:: Lens' AccountScopeResult AccountMarketLimitsResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountMarketLimitsResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountMarketLimitsResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountPositionsResult' @:: Lens' AccountScopeResult AccountPositionsResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountPositionsResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountPositionsResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountEquityResult' @:: Lens' AccountScopeResult AccountEquityResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountEquityResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountEquityResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountCollateralResult' @:: Lens' AccountScopeResult AccountCollateralResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountCollateralResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountCollateralResult)@ + * 'Proto.CMS.Traderouting1_Fields.cloneAccountResult' @:: Lens' AccountScopeResult CloneAccountResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'cloneAccountResult' @:: Lens' AccountScopeResult (Prelude.Maybe CloneAccountResult)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountResult' @:: Lens' AccountScopeResult UpdateAccountResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateAccountResult)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountSettingsResult' @:: Lens' AccountScopeResult UpdateAccountSettingsResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountSettingsResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateAccountSettingsResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountGroupResult' @:: Lens' AccountScopeResult AccountGroupResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountGroupResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountGroupResult)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountRiskParametersResult' @:: Lens' AccountScopeResult UpdateAccountRiskParametersResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountRiskParametersResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateAccountRiskParametersResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountAvailableRouteListResult' @:: Lens' AccountScopeResult AccountAvailableRouteListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountAvailableRouteListResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountAvailableRouteListResult)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountRouteListResult' @:: Lens' AccountScopeResult UpdateAccountRouteListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountRouteListResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateAccountRouteListResult)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountMarketLimitsResult' @:: Lens' AccountScopeResult UpdateAccountMarketLimitsResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountMarketLimitsResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateAccountMarketLimitsResult)@ + * 'Proto.CMS.Traderouting1_Fields.createAccountResult' @:: Lens' AccountScopeResult CreateAccountResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'createAccountResult' @:: Lens' AccountScopeResult (Prelude.Maybe CreateAccountResult)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteAccountClusterResult' @:: Lens' AccountScopeResult AccountClusterResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteAccountClusterResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountClusterResult)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteCreateAccountClusterResult' @:: Lens' AccountScopeResult CreateAccountClusterResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteCreateAccountClusterResult' @:: Lens' AccountScopeResult (Prelude.Maybe CreateAccountClusterResult)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteUpdateAccountClusterResult' @:: Lens' AccountScopeResult UpdateAccountClusterResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteUpdateAccountClusterResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateAccountClusterResult)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteUpdateAccountClusterPriceOffsetsResult' @:: Lens' AccountScopeResult UpdateAccountClusterPriceOffsetsResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteUpdateAccountClusterPriceOffsetsResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateAccountClusterPriceOffsetsResult)@ + * 'Proto.CMS.Traderouting1_Fields.restoreAccountResult' @:: Lens' AccountScopeResult RestoreAccountResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'restoreAccountResult' @:: Lens' AccountScopeResult (Prelude.Maybe RestoreAccountResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountTypeOverrideListResult' @:: Lens' AccountScopeResult AccountTypeOverrideListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountTypeOverrideListResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountTypeOverrideListResult)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountTypeOverrideListResult' @:: Lens' AccountScopeResult UpdateAccountTypeOverrideListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountTypeOverrideListResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateAccountTypeOverrideListResult)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountUserAuthorizationListResult' @:: Lens' AccountScopeResult UpdateAccountUserAuthorizationListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountUserAuthorizationListResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateAccountUserAuthorizationListResult)@ + * 'Proto.CMS.Traderouting1_Fields.removeAccountResult' @:: Lens' AccountScopeResult RemoveAccountResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'removeAccountResult' @:: Lens' AccountScopeResult (Prelude.Maybe RemoveAccountResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountAvailableServiceGroupListResult' @:: Lens' AccountScopeResult AccountAvailableServiceGroupListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountAvailableServiceGroupListResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountAvailableServiceGroupListResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountServiceGroupListResult' @:: Lens' AccountScopeResult AccountServiceGroupListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountServiceGroupListResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountServiceGroupListResult)@ + * 'Proto.CMS.Traderouting1_Fields.updateAccountServiceGroupListResult' @:: Lens' AccountScopeResult UpdateAccountServiceGroupListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateAccountServiceGroupListResult' @:: Lens' AccountScopeResult (Prelude.Maybe UpdateAccountServiceGroupListResult)@ + * 'Proto.CMS.Traderouting1_Fields.billableExchangeListResult' @:: Lens' AccountScopeResult BillableExchangeListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'billableExchangeListResult' @:: Lens' AccountScopeResult (Prelude.Maybe BillableExchangeListResult)@ + * 'Proto.CMS.Traderouting1_Fields.createAccountGroupResult' @:: Lens' AccountScopeResult CreateAccountGroupResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'createAccountGroupResult' @:: Lens' AccountScopeResult (Prelude.Maybe CreateAccountGroupResult)@ + * 'Proto.CMS.Traderouting1_Fields.accountTradingFeaturesResult' @:: Lens' AccountScopeResult AccountTradingFeaturesResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountTradingFeaturesResult' @:: Lens' AccountScopeResult (Prelude.Maybe AccountTradingFeaturesResult)@ -} +data AccountScopeResult + = AccountScopeResult'_constructor {_AccountScopeResult'accountInfoResult :: !(Prelude.Maybe AccountInfoResult), + _AccountScopeResult'balanceRecordsResult :: !(Prelude.Maybe BalanceRecordsResult), + _AccountScopeResult'createBalanceRecordResult :: !(Prelude.Maybe CreateBalanceRecordResult), + _AccountScopeResult'updateBalanceRecordResult :: !(Prelude.Maybe UpdateBalanceRecordResult), + _AccountScopeResult'accountRiskParametersResult :: !(Prelude.Maybe AccountRiskParametersResult), + _AccountScopeResult'updateRiskParametersResult :: !(Prelude.Maybe UpdateRiskParametersResult), + _AccountScopeResult'accountSearchResult :: !(Prelude.Maybe AccountSearchResult), + _AccountScopeResult'accountRouteListResult :: !(Prelude.Maybe AccountRouteListResult), + _AccountScopeResult'accountUserAuthorizationListResult :: !(Prelude.Maybe AccountUserAuthorizationListResult), + _AccountScopeResult'accountSettingsResult :: !(Prelude.Maybe AccountSettingsResult), + _AccountScopeResult'accountExchangeGroupsResult :: !(Prelude.Maybe AccountExchangeGroupsResult), + _AccountScopeResult'accountMarketLimitsResult :: !(Prelude.Maybe AccountMarketLimitsResult), + _AccountScopeResult'accountPositionsResult :: !(Prelude.Maybe AccountPositionsResult), + _AccountScopeResult'accountEquityResult :: !(Prelude.Maybe AccountEquityResult), + _AccountScopeResult'accountCollateralResult :: !(Prelude.Maybe AccountCollateralResult), + _AccountScopeResult'cloneAccountResult :: !(Prelude.Maybe CloneAccountResult), + _AccountScopeResult'updateAccountResult :: !(Prelude.Maybe UpdateAccountResult), + _AccountScopeResult'updateAccountSettingsResult :: !(Prelude.Maybe UpdateAccountSettingsResult), + _AccountScopeResult'accountGroupResult :: !(Prelude.Maybe AccountGroupResult), + _AccountScopeResult'updateAccountRiskParametersResult :: !(Prelude.Maybe UpdateAccountRiskParametersResult), + _AccountScopeResult'accountAvailableRouteListResult :: !(Prelude.Maybe AccountAvailableRouteListResult), + _AccountScopeResult'updateAccountRouteListResult :: !(Prelude.Maybe UpdateAccountRouteListResult), + _AccountScopeResult'updateAccountMarketLimitsResult :: !(Prelude.Maybe UpdateAccountMarketLimitsResult), + _AccountScopeResult'createAccountResult :: !(Prelude.Maybe CreateAccountResult), + _AccountScopeResult'obsoleteAccountClusterResult :: !(Prelude.Maybe AccountClusterResult), + _AccountScopeResult'obsoleteCreateAccountClusterResult :: !(Prelude.Maybe CreateAccountClusterResult), + _AccountScopeResult'obsoleteUpdateAccountClusterResult :: !(Prelude.Maybe UpdateAccountClusterResult), + _AccountScopeResult'obsoleteUpdateAccountClusterPriceOffsetsResult :: !(Prelude.Maybe UpdateAccountClusterPriceOffsetsResult), + _AccountScopeResult'restoreAccountResult :: !(Prelude.Maybe RestoreAccountResult), + _AccountScopeResult'accountTypeOverrideListResult :: !(Prelude.Maybe AccountTypeOverrideListResult), + _AccountScopeResult'updateAccountTypeOverrideListResult :: !(Prelude.Maybe UpdateAccountTypeOverrideListResult), + _AccountScopeResult'updateAccountUserAuthorizationListResult :: !(Prelude.Maybe UpdateAccountUserAuthorizationListResult), + _AccountScopeResult'removeAccountResult :: !(Prelude.Maybe RemoveAccountResult), + _AccountScopeResult'accountAvailableServiceGroupListResult :: !(Prelude.Maybe AccountAvailableServiceGroupListResult), + _AccountScopeResult'accountServiceGroupListResult :: !(Prelude.Maybe AccountServiceGroupListResult), + _AccountScopeResult'updateAccountServiceGroupListResult :: !(Prelude.Maybe UpdateAccountServiceGroupListResult), + _AccountScopeResult'billableExchangeListResult :: !(Prelude.Maybe BillableExchangeListResult), + _AccountScopeResult'createAccountGroupResult :: !(Prelude.Maybe CreateAccountGroupResult), + _AccountScopeResult'accountTradingFeaturesResult :: !(Prelude.Maybe AccountTradingFeaturesResult), + _AccountScopeResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountScopeResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountInfoResult" AccountInfoResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountInfoResult + (\ x__ y__ -> x__ {_AccountScopeResult'accountInfoResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountInfoResult" (Prelude.Maybe AccountInfoResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountInfoResult + (\ x__ y__ -> x__ {_AccountScopeResult'accountInfoResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "balanceRecordsResult" BalanceRecordsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'balanceRecordsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'balanceRecordsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'balanceRecordsResult" (Prelude.Maybe BalanceRecordsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'balanceRecordsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'balanceRecordsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "createBalanceRecordResult" CreateBalanceRecordResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'createBalanceRecordResult + (\ x__ y__ + -> x__ {_AccountScopeResult'createBalanceRecordResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'createBalanceRecordResult" (Prelude.Maybe CreateBalanceRecordResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'createBalanceRecordResult + (\ x__ y__ + -> x__ {_AccountScopeResult'createBalanceRecordResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "updateBalanceRecordResult" UpdateBalanceRecordResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateBalanceRecordResult + (\ x__ y__ + -> x__ {_AccountScopeResult'updateBalanceRecordResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'updateBalanceRecordResult" (Prelude.Maybe UpdateBalanceRecordResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateBalanceRecordResult + (\ x__ y__ + -> x__ {_AccountScopeResult'updateBalanceRecordResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountRiskParametersResult" AccountRiskParametersResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountRiskParametersResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountRiskParametersResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountRiskParametersResult" (Prelude.Maybe AccountRiskParametersResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountRiskParametersResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountRiskParametersResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "updateRiskParametersResult" UpdateRiskParametersResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateRiskParametersResult + (\ x__ y__ + -> x__ {_AccountScopeResult'updateRiskParametersResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'updateRiskParametersResult" (Prelude.Maybe UpdateRiskParametersResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateRiskParametersResult + (\ x__ y__ + -> x__ {_AccountScopeResult'updateRiskParametersResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountSearchResult" AccountSearchResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountSearchResult + (\ x__ y__ -> x__ {_AccountScopeResult'accountSearchResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountSearchResult" (Prelude.Maybe AccountSearchResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountSearchResult + (\ x__ y__ -> x__ {_AccountScopeResult'accountSearchResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountRouteListResult" AccountRouteListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountRouteListResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountRouteListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountRouteListResult" (Prelude.Maybe AccountRouteListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountRouteListResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountRouteListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountUserAuthorizationListResult" AccountUserAuthorizationListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountUserAuthorizationListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'accountUserAuthorizationListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountUserAuthorizationListResult" (Prelude.Maybe AccountUserAuthorizationListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountUserAuthorizationListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'accountUserAuthorizationListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountSettingsResult" AccountSettingsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountSettingsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountSettingsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountSettingsResult" (Prelude.Maybe AccountSettingsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountSettingsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountSettingsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountExchangeGroupsResult" AccountExchangeGroupsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountExchangeGroupsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountExchangeGroupsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountExchangeGroupsResult" (Prelude.Maybe AccountExchangeGroupsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountExchangeGroupsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountExchangeGroupsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountMarketLimitsResult" AccountMarketLimitsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountMarketLimitsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountMarketLimitsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountMarketLimitsResult" (Prelude.Maybe AccountMarketLimitsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountMarketLimitsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountMarketLimitsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountPositionsResult" AccountPositionsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountPositionsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountPositionsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountPositionsResult" (Prelude.Maybe AccountPositionsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountPositionsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountPositionsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountEquityResult" AccountEquityResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountEquityResult + (\ x__ y__ -> x__ {_AccountScopeResult'accountEquityResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountEquityResult" (Prelude.Maybe AccountEquityResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountEquityResult + (\ x__ y__ -> x__ {_AccountScopeResult'accountEquityResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountCollateralResult" AccountCollateralResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountCollateralResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountCollateralResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountCollateralResult" (Prelude.Maybe AccountCollateralResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountCollateralResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountCollateralResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "cloneAccountResult" CloneAccountResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'cloneAccountResult + (\ x__ y__ -> x__ {_AccountScopeResult'cloneAccountResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'cloneAccountResult" (Prelude.Maybe CloneAccountResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'cloneAccountResult + (\ x__ y__ -> x__ {_AccountScopeResult'cloneAccountResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "updateAccountResult" UpdateAccountResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountResult + (\ x__ y__ -> x__ {_AccountScopeResult'updateAccountResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'updateAccountResult" (Prelude.Maybe UpdateAccountResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountResult + (\ x__ y__ -> x__ {_AccountScopeResult'updateAccountResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "updateAccountSettingsResult" UpdateAccountSettingsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountSettingsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'updateAccountSettingsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'updateAccountSettingsResult" (Prelude.Maybe UpdateAccountSettingsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountSettingsResult + (\ x__ y__ + -> x__ {_AccountScopeResult'updateAccountSettingsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountGroupResult" AccountGroupResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountGroupResult + (\ x__ y__ -> x__ {_AccountScopeResult'accountGroupResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountGroupResult" (Prelude.Maybe AccountGroupResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountGroupResult + (\ x__ y__ -> x__ {_AccountScopeResult'accountGroupResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "updateAccountRiskParametersResult" UpdateAccountRiskParametersResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountRiskParametersResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'updateAccountRiskParametersResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'updateAccountRiskParametersResult" (Prelude.Maybe UpdateAccountRiskParametersResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountRiskParametersResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'updateAccountRiskParametersResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountAvailableRouteListResult" AccountAvailableRouteListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountAvailableRouteListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'accountAvailableRouteListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountAvailableRouteListResult" (Prelude.Maybe AccountAvailableRouteListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountAvailableRouteListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'accountAvailableRouteListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "updateAccountRouteListResult" UpdateAccountRouteListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountRouteListResult + (\ x__ y__ + -> x__ {_AccountScopeResult'updateAccountRouteListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'updateAccountRouteListResult" (Prelude.Maybe UpdateAccountRouteListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountRouteListResult + (\ x__ y__ + -> x__ {_AccountScopeResult'updateAccountRouteListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "updateAccountMarketLimitsResult" UpdateAccountMarketLimitsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountMarketLimitsResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'updateAccountMarketLimitsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'updateAccountMarketLimitsResult" (Prelude.Maybe UpdateAccountMarketLimitsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountMarketLimitsResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'updateAccountMarketLimitsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "createAccountResult" CreateAccountResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'createAccountResult + (\ x__ y__ -> x__ {_AccountScopeResult'createAccountResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'createAccountResult" (Prelude.Maybe CreateAccountResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'createAccountResult + (\ x__ y__ -> x__ {_AccountScopeResult'createAccountResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "obsoleteAccountClusterResult" AccountClusterResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'obsoleteAccountClusterResult + (\ x__ y__ + -> x__ {_AccountScopeResult'obsoleteAccountClusterResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'obsoleteAccountClusterResult" (Prelude.Maybe AccountClusterResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'obsoleteAccountClusterResult + (\ x__ y__ + -> x__ {_AccountScopeResult'obsoleteAccountClusterResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "obsoleteCreateAccountClusterResult" CreateAccountClusterResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'obsoleteCreateAccountClusterResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'obsoleteCreateAccountClusterResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'obsoleteCreateAccountClusterResult" (Prelude.Maybe CreateAccountClusterResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'obsoleteCreateAccountClusterResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'obsoleteCreateAccountClusterResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "obsoleteUpdateAccountClusterResult" UpdateAccountClusterResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'obsoleteUpdateAccountClusterResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'obsoleteUpdateAccountClusterResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'obsoleteUpdateAccountClusterResult" (Prelude.Maybe UpdateAccountClusterResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'obsoleteUpdateAccountClusterResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'obsoleteUpdateAccountClusterResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "obsoleteUpdateAccountClusterPriceOffsetsResult" UpdateAccountClusterPriceOffsetsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'obsoleteUpdateAccountClusterPriceOffsetsResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'obsoleteUpdateAccountClusterPriceOffsetsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'obsoleteUpdateAccountClusterPriceOffsetsResult" (Prelude.Maybe UpdateAccountClusterPriceOffsetsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'obsoleteUpdateAccountClusterPriceOffsetsResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'obsoleteUpdateAccountClusterPriceOffsetsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "restoreAccountResult" RestoreAccountResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'restoreAccountResult + (\ x__ y__ + -> x__ {_AccountScopeResult'restoreAccountResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'restoreAccountResult" (Prelude.Maybe RestoreAccountResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'restoreAccountResult + (\ x__ y__ + -> x__ {_AccountScopeResult'restoreAccountResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountTypeOverrideListResult" AccountTypeOverrideListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountTypeOverrideListResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountTypeOverrideListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountTypeOverrideListResult" (Prelude.Maybe AccountTypeOverrideListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountTypeOverrideListResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountTypeOverrideListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "updateAccountTypeOverrideListResult" UpdateAccountTypeOverrideListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountTypeOverrideListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'updateAccountTypeOverrideListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'updateAccountTypeOverrideListResult" (Prelude.Maybe UpdateAccountTypeOverrideListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountTypeOverrideListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'updateAccountTypeOverrideListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "updateAccountUserAuthorizationListResult" UpdateAccountUserAuthorizationListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountUserAuthorizationListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'updateAccountUserAuthorizationListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'updateAccountUserAuthorizationListResult" (Prelude.Maybe UpdateAccountUserAuthorizationListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountUserAuthorizationListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'updateAccountUserAuthorizationListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "removeAccountResult" RemoveAccountResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'removeAccountResult + (\ x__ y__ -> x__ {_AccountScopeResult'removeAccountResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'removeAccountResult" (Prelude.Maybe RemoveAccountResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'removeAccountResult + (\ x__ y__ -> x__ {_AccountScopeResult'removeAccountResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountAvailableServiceGroupListResult" AccountAvailableServiceGroupListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountAvailableServiceGroupListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'accountAvailableServiceGroupListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountAvailableServiceGroupListResult" (Prelude.Maybe AccountAvailableServiceGroupListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountAvailableServiceGroupListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'accountAvailableServiceGroupListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountServiceGroupListResult" AccountServiceGroupListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountServiceGroupListResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountServiceGroupListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountServiceGroupListResult" (Prelude.Maybe AccountServiceGroupListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountServiceGroupListResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountServiceGroupListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "updateAccountServiceGroupListResult" UpdateAccountServiceGroupListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountServiceGroupListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'updateAccountServiceGroupListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'updateAccountServiceGroupListResult" (Prelude.Maybe UpdateAccountServiceGroupListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'updateAccountServiceGroupListResult + (\ x__ y__ + -> x__ + {_AccountScopeResult'updateAccountServiceGroupListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "billableExchangeListResult" BillableExchangeListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'billableExchangeListResult + (\ x__ y__ + -> x__ {_AccountScopeResult'billableExchangeListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'billableExchangeListResult" (Prelude.Maybe BillableExchangeListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'billableExchangeListResult + (\ x__ y__ + -> x__ {_AccountScopeResult'billableExchangeListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "createAccountGroupResult" CreateAccountGroupResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'createAccountGroupResult + (\ x__ y__ + -> x__ {_AccountScopeResult'createAccountGroupResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'createAccountGroupResult" (Prelude.Maybe CreateAccountGroupResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'createAccountGroupResult + (\ x__ y__ + -> x__ {_AccountScopeResult'createAccountGroupResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountScopeResult "accountTradingFeaturesResult" AccountTradingFeaturesResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountTradingFeaturesResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountTradingFeaturesResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AccountScopeResult "maybe'accountTradingFeaturesResult" (Prelude.Maybe AccountTradingFeaturesResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountScopeResult'accountTradingFeaturesResult + (\ x__ y__ + -> x__ {_AccountScopeResult'accountTradingFeaturesResult = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountScopeResult where + messageName _ = Data.Text.pack "traderouting_1.AccountScopeResult" + packedMessageDescriptor _ + = "\n\ + \\DC2AccountScopeResult\DC2Q\n\ + \\DC3account_info_result\CAN\SOH \SOH(\v2!.traderouting_1.AccountInfoResultR\DC1accountInfoResult\DC2Z\n\ + \\SYNbalance_records_result\CAN\STX \SOH(\v2$.traderouting_1.BalanceRecordsResultR\DC4balanceRecordsResult\DC2j\n\ + \\FScreate_balance_record_result\CAN\ETX \SOH(\v2).traderouting_1.CreateBalanceRecordResultR\EMcreateBalanceRecordResult\DC2j\n\ + \\FSupdate_balance_record_result\CAN\EOT \SOH(\v2).traderouting_1.UpdateBalanceRecordResultR\EMupdateBalanceRecordResult\DC2p\n\ + \\RSaccount_risk_parameters_result\CAN\ENQ \SOH(\v2+.traderouting_1.AccountRiskParametersResultR\ESCaccountRiskParametersResult\DC2m\n\ + \\GSupdate_risk_parameters_result\CAN\ACK \SOH(\v2*.traderouting_1.UpdateRiskParametersResultR\SUBupdateRiskParametersResult\DC2W\n\ + \\NAKaccount_search_result\CAN\a \SOH(\v2#.traderouting_1.AccountSearchResultR\DC3accountSearchResult\DC2a\n\ + \\EMaccount_route_list_result\CAN\b \SOH(\v2&.traderouting_1.AccountRouteListResultR\SYNaccountRouteListResult\DC2\134\SOH\n\ + \&account_user_authorization_list_result\CAN\t \SOH(\v22.traderouting_1.AccountUserAuthorizationListResultR\"accountUserAuthorizationListResult\DC2]\n\ + \\ETBaccount_settings_result\CAN\n\ + \ \SOH(\v2%.traderouting_1.AccountSettingsResultR\NAKaccountSettingsResult\DC2p\n\ + \\RSaccount_exchange_groups_result\CAN\v \SOH(\v2+.traderouting_1.AccountExchangeGroupsResultR\ESCaccountExchangeGroupsResult\DC2j\n\ + \\FSaccount_market_limits_result\CAN\f \SOH(\v2).traderouting_1.AccountMarketLimitsResultR\EMaccountMarketLimitsResult\DC2`\n\ + \\CANaccount_positions_result\CAN\r \SOH(\v2&.traderouting_1.AccountPositionsResultR\SYNaccountPositionsResult\DC2W\n\ + \\NAKaccount_equity_result\CAN\SO \SOH(\v2#.traderouting_1.AccountEquityResultR\DC3accountEquityResult\DC2c\n\ + \\EMaccount_collateral_result\CAN\SI \SOH(\v2'.traderouting_1.AccountCollateralResultR\ETBaccountCollateralResult\DC2T\n\ + \\DC4clone_account_result\CAN\DLE \SOH(\v2\".traderouting_1.CloneAccountResultR\DC2cloneAccountResult\DC2W\n\ + \\NAKupdate_account_result\CAN\DC1 \SOH(\v2#.traderouting_1.UpdateAccountResultR\DC3updateAccountResult\DC2p\n\ + \\RSupdate_account_settings_result\CAN\DC2 \SOH(\v2+.traderouting_1.UpdateAccountSettingsResultR\ESCupdateAccountSettingsResult\DC2T\n\ + \\DC4account_group_result\CAN\DC3 \SOH(\v2\".traderouting_1.AccountGroupResultR\DC2accountGroupResult\DC2\131\SOH\n\ + \%update_account_risk_parameters_result\CAN\DC4 \SOH(\v21.traderouting_1.UpdateAccountRiskParametersResultR!updateAccountRiskParametersResult\DC2}\n\ + \#account_available_route_list_result\CAN\NAK \SOH(\v2/.traderouting_1.AccountAvailableRouteListResultR\USaccountAvailableRouteListResult\DC2t\n\ + \ update_account_route_list_result\CAN\SYN \SOH(\v2,.traderouting_1.UpdateAccountRouteListResultR\FSupdateAccountRouteListResult\DC2}\n\ + \#update_account_market_limits_result\CAN\ETB \SOH(\v2/.traderouting_1.UpdateAccountMarketLimitsResultR\USupdateAccountMarketLimitsResult\DC2W\n\ + \\NAKcreate_account_result\CAN\CAN \SOH(\v2#.traderouting_1.CreateAccountResultR\DC3createAccountResult\DC2o\n\ + \\USobsolete_account_cluster_result\CAN\EM \SOH(\v2$.traderouting_1.AccountClusterResultR\FSobsoleteAccountClusterResultB\STX\CAN\SOH\DC2\130\SOH\n\ + \&obsolete_create_account_cluster_result\CAN\SUB \SOH(\v2*.traderouting_1.CreateAccountClusterResultR\"obsoleteCreateAccountClusterResultB\STX\CAN\SOH\DC2\130\SOH\n\ + \&obsolete_update_account_cluster_result\CAN\ESC \SOH(\v2*.traderouting_1.UpdateAccountClusterResultR\"obsoleteUpdateAccountClusterResultB\STX\CAN\SOH\DC2\168\SOH\n\ + \4obsolete_update_account_cluster_price_offsets_result\CAN\FS \SOH(\v26.traderouting_1.UpdateAccountClusterPriceOffsetsResultR.obsoleteUpdateAccountClusterPriceOffsetsResultB\STX\CAN\SOH\DC2Z\n\ + \\SYNrestore_account_result\CAN\GS \SOH(\v2$.traderouting_1.RestoreAccountResultR\DC4restoreAccountResult\DC2w\n\ + \!account_type_override_list_result\CAN\RS \SOH(\v2-.traderouting_1.AccountTypeOverrideListResultR\GSaccountTypeOverrideListResult\DC2\138\SOH\n\ + \(update_account_type_override_list_result\CAN\US \SOH(\v23.traderouting_1.UpdateAccountTypeOverrideListResultR#updateAccountTypeOverrideListResult\DC2\153\SOH\n\ + \-update_account_user_authorization_list_result\CAN \SOH(\v28.traderouting_1.UpdateAccountUserAuthorizationListResultR(updateAccountUserAuthorizationListResult\DC2W\n\ + \\NAKremove_account_result\CAN! \SOH(\v2#.traderouting_1.RemoveAccountResultR\DC3removeAccountResult\DC2\147\SOH\n\ + \+account_available_service_group_list_result\CAN\" \SOH(\v26.traderouting_1.AccountAvailableServiceGroupListResultR&accountAvailableServiceGroupListResult\DC2w\n\ + \!account_service_group_list_result\CAN# \SOH(\v2-.traderouting_1.AccountServiceGroupListResultR\GSaccountServiceGroupListResult\DC2\138\SOH\n\ + \(update_account_service_group_list_result\CAN$ \SOH(\v23.traderouting_1.UpdateAccountServiceGroupListResultR#updateAccountServiceGroupListResult\DC2m\n\ + \\GSbillable_exchange_list_result\CAN% \SOH(\v2*.traderouting_1.BillableExchangeListResultR\SUBbillableExchangeListResult\DC2g\n\ + \\ESCcreate_account_group_result\CAN& \SOH(\v2(.traderouting_1.CreateAccountGroupResultR\CANcreateAccountGroupResult\DC2s\n\ + \\USaccount_trading_features_result\CAN' \SOH(\v2,.traderouting_1.AccountTradingFeaturesResultR\FSaccountTradingFeaturesResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountInfoResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_info_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountInfoResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountInfoResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + balanceRecordsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "balance_records_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor BalanceRecordsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'balanceRecordsResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + createBalanceRecordResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_balance_record_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateBalanceRecordResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createBalanceRecordResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + updateBalanceRecordResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_balance_record_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateBalanceRecordResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateBalanceRecordResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountRiskParametersResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_risk_parameters_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountRiskParametersResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountRiskParametersResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + updateRiskParametersResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_risk_parameters_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateRiskParametersResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateRiskParametersResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountSearchResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_search_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountSearchResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountSearchResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountRouteListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_route_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountRouteListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountRouteListResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountUserAuthorizationListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_user_authorization_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountUserAuthorizationListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountUserAuthorizationListResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountSettingsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_settings_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountSettingsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountSettingsResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountExchangeGroupsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_exchange_groups_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountExchangeGroupsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountExchangeGroupsResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountMarketLimitsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_market_limits_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountMarketLimitsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountMarketLimitsResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountPositionsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_positions_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountPositionsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountPositionsResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountEquityResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_equity_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountEquityResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountEquityResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountCollateralResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_collateral_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountCollateralResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountCollateralResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + cloneAccountResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "clone_account_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CloneAccountResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cloneAccountResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + updateAccountResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateAccountResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + updateAccountSettingsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_settings_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountSettingsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountSettingsResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountGroupResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_group_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountGroupResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountGroupResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + updateAccountRiskParametersResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_risk_parameters_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountRiskParametersResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountRiskParametersResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountAvailableRouteListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_available_route_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountAvailableRouteListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountAvailableRouteListResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + updateAccountRouteListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_route_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountRouteListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountRouteListResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + updateAccountMarketLimitsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_market_limits_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountMarketLimitsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountMarketLimitsResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + createAccountResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_account_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateAccountResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createAccountResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + obsoleteAccountClusterResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_account_cluster_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountClusterResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteAccountClusterResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + obsoleteCreateAccountClusterResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_create_account_cluster_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateAccountClusterResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteCreateAccountClusterResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + obsoleteUpdateAccountClusterResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_update_account_cluster_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountClusterResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateAccountClusterResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + obsoleteUpdateAccountClusterPriceOffsetsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_update_account_cluster_price_offsets_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountClusterPriceOffsetsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateAccountClusterPriceOffsetsResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + restoreAccountResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "restore_account_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RestoreAccountResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'restoreAccountResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountTypeOverrideListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_type_override_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountTypeOverrideListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountTypeOverrideListResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + updateAccountTypeOverrideListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_type_override_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountTypeOverrideListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountTypeOverrideListResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + updateAccountUserAuthorizationListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_user_authorization_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountUserAuthorizationListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountUserAuthorizationListResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + removeAccountResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "remove_account_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RemoveAccountResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removeAccountResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountAvailableServiceGroupListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_available_service_group_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountAvailableServiceGroupListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountAvailableServiceGroupListResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountServiceGroupListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_service_group_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountServiceGroupListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountServiceGroupListResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + updateAccountServiceGroupListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_account_service_group_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor UpdateAccountServiceGroupListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'updateAccountServiceGroupListResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + billableExchangeListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "billable_exchange_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor BillableExchangeListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'billableExchangeListResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + createAccountGroupResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_account_group_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateAccountGroupResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createAccountGroupResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + accountTradingFeaturesResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_trading_features_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountTradingFeaturesResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'accountTradingFeaturesResult")) :: + Data.ProtoLens.FieldDescriptor AccountScopeResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountInfoResult__field_descriptor), + (Data.ProtoLens.Tag 2, balanceRecordsResult__field_descriptor), + (Data.ProtoLens.Tag 3, + createBalanceRecordResult__field_descriptor), + (Data.ProtoLens.Tag 4, + updateBalanceRecordResult__field_descriptor), + (Data.ProtoLens.Tag 5, + accountRiskParametersResult__field_descriptor), + (Data.ProtoLens.Tag 6, + updateRiskParametersResult__field_descriptor), + (Data.ProtoLens.Tag 7, accountSearchResult__field_descriptor), + (Data.ProtoLens.Tag 8, accountRouteListResult__field_descriptor), + (Data.ProtoLens.Tag 9, + accountUserAuthorizationListResult__field_descriptor), + (Data.ProtoLens.Tag 10, accountSettingsResult__field_descriptor), + (Data.ProtoLens.Tag 11, + accountExchangeGroupsResult__field_descriptor), + (Data.ProtoLens.Tag 12, + accountMarketLimitsResult__field_descriptor), + (Data.ProtoLens.Tag 13, accountPositionsResult__field_descriptor), + (Data.ProtoLens.Tag 14, accountEquityResult__field_descriptor), + (Data.ProtoLens.Tag 15, accountCollateralResult__field_descriptor), + (Data.ProtoLens.Tag 16, cloneAccountResult__field_descriptor), + (Data.ProtoLens.Tag 17, updateAccountResult__field_descriptor), + (Data.ProtoLens.Tag 18, + updateAccountSettingsResult__field_descriptor), + (Data.ProtoLens.Tag 19, accountGroupResult__field_descriptor), + (Data.ProtoLens.Tag 20, + updateAccountRiskParametersResult__field_descriptor), + (Data.ProtoLens.Tag 21, + accountAvailableRouteListResult__field_descriptor), + (Data.ProtoLens.Tag 22, + updateAccountRouteListResult__field_descriptor), + (Data.ProtoLens.Tag 23, + updateAccountMarketLimitsResult__field_descriptor), + (Data.ProtoLens.Tag 24, createAccountResult__field_descriptor), + (Data.ProtoLens.Tag 25, + obsoleteAccountClusterResult__field_descriptor), + (Data.ProtoLens.Tag 26, + obsoleteCreateAccountClusterResult__field_descriptor), + (Data.ProtoLens.Tag 27, + obsoleteUpdateAccountClusterResult__field_descriptor), + (Data.ProtoLens.Tag 28, + obsoleteUpdateAccountClusterPriceOffsetsResult__field_descriptor), + (Data.ProtoLens.Tag 29, restoreAccountResult__field_descriptor), + (Data.ProtoLens.Tag 30, + accountTypeOverrideListResult__field_descriptor), + (Data.ProtoLens.Tag 31, + updateAccountTypeOverrideListResult__field_descriptor), + (Data.ProtoLens.Tag 32, + updateAccountUserAuthorizationListResult__field_descriptor), + (Data.ProtoLens.Tag 33, removeAccountResult__field_descriptor), + (Data.ProtoLens.Tag 34, + accountAvailableServiceGroupListResult__field_descriptor), + (Data.ProtoLens.Tag 35, + accountServiceGroupListResult__field_descriptor), + (Data.ProtoLens.Tag 36, + updateAccountServiceGroupListResult__field_descriptor), + (Data.ProtoLens.Tag 37, + billableExchangeListResult__field_descriptor), + (Data.ProtoLens.Tag 38, + createAccountGroupResult__field_descriptor), + (Data.ProtoLens.Tag 39, + accountTradingFeaturesResult__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountScopeResult'_unknownFields + (\ x__ y__ -> x__ {_AccountScopeResult'_unknownFields = y__}) + defMessage + = AccountScopeResult'_constructor + {_AccountScopeResult'accountInfoResult = Prelude.Nothing, + _AccountScopeResult'balanceRecordsResult = Prelude.Nothing, + _AccountScopeResult'createBalanceRecordResult = Prelude.Nothing, + _AccountScopeResult'updateBalanceRecordResult = Prelude.Nothing, + _AccountScopeResult'accountRiskParametersResult = Prelude.Nothing, + _AccountScopeResult'updateRiskParametersResult = Prelude.Nothing, + _AccountScopeResult'accountSearchResult = Prelude.Nothing, + _AccountScopeResult'accountRouteListResult = Prelude.Nothing, + _AccountScopeResult'accountUserAuthorizationListResult = Prelude.Nothing, + _AccountScopeResult'accountSettingsResult = Prelude.Nothing, + _AccountScopeResult'accountExchangeGroupsResult = Prelude.Nothing, + _AccountScopeResult'accountMarketLimitsResult = Prelude.Nothing, + _AccountScopeResult'accountPositionsResult = Prelude.Nothing, + _AccountScopeResult'accountEquityResult = Prelude.Nothing, + _AccountScopeResult'accountCollateralResult = Prelude.Nothing, + _AccountScopeResult'cloneAccountResult = Prelude.Nothing, + _AccountScopeResult'updateAccountResult = Prelude.Nothing, + _AccountScopeResult'updateAccountSettingsResult = Prelude.Nothing, + _AccountScopeResult'accountGroupResult = Prelude.Nothing, + _AccountScopeResult'updateAccountRiskParametersResult = Prelude.Nothing, + _AccountScopeResult'accountAvailableRouteListResult = Prelude.Nothing, + _AccountScopeResult'updateAccountRouteListResult = Prelude.Nothing, + _AccountScopeResult'updateAccountMarketLimitsResult = Prelude.Nothing, + _AccountScopeResult'createAccountResult = Prelude.Nothing, + _AccountScopeResult'obsoleteAccountClusterResult = Prelude.Nothing, + _AccountScopeResult'obsoleteCreateAccountClusterResult = Prelude.Nothing, + _AccountScopeResult'obsoleteUpdateAccountClusterResult = Prelude.Nothing, + _AccountScopeResult'obsoleteUpdateAccountClusterPriceOffsetsResult = Prelude.Nothing, + _AccountScopeResult'restoreAccountResult = Prelude.Nothing, + _AccountScopeResult'accountTypeOverrideListResult = Prelude.Nothing, + _AccountScopeResult'updateAccountTypeOverrideListResult = Prelude.Nothing, + _AccountScopeResult'updateAccountUserAuthorizationListResult = Prelude.Nothing, + _AccountScopeResult'removeAccountResult = Prelude.Nothing, + _AccountScopeResult'accountAvailableServiceGroupListResult = Prelude.Nothing, + _AccountScopeResult'accountServiceGroupListResult = Prelude.Nothing, + _AccountScopeResult'updateAccountServiceGroupListResult = Prelude.Nothing, + _AccountScopeResult'billableExchangeListResult = Prelude.Nothing, + _AccountScopeResult'createAccountGroupResult = Prelude.Nothing, + _AccountScopeResult'accountTradingFeaturesResult = Prelude.Nothing, + _AccountScopeResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountScopeResult + -> Data.ProtoLens.Encoding.Bytes.Parser AccountScopeResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_info_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountInfoResult") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "balance_records_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"balanceRecordsResult") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_balance_record_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"createBalanceRecordResult") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_balance_record_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateBalanceRecordResult") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_risk_parameters_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountRiskParametersResult") y + x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_risk_parameters_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateRiskParametersResult") y x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_search_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountSearchResult") y x) + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_route_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountRouteListResult") y x) + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_user_authorization_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"accountUserAuthorizationListResult") + y x) + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_settings_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountSettingsResult") y x) + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_exchange_groups_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountExchangeGroupsResult") y + x) + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_market_limits_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountMarketLimitsResult") y x) + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_positions_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountPositionsResult") y x) + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_equity_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountEquityResult") y x) + 122 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_collateral_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountCollateralResult") y x) + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "clone_account_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"cloneAccountResult") y x) + 138 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountResult") y x) + 146 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_settings_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountSettingsResult") y + x) + 154 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_group_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountGroupResult") y x) + 162 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_risk_parameters_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"updateAccountRiskParametersResult") + y x) + 170 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_available_route_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountAvailableRouteListResult") + y x) + 178 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_route_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountRouteListResult") y + x) + 186 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_market_limits_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"updateAccountMarketLimitsResult") + y x) + 194 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_account_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"createAccountResult") y x) + 202 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_account_cluster_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteAccountClusterResult") y + x) + 210 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_create_account_cluster_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"obsoleteCreateAccountClusterResult") + y x) + 218 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_update_account_cluster_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"obsoleteUpdateAccountClusterResult") + y x) + 226 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_update_account_cluster_price_offsets_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"obsoleteUpdateAccountClusterPriceOffsetsResult") + y x) + 234 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "restore_account_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"restoreAccountResult") y x) + 242 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_type_override_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountTypeOverrideListResult") y + x) + 250 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_type_override_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"updateAccountTypeOverrideListResult") + y x) + 258 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_user_authorization_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"updateAccountUserAuthorizationListResult") + y x) + 266 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "remove_account_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"removeAccountResult") y x) + 274 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_available_service_group_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"accountAvailableServiceGroupListResult") + y x) + 282 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_service_group_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountServiceGroupListResult") y + x) + 290 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "update_account_service_group_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"updateAccountServiceGroupListResult") + y x) + 298 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "billable_exchange_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"billableExchangeListResult") y x) + 306 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_account_group_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"createAccountGroupResult") y x) + 314 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_trading_features_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountTradingFeaturesResult") y + x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountScopeResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountInfoResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'balanceRecordsResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'createBalanceRecordResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'updateBalanceRecordResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountRiskParametersResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'updateRiskParametersResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountSearchResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountRouteListResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountUserAuthorizationListResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountSettingsResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountExchangeGroupsResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountMarketLimitsResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountPositionsResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountEquityResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountCollateralResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'cloneAccountResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountSettingsResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 146) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountGroupResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 154) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountRiskParametersResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 162) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountAvailableRouteListResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 170) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountRouteListResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 178) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountMarketLimitsResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 186) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'createAccountResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 194) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteAccountClusterResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 202) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteCreateAccountClusterResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 210) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateAccountClusterResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 218) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateAccountClusterPriceOffsetsResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 226) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'restoreAccountResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 234) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountTypeOverrideListResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 242) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountTypeOverrideListResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 250) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountUserAuthorizationListResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 258) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'removeAccountResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 266) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountAvailableServiceGroupListResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 274) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountServiceGroupListResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 282) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'updateAccountServiceGroupListResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 290) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'billableExchangeListResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 298) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'createAccountGroupResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 306) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountTradingFeaturesResult") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 314) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))))))))))))))))))))))))))) +instance Control.DeepSeq.NFData AccountScopeResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountScopeResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountInfoResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'balanceRecordsResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'createBalanceRecordResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'updateBalanceRecordResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountRiskParametersResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'updateRiskParametersResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountSearchResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountRouteListResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountUserAuthorizationListResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountSettingsResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountExchangeGroupsResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountMarketLimitsResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountPositionsResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountEquityResult x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountCollateralResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'cloneAccountResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'updateAccountResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'updateAccountSettingsResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountGroupResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'updateAccountRiskParametersResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountAvailableRouteListResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'updateAccountRouteListResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'updateAccountMarketLimitsResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'createAccountResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'obsoleteAccountClusterResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'obsoleteCreateAccountClusterResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'obsoleteUpdateAccountClusterResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'obsoleteUpdateAccountClusterPriceOffsetsResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'restoreAccountResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountTypeOverrideListResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'updateAccountTypeOverrideListResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'updateAccountUserAuthorizationListResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'removeAccountResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountAvailableServiceGroupListResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountServiceGroupListResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'updateAccountServiceGroupListResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'billableExchangeListResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'createAccountGroupResult + x__) + (Control.DeepSeq.deepseq + (_AccountScopeResult'accountTradingFeaturesResult + x__) + ()))))))))))))))))))))))))))))))))))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.obsoleteText' @:: Lens' AccountSearchRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteText' @:: Lens' AccountSearchRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteSearchCriteria' @:: Lens' AccountSearchRequest [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'obsoleteSearchCriteria' @:: Lens' AccountSearchRequest (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.top' @:: Lens' AccountSearchRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'top' @:: Lens' AccountSearchRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.includeRemoved' @:: Lens' AccountSearchRequest Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'includeRemoved' @:: Lens' AccountSearchRequest (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.searchOptions' @:: Lens' AccountSearchRequest [Proto.CMS.Common1.SearchOption]@ + * 'Proto.CMS.Traderouting1_Fields.vec'searchOptions' @:: Lens' AccountSearchRequest (Data.Vector.Vector Proto.CMS.Common1.SearchOption)@ + * 'Proto.CMS.Traderouting1_Fields.allMatchMode' @:: Lens' AccountSearchRequest Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allMatchMode' @:: Lens' AccountSearchRequest (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.includeAccountsFromMappedSalesSeries' @:: Lens' AccountSearchRequest Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'includeAccountsFromMappedSalesSeries' @:: Lens' AccountSearchRequest (Prelude.Maybe Prelude.Bool)@ -} +data AccountSearchRequest + = AccountSearchRequest'_constructor {_AccountSearchRequest'obsoleteText :: !(Prelude.Maybe Data.Text.Text), + _AccountSearchRequest'obsoleteSearchCriteria :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _AccountSearchRequest'top :: !(Prelude.Maybe Data.Word.Word32), + _AccountSearchRequest'includeRemoved :: !(Prelude.Maybe Prelude.Bool), + _AccountSearchRequest'searchOptions :: !(Data.Vector.Vector Proto.CMS.Common1.SearchOption), + _AccountSearchRequest'allMatchMode :: !(Prelude.Maybe Prelude.Bool), + _AccountSearchRequest'includeAccountsFromMappedSalesSeries :: !(Prelude.Maybe Prelude.Bool), + _AccountSearchRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountSearchRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountSearchRequest "obsoleteText" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'obsoleteText + (\ x__ y__ -> x__ {_AccountSearchRequest'obsoleteText = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchRequest "maybe'obsoleteText" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'obsoleteText + (\ x__ y__ -> x__ {_AccountSearchRequest'obsoleteText = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchRequest "obsoleteSearchCriteria" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'obsoleteSearchCriteria + (\ x__ y__ + -> x__ {_AccountSearchRequest'obsoleteSearchCriteria = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountSearchRequest "vec'obsoleteSearchCriteria" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'obsoleteSearchCriteria + (\ x__ y__ + -> x__ {_AccountSearchRequest'obsoleteSearchCriteria = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchRequest "top" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'top + (\ x__ y__ -> x__ {_AccountSearchRequest'top = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchRequest "maybe'top" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'top + (\ x__ y__ -> x__ {_AccountSearchRequest'top = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchRequest "includeRemoved" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'includeRemoved + (\ x__ y__ -> x__ {_AccountSearchRequest'includeRemoved = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField AccountSearchRequest "maybe'includeRemoved" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'includeRemoved + (\ x__ y__ -> x__ {_AccountSearchRequest'includeRemoved = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchRequest "searchOptions" [Proto.CMS.Common1.SearchOption] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'searchOptions + (\ x__ y__ -> x__ {_AccountSearchRequest'searchOptions = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountSearchRequest "vec'searchOptions" (Data.Vector.Vector Proto.CMS.Common1.SearchOption) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'searchOptions + (\ x__ y__ -> x__ {_AccountSearchRequest'searchOptions = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchRequest "allMatchMode" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_AccountSearchRequest'allMatchMode = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField AccountSearchRequest "maybe'allMatchMode" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_AccountSearchRequest'allMatchMode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchRequest "includeAccountsFromMappedSalesSeries" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'includeAccountsFromMappedSalesSeries + (\ x__ y__ + -> x__ + {_AccountSearchRequest'includeAccountsFromMappedSalesSeries = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField AccountSearchRequest "maybe'includeAccountsFromMappedSalesSeries" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchRequest'includeAccountsFromMappedSalesSeries + (\ x__ y__ + -> x__ + {_AccountSearchRequest'includeAccountsFromMappedSalesSeries = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountSearchRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountSearchRequest" + packedMessageDescriptor _ + = "\n\ + \\DC4AccountSearchRequest\DC2'\n\ + \\robsolete_text\CAN\SOH \SOH(\tR\fobsoleteTextB\STX\CAN\SOH\DC2<\n\ + \\CANobsolete_search_criteria\CAN\STX \ETX(\rR\SYNobsoleteSearchCriteriaB\STX\CAN\SOH\DC2\DLE\n\ + \\ETXtop\CAN\ETX \SOH(\rR\ETXtop\DC2.\n\ + \\SIinclude_removed\CAN\EOT \SOH(\b:\ENQfalseR\SOincludeRemoved\DC2=\n\ + \\SOsearch_options\CAN\ENQ \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\ACK \SOH(\b:\ENQfalseR\fallMatchMode\DC2^\n\ + \)include_accounts_from_mapped_sales_series\CAN\a \SOH(\b:\ENQfalseR$includeAccountsFromMappedSalesSeries\"'\n\ + \\DLEAccountGroupRole\DC2\n\ + \\n\ + \\ACKMASTER\DLE\STX\DC2\a\n\ + \\ETXSUB\DLE\ETX\"\170\ETX\n\ + \\SOSearchCriteria\DC2\SO\n\ + \\n\ + \ACCOUNT_ID\DLE\SOH\DC2\DLE\n\ + \\fACCOUNT_NAME\DLE\STX\DC2\DC4\n\ + \\DLEBROKERAGE_NUMBER\DLE\ETX\DC2\US\n\ + \\ESCPROFILE_SALES_SERIES_NUMBER\DLE\EOT\DC2\GS\n\ + \\EMPROFILE_SALES_SERIES_NAME\DLE\ENQ\DC2\DC3\n\ + \\SISALES_SERIES_ID\DLE\ACK\DC2\SI\n\ + \\vCUSTOMER_ID\DLE\a\DC2\DLE\n\ + \\fPROFILE_NAME\DLE\b\DC2\US\n\ + \\ESCOBSOLETE_ACCOUNT_CLUSTER_ID\DLE\t\DC2\ESC\n\ + \\ETBRISK_SERVER_INSTANCE_ID\DLE\n\ + \\DC2\DC4\n\ + \\DLEACCOUNT_GROUP_ID\DLE\v\DC2\SYN\n\ + \\DC2ACCOUNT_GROUP_ROLE\DLE\f\DC2\DLE\n\ + \\fBROKERAGE_ID\DLE\r\DC2\DC1\n\ + \\rACCOUNT_CLASS\DLE\SO\DC2\DC1\n\ + \\rIS_COLLECTION\DLE\SI\DC2\ETB\n\ + \\DC3IS_IN_ACCOUNT_GROUP\DLE\DLE\DC2\SO\n\ + \\n\ + \PROFILE_ID\DLE\DC1\DC2\ESC\n\ + \\ETBPROFILE_SALES_SERIES_ID\DLE\DC2" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteText__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_text" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteText")) :: + Data.ProtoLens.FieldDescriptor AccountSearchRequest + obsoleteSearchCriteria__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_search_criteria" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"obsoleteSearchCriteria")) :: + Data.ProtoLens.FieldDescriptor AccountSearchRequest + top__field_descriptor + = Data.ProtoLens.FieldDescriptor + "top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'top")) :: + Data.ProtoLens.FieldDescriptor AccountSearchRequest + includeRemoved__field_descriptor + = Data.ProtoLens.FieldDescriptor + "include_removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'includeRemoved")) :: + Data.ProtoLens.FieldDescriptor AccountSearchRequest + searchOptions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "search_options" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.SearchOption) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"searchOptions")) :: + Data.ProtoLens.FieldDescriptor AccountSearchRequest + allMatchMode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "all_match_mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allMatchMode")) :: + Data.ProtoLens.FieldDescriptor AccountSearchRequest + includeAccountsFromMappedSalesSeries__field_descriptor + = Data.ProtoLens.FieldDescriptor + "include_accounts_from_mapped_sales_series" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'includeAccountsFromMappedSalesSeries")) :: + Data.ProtoLens.FieldDescriptor AccountSearchRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteText__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteSearchCriteria__field_descriptor), + (Data.ProtoLens.Tag 3, top__field_descriptor), + (Data.ProtoLens.Tag 4, includeRemoved__field_descriptor), + (Data.ProtoLens.Tag 5, searchOptions__field_descriptor), + (Data.ProtoLens.Tag 6, allMatchMode__field_descriptor), + (Data.ProtoLens.Tag 7, + includeAccountsFromMappedSalesSeries__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountSearchRequest'_unknownFields + (\ x__ y__ -> x__ {_AccountSearchRequest'_unknownFields = y__}) + defMessage + = AccountSearchRequest'_constructor + {_AccountSearchRequest'obsoleteText = Prelude.Nothing, + _AccountSearchRequest'obsoleteSearchCriteria = Data.Vector.Generic.empty, + _AccountSearchRequest'top = Prelude.Nothing, + _AccountSearchRequest'includeRemoved = Prelude.Nothing, + _AccountSearchRequest'searchOptions = Data.Vector.Generic.empty, + _AccountSearchRequest'allMatchMode = Prelude.Nothing, + _AccountSearchRequest'includeAccountsFromMappedSalesSeries = Prelude.Nothing, + _AccountSearchRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountSearchRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.SearchOption + -> Data.ProtoLens.Encoding.Bytes.Parser AccountSearchRequest + loop x mutable'obsoleteSearchCriteria mutable'searchOptions + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'obsoleteSearchCriteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'obsoleteSearchCriteria) + frozen'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'searchOptions) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria") + frozen'obsoleteSearchCriteria + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'searchOptions") + frozen'searchOptions x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_text" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteText") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + 16 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_search_criteria" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'obsoleteSearchCriteria y) + loop x v mutable'searchOptions + 18 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_search_criteria" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'obsoleteSearchCriteria) + loop x y mutable'searchOptions + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "top" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"top") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "include_removed" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"includeRemoved") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "search_options" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'searchOptions y) + loop x mutable'obsoleteSearchCriteria v + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "all_match_mode" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allMatchMode") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "include_accounts_from_mapped_sales_series" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"includeAccountsFromMappedSalesSeries") + y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'obsoleteSearchCriteria mutable'searchOptions + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'obsoleteSearchCriteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'obsoleteSearchCriteria + mutable'searchOptions) + "AccountSearchRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteText") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'top") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'includeRemoved") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'searchOptions") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allMatchMode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'includeAccountsFromMappedSalesSeries") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData AccountSearchRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountSearchRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountSearchRequest'obsoleteText x__) + (Control.DeepSeq.deepseq + (_AccountSearchRequest'obsoleteSearchCriteria x__) + (Control.DeepSeq.deepseq + (_AccountSearchRequest'top x__) + (Control.DeepSeq.deepseq + (_AccountSearchRequest'includeRemoved x__) + (Control.DeepSeq.deepseq + (_AccountSearchRequest'searchOptions x__) + (Control.DeepSeq.deepseq + (_AccountSearchRequest'allMatchMode x__) + (Control.DeepSeq.deepseq + (_AccountSearchRequest'includeAccountsFromMappedSalesSeries x__) + ()))))))) +data AccountSearchRequest'AccountGroupRole + = AccountSearchRequest'MASTER | AccountSearchRequest'SUB + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum AccountSearchRequest'AccountGroupRole where + maybeToEnum 2 = Prelude.Just AccountSearchRequest'MASTER + maybeToEnum 3 = Prelude.Just AccountSearchRequest'SUB + maybeToEnum _ = Prelude.Nothing + showEnum AccountSearchRequest'MASTER = "MASTER" + showEnum AccountSearchRequest'SUB = "SUB" + readEnum k + | (Prelude.==) k "MASTER" + = Prelude.Just AccountSearchRequest'MASTER + | (Prelude.==) k "SUB" = Prelude.Just AccountSearchRequest'SUB + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded AccountSearchRequest'AccountGroupRole where + minBound = AccountSearchRequest'MASTER + maxBound = AccountSearchRequest'SUB +instance Prelude.Enum AccountSearchRequest'AccountGroupRole where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum AccountGroupRole: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum AccountSearchRequest'MASTER = 2 + fromEnum AccountSearchRequest'SUB = 3 + succ AccountSearchRequest'SUB + = Prelude.error + "AccountSearchRequest'AccountGroupRole.succ: bad argument AccountSearchRequest'SUB. This value would be out of bounds." + succ AccountSearchRequest'MASTER = AccountSearchRequest'SUB + pred AccountSearchRequest'MASTER + = Prelude.error + "AccountSearchRequest'AccountGroupRole.pred: bad argument AccountSearchRequest'MASTER. This value would be out of bounds." + pred AccountSearchRequest'SUB = AccountSearchRequest'MASTER + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault AccountSearchRequest'AccountGroupRole where + fieldDefault = AccountSearchRequest'MASTER +instance Control.DeepSeq.NFData AccountSearchRequest'AccountGroupRole where + rnf x__ = Prelude.seq x__ () +data AccountSearchRequest'SearchCriteria + = AccountSearchRequest'ACCOUNT_ID | + AccountSearchRequest'ACCOUNT_NAME | + AccountSearchRequest'BROKERAGE_NUMBER | + AccountSearchRequest'PROFILE_SALES_SERIES_NUMBER | + AccountSearchRequest'PROFILE_SALES_SERIES_NAME | + AccountSearchRequest'SALES_SERIES_ID | + AccountSearchRequest'CUSTOMER_ID | + AccountSearchRequest'PROFILE_NAME | + AccountSearchRequest'OBSOLETE_ACCOUNT_CLUSTER_ID | + AccountSearchRequest'RISK_SERVER_INSTANCE_ID | + AccountSearchRequest'ACCOUNT_GROUP_ID | + AccountSearchRequest'ACCOUNT_GROUP_ROLE | + AccountSearchRequest'BROKERAGE_ID | + AccountSearchRequest'ACCOUNT_CLASS | + AccountSearchRequest'IS_COLLECTION | + AccountSearchRequest'IS_IN_ACCOUNT_GROUP | + AccountSearchRequest'PROFILE_ID | + AccountSearchRequest'PROFILE_SALES_SERIES_ID + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum AccountSearchRequest'SearchCriteria where + maybeToEnum 1 = Prelude.Just AccountSearchRequest'ACCOUNT_ID + maybeToEnum 2 = Prelude.Just AccountSearchRequest'ACCOUNT_NAME + maybeToEnum 3 = Prelude.Just AccountSearchRequest'BROKERAGE_NUMBER + maybeToEnum 4 + = Prelude.Just AccountSearchRequest'PROFILE_SALES_SERIES_NUMBER + maybeToEnum 5 + = Prelude.Just AccountSearchRequest'PROFILE_SALES_SERIES_NAME + maybeToEnum 6 = Prelude.Just AccountSearchRequest'SALES_SERIES_ID + maybeToEnum 7 = Prelude.Just AccountSearchRequest'CUSTOMER_ID + maybeToEnum 8 = Prelude.Just AccountSearchRequest'PROFILE_NAME + maybeToEnum 9 + = Prelude.Just AccountSearchRequest'OBSOLETE_ACCOUNT_CLUSTER_ID + maybeToEnum 10 + = Prelude.Just AccountSearchRequest'RISK_SERVER_INSTANCE_ID + maybeToEnum 11 = Prelude.Just AccountSearchRequest'ACCOUNT_GROUP_ID + maybeToEnum 12 + = Prelude.Just AccountSearchRequest'ACCOUNT_GROUP_ROLE + maybeToEnum 13 = Prelude.Just AccountSearchRequest'BROKERAGE_ID + maybeToEnum 14 = Prelude.Just AccountSearchRequest'ACCOUNT_CLASS + maybeToEnum 15 = Prelude.Just AccountSearchRequest'IS_COLLECTION + maybeToEnum 16 + = Prelude.Just AccountSearchRequest'IS_IN_ACCOUNT_GROUP + maybeToEnum 17 = Prelude.Just AccountSearchRequest'PROFILE_ID + maybeToEnum 18 + = Prelude.Just AccountSearchRequest'PROFILE_SALES_SERIES_ID + maybeToEnum _ = Prelude.Nothing + showEnum AccountSearchRequest'ACCOUNT_ID = "ACCOUNT_ID" + showEnum AccountSearchRequest'ACCOUNT_NAME = "ACCOUNT_NAME" + showEnum AccountSearchRequest'BROKERAGE_NUMBER = "BROKERAGE_NUMBER" + showEnum AccountSearchRequest'PROFILE_SALES_SERIES_NUMBER + = "PROFILE_SALES_SERIES_NUMBER" + showEnum AccountSearchRequest'PROFILE_SALES_SERIES_NAME + = "PROFILE_SALES_SERIES_NAME" + showEnum AccountSearchRequest'SALES_SERIES_ID = "SALES_SERIES_ID" + showEnum AccountSearchRequest'CUSTOMER_ID = "CUSTOMER_ID" + showEnum AccountSearchRequest'PROFILE_NAME = "PROFILE_NAME" + showEnum AccountSearchRequest'OBSOLETE_ACCOUNT_CLUSTER_ID + = "OBSOLETE_ACCOUNT_CLUSTER_ID" + showEnum AccountSearchRequest'RISK_SERVER_INSTANCE_ID + = "RISK_SERVER_INSTANCE_ID" + showEnum AccountSearchRequest'ACCOUNT_GROUP_ID = "ACCOUNT_GROUP_ID" + showEnum AccountSearchRequest'ACCOUNT_GROUP_ROLE + = "ACCOUNT_GROUP_ROLE" + showEnum AccountSearchRequest'BROKERAGE_ID = "BROKERAGE_ID" + showEnum AccountSearchRequest'ACCOUNT_CLASS = "ACCOUNT_CLASS" + showEnum AccountSearchRequest'IS_COLLECTION = "IS_COLLECTION" + showEnum AccountSearchRequest'IS_IN_ACCOUNT_GROUP + = "IS_IN_ACCOUNT_GROUP" + showEnum AccountSearchRequest'PROFILE_ID = "PROFILE_ID" + showEnum AccountSearchRequest'PROFILE_SALES_SERIES_ID + = "PROFILE_SALES_SERIES_ID" + readEnum k + | (Prelude.==) k "ACCOUNT_ID" + = Prelude.Just AccountSearchRequest'ACCOUNT_ID + | (Prelude.==) k "ACCOUNT_NAME" + = Prelude.Just AccountSearchRequest'ACCOUNT_NAME + | (Prelude.==) k "BROKERAGE_NUMBER" + = Prelude.Just AccountSearchRequest'BROKERAGE_NUMBER + | (Prelude.==) k "PROFILE_SALES_SERIES_NUMBER" + = Prelude.Just AccountSearchRequest'PROFILE_SALES_SERIES_NUMBER + | (Prelude.==) k "PROFILE_SALES_SERIES_NAME" + = Prelude.Just AccountSearchRequest'PROFILE_SALES_SERIES_NAME + | (Prelude.==) k "SALES_SERIES_ID" + = Prelude.Just AccountSearchRequest'SALES_SERIES_ID + | (Prelude.==) k "CUSTOMER_ID" + = Prelude.Just AccountSearchRequest'CUSTOMER_ID + | (Prelude.==) k "PROFILE_NAME" + = Prelude.Just AccountSearchRequest'PROFILE_NAME + | (Prelude.==) k "OBSOLETE_ACCOUNT_CLUSTER_ID" + = Prelude.Just AccountSearchRequest'OBSOLETE_ACCOUNT_CLUSTER_ID + | (Prelude.==) k "RISK_SERVER_INSTANCE_ID" + = Prelude.Just AccountSearchRequest'RISK_SERVER_INSTANCE_ID + | (Prelude.==) k "ACCOUNT_GROUP_ID" + = Prelude.Just AccountSearchRequest'ACCOUNT_GROUP_ID + | (Prelude.==) k "ACCOUNT_GROUP_ROLE" + = Prelude.Just AccountSearchRequest'ACCOUNT_GROUP_ROLE + | (Prelude.==) k "BROKERAGE_ID" + = Prelude.Just AccountSearchRequest'BROKERAGE_ID + | (Prelude.==) k "ACCOUNT_CLASS" + = Prelude.Just AccountSearchRequest'ACCOUNT_CLASS + | (Prelude.==) k "IS_COLLECTION" + = Prelude.Just AccountSearchRequest'IS_COLLECTION + | (Prelude.==) k "IS_IN_ACCOUNT_GROUP" + = Prelude.Just AccountSearchRequest'IS_IN_ACCOUNT_GROUP + | (Prelude.==) k "PROFILE_ID" + = Prelude.Just AccountSearchRequest'PROFILE_ID + | (Prelude.==) k "PROFILE_SALES_SERIES_ID" + = Prelude.Just AccountSearchRequest'PROFILE_SALES_SERIES_ID + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded AccountSearchRequest'SearchCriteria where + minBound = AccountSearchRequest'ACCOUNT_ID + maxBound = AccountSearchRequest'PROFILE_SALES_SERIES_ID +instance Prelude.Enum AccountSearchRequest'SearchCriteria where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum SearchCriteria: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum AccountSearchRequest'ACCOUNT_ID = 1 + fromEnum AccountSearchRequest'ACCOUNT_NAME = 2 + fromEnum AccountSearchRequest'BROKERAGE_NUMBER = 3 + fromEnum AccountSearchRequest'PROFILE_SALES_SERIES_NUMBER = 4 + fromEnum AccountSearchRequest'PROFILE_SALES_SERIES_NAME = 5 + fromEnum AccountSearchRequest'SALES_SERIES_ID = 6 + fromEnum AccountSearchRequest'CUSTOMER_ID = 7 + fromEnum AccountSearchRequest'PROFILE_NAME = 8 + fromEnum AccountSearchRequest'OBSOLETE_ACCOUNT_CLUSTER_ID = 9 + fromEnum AccountSearchRequest'RISK_SERVER_INSTANCE_ID = 10 + fromEnum AccountSearchRequest'ACCOUNT_GROUP_ID = 11 + fromEnum AccountSearchRequest'ACCOUNT_GROUP_ROLE = 12 + fromEnum AccountSearchRequest'BROKERAGE_ID = 13 + fromEnum AccountSearchRequest'ACCOUNT_CLASS = 14 + fromEnum AccountSearchRequest'IS_COLLECTION = 15 + fromEnum AccountSearchRequest'IS_IN_ACCOUNT_GROUP = 16 + fromEnum AccountSearchRequest'PROFILE_ID = 17 + fromEnum AccountSearchRequest'PROFILE_SALES_SERIES_ID = 18 + succ AccountSearchRequest'PROFILE_SALES_SERIES_ID + = Prelude.error + "AccountSearchRequest'SearchCriteria.succ: bad argument AccountSearchRequest'PROFILE_SALES_SERIES_ID. This value would be out of bounds." + succ AccountSearchRequest'ACCOUNT_ID + = AccountSearchRequest'ACCOUNT_NAME + succ AccountSearchRequest'ACCOUNT_NAME + = AccountSearchRequest'BROKERAGE_NUMBER + succ AccountSearchRequest'BROKERAGE_NUMBER + = AccountSearchRequest'PROFILE_SALES_SERIES_NUMBER + succ AccountSearchRequest'PROFILE_SALES_SERIES_NUMBER + = AccountSearchRequest'PROFILE_SALES_SERIES_NAME + succ AccountSearchRequest'PROFILE_SALES_SERIES_NAME + = AccountSearchRequest'SALES_SERIES_ID + succ AccountSearchRequest'SALES_SERIES_ID + = AccountSearchRequest'CUSTOMER_ID + succ AccountSearchRequest'CUSTOMER_ID + = AccountSearchRequest'PROFILE_NAME + succ AccountSearchRequest'PROFILE_NAME + = AccountSearchRequest'OBSOLETE_ACCOUNT_CLUSTER_ID + succ AccountSearchRequest'OBSOLETE_ACCOUNT_CLUSTER_ID + = AccountSearchRequest'RISK_SERVER_INSTANCE_ID + succ AccountSearchRequest'RISK_SERVER_INSTANCE_ID + = AccountSearchRequest'ACCOUNT_GROUP_ID + succ AccountSearchRequest'ACCOUNT_GROUP_ID + = AccountSearchRequest'ACCOUNT_GROUP_ROLE + succ AccountSearchRequest'ACCOUNT_GROUP_ROLE + = AccountSearchRequest'BROKERAGE_ID + succ AccountSearchRequest'BROKERAGE_ID + = AccountSearchRequest'ACCOUNT_CLASS + succ AccountSearchRequest'ACCOUNT_CLASS + = AccountSearchRequest'IS_COLLECTION + succ AccountSearchRequest'IS_COLLECTION + = AccountSearchRequest'IS_IN_ACCOUNT_GROUP + succ AccountSearchRequest'IS_IN_ACCOUNT_GROUP + = AccountSearchRequest'PROFILE_ID + succ AccountSearchRequest'PROFILE_ID + = AccountSearchRequest'PROFILE_SALES_SERIES_ID + pred AccountSearchRequest'ACCOUNT_ID + = Prelude.error + "AccountSearchRequest'SearchCriteria.pred: bad argument AccountSearchRequest'ACCOUNT_ID. This value would be out of bounds." + pred AccountSearchRequest'ACCOUNT_NAME + = AccountSearchRequest'ACCOUNT_ID + pred AccountSearchRequest'BROKERAGE_NUMBER + = AccountSearchRequest'ACCOUNT_NAME + pred AccountSearchRequest'PROFILE_SALES_SERIES_NUMBER + = AccountSearchRequest'BROKERAGE_NUMBER + pred AccountSearchRequest'PROFILE_SALES_SERIES_NAME + = AccountSearchRequest'PROFILE_SALES_SERIES_NUMBER + pred AccountSearchRequest'SALES_SERIES_ID + = AccountSearchRequest'PROFILE_SALES_SERIES_NAME + pred AccountSearchRequest'CUSTOMER_ID + = AccountSearchRequest'SALES_SERIES_ID + pred AccountSearchRequest'PROFILE_NAME + = AccountSearchRequest'CUSTOMER_ID + pred AccountSearchRequest'OBSOLETE_ACCOUNT_CLUSTER_ID + = AccountSearchRequest'PROFILE_NAME + pred AccountSearchRequest'RISK_SERVER_INSTANCE_ID + = AccountSearchRequest'OBSOLETE_ACCOUNT_CLUSTER_ID + pred AccountSearchRequest'ACCOUNT_GROUP_ID + = AccountSearchRequest'RISK_SERVER_INSTANCE_ID + pred AccountSearchRequest'ACCOUNT_GROUP_ROLE + = AccountSearchRequest'ACCOUNT_GROUP_ID + pred AccountSearchRequest'BROKERAGE_ID + = AccountSearchRequest'ACCOUNT_GROUP_ROLE + pred AccountSearchRequest'ACCOUNT_CLASS + = AccountSearchRequest'BROKERAGE_ID + pred AccountSearchRequest'IS_COLLECTION + = AccountSearchRequest'ACCOUNT_CLASS + pred AccountSearchRequest'IS_IN_ACCOUNT_GROUP + = AccountSearchRequest'IS_COLLECTION + pred AccountSearchRequest'PROFILE_ID + = AccountSearchRequest'IS_IN_ACCOUNT_GROUP + pred AccountSearchRequest'PROFILE_SALES_SERIES_ID + = AccountSearchRequest'PROFILE_ID + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault AccountSearchRequest'SearchCriteria where + fieldDefault = AccountSearchRequest'ACCOUNT_ID +instance Control.DeepSeq.NFData AccountSearchRequest'SearchCriteria where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountRecord' @:: Lens' AccountSearchResult [AccountSearchResultRecord]@ + * 'Proto.CMS.Traderouting1_Fields.vec'accountRecord' @:: Lens' AccountSearchResult (Data.Vector.Vector AccountSearchResultRecord)@ + * 'Proto.CMS.Traderouting1_Fields.isComplete' @:: Lens' AccountSearchResult Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isComplete' @:: Lens' AccountSearchResult (Prelude.Maybe Prelude.Bool)@ -} +data AccountSearchResult + = AccountSearchResult'_constructor {_AccountSearchResult'accountRecord :: !(Data.Vector.Vector AccountSearchResultRecord), + _AccountSearchResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _AccountSearchResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountSearchResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountSearchResult "accountRecord" [AccountSearchResultRecord] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResult'accountRecord + (\ x__ y__ -> x__ {_AccountSearchResult'accountRecord = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountSearchResult "vec'accountRecord" (Data.Vector.Vector AccountSearchResultRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResult'accountRecord + (\ x__ y__ -> x__ {_AccountSearchResult'accountRecord = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResult'isComplete + (\ x__ y__ -> x__ {_AccountSearchResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField AccountSearchResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResult'isComplete + (\ x__ y__ -> x__ {_AccountSearchResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountSearchResult where + messageName _ = Data.Text.pack "traderouting_1.AccountSearchResult" + packedMessageDescriptor _ + = "\n\ + \\DC3AccountSearchResult\DC2P\n\ + \\SOaccount_record\CAN\SOH \ETX(\v2).traderouting_1.AccountSearchResultRecordR\raccountRecord\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountSearchResultRecord) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"accountRecord")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountRecord__field_descriptor), + (Data.ProtoLens.Tag 2, isComplete__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountSearchResult'_unknownFields + (\ x__ y__ -> x__ {_AccountSearchResult'_unknownFields = y__}) + defMessage + = AccountSearchResult'_constructor + {_AccountSearchResult'accountRecord = Data.Vector.Generic.empty, + _AccountSearchResult'isComplete = Prelude.Nothing, + _AccountSearchResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountSearchResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountSearchResultRecord + -> Data.ProtoLens.Encoding.Bytes.Parser AccountSearchResult + loop x mutable'accountRecord + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'accountRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'accountRecord) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'accountRecord") + frozen'accountRecord x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "account_record" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'accountRecord y) + loop x v + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + mutable'accountRecord + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'accountRecord + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'accountRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'accountRecord) + "AccountSearchResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'accountRecord") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData AccountSearchResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountSearchResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountSearchResult'accountRecord x__) + (Control.DeepSeq.deepseq (_AccountSearchResult'isComplete x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountSearchResultRecord Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.name' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.brokerageAccountNumber' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.salesSeriesNumber' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.salesSeriesName' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.brokerageName' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.customerId' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'customerId' @:: Lens' AccountSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.customerName' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'customerName' @:: Lens' AccountSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.removed' @:: Lens' AccountSearchResultRecord Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'removed' @:: Lens' AccountSearchResultRecord (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.salesSeriesId' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'salesSeriesId' @:: Lens' AccountSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageId' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'brokerageId' @:: Lens' AccountSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.riskServerInstanceId' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'riskServerInstanceId' @:: Lens' AccountSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.groupId' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'groupId' @:: Lens' AccountSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.class'' @:: Lens' AccountSearchResultRecord Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'class'' @:: Lens' AccountSearchResultRecord (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.profileId' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'profileId' @:: Lens' AccountSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.profileSalesSeriesId' @:: Lens' AccountSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'profileSalesSeriesId' @:: Lens' AccountSearchResultRecord (Prelude.Maybe Data.Text.Text)@ -} +data AccountSearchResultRecord + = AccountSearchResultRecord'_constructor {_AccountSearchResultRecord'accountId :: !Data.Int.Int32, + _AccountSearchResultRecord'name :: !Data.Text.Text, + _AccountSearchResultRecord'brokerageAccountNumber :: !Data.Text.Text, + _AccountSearchResultRecord'salesSeriesNumber :: !Data.Text.Text, + _AccountSearchResultRecord'salesSeriesName :: !Data.Text.Text, + _AccountSearchResultRecord'brokerageName :: !Data.Text.Text, + _AccountSearchResultRecord'customerId :: !(Prelude.Maybe Data.Text.Text), + _AccountSearchResultRecord'customerName :: !(Prelude.Maybe Data.Text.Text), + _AccountSearchResultRecord'removed :: !(Prelude.Maybe Prelude.Bool), + _AccountSearchResultRecord'salesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _AccountSearchResultRecord'brokerageId :: !(Prelude.Maybe Data.Text.Text), + _AccountSearchResultRecord'riskServerInstanceId :: !(Prelude.Maybe Data.Text.Text), + _AccountSearchResultRecord'groupId :: !(Prelude.Maybe Data.Text.Text), + _AccountSearchResultRecord'class' :: !(Prelude.Maybe Data.Word.Word32), + _AccountSearchResultRecord'profileId :: !(Prelude.Maybe Data.Text.Text), + _AccountSearchResultRecord'profileSalesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _AccountSearchResultRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountSearchResultRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'accountId + (\ x__ y__ -> x__ {_AccountSearchResultRecord'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "name" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'name + (\ x__ y__ -> x__ {_AccountSearchResultRecord'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "brokerageAccountNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'brokerageAccountNumber + (\ x__ y__ + -> x__ {_AccountSearchResultRecord'brokerageAccountNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "salesSeriesNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'salesSeriesNumber + (\ x__ y__ + -> x__ {_AccountSearchResultRecord'salesSeriesNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "salesSeriesName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'salesSeriesName + (\ x__ y__ + -> x__ {_AccountSearchResultRecord'salesSeriesName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "brokerageName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'brokerageName + (\ x__ y__ + -> x__ {_AccountSearchResultRecord'brokerageName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "customerId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'customerId + (\ x__ y__ -> x__ {_AccountSearchResultRecord'customerId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "maybe'customerId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'customerId + (\ x__ y__ -> x__ {_AccountSearchResultRecord'customerId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "customerName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'customerName + (\ x__ y__ -> x__ {_AccountSearchResultRecord'customerName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "maybe'customerName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'customerName + (\ x__ y__ -> x__ {_AccountSearchResultRecord'customerName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "removed" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'removed + (\ x__ y__ -> x__ {_AccountSearchResultRecord'removed = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "maybe'removed" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'removed + (\ x__ y__ -> x__ {_AccountSearchResultRecord'removed = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "salesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'salesSeriesId + (\ x__ y__ + -> x__ {_AccountSearchResultRecord'salesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "maybe'salesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'salesSeriesId + (\ x__ y__ + -> x__ {_AccountSearchResultRecord'salesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "brokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'brokerageId + (\ x__ y__ -> x__ {_AccountSearchResultRecord'brokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "maybe'brokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'brokerageId + (\ x__ y__ -> x__ {_AccountSearchResultRecord'brokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "riskServerInstanceId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'riskServerInstanceId + (\ x__ y__ + -> x__ {_AccountSearchResultRecord'riskServerInstanceId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "maybe'riskServerInstanceId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'riskServerInstanceId + (\ x__ y__ + -> x__ {_AccountSearchResultRecord'riskServerInstanceId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "groupId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'groupId + (\ x__ y__ -> x__ {_AccountSearchResultRecord'groupId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "maybe'groupId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'groupId + (\ x__ y__ -> x__ {_AccountSearchResultRecord'groupId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "class'" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'class' + (\ x__ y__ -> x__ {_AccountSearchResultRecord'class' = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "maybe'class'" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'class' + (\ x__ y__ -> x__ {_AccountSearchResultRecord'class' = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "profileId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'profileId + (\ x__ y__ -> x__ {_AccountSearchResultRecord'profileId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "maybe'profileId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'profileId + (\ x__ y__ -> x__ {_AccountSearchResultRecord'profileId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "profileSalesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'profileSalesSeriesId + (\ x__ y__ + -> x__ {_AccountSearchResultRecord'profileSalesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSearchResultRecord "maybe'profileSalesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'profileSalesSeriesId + (\ x__ y__ + -> x__ {_AccountSearchResultRecord'profileSalesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountSearchResultRecord where + messageName _ + = Data.Text.pack "traderouting_1.AccountSearchResultRecord" + packedMessageDescriptor _ + = "\n\ + \\EMAccountSearchResultRecord\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\DC2\DC2\n\ + \\EOTname\CAN\STX \STX(\tR\EOTname\DC28\n\ + \\CANbrokerage_account_number\CAN\ETX \STX(\tR\SYNbrokerageAccountNumber\DC2.\n\ + \\DC3sales_series_number\CAN\EOT \STX(\tR\DC1salesSeriesNumber\DC2*\n\ + \\DC1sales_series_name\CAN\ENQ \STX(\tR\SIsalesSeriesName\DC2%\n\ + \\SObrokerage_name\CAN\ACK \STX(\tR\rbrokerageName\DC2\US\n\ + \\vcustomer_id\CAN\a \SOH(\tR\n\ + \customerId\DC2#\n\ + \\rcustomer_name\CAN\b \SOH(\tR\fcustomerName\DC2\CAN\n\ + \\aremoved\CAN\t \SOH(\bR\aremoved\DC2&\n\ + \\SIsales_series_id\CAN\n\ + \ \SOH(\tR\rsalesSeriesId\DC2!\n\ + \\fbrokerage_id\CAN\v \SOH(\tR\vbrokerageId\DC25\n\ + \\ETBrisk_server_instance_id\CAN\f \SOH(\tR\DC4riskServerInstanceId\DC2\EM\n\ + \\bgroup_id\CAN\r \SOH(\tR\agroupId\DC2\DC4\n\ + \\ENQclass\CAN\SO \SOH(\rR\ENQclass\DC2\GS\n\ + \\n\ + \profile_id\CAN\SI \SOH(\tR\tprofileId\DC25\n\ + \\ETBprofile_sales_series_id\CAN\DLE \SOH(\tR\DC4profileSalesSeriesId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"name")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + brokerageAccountNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_account_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"brokerageAccountNumber")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + salesSeriesNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"salesSeriesNumber")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + salesSeriesName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"salesSeriesName")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + brokerageName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"brokerageName")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + customerId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerId")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + customerName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerName")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + removed__field_descriptor + = Data.ProtoLens.FieldDescriptor + "removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removed")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + salesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesId")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + brokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageId")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + riskServerInstanceId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "risk_server_instance_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'riskServerInstanceId")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + groupId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "group_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'groupId")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + class'__field_descriptor + = Data.ProtoLens.FieldDescriptor + "class" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'class'")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + profileId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileId")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + profileSalesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileSalesSeriesId")) :: + Data.ProtoLens.FieldDescriptor AccountSearchResultRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, brokerageAccountNumber__field_descriptor), + (Data.ProtoLens.Tag 4, salesSeriesNumber__field_descriptor), + (Data.ProtoLens.Tag 5, salesSeriesName__field_descriptor), + (Data.ProtoLens.Tag 6, brokerageName__field_descriptor), + (Data.ProtoLens.Tag 7, customerId__field_descriptor), + (Data.ProtoLens.Tag 8, customerName__field_descriptor), + (Data.ProtoLens.Tag 9, removed__field_descriptor), + (Data.ProtoLens.Tag 10, salesSeriesId__field_descriptor), + (Data.ProtoLens.Tag 11, brokerageId__field_descriptor), + (Data.ProtoLens.Tag 12, riskServerInstanceId__field_descriptor), + (Data.ProtoLens.Tag 13, groupId__field_descriptor), + (Data.ProtoLens.Tag 14, class'__field_descriptor), + (Data.ProtoLens.Tag 15, profileId__field_descriptor), + (Data.ProtoLens.Tag 16, profileSalesSeriesId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountSearchResultRecord'_unknownFields + (\ x__ y__ + -> x__ {_AccountSearchResultRecord'_unknownFields = y__}) + defMessage + = AccountSearchResultRecord'_constructor + {_AccountSearchResultRecord'accountId = Data.ProtoLens.fieldDefault, + _AccountSearchResultRecord'name = Data.ProtoLens.fieldDefault, + _AccountSearchResultRecord'brokerageAccountNumber = Data.ProtoLens.fieldDefault, + _AccountSearchResultRecord'salesSeriesNumber = Data.ProtoLens.fieldDefault, + _AccountSearchResultRecord'salesSeriesName = Data.ProtoLens.fieldDefault, + _AccountSearchResultRecord'brokerageName = Data.ProtoLens.fieldDefault, + _AccountSearchResultRecord'customerId = Prelude.Nothing, + _AccountSearchResultRecord'customerName = Prelude.Nothing, + _AccountSearchResultRecord'removed = Prelude.Nothing, + _AccountSearchResultRecord'salesSeriesId = Prelude.Nothing, + _AccountSearchResultRecord'brokerageId = Prelude.Nothing, + _AccountSearchResultRecord'riskServerInstanceId = Prelude.Nothing, + _AccountSearchResultRecord'groupId = Prelude.Nothing, + _AccountSearchResultRecord'class' = Prelude.Nothing, + _AccountSearchResultRecord'profileId = Prelude.Nothing, + _AccountSearchResultRecord'profileSalesSeriesId = Prelude.Nothing, + _AccountSearchResultRecord'_unknownFields = []} + parseMessage + = let + loop :: + AccountSearchResultRecord + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountSearchResultRecord + loop + x + required'accountId + required'brokerageAccountNumber + required'brokerageName + required'name + required'salesSeriesName + required'salesSeriesNumber + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) + ((if required'brokerageAccountNumber then + (:) "brokerage_account_number" + else + Prelude.id) + ((if required'brokerageName then + (:) "brokerage_name" + else + Prelude.id) + ((if required'name then (:) "name" else Prelude.id) + ((if required'salesSeriesName then + (:) "sales_series_name" + else + Prelude.id) + ((if required'salesSeriesNumber then + (:) "sales_series_number" + else + Prelude.id) + []))))) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName Prelude.False required'salesSeriesName + required'salesSeriesNumber + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_account_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAccountNumber") y x) + required'accountId Prelude.False required'brokerageName + required'name required'salesSeriesName required'salesSeriesNumber + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesNumber") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + Prelude.False + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesName") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name Prelude.False + required'salesSeriesNumber + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageName") y x) + required'accountId required'brokerageAccountNumber Prelude.False + required'name required'salesSeriesName required'salesSeriesNumber + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"customerId") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"customerName") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "removed" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"removed") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesId") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"brokerageId") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "risk_server_instance_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"riskServerInstanceId") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "group_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"groupId") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + 112 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "class" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"class'") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + 122 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"profileId") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"profileSalesSeriesId") y x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId required'brokerageAccountNumber + required'brokerageName required'name required'salesSeriesName + required'salesSeriesNumber + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True + Prelude.True Prelude.True Prelude.True) + "AccountSearchResultRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"accountId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"name") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"brokerageAccountNumber") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"salesSeriesNumber") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"salesSeriesName") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"brokerageName") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'customerId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'customerName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'removed") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'salesSeriesId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'riskServerInstanceId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'groupId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'class'") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 112) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'profileId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'profileSalesSeriesId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))))) +instance Control.DeepSeq.NFData AccountSearchResultRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountSearchResultRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'accountId x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'name x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'brokerageAccountNumber x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'salesSeriesNumber x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'salesSeriesName x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'brokerageName x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'customerId x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'customerName x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'removed x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'salesSeriesId x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'brokerageId x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'riskServerInstanceId + x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'groupId x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'class' x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'profileId x__) + (Control.DeepSeq.deepseq + (_AccountSearchResultRecord'profileSalesSeriesId + x__) + ())))))))))))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountServiceGroupListRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AccountServiceGroupListRequest (Prelude.Maybe Data.Text.Text)@ -} +data AccountServiceGroupListRequest + = AccountServiceGroupListRequest'_constructor {_AccountServiceGroupListRequest'accountId :: !(Prelude.Maybe Data.Text.Text), + _AccountServiceGroupListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountServiceGroupListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountServiceGroupListRequest "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountServiceGroupListRequest'accountId + (\ x__ y__ + -> x__ {_AccountServiceGroupListRequest'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountServiceGroupListRequest "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountServiceGroupListRequest'accountId + (\ x__ y__ + -> x__ {_AccountServiceGroupListRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountServiceGroupListRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountServiceGroupListRequest" + packedMessageDescriptor _ + = "\n\ + \\RSAccountServiceGroupListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AccountServiceGroupListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountServiceGroupListRequest'_unknownFields + (\ x__ y__ + -> x__ {_AccountServiceGroupListRequest'_unknownFields = y__}) + defMessage + = AccountServiceGroupListRequest'_constructor + {_AccountServiceGroupListRequest'accountId = Prelude.Nothing, + _AccountServiceGroupListRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountServiceGroupListRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AccountServiceGroupListRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "AccountServiceGroupListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountServiceGroupListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountServiceGroupListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountServiceGroupListRequest'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.serviceGroupIds' @:: Lens' AccountServiceGroupListResult [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'serviceGroupIds' @:: Lens' AccountServiceGroupListResult (Data.Vector.Vector Data.Text.Text)@ -} +data AccountServiceGroupListResult + = AccountServiceGroupListResult'_constructor {_AccountServiceGroupListResult'serviceGroupIds :: !(Data.Vector.Vector Data.Text.Text), + _AccountServiceGroupListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountServiceGroupListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountServiceGroupListResult "serviceGroupIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountServiceGroupListResult'serviceGroupIds + (\ x__ y__ + -> x__ {_AccountServiceGroupListResult'serviceGroupIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountServiceGroupListResult "vec'serviceGroupIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountServiceGroupListResult'serviceGroupIds + (\ x__ y__ + -> x__ {_AccountServiceGroupListResult'serviceGroupIds = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountServiceGroupListResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountServiceGroupListResult" + packedMessageDescriptor _ + = "\n\ + \\GSAccountServiceGroupListResult\DC2*\n\ + \\DC1service_group_ids\CAN\SOH \ETX(\tR\SIserviceGroupIds" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + serviceGroupIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "service_group_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"serviceGroupIds")) :: + Data.ProtoLens.FieldDescriptor AccountServiceGroupListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, serviceGroupIds__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountServiceGroupListResult'_unknownFields + (\ x__ y__ + -> x__ {_AccountServiceGroupListResult'_unknownFields = y__}) + defMessage + = AccountServiceGroupListResult'_constructor + {_AccountServiceGroupListResult'serviceGroupIds = Data.Vector.Generic.empty, + _AccountServiceGroupListResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountServiceGroupListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser AccountServiceGroupListResult + loop x mutable'serviceGroupIds + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'serviceGroupIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'serviceGroupIds) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'serviceGroupIds") + frozen'serviceGroupIds x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "service_group_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'serviceGroupIds y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'serviceGroupIds + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'serviceGroupIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'serviceGroupIds) + "AccountServiceGroupListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'serviceGroupIds") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountServiceGroupListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountServiceGroupListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountServiceGroupListResult'serviceGroupIds x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clearedFields' @:: Lens' AccountSettings [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clearedFields' @:: Lens' AccountSettings (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountSettings Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AccountSettings (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteIsBlock' @:: Lens' AccountSettings Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteIsBlock' @:: Lens' AccountSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteBlockSize' @:: Lens' AccountSettings Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteBlockSize' @:: Lens' AccountSettings (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.isGiveup' @:: Lens' AccountSettings Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isGiveup' @:: Lens' AccountSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteGiveupBrokerageName' @:: Lens' AccountSettings Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteGiveupBrokerageName' @:: Lens' AccountSettings (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.statementOption' @:: Lens' AccountSettings Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'statementOption' @:: Lens' AccountSettings (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.zeroBalance' @:: Lens' AccountSettings Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'zeroBalance' @:: Lens' AccountSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.reconciliation' @:: Lens' AccountSettings Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'reconciliation' @:: Lens' AccountSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.giveupBrokerageId' @:: Lens' AccountSettings Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'giveupBrokerageId' @:: Lens' AccountSettings (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradingTimeFrom' @:: Lens' AccountSettings Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradingTimeFrom' @:: Lens' AccountSettings (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradingTimeTo' @:: Lens' AccountSettings Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradingTimeTo' @:: Lens' AccountSettings (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradingTimeZone' @:: Lens' AccountSettings Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradingTimeZone' @:: Lens' AccountSettings (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.liquidationOrdersOutsideTradingTime' @:: Lens' AccountSettings Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'liquidationOrdersOutsideTradingTime' @:: Lens' AccountSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.isInstruct' @:: Lens' AccountSettings Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isInstruct' @:: Lens' AccountSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.externallyProvidedExecution' @:: Lens' AccountSettings Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'externallyProvidedExecution' @:: Lens' AccountSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.modesAccountGroups' @:: Lens' AccountSettings [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'modesAccountGroups' @:: Lens' AccountSettings (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.requirePreTradeMidMarketMark' @:: Lens' AccountSettings Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'requirePreTradeMidMarketMark' @:: Lens' AccountSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.allowExtendedSide' @:: Lens' AccountSettings Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowExtendedSide' @:: Lens' AccountSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.allowGoFlat' @:: Lens' AccountSettings Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowGoFlat' @:: Lens' AccountSettings (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.goFlatDefaultSpeculationType' @:: Lens' AccountSettings Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'goFlatDefaultSpeculationType' @:: Lens' AccountSettings (Prelude.Maybe Data.Word.Word32)@ -} +data AccountSettings + = AccountSettings'_constructor {_AccountSettings'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _AccountSettings'accountId :: !(Prelude.Maybe Data.Int.Int32), + _AccountSettings'obsoleteIsBlock :: !(Prelude.Maybe Prelude.Bool), + _AccountSettings'obsoleteBlockSize :: !(Prelude.Maybe Data.Int.Int32), + _AccountSettings'isGiveup :: !(Prelude.Maybe Prelude.Bool), + _AccountSettings'obsoleteGiveupBrokerageName :: !(Prelude.Maybe Data.Text.Text), + _AccountSettings'statementOption :: !(Prelude.Maybe Data.Word.Word32), + _AccountSettings'zeroBalance :: !(Prelude.Maybe Prelude.Bool), + _AccountSettings'reconciliation :: !(Prelude.Maybe Prelude.Bool), + _AccountSettings'giveupBrokerageId :: !(Prelude.Maybe Data.Text.Text), + _AccountSettings'tradingTimeFrom :: !(Prelude.Maybe Data.Text.Text), + _AccountSettings'tradingTimeTo :: !(Prelude.Maybe Data.Text.Text), + _AccountSettings'tradingTimeZone :: !(Prelude.Maybe Data.Text.Text), + _AccountSettings'liquidationOrdersOutsideTradingTime :: !(Prelude.Maybe Prelude.Bool), + _AccountSettings'isInstruct :: !(Prelude.Maybe Prelude.Bool), + _AccountSettings'externallyProvidedExecution :: !(Prelude.Maybe Prelude.Bool), + _AccountSettings'modesAccountGroups :: !(Data.Vector.Vector Data.Text.Text), + _AccountSettings'requirePreTradeMidMarketMark :: !(Prelude.Maybe Prelude.Bool), + _AccountSettings'allowExtendedSide :: !(Prelude.Maybe Prelude.Bool), + _AccountSettings'allowGoFlat :: !(Prelude.Maybe Prelude.Bool), + _AccountSettings'goFlatDefaultSpeculationType :: !(Prelude.Maybe Data.Word.Word32), + _AccountSettings'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountSettings where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountSettings "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'clearedFields + (\ x__ y__ -> x__ {_AccountSettings'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountSettings "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'clearedFields + (\ x__ y__ -> x__ {_AccountSettings'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'accountId + (\ x__ y__ -> x__ {_AccountSettings'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'accountId + (\ x__ y__ -> x__ {_AccountSettings'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "obsoleteIsBlock" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'obsoleteIsBlock + (\ x__ y__ -> x__ {_AccountSettings'obsoleteIsBlock = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'obsoleteIsBlock" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'obsoleteIsBlock + (\ x__ y__ -> x__ {_AccountSettings'obsoleteIsBlock = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "obsoleteBlockSize" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'obsoleteBlockSize + (\ x__ y__ -> x__ {_AccountSettings'obsoleteBlockSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'obsoleteBlockSize" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'obsoleteBlockSize + (\ x__ y__ -> x__ {_AccountSettings'obsoleteBlockSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "isGiveup" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'isGiveup + (\ x__ y__ -> x__ {_AccountSettings'isGiveup = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'isGiveup" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'isGiveup + (\ x__ y__ -> x__ {_AccountSettings'isGiveup = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "obsoleteGiveupBrokerageName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'obsoleteGiveupBrokerageName + (\ x__ y__ + -> x__ {_AccountSettings'obsoleteGiveupBrokerageName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'obsoleteGiveupBrokerageName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'obsoleteGiveupBrokerageName + (\ x__ y__ + -> x__ {_AccountSettings'obsoleteGiveupBrokerageName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "statementOption" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'statementOption + (\ x__ y__ -> x__ {_AccountSettings'statementOption = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'statementOption" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'statementOption + (\ x__ y__ -> x__ {_AccountSettings'statementOption = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "zeroBalance" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'zeroBalance + (\ x__ y__ -> x__ {_AccountSettings'zeroBalance = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'zeroBalance" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'zeroBalance + (\ x__ y__ -> x__ {_AccountSettings'zeroBalance = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "reconciliation" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'reconciliation + (\ x__ y__ -> x__ {_AccountSettings'reconciliation = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'reconciliation" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'reconciliation + (\ x__ y__ -> x__ {_AccountSettings'reconciliation = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "giveupBrokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'giveupBrokerageId + (\ x__ y__ -> x__ {_AccountSettings'giveupBrokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'giveupBrokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'giveupBrokerageId + (\ x__ y__ -> x__ {_AccountSettings'giveupBrokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "tradingTimeFrom" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'tradingTimeFrom + (\ x__ y__ -> x__ {_AccountSettings'tradingTimeFrom = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'tradingTimeFrom" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'tradingTimeFrom + (\ x__ y__ -> x__ {_AccountSettings'tradingTimeFrom = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "tradingTimeTo" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'tradingTimeTo + (\ x__ y__ -> x__ {_AccountSettings'tradingTimeTo = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'tradingTimeTo" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'tradingTimeTo + (\ x__ y__ -> x__ {_AccountSettings'tradingTimeTo = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "tradingTimeZone" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'tradingTimeZone + (\ x__ y__ -> x__ {_AccountSettings'tradingTimeZone = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'tradingTimeZone" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'tradingTimeZone + (\ x__ y__ -> x__ {_AccountSettings'tradingTimeZone = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "liquidationOrdersOutsideTradingTime" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'liquidationOrdersOutsideTradingTime + (\ x__ y__ + -> x__ + {_AccountSettings'liquidationOrdersOutsideTradingTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'liquidationOrdersOutsideTradingTime" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'liquidationOrdersOutsideTradingTime + (\ x__ y__ + -> x__ + {_AccountSettings'liquidationOrdersOutsideTradingTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "isInstruct" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'isInstruct + (\ x__ y__ -> x__ {_AccountSettings'isInstruct = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'isInstruct" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'isInstruct + (\ x__ y__ -> x__ {_AccountSettings'isInstruct = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "externallyProvidedExecution" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'externallyProvidedExecution + (\ x__ y__ + -> x__ {_AccountSettings'externallyProvidedExecution = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'externallyProvidedExecution" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'externallyProvidedExecution + (\ x__ y__ + -> x__ {_AccountSettings'externallyProvidedExecution = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "modesAccountGroups" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'modesAccountGroups + (\ x__ y__ -> x__ {_AccountSettings'modesAccountGroups = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountSettings "vec'modesAccountGroups" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'modesAccountGroups + (\ x__ y__ -> x__ {_AccountSettings'modesAccountGroups = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "requirePreTradeMidMarketMark" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'requirePreTradeMidMarketMark + (\ x__ y__ + -> x__ {_AccountSettings'requirePreTradeMidMarketMark = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'requirePreTradeMidMarketMark" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'requirePreTradeMidMarketMark + (\ x__ y__ + -> x__ {_AccountSettings'requirePreTradeMidMarketMark = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "allowExtendedSide" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'allowExtendedSide + (\ x__ y__ -> x__ {_AccountSettings'allowExtendedSide = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'allowExtendedSide" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'allowExtendedSide + (\ x__ y__ -> x__ {_AccountSettings'allowExtendedSide = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "allowGoFlat" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'allowGoFlat + (\ x__ y__ -> x__ {_AccountSettings'allowGoFlat = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'allowGoFlat" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'allowGoFlat + (\ x__ y__ -> x__ {_AccountSettings'allowGoFlat = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountSettings "goFlatDefaultSpeculationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'goFlatDefaultSpeculationType + (\ x__ y__ + -> x__ {_AccountSettings'goFlatDefaultSpeculationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountSettings "maybe'goFlatDefaultSpeculationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettings'goFlatDefaultSpeculationType + (\ x__ y__ + -> x__ {_AccountSettings'goFlatDefaultSpeculationType = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountSettings where + messageName _ = Data.Text.pack "traderouting_1.AccountSettings" + packedMessageDescriptor _ + = "\n\ + \\SIAccountSettings\DC2%\n\ + \\SOcleared_fields\CAN\DC2 \ETX(\rR\rclearedFields\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2.\n\ + \\DC1obsolete_is_block\CAN\STX \SOH(\bR\SIobsoleteIsBlockB\STX\CAN\SOH\DC22\n\ + \\DC3obsolete_block_size\CAN\ETX \SOH(\DC1R\DC1obsoleteBlockSizeB\STX\CAN\SOH\DC2\ESC\n\ + \\tis_giveup\CAN\EOT \SOH(\bR\bisGiveup\DC2G\n\ + \\RSobsolete_giveup_brokerage_name\CAN\ENQ \SOH(\tR\ESCobsoleteGiveupBrokerageNameB\STX\CAN\SOH\DC2)\n\ + \\DLEstatement_option\CAN\ACK \SOH(\rR\SIstatementOption\DC2!\n\ + \\fzero_balance\CAN\a \SOH(\bR\vzeroBalance\DC2&\n\ + \\SOreconciliation\CAN\b \SOH(\bR\SOreconciliation\DC2.\n\ + \\DC3giveup_brokerage_id\CAN\t \SOH(\tR\DC1giveupBrokerageId\DC2*\n\ + \\DC1trading_time_from\CAN\n\ + \ \SOH(\tR\SItradingTimeFrom\DC2&\n\ + \\SItrading_time_to\CAN\v \SOH(\tR\rtradingTimeTo\DC2*\n\ + \\DC1trading_time_zone\CAN\f \SOH(\tR\SItradingTimeZone\DC2T\n\ + \'liquidation_orders_outside_trading_time\CAN\r \SOH(\bR#liquidationOrdersOutsideTradingTime\DC2\US\n\ + \\vis_instruct\CAN\SO \SOH(\bR\n\ + \isInstruct\DC2B\n\ + \\GSexternally_provided_execution\CAN\SI \SOH(\bR\ESCexternallyProvidedExecution\DC20\n\ + \\DC4modes_account_groups\CAN\DLE \ETX(\tR\DC2modesAccountGroups\DC2G\n\ + \!require_pre_trade_mid_market_mark\CAN\DC1 \SOH(\bR\FSrequirePreTradeMidMarketMark\DC2.\n\ + \\DC3allow_extended_side\CAN\DC3 \SOH(\bR\DC1allowExtendedSide\DC2\"\n\ + \\rallow_go_flat\CAN\DC4 \SOH(\bR\vallowGoFlat\DC2F\n\ + \ go_flat_default_speculation_type\CAN\NAK \SOH(\rR\FSgoFlatDefaultSpeculationType\"9\n\ + \\SIStatementOption\DC2\f\n\ + \\bGENERATE\DLE\SOH\DC2\r\n\ + \\tBROKERAGE\DLE\STX\DC2\t\n\ + \\ENQRESET\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + obsoleteIsBlock__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_is_block" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteIsBlock")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + obsoleteBlockSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_block_size" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteBlockSize")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + isGiveup__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_giveup" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isGiveup")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + obsoleteGiveupBrokerageName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_giveup_brokerage_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteGiveupBrokerageName")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + statementOption__field_descriptor + = Data.ProtoLens.FieldDescriptor + "statement_option" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'statementOption")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + zeroBalance__field_descriptor + = Data.ProtoLens.FieldDescriptor + "zero_balance" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'zeroBalance")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + reconciliation__field_descriptor + = Data.ProtoLens.FieldDescriptor + "reconciliation" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'reconciliation")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + giveupBrokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "giveup_brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'giveupBrokerageId")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + tradingTimeFrom__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trading_time_from" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradingTimeFrom")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + tradingTimeTo__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trading_time_to" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradingTimeTo")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + tradingTimeZone__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trading_time_zone" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradingTimeZone")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + liquidationOrdersOutsideTradingTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "liquidation_orders_outside_trading_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'liquidationOrdersOutsideTradingTime")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + isInstruct__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_instruct" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isInstruct")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + externallyProvidedExecution__field_descriptor + = Data.ProtoLens.FieldDescriptor + "externally_provided_execution" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'externallyProvidedExecution")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + modesAccountGroups__field_descriptor + = Data.ProtoLens.FieldDescriptor + "modes_account_groups" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"modesAccountGroups")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + requirePreTradeMidMarketMark__field_descriptor + = Data.ProtoLens.FieldDescriptor + "require_pre_trade_mid_market_mark" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'requirePreTradeMidMarketMark")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + allowExtendedSide__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allow_extended_side" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowExtendedSide")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + allowGoFlat__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allow_go_flat" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowGoFlat")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + goFlatDefaultSpeculationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "go_flat_default_speculation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'goFlatDefaultSpeculationType")) :: + Data.ProtoLens.FieldDescriptor AccountSettings + in + Data.Map.fromList + [(Data.ProtoLens.Tag 18, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteIsBlock__field_descriptor), + (Data.ProtoLens.Tag 3, obsoleteBlockSize__field_descriptor), + (Data.ProtoLens.Tag 4, isGiveup__field_descriptor), + (Data.ProtoLens.Tag 5, + obsoleteGiveupBrokerageName__field_descriptor), + (Data.ProtoLens.Tag 6, statementOption__field_descriptor), + (Data.ProtoLens.Tag 7, zeroBalance__field_descriptor), + (Data.ProtoLens.Tag 8, reconciliation__field_descriptor), + (Data.ProtoLens.Tag 9, giveupBrokerageId__field_descriptor), + (Data.ProtoLens.Tag 10, tradingTimeFrom__field_descriptor), + (Data.ProtoLens.Tag 11, tradingTimeTo__field_descriptor), + (Data.ProtoLens.Tag 12, tradingTimeZone__field_descriptor), + (Data.ProtoLens.Tag 13, + liquidationOrdersOutsideTradingTime__field_descriptor), + (Data.ProtoLens.Tag 14, isInstruct__field_descriptor), + (Data.ProtoLens.Tag 15, + externallyProvidedExecution__field_descriptor), + (Data.ProtoLens.Tag 16, modesAccountGroups__field_descriptor), + (Data.ProtoLens.Tag 17, + requirePreTradeMidMarketMark__field_descriptor), + (Data.ProtoLens.Tag 19, allowExtendedSide__field_descriptor), + (Data.ProtoLens.Tag 20, allowGoFlat__field_descriptor), + (Data.ProtoLens.Tag 21, + goFlatDefaultSpeculationType__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountSettings'_unknownFields + (\ x__ y__ -> x__ {_AccountSettings'_unknownFields = y__}) + defMessage + = AccountSettings'_constructor + {_AccountSettings'clearedFields = Data.Vector.Generic.empty, + _AccountSettings'accountId = Prelude.Nothing, + _AccountSettings'obsoleteIsBlock = Prelude.Nothing, + _AccountSettings'obsoleteBlockSize = Prelude.Nothing, + _AccountSettings'isGiveup = Prelude.Nothing, + _AccountSettings'obsoleteGiveupBrokerageName = Prelude.Nothing, + _AccountSettings'statementOption = Prelude.Nothing, + _AccountSettings'zeroBalance = Prelude.Nothing, + _AccountSettings'reconciliation = Prelude.Nothing, + _AccountSettings'giveupBrokerageId = Prelude.Nothing, + _AccountSettings'tradingTimeFrom = Prelude.Nothing, + _AccountSettings'tradingTimeTo = Prelude.Nothing, + _AccountSettings'tradingTimeZone = Prelude.Nothing, + _AccountSettings'liquidationOrdersOutsideTradingTime = Prelude.Nothing, + _AccountSettings'isInstruct = Prelude.Nothing, + _AccountSettings'externallyProvidedExecution = Prelude.Nothing, + _AccountSettings'modesAccountGroups = Data.Vector.Generic.empty, + _AccountSettings'requirePreTradeMidMarketMark = Prelude.Nothing, + _AccountSettings'allowExtendedSide = Prelude.Nothing, + _AccountSettings'allowGoFlat = Prelude.Nothing, + _AccountSettings'goFlatDefaultSpeculationType = Prelude.Nothing, + _AccountSettings'_unknownFields = []} + parseMessage + = let + loop :: + AccountSettings + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser AccountSettings + loop x mutable'clearedFields mutable'modesAccountGroups + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + frozen'modesAccountGroups <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'modesAccountGroups) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'modesAccountGroups") + frozen'modesAccountGroups x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 144 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x v mutable'modesAccountGroups + 146 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x y mutable'modesAccountGroups + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + mutable'clearedFields mutable'modesAccountGroups + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_is_block" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteIsBlock") y x) + mutable'clearedFields mutable'modesAccountGroups + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "obsolete_block_size" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteBlockSize") y x) + mutable'clearedFields mutable'modesAccountGroups + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_giveup" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isGiveup") y x) + mutable'clearedFields mutable'modesAccountGroups + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_giveup_brokerage_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteGiveupBrokerageName") y + x) + mutable'clearedFields mutable'modesAccountGroups + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "statement_option" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"statementOption") y x) + mutable'clearedFields mutable'modesAccountGroups + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "zero_balance" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"zeroBalance") y x) + mutable'clearedFields mutable'modesAccountGroups + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "reconciliation" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"reconciliation") y x) + mutable'clearedFields mutable'modesAccountGroups + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "giveup_brokerage_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"giveupBrokerageId") y x) + mutable'clearedFields mutable'modesAccountGroups + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trading_time_from" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradingTimeFrom") y x) + mutable'clearedFields mutable'modesAccountGroups + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trading_time_to" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradingTimeTo") y x) + mutable'clearedFields mutable'modesAccountGroups + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trading_time_zone" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradingTimeZone") y x) + mutable'clearedFields mutable'modesAccountGroups + 104 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "liquidation_orders_outside_trading_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"liquidationOrdersOutsideTradingTime") + y x) + mutable'clearedFields mutable'modesAccountGroups + 112 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_instruct" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isInstruct") y x) + mutable'clearedFields mutable'modesAccountGroups + 120 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "externally_provided_execution" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"externallyProvidedExecution") y + x) + mutable'clearedFields mutable'modesAccountGroups + 130 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "modes_account_groups" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'modesAccountGroups y) + loop x mutable'clearedFields v + 136 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "require_pre_trade_mid_market_mark" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"requirePreTradeMidMarketMark") y + x) + mutable'clearedFields mutable'modesAccountGroups + 152 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "allow_extended_side" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowExtendedSide") y x) + mutable'clearedFields mutable'modesAccountGroups + 160 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "allow_go_flat" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"allowGoFlat") y x) + mutable'clearedFields mutable'modesAccountGroups + 168 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "go_flat_default_speculation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"goFlatDefaultSpeculationType") y + x) + mutable'clearedFields mutable'modesAccountGroups + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'clearedFields mutable'modesAccountGroups + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'modesAccountGroups <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'clearedFields + mutable'modesAccountGroups) + "AccountSettings" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 144) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteIsBlock") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteBlockSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'isGiveup") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteGiveupBrokerageName") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'statementOption") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'zeroBalance") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'reconciliation") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'giveupBrokerageId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradingTimeFrom") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradingTimeTo") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradingTimeZone") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'liquidationOrdersOutsideTradingTime") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 104) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'isInstruct") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 112) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'externallyProvidedExecution") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 120) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'modesAccountGroups") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'requirePreTradeMidMarketMark") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 136) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'allowExtendedSide") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 152) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'allowGoFlat") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 160) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'goFlatDefaultSpeculationType") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 168) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))))))))) +instance Control.DeepSeq.NFData AccountSettings where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountSettings'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountSettings'clearedFields x__) + (Control.DeepSeq.deepseq + (_AccountSettings'accountId x__) + (Control.DeepSeq.deepseq + (_AccountSettings'obsoleteIsBlock x__) + (Control.DeepSeq.deepseq + (_AccountSettings'obsoleteBlockSize x__) + (Control.DeepSeq.deepseq + (_AccountSettings'isGiveup x__) + (Control.DeepSeq.deepseq + (_AccountSettings'obsoleteGiveupBrokerageName x__) + (Control.DeepSeq.deepseq + (_AccountSettings'statementOption x__) + (Control.DeepSeq.deepseq + (_AccountSettings'zeroBalance x__) + (Control.DeepSeq.deepseq + (_AccountSettings'reconciliation x__) + (Control.DeepSeq.deepseq + (_AccountSettings'giveupBrokerageId x__) + (Control.DeepSeq.deepseq + (_AccountSettings'tradingTimeFrom x__) + (Control.DeepSeq.deepseq + (_AccountSettings'tradingTimeTo x__) + (Control.DeepSeq.deepseq + (_AccountSettings'tradingTimeZone x__) + (Control.DeepSeq.deepseq + (_AccountSettings'liquidationOrdersOutsideTradingTime + x__) + (Control.DeepSeq.deepseq + (_AccountSettings'isInstruct x__) + (Control.DeepSeq.deepseq + (_AccountSettings'externallyProvidedExecution + x__) + (Control.DeepSeq.deepseq + (_AccountSettings'modesAccountGroups + x__) + (Control.DeepSeq.deepseq + (_AccountSettings'requirePreTradeMidMarketMark + x__) + (Control.DeepSeq.deepseq + (_AccountSettings'allowExtendedSide + x__) + (Control.DeepSeq.deepseq + (_AccountSettings'allowGoFlat + x__) + (Control.DeepSeq.deepseq + (_AccountSettings'goFlatDefaultSpeculationType + x__) + ()))))))))))))))))))))) +data AccountSettings'StatementOption + = AccountSettings'GENERATE | + AccountSettings'BROKERAGE | + AccountSettings'RESET + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum AccountSettings'StatementOption where + maybeToEnum 1 = Prelude.Just AccountSettings'GENERATE + maybeToEnum 2 = Prelude.Just AccountSettings'BROKERAGE + maybeToEnum 3 = Prelude.Just AccountSettings'RESET + maybeToEnum _ = Prelude.Nothing + showEnum AccountSettings'GENERATE = "GENERATE" + showEnum AccountSettings'BROKERAGE = "BROKERAGE" + showEnum AccountSettings'RESET = "RESET" + readEnum k + | (Prelude.==) k "GENERATE" = Prelude.Just AccountSettings'GENERATE + | (Prelude.==) k "BROKERAGE" + = Prelude.Just AccountSettings'BROKERAGE + | (Prelude.==) k "RESET" = Prelude.Just AccountSettings'RESET + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded AccountSettings'StatementOption where + minBound = AccountSettings'GENERATE + maxBound = AccountSettings'RESET +instance Prelude.Enum AccountSettings'StatementOption where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum StatementOption: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum AccountSettings'GENERATE = 1 + fromEnum AccountSettings'BROKERAGE = 2 + fromEnum AccountSettings'RESET = 3 + succ AccountSettings'RESET + = Prelude.error + "AccountSettings'StatementOption.succ: bad argument AccountSettings'RESET. This value would be out of bounds." + succ AccountSettings'GENERATE = AccountSettings'BROKERAGE + succ AccountSettings'BROKERAGE = AccountSettings'RESET + pred AccountSettings'GENERATE + = Prelude.error + "AccountSettings'StatementOption.pred: bad argument AccountSettings'GENERATE. This value would be out of bounds." + pred AccountSettings'BROKERAGE = AccountSettings'GENERATE + pred AccountSettings'RESET = AccountSettings'BROKERAGE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault AccountSettings'StatementOption where + fieldDefault = AccountSettings'GENERATE +instance Control.DeepSeq.NFData AccountSettings'StatementOption where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountSettingsRequest Data.Int.Int32@ -} +data AccountSettingsRequest + = AccountSettingsRequest'_constructor {_AccountSettingsRequest'accountId :: !Data.Int.Int32, + _AccountSettingsRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountSettingsRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountSettingsRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettingsRequest'accountId + (\ x__ y__ -> x__ {_AccountSettingsRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountSettingsRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountSettingsRequest" + packedMessageDescriptor _ + = "\n\ + \\SYNAccountSettingsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor AccountSettingsRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountSettingsRequest'_unknownFields + (\ x__ y__ -> x__ {_AccountSettingsRequest'_unknownFields = y__}) + defMessage + = AccountSettingsRequest'_constructor + {_AccountSettingsRequest'accountId = Data.ProtoLens.fieldDefault, + _AccountSettingsRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountSettingsRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountSettingsRequest + loop x required'accountId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountSettingsRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"accountId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountSettingsRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountSettingsRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountSettingsRequest'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountSettings' @:: Lens' AccountSettingsResult AccountSettings@ -} +data AccountSettingsResult + = AccountSettingsResult'_constructor {_AccountSettingsResult'accountSettings :: !AccountSettings, + _AccountSettingsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountSettingsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountSettingsResult "accountSettings" AccountSettings where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountSettingsResult'accountSettings + (\ x__ y__ -> x__ {_AccountSettingsResult'accountSettings = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountSettingsResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountSettingsResult" + packedMessageDescriptor _ + = "\n\ + \\NAKAccountSettingsResult\DC2J\n\ + \\DLEaccount_settings\CAN\SOH \STX(\v2\US.traderouting_1.AccountSettingsR\SIaccountSettings" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountSettings__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_settings" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountSettings) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountSettings")) :: + Data.ProtoLens.FieldDescriptor AccountSettingsResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountSettings__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountSettingsResult'_unknownFields + (\ x__ y__ -> x__ {_AccountSettingsResult'_unknownFields = y__}) + defMessage + = AccountSettingsResult'_constructor + {_AccountSettingsResult'accountSettings = Data.ProtoLens.defMessage, + _AccountSettingsResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountSettingsResult + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser AccountSettingsResult + loop x required'accountSettings + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountSettings then + (:) "account_settings" + else + Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_settings" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountSettings") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountSettings + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "AccountSettingsResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view + (Data.ProtoLens.Field.field @"accountSettings") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountSettingsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountSettingsResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountSettingsResult'accountSettings x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountTradingFeaturesRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AccountTradingFeaturesRequest (Prelude.Maybe Data.Text.Text)@ -} +data AccountTradingFeaturesRequest + = AccountTradingFeaturesRequest'_constructor {_AccountTradingFeaturesRequest'accountId :: !(Prelude.Maybe Data.Text.Text), + _AccountTradingFeaturesRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountTradingFeaturesRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountTradingFeaturesRequest "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTradingFeaturesRequest'accountId + (\ x__ y__ + -> x__ {_AccountTradingFeaturesRequest'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountTradingFeaturesRequest "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTradingFeaturesRequest'accountId + (\ x__ y__ + -> x__ {_AccountTradingFeaturesRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountTradingFeaturesRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountTradingFeaturesRequest" + packedMessageDescriptor _ + = "\n\ + \\GSAccountTradingFeaturesRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AccountTradingFeaturesRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountTradingFeaturesRequest'_unknownFields + (\ x__ y__ + -> x__ {_AccountTradingFeaturesRequest'_unknownFields = y__}) + defMessage + = AccountTradingFeaturesRequest'_constructor + {_AccountTradingFeaturesRequest'accountId = Prelude.Nothing, + _AccountTradingFeaturesRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountTradingFeaturesRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AccountTradingFeaturesRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountTradingFeaturesRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountTradingFeaturesRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountTradingFeaturesRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountTradingFeaturesRequest'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountTradingInterfaceElements' @:: Lens' AccountTradingFeaturesResult [AccountTradingInterfaceElement]@ + * 'Proto.CMS.Traderouting1_Fields.vec'accountTradingInterfaceElements' @:: Lens' AccountTradingFeaturesResult (Data.Vector.Vector AccountTradingInterfaceElement)@ -} +data AccountTradingFeaturesResult + = AccountTradingFeaturesResult'_constructor {_AccountTradingFeaturesResult'accountTradingInterfaceElements :: !(Data.Vector.Vector AccountTradingInterfaceElement), + _AccountTradingFeaturesResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountTradingFeaturesResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountTradingFeaturesResult "accountTradingInterfaceElements" [AccountTradingInterfaceElement] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTradingFeaturesResult'accountTradingInterfaceElements + (\ x__ y__ + -> x__ + {_AccountTradingFeaturesResult'accountTradingInterfaceElements = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountTradingFeaturesResult "vec'accountTradingInterfaceElements" (Data.Vector.Vector AccountTradingInterfaceElement) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTradingFeaturesResult'accountTradingInterfaceElements + (\ x__ y__ + -> x__ + {_AccountTradingFeaturesResult'accountTradingInterfaceElements = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountTradingFeaturesResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountTradingFeaturesResult" + packedMessageDescriptor _ + = "\n\ + \\FSAccountTradingFeaturesResult\DC2{\n\ + \\"account_trading_interface_elements\CAN\SOH \ETX(\v2..traderouting_1.AccountTradingInterfaceElementR\USaccountTradingInterfaceElements" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountTradingInterfaceElements__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_trading_interface_elements" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountTradingInterfaceElement) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"accountTradingInterfaceElements")) :: + Data.ProtoLens.FieldDescriptor AccountTradingFeaturesResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, + accountTradingInterfaceElements__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountTradingFeaturesResult'_unknownFields + (\ x__ y__ + -> x__ {_AccountTradingFeaturesResult'_unknownFields = y__}) + defMessage + = AccountTradingFeaturesResult'_constructor + {_AccountTradingFeaturesResult'accountTradingInterfaceElements = Data.Vector.Generic.empty, + _AccountTradingFeaturesResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountTradingFeaturesResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountTradingInterfaceElement + -> Data.ProtoLens.Encoding.Bytes.Parser AccountTradingFeaturesResult + loop x mutable'accountTradingInterfaceElements + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'accountTradingInterfaceElements <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'accountTradingInterfaceElements) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'accountTradingInterfaceElements") + frozen'accountTradingInterfaceElements x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "account_trading_interface_elements" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'accountTradingInterfaceElements y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'accountTradingInterfaceElements + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'accountTradingInterfaceElements <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'accountTradingInterfaceElements) + "AccountTradingFeaturesResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'accountTradingInterfaceElements") + _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountTradingFeaturesResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountTradingFeaturesResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountTradingFeaturesResult'accountTradingInterfaceElements x__) + ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' AccountTradingInterfaceElement Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' AccountTradingInterfaceElement (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.enabled' @:: Lens' AccountTradingInterfaceElement Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enabled' @:: Lens' AccountTradingInterfaceElement (Prelude.Maybe Prelude.Bool)@ -} +data AccountTradingInterfaceElement + = AccountTradingInterfaceElement'_constructor {_AccountTradingInterfaceElement'id :: !(Prelude.Maybe Data.Text.Text), + _AccountTradingInterfaceElement'enabled :: !(Prelude.Maybe Prelude.Bool), + _AccountTradingInterfaceElement'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountTradingInterfaceElement where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountTradingInterfaceElement "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTradingInterfaceElement'id + (\ x__ y__ -> x__ {_AccountTradingInterfaceElement'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountTradingInterfaceElement "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTradingInterfaceElement'id + (\ x__ y__ -> x__ {_AccountTradingInterfaceElement'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountTradingInterfaceElement "enabled" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTradingInterfaceElement'enabled + (\ x__ y__ -> x__ {_AccountTradingInterfaceElement'enabled = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountTradingInterfaceElement "maybe'enabled" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTradingInterfaceElement'enabled + (\ x__ y__ -> x__ {_AccountTradingInterfaceElement'enabled = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountTradingInterfaceElement where + messageName _ + = Data.Text.pack "traderouting_1.AccountTradingInterfaceElement" + packedMessageDescriptor _ + = "\n\ + \\RSAccountTradingInterfaceElement\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\CAN\n\ + \\aenabled\CAN\STX \SOH(\bR\aenabled" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor AccountTradingInterfaceElement + enabled__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enabled" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'enabled")) :: + Data.ProtoLens.FieldDescriptor AccountTradingInterfaceElement + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, enabled__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountTradingInterfaceElement'_unknownFields + (\ x__ y__ + -> x__ {_AccountTradingInterfaceElement'_unknownFields = y__}) + defMessage + = AccountTradingInterfaceElement'_constructor + {_AccountTradingInterfaceElement'id = Prelude.Nothing, + _AccountTradingInterfaceElement'enabled = Prelude.Nothing, + _AccountTradingInterfaceElement'_unknownFields = []} + parseMessage + = let + loop :: + AccountTradingInterfaceElement + -> Data.ProtoLens.Encoding.Bytes.Parser AccountTradingInterfaceElement + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enabled" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"enabled") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "AccountTradingInterfaceElement" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'enabled") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData AccountTradingInterfaceElement where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountTradingInterfaceElement'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountTradingInterfaceElement'id x__) + (Control.DeepSeq.deepseq + (_AccountTradingInterfaceElement'enabled x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.exchangeId' @:: Lens' AccountTypeOverride Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'exchangeId' @:: Lens' AccountTypeOverride (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.loginId' @:: Lens' AccountTypeOverride Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'loginId' @:: Lens' AccountTypeOverride (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.typeId' @:: Lens' AccountTypeOverride Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'typeId' @:: Lens' AccountTypeOverride (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.originId' @:: Lens' AccountTypeOverride Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'originId' @:: Lens' AccountTypeOverride (Prelude.Maybe Data.Text.Text)@ -} +data AccountTypeOverride + = AccountTypeOverride'_constructor {_AccountTypeOverride'exchangeId :: !(Prelude.Maybe Data.Text.Text), + _AccountTypeOverride'loginId :: !(Prelude.Maybe Data.Text.Text), + _AccountTypeOverride'typeId :: !(Prelude.Maybe Data.Text.Text), + _AccountTypeOverride'originId :: !(Prelude.Maybe Data.Text.Text), + _AccountTypeOverride'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountTypeOverride where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountTypeOverride "exchangeId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverride'exchangeId + (\ x__ y__ -> x__ {_AccountTypeOverride'exchangeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountTypeOverride "maybe'exchangeId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverride'exchangeId + (\ x__ y__ -> x__ {_AccountTypeOverride'exchangeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountTypeOverride "loginId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverride'loginId + (\ x__ y__ -> x__ {_AccountTypeOverride'loginId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountTypeOverride "maybe'loginId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverride'loginId + (\ x__ y__ -> x__ {_AccountTypeOverride'loginId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountTypeOverride "typeId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverride'typeId + (\ x__ y__ -> x__ {_AccountTypeOverride'typeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountTypeOverride "maybe'typeId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverride'typeId + (\ x__ y__ -> x__ {_AccountTypeOverride'typeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountTypeOverride "originId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverride'originId + (\ x__ y__ -> x__ {_AccountTypeOverride'originId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountTypeOverride "maybe'originId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverride'originId + (\ x__ y__ -> x__ {_AccountTypeOverride'originId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountTypeOverride where + messageName _ = Data.Text.pack "traderouting_1.AccountTypeOverride" + packedMessageDescriptor _ + = "\n\ + \\DC3AccountTypeOverride\DC2\US\n\ + \\vexchange_id\CAN\STX \SOH(\tR\n\ + \exchangeId\DC2\EM\n\ + \\blogin_id\CAN\ETX \SOH(\tR\aloginId\DC2\ETB\n\ + \\atype_id\CAN\EOT \SOH(\tR\ACKtypeId\DC2\ESC\n\ + \\torigin_id\CAN\ENQ \SOH(\tR\boriginId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + exchangeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exchange_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'exchangeId")) :: + Data.ProtoLens.FieldDescriptor AccountTypeOverride + loginId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginId")) :: + Data.ProtoLens.FieldDescriptor AccountTypeOverride + typeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "type_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'typeId")) :: + Data.ProtoLens.FieldDescriptor AccountTypeOverride + originId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "origin_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'originId")) :: + Data.ProtoLens.FieldDescriptor AccountTypeOverride + in + Data.Map.fromList + [(Data.ProtoLens.Tag 2, exchangeId__field_descriptor), + (Data.ProtoLens.Tag 3, loginId__field_descriptor), + (Data.ProtoLens.Tag 4, typeId__field_descriptor), + (Data.ProtoLens.Tag 5, originId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountTypeOverride'_unknownFields + (\ x__ y__ -> x__ {_AccountTypeOverride'_unknownFields = y__}) + defMessage + = AccountTypeOverride'_constructor + {_AccountTypeOverride'exchangeId = Prelude.Nothing, + _AccountTypeOverride'loginId = Prelude.Nothing, + _AccountTypeOverride'typeId = Prelude.Nothing, + _AccountTypeOverride'originId = Prelude.Nothing, + _AccountTypeOverride'_unknownFields = []} + parseMessage + = let + loop :: + AccountTypeOverride + -> Data.ProtoLens.Encoding.Bytes.Parser AccountTypeOverride + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "exchange_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"exchangeId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "login_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"loginId") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "type_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"typeId") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "origin_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"originId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountTypeOverride" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'exchangeId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'loginId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'typeId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'originId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData AccountTypeOverride where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountTypeOverride'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountTypeOverride'exchangeId x__) + (Control.DeepSeq.deepseq + (_AccountTypeOverride'loginId x__) + (Control.DeepSeq.deepseq + (_AccountTypeOverride'typeId x__) + (Control.DeepSeq.deepseq (_AccountTypeOverride'originId x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountTypeOverrideListRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AccountTypeOverrideListRequest (Prelude.Maybe Data.Text.Text)@ -} +data AccountTypeOverrideListRequest + = AccountTypeOverrideListRequest'_constructor {_AccountTypeOverrideListRequest'accountId :: !(Prelude.Maybe Data.Text.Text), + _AccountTypeOverrideListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountTypeOverrideListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountTypeOverrideListRequest "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverrideListRequest'accountId + (\ x__ y__ + -> x__ {_AccountTypeOverrideListRequest'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountTypeOverrideListRequest "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverrideListRequest'accountId + (\ x__ y__ + -> x__ {_AccountTypeOverrideListRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountTypeOverrideListRequest where + messageName _ + = Data.Text.pack "traderouting_1.AccountTypeOverrideListRequest" + packedMessageDescriptor _ + = "\n\ + \\RSAccountTypeOverrideListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AccountTypeOverrideListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountTypeOverrideListRequest'_unknownFields + (\ x__ y__ + -> x__ {_AccountTypeOverrideListRequest'_unknownFields = y__}) + defMessage + = AccountTypeOverrideListRequest'_constructor + {_AccountTypeOverrideListRequest'accountId = Prelude.Nothing, + _AccountTypeOverrideListRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountTypeOverrideListRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AccountTypeOverrideListRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "AccountTypeOverrideListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountTypeOverrideListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountTypeOverrideListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountTypeOverrideListRequest'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.overrides' @:: Lens' AccountTypeOverrideListResult [AccountTypeOverride]@ + * 'Proto.CMS.Traderouting1_Fields.vec'overrides' @:: Lens' AccountTypeOverrideListResult (Data.Vector.Vector AccountTypeOverride)@ -} +data AccountTypeOverrideListResult + = AccountTypeOverrideListResult'_constructor {_AccountTypeOverrideListResult'overrides :: !(Data.Vector.Vector AccountTypeOverride), + _AccountTypeOverrideListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountTypeOverrideListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountTypeOverrideListResult "overrides" [AccountTypeOverride] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverrideListResult'overrides + (\ x__ y__ + -> x__ {_AccountTypeOverrideListResult'overrides = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountTypeOverrideListResult "vec'overrides" (Data.Vector.Vector AccountTypeOverride) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountTypeOverrideListResult'overrides + (\ x__ y__ + -> x__ {_AccountTypeOverrideListResult'overrides = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountTypeOverrideListResult where + messageName _ + = Data.Text.pack "traderouting_1.AccountTypeOverrideListResult" + packedMessageDescriptor _ + = "\n\ + \\GSAccountTypeOverrideListResult\DC2A\n\ + \\toverrides\CAN\SOH \ETX(\v2#.traderouting_1.AccountTypeOverrideR\toverrides" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + overrides__field_descriptor + = Data.ProtoLens.FieldDescriptor + "overrides" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountTypeOverride) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"overrides")) :: + Data.ProtoLens.FieldDescriptor AccountTypeOverrideListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, overrides__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountTypeOverrideListResult'_unknownFields + (\ x__ y__ + -> x__ {_AccountTypeOverrideListResult'_unknownFields = y__}) + defMessage + = AccountTypeOverrideListResult'_constructor + {_AccountTypeOverrideListResult'overrides = Data.Vector.Generic.empty, + _AccountTypeOverrideListResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountTypeOverrideListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountTypeOverride + -> Data.ProtoLens.Encoding.Bytes.Parser AccountTypeOverrideListResult + loop x mutable'overrides + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'overrides <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'overrides) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'overrides") frozen'overrides x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "overrides" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'overrides y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'overrides + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'overrides <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'overrides) + "AccountTypeOverrideListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'overrides") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData AccountTypeOverrideListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountTypeOverrideListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountTypeOverrideListResult'overrides x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountUserAuthorizationListRequest Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AccountUserAuthorizationListRequest (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.userId' @:: Lens' AccountUserAuthorizationListRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'userId' @:: Lens' AccountUserAuthorizationListRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.top' @:: Lens' AccountUserAuthorizationListRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'top' @:: Lens' AccountUserAuthorizationListRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.includeImplicitAuthorization' @:: Lens' AccountUserAuthorizationListRequest Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'includeImplicitAuthorization' @:: Lens' AccountUserAuthorizationListRequest (Prelude.Maybe Prelude.Bool)@ -} +data AccountUserAuthorizationListRequest + = AccountUserAuthorizationListRequest'_constructor {_AccountUserAuthorizationListRequest'accountId :: !(Prelude.Maybe Data.Int.Int32), + _AccountUserAuthorizationListRequest'userId :: !(Prelude.Maybe Data.Text.Text), + _AccountUserAuthorizationListRequest'top :: !(Prelude.Maybe Data.Word.Word32), + _AccountUserAuthorizationListRequest'includeImplicitAuthorization :: !(Prelude.Maybe Prelude.Bool), + _AccountUserAuthorizationListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountUserAuthorizationListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListRequest'accountId + (\ x__ y__ + -> x__ {_AccountUserAuthorizationListRequest'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListRequest "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListRequest'accountId + (\ x__ y__ + -> x__ {_AccountUserAuthorizationListRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListRequest "userId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListRequest'userId + (\ x__ y__ + -> x__ {_AccountUserAuthorizationListRequest'userId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListRequest "maybe'userId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListRequest'userId + (\ x__ y__ + -> x__ {_AccountUserAuthorizationListRequest'userId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListRequest "top" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListRequest'top + (\ x__ y__ + -> x__ {_AccountUserAuthorizationListRequest'top = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListRequest "maybe'top" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListRequest'top + (\ x__ y__ + -> x__ {_AccountUserAuthorizationListRequest'top = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListRequest "includeImplicitAuthorization" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListRequest'includeImplicitAuthorization + (\ x__ y__ + -> x__ + {_AccountUserAuthorizationListRequest'includeImplicitAuthorization = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListRequest "maybe'includeImplicitAuthorization" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListRequest'includeImplicitAuthorization + (\ x__ y__ + -> x__ + {_AccountUserAuthorizationListRequest'includeImplicitAuthorization = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountUserAuthorizationListRequest where + messageName _ + = Data.Text.pack + "traderouting_1.AccountUserAuthorizationListRequest" + packedMessageDescriptor _ + = "\n\ + \#AccountUserAuthorizationListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\ETB\n\ + \\auser_id\CAN\STX \SOH(\tR\ACKuserId\DC2\DLE\n\ + \\ETXtop\CAN\ETX \SOH(\rR\ETXtop\DC2D\n\ + \\RSinclude_implicit_authorization\CAN\EOT \SOH(\bR\FSincludeImplicitAuthorization" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AccountUserAuthorizationListRequest + userId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'userId")) :: + Data.ProtoLens.FieldDescriptor AccountUserAuthorizationListRequest + top__field_descriptor + = Data.ProtoLens.FieldDescriptor + "top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'top")) :: + Data.ProtoLens.FieldDescriptor AccountUserAuthorizationListRequest + includeImplicitAuthorization__field_descriptor + = Data.ProtoLens.FieldDescriptor + "include_implicit_authorization" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'includeImplicitAuthorization")) :: + Data.ProtoLens.FieldDescriptor AccountUserAuthorizationListRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, userId__field_descriptor), + (Data.ProtoLens.Tag 3, top__field_descriptor), + (Data.ProtoLens.Tag 4, + includeImplicitAuthorization__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListRequest'_unknownFields + (\ x__ y__ + -> x__ {_AccountUserAuthorizationListRequest'_unknownFields = y__}) + defMessage + = AccountUserAuthorizationListRequest'_constructor + {_AccountUserAuthorizationListRequest'accountId = Prelude.Nothing, + _AccountUserAuthorizationListRequest'userId = Prelude.Nothing, + _AccountUserAuthorizationListRequest'top = Prelude.Nothing, + _AccountUserAuthorizationListRequest'includeImplicitAuthorization = Prelude.Nothing, + _AccountUserAuthorizationListRequest'_unknownFields = []} + parseMessage + = let + loop :: + AccountUserAuthorizationListRequest + -> Data.ProtoLens.Encoding.Bytes.Parser AccountUserAuthorizationListRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"userId") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "top" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"top") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "include_implicit_authorization" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"includeImplicitAuthorization") y + x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "AccountUserAuthorizationListRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'userId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'top") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'includeImplicitAuthorization") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData AccountUserAuthorizationListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountUserAuthorizationListRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountUserAuthorizationListRequest'accountId x__) + (Control.DeepSeq.deepseq + (_AccountUserAuthorizationListRequest'userId x__) + (Control.DeepSeq.deepseq + (_AccountUserAuthorizationListRequest'top x__) + (Control.DeepSeq.deepseq + (_AccountUserAuthorizationListRequest'includeImplicitAuthorization + x__) + ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountUserLink' @:: Lens' AccountUserAuthorizationListResult [AccountUserLink]@ + * 'Proto.CMS.Traderouting1_Fields.vec'accountUserLink' @:: Lens' AccountUserAuthorizationListResult (Data.Vector.Vector AccountUserLink)@ + * 'Proto.CMS.Traderouting1_Fields.isComplete' @:: Lens' AccountUserAuthorizationListResult Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isComplete' @:: Lens' AccountUserAuthorizationListResult (Prelude.Maybe Prelude.Bool)@ -} +data AccountUserAuthorizationListResult + = AccountUserAuthorizationListResult'_constructor {_AccountUserAuthorizationListResult'accountUserLink :: !(Data.Vector.Vector AccountUserLink), + _AccountUserAuthorizationListResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _AccountUserAuthorizationListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountUserAuthorizationListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListResult "accountUserLink" [AccountUserLink] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListResult'accountUserLink + (\ x__ y__ + -> x__ + {_AccountUserAuthorizationListResult'accountUserLink = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListResult "vec'accountUserLink" (Data.Vector.Vector AccountUserLink) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListResult'accountUserLink + (\ x__ y__ + -> x__ + {_AccountUserAuthorizationListResult'accountUserLink = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListResult'isComplete + (\ x__ y__ + -> x__ {_AccountUserAuthorizationListResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField AccountUserAuthorizationListResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListResult'isComplete + (\ x__ y__ + -> x__ {_AccountUserAuthorizationListResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountUserAuthorizationListResult where + messageName _ + = Data.Text.pack + "traderouting_1.AccountUserAuthorizationListResult" + packedMessageDescriptor _ + = "\n\ + \\"AccountUserAuthorizationListResult\DC2K\n\ + \\DC1account_user_link\CAN\SOH \ETX(\v2\US.traderouting_1.AccountUserLinkR\SIaccountUserLink\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountUserLink__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_user_link" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountUserLink) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"accountUserLink")) :: + Data.ProtoLens.FieldDescriptor AccountUserAuthorizationListResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor AccountUserAuthorizationListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountUserLink__field_descriptor), + (Data.ProtoLens.Tag 2, isComplete__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountUserAuthorizationListResult'_unknownFields + (\ x__ y__ + -> x__ {_AccountUserAuthorizationListResult'_unknownFields = y__}) + defMessage + = AccountUserAuthorizationListResult'_constructor + {_AccountUserAuthorizationListResult'accountUserLink = Data.Vector.Generic.empty, + _AccountUserAuthorizationListResult'isComplete = Prelude.Nothing, + _AccountUserAuthorizationListResult'_unknownFields = []} + parseMessage + = let + loop :: + AccountUserAuthorizationListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountUserLink + -> Data.ProtoLens.Encoding.Bytes.Parser AccountUserAuthorizationListResult + loop x mutable'accountUserLink + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'accountUserLink <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'accountUserLink) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'accountUserLink") + frozen'accountUserLink x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "account_user_link" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'accountUserLink y) + loop x v + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + mutable'accountUserLink + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'accountUserLink + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'accountUserLink <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'accountUserLink) + "AccountUserAuthorizationListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'accountUserLink") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData AccountUserAuthorizationListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountUserAuthorizationListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountUserAuthorizationListResult'accountUserLink x__) + (Control.DeepSeq.deepseq + (_AccountUserAuthorizationListResult'isComplete x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AccountUserLink Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AccountUserLink (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.userId' @:: Lens' AccountUserLink Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'userId' @:: Lens' AccountUserLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.isViewOnly' @:: Lens' AccountUserLink Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isViewOnly' @:: Lens' AccountUserLink (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.isForceCare' @:: Lens' AccountUserLink Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isForceCare' @:: Lens' AccountUserLink (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.userName' @:: Lens' AccountUserLink Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'userName' @:: Lens' AccountUserLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountName' @:: Lens' AccountUserLink Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountName' @:: Lens' AccountUserLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageAccountNumber' @:: Lens' AccountUserLink Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'brokerageAccountNumber' @:: Lens' AccountUserLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageName' @:: Lens' AccountUserLink Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'brokerageName' @:: Lens' AccountUserLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.allowExternalAccounts' @:: Lens' AccountUserLink Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowExternalAccounts' @:: Lens' AccountUserLink (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.implicitAuthorization' @:: Lens' AccountUserLink Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'implicitAuthorization' @:: Lens' AccountUserLink (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.executionSourceCodeId' @:: Lens' AccountUserLink Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'executionSourceCodeId' @:: Lens' AccountUserLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountBrokerageId' @:: Lens' AccountUserLink Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountBrokerageId' @:: Lens' AccountUserLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountSalesSeriesId' @:: Lens' AccountUserLink Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountSalesSeriesId' @:: Lens' AccountUserLink (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.isMifidDea' @:: Lens' AccountUserLink Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isMifidDea' @:: Lens' AccountUserLink (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.transformMifidAlgoCqgToClientAlgo' @:: Lens' AccountUserLink Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'transformMifidAlgoCqgToClientAlgo' @:: Lens' AccountUserLink (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.isPrimaryLogin' @:: Lens' AccountUserLink Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isPrimaryLogin' @:: Lens' AccountUserLink (Prelude.Maybe Prelude.Bool)@ -} +data AccountUserLink + = AccountUserLink'_constructor {_AccountUserLink'accountId :: !(Prelude.Maybe Data.Int.Int32), + _AccountUserLink'userId :: !(Prelude.Maybe Data.Text.Text), + _AccountUserLink'isViewOnly :: !(Prelude.Maybe Prelude.Bool), + _AccountUserLink'isForceCare :: !(Prelude.Maybe Prelude.Bool), + _AccountUserLink'userName :: !(Prelude.Maybe Data.Text.Text), + _AccountUserLink'accountName :: !(Prelude.Maybe Data.Text.Text), + _AccountUserLink'brokerageAccountNumber :: !(Prelude.Maybe Data.Text.Text), + _AccountUserLink'brokerageName :: !(Prelude.Maybe Data.Text.Text), + _AccountUserLink'allowExternalAccounts :: !(Prelude.Maybe Prelude.Bool), + _AccountUserLink'implicitAuthorization :: !(Prelude.Maybe Prelude.Bool), + _AccountUserLink'executionSourceCodeId :: !(Prelude.Maybe Data.Text.Text), + _AccountUserLink'accountBrokerageId :: !(Prelude.Maybe Data.Text.Text), + _AccountUserLink'accountSalesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _AccountUserLink'isMifidDea :: !(Prelude.Maybe Prelude.Bool), + _AccountUserLink'transformMifidAlgoCqgToClientAlgo :: !(Prelude.Maybe Prelude.Bool), + _AccountUserLink'isPrimaryLogin :: !(Prelude.Maybe Prelude.Bool), + _AccountUserLink'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AccountUserLink where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AccountUserLink "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'accountId + (\ x__ y__ -> x__ {_AccountUserLink'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'accountId + (\ x__ y__ -> x__ {_AccountUserLink'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "userId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'userId + (\ x__ y__ -> x__ {_AccountUserLink'userId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'userId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'userId + (\ x__ y__ -> x__ {_AccountUserLink'userId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "isViewOnly" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'isViewOnly + (\ x__ y__ -> x__ {_AccountUserLink'isViewOnly = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'isViewOnly" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'isViewOnly + (\ x__ y__ -> x__ {_AccountUserLink'isViewOnly = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "isForceCare" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'isForceCare + (\ x__ y__ -> x__ {_AccountUserLink'isForceCare = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'isForceCare" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'isForceCare + (\ x__ y__ -> x__ {_AccountUserLink'isForceCare = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "userName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'userName + (\ x__ y__ -> x__ {_AccountUserLink'userName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'userName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'userName + (\ x__ y__ -> x__ {_AccountUserLink'userName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "accountName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'accountName + (\ x__ y__ -> x__ {_AccountUserLink'accountName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'accountName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'accountName + (\ x__ y__ -> x__ {_AccountUserLink'accountName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "brokerageAccountNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'brokerageAccountNumber + (\ x__ y__ -> x__ {_AccountUserLink'brokerageAccountNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'brokerageAccountNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'brokerageAccountNumber + (\ x__ y__ -> x__ {_AccountUserLink'brokerageAccountNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "brokerageName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'brokerageName + (\ x__ y__ -> x__ {_AccountUserLink'brokerageName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'brokerageName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'brokerageName + (\ x__ y__ -> x__ {_AccountUserLink'brokerageName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "allowExternalAccounts" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'allowExternalAccounts + (\ x__ y__ -> x__ {_AccountUserLink'allowExternalAccounts = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'allowExternalAccounts" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'allowExternalAccounts + (\ x__ y__ -> x__ {_AccountUserLink'allowExternalAccounts = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "implicitAuthorization" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'implicitAuthorization + (\ x__ y__ -> x__ {_AccountUserLink'implicitAuthorization = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'implicitAuthorization" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'implicitAuthorization + (\ x__ y__ -> x__ {_AccountUserLink'implicitAuthorization = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "executionSourceCodeId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'executionSourceCodeId + (\ x__ y__ -> x__ {_AccountUserLink'executionSourceCodeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'executionSourceCodeId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'executionSourceCodeId + (\ x__ y__ -> x__ {_AccountUserLink'executionSourceCodeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "accountBrokerageId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'accountBrokerageId + (\ x__ y__ -> x__ {_AccountUserLink'accountBrokerageId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'accountBrokerageId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'accountBrokerageId + (\ x__ y__ -> x__ {_AccountUserLink'accountBrokerageId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "accountSalesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'accountSalesSeriesId + (\ x__ y__ -> x__ {_AccountUserLink'accountSalesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'accountSalesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'accountSalesSeriesId + (\ x__ y__ -> x__ {_AccountUserLink'accountSalesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "isMifidDea" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'isMifidDea + (\ x__ y__ -> x__ {_AccountUserLink'isMifidDea = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'isMifidDea" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'isMifidDea + (\ x__ y__ -> x__ {_AccountUserLink'isMifidDea = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "transformMifidAlgoCqgToClientAlgo" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'transformMifidAlgoCqgToClientAlgo + (\ x__ y__ + -> x__ {_AccountUserLink'transformMifidAlgoCqgToClientAlgo = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'transformMifidAlgoCqgToClientAlgo" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'transformMifidAlgoCqgToClientAlgo + (\ x__ y__ + -> x__ {_AccountUserLink'transformMifidAlgoCqgToClientAlgo = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AccountUserLink "isPrimaryLogin" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'isPrimaryLogin + (\ x__ y__ -> x__ {_AccountUserLink'isPrimaryLogin = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AccountUserLink "maybe'isPrimaryLogin" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AccountUserLink'isPrimaryLogin + (\ x__ y__ -> x__ {_AccountUserLink'isPrimaryLogin = y__})) + Prelude.id +instance Data.ProtoLens.Message AccountUserLink where + messageName _ = Data.Text.pack "traderouting_1.AccountUserLink" + packedMessageDescriptor _ + = "\n\ + \\SIAccountUserLink\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\ETB\n\ + \\auser_id\CAN\STX \SOH(\tR\ACKuserId\DC2 \n\ + \\fis_view_only\CAN\ETX \SOH(\bR\n\ + \isViewOnly\DC2\"\n\ + \\ris_force_care\CAN\EOT \SOH(\bR\visForceCare\DC2\ESC\n\ + \\tuser_name\CAN\ENQ \SOH(\tR\buserName\DC2!\n\ + \\faccount_name\CAN\ACK \SOH(\tR\vaccountName\DC28\n\ + \\CANbrokerage_account_number\CAN\a \SOH(\tR\SYNbrokerageAccountNumber\DC2%\n\ + \\SObrokerage_name\CAN\b \SOH(\tR\rbrokerageName\DC26\n\ + \\ETBallow_external_accounts\CAN\t \SOH(\bR\NAKallowExternalAccounts\DC25\n\ + \\SYNimplicit_authorization\CAN\n\ + \ \SOH(\bR\NAKimplicitAuthorization\DC27\n\ + \\CANexecution_source_code_id\CAN\v \SOH(\tR\NAKexecutionSourceCodeId\DC20\n\ + \\DC4account_brokerage_id\CAN\f \SOH(\tR\DC2accountBrokerageId\DC25\n\ + \\ETBaccount_sales_series_id\CAN\r \SOH(\tR\DC4accountSalesSeriesId\DC2 \n\ + \\fis_mifid_dea\CAN\SO \SOH(\bR\n\ + \isMifidDea\DC2R\n\ + \'transform_mifid_algo_cqg_to_client_algo\CAN\SI \SOH(\bR!transformMifidAlgoCqgToClientAlgo\DC2(\n\ + \\DLEis_primary_login\CAN\DLE \SOH(\bR\SOisPrimaryLogin" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + userId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'userId")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + isViewOnly__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_view_only" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isViewOnly")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + isForceCare__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_force_care" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isForceCare")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + userName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'userName")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + accountName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountName")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + brokerageAccountNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_account_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + brokerageName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageName")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + allowExternalAccounts__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allow_external_accounts" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowExternalAccounts")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + implicitAuthorization__field_descriptor + = Data.ProtoLens.FieldDescriptor + "implicit_authorization" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'implicitAuthorization")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + executionSourceCodeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "execution_source_code_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'executionSourceCodeId")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + accountBrokerageId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_brokerage_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountBrokerageId")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + accountSalesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountSalesSeriesId")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + isMifidDea__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_mifid_dea" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isMifidDea")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + transformMifidAlgoCqgToClientAlgo__field_descriptor + = Data.ProtoLens.FieldDescriptor + "transform_mifid_algo_cqg_to_client_algo" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'transformMifidAlgoCqgToClientAlgo")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + isPrimaryLogin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_primary_login" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isPrimaryLogin")) :: + Data.ProtoLens.FieldDescriptor AccountUserLink + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, userId__field_descriptor), + (Data.ProtoLens.Tag 3, isViewOnly__field_descriptor), + (Data.ProtoLens.Tag 4, isForceCare__field_descriptor), + (Data.ProtoLens.Tag 5, userName__field_descriptor), + (Data.ProtoLens.Tag 6, accountName__field_descriptor), + (Data.ProtoLens.Tag 7, brokerageAccountNumber__field_descriptor), + (Data.ProtoLens.Tag 8, brokerageName__field_descriptor), + (Data.ProtoLens.Tag 9, allowExternalAccounts__field_descriptor), + (Data.ProtoLens.Tag 10, implicitAuthorization__field_descriptor), + (Data.ProtoLens.Tag 11, executionSourceCodeId__field_descriptor), + (Data.ProtoLens.Tag 12, accountBrokerageId__field_descriptor), + (Data.ProtoLens.Tag 13, accountSalesSeriesId__field_descriptor), + (Data.ProtoLens.Tag 14, isMifidDea__field_descriptor), + (Data.ProtoLens.Tag 15, + transformMifidAlgoCqgToClientAlgo__field_descriptor), + (Data.ProtoLens.Tag 16, isPrimaryLogin__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AccountUserLink'_unknownFields + (\ x__ y__ -> x__ {_AccountUserLink'_unknownFields = y__}) + defMessage + = AccountUserLink'_constructor + {_AccountUserLink'accountId = Prelude.Nothing, + _AccountUserLink'userId = Prelude.Nothing, + _AccountUserLink'isViewOnly = Prelude.Nothing, + _AccountUserLink'isForceCare = Prelude.Nothing, + _AccountUserLink'userName = Prelude.Nothing, + _AccountUserLink'accountName = Prelude.Nothing, + _AccountUserLink'brokerageAccountNumber = Prelude.Nothing, + _AccountUserLink'brokerageName = Prelude.Nothing, + _AccountUserLink'allowExternalAccounts = Prelude.Nothing, + _AccountUserLink'implicitAuthorization = Prelude.Nothing, + _AccountUserLink'executionSourceCodeId = Prelude.Nothing, + _AccountUserLink'accountBrokerageId = Prelude.Nothing, + _AccountUserLink'accountSalesSeriesId = Prelude.Nothing, + _AccountUserLink'isMifidDea = Prelude.Nothing, + _AccountUserLink'transformMifidAlgoCqgToClientAlgo = Prelude.Nothing, + _AccountUserLink'isPrimaryLogin = Prelude.Nothing, + _AccountUserLink'_unknownFields = []} + parseMessage + = let + loop :: + AccountUserLink + -> Data.ProtoLens.Encoding.Bytes.Parser AccountUserLink + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"userId") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_view_only" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isViewOnly") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_force_care" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isForceCare") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"userName") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountName") y x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_account_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAccountNumber") y x) + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageName") y x) + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "allow_external_accounts" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowExternalAccounts") y x) + 80 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "implicit_authorization" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"implicitAuthorization") y x) + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "execution_source_code_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"executionSourceCodeId") y x) + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_brokerage_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountBrokerageId") y x) + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountSalesSeriesId") y x) + 112 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_mifid_dea" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isMifidDea") y x) + 120 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "transform_mifid_algo_cqg_to_client_algo" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"transformMifidAlgoCqgToClientAlgo") + y x) + 128 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_primary_login" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"isPrimaryLogin") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AccountUserLink" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'userId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isViewOnly") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isForceCare") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'userName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'allowExternalAccounts") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'implicitAuthorization") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 80) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'executionSourceCodeId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountBrokerageId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'accountSalesSeriesId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'isMifidDea") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 112) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'transformMifidAlgoCqgToClientAlgo") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 120) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'isPrimaryLogin") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 128) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))))) +instance Control.DeepSeq.NFData AccountUserLink where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AccountUserLink'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'accountId x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'userId x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'isViewOnly x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'isForceCare x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'userName x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'accountName x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'brokerageAccountNumber x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'brokerageName x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'allowExternalAccounts x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'implicitAuthorization x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'executionSourceCodeId x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'accountBrokerageId x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'accountSalesSeriesId x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'isMifidDea x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'transformMifidAlgoCqgToClientAlgo + x__) + (Control.DeepSeq.deepseq + (_AccountUserLink'isPrimaryLogin x__) + ())))))))))))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.chainOrderId' @:: Lens' ActivateOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'chainOrderId' @:: Lens' ActivateOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' ActivateOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' ActivateOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' ActivateOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' ActivateOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.sync' @:: Lens' ActivateOrder Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'sync' @:: Lens' ActivateOrder (Prelude.Maybe Prelude.Bool)@ -} +data ActivateOrder + = ActivateOrder'_constructor {_ActivateOrder'chainOrderId :: !(Prelude.Maybe Data.Text.Text), + _ActivateOrder'accountId :: !(Prelude.Maybe Data.Text.Text), + _ActivateOrder'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _ActivateOrder'sync :: !(Prelude.Maybe Prelude.Bool), + _ActivateOrder'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ActivateOrder where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ActivateOrder "chainOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ActivateOrder'chainOrderId + (\ x__ y__ -> x__ {_ActivateOrder'chainOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ActivateOrder "maybe'chainOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ActivateOrder'chainOrderId + (\ x__ y__ -> x__ {_ActivateOrder'chainOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ActivateOrder "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ActivateOrder'accountId + (\ x__ y__ -> x__ {_ActivateOrder'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ActivateOrder "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ActivateOrder'accountId + (\ x__ y__ -> x__ {_ActivateOrder'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ActivateOrder "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ActivateOrder'tradeLocationId + (\ x__ y__ -> x__ {_ActivateOrder'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ActivateOrder "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ActivateOrder'tradeLocationId + (\ x__ y__ -> x__ {_ActivateOrder'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ActivateOrder "sync" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ActivateOrder'sync (\ x__ y__ -> x__ {_ActivateOrder'sync = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField ActivateOrder "maybe'sync" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ActivateOrder'sync (\ x__ y__ -> x__ {_ActivateOrder'sync = y__})) + Prelude.id +instance Data.ProtoLens.Message ActivateOrder where + messageName _ = Data.Text.pack "traderouting_1.ActivateOrder" + packedMessageDescriptor _ + = "\n\ + \\rActivateOrder\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\tR\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2\EM\n\ + \\EOTsync\CAN\EOT \SOH(\b:\ENQfalseR\EOTsync" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + chainOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "chain_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'chainOrderId")) :: + Data.ProtoLens.FieldDescriptor ActivateOrder + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor ActivateOrder + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor ActivateOrder + sync__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sync" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sync")) :: + Data.ProtoLens.FieldDescriptor ActivateOrder + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, chainOrderId__field_descriptor), + (Data.ProtoLens.Tag 2, accountId__field_descriptor), + (Data.ProtoLens.Tag 3, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 4, sync__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ActivateOrder'_unknownFields + (\ x__ y__ -> x__ {_ActivateOrder'_unknownFields = y__}) + defMessage + = ActivateOrder'_constructor + {_ActivateOrder'chainOrderId = Prelude.Nothing, + _ActivateOrder'accountId = Prelude.Nothing, + _ActivateOrder'tradeLocationId = Prelude.Nothing, + _ActivateOrder'sync = Prelude.Nothing, + _ActivateOrder'_unknownFields = []} + parseMessage + = let + loop :: + ActivateOrder -> Data.ProtoLens.Encoding.Bytes.Parser ActivateOrder + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "chain_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"chainOrderId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "sync" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"sync") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ActivateOrder" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'chainOrderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'sync") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData ActivateOrder where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ActivateOrder'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ActivateOrder'chainOrderId x__) + (Control.DeepSeq.deepseq + (_ActivateOrder'accountId x__) + (Control.DeepSeq.deepseq + (_ActivateOrder'tradeLocationId x__) + (Control.DeepSeq.deepseq (_ActivateOrder'sync x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' AddFill Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' AddFill (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.orderId' @:: Lens' AddFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderId' @:: Lens' AddFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteQuantity' @:: Lens' AddFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteQuantity' @:: Lens' AddFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.price' @:: Lens' AddFill Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'price' @:: Lens' AddFill (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.fillUtcTime' @:: Lens' AddFill Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillUtcTime' @:: Lens' AddFill (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.isAggressive' @:: Lens' AddFill Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isAggressive' @:: Lens' AddFill (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.displayPrice' @:: Lens' AddFill Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayPrice' @:: Lens' AddFill (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.openCloseType' @:: Lens' AddFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'openCloseType' @:: Lens' AddFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.speculationType' @:: Lens' AddFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'speculationType' @:: Lens' AddFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' AddFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' AddFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.quantity' @:: Lens' AddFill Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'quantity' @:: Lens' AddFill (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.sync' @:: Lens' AddFill Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'sync' @:: Lens' AddFill (Prelude.Maybe Prelude.Bool)@ -} +data AddFill + = AddFill'_constructor {_AddFill'accountId :: !(Prelude.Maybe Data.Int.Int32), + _AddFill'orderId :: !(Prelude.Maybe Data.Text.Text), + _AddFill'obsoleteQuantity :: !(Prelude.Maybe Data.Word.Word32), + _AddFill'price :: !(Prelude.Maybe Prelude.Double), + _AddFill'fillUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _AddFill'isAggressive :: !(Prelude.Maybe Prelude.Bool), + _AddFill'displayPrice :: !(Prelude.Maybe Data.Int.Int64), + _AddFill'openCloseType :: !(Prelude.Maybe Data.Word.Word32), + _AddFill'speculationType :: !(Prelude.Maybe Data.Word.Word32), + _AddFill'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _AddFill'quantity :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _AddFill'sync :: !(Prelude.Maybe Prelude.Bool), + _AddFill'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AddFill where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AddFill "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'accountId (\ x__ y__ -> x__ {_AddFill'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AddFill "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'accountId (\ x__ y__ -> x__ {_AddFill'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AddFill "orderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'orderId (\ x__ y__ -> x__ {_AddFill'orderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AddFill "maybe'orderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'orderId (\ x__ y__ -> x__ {_AddFill'orderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AddFill "obsoleteQuantity" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'obsoleteQuantity + (\ x__ y__ -> x__ {_AddFill'obsoleteQuantity = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AddFill "maybe'obsoleteQuantity" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'obsoleteQuantity + (\ x__ y__ -> x__ {_AddFill'obsoleteQuantity = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AddFill "price" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'price (\ x__ y__ -> x__ {_AddFill'price = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AddFill "maybe'price" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'price (\ x__ y__ -> x__ {_AddFill'price = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AddFill "fillUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'fillUtcTime + (\ x__ y__ -> x__ {_AddFill'fillUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AddFill "maybe'fillUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'fillUtcTime + (\ x__ y__ -> x__ {_AddFill'fillUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AddFill "isAggressive" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'isAggressive + (\ x__ y__ -> x__ {_AddFill'isAggressive = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AddFill "maybe'isAggressive" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'isAggressive + (\ x__ y__ -> x__ {_AddFill'isAggressive = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AddFill "displayPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'displayPrice + (\ x__ y__ -> x__ {_AddFill'displayPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AddFill "maybe'displayPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'displayPrice + (\ x__ y__ -> x__ {_AddFill'displayPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AddFill "openCloseType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'openCloseType + (\ x__ y__ -> x__ {_AddFill'openCloseType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AddFill "maybe'openCloseType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'openCloseType + (\ x__ y__ -> x__ {_AddFill'openCloseType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AddFill "speculationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'speculationType + (\ x__ y__ -> x__ {_AddFill'speculationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AddFill "maybe'speculationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'speculationType + (\ x__ y__ -> x__ {_AddFill'speculationType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AddFill "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'tradeLocationId + (\ x__ y__ -> x__ {_AddFill'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AddFill "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'tradeLocationId + (\ x__ y__ -> x__ {_AddFill'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AddFill "quantity" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'quantity (\ x__ y__ -> x__ {_AddFill'quantity = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AddFill "maybe'quantity" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'quantity (\ x__ y__ -> x__ {_AddFill'quantity = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AddFill "sync" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'sync (\ x__ y__ -> x__ {_AddFill'sync = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField AddFill "maybe'sync" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AddFill'sync (\ x__ y__ -> x__ {_AddFill'sync = y__})) + Prelude.id +instance Data.ProtoLens.Message AddFill where + messageName _ = Data.Text.pack "traderouting_1.AddFill" + packedMessageDescriptor _ + = "\n\ + \\aAddFill\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\EM\n\ + \\border_id\CAN\STX \SOH(\tR\aorderId\DC2/\n\ + \\DC1obsolete_quantity\CAN\ETX \SOH(\rR\DLEobsoleteQuantityB\STX\CAN\SOH\DC2\DC4\n\ + \\ENQprice\CAN\EOT \SOH(\SOHR\ENQprice\DC2\"\n\ + \\rfill_utc_time\CAN\ENQ \SOH(\DC2R\vfillUtcTime\DC2#\n\ + \\ris_aggressive\CAN\ACK \SOH(\bR\fisAggressive\DC2#\n\ + \\rdisplay_price\CAN\a \SOH(\DC2R\fdisplayPrice\DC2&\n\ + \\SIopen_close_type\CAN\b \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN\t \SOH(\rR\SIspeculationType\DC2*\n\ + \\DC1trade_location_id\CAN\n\ + \ \SOH(\tR\SItradeLocationId\DC2(\n\ + \\bquantity\CAN\v \SOH(\v2\f.cqg.DecimalR\bquantity\DC2\EM\n\ + \\EOTsync\CAN\f \SOH(\b:\ENQfalseR\EOTsync" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor AddFill + orderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderId")) :: + Data.ProtoLens.FieldDescriptor AddFill + obsoleteQuantity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_quantity" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteQuantity")) :: + Data.ProtoLens.FieldDescriptor AddFill + price__field_descriptor + = Data.ProtoLens.FieldDescriptor + "price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'price")) :: + Data.ProtoLens.FieldDescriptor AddFill + fillUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillUtcTime")) :: + Data.ProtoLens.FieldDescriptor AddFill + isAggressive__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_aggressive" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isAggressive")) :: + Data.ProtoLens.FieldDescriptor AddFill + displayPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayPrice")) :: + Data.ProtoLens.FieldDescriptor AddFill + openCloseType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "open_close_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'openCloseType")) :: + Data.ProtoLens.FieldDescriptor AddFill + speculationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "speculation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'speculationType")) :: + Data.ProtoLens.FieldDescriptor AddFill + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor AddFill + quantity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "quantity" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'quantity")) :: + Data.ProtoLens.FieldDescriptor AddFill + sync__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sync" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sync")) :: + Data.ProtoLens.FieldDescriptor AddFill + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, orderId__field_descriptor), + (Data.ProtoLens.Tag 3, obsoleteQuantity__field_descriptor), + (Data.ProtoLens.Tag 4, price__field_descriptor), + (Data.ProtoLens.Tag 5, fillUtcTime__field_descriptor), + (Data.ProtoLens.Tag 6, isAggressive__field_descriptor), + (Data.ProtoLens.Tag 7, displayPrice__field_descriptor), + (Data.ProtoLens.Tag 8, openCloseType__field_descriptor), + (Data.ProtoLens.Tag 9, speculationType__field_descriptor), + (Data.ProtoLens.Tag 10, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 11, quantity__field_descriptor), + (Data.ProtoLens.Tag 12, sync__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AddFill'_unknownFields + (\ x__ y__ -> x__ {_AddFill'_unknownFields = y__}) + defMessage + = AddFill'_constructor + {_AddFill'accountId = Prelude.Nothing, + _AddFill'orderId = Prelude.Nothing, + _AddFill'obsoleteQuantity = Prelude.Nothing, + _AddFill'price = Prelude.Nothing, + _AddFill'fillUtcTime = Prelude.Nothing, + _AddFill'isAggressive = Prelude.Nothing, + _AddFill'displayPrice = Prelude.Nothing, + _AddFill'openCloseType = Prelude.Nothing, + _AddFill'speculationType = Prelude.Nothing, + _AddFill'tradeLocationId = Prelude.Nothing, + _AddFill'quantity = Prelude.Nothing, + _AddFill'sync = Prelude.Nothing, _AddFill'_unknownFields = []} + parseMessage + = let + loop :: AddFill -> Data.ProtoLens.Encoding.Bytes.Parser AddFill + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"orderId") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_quantity" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteQuantity") y x) + 33 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "price" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"price") y x) + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "fill_utc_time" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fillUtcTime") y x) + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_aggressive" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"isAggressive") y x) + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayPrice") y x) + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "open_close_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"openCloseType") y x) + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "speculation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"speculationType") y x) + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "quantity" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"quantity") y x) + 96 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "sync" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"sync") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AddFill" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'orderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteQuantity") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'price") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 33) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'fillUtcTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isAggressive") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'displayPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'openCloseType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'speculationType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'quantity") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'sync") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 96) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x))))))))))))) +instance Control.DeepSeq.NFData AddFill where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AddFill'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AddFill'accountId x__) + (Control.DeepSeq.deepseq + (_AddFill'orderId x__) + (Control.DeepSeq.deepseq + (_AddFill'obsoleteQuantity x__) + (Control.DeepSeq.deepseq + (_AddFill'price x__) + (Control.DeepSeq.deepseq + (_AddFill'fillUtcTime x__) + (Control.DeepSeq.deepseq + (_AddFill'isAggressive x__) + (Control.DeepSeq.deepseq + (_AddFill'displayPrice x__) + (Control.DeepSeq.deepseq + (_AddFill'openCloseType x__) + (Control.DeepSeq.deepseq + (_AddFill'speculationType x__) + (Control.DeepSeq.deepseq + (_AddFill'tradeLocationId x__) + (Control.DeepSeq.deepseq + (_AddFill'quantity x__) + (Control.DeepSeq.deepseq + (_AddFill'sync x__) ())))))))))))) +{- | Fields : + -} +data AddFillResult + = AddFillResult'_constructor {_AddFillResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AddFillResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message AddFillResult where + messageName _ = Data.Text.pack "traderouting_1.AddFillResult" + packedMessageDescriptor _ + = "\n\ + \\rAddFillResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _AddFillResult'_unknownFields + (\ x__ y__ -> x__ {_AddFillResult'_unknownFields = y__}) + defMessage + = AddFillResult'_constructor {_AddFillResult'_unknownFields = []} + parseMessage + = let + loop :: + AddFillResult -> Data.ProtoLens.Encoding.Bytes.Parser AddFillResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "AddFillResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData AddFillResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq (_AddFillResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.routeInformation' @:: Lens' AvailableRoute RouteInformation@ + * 'Proto.CMS.Traderouting1_Fields.maybe'routeInformation' @:: Lens' AvailableRoute (Prelude.Maybe RouteInformation)@ + * 'Proto.CMS.Traderouting1_Fields.priority' @:: Lens' AvailableRoute Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'priority' @:: Lens' AvailableRoute (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.omnibusSupportType' @:: Lens' AvailableRoute Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'omnibusSupportType' @:: Lens' AvailableRoute (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.omnibusAccounts' @:: Lens' AvailableRoute [RouteOmnibusAccount]@ + * 'Proto.CMS.Traderouting1_Fields.vec'omnibusAccounts' @:: Lens' AvailableRoute (Data.Vector.Vector RouteOmnibusAccount)@ -} +data AvailableRoute + = AvailableRoute'_constructor {_AvailableRoute'routeInformation :: !(Prelude.Maybe RouteInformation), + _AvailableRoute'priority :: !(Prelude.Maybe Data.Word.Word32), + _AvailableRoute'omnibusSupportType :: !(Prelude.Maybe Data.Word.Word32), + _AvailableRoute'omnibusAccounts :: !(Data.Vector.Vector RouteOmnibusAccount), + _AvailableRoute'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show AvailableRoute where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField AvailableRoute "routeInformation" RouteInformation where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AvailableRoute'routeInformation + (\ x__ y__ -> x__ {_AvailableRoute'routeInformation = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField AvailableRoute "maybe'routeInformation" (Prelude.Maybe RouteInformation) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AvailableRoute'routeInformation + (\ x__ y__ -> x__ {_AvailableRoute'routeInformation = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AvailableRoute "priority" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AvailableRoute'priority + (\ x__ y__ -> x__ {_AvailableRoute'priority = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AvailableRoute "maybe'priority" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AvailableRoute'priority + (\ x__ y__ -> x__ {_AvailableRoute'priority = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AvailableRoute "omnibusSupportType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AvailableRoute'omnibusSupportType + (\ x__ y__ -> x__ {_AvailableRoute'omnibusSupportType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField AvailableRoute "maybe'omnibusSupportType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AvailableRoute'omnibusSupportType + (\ x__ y__ -> x__ {_AvailableRoute'omnibusSupportType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField AvailableRoute "omnibusAccounts" [RouteOmnibusAccount] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AvailableRoute'omnibusAccounts + (\ x__ y__ -> x__ {_AvailableRoute'omnibusAccounts = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField AvailableRoute "vec'omnibusAccounts" (Data.Vector.Vector RouteOmnibusAccount) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _AvailableRoute'omnibusAccounts + (\ x__ y__ -> x__ {_AvailableRoute'omnibusAccounts = y__})) + Prelude.id +instance Data.ProtoLens.Message AvailableRoute where + messageName _ = Data.Text.pack "traderouting_1.AvailableRoute" + packedMessageDescriptor _ + = "\n\ + \\SOAvailableRoute\DC2M\n\ + \\DC1route_information\CAN\SOH \SOH(\v2 .traderouting_1.RouteInformationR\DLErouteInformation\DC2\SUB\n\ + \\bpriority\CAN\STX \SOH(\rR\bpriority\DC20\n\ + \\DC4omnibus_support_type\CAN\ETX \SOH(\rR\DC2omnibusSupportType\DC2N\n\ + \\DLEomnibus_accounts\CAN\EOT \ETX(\v2#.traderouting_1.RouteOmnibusAccountR\SIomnibusAccounts\"?\n\ + \\DC2OmnibusSupportType\DC2\SO\n\ + \\n\ + \PROHIBITED\DLE\SOH\DC2\v\n\ + \\aALLOWED\DLE\STX\DC2\f\n\ + \\bREQUIRED\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + routeInformation__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route_information" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RouteInformation) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'routeInformation")) :: + Data.ProtoLens.FieldDescriptor AvailableRoute + priority__field_descriptor + = Data.ProtoLens.FieldDescriptor + "priority" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'priority")) :: + Data.ProtoLens.FieldDescriptor AvailableRoute + omnibusSupportType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "omnibus_support_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'omnibusSupportType")) :: + Data.ProtoLens.FieldDescriptor AvailableRoute + omnibusAccounts__field_descriptor + = Data.ProtoLens.FieldDescriptor + "omnibus_accounts" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RouteOmnibusAccount) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"omnibusAccounts")) :: + Data.ProtoLens.FieldDescriptor AvailableRoute + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, routeInformation__field_descriptor), + (Data.ProtoLens.Tag 2, priority__field_descriptor), + (Data.ProtoLens.Tag 3, omnibusSupportType__field_descriptor), + (Data.ProtoLens.Tag 4, omnibusAccounts__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _AvailableRoute'_unknownFields + (\ x__ y__ -> x__ {_AvailableRoute'_unknownFields = y__}) + defMessage + = AvailableRoute'_constructor + {_AvailableRoute'routeInformation = Prelude.Nothing, + _AvailableRoute'priority = Prelude.Nothing, + _AvailableRoute'omnibusSupportType = Prelude.Nothing, + _AvailableRoute'omnibusAccounts = Data.Vector.Generic.empty, + _AvailableRoute'_unknownFields = []} + parseMessage + = let + loop :: + AvailableRoute + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld RouteOmnibusAccount + -> Data.ProtoLens.Encoding.Bytes.Parser AvailableRoute + loop x mutable'omnibusAccounts + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'omnibusAccounts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'omnibusAccounts) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'omnibusAccounts") + frozen'omnibusAccounts x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "route_information" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"routeInformation") y x) + mutable'omnibusAccounts + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "priority" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"priority") y x) + mutable'omnibusAccounts + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "omnibus_support_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"omnibusSupportType") y x) + mutable'omnibusAccounts + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "omnibus_accounts" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'omnibusAccounts y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'omnibusAccounts + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'omnibusAccounts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'omnibusAccounts) + "AvailableRoute" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'routeInformation") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'priority") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'omnibusSupportType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'omnibusAccounts") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData AvailableRoute where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_AvailableRoute'_unknownFields x__) + (Control.DeepSeq.deepseq + (_AvailableRoute'routeInformation x__) + (Control.DeepSeq.deepseq + (_AvailableRoute'priority x__) + (Control.DeepSeq.deepseq + (_AvailableRoute'omnibusSupportType x__) + (Control.DeepSeq.deepseq + (_AvailableRoute'omnibusAccounts x__) ())))) +data AvailableRoute'OmnibusSupportType + = AvailableRoute'PROHIBITED | + AvailableRoute'ALLOWED | + AvailableRoute'REQUIRED + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum AvailableRoute'OmnibusSupportType where + maybeToEnum 1 = Prelude.Just AvailableRoute'PROHIBITED + maybeToEnum 2 = Prelude.Just AvailableRoute'ALLOWED + maybeToEnum 3 = Prelude.Just AvailableRoute'REQUIRED + maybeToEnum _ = Prelude.Nothing + showEnum AvailableRoute'PROHIBITED = "PROHIBITED" + showEnum AvailableRoute'ALLOWED = "ALLOWED" + showEnum AvailableRoute'REQUIRED = "REQUIRED" + readEnum k + | (Prelude.==) k "PROHIBITED" + = Prelude.Just AvailableRoute'PROHIBITED + | (Prelude.==) k "ALLOWED" = Prelude.Just AvailableRoute'ALLOWED + | (Prelude.==) k "REQUIRED" = Prelude.Just AvailableRoute'REQUIRED + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded AvailableRoute'OmnibusSupportType where + minBound = AvailableRoute'PROHIBITED + maxBound = AvailableRoute'REQUIRED +instance Prelude.Enum AvailableRoute'OmnibusSupportType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum OmnibusSupportType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum AvailableRoute'PROHIBITED = 1 + fromEnum AvailableRoute'ALLOWED = 2 + fromEnum AvailableRoute'REQUIRED = 3 + succ AvailableRoute'REQUIRED + = Prelude.error + "AvailableRoute'OmnibusSupportType.succ: bad argument AvailableRoute'REQUIRED. This value would be out of bounds." + succ AvailableRoute'PROHIBITED = AvailableRoute'ALLOWED + succ AvailableRoute'ALLOWED = AvailableRoute'REQUIRED + pred AvailableRoute'PROHIBITED + = Prelude.error + "AvailableRoute'OmnibusSupportType.pred: bad argument AvailableRoute'PROHIBITED. This value would be out of bounds." + pred AvailableRoute'ALLOWED = AvailableRoute'PROHIBITED + pred AvailableRoute'REQUIRED = AvailableRoute'ALLOWED + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault AvailableRoute'OmnibusSupportType where + fieldDefault = AvailableRoute'PROHIBITED +instance Control.DeepSeq.NFData AvailableRoute'OmnibusSupportType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' BalanceRecord Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.balanceRecordId' @:: Lens' BalanceRecord Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.currency' @:: Lens' BalanceRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.endCashBalance' @:: Lens' BalanceRecord Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'endCashBalance' @:: Lens' BalanceRecord (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.collateral' @:: Lens' BalanceRecord Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'collateral' @:: Lens' BalanceRecord (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.asOfDate' @:: Lens' BalanceRecord Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'asOfDate' @:: Lens' BalanceRecord (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.origin' @:: Lens' BalanceRecord Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'origin' @:: Lens' BalanceRecord (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.regulated' @:: Lens' BalanceRecord Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'regulated' @:: Lens' BalanceRecord (Prelude.Maybe Prelude.Bool)@ -} +data BalanceRecord + = BalanceRecord'_constructor {_BalanceRecord'accountId :: !Data.Int.Int32, + _BalanceRecord'balanceRecordId :: !Data.Int.Int32, + _BalanceRecord'currency :: !Data.Text.Text, + _BalanceRecord'endCashBalance :: !(Prelude.Maybe Prelude.Double), + _BalanceRecord'collateral :: !(Prelude.Maybe Prelude.Double), + _BalanceRecord'asOfDate :: !(Prelude.Maybe Data.Int.Int64), + _BalanceRecord'origin :: !(Prelude.Maybe Data.Word.Word32), + _BalanceRecord'regulated :: !(Prelude.Maybe Prelude.Bool), + _BalanceRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show BalanceRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField BalanceRecord "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'accountId + (\ x__ y__ -> x__ {_BalanceRecord'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BalanceRecord "balanceRecordId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'balanceRecordId + (\ x__ y__ -> x__ {_BalanceRecord'balanceRecordId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BalanceRecord "currency" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'currency + (\ x__ y__ -> x__ {_BalanceRecord'currency = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BalanceRecord "endCashBalance" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'endCashBalance + (\ x__ y__ -> x__ {_BalanceRecord'endCashBalance = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BalanceRecord "maybe'endCashBalance" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'endCashBalance + (\ x__ y__ -> x__ {_BalanceRecord'endCashBalance = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BalanceRecord "collateral" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'collateral + (\ x__ y__ -> x__ {_BalanceRecord'collateral = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BalanceRecord "maybe'collateral" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'collateral + (\ x__ y__ -> x__ {_BalanceRecord'collateral = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BalanceRecord "asOfDate" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'asOfDate + (\ x__ y__ -> x__ {_BalanceRecord'asOfDate = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BalanceRecord "maybe'asOfDate" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'asOfDate + (\ x__ y__ -> x__ {_BalanceRecord'asOfDate = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BalanceRecord "origin" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'origin + (\ x__ y__ -> x__ {_BalanceRecord'origin = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BalanceRecord "maybe'origin" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'origin + (\ x__ y__ -> x__ {_BalanceRecord'origin = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BalanceRecord "regulated" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'regulated + (\ x__ y__ -> x__ {_BalanceRecord'regulated = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BalanceRecord "maybe'regulated" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecord'regulated + (\ x__ y__ -> x__ {_BalanceRecord'regulated = y__})) + Prelude.id +instance Data.ProtoLens.Message BalanceRecord where + messageName _ = Data.Text.pack "traderouting_1.BalanceRecord" + packedMessageDescriptor _ + = "\n\ + \\rBalanceRecord\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\DC2*\n\ + \\DC1balance_record_id\CAN\STX \STX(\DC1R\SIbalanceRecordId\DC2\SUB\n\ + \\bcurrency\CAN\ETX \STX(\tR\bcurrency\DC2(\n\ + \\DLEend_cash_balance\CAN\EOT \SOH(\SOHR\SOendCashBalance\DC2\RS\n\ + \\n\ + \collateral\CAN\ENQ \SOH(\SOHR\n\ + \collateral\DC2\FS\n\ + \\n\ + \as_of_date\CAN\ACK \SOH(\DC2R\basOfDate\DC2\SYN\n\ + \\ACKorigin\CAN\a \SOH(\rR\ACKorigin\DC2\FS\n\ + \\tregulated\CAN\b \SOH(\bR\tregulated\"0\n\ + \\rBalanceOrigin\DC2\ACK\n\ + \\STXNA\DLE\SOH\DC2\t\n\ + \\ENQLOCAL\DLE\STX\DC2\f\n\ + \\bOVERSEAS\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor BalanceRecord + balanceRecordId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "balance_record_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"balanceRecordId")) :: + Data.ProtoLens.FieldDescriptor BalanceRecord + currency__field_descriptor + = Data.ProtoLens.FieldDescriptor + "currency" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"currency")) :: + Data.ProtoLens.FieldDescriptor BalanceRecord + endCashBalance__field_descriptor + = Data.ProtoLens.FieldDescriptor + "end_cash_balance" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'endCashBalance")) :: + Data.ProtoLens.FieldDescriptor BalanceRecord + collateral__field_descriptor + = Data.ProtoLens.FieldDescriptor + "collateral" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'collateral")) :: + Data.ProtoLens.FieldDescriptor BalanceRecord + asOfDate__field_descriptor + = Data.ProtoLens.FieldDescriptor + "as_of_date" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'asOfDate")) :: + Data.ProtoLens.FieldDescriptor BalanceRecord + origin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "origin" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'origin")) :: + Data.ProtoLens.FieldDescriptor BalanceRecord + regulated__field_descriptor + = Data.ProtoLens.FieldDescriptor + "regulated" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'regulated")) :: + Data.ProtoLens.FieldDescriptor BalanceRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, balanceRecordId__field_descriptor), + (Data.ProtoLens.Tag 3, currency__field_descriptor), + (Data.ProtoLens.Tag 4, endCashBalance__field_descriptor), + (Data.ProtoLens.Tag 5, collateral__field_descriptor), + (Data.ProtoLens.Tag 6, asOfDate__field_descriptor), + (Data.ProtoLens.Tag 7, origin__field_descriptor), + (Data.ProtoLens.Tag 8, regulated__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _BalanceRecord'_unknownFields + (\ x__ y__ -> x__ {_BalanceRecord'_unknownFields = y__}) + defMessage + = BalanceRecord'_constructor + {_BalanceRecord'accountId = Data.ProtoLens.fieldDefault, + _BalanceRecord'balanceRecordId = Data.ProtoLens.fieldDefault, + _BalanceRecord'currency = Data.ProtoLens.fieldDefault, + _BalanceRecord'endCashBalance = Prelude.Nothing, + _BalanceRecord'collateral = Prelude.Nothing, + _BalanceRecord'asOfDate = Prelude.Nothing, + _BalanceRecord'origin = Prelude.Nothing, + _BalanceRecord'regulated = Prelude.Nothing, + _BalanceRecord'_unknownFields = []} + parseMessage + = let + loop :: + BalanceRecord + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser BalanceRecord + loop + x + required'accountId + required'balanceRecordId + required'currency + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) + ((if required'balanceRecordId then + (:) "balance_record_id" + else + Prelude.id) + ((if required'currency then (:) "currency" else Prelude.id) [])) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False required'balanceRecordId required'currency + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "balance_record_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"balanceRecordId") y x) + required'accountId Prelude.False required'currency + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "currency" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"currency") y x) + required'accountId required'balanceRecordId Prelude.False + 33 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "end_cash_balance" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"endCashBalance") y x) + required'accountId required'balanceRecordId required'currency + 41 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "collateral" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"collateral") y x) + required'accountId required'balanceRecordId required'currency + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "as_of_date" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"asOfDate") y x) + required'accountId required'balanceRecordId required'currency + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "origin" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"origin") y x) + required'accountId required'balanceRecordId required'currency + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "regulated" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"regulated") y x) + required'accountId required'balanceRecordId required'currency + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId required'balanceRecordId required'currency + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True) + "BalanceRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"accountId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"balanceRecordId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"currency") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'endCashBalance") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 33) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'collateral") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 41) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'asOfDate") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'origin") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'regulated") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))))) +instance Control.DeepSeq.NFData BalanceRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_BalanceRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_BalanceRecord'accountId x__) + (Control.DeepSeq.deepseq + (_BalanceRecord'balanceRecordId x__) + (Control.DeepSeq.deepseq + (_BalanceRecord'currency x__) + (Control.DeepSeq.deepseq + (_BalanceRecord'endCashBalance x__) + (Control.DeepSeq.deepseq + (_BalanceRecord'collateral x__) + (Control.DeepSeq.deepseq + (_BalanceRecord'asOfDate x__) + (Control.DeepSeq.deepseq + (_BalanceRecord'origin x__) + (Control.DeepSeq.deepseq (_BalanceRecord'regulated x__) ())))))))) +data BalanceRecord'BalanceOrigin + = BalanceRecord'NA | BalanceRecord'LOCAL | BalanceRecord'OVERSEAS + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum BalanceRecord'BalanceOrigin where + maybeToEnum 1 = Prelude.Just BalanceRecord'NA + maybeToEnum 2 = Prelude.Just BalanceRecord'LOCAL + maybeToEnum 3 = Prelude.Just BalanceRecord'OVERSEAS + maybeToEnum _ = Prelude.Nothing + showEnum BalanceRecord'NA = "NA" + showEnum BalanceRecord'LOCAL = "LOCAL" + showEnum BalanceRecord'OVERSEAS = "OVERSEAS" + readEnum k + | (Prelude.==) k "NA" = Prelude.Just BalanceRecord'NA + | (Prelude.==) k "LOCAL" = Prelude.Just BalanceRecord'LOCAL + | (Prelude.==) k "OVERSEAS" = Prelude.Just BalanceRecord'OVERSEAS + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded BalanceRecord'BalanceOrigin where + minBound = BalanceRecord'NA + maxBound = BalanceRecord'OVERSEAS +instance Prelude.Enum BalanceRecord'BalanceOrigin where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum BalanceOrigin: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum BalanceRecord'NA = 1 + fromEnum BalanceRecord'LOCAL = 2 + fromEnum BalanceRecord'OVERSEAS = 3 + succ BalanceRecord'OVERSEAS + = Prelude.error + "BalanceRecord'BalanceOrigin.succ: bad argument BalanceRecord'OVERSEAS. This value would be out of bounds." + succ BalanceRecord'NA = BalanceRecord'LOCAL + succ BalanceRecord'LOCAL = BalanceRecord'OVERSEAS + pred BalanceRecord'NA + = Prelude.error + "BalanceRecord'BalanceOrigin.pred: bad argument BalanceRecord'NA. This value would be out of bounds." + pred BalanceRecord'LOCAL = BalanceRecord'NA + pred BalanceRecord'OVERSEAS = BalanceRecord'LOCAL + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault BalanceRecord'BalanceOrigin where + fieldDefault = BalanceRecord'NA +instance Control.DeepSeq.NFData BalanceRecord'BalanceOrigin where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' BalanceRecordsRequest Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' BalanceRecordsRequest (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.currency' @:: Lens' BalanceRecordsRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'currency' @:: Lens' BalanceRecordsRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.balanceId' @:: Lens' BalanceRecordsRequest Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'balanceId' @:: Lens' BalanceRecordsRequest (Prelude.Maybe Data.Int.Int32)@ -} +data BalanceRecordsRequest + = BalanceRecordsRequest'_constructor {_BalanceRecordsRequest'accountId :: !(Prelude.Maybe Data.Int.Int32), + _BalanceRecordsRequest'currency :: !(Prelude.Maybe Data.Text.Text), + _BalanceRecordsRequest'balanceId :: !(Prelude.Maybe Data.Int.Int32), + _BalanceRecordsRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show BalanceRecordsRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField BalanceRecordsRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecordsRequest'accountId + (\ x__ y__ -> x__ {_BalanceRecordsRequest'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BalanceRecordsRequest "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecordsRequest'accountId + (\ x__ y__ -> x__ {_BalanceRecordsRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BalanceRecordsRequest "currency" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecordsRequest'currency + (\ x__ y__ -> x__ {_BalanceRecordsRequest'currency = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BalanceRecordsRequest "maybe'currency" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecordsRequest'currency + (\ x__ y__ -> x__ {_BalanceRecordsRequest'currency = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BalanceRecordsRequest "balanceId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecordsRequest'balanceId + (\ x__ y__ -> x__ {_BalanceRecordsRequest'balanceId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BalanceRecordsRequest "maybe'balanceId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecordsRequest'balanceId + (\ x__ y__ -> x__ {_BalanceRecordsRequest'balanceId = y__})) + Prelude.id +instance Data.ProtoLens.Message BalanceRecordsRequest where + messageName _ + = Data.Text.pack "traderouting_1.BalanceRecordsRequest" + packedMessageDescriptor _ + = "\n\ + \\NAKBalanceRecordsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\SUB\n\ + \\bcurrency\CAN\STX \SOH(\tR\bcurrency\DC2\GS\n\ + \\n\ + \balance_id\CAN\ETX \SOH(\DC1R\tbalanceId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor BalanceRecordsRequest + currency__field_descriptor + = Data.ProtoLens.FieldDescriptor + "currency" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'currency")) :: + Data.ProtoLens.FieldDescriptor BalanceRecordsRequest + balanceId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "balance_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'balanceId")) :: + Data.ProtoLens.FieldDescriptor BalanceRecordsRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, currency__field_descriptor), + (Data.ProtoLens.Tag 3, balanceId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _BalanceRecordsRequest'_unknownFields + (\ x__ y__ -> x__ {_BalanceRecordsRequest'_unknownFields = y__}) + defMessage + = BalanceRecordsRequest'_constructor + {_BalanceRecordsRequest'accountId = Prelude.Nothing, + _BalanceRecordsRequest'currency = Prelude.Nothing, + _BalanceRecordsRequest'balanceId = Prelude.Nothing, + _BalanceRecordsRequest'_unknownFields = []} + parseMessage + = let + loop :: + BalanceRecordsRequest + -> Data.ProtoLens.Encoding.Bytes.Parser BalanceRecordsRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "currency" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"currency") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "balance_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"balanceId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "BalanceRecordsRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'currency") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'balanceId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData BalanceRecordsRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_BalanceRecordsRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_BalanceRecordsRequest'accountId x__) + (Control.DeepSeq.deepseq + (_BalanceRecordsRequest'currency x__) + (Control.DeepSeq.deepseq + (_BalanceRecordsRequest'balanceId x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.balanceRecord' @:: Lens' BalanceRecordsResult [BalanceRecord]@ + * 'Proto.CMS.Traderouting1_Fields.vec'balanceRecord' @:: Lens' BalanceRecordsResult (Data.Vector.Vector BalanceRecord)@ -} +data BalanceRecordsResult + = BalanceRecordsResult'_constructor {_BalanceRecordsResult'balanceRecord :: !(Data.Vector.Vector BalanceRecord), + _BalanceRecordsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show BalanceRecordsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField BalanceRecordsResult "balanceRecord" [BalanceRecord] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecordsResult'balanceRecord + (\ x__ y__ -> x__ {_BalanceRecordsResult'balanceRecord = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BalanceRecordsResult "vec'balanceRecord" (Data.Vector.Vector BalanceRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BalanceRecordsResult'balanceRecord + (\ x__ y__ -> x__ {_BalanceRecordsResult'balanceRecord = y__})) + Prelude.id +instance Data.ProtoLens.Message BalanceRecordsResult where + messageName _ + = Data.Text.pack "traderouting_1.BalanceRecordsResult" + packedMessageDescriptor _ + = "\n\ + \\DC4BalanceRecordsResult\DC2D\n\ + \\SObalance_record\CAN\SOH \ETX(\v2\GS.traderouting_1.BalanceRecordR\rbalanceRecord" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + balanceRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "balance_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor BalanceRecord) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"balanceRecord")) :: + Data.ProtoLens.FieldDescriptor BalanceRecordsResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, balanceRecord__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _BalanceRecordsResult'_unknownFields + (\ x__ y__ -> x__ {_BalanceRecordsResult'_unknownFields = y__}) + defMessage + = BalanceRecordsResult'_constructor + {_BalanceRecordsResult'balanceRecord = Data.Vector.Generic.empty, + _BalanceRecordsResult'_unknownFields = []} + parseMessage + = let + loop :: + BalanceRecordsResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld BalanceRecord + -> Data.ProtoLens.Encoding.Bytes.Parser BalanceRecordsResult + loop x mutable'balanceRecord + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'balanceRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'balanceRecord) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'balanceRecord") + frozen'balanceRecord x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "balance_record" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'balanceRecord y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'balanceRecord + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'balanceRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'balanceRecord) + "BalanceRecordsResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'balanceRecord") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData BalanceRecordsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_BalanceRecordsResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_BalanceRecordsResult'balanceRecord x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.number' @:: Lens' BillableExchange Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'number' @:: Lens' BillableExchange (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.name' @:: Lens' BillableExchange Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'name' @:: Lens' BillableExchange (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.description' @:: Lens' BillableExchange Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'description' @:: Lens' BillableExchange (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.serviceGroupAuthorizationLevel' @:: Lens' BillableExchange Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'serviceGroupAuthorizationLevel' @:: Lens' BillableExchange (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.serviceGroupIds' @:: Lens' BillableExchange [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'serviceGroupIds' @:: Lens' BillableExchange (Data.Vector.Vector Data.Text.Text)@ -} +data BillableExchange + = BillableExchange'_constructor {_BillableExchange'number :: !(Prelude.Maybe Data.Text.Text), + _BillableExchange'name :: !(Prelude.Maybe Data.Text.Text), + _BillableExchange'description :: !(Prelude.Maybe Data.Text.Text), + _BillableExchange'serviceGroupAuthorizationLevel :: !(Prelude.Maybe Data.Word.Word32), + _BillableExchange'serviceGroupIds :: !(Data.Vector.Vector Data.Text.Text), + _BillableExchange'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show BillableExchange where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField BillableExchange "number" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchange'number + (\ x__ y__ -> x__ {_BillableExchange'number = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BillableExchange "maybe'number" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchange'number + (\ x__ y__ -> x__ {_BillableExchange'number = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BillableExchange "name" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchange'name + (\ x__ y__ -> x__ {_BillableExchange'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BillableExchange "maybe'name" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchange'name + (\ x__ y__ -> x__ {_BillableExchange'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BillableExchange "description" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchange'description + (\ x__ y__ -> x__ {_BillableExchange'description = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BillableExchange "maybe'description" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchange'description + (\ x__ y__ -> x__ {_BillableExchange'description = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BillableExchange "serviceGroupAuthorizationLevel" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchange'serviceGroupAuthorizationLevel + (\ x__ y__ + -> x__ {_BillableExchange'serviceGroupAuthorizationLevel = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField BillableExchange "maybe'serviceGroupAuthorizationLevel" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchange'serviceGroupAuthorizationLevel + (\ x__ y__ + -> x__ {_BillableExchange'serviceGroupAuthorizationLevel = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField BillableExchange "serviceGroupIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchange'serviceGroupIds + (\ x__ y__ -> x__ {_BillableExchange'serviceGroupIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BillableExchange "vec'serviceGroupIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchange'serviceGroupIds + (\ x__ y__ -> x__ {_BillableExchange'serviceGroupIds = y__})) + Prelude.id +instance Data.ProtoLens.Message BillableExchange where + messageName _ = Data.Text.pack "traderouting_1.BillableExchange" + packedMessageDescriptor _ + = "\n\ + \\DLEBillableExchange\DC2\SYN\n\ + \\ACKnumber\CAN\SOH \SOH(\tR\ACKnumber\DC2\DC2\n\ + \\EOTname\CAN\STX \SOH(\tR\EOTname\DC2 \n\ + \\vdescription\CAN\ETX \SOH(\tR\vdescription\DC2I\n\ + \!service_group_authorization_level\CAN\EOT \SOH(\rR\RSserviceGroupAuthorizationLevel\DC2*\n\ + \\DC1service_group_ids\CAN\ENQ \ETX(\tR\SIserviceGroupIds" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + number__field_descriptor + = Data.ProtoLens.FieldDescriptor + "number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'number")) :: + Data.ProtoLens.FieldDescriptor BillableExchange + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor BillableExchange + description__field_descriptor + = Data.ProtoLens.FieldDescriptor + "description" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'description")) :: + Data.ProtoLens.FieldDescriptor BillableExchange + serviceGroupAuthorizationLevel__field_descriptor + = Data.ProtoLens.FieldDescriptor + "service_group_authorization_level" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'serviceGroupAuthorizationLevel")) :: + Data.ProtoLens.FieldDescriptor BillableExchange + serviceGroupIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "service_group_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"serviceGroupIds")) :: + Data.ProtoLens.FieldDescriptor BillableExchange + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, number__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, description__field_descriptor), + (Data.ProtoLens.Tag 4, + serviceGroupAuthorizationLevel__field_descriptor), + (Data.ProtoLens.Tag 5, serviceGroupIds__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _BillableExchange'_unknownFields + (\ x__ y__ -> x__ {_BillableExchange'_unknownFields = y__}) + defMessage + = BillableExchange'_constructor + {_BillableExchange'number = Prelude.Nothing, + _BillableExchange'name = Prelude.Nothing, + _BillableExchange'description = Prelude.Nothing, + _BillableExchange'serviceGroupAuthorizationLevel = Prelude.Nothing, + _BillableExchange'serviceGroupIds = Data.Vector.Generic.empty, + _BillableExchange'_unknownFields = []} + parseMessage + = let + loop :: + BillableExchange + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser BillableExchange + loop x mutable'serviceGroupIds + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'serviceGroupIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'serviceGroupIds) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'serviceGroupIds") + frozen'serviceGroupIds x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "number" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"number") y x) + mutable'serviceGroupIds + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + mutable'serviceGroupIds + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "description" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"description") y x) + mutable'serviceGroupIds + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "service_group_authorization_level" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"serviceGroupAuthorizationLevel") + y x) + mutable'serviceGroupIds + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "service_group_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'serviceGroupIds y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'serviceGroupIds + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'serviceGroupIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'serviceGroupIds) + "BillableExchange" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'number") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'description") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'serviceGroupAuthorizationLevel") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'serviceGroupIds") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData BillableExchange where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_BillableExchange'_unknownFields x__) + (Control.DeepSeq.deepseq + (_BillableExchange'number x__) + (Control.DeepSeq.deepseq + (_BillableExchange'name x__) + (Control.DeepSeq.deepseq + (_BillableExchange'description x__) + (Control.DeepSeq.deepseq + (_BillableExchange'serviceGroupAuthorizationLevel x__) + (Control.DeepSeq.deepseq + (_BillableExchange'serviceGroupIds x__) ()))))) +{- | Fields : + -} +data BillableExchangeListRequest + = BillableExchangeListRequest'_constructor {_BillableExchangeListRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show BillableExchangeListRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message BillableExchangeListRequest where + messageName _ + = Data.Text.pack "traderouting_1.BillableExchangeListRequest" + packedMessageDescriptor _ + = "\n\ + \\ESCBillableExchangeListRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _BillableExchangeListRequest'_unknownFields + (\ x__ y__ + -> x__ {_BillableExchangeListRequest'_unknownFields = y__}) + defMessage + = BillableExchangeListRequest'_constructor + {_BillableExchangeListRequest'_unknownFields = []} + parseMessage + = let + loop :: + BillableExchangeListRequest + -> Data.ProtoLens.Encoding.Bytes.Parser BillableExchangeListRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "BillableExchangeListRequest" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData BillableExchangeListRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_BillableExchangeListRequest'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.billableExchanges' @:: Lens' BillableExchangeListResult [BillableExchange]@ + * 'Proto.CMS.Traderouting1_Fields.vec'billableExchanges' @:: Lens' BillableExchangeListResult (Data.Vector.Vector BillableExchange)@ -} +data BillableExchangeListResult + = BillableExchangeListResult'_constructor {_BillableExchangeListResult'billableExchanges :: !(Data.Vector.Vector BillableExchange), + _BillableExchangeListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show BillableExchangeListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField BillableExchangeListResult "billableExchanges" [BillableExchange] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchangeListResult'billableExchanges + (\ x__ y__ + -> x__ {_BillableExchangeListResult'billableExchanges = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField BillableExchangeListResult "vec'billableExchanges" (Data.Vector.Vector BillableExchange) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _BillableExchangeListResult'billableExchanges + (\ x__ y__ + -> x__ {_BillableExchangeListResult'billableExchanges = y__})) + Prelude.id +instance Data.ProtoLens.Message BillableExchangeListResult where + messageName _ + = Data.Text.pack "traderouting_1.BillableExchangeListResult" + packedMessageDescriptor _ + = "\n\ + \\SUBBillableExchangeListResult\DC2O\n\ + \\DC2billable_exchanges\CAN\SOH \ETX(\v2 .traderouting_1.BillableExchangeR\DC1billableExchanges" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + billableExchanges__field_descriptor + = Data.ProtoLens.FieldDescriptor + "billable_exchanges" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor BillableExchange) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"billableExchanges")) :: + Data.ProtoLens.FieldDescriptor BillableExchangeListResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, billableExchanges__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _BillableExchangeListResult'_unknownFields + (\ x__ y__ + -> x__ {_BillableExchangeListResult'_unknownFields = y__}) + defMessage + = BillableExchangeListResult'_constructor + {_BillableExchangeListResult'billableExchanges = Data.Vector.Generic.empty, + _BillableExchangeListResult'_unknownFields = []} + parseMessage + = let + loop :: + BillableExchangeListResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld BillableExchange + -> Data.ProtoLens.Encoding.Bytes.Parser BillableExchangeListResult + loop x mutable'billableExchanges + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'billableExchanges <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'billableExchanges) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'billableExchanges") + frozen'billableExchanges x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "billable_exchanges" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'billableExchanges y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'billableExchanges + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'billableExchanges <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'billableExchanges) + "BillableExchangeListResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'billableExchanges") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData BillableExchangeListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_BillableExchangeListResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_BillableExchangeListResult'billableExchanges x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.compoundTreeId' @:: Lens' CancelCompoundOrderTree Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'compoundTreeId' @:: Lens' CancelCompoundOrderTree (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' CancelCompoundOrderTree Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' CancelCompoundOrderTree (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' CancelCompoundOrderTree Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' CancelCompoundOrderTree (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.sync' @:: Lens' CancelCompoundOrderTree Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'sync' @:: Lens' CancelCompoundOrderTree (Prelude.Maybe Prelude.Bool)@ -} +data CancelCompoundOrderTree + = CancelCompoundOrderTree'_constructor {_CancelCompoundOrderTree'compoundTreeId :: !(Prelude.Maybe Data.Text.Text), + _CancelCompoundOrderTree'accountId :: !(Prelude.Maybe Data.Int.Int32), + _CancelCompoundOrderTree'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _CancelCompoundOrderTree'sync :: !(Prelude.Maybe Prelude.Bool), + _CancelCompoundOrderTree'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CancelCompoundOrderTree where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CancelCompoundOrderTree "compoundTreeId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelCompoundOrderTree'compoundTreeId + (\ x__ y__ -> x__ {_CancelCompoundOrderTree'compoundTreeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelCompoundOrderTree "maybe'compoundTreeId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelCompoundOrderTree'compoundTreeId + (\ x__ y__ -> x__ {_CancelCompoundOrderTree'compoundTreeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelCompoundOrderTree "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelCompoundOrderTree'accountId + (\ x__ y__ -> x__ {_CancelCompoundOrderTree'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelCompoundOrderTree "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelCompoundOrderTree'accountId + (\ x__ y__ -> x__ {_CancelCompoundOrderTree'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelCompoundOrderTree "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelCompoundOrderTree'tradeLocationId + (\ x__ y__ + -> x__ {_CancelCompoundOrderTree'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelCompoundOrderTree "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelCompoundOrderTree'tradeLocationId + (\ x__ y__ + -> x__ {_CancelCompoundOrderTree'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelCompoundOrderTree "sync" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelCompoundOrderTree'sync + (\ x__ y__ -> x__ {_CancelCompoundOrderTree'sync = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField CancelCompoundOrderTree "maybe'sync" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelCompoundOrderTree'sync + (\ x__ y__ -> x__ {_CancelCompoundOrderTree'sync = y__})) + Prelude.id +instance Data.ProtoLens.Message CancelCompoundOrderTree where + messageName _ + = Data.Text.pack "traderouting_1.CancelCompoundOrderTree" + packedMessageDescriptor _ + = "\n\ + \\ETBCancelCompoundOrderTree\DC2(\n\ + \\DLEcompound_tree_id\CAN\SOH \SOH(\tR\SOcompoundTreeId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\DC1R\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2\EM\n\ + \\EOTsync\CAN\EOT \SOH(\b:\ENQfalseR\EOTsync" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + compoundTreeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "compound_tree_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'compoundTreeId")) :: + Data.ProtoLens.FieldDescriptor CancelCompoundOrderTree + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor CancelCompoundOrderTree + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor CancelCompoundOrderTree + sync__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sync" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sync")) :: + Data.ProtoLens.FieldDescriptor CancelCompoundOrderTree + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, compoundTreeId__field_descriptor), + (Data.ProtoLens.Tag 2, accountId__field_descriptor), + (Data.ProtoLens.Tag 3, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 4, sync__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CancelCompoundOrderTree'_unknownFields + (\ x__ y__ -> x__ {_CancelCompoundOrderTree'_unknownFields = y__}) + defMessage + = CancelCompoundOrderTree'_constructor + {_CancelCompoundOrderTree'compoundTreeId = Prelude.Nothing, + _CancelCompoundOrderTree'accountId = Prelude.Nothing, + _CancelCompoundOrderTree'tradeLocationId = Prelude.Nothing, + _CancelCompoundOrderTree'sync = Prelude.Nothing, + _CancelCompoundOrderTree'_unknownFields = []} + parseMessage + = let + loop :: + CancelCompoundOrderTree + -> Data.ProtoLens.Encoding.Bytes.Parser CancelCompoundOrderTree + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "compound_tree_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"compoundTreeId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "sync" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"sync") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CancelCompoundOrderTree" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'compoundTreeId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'sync") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData CancelCompoundOrderTree where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CancelCompoundOrderTree'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CancelCompoundOrderTree'compoundTreeId x__) + (Control.DeepSeq.deepseq + (_CancelCompoundOrderTree'accountId x__) + (Control.DeepSeq.deepseq + (_CancelCompoundOrderTree'tradeLocationId x__) + (Control.DeepSeq.deepseq (_CancelCompoundOrderTree'sync x__) ())))) +{- | Fields : + -} +data CancelCompoundOrderTreeResult + = CancelCompoundOrderTreeResult'_constructor {_CancelCompoundOrderTreeResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CancelCompoundOrderTreeResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message CancelCompoundOrderTreeResult where + messageName _ + = Data.Text.pack "traderouting_1.CancelCompoundOrderTreeResult" + packedMessageDescriptor _ + = "\n\ + \\GSCancelCompoundOrderTreeResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _CancelCompoundOrderTreeResult'_unknownFields + (\ x__ y__ + -> x__ {_CancelCompoundOrderTreeResult'_unknownFields = y__}) + defMessage + = CancelCompoundOrderTreeResult'_constructor + {_CancelCompoundOrderTreeResult'_unknownFields = []} + parseMessage + = let + loop :: + CancelCompoundOrderTreeResult + -> Data.ProtoLens.Encoding.Bytes.Parser CancelCompoundOrderTreeResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CancelCompoundOrderTreeResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData CancelCompoundOrderTreeResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CancelCompoundOrderTreeResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' CancelFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' CancelFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.fillType' @:: Lens' CancelFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillType' @:: Lens' CancelFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' CancelFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' CancelFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' CancelFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' CancelFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.bust' @:: Lens' CancelFill Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'bust' @:: Lens' CancelFill (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.sync' @:: Lens' CancelFill Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'sync' @:: Lens' CancelFill (Prelude.Maybe Prelude.Bool)@ -} +data CancelFill + = CancelFill'_constructor {_CancelFill'id :: !(Prelude.Maybe Data.Text.Text), + _CancelFill'fillType :: !(Prelude.Maybe Data.Word.Word32), + _CancelFill'accountId :: !(Prelude.Maybe Data.Text.Text), + _CancelFill'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _CancelFill'bust :: !(Prelude.Maybe Prelude.Bool), + _CancelFill'sync :: !(Prelude.Maybe Prelude.Bool), + _CancelFill'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CancelFill where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CancelFill "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'id (\ x__ y__ -> x__ {_CancelFill'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelFill "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'id (\ x__ y__ -> x__ {_CancelFill'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelFill "fillType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'fillType + (\ x__ y__ -> x__ {_CancelFill'fillType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelFill "maybe'fillType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'fillType + (\ x__ y__ -> x__ {_CancelFill'fillType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelFill "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'accountId + (\ x__ y__ -> x__ {_CancelFill'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelFill "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'accountId + (\ x__ y__ -> x__ {_CancelFill'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelFill "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'tradeLocationId + (\ x__ y__ -> x__ {_CancelFill'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelFill "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'tradeLocationId + (\ x__ y__ -> x__ {_CancelFill'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelFill "bust" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'bust (\ x__ y__ -> x__ {_CancelFill'bust = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelFill "maybe'bust" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'bust (\ x__ y__ -> x__ {_CancelFill'bust = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelFill "sync" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'sync (\ x__ y__ -> x__ {_CancelFill'sync = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField CancelFill "maybe'sync" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelFill'sync (\ x__ y__ -> x__ {_CancelFill'sync = y__})) + Prelude.id +instance Data.ProtoLens.Message CancelFill where + messageName _ = Data.Text.pack "traderouting_1.CancelFill" + packedMessageDescriptor _ + = "\n\ + \\n\ + \CancelFill\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\ESC\n\ + \\tfill_type\CAN\STX \SOH(\rR\bfillType\DC2\GS\n\ + \\n\ + \account_id\CAN\ETX \SOH(\tR\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\EOT \SOH(\tR\SItradeLocationId\DC2\DC2\n\ + \\EOTbust\CAN\ENQ \SOH(\bR\EOTbust\DC2\EM\n\ + \\EOTsync\CAN\ACK \SOH(\b:\ENQfalseR\EOTsync" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor CancelFill + fillType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillType")) :: + Data.ProtoLens.FieldDescriptor CancelFill + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor CancelFill + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor CancelFill + bust__field_descriptor + = Data.ProtoLens.FieldDescriptor + "bust" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'bust")) :: + Data.ProtoLens.FieldDescriptor CancelFill + sync__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sync" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sync")) :: + Data.ProtoLens.FieldDescriptor CancelFill + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, fillType__field_descriptor), + (Data.ProtoLens.Tag 3, accountId__field_descriptor), + (Data.ProtoLens.Tag 4, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 5, bust__field_descriptor), + (Data.ProtoLens.Tag 6, sync__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CancelFill'_unknownFields + (\ x__ y__ -> x__ {_CancelFill'_unknownFields = y__}) + defMessage + = CancelFill'_constructor + {_CancelFill'id = Prelude.Nothing, + _CancelFill'fillType = Prelude.Nothing, + _CancelFill'accountId = Prelude.Nothing, + _CancelFill'tradeLocationId = Prelude.Nothing, + _CancelFill'bust = Prelude.Nothing, + _CancelFill'sync = Prelude.Nothing, + _CancelFill'_unknownFields = []} + parseMessage + = let + loop :: + CancelFill -> Data.ProtoLens.Encoding.Bytes.Parser CancelFill + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "fill_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fillType") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "bust" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"bust") y x) + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "sync" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"sync") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CancelFill" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'fillType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'bust") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'sync") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))) +instance Control.DeepSeq.NFData CancelFill where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CancelFill'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CancelFill'id x__) + (Control.DeepSeq.deepseq + (_CancelFill'fillType x__) + (Control.DeepSeq.deepseq + (_CancelFill'accountId x__) + (Control.DeepSeq.deepseq + (_CancelFill'tradeLocationId x__) + (Control.DeepSeq.deepseq + (_CancelFill'bust x__) + (Control.DeepSeq.deepseq (_CancelFill'sync x__) ())))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.chainOrderId' @:: Lens' CancelOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'chainOrderId' @:: Lens' CancelOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' CancelOrder Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' CancelOrder (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' CancelOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' CancelOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.sync' @:: Lens' CancelOrder Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'sync' @:: Lens' CancelOrder (Prelude.Maybe Prelude.Bool)@ -} +data CancelOrder + = CancelOrder'_constructor {_CancelOrder'chainOrderId :: !(Prelude.Maybe Data.Text.Text), + _CancelOrder'accountId :: !(Prelude.Maybe Data.Int.Int32), + _CancelOrder'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _CancelOrder'sync :: !(Prelude.Maybe Prelude.Bool), + _CancelOrder'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CancelOrder where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CancelOrder "chainOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelOrder'chainOrderId + (\ x__ y__ -> x__ {_CancelOrder'chainOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelOrder "maybe'chainOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelOrder'chainOrderId + (\ x__ y__ -> x__ {_CancelOrder'chainOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelOrder "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelOrder'accountId + (\ x__ y__ -> x__ {_CancelOrder'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelOrder "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelOrder'accountId + (\ x__ y__ -> x__ {_CancelOrder'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelOrder "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelOrder'tradeLocationId + (\ x__ y__ -> x__ {_CancelOrder'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CancelOrder "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelOrder'tradeLocationId + (\ x__ y__ -> x__ {_CancelOrder'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CancelOrder "sync" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelOrder'sync (\ x__ y__ -> x__ {_CancelOrder'sync = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField CancelOrder "maybe'sync" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CancelOrder'sync (\ x__ y__ -> x__ {_CancelOrder'sync = y__})) + Prelude.id +instance Data.ProtoLens.Message CancelOrder where + messageName _ = Data.Text.pack "traderouting_1.CancelOrder" + packedMessageDescriptor _ + = "\n\ + \\vCancelOrder\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\DC1R\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2\EM\n\ + \\EOTsync\CAN\EOT \SOH(\b:\ENQfalseR\EOTsync" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + chainOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "chain_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'chainOrderId")) :: + Data.ProtoLens.FieldDescriptor CancelOrder + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor CancelOrder + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor CancelOrder + sync__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sync" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sync")) :: + Data.ProtoLens.FieldDescriptor CancelOrder + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, chainOrderId__field_descriptor), + (Data.ProtoLens.Tag 2, accountId__field_descriptor), + (Data.ProtoLens.Tag 3, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 4, sync__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CancelOrder'_unknownFields + (\ x__ y__ -> x__ {_CancelOrder'_unknownFields = y__}) + defMessage + = CancelOrder'_constructor + {_CancelOrder'chainOrderId = Prelude.Nothing, + _CancelOrder'accountId = Prelude.Nothing, + _CancelOrder'tradeLocationId = Prelude.Nothing, + _CancelOrder'sync = Prelude.Nothing, + _CancelOrder'_unknownFields = []} + parseMessage + = let + loop :: + CancelOrder -> Data.ProtoLens.Encoding.Bytes.Parser CancelOrder + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "chain_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"chainOrderId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "sync" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"sync") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CancelOrder" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'chainOrderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'sync") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData CancelOrder where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CancelOrder'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CancelOrder'chainOrderId x__) + (Control.DeepSeq.deepseq + (_CancelOrder'accountId x__) + (Control.DeepSeq.deepseq + (_CancelOrder'tradeLocationId x__) + (Control.DeepSeq.deepseq (_CancelOrder'sync x__) ())))) +{- | Fields : + -} +data CancelOrderResult + = CancelOrderResult'_constructor {_CancelOrderResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CancelOrderResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message CancelOrderResult where + messageName _ = Data.Text.pack "traderouting_1.CancelOrderResult" + packedMessageDescriptor _ + = "\n\ + \\DC1CancelOrderResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _CancelOrderResult'_unknownFields + (\ x__ y__ -> x__ {_CancelOrderResult'_unknownFields = y__}) + defMessage + = CancelOrderResult'_constructor + {_CancelOrderResult'_unknownFields = []} + parseMessage + = let + loop :: + CancelOrderResult + -> Data.ProtoLens.Encoding.Bytes.Parser CancelOrderResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CancelOrderResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData CancelOrderResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CancelOrderResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' ChainAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' ChainAccount (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountName' @:: Lens' ChainAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountName' @:: Lens' ChainAccount (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageAccountNumber' @:: Lens' ChainAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'brokerageAccountNumber' @:: Lens' ChainAccount (Prelude.Maybe Data.Text.Text)@ -} +data ChainAccount + = ChainAccount'_constructor {_ChainAccount'accountId :: !(Prelude.Maybe Data.Text.Text), + _ChainAccount'accountName :: !(Prelude.Maybe Data.Text.Text), + _ChainAccount'brokerageAccountNumber :: !(Prelude.Maybe Data.Text.Text), + _ChainAccount'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ChainAccount where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ChainAccount "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ChainAccount'accountId + (\ x__ y__ -> x__ {_ChainAccount'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ChainAccount "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ChainAccount'accountId + (\ x__ y__ -> x__ {_ChainAccount'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ChainAccount "accountName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ChainAccount'accountName + (\ x__ y__ -> x__ {_ChainAccount'accountName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ChainAccount "maybe'accountName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ChainAccount'accountName + (\ x__ y__ -> x__ {_ChainAccount'accountName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ChainAccount "brokerageAccountNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ChainAccount'brokerageAccountNumber + (\ x__ y__ -> x__ {_ChainAccount'brokerageAccountNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ChainAccount "maybe'brokerageAccountNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ChainAccount'brokerageAccountNumber + (\ x__ y__ -> x__ {_ChainAccount'brokerageAccountNumber = y__})) + Prelude.id +instance Data.ProtoLens.Message ChainAccount where + messageName _ = Data.Text.pack "traderouting_1.ChainAccount" + packedMessageDescriptor _ + = "\n\ + \\fChainAccount\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2!\n\ + \\faccount_name\CAN\STX \SOH(\tR\vaccountName\DC28\n\ + \\CANbrokerage_account_number\CAN\ETX \SOH(\tR\SYNbrokerageAccountNumber" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor ChainAccount + accountName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountName")) :: + Data.ProtoLens.FieldDescriptor ChainAccount + brokerageAccountNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_account_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber")) :: + Data.ProtoLens.FieldDescriptor ChainAccount + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, accountName__field_descriptor), + (Data.ProtoLens.Tag 3, brokerageAccountNumber__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ChainAccount'_unknownFields + (\ x__ y__ -> x__ {_ChainAccount'_unknownFields = y__}) + defMessage + = ChainAccount'_constructor + {_ChainAccount'accountId = Prelude.Nothing, + _ChainAccount'accountName = Prelude.Nothing, + _ChainAccount'brokerageAccountNumber = Prelude.Nothing, + _ChainAccount'_unknownFields = []} + parseMessage + = let + loop :: + ChainAccount -> Data.ProtoLens.Encoding.Bytes.Parser ChainAccount + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountName") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_account_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAccountNumber") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ChainAccount" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData ChainAccount where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ChainAccount'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ChainAccount'accountId x__) + (Control.DeepSeq.deepseq + (_ChainAccount'accountName x__) + (Control.DeepSeq.deepseq + (_ChainAccount'brokerageAccountNumber x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.sourceAccountId' @:: Lens' CloneAccount Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.newAccountName' @:: Lens' CloneAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.newAccountBrokerageNumber' @:: Lens' CloneAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.newAccountUserId' @:: Lens' CloneAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'newAccountUserId' @:: Lens' CloneAccount (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.newAccountClass' @:: Lens' CloneAccount Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'newAccountClass' @:: Lens' CloneAccount (Prelude.Maybe Data.Word.Word32)@ -} +data CloneAccount + = CloneAccount'_constructor {_CloneAccount'sourceAccountId :: !Data.Int.Int32, + _CloneAccount'newAccountName :: !Data.Text.Text, + _CloneAccount'newAccountBrokerageNumber :: !Data.Text.Text, + _CloneAccount'newAccountUserId :: !(Prelude.Maybe Data.Text.Text), + _CloneAccount'newAccountClass :: !(Prelude.Maybe Data.Word.Word32), + _CloneAccount'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CloneAccount where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CloneAccount "sourceAccountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneAccount'sourceAccountId + (\ x__ y__ -> x__ {_CloneAccount'sourceAccountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneAccount "newAccountName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneAccount'newAccountName + (\ x__ y__ -> x__ {_CloneAccount'newAccountName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneAccount "newAccountBrokerageNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneAccount'newAccountBrokerageNumber + (\ x__ y__ -> x__ {_CloneAccount'newAccountBrokerageNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneAccount "newAccountUserId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneAccount'newAccountUserId + (\ x__ y__ -> x__ {_CloneAccount'newAccountUserId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CloneAccount "maybe'newAccountUserId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneAccount'newAccountUserId + (\ x__ y__ -> x__ {_CloneAccount'newAccountUserId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CloneAccount "newAccountClass" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneAccount'newAccountClass + (\ x__ y__ -> x__ {_CloneAccount'newAccountClass = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CloneAccount "maybe'newAccountClass" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneAccount'newAccountClass + (\ x__ y__ -> x__ {_CloneAccount'newAccountClass = y__})) + Prelude.id +instance Data.ProtoLens.Message CloneAccount where + messageName _ = Data.Text.pack "traderouting_1.CloneAccount" + packedMessageDescriptor _ + = "\n\ + \\fCloneAccount\DC2*\n\ + \\DC1source_account_id\CAN\SOH \STX(\DC1R\SIsourceAccountId\DC2(\n\ + \\DLEnew_account_name\CAN\STX \STX(\tR\SOnewAccountName\DC2?\n\ + \\FSnew_account_brokerage_number\CAN\ETX \STX(\tR\EMnewAccountBrokerageNumber\DC2-\n\ + \\DC3new_account_user_id\CAN\EOT \SOH(\tR\DLEnewAccountUserId\DC2*\n\ + \\DC1new_account_class\CAN\ENQ \SOH(\rR\SInewAccountClass" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + sourceAccountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "source_account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"sourceAccountId")) :: + Data.ProtoLens.FieldDescriptor CloneAccount + newAccountName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_account_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"newAccountName")) :: + Data.ProtoLens.FieldDescriptor CloneAccount + newAccountBrokerageNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_account_brokerage_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"newAccountBrokerageNumber")) :: + Data.ProtoLens.FieldDescriptor CloneAccount + newAccountUserId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_account_user_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'newAccountUserId")) :: + Data.ProtoLens.FieldDescriptor CloneAccount + newAccountClass__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_account_class" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'newAccountClass")) :: + Data.ProtoLens.FieldDescriptor CloneAccount + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, sourceAccountId__field_descriptor), + (Data.ProtoLens.Tag 2, newAccountName__field_descriptor), + (Data.ProtoLens.Tag 3, + newAccountBrokerageNumber__field_descriptor), + (Data.ProtoLens.Tag 4, newAccountUserId__field_descriptor), + (Data.ProtoLens.Tag 5, newAccountClass__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CloneAccount'_unknownFields + (\ x__ y__ -> x__ {_CloneAccount'_unknownFields = y__}) + defMessage + = CloneAccount'_constructor + {_CloneAccount'sourceAccountId = Data.ProtoLens.fieldDefault, + _CloneAccount'newAccountName = Data.ProtoLens.fieldDefault, + _CloneAccount'newAccountBrokerageNumber = Data.ProtoLens.fieldDefault, + _CloneAccount'newAccountUserId = Prelude.Nothing, + _CloneAccount'newAccountClass = Prelude.Nothing, + _CloneAccount'_unknownFields = []} + parseMessage + = let + loop :: + CloneAccount + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser CloneAccount + loop + x + required'newAccountBrokerageNumber + required'newAccountName + required'sourceAccountId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'newAccountBrokerageNumber then + (:) "new_account_brokerage_number" + else + Prelude.id) + ((if required'newAccountName then + (:) "new_account_name" + else + Prelude.id) + ((if required'sourceAccountId then + (:) "source_account_id" + else + Prelude.id) + [])) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "source_account_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"sourceAccountId") y x) + required'newAccountBrokerageNumber required'newAccountName + Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "new_account_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newAccountName") y x) + required'newAccountBrokerageNumber Prelude.False + required'sourceAccountId + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "new_account_brokerage_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newAccountBrokerageNumber") y x) + Prelude.False required'newAccountName required'sourceAccountId + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "new_account_user_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newAccountUserId") y x) + required'newAccountBrokerageNumber required'newAccountName + required'sourceAccountId + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "new_account_class" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newAccountClass") y x) + required'newAccountBrokerageNumber required'newAccountName + required'sourceAccountId + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'newAccountBrokerageNumber required'newAccountName + required'sourceAccountId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True) + "CloneAccount" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"sourceAccountId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"newAccountName") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"newAccountBrokerageNumber") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'newAccountUserId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'newAccountClass") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData CloneAccount where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CloneAccount'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CloneAccount'sourceAccountId x__) + (Control.DeepSeq.deepseq + (_CloneAccount'newAccountName x__) + (Control.DeepSeq.deepseq + (_CloneAccount'newAccountBrokerageNumber x__) + (Control.DeepSeq.deepseq + (_CloneAccount'newAccountUserId x__) + (Control.DeepSeq.deepseq + (_CloneAccount'newAccountClass x__) ()))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.newAccountId' @:: Lens' CloneAccountResult Data.Int.Int32@ -} +data CloneAccountResult + = CloneAccountResult'_constructor {_CloneAccountResult'newAccountId :: !Data.Int.Int32, + _CloneAccountResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CloneAccountResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CloneAccountResult "newAccountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CloneAccountResult'newAccountId + (\ x__ y__ -> x__ {_CloneAccountResult'newAccountId = y__})) + Prelude.id +instance Data.ProtoLens.Message CloneAccountResult where + messageName _ = Data.Text.pack "traderouting_1.CloneAccountResult" + packedMessageDescriptor _ + = "\n\ + \\DC2CloneAccountResult\DC2$\n\ + \\SOnew_account_id\CAN\SOH \STX(\DC1R\fnewAccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + newAccountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"newAccountId")) :: + Data.ProtoLens.FieldDescriptor CloneAccountResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, newAccountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CloneAccountResult'_unknownFields + (\ x__ y__ -> x__ {_CloneAccountResult'_unknownFields = y__}) + defMessage + = CloneAccountResult'_constructor + {_CloneAccountResult'newAccountId = Data.ProtoLens.fieldDefault, + _CloneAccountResult'_unknownFields = []} + parseMessage + = let + loop :: + CloneAccountResult + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser CloneAccountResult + loop x required'newAccountId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'newAccountId then + (:) "new_account_id" + else + Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "new_account_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newAccountId") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'newAccountId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "CloneAccountResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"newAccountId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData CloneAccountResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CloneAccountResult'_unknownFields x__) + (Control.DeepSeq.deepseq (_CloneAccountResult'newAccountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.currency' @:: Lens' Collateral Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.totalMargin' @:: Lens' Collateral Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.purchasingPower' @:: Lens' Collateral Prelude.Double@ -} +data Collateral + = Collateral'_constructor {_Collateral'currency :: !Data.Text.Text, + _Collateral'totalMargin :: !Prelude.Double, + _Collateral'purchasingPower :: !Prelude.Double, + _Collateral'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Collateral where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Collateral "currency" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Collateral'currency + (\ x__ y__ -> x__ {_Collateral'currency = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Collateral "totalMargin" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Collateral'totalMargin + (\ x__ y__ -> x__ {_Collateral'totalMargin = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Collateral "purchasingPower" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Collateral'purchasingPower + (\ x__ y__ -> x__ {_Collateral'purchasingPower = y__})) + Prelude.id +instance Data.ProtoLens.Message Collateral where + messageName _ = Data.Text.pack "traderouting_1.Collateral" + packedMessageDescriptor _ + = "\n\ + \\n\ + \Collateral\DC2\SUB\n\ + \\bcurrency\CAN\EOT \STX(\tR\bcurrency\DC2!\n\ + \\ftotal_margin\CAN\ENQ \STX(\SOHR\vtotalMargin\DC2)\n\ + \\DLEpurchasing_power\CAN\ACK \STX(\SOHR\SIpurchasingPower" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + currency__field_descriptor + = Data.ProtoLens.FieldDescriptor + "currency" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"currency")) :: + Data.ProtoLens.FieldDescriptor Collateral + totalMargin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "total_margin" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"totalMargin")) :: + Data.ProtoLens.FieldDescriptor Collateral + purchasingPower__field_descriptor + = Data.ProtoLens.FieldDescriptor + "purchasing_power" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"purchasingPower")) :: + Data.ProtoLens.FieldDescriptor Collateral + in + Data.Map.fromList + [(Data.ProtoLens.Tag 4, currency__field_descriptor), + (Data.ProtoLens.Tag 5, totalMargin__field_descriptor), + (Data.ProtoLens.Tag 6, purchasingPower__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Collateral'_unknownFields + (\ x__ y__ -> x__ {_Collateral'_unknownFields = y__}) + defMessage + = Collateral'_constructor + {_Collateral'currency = Data.ProtoLens.fieldDefault, + _Collateral'totalMargin = Data.ProtoLens.fieldDefault, + _Collateral'purchasingPower = Data.ProtoLens.fieldDefault, + _Collateral'_unknownFields = []} + parseMessage + = let + loop :: + Collateral + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser Collateral + loop + x + required'currency + required'purchasingPower + required'totalMargin + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'currency then (:) "currency" else Prelude.id) + ((if required'purchasingPower then + (:) "purchasing_power" + else + Prelude.id) + ((if required'totalMargin then (:) "total_margin" else Prelude.id) + [])) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "currency" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"currency") y x) + Prelude.False required'purchasingPower required'totalMargin + 41 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "total_margin" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"totalMargin") y x) + required'currency required'purchasingPower Prelude.False + 49 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "purchasing_power" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"purchasingPower") y x) + required'currency Prelude.False required'totalMargin + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'currency required'purchasingPower required'totalMargin + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True) + "Collateral" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"currency") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 41) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"totalMargin") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 49) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"purchasingPower") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData Collateral where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Collateral'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Collateral'currency x__) + (Control.DeepSeq.deepseq + (_Collateral'totalMargin x__) + (Control.DeepSeq.deepseq (_Collateral'purchasingPower x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clearedFields' @:: Lens' CommodityMarketLimits [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clearedFields' @:: Lens' CommodityMarketLimits (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.fungibleCommodityId' @:: Lens' CommodityMarketLimits Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteTradableCommodityId' @:: Lens' CommodityMarketLimits [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'obsoleteTradableCommodityId' @:: Lens' CommodityMarketLimits (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.positionAndTradeLimits' @:: Lens' CommodityMarketLimits PositionAndTradeLimits@ + * 'Proto.CMS.Traderouting1_Fields.maybe'positionAndTradeLimits' @:: Lens' CommodityMarketLimits (Prelude.Maybe PositionAndTradeLimits)@ + * 'Proto.CMS.Traderouting1_Fields.instrumentMarketLimits' @:: Lens' CommodityMarketLimits [InstrumentMarketLimits]@ + * 'Proto.CMS.Traderouting1_Fields.vec'instrumentMarketLimits' @:: Lens' CommodityMarketLimits (Data.Vector.Vector InstrumentMarketLimits)@ + * 'Proto.CMS.Traderouting1_Fields.allowedToTradeCommodities' @:: Lens' CommodityMarketLimits [EntityAllowedToTrade]@ + * 'Proto.CMS.Traderouting1_Fields.vec'allowedToTradeCommodities' @:: Lens' CommodityMarketLimits (Data.Vector.Vector EntityAllowedToTrade)@ + * 'Proto.CMS.Traderouting1_Fields.marginMultiplier' @:: Lens' CommodityMarketLimits LimitValueDouble@ + * 'Proto.CMS.Traderouting1_Fields.maybe'marginMultiplier' @:: Lens' CommodityMarketLimits (Prelude.Maybe LimitValueDouble)@ -} +data CommodityMarketLimits + = CommodityMarketLimits'_constructor {_CommodityMarketLimits'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _CommodityMarketLimits'fungibleCommodityId :: !Data.Int.Int32, + _CommodityMarketLimits'obsoleteTradableCommodityId :: !(Data.Vector.Vector Data.Text.Text), + _CommodityMarketLimits'positionAndTradeLimits :: !(Prelude.Maybe PositionAndTradeLimits), + _CommodityMarketLimits'instrumentMarketLimits :: !(Data.Vector.Vector InstrumentMarketLimits), + _CommodityMarketLimits'allowedToTradeCommodities :: !(Data.Vector.Vector EntityAllowedToTrade), + _CommodityMarketLimits'marginMultiplier :: !(Prelude.Maybe LimitValueDouble), + _CommodityMarketLimits'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CommodityMarketLimits where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'clearedFields + (\ x__ y__ -> x__ {_CommodityMarketLimits'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'clearedFields + (\ x__ y__ -> x__ {_CommodityMarketLimits'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "fungibleCommodityId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'fungibleCommodityId + (\ x__ y__ + -> x__ {_CommodityMarketLimits'fungibleCommodityId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "obsoleteTradableCommodityId" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'obsoleteTradableCommodityId + (\ x__ y__ + -> x__ {_CommodityMarketLimits'obsoleteTradableCommodityId = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "vec'obsoleteTradableCommodityId" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'obsoleteTradableCommodityId + (\ x__ y__ + -> x__ {_CommodityMarketLimits'obsoleteTradableCommodityId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "positionAndTradeLimits" PositionAndTradeLimits where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'positionAndTradeLimits + (\ x__ y__ + -> x__ {_CommodityMarketLimits'positionAndTradeLimits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "maybe'positionAndTradeLimits" (Prelude.Maybe PositionAndTradeLimits) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'positionAndTradeLimits + (\ x__ y__ + -> x__ {_CommodityMarketLimits'positionAndTradeLimits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "instrumentMarketLimits" [InstrumentMarketLimits] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'instrumentMarketLimits + (\ x__ y__ + -> x__ {_CommodityMarketLimits'instrumentMarketLimits = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "vec'instrumentMarketLimits" (Data.Vector.Vector InstrumentMarketLimits) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'instrumentMarketLimits + (\ x__ y__ + -> x__ {_CommodityMarketLimits'instrumentMarketLimits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "allowedToTradeCommodities" [EntityAllowedToTrade] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'allowedToTradeCommodities + (\ x__ y__ + -> x__ {_CommodityMarketLimits'allowedToTradeCommodities = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "vec'allowedToTradeCommodities" (Data.Vector.Vector EntityAllowedToTrade) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'allowedToTradeCommodities + (\ x__ y__ + -> x__ {_CommodityMarketLimits'allowedToTradeCommodities = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "marginMultiplier" LimitValueDouble where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'marginMultiplier + (\ x__ y__ -> x__ {_CommodityMarketLimits'marginMultiplier = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CommodityMarketLimits "maybe'marginMultiplier" (Prelude.Maybe LimitValueDouble) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CommodityMarketLimits'marginMultiplier + (\ x__ y__ -> x__ {_CommodityMarketLimits'marginMultiplier = y__})) + Prelude.id +instance Data.ProtoLens.Message CommodityMarketLimits where + messageName _ + = Data.Text.pack "traderouting_1.CommodityMarketLimits" + packedMessageDescriptor _ + = "\n\ + \\NAKCommodityMarketLimits\DC2%\n\ + \\SOcleared_fields\CAN\ACK \ETX(\rR\rclearedFields\DC22\n\ + \\NAKfungible_commodity_id\CAN\SOH \STX(\DC1R\DC3fungibleCommodityId\DC2G\n\ + \\RSobsolete_tradable_commodity_id\CAN\STX \ETX(\tR\ESCobsoleteTradableCommodityIdB\STX\CAN\SOH\DC2a\n\ + \\EMposition_and_trade_limits\CAN\ETX \SOH(\v2&.traderouting_1.PositionAndTradeLimitsR\SYNpositionAndTradeLimits\DC2`\n\ + \\CANinstrument_market_limits\CAN\EOT \ETX(\v2&.traderouting_1.InstrumentMarketLimitsR\SYNinstrumentMarketLimits\DC2e\n\ + \\FSallowed_to_trade_commodities\CAN\ENQ \ETX(\v2$.traderouting_1.EntityAllowedToTradeR\EMallowedToTradeCommodities\DC2M\n\ + \\DC1margin_multiplier\CAN\a \SOH(\v2 .traderouting_1.LimitValueDoubleR\DLEmarginMultiplier" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor CommodityMarketLimits + fungibleCommodityId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fungible_commodity_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"fungibleCommodityId")) :: + Data.ProtoLens.FieldDescriptor CommodityMarketLimits + obsoleteTradableCommodityId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_tradable_commodity_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"obsoleteTradableCommodityId")) :: + Data.ProtoLens.FieldDescriptor CommodityMarketLimits + positionAndTradeLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "position_and_trade_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor PositionAndTradeLimits) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'positionAndTradeLimits")) :: + Data.ProtoLens.FieldDescriptor CommodityMarketLimits + instrumentMarketLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "instrument_market_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor InstrumentMarketLimits) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"instrumentMarketLimits")) :: + Data.ProtoLens.FieldDescriptor CommodityMarketLimits + allowedToTradeCommodities__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allowed_to_trade_commodities" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EntityAllowedToTrade) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"allowedToTradeCommodities")) :: + Data.ProtoLens.FieldDescriptor CommodityMarketLimits + marginMultiplier__field_descriptor + = Data.ProtoLens.FieldDescriptor + "margin_multiplier" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDouble) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'marginMultiplier")) :: + Data.ProtoLens.FieldDescriptor CommodityMarketLimits + in + Data.Map.fromList + [(Data.ProtoLens.Tag 6, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, fungibleCommodityId__field_descriptor), + (Data.ProtoLens.Tag 2, + obsoleteTradableCommodityId__field_descriptor), + (Data.ProtoLens.Tag 3, positionAndTradeLimits__field_descriptor), + (Data.ProtoLens.Tag 4, instrumentMarketLimits__field_descriptor), + (Data.ProtoLens.Tag 5, + allowedToTradeCommodities__field_descriptor), + (Data.ProtoLens.Tag 7, marginMultiplier__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CommodityMarketLimits'_unknownFields + (\ x__ y__ -> x__ {_CommodityMarketLimits'_unknownFields = y__}) + defMessage + = CommodityMarketLimits'_constructor + {_CommodityMarketLimits'clearedFields = Data.Vector.Generic.empty, + _CommodityMarketLimits'fungibleCommodityId = Data.ProtoLens.fieldDefault, + _CommodityMarketLimits'obsoleteTradableCommodityId = Data.Vector.Generic.empty, + _CommodityMarketLimits'positionAndTradeLimits = Prelude.Nothing, + _CommodityMarketLimits'instrumentMarketLimits = Data.Vector.Generic.empty, + _CommodityMarketLimits'allowedToTradeCommodities = Data.Vector.Generic.empty, + _CommodityMarketLimits'marginMultiplier = Prelude.Nothing, + _CommodityMarketLimits'_unknownFields = []} + parseMessage + = let + loop :: + CommodityMarketLimits + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld EntityAllowedToTrade + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld InstrumentMarketLimits + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser CommodityMarketLimits + loop + x + required'fungibleCommodityId + mutable'allowedToTradeCommodities + mutable'clearedFields + mutable'instrumentMarketLimits + mutable'obsoleteTradableCommodityId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'allowedToTradeCommodities <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'allowedToTradeCommodities) + frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + frozen'instrumentMarketLimits <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'instrumentMarketLimits) + frozen'obsoleteTradableCommodityId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'obsoleteTradableCommodityId) + (let + missing + = (if required'fungibleCommodityId then + (:) "fungible_commodity_id" + else + Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'allowedToTradeCommodities") + frozen'allowedToTradeCommodities + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'instrumentMarketLimits") + frozen'instrumentMarketLimits + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"vec'obsoleteTradableCommodityId") + frozen'obsoleteTradableCommodityId x))))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 48 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop + x required'fungibleCommodityId mutable'allowedToTradeCommodities v + mutable'instrumentMarketLimits mutable'obsoleteTradableCommodityId + 50 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop + x required'fungibleCommodityId mutable'allowedToTradeCommodities y + mutable'instrumentMarketLimits mutable'obsoleteTradableCommodityId + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "fungible_commodity_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"fungibleCommodityId") y x) + Prelude.False mutable'allowedToTradeCommodities + mutable'clearedFields mutable'instrumentMarketLimits + mutable'obsoleteTradableCommodityId + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_tradable_commodity_id" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'obsoleteTradableCommodityId y) + loop + x required'fungibleCommodityId mutable'allowedToTradeCommodities + mutable'clearedFields mutable'instrumentMarketLimits v + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "position_and_trade_limits" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"positionAndTradeLimits") y x) + required'fungibleCommodityId mutable'allowedToTradeCommodities + mutable'clearedFields mutable'instrumentMarketLimits + mutable'obsoleteTradableCommodityId + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "instrument_market_limits" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'instrumentMarketLimits y) + loop + x required'fungibleCommodityId mutable'allowedToTradeCommodities + mutable'clearedFields v mutable'obsoleteTradableCommodityId + 42 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "allowed_to_trade_commodities" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'allowedToTradeCommodities y) + loop + x required'fungibleCommodityId v mutable'clearedFields + mutable'instrumentMarketLimits mutable'obsoleteTradableCommodityId + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "margin_multiplier" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"marginMultiplier") y x) + required'fungibleCommodityId mutable'allowedToTradeCommodities + mutable'clearedFields mutable'instrumentMarketLimits + mutable'obsoleteTradableCommodityId + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'fungibleCommodityId mutable'allowedToTradeCommodities + mutable'clearedFields mutable'instrumentMarketLimits + mutable'obsoleteTradableCommodityId + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'allowedToTradeCommodities <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'instrumentMarketLimits <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'obsoleteTradableCommodityId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True + mutable'allowedToTradeCommodities mutable'clearedFields + mutable'instrumentMarketLimits mutable'obsoleteTradableCommodityId) + "CommodityMarketLimits" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"fungibleCommodityId") _x))) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'obsoleteTradableCommodityId") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'positionAndTradeLimits") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'instrumentMarketLimits") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'allowedToTradeCommodities") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'marginMultiplier") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData CommodityMarketLimits where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CommodityMarketLimits'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CommodityMarketLimits'clearedFields x__) + (Control.DeepSeq.deepseq + (_CommodityMarketLimits'fungibleCommodityId x__) + (Control.DeepSeq.deepseq + (_CommodityMarketLimits'obsoleteTradableCommodityId x__) + (Control.DeepSeq.deepseq + (_CommodityMarketLimits'positionAndTradeLimits x__) + (Control.DeepSeq.deepseq + (_CommodityMarketLimits'instrumentMarketLimits x__) + (Control.DeepSeq.deepseq + (_CommodityMarketLimits'allowedToTradeCommodities x__) + (Control.DeepSeq.deepseq + (_CommodityMarketLimits'marginMultiplier x__) ()))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' CompoundOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' CompoundOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.nodeRole' @:: Lens' CompoundOrder Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'nodeRole' @:: Lens' CompoundOrder (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.type'' @:: Lens' CompoundOrder Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'type'' @:: Lens' CompoundOrder (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.clientGuid' @:: Lens' CompoundOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'clientGuid' @:: Lens' CompoundOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.triggerType' @:: Lens' CompoundOrder Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'triggerType' @:: Lens' CompoundOrder (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.orderChain' @:: Lens' CompoundOrder OrderChain@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderChain' @:: Lens' CompoundOrder (Prelude.Maybe OrderChain)@ + * 'Proto.CMS.Traderouting1_Fields.children' @:: Lens' CompoundOrder [CompoundOrder]@ + * 'Proto.CMS.Traderouting1_Fields.vec'children' @:: Lens' CompoundOrder (Data.Vector.Vector CompoundOrder)@ -} +data CompoundOrder + = CompoundOrder'_constructor {_CompoundOrder'id :: !(Prelude.Maybe Data.Text.Text), + _CompoundOrder'nodeRole :: !(Prelude.Maybe Data.Word.Word32), + _CompoundOrder'type' :: !(Prelude.Maybe Data.Word.Word32), + _CompoundOrder'clientGuid :: !(Prelude.Maybe Data.Text.Text), + _CompoundOrder'triggerType :: !(Prelude.Maybe Data.Word.Word32), + _CompoundOrder'orderChain :: !(Prelude.Maybe OrderChain), + _CompoundOrder'children :: !(Data.Vector.Vector CompoundOrder), + _CompoundOrder'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CompoundOrder where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CompoundOrder "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'id (\ x__ y__ -> x__ {_CompoundOrder'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CompoundOrder "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'id (\ x__ y__ -> x__ {_CompoundOrder'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CompoundOrder "nodeRole" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'nodeRole + (\ x__ y__ -> x__ {_CompoundOrder'nodeRole = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CompoundOrder "maybe'nodeRole" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'nodeRole + (\ x__ y__ -> x__ {_CompoundOrder'nodeRole = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CompoundOrder "type'" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'type' + (\ x__ y__ -> x__ {_CompoundOrder'type' = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CompoundOrder "maybe'type'" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'type' + (\ x__ y__ -> x__ {_CompoundOrder'type' = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CompoundOrder "clientGuid" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'clientGuid + (\ x__ y__ -> x__ {_CompoundOrder'clientGuid = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CompoundOrder "maybe'clientGuid" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'clientGuid + (\ x__ y__ -> x__ {_CompoundOrder'clientGuid = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CompoundOrder "triggerType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'triggerType + (\ x__ y__ -> x__ {_CompoundOrder'triggerType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CompoundOrder "maybe'triggerType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'triggerType + (\ x__ y__ -> x__ {_CompoundOrder'triggerType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CompoundOrder "orderChain" OrderChain where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'orderChain + (\ x__ y__ -> x__ {_CompoundOrder'orderChain = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CompoundOrder "maybe'orderChain" (Prelude.Maybe OrderChain) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'orderChain + (\ x__ y__ -> x__ {_CompoundOrder'orderChain = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CompoundOrder "children" [CompoundOrder] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'children + (\ x__ y__ -> x__ {_CompoundOrder'children = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField CompoundOrder "vec'children" (Data.Vector.Vector CompoundOrder) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrder'children + (\ x__ y__ -> x__ {_CompoundOrder'children = y__})) + Prelude.id +instance Data.ProtoLens.Message CompoundOrder where + messageName _ = Data.Text.pack "traderouting_1.CompoundOrder" + packedMessageDescriptor _ + = "\n\ + \\rCompoundOrder\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\ESC\n\ + \\tnode_role\CAN\STX \SOH(\rR\bnodeRole\DC2\DC2\n\ + \\EOTtype\CAN\ETX \SOH(\rR\EOTtype\DC2\US\n\ + \\vclient_guid\CAN\ENQ \SOH(\tR\n\ + \clientGuid\DC2!\n\ + \\ftrigger_type\CAN\ACK \SOH(\rR\vtriggerType\DC2;\n\ + \\vorder_chain\CAN\a \SOH(\v2\SUB.traderouting_1.OrderChainR\n\ + \orderChain\DC29\n\ + \\bchildren\CAN\b \ETX(\v2\GS.traderouting_1.CompoundOrderR\bchildren\"i\n\ + \\NAKCompoundOrderNodeRole\DC2\b\n\ + \\EOTROOT\DLE\SOH\DC2\SI\n\ + \\vOPO_PRIMARY\DLE\STX\DC2\DC1\n\ + \\rOPO_SECONDARY\DLE\ETX\DC2\f\n\ + \\bOCO_ROLE\DLE\EOT\DC2\DC4\n\ + \\DLEINDEPENDENT_ROLE\DLE\ENQ\"A\n\ + \\DC1CompoundOrderType\DC2\a\n\ + \\ETXOCO\DLE\SOH\DC2\a\n\ + \\ETXOPO\DLE\STX\DC2\t\n\ + \\ENQORDER\DLE\ETX\DC2\SI\n\ + \\vINDEPENDENT\DLE\EOT\"B\n\ + \\CANCompoundOrderTriggerType\DC2\v\n\ + \\aWorking\DLE\SOH\DC2\n\ + \\n\ + \\ACKFilled\DLE\STX\DC2\r\n\ + \\tCancelled\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor CompoundOrder + nodeRole__field_descriptor + = Data.ProtoLens.FieldDescriptor + "node_role" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'nodeRole")) :: + Data.ProtoLens.FieldDescriptor CompoundOrder + type'__field_descriptor + = Data.ProtoLens.FieldDescriptor + "type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'type'")) :: + Data.ProtoLens.FieldDescriptor CompoundOrder + clientGuid__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_guid" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'clientGuid")) :: + Data.ProtoLens.FieldDescriptor CompoundOrder + triggerType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trigger_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'triggerType")) :: + Data.ProtoLens.FieldDescriptor CompoundOrder + orderChain__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_chain" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderChain) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderChain")) :: + Data.ProtoLens.FieldDescriptor CompoundOrder + children__field_descriptor + = Data.ProtoLens.FieldDescriptor + "children" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CompoundOrder) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"children")) :: + Data.ProtoLens.FieldDescriptor CompoundOrder + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, nodeRole__field_descriptor), + (Data.ProtoLens.Tag 3, type'__field_descriptor), + (Data.ProtoLens.Tag 5, clientGuid__field_descriptor), + (Data.ProtoLens.Tag 6, triggerType__field_descriptor), + (Data.ProtoLens.Tag 7, orderChain__field_descriptor), + (Data.ProtoLens.Tag 8, children__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CompoundOrder'_unknownFields + (\ x__ y__ -> x__ {_CompoundOrder'_unknownFields = y__}) + defMessage + = CompoundOrder'_constructor + {_CompoundOrder'id = Prelude.Nothing, + _CompoundOrder'nodeRole = Prelude.Nothing, + _CompoundOrder'type' = Prelude.Nothing, + _CompoundOrder'clientGuid = Prelude.Nothing, + _CompoundOrder'triggerType = Prelude.Nothing, + _CompoundOrder'orderChain = Prelude.Nothing, + _CompoundOrder'children = Data.Vector.Generic.empty, + _CompoundOrder'_unknownFields = []} + parseMessage + = let + loop :: + CompoundOrder + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld CompoundOrder + -> Data.ProtoLens.Encoding.Bytes.Parser CompoundOrder + loop x mutable'children + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'children <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'children) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'children") frozen'children x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + mutable'children + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "node_role" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"nodeRole") y x) + mutable'children + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"type'") y x) + mutable'children + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_guid" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"clientGuid") y x) + mutable'children + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "trigger_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"triggerType") y x) + mutable'children + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "order_chain" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderChain") y x) + mutable'children + 66 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "children" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'children y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'children + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'children <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'children) + "CompoundOrder" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'nodeRole") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'type'") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'clientGuid") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'triggerType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderChain") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'children") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData CompoundOrder where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CompoundOrder'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CompoundOrder'id x__) + (Control.DeepSeq.deepseq + (_CompoundOrder'nodeRole x__) + (Control.DeepSeq.deepseq + (_CompoundOrder'type' x__) + (Control.DeepSeq.deepseq + (_CompoundOrder'clientGuid x__) + (Control.DeepSeq.deepseq + (_CompoundOrder'triggerType x__) + (Control.DeepSeq.deepseq + (_CompoundOrder'orderChain x__) + (Control.DeepSeq.deepseq (_CompoundOrder'children x__) ()))))))) +data CompoundOrder'CompoundOrderNodeRole + = CompoundOrder'ROOT | + CompoundOrder'OPO_PRIMARY | + CompoundOrder'OPO_SECONDARY | + CompoundOrder'OCO_ROLE | + CompoundOrder'INDEPENDENT_ROLE + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum CompoundOrder'CompoundOrderNodeRole where + maybeToEnum 1 = Prelude.Just CompoundOrder'ROOT + maybeToEnum 2 = Prelude.Just CompoundOrder'OPO_PRIMARY + maybeToEnum 3 = Prelude.Just CompoundOrder'OPO_SECONDARY + maybeToEnum 4 = Prelude.Just CompoundOrder'OCO_ROLE + maybeToEnum 5 = Prelude.Just CompoundOrder'INDEPENDENT_ROLE + maybeToEnum _ = Prelude.Nothing + showEnum CompoundOrder'ROOT = "ROOT" + showEnum CompoundOrder'OPO_PRIMARY = "OPO_PRIMARY" + showEnum CompoundOrder'OPO_SECONDARY = "OPO_SECONDARY" + showEnum CompoundOrder'OCO_ROLE = "OCO_ROLE" + showEnum CompoundOrder'INDEPENDENT_ROLE = "INDEPENDENT_ROLE" + readEnum k + | (Prelude.==) k "ROOT" = Prelude.Just CompoundOrder'ROOT + | (Prelude.==) k "OPO_PRIMARY" + = Prelude.Just CompoundOrder'OPO_PRIMARY + | (Prelude.==) k "OPO_SECONDARY" + = Prelude.Just CompoundOrder'OPO_SECONDARY + | (Prelude.==) k "OCO_ROLE" = Prelude.Just CompoundOrder'OCO_ROLE + | (Prelude.==) k "INDEPENDENT_ROLE" + = Prelude.Just CompoundOrder'INDEPENDENT_ROLE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded CompoundOrder'CompoundOrderNodeRole where + minBound = CompoundOrder'ROOT + maxBound = CompoundOrder'INDEPENDENT_ROLE +instance Prelude.Enum CompoundOrder'CompoundOrderNodeRole where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum CompoundOrderNodeRole: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum CompoundOrder'ROOT = 1 + fromEnum CompoundOrder'OPO_PRIMARY = 2 + fromEnum CompoundOrder'OPO_SECONDARY = 3 + fromEnum CompoundOrder'OCO_ROLE = 4 + fromEnum CompoundOrder'INDEPENDENT_ROLE = 5 + succ CompoundOrder'INDEPENDENT_ROLE + = Prelude.error + "CompoundOrder'CompoundOrderNodeRole.succ: bad argument CompoundOrder'INDEPENDENT_ROLE. This value would be out of bounds." + succ CompoundOrder'ROOT = CompoundOrder'OPO_PRIMARY + succ CompoundOrder'OPO_PRIMARY = CompoundOrder'OPO_SECONDARY + succ CompoundOrder'OPO_SECONDARY = CompoundOrder'OCO_ROLE + succ CompoundOrder'OCO_ROLE = CompoundOrder'INDEPENDENT_ROLE + pred CompoundOrder'ROOT + = Prelude.error + "CompoundOrder'CompoundOrderNodeRole.pred: bad argument CompoundOrder'ROOT. This value would be out of bounds." + pred CompoundOrder'OPO_PRIMARY = CompoundOrder'ROOT + pred CompoundOrder'OPO_SECONDARY = CompoundOrder'OPO_PRIMARY + pred CompoundOrder'OCO_ROLE = CompoundOrder'OPO_SECONDARY + pred CompoundOrder'INDEPENDENT_ROLE = CompoundOrder'OCO_ROLE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault CompoundOrder'CompoundOrderNodeRole where + fieldDefault = CompoundOrder'ROOT +instance Control.DeepSeq.NFData CompoundOrder'CompoundOrderNodeRole where + rnf x__ = Prelude.seq x__ () +data CompoundOrder'CompoundOrderTriggerType + = CompoundOrder'Working | + CompoundOrder'Filled | + CompoundOrder'Cancelled + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum CompoundOrder'CompoundOrderTriggerType where + maybeToEnum 1 = Prelude.Just CompoundOrder'Working + maybeToEnum 2 = Prelude.Just CompoundOrder'Filled + maybeToEnum 3 = Prelude.Just CompoundOrder'Cancelled + maybeToEnum _ = Prelude.Nothing + showEnum CompoundOrder'Working = "Working" + showEnum CompoundOrder'Filled = "Filled" + showEnum CompoundOrder'Cancelled = "Cancelled" + readEnum k + | (Prelude.==) k "Working" = Prelude.Just CompoundOrder'Working + | (Prelude.==) k "Filled" = Prelude.Just CompoundOrder'Filled + | (Prelude.==) k "Cancelled" = Prelude.Just CompoundOrder'Cancelled + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded CompoundOrder'CompoundOrderTriggerType where + minBound = CompoundOrder'Working + maxBound = CompoundOrder'Cancelled +instance Prelude.Enum CompoundOrder'CompoundOrderTriggerType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum CompoundOrderTriggerType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum CompoundOrder'Working = 1 + fromEnum CompoundOrder'Filled = 2 + fromEnum CompoundOrder'Cancelled = 3 + succ CompoundOrder'Cancelled + = Prelude.error + "CompoundOrder'CompoundOrderTriggerType.succ: bad argument CompoundOrder'Cancelled. This value would be out of bounds." + succ CompoundOrder'Working = CompoundOrder'Filled + succ CompoundOrder'Filled = CompoundOrder'Cancelled + pred CompoundOrder'Working + = Prelude.error + "CompoundOrder'CompoundOrderTriggerType.pred: bad argument CompoundOrder'Working. This value would be out of bounds." + pred CompoundOrder'Filled = CompoundOrder'Working + pred CompoundOrder'Cancelled = CompoundOrder'Filled + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault CompoundOrder'CompoundOrderTriggerType where + fieldDefault = CompoundOrder'Working +instance Control.DeepSeq.NFData CompoundOrder'CompoundOrderTriggerType where + rnf x__ = Prelude.seq x__ () +data CompoundOrder'CompoundOrderType + = CompoundOrder'OCO | + CompoundOrder'OPO | + CompoundOrder'ORDER | + CompoundOrder'INDEPENDENT + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum CompoundOrder'CompoundOrderType where + maybeToEnum 1 = Prelude.Just CompoundOrder'OCO + maybeToEnum 2 = Prelude.Just CompoundOrder'OPO + maybeToEnum 3 = Prelude.Just CompoundOrder'ORDER + maybeToEnum 4 = Prelude.Just CompoundOrder'INDEPENDENT + maybeToEnum _ = Prelude.Nothing + showEnum CompoundOrder'OCO = "OCO" + showEnum CompoundOrder'OPO = "OPO" + showEnum CompoundOrder'ORDER = "ORDER" + showEnum CompoundOrder'INDEPENDENT = "INDEPENDENT" + readEnum k + | (Prelude.==) k "OCO" = Prelude.Just CompoundOrder'OCO + | (Prelude.==) k "OPO" = Prelude.Just CompoundOrder'OPO + | (Prelude.==) k "ORDER" = Prelude.Just CompoundOrder'ORDER + | (Prelude.==) k "INDEPENDENT" + = Prelude.Just CompoundOrder'INDEPENDENT + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded CompoundOrder'CompoundOrderType where + minBound = CompoundOrder'OCO + maxBound = CompoundOrder'INDEPENDENT +instance Prelude.Enum CompoundOrder'CompoundOrderType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum CompoundOrderType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum CompoundOrder'OCO = 1 + fromEnum CompoundOrder'OPO = 2 + fromEnum CompoundOrder'ORDER = 3 + fromEnum CompoundOrder'INDEPENDENT = 4 + succ CompoundOrder'INDEPENDENT + = Prelude.error + "CompoundOrder'CompoundOrderType.succ: bad argument CompoundOrder'INDEPENDENT. This value would be out of bounds." + succ CompoundOrder'OCO = CompoundOrder'OPO + succ CompoundOrder'OPO = CompoundOrder'ORDER + succ CompoundOrder'ORDER = CompoundOrder'INDEPENDENT + pred CompoundOrder'OCO + = Prelude.error + "CompoundOrder'CompoundOrderType.pred: bad argument CompoundOrder'OCO. This value would be out of bounds." + pred CompoundOrder'OPO = CompoundOrder'OCO + pred CompoundOrder'ORDER = CompoundOrder'OPO + pred CompoundOrder'INDEPENDENT = CompoundOrder'ORDER + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault CompoundOrder'CompoundOrderType where + fieldDefault = CompoundOrder'OCO +instance Control.DeepSeq.NFData CompoundOrder'CompoundOrderType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.compoundTreeId' @:: Lens' CompoundOrderTreeRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'compoundTreeId' @:: Lens' CompoundOrderTreeRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' CompoundOrderTreeRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' CompoundOrderTreeRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.orderRequestsTop' @:: Lens' CompoundOrderTreeRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderRequestsTop' @:: Lens' CompoundOrderTreeRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.top' @:: Lens' CompoundOrderTreeRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'top' @:: Lens' CompoundOrderTreeRequest (Prelude.Maybe Data.Word.Word32)@ -} +data CompoundOrderTreeRequest + = CompoundOrderTreeRequest'_constructor {_CompoundOrderTreeRequest'compoundTreeId :: !(Prelude.Maybe Data.Text.Text), + _CompoundOrderTreeRequest'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _CompoundOrderTreeRequest'orderRequestsTop :: !(Prelude.Maybe Data.Word.Word32), + _CompoundOrderTreeRequest'top :: !(Prelude.Maybe Data.Word.Word32), + _CompoundOrderTreeRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CompoundOrderTreeRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CompoundOrderTreeRequest "compoundTreeId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeRequest'compoundTreeId + (\ x__ y__ + -> x__ {_CompoundOrderTreeRequest'compoundTreeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CompoundOrderTreeRequest "maybe'compoundTreeId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeRequest'compoundTreeId + (\ x__ y__ + -> x__ {_CompoundOrderTreeRequest'compoundTreeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CompoundOrderTreeRequest "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeRequest'tradeLocationId + (\ x__ y__ + -> x__ {_CompoundOrderTreeRequest'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CompoundOrderTreeRequest "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeRequest'tradeLocationId + (\ x__ y__ + -> x__ {_CompoundOrderTreeRequest'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CompoundOrderTreeRequest "orderRequestsTop" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeRequest'orderRequestsTop + (\ x__ y__ + -> x__ {_CompoundOrderTreeRequest'orderRequestsTop = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CompoundOrderTreeRequest "maybe'orderRequestsTop" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeRequest'orderRequestsTop + (\ x__ y__ + -> x__ {_CompoundOrderTreeRequest'orderRequestsTop = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CompoundOrderTreeRequest "top" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeRequest'top + (\ x__ y__ -> x__ {_CompoundOrderTreeRequest'top = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CompoundOrderTreeRequest "maybe'top" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeRequest'top + (\ x__ y__ -> x__ {_CompoundOrderTreeRequest'top = y__})) + Prelude.id +instance Data.ProtoLens.Message CompoundOrderTreeRequest where + messageName _ + = Data.Text.pack "traderouting_1.CompoundOrderTreeRequest" + packedMessageDescriptor _ + = "\n\ + \\CANCompoundOrderTreeRequest\DC2(\n\ + \\DLEcompound_tree_id\CAN\SOH \SOH(\tR\SOcompoundTreeId\DC2*\n\ + \\DC1trade_location_id\CAN\STX \SOH(\tR\SItradeLocationId\DC2,\n\ + \\DC2order_requests_top\CAN\ETX \SOH(\rR\DLEorderRequestsTop\DC2\DLE\n\ + \\ETXtop\CAN\EOT \SOH(\rR\ETXtop" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + compoundTreeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "compound_tree_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'compoundTreeId")) :: + Data.ProtoLens.FieldDescriptor CompoundOrderTreeRequest + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor CompoundOrderTreeRequest + orderRequestsTop__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_requests_top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderRequestsTop")) :: + Data.ProtoLens.FieldDescriptor CompoundOrderTreeRequest + top__field_descriptor + = Data.ProtoLens.FieldDescriptor + "top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'top")) :: + Data.ProtoLens.FieldDescriptor CompoundOrderTreeRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, compoundTreeId__field_descriptor), + (Data.ProtoLens.Tag 2, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 3, orderRequestsTop__field_descriptor), + (Data.ProtoLens.Tag 4, top__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CompoundOrderTreeRequest'_unknownFields + (\ x__ y__ -> x__ {_CompoundOrderTreeRequest'_unknownFields = y__}) + defMessage + = CompoundOrderTreeRequest'_constructor + {_CompoundOrderTreeRequest'compoundTreeId = Prelude.Nothing, + _CompoundOrderTreeRequest'tradeLocationId = Prelude.Nothing, + _CompoundOrderTreeRequest'orderRequestsTop = Prelude.Nothing, + _CompoundOrderTreeRequest'top = Prelude.Nothing, + _CompoundOrderTreeRequest'_unknownFields = []} + parseMessage + = let + loop :: + CompoundOrderTreeRequest + -> Data.ProtoLens.Encoding.Bytes.Parser CompoundOrderTreeRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "compound_tree_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"compoundTreeId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "order_requests_top" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderRequestsTop") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "top" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"top") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CompoundOrderTreeRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'compoundTreeId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderRequestsTop") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'top") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData CompoundOrderTreeRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CompoundOrderTreeRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CompoundOrderTreeRequest'compoundTreeId x__) + (Control.DeepSeq.deepseq + (_CompoundOrderTreeRequest'tradeLocationId x__) + (Control.DeepSeq.deepseq + (_CompoundOrderTreeRequest'orderRequestsTop x__) + (Control.DeepSeq.deepseq (_CompoundOrderTreeRequest'top x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.compoundOrder' @:: Lens' CompoundOrderTreeResult CompoundOrder@ + * 'Proto.CMS.Traderouting1_Fields.maybe'compoundOrder' @:: Lens' CompoundOrderTreeResult (Prelude.Maybe CompoundOrder)@ + * 'Proto.CMS.Traderouting1_Fields.isComplete' @:: Lens' CompoundOrderTreeResult Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isComplete' @:: Lens' CompoundOrderTreeResult (Prelude.Maybe Prelude.Bool)@ -} +data CompoundOrderTreeResult + = CompoundOrderTreeResult'_constructor {_CompoundOrderTreeResult'compoundOrder :: !(Prelude.Maybe CompoundOrder), + _CompoundOrderTreeResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _CompoundOrderTreeResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CompoundOrderTreeResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CompoundOrderTreeResult "compoundOrder" CompoundOrder where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeResult'compoundOrder + (\ x__ y__ -> x__ {_CompoundOrderTreeResult'compoundOrder = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CompoundOrderTreeResult "maybe'compoundOrder" (Prelude.Maybe CompoundOrder) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeResult'compoundOrder + (\ x__ y__ -> x__ {_CompoundOrderTreeResult'compoundOrder = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CompoundOrderTreeResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeResult'isComplete + (\ x__ y__ -> x__ {_CompoundOrderTreeResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField CompoundOrderTreeResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CompoundOrderTreeResult'isComplete + (\ x__ y__ -> x__ {_CompoundOrderTreeResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Message CompoundOrderTreeResult where + messageName _ + = Data.Text.pack "traderouting_1.CompoundOrderTreeResult" + packedMessageDescriptor _ + = "\n\ + \\ETBCompoundOrderTreeResult\DC2D\n\ + \\SOcompound_order\CAN\SOH \SOH(\v2\GS.traderouting_1.CompoundOrderR\rcompoundOrder\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + compoundOrder__field_descriptor + = Data.ProtoLens.FieldDescriptor + "compound_order" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CompoundOrder) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'compoundOrder")) :: + Data.ProtoLens.FieldDescriptor CompoundOrderTreeResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor CompoundOrderTreeResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, compoundOrder__field_descriptor), + (Data.ProtoLens.Tag 2, isComplete__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CompoundOrderTreeResult'_unknownFields + (\ x__ y__ -> x__ {_CompoundOrderTreeResult'_unknownFields = y__}) + defMessage + = CompoundOrderTreeResult'_constructor + {_CompoundOrderTreeResult'compoundOrder = Prelude.Nothing, + _CompoundOrderTreeResult'isComplete = Prelude.Nothing, + _CompoundOrderTreeResult'_unknownFields = []} + parseMessage + = let + loop :: + CompoundOrderTreeResult + -> Data.ProtoLens.Encoding.Bytes.Parser CompoundOrderTreeResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "compound_order" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"compoundOrder") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CompoundOrderTreeResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'compoundOrder") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData CompoundOrderTreeResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CompoundOrderTreeResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CompoundOrderTreeResult'compoundOrder x__) + (Control.DeepSeq.deepseq + (_CompoundOrderTreeResult'isComplete x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.chainOrderId' @:: Lens' ConfirmOrderSentToExchange Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'chainOrderId' @:: Lens' ConfirmOrderSentToExchange (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' ConfirmOrderSentToExchange Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' ConfirmOrderSentToExchange (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' ConfirmOrderSentToExchange Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' ConfirmOrderSentToExchange (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.newRouteOrderId' @:: Lens' ConfirmOrderSentToExchange Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'newRouteOrderId' @:: Lens' ConfirmOrderSentToExchange (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.sync' @:: Lens' ConfirmOrderSentToExchange Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'sync' @:: Lens' ConfirmOrderSentToExchange (Prelude.Maybe Prelude.Bool)@ -} +data ConfirmOrderSentToExchange + = ConfirmOrderSentToExchange'_constructor {_ConfirmOrderSentToExchange'chainOrderId :: !(Prelude.Maybe Data.Text.Text), + _ConfirmOrderSentToExchange'accountId :: !(Prelude.Maybe Data.Text.Text), + _ConfirmOrderSentToExchange'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _ConfirmOrderSentToExchange'newRouteOrderId :: !(Prelude.Maybe Data.Text.Text), + _ConfirmOrderSentToExchange'sync :: !(Prelude.Maybe Prelude.Bool), + _ConfirmOrderSentToExchange'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ConfirmOrderSentToExchange where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ConfirmOrderSentToExchange "chainOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConfirmOrderSentToExchange'chainOrderId + (\ x__ y__ + -> x__ {_ConfirmOrderSentToExchange'chainOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ConfirmOrderSentToExchange "maybe'chainOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConfirmOrderSentToExchange'chainOrderId + (\ x__ y__ + -> x__ {_ConfirmOrderSentToExchange'chainOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ConfirmOrderSentToExchange "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConfirmOrderSentToExchange'accountId + (\ x__ y__ -> x__ {_ConfirmOrderSentToExchange'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ConfirmOrderSentToExchange "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConfirmOrderSentToExchange'accountId + (\ x__ y__ -> x__ {_ConfirmOrderSentToExchange'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ConfirmOrderSentToExchange "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConfirmOrderSentToExchange'tradeLocationId + (\ x__ y__ + -> x__ {_ConfirmOrderSentToExchange'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ConfirmOrderSentToExchange "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConfirmOrderSentToExchange'tradeLocationId + (\ x__ y__ + -> x__ {_ConfirmOrderSentToExchange'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ConfirmOrderSentToExchange "newRouteOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConfirmOrderSentToExchange'newRouteOrderId + (\ x__ y__ + -> x__ {_ConfirmOrderSentToExchange'newRouteOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ConfirmOrderSentToExchange "maybe'newRouteOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConfirmOrderSentToExchange'newRouteOrderId + (\ x__ y__ + -> x__ {_ConfirmOrderSentToExchange'newRouteOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ConfirmOrderSentToExchange "sync" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConfirmOrderSentToExchange'sync + (\ x__ y__ -> x__ {_ConfirmOrderSentToExchange'sync = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField ConfirmOrderSentToExchange "maybe'sync" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ConfirmOrderSentToExchange'sync + (\ x__ y__ -> x__ {_ConfirmOrderSentToExchange'sync = y__})) + Prelude.id +instance Data.ProtoLens.Message ConfirmOrderSentToExchange where + messageName _ + = Data.Text.pack "traderouting_1.ConfirmOrderSentToExchange" + packedMessageDescriptor _ + = "\n\ + \\SUBConfirmOrderSentToExchange\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\tR\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2+\n\ + \\DC2new_route_order_id\CAN\EOT \SOH(\tR\SInewRouteOrderId\DC2\EM\n\ + \\EOTsync\CAN\ENQ \SOH(\b:\ENQfalseR\EOTsync" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + chainOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "chain_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'chainOrderId")) :: + Data.ProtoLens.FieldDescriptor ConfirmOrderSentToExchange + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor ConfirmOrderSentToExchange + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor ConfirmOrderSentToExchange + newRouteOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_route_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'newRouteOrderId")) :: + Data.ProtoLens.FieldDescriptor ConfirmOrderSentToExchange + sync__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sync" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sync")) :: + Data.ProtoLens.FieldDescriptor ConfirmOrderSentToExchange + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, chainOrderId__field_descriptor), + (Data.ProtoLens.Tag 2, accountId__field_descriptor), + (Data.ProtoLens.Tag 3, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 4, newRouteOrderId__field_descriptor), + (Data.ProtoLens.Tag 5, sync__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ConfirmOrderSentToExchange'_unknownFields + (\ x__ y__ + -> x__ {_ConfirmOrderSentToExchange'_unknownFields = y__}) + defMessage + = ConfirmOrderSentToExchange'_constructor + {_ConfirmOrderSentToExchange'chainOrderId = Prelude.Nothing, + _ConfirmOrderSentToExchange'accountId = Prelude.Nothing, + _ConfirmOrderSentToExchange'tradeLocationId = Prelude.Nothing, + _ConfirmOrderSentToExchange'newRouteOrderId = Prelude.Nothing, + _ConfirmOrderSentToExchange'sync = Prelude.Nothing, + _ConfirmOrderSentToExchange'_unknownFields = []} + parseMessage + = let + loop :: + ConfirmOrderSentToExchange + -> Data.ProtoLens.Encoding.Bytes.Parser ConfirmOrderSentToExchange + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "chain_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"chainOrderId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "new_route_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newRouteOrderId") y x) + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "sync" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"sync") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ConfirmOrderSentToExchange" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'chainOrderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'newRouteOrderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'sync") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData ConfirmOrderSentToExchange where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ConfirmOrderSentToExchange'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ConfirmOrderSentToExchange'chainOrderId x__) + (Control.DeepSeq.deepseq + (_ConfirmOrderSentToExchange'accountId x__) + (Control.DeepSeq.deepseq + (_ConfirmOrderSentToExchange'tradeLocationId x__) + (Control.DeepSeq.deepseq + (_ConfirmOrderSentToExchange'newRouteOrderId x__) + (Control.DeepSeq.deepseq + (_ConfirmOrderSentToExchange'sync x__) ()))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.symbol' @:: Lens' ContractPosition Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.isShortOpenPosition' @:: Lens' ContractPosition Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.openPosition' @:: Lens' ContractPosition [OpenPosition]@ + * 'Proto.CMS.Traderouting1_Fields.vec'openPosition' @:: Lens' ContractPosition (Data.Vector.Vector OpenPosition)@ + * 'Proto.CMS.Traderouting1_Fields.contractId' @:: Lens' ContractPosition Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'contractId' @:: Lens' ContractPosition (Prelude.Maybe Data.Text.Text)@ -} +data ContractPosition + = ContractPosition'_constructor {_ContractPosition'symbol :: !Data.Text.Text, + _ContractPosition'isShortOpenPosition :: !Prelude.Bool, + _ContractPosition'openPosition :: !(Data.Vector.Vector OpenPosition), + _ContractPosition'contractId :: !(Prelude.Maybe Data.Text.Text), + _ContractPosition'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ContractPosition where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ContractPosition "symbol" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractPosition'symbol + (\ x__ y__ -> x__ {_ContractPosition'symbol = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractPosition "isShortOpenPosition" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractPosition'isShortOpenPosition + (\ x__ y__ -> x__ {_ContractPosition'isShortOpenPosition = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractPosition "openPosition" [OpenPosition] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractPosition'openPosition + (\ x__ y__ -> x__ {_ContractPosition'openPosition = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ContractPosition "vec'openPosition" (Data.Vector.Vector OpenPosition) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractPosition'openPosition + (\ x__ y__ -> x__ {_ContractPosition'openPosition = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ContractPosition "contractId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractPosition'contractId + (\ x__ y__ -> x__ {_ContractPosition'contractId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ContractPosition "maybe'contractId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ContractPosition'contractId + (\ x__ y__ -> x__ {_ContractPosition'contractId = y__})) + Prelude.id +instance Data.ProtoLens.Message ContractPosition where + messageName _ = Data.Text.pack "traderouting_1.ContractPosition" + packedMessageDescriptor _ + = "\n\ + \\DLEContractPosition\DC2\SYN\n\ + \\ACKsymbol\CAN\SOH \STX(\tR\ACKsymbol\DC23\n\ + \\SYNis_short_open_position\CAN\STX \STX(\bR\DC3isShortOpenPosition\DC2A\n\ + \\ropen_position\CAN\ETX \ETX(\v2\FS.traderouting_1.OpenPositionR\fopenPosition\DC2\US\n\ + \\vcontract_id\CAN\EOT \SOH(\tR\n\ + \contractId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + symbol__field_descriptor + = Data.ProtoLens.FieldDescriptor + "symbol" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"symbol")) :: + Data.ProtoLens.FieldDescriptor ContractPosition + isShortOpenPosition__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_short_open_position" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"isShortOpenPosition")) :: + Data.ProtoLens.FieldDescriptor ContractPosition + openPosition__field_descriptor + = Data.ProtoLens.FieldDescriptor + "open_position" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OpenPosition) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"openPosition")) :: + Data.ProtoLens.FieldDescriptor ContractPosition + contractId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractId")) :: + Data.ProtoLens.FieldDescriptor ContractPosition + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, symbol__field_descriptor), + (Data.ProtoLens.Tag 2, isShortOpenPosition__field_descriptor), + (Data.ProtoLens.Tag 3, openPosition__field_descriptor), + (Data.ProtoLens.Tag 4, contractId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ContractPosition'_unknownFields + (\ x__ y__ -> x__ {_ContractPosition'_unknownFields = y__}) + defMessage + = ContractPosition'_constructor + {_ContractPosition'symbol = Data.ProtoLens.fieldDefault, + _ContractPosition'isShortOpenPosition = Data.ProtoLens.fieldDefault, + _ContractPosition'openPosition = Data.Vector.Generic.empty, + _ContractPosition'contractId = Prelude.Nothing, + _ContractPosition'_unknownFields = []} + parseMessage + = let + loop :: + ContractPosition + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld OpenPosition + -> Data.ProtoLens.Encoding.Bytes.Parser ContractPosition + loop + x + required'isShortOpenPosition + required'symbol + mutable'openPosition + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'openPosition <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'openPosition) + (let + missing + = (if required'isShortOpenPosition then + (:) "is_short_open_position" + else + Prelude.id) + ((if required'symbol then (:) "symbol" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'openPosition") + frozen'openPosition x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "symbol" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"symbol") y x) + required'isShortOpenPosition Prelude.False mutable'openPosition + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_short_open_position" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"isShortOpenPosition") y x) + Prelude.False required'symbol mutable'openPosition + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "open_position" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'openPosition y) + loop x required'isShortOpenPosition required'symbol v + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"contractId") y x) + required'isShortOpenPosition required'symbol mutable'openPosition + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'isShortOpenPosition required'symbol mutable'openPosition + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'openPosition <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True Prelude.True + mutable'openPosition) + "ContractPosition" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"symbol") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"isShortOpenPosition") _x))) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'openPosition") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'contractId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData ContractPosition where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ContractPosition'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ContractPosition'symbol x__) + (Control.DeepSeq.deepseq + (_ContractPosition'isShortOpenPosition x__) + (Control.DeepSeq.deepseq + (_ContractPosition'openPosition x__) + (Control.DeepSeq.deepseq (_ContractPosition'contractId x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' CorrectFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' CorrectFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.fillType' @:: Lens' CorrectFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillType' @:: Lens' CorrectFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' CorrectFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' CorrectFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' CorrectFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' CorrectFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.quantity' @:: Lens' CorrectFill Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'quantity' @:: Lens' CorrectFill (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.displayPrice' @:: Lens' CorrectFill Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayPrice' @:: Lens' CorrectFill (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.sync' @:: Lens' CorrectFill Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'sync' @:: Lens' CorrectFill (Prelude.Maybe Prelude.Bool)@ -} +data CorrectFill + = CorrectFill'_constructor {_CorrectFill'id :: !(Prelude.Maybe Data.Text.Text), + _CorrectFill'fillType :: !(Prelude.Maybe Data.Word.Word32), + _CorrectFill'accountId :: !(Prelude.Maybe Data.Text.Text), + _CorrectFill'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _CorrectFill'quantity :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _CorrectFill'displayPrice :: !(Prelude.Maybe Data.Int.Int64), + _CorrectFill'sync :: !(Prelude.Maybe Prelude.Bool), + _CorrectFill'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CorrectFill where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CorrectFill "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'id (\ x__ y__ -> x__ {_CorrectFill'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CorrectFill "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'id (\ x__ y__ -> x__ {_CorrectFill'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CorrectFill "fillType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'fillType + (\ x__ y__ -> x__ {_CorrectFill'fillType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CorrectFill "maybe'fillType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'fillType + (\ x__ y__ -> x__ {_CorrectFill'fillType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CorrectFill "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'accountId + (\ x__ y__ -> x__ {_CorrectFill'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CorrectFill "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'accountId + (\ x__ y__ -> x__ {_CorrectFill'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CorrectFill "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'tradeLocationId + (\ x__ y__ -> x__ {_CorrectFill'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CorrectFill "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'tradeLocationId + (\ x__ y__ -> x__ {_CorrectFill'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CorrectFill "quantity" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'quantity + (\ x__ y__ -> x__ {_CorrectFill'quantity = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CorrectFill "maybe'quantity" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'quantity + (\ x__ y__ -> x__ {_CorrectFill'quantity = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CorrectFill "displayPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'displayPrice + (\ x__ y__ -> x__ {_CorrectFill'displayPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CorrectFill "maybe'displayPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'displayPrice + (\ x__ y__ -> x__ {_CorrectFill'displayPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CorrectFill "sync" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'sync (\ x__ y__ -> x__ {_CorrectFill'sync = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField CorrectFill "maybe'sync" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CorrectFill'sync (\ x__ y__ -> x__ {_CorrectFill'sync = y__})) + Prelude.id +instance Data.ProtoLens.Message CorrectFill where + messageName _ = Data.Text.pack "traderouting_1.CorrectFill" + packedMessageDescriptor _ + = "\n\ + \\vCorrectFill\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\ESC\n\ + \\tfill_type\CAN\STX \SOH(\rR\bfillType\DC2\GS\n\ + \\n\ + \account_id\CAN\ETX \SOH(\tR\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\EOT \SOH(\tR\SItradeLocationId\DC2(\n\ + \\bquantity\CAN\ENQ \SOH(\v2\f.cqg.DecimalR\bquantity\DC2#\n\ + \\rdisplay_price\CAN\ACK \SOH(\DC2R\fdisplayPrice\DC2\EM\n\ + \\EOTsync\CAN\a \SOH(\b:\ENQfalseR\EOTsync\"<\n\ + \\bFillType\DC2\CAN\n\ + \\DC4FILL_TYPE_ORDER_FILL\DLE\SOH\DC2\SYN\n\ + \\DC2FILL_TYPE_LEG_FILL\DLE\STX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor CorrectFill + fillType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillType")) :: + Data.ProtoLens.FieldDescriptor CorrectFill + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor CorrectFill + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor CorrectFill + quantity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "quantity" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'quantity")) :: + Data.ProtoLens.FieldDescriptor CorrectFill + displayPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayPrice")) :: + Data.ProtoLens.FieldDescriptor CorrectFill + sync__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sync" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sync")) :: + Data.ProtoLens.FieldDescriptor CorrectFill + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, fillType__field_descriptor), + (Data.ProtoLens.Tag 3, accountId__field_descriptor), + (Data.ProtoLens.Tag 4, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 5, quantity__field_descriptor), + (Data.ProtoLens.Tag 6, displayPrice__field_descriptor), + (Data.ProtoLens.Tag 7, sync__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CorrectFill'_unknownFields + (\ x__ y__ -> x__ {_CorrectFill'_unknownFields = y__}) + defMessage + = CorrectFill'_constructor + {_CorrectFill'id = Prelude.Nothing, + _CorrectFill'fillType = Prelude.Nothing, + _CorrectFill'accountId = Prelude.Nothing, + _CorrectFill'tradeLocationId = Prelude.Nothing, + _CorrectFill'quantity = Prelude.Nothing, + _CorrectFill'displayPrice = Prelude.Nothing, + _CorrectFill'sync = Prelude.Nothing, + _CorrectFill'_unknownFields = []} + parseMessage + = let + loop :: + CorrectFill -> Data.ProtoLens.Encoding.Bytes.Parser CorrectFill + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "fill_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fillType") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "quantity" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"quantity") y x) + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayPrice") y x) + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "sync" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"sync") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CorrectFill" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'fillType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'quantity") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'displayPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'sync") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData CorrectFill where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CorrectFill'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CorrectFill'id x__) + (Control.DeepSeq.deepseq + (_CorrectFill'fillType x__) + (Control.DeepSeq.deepseq + (_CorrectFill'accountId x__) + (Control.DeepSeq.deepseq + (_CorrectFill'tradeLocationId x__) + (Control.DeepSeq.deepseq + (_CorrectFill'quantity x__) + (Control.DeepSeq.deepseq + (_CorrectFill'displayPrice x__) + (Control.DeepSeq.deepseq (_CorrectFill'sync x__) ()))))))) +data CorrectFill'FillType + = CorrectFill'FILL_TYPE_ORDER_FILL | CorrectFill'FILL_TYPE_LEG_FILL + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum CorrectFill'FillType where + maybeToEnum 1 = Prelude.Just CorrectFill'FILL_TYPE_ORDER_FILL + maybeToEnum 2 = Prelude.Just CorrectFill'FILL_TYPE_LEG_FILL + maybeToEnum _ = Prelude.Nothing + showEnum CorrectFill'FILL_TYPE_ORDER_FILL = "FILL_TYPE_ORDER_FILL" + showEnum CorrectFill'FILL_TYPE_LEG_FILL = "FILL_TYPE_LEG_FILL" + readEnum k + | (Prelude.==) k "FILL_TYPE_ORDER_FILL" + = Prelude.Just CorrectFill'FILL_TYPE_ORDER_FILL + | (Prelude.==) k "FILL_TYPE_LEG_FILL" + = Prelude.Just CorrectFill'FILL_TYPE_LEG_FILL + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded CorrectFill'FillType where + minBound = CorrectFill'FILL_TYPE_ORDER_FILL + maxBound = CorrectFill'FILL_TYPE_LEG_FILL +instance Prelude.Enum CorrectFill'FillType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum FillType: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum CorrectFill'FILL_TYPE_ORDER_FILL = 1 + fromEnum CorrectFill'FILL_TYPE_LEG_FILL = 2 + succ CorrectFill'FILL_TYPE_LEG_FILL + = Prelude.error + "CorrectFill'FillType.succ: bad argument CorrectFill'FILL_TYPE_LEG_FILL. This value would be out of bounds." + succ CorrectFill'FILL_TYPE_ORDER_FILL + = CorrectFill'FILL_TYPE_LEG_FILL + pred CorrectFill'FILL_TYPE_ORDER_FILL + = Prelude.error + "CorrectFill'FillType.pred: bad argument CorrectFill'FILL_TYPE_ORDER_FILL. This value would be out of bounds." + pred CorrectFill'FILL_TYPE_LEG_FILL + = CorrectFill'FILL_TYPE_ORDER_FILL + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault CorrectFill'FillType where + fieldDefault = CorrectFill'FILL_TYPE_ORDER_FILL +instance Control.DeepSeq.NFData CorrectFill'FillType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.account' @:: Lens' CreateAccount Account@ + * 'Proto.CMS.Traderouting1_Fields.maybe'account' @:: Lens' CreateAccount (Prelude.Maybe Account)@ -} +data CreateAccount + = CreateAccount'_constructor {_CreateAccount'account :: !(Prelude.Maybe Account), + _CreateAccount'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateAccount where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateAccount "account" Account where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccount'account + (\ x__ y__ -> x__ {_CreateAccount'account = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CreateAccount "maybe'account" (Prelude.Maybe Account) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccount'account + (\ x__ y__ -> x__ {_CreateAccount'account = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateAccount where + messageName _ = Data.Text.pack "traderouting_1.CreateAccount" + packedMessageDescriptor _ + = "\n\ + \\rCreateAccount\DC21\n\ + \\aaccount\CAN\SOH \SOH(\v2\ETB.traderouting_1.AccountR\aaccount" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + account__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Account) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'account")) :: + Data.ProtoLens.FieldDescriptor CreateAccount + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, account__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateAccount'_unknownFields + (\ x__ y__ -> x__ {_CreateAccount'_unknownFields = y__}) + defMessage + = CreateAccount'_constructor + {_CreateAccount'account = Prelude.Nothing, + _CreateAccount'_unknownFields = []} + parseMessage + = let + loop :: + CreateAccount -> Data.ProtoLens.Encoding.Bytes.Parser CreateAccount + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"account") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateAccount" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'account") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData CreateAccount where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateAccount'_unknownFields x__) + (Control.DeepSeq.deepseq (_CreateAccount'account x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.obsoleteAccountCluster' @:: Lens' CreateAccountCluster AccountCluster@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteAccountCluster' @:: Lens' CreateAccountCluster (Prelude.Maybe AccountCluster)@ -} +data CreateAccountCluster + = CreateAccountCluster'_constructor {_CreateAccountCluster'obsoleteAccountCluster :: !(Prelude.Maybe AccountCluster), + _CreateAccountCluster'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateAccountCluster where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateAccountCluster "obsoleteAccountCluster" AccountCluster where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccountCluster'obsoleteAccountCluster + (\ x__ y__ + -> x__ {_CreateAccountCluster'obsoleteAccountCluster = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CreateAccountCluster "maybe'obsoleteAccountCluster" (Prelude.Maybe AccountCluster) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccountCluster'obsoleteAccountCluster + (\ x__ y__ + -> x__ {_CreateAccountCluster'obsoleteAccountCluster = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateAccountCluster where + messageName _ + = Data.Text.pack "traderouting_1.CreateAccountCluster" + packedMessageDescriptor _ + = "\n\ + \\DC4CreateAccountCluster\DC2\\\n\ + \\CANobsolete_account_cluster\CAN\SOH \SOH(\v2\RS.traderouting_1.AccountClusterR\SYNobsoleteAccountClusterB\STX\CAN\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteAccountCluster__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_account_cluster" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountCluster) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteAccountCluster")) :: + Data.ProtoLens.FieldDescriptor CreateAccountCluster + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteAccountCluster__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateAccountCluster'_unknownFields + (\ x__ y__ -> x__ {_CreateAccountCluster'_unknownFields = y__}) + defMessage + = CreateAccountCluster'_constructor + {_CreateAccountCluster'obsoleteAccountCluster = Prelude.Nothing, + _CreateAccountCluster'_unknownFields = []} + parseMessage + = let + loop :: + CreateAccountCluster + -> Data.ProtoLens.Encoding.Bytes.Parser CreateAccountCluster + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_account_cluster" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteAccountCluster") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateAccountCluster" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteAccountCluster") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData CreateAccountCluster where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateAccountCluster'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CreateAccountCluster'obsoleteAccountCluster x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' CreateAccountClusterResult Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' CreateAccountClusterResult (Prelude.Maybe Data.Text.Text)@ -} +data CreateAccountClusterResult + = CreateAccountClusterResult'_constructor {_CreateAccountClusterResult'id :: !(Prelude.Maybe Data.Text.Text), + _CreateAccountClusterResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateAccountClusterResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateAccountClusterResult "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccountClusterResult'id + (\ x__ y__ -> x__ {_CreateAccountClusterResult'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateAccountClusterResult "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccountClusterResult'id + (\ x__ y__ -> x__ {_CreateAccountClusterResult'id = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateAccountClusterResult where + messageName _ + = Data.Text.pack "traderouting_1.CreateAccountClusterResult" + packedMessageDescriptor _ + = "\n\ + \\SUBCreateAccountClusterResult\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor CreateAccountClusterResult + in Data.Map.fromList [(Data.ProtoLens.Tag 1, id__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateAccountClusterResult'_unknownFields + (\ x__ y__ + -> x__ {_CreateAccountClusterResult'_unknownFields = y__}) + defMessage + = CreateAccountClusterResult'_constructor + {_CreateAccountClusterResult'id = Prelude.Nothing, + _CreateAccountClusterResult'_unknownFields = []} + parseMessage + = let + loop :: + CreateAccountClusterResult + -> Data.ProtoLens.Encoding.Bytes.Parser CreateAccountClusterResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateAccountClusterResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData CreateAccountClusterResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateAccountClusterResult'_unknownFields x__) + (Control.DeepSeq.deepseq (_CreateAccountClusterResult'id x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.newAccountGroup' @:: Lens' CreateAccountGroup AccountGroup@ + * 'Proto.CMS.Traderouting1_Fields.maybe'newAccountGroup' @:: Lens' CreateAccountGroup (Prelude.Maybe AccountGroup)@ -} +data CreateAccountGroup + = CreateAccountGroup'_constructor {_CreateAccountGroup'newAccountGroup :: !(Prelude.Maybe AccountGroup), + _CreateAccountGroup'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateAccountGroup where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateAccountGroup "newAccountGroup" AccountGroup where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccountGroup'newAccountGroup + (\ x__ y__ -> x__ {_CreateAccountGroup'newAccountGroup = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CreateAccountGroup "maybe'newAccountGroup" (Prelude.Maybe AccountGroup) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccountGroup'newAccountGroup + (\ x__ y__ -> x__ {_CreateAccountGroup'newAccountGroup = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateAccountGroup where + messageName _ = Data.Text.pack "traderouting_1.CreateAccountGroup" + packedMessageDescriptor _ + = "\n\ + \\DC2CreateAccountGroup\DC2H\n\ + \\DC1new_account_group\CAN\SOH \SOH(\v2\FS.traderouting_1.AccountGroupR\SInewAccountGroup" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + newAccountGroup__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_account_group" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountGroup) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'newAccountGroup")) :: + Data.ProtoLens.FieldDescriptor CreateAccountGroup + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, newAccountGroup__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateAccountGroup'_unknownFields + (\ x__ y__ -> x__ {_CreateAccountGroup'_unknownFields = y__}) + defMessage + = CreateAccountGroup'_constructor + {_CreateAccountGroup'newAccountGroup = Prelude.Nothing, + _CreateAccountGroup'_unknownFields = []} + parseMessage + = let + loop :: + CreateAccountGroup + -> Data.ProtoLens.Encoding.Bytes.Parser CreateAccountGroup + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "new_account_group" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newAccountGroup") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateAccountGroup" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'newAccountGroup") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData CreateAccountGroup where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateAccountGroup'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CreateAccountGroup'newAccountGroup x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.newAccountGroupId' @:: Lens' CreateAccountGroupResult Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'newAccountGroupId' @:: Lens' CreateAccountGroupResult (Prelude.Maybe Data.Text.Text)@ -} +data CreateAccountGroupResult + = CreateAccountGroupResult'_constructor {_CreateAccountGroupResult'newAccountGroupId :: !(Prelude.Maybe Data.Text.Text), + _CreateAccountGroupResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateAccountGroupResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateAccountGroupResult "newAccountGroupId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccountGroupResult'newAccountGroupId + (\ x__ y__ + -> x__ {_CreateAccountGroupResult'newAccountGroupId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateAccountGroupResult "maybe'newAccountGroupId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccountGroupResult'newAccountGroupId + (\ x__ y__ + -> x__ {_CreateAccountGroupResult'newAccountGroupId = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateAccountGroupResult where + messageName _ + = Data.Text.pack "traderouting_1.CreateAccountGroupResult" + packedMessageDescriptor _ + = "\n\ + \\CANCreateAccountGroupResult\DC2/\n\ + \\DC4new_account_group_id\CAN\SOH \SOH(\tR\DC1newAccountGroupId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + newAccountGroupId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "new_account_group_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'newAccountGroupId")) :: + Data.ProtoLens.FieldDescriptor CreateAccountGroupResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, newAccountGroupId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateAccountGroupResult'_unknownFields + (\ x__ y__ -> x__ {_CreateAccountGroupResult'_unknownFields = y__}) + defMessage + = CreateAccountGroupResult'_constructor + {_CreateAccountGroupResult'newAccountGroupId = Prelude.Nothing, + _CreateAccountGroupResult'_unknownFields = []} + parseMessage + = let + loop :: + CreateAccountGroupResult + -> Data.ProtoLens.Encoding.Bytes.Parser CreateAccountGroupResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "new_account_group_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"newAccountGroupId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateAccountGroupResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'newAccountGroupId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData CreateAccountGroupResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateAccountGroupResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CreateAccountGroupResult'newAccountGroupId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' CreateAccountResult Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' CreateAccountResult (Prelude.Maybe Data.Text.Text)@ -} +data CreateAccountResult + = CreateAccountResult'_constructor {_CreateAccountResult'id :: !(Prelude.Maybe Data.Text.Text), + _CreateAccountResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateAccountResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateAccountResult "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccountResult'id + (\ x__ y__ -> x__ {_CreateAccountResult'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateAccountResult "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateAccountResult'id + (\ x__ y__ -> x__ {_CreateAccountResult'id = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateAccountResult where + messageName _ = Data.Text.pack "traderouting_1.CreateAccountResult" + packedMessageDescriptor _ + = "\n\ + \\DC3CreateAccountResult\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor CreateAccountResult + in Data.Map.fromList [(Data.ProtoLens.Tag 1, id__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateAccountResult'_unknownFields + (\ x__ y__ -> x__ {_CreateAccountResult'_unknownFields = y__}) + defMessage + = CreateAccountResult'_constructor + {_CreateAccountResult'id = Prelude.Nothing, + _CreateAccountResult'_unknownFields = []} + parseMessage + = let + loop :: + CreateAccountResult + -> Data.ProtoLens.Encoding.Bytes.Parser CreateAccountResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateAccountResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData CreateAccountResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateAccountResult'_unknownFields x__) + (Control.DeepSeq.deepseq (_CreateAccountResult'id x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' CreateBalanceRecord Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' CreateBalanceRecord (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.currency' @:: Lens' CreateBalanceRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'currency' @:: Lens' CreateBalanceRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.endCashBalance' @:: Lens' CreateBalanceRecord Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'endCashBalance' @:: Lens' CreateBalanceRecord (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.collateral' @:: Lens' CreateBalanceRecord Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'collateral' @:: Lens' CreateBalanceRecord (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.regulated' @:: Lens' CreateBalanceRecord Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'regulated' @:: Lens' CreateBalanceRecord (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.asOfDate' @:: Lens' CreateBalanceRecord Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'asOfDate' @:: Lens' CreateBalanceRecord (Prelude.Maybe Data.Int.Int64)@ -} +data CreateBalanceRecord + = CreateBalanceRecord'_constructor {_CreateBalanceRecord'accountId :: !(Prelude.Maybe Data.Int.Int32), + _CreateBalanceRecord'currency :: !(Prelude.Maybe Data.Text.Text), + _CreateBalanceRecord'endCashBalance :: !(Prelude.Maybe Prelude.Double), + _CreateBalanceRecord'collateral :: !(Prelude.Maybe Prelude.Double), + _CreateBalanceRecord'regulated :: !(Prelude.Maybe Prelude.Bool), + _CreateBalanceRecord'asOfDate :: !(Prelude.Maybe Data.Int.Int64), + _CreateBalanceRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateBalanceRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'accountId + (\ x__ y__ -> x__ {_CreateBalanceRecord'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'accountId + (\ x__ y__ -> x__ {_CreateBalanceRecord'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "currency" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'currency + (\ x__ y__ -> x__ {_CreateBalanceRecord'currency = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "maybe'currency" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'currency + (\ x__ y__ -> x__ {_CreateBalanceRecord'currency = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "endCashBalance" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'endCashBalance + (\ x__ y__ -> x__ {_CreateBalanceRecord'endCashBalance = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "maybe'endCashBalance" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'endCashBalance + (\ x__ y__ -> x__ {_CreateBalanceRecord'endCashBalance = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "collateral" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'collateral + (\ x__ y__ -> x__ {_CreateBalanceRecord'collateral = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "maybe'collateral" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'collateral + (\ x__ y__ -> x__ {_CreateBalanceRecord'collateral = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "regulated" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'regulated + (\ x__ y__ -> x__ {_CreateBalanceRecord'regulated = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "maybe'regulated" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'regulated + (\ x__ y__ -> x__ {_CreateBalanceRecord'regulated = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "asOfDate" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'asOfDate + (\ x__ y__ -> x__ {_CreateBalanceRecord'asOfDate = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateBalanceRecord "maybe'asOfDate" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecord'asOfDate + (\ x__ y__ -> x__ {_CreateBalanceRecord'asOfDate = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateBalanceRecord where + messageName _ = Data.Text.pack "traderouting_1.CreateBalanceRecord" + packedMessageDescriptor _ + = "\n\ + \\DC3CreateBalanceRecord\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\SUB\n\ + \\bcurrency\CAN\STX \SOH(\tR\bcurrency\DC2(\n\ + \\DLEend_cash_balance\CAN\ETX \SOH(\SOHR\SOendCashBalance\DC2\RS\n\ + \\n\ + \collateral\CAN\EOT \SOH(\SOHR\n\ + \collateral\DC2\"\n\ + \\tregulated\CAN\ENQ \SOH(\b:\EOTtrueR\tregulated\DC2\FS\n\ + \\n\ + \as_of_date\CAN\ACK \SOH(\DC2R\basOfDate" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor CreateBalanceRecord + currency__field_descriptor + = Data.ProtoLens.FieldDescriptor + "currency" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'currency")) :: + Data.ProtoLens.FieldDescriptor CreateBalanceRecord + endCashBalance__field_descriptor + = Data.ProtoLens.FieldDescriptor + "end_cash_balance" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'endCashBalance")) :: + Data.ProtoLens.FieldDescriptor CreateBalanceRecord + collateral__field_descriptor + = Data.ProtoLens.FieldDescriptor + "collateral" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'collateral")) :: + Data.ProtoLens.FieldDescriptor CreateBalanceRecord + regulated__field_descriptor + = Data.ProtoLens.FieldDescriptor + "regulated" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'regulated")) :: + Data.ProtoLens.FieldDescriptor CreateBalanceRecord + asOfDate__field_descriptor + = Data.ProtoLens.FieldDescriptor + "as_of_date" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'asOfDate")) :: + Data.ProtoLens.FieldDescriptor CreateBalanceRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, currency__field_descriptor), + (Data.ProtoLens.Tag 3, endCashBalance__field_descriptor), + (Data.ProtoLens.Tag 4, collateral__field_descriptor), + (Data.ProtoLens.Tag 5, regulated__field_descriptor), + (Data.ProtoLens.Tag 6, asOfDate__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateBalanceRecord'_unknownFields + (\ x__ y__ -> x__ {_CreateBalanceRecord'_unknownFields = y__}) + defMessage + = CreateBalanceRecord'_constructor + {_CreateBalanceRecord'accountId = Prelude.Nothing, + _CreateBalanceRecord'currency = Prelude.Nothing, + _CreateBalanceRecord'endCashBalance = Prelude.Nothing, + _CreateBalanceRecord'collateral = Prelude.Nothing, + _CreateBalanceRecord'regulated = Prelude.Nothing, + _CreateBalanceRecord'asOfDate = Prelude.Nothing, + _CreateBalanceRecord'_unknownFields = []} + parseMessage + = let + loop :: + CreateBalanceRecord + -> Data.ProtoLens.Encoding.Bytes.Parser CreateBalanceRecord + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "currency" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"currency") y x) + 25 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "end_cash_balance" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"endCashBalance") y x) + 33 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "collateral" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"collateral") y x) + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "regulated" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"regulated") y x) + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "as_of_date" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"asOfDate") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateBalanceRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'currency") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'endCashBalance") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 25) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'collateral") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 33) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'regulated") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'asOfDate") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))) +instance Control.DeepSeq.NFData CreateBalanceRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateBalanceRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CreateBalanceRecord'accountId x__) + (Control.DeepSeq.deepseq + (_CreateBalanceRecord'currency x__) + (Control.DeepSeq.deepseq + (_CreateBalanceRecord'endCashBalance x__) + (Control.DeepSeq.deepseq + (_CreateBalanceRecord'collateral x__) + (Control.DeepSeq.deepseq + (_CreateBalanceRecord'regulated x__) + (Control.DeepSeq.deepseq + (_CreateBalanceRecord'asOfDate x__) ())))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.balanceRecordId' @:: Lens' CreateBalanceRecordResult Data.Int.Int32@ -} +data CreateBalanceRecordResult + = CreateBalanceRecordResult'_constructor {_CreateBalanceRecordResult'balanceRecordId :: !Data.Int.Int32, + _CreateBalanceRecordResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateBalanceRecordResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateBalanceRecordResult "balanceRecordId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateBalanceRecordResult'balanceRecordId + (\ x__ y__ + -> x__ {_CreateBalanceRecordResult'balanceRecordId = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateBalanceRecordResult where + messageName _ + = Data.Text.pack "traderouting_1.CreateBalanceRecordResult" + packedMessageDescriptor _ + = "\n\ + \\EMCreateBalanceRecordResult\DC2*\n\ + \\DC1balance_record_id\CAN\ETX \STX(\DC1R\SIbalanceRecordId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + balanceRecordId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "balance_record_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"balanceRecordId")) :: + Data.ProtoLens.FieldDescriptor CreateBalanceRecordResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 3, balanceRecordId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateBalanceRecordResult'_unknownFields + (\ x__ y__ + -> x__ {_CreateBalanceRecordResult'_unknownFields = y__}) + defMessage + = CreateBalanceRecordResult'_constructor + {_CreateBalanceRecordResult'balanceRecordId = Data.ProtoLens.fieldDefault, + _CreateBalanceRecordResult'_unknownFields = []} + parseMessage + = let + loop :: + CreateBalanceRecordResult + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser CreateBalanceRecordResult + loop x required'balanceRecordId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'balanceRecordId then + (:) "balance_record_id" + else + Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "balance_record_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"balanceRecordId") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'balanceRecordId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "CreateBalanceRecordResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"balanceRecordId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData CreateBalanceRecordResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateBalanceRecordResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CreateBalanceRecordResult'balanceRecordId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' CreateExternalOrder Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.userId' @:: Lens' CreateExternalOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'userId' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.contractSymbol' @:: Lens' CreateExternalOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'contractSymbol' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.side' @:: Lens' CreateExternalOrder Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'side' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.orderType' @:: Lens' CreateExternalOrder Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderType' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.limitPrice' @:: Lens' CreateExternalOrder Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'limitPrice' @:: Lens' CreateExternalOrder (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.stopPrice' @:: Lens' CreateExternalOrder Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'stopPrice' @:: Lens' CreateExternalOrder (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteFillQuantity' @:: Lens' CreateExternalOrder Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteFillQuantity' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.fillPrice' @:: Lens' CreateExternalOrder Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillPrice' @:: Lens' CreateExternalOrder (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.fillUtcTime' @:: Lens' CreateExternalOrder Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillUtcTime' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.displayLimitPrice' @:: Lens' CreateExternalOrder Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayLimitPrice' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.displayStopPrice' @:: Lens' CreateExternalOrder Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayStopPrice' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.displayFillPrice' @:: Lens' CreateExternalOrder Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayFillPrice' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.openCloseType' @:: Lens' CreateExternalOrder Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'openCloseType' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.speculationType' @:: Lens' CreateExternalOrder Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'speculationType' @:: Lens' CreateExternalOrder (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.fillIsAggressive' @:: Lens' CreateExternalOrder Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillIsAggressive' @:: Lens' CreateExternalOrder (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.fillQuantity' @:: Lens' CreateExternalOrder Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillQuantity' @:: Lens' CreateExternalOrder (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.sync' @:: Lens' CreateExternalOrder Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'sync' @:: Lens' CreateExternalOrder (Prelude.Maybe Prelude.Bool)@ -} +data CreateExternalOrder + = CreateExternalOrder'_constructor {_CreateExternalOrder'accountId :: !(Prelude.Maybe Data.Int.Int32), + _CreateExternalOrder'userId :: !(Prelude.Maybe Data.Text.Text), + _CreateExternalOrder'contractSymbol :: !(Prelude.Maybe Data.Text.Text), + _CreateExternalOrder'side :: !(Prelude.Maybe Data.Word.Word32), + _CreateExternalOrder'orderType :: !(Prelude.Maybe Data.Word.Word32), + _CreateExternalOrder'limitPrice :: !(Prelude.Maybe Prelude.Double), + _CreateExternalOrder'stopPrice :: !(Prelude.Maybe Prelude.Double), + _CreateExternalOrder'obsoleteFillQuantity :: !(Prelude.Maybe Data.Word.Word32), + _CreateExternalOrder'fillPrice :: !(Prelude.Maybe Prelude.Double), + _CreateExternalOrder'fillUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _CreateExternalOrder'displayLimitPrice :: !(Prelude.Maybe Data.Int.Int64), + _CreateExternalOrder'displayStopPrice :: !(Prelude.Maybe Data.Int.Int64), + _CreateExternalOrder'displayFillPrice :: !(Prelude.Maybe Data.Int.Int64), + _CreateExternalOrder'openCloseType :: !(Prelude.Maybe Data.Word.Word32), + _CreateExternalOrder'speculationType :: !(Prelude.Maybe Data.Word.Word32), + _CreateExternalOrder'fillIsAggressive :: !(Prelude.Maybe Prelude.Bool), + _CreateExternalOrder'fillQuantity :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _CreateExternalOrder'sync :: !(Prelude.Maybe Prelude.Bool), + _CreateExternalOrder'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateExternalOrder where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'accountId + (\ x__ y__ -> x__ {_CreateExternalOrder'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'accountId + (\ x__ y__ -> x__ {_CreateExternalOrder'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "userId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'userId + (\ x__ y__ -> x__ {_CreateExternalOrder'userId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'userId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'userId + (\ x__ y__ -> x__ {_CreateExternalOrder'userId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "contractSymbol" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'contractSymbol + (\ x__ y__ -> x__ {_CreateExternalOrder'contractSymbol = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'contractSymbol" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'contractSymbol + (\ x__ y__ -> x__ {_CreateExternalOrder'contractSymbol = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "side" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'side + (\ x__ y__ -> x__ {_CreateExternalOrder'side = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'side" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'side + (\ x__ y__ -> x__ {_CreateExternalOrder'side = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "orderType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'orderType + (\ x__ y__ -> x__ {_CreateExternalOrder'orderType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'orderType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'orderType + (\ x__ y__ -> x__ {_CreateExternalOrder'orderType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "limitPrice" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'limitPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'limitPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'limitPrice" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'limitPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'limitPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "stopPrice" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'stopPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'stopPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'stopPrice" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'stopPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'stopPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "obsoleteFillQuantity" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'obsoleteFillQuantity + (\ x__ y__ + -> x__ {_CreateExternalOrder'obsoleteFillQuantity = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'obsoleteFillQuantity" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'obsoleteFillQuantity + (\ x__ y__ + -> x__ {_CreateExternalOrder'obsoleteFillQuantity = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "fillPrice" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'fillPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'fillPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'fillPrice" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'fillPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'fillPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "fillUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'fillUtcTime + (\ x__ y__ -> x__ {_CreateExternalOrder'fillUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'fillUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'fillUtcTime + (\ x__ y__ -> x__ {_CreateExternalOrder'fillUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "displayLimitPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'displayLimitPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'displayLimitPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'displayLimitPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'displayLimitPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'displayLimitPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "displayStopPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'displayStopPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'displayStopPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'displayStopPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'displayStopPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'displayStopPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "displayFillPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'displayFillPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'displayFillPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'displayFillPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'displayFillPrice + (\ x__ y__ -> x__ {_CreateExternalOrder'displayFillPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "openCloseType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'openCloseType + (\ x__ y__ -> x__ {_CreateExternalOrder'openCloseType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'openCloseType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'openCloseType + (\ x__ y__ -> x__ {_CreateExternalOrder'openCloseType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "speculationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'speculationType + (\ x__ y__ -> x__ {_CreateExternalOrder'speculationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'speculationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'speculationType + (\ x__ y__ -> x__ {_CreateExternalOrder'speculationType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "fillIsAggressive" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'fillIsAggressive + (\ x__ y__ -> x__ {_CreateExternalOrder'fillIsAggressive = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'fillIsAggressive" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'fillIsAggressive + (\ x__ y__ -> x__ {_CreateExternalOrder'fillIsAggressive = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "fillQuantity" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'fillQuantity + (\ x__ y__ -> x__ {_CreateExternalOrder'fillQuantity = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'fillQuantity" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'fillQuantity + (\ x__ y__ -> x__ {_CreateExternalOrder'fillQuantity = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrder "sync" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'sync + (\ x__ y__ -> x__ {_CreateExternalOrder'sync = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField CreateExternalOrder "maybe'sync" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrder'sync + (\ x__ y__ -> x__ {_CreateExternalOrder'sync = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateExternalOrder where + messageName _ = Data.Text.pack "traderouting_1.CreateExternalOrder" + packedMessageDescriptor _ + = "\n\ + \\DC3CreateExternalOrder\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\ETB\n\ + \\auser_id\CAN\STX \SOH(\tR\ACKuserId\DC2'\n\ + \\SIcontract_symbol\CAN\ETX \SOH(\tR\SOcontractSymbol\DC2\DC2\n\ + \\EOTside\CAN\EOT \SOH(\rR\EOTside\DC2\GS\n\ + \\n\ + \order_type\CAN\ENQ \SOH(\rR\torderType\DC2\US\n\ + \\vlimit_price\CAN\ACK \SOH(\SOHR\n\ + \limitPrice\DC2\GS\n\ + \\n\ + \stop_price\CAN\a \SOH(\SOHR\tstopPrice\DC28\n\ + \\SYNobsolete_fill_quantity\CAN\b \SOH(\rR\DC4obsoleteFillQuantityB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \fill_price\CAN\t \SOH(\SOHR\tfillPrice\DC2\"\n\ + \\rfill_utc_time\CAN\n\ + \ \SOH(\DC2R\vfillUtcTime\DC2.\n\ + \\DC3display_limit_price\CAN\v \SOH(\DC2R\DC1displayLimitPrice\DC2,\n\ + \\DC2display_stop_price\CAN\f \SOH(\DC2R\DLEdisplayStopPrice\DC2,\n\ + \\DC2display_fill_price\CAN\r \SOH(\DC2R\DLEdisplayFillPrice\DC2&\n\ + \\SIopen_close_type\CAN\SO \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN\SI \SOH(\rR\SIspeculationType\DC2,\n\ + \\DC2fill_is_aggressive\CAN\DLE \SOH(\bR\DLEfillIsAggressive\DC21\n\ + \\rfill_quantity\CAN\DC1 \SOH(\v2\f.cqg.DecimalR\ffillQuantity\DC2\EM\n\ + \\EOTsync\CAN\DC2 \SOH(\b:\ENQfalseR\EOTsync" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + userId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'userId")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + contractSymbol__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_symbol" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractSymbol")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + side__field_descriptor + = Data.ProtoLens.FieldDescriptor + "side" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'side")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + orderType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderType")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + limitPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "limit_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'limitPrice")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + stopPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stop_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stopPrice")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + obsoleteFillQuantity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_fill_quantity" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteFillQuantity")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + fillPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillPrice")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + fillUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillUtcTime")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + displayLimitPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_limit_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayLimitPrice")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + displayStopPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_stop_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayStopPrice")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + displayFillPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_fill_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayFillPrice")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + openCloseType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "open_close_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'openCloseType")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + speculationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "speculation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'speculationType")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + fillIsAggressive__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_is_aggressive" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillIsAggressive")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + fillQuantity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_quantity" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillQuantity")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + sync__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sync" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sync")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrder + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, userId__field_descriptor), + (Data.ProtoLens.Tag 3, contractSymbol__field_descriptor), + (Data.ProtoLens.Tag 4, side__field_descriptor), + (Data.ProtoLens.Tag 5, orderType__field_descriptor), + (Data.ProtoLens.Tag 6, limitPrice__field_descriptor), + (Data.ProtoLens.Tag 7, stopPrice__field_descriptor), + (Data.ProtoLens.Tag 8, obsoleteFillQuantity__field_descriptor), + (Data.ProtoLens.Tag 9, fillPrice__field_descriptor), + (Data.ProtoLens.Tag 10, fillUtcTime__field_descriptor), + (Data.ProtoLens.Tag 11, displayLimitPrice__field_descriptor), + (Data.ProtoLens.Tag 12, displayStopPrice__field_descriptor), + (Data.ProtoLens.Tag 13, displayFillPrice__field_descriptor), + (Data.ProtoLens.Tag 14, openCloseType__field_descriptor), + (Data.ProtoLens.Tag 15, speculationType__field_descriptor), + (Data.ProtoLens.Tag 16, fillIsAggressive__field_descriptor), + (Data.ProtoLens.Tag 17, fillQuantity__field_descriptor), + (Data.ProtoLens.Tag 18, sync__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateExternalOrder'_unknownFields + (\ x__ y__ -> x__ {_CreateExternalOrder'_unknownFields = y__}) + defMessage + = CreateExternalOrder'_constructor + {_CreateExternalOrder'accountId = Prelude.Nothing, + _CreateExternalOrder'userId = Prelude.Nothing, + _CreateExternalOrder'contractSymbol = Prelude.Nothing, + _CreateExternalOrder'side = Prelude.Nothing, + _CreateExternalOrder'orderType = Prelude.Nothing, + _CreateExternalOrder'limitPrice = Prelude.Nothing, + _CreateExternalOrder'stopPrice = Prelude.Nothing, + _CreateExternalOrder'obsoleteFillQuantity = Prelude.Nothing, + _CreateExternalOrder'fillPrice = Prelude.Nothing, + _CreateExternalOrder'fillUtcTime = Prelude.Nothing, + _CreateExternalOrder'displayLimitPrice = Prelude.Nothing, + _CreateExternalOrder'displayStopPrice = Prelude.Nothing, + _CreateExternalOrder'displayFillPrice = Prelude.Nothing, + _CreateExternalOrder'openCloseType = Prelude.Nothing, + _CreateExternalOrder'speculationType = Prelude.Nothing, + _CreateExternalOrder'fillIsAggressive = Prelude.Nothing, + _CreateExternalOrder'fillQuantity = Prelude.Nothing, + _CreateExternalOrder'sync = Prelude.Nothing, + _CreateExternalOrder'_unknownFields = []} + parseMessage + = let + loop :: + CreateExternalOrder + -> Data.ProtoLens.Encoding.Bytes.Parser CreateExternalOrder + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"userId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_symbol" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractSymbol") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "side" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"side") y x) + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "order_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderType") y x) + 49 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "limit_price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"limitPrice") y x) + 57 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "stop_price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"stopPrice") y x) + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_fill_quantity" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteFillQuantity") y x) + 73 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "fill_price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fillPrice") y x) + 80 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "fill_utc_time" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fillUtcTime") y x) + 88 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_limit_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayLimitPrice") y x) + 96 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_stop_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayStopPrice") y x) + 104 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_fill_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayFillPrice") y x) + 112 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "open_close_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"openCloseType") y x) + 120 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "speculation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"speculationType") y x) + 128 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "fill_is_aggressive" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"fillIsAggressive") y x) + 138 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "fill_quantity" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"fillQuantity") y x) + 144 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "sync" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"sync") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateExternalOrder" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'userId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'contractSymbol") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'side") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'limitPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 49) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stopPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 57) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteFillQuantity") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'fillPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 73) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'fillUtcTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 80) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'displayLimitPrice") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'displayStopPrice") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 96) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'displayFillPrice") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 104) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'openCloseType") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 112) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'speculationType") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 120) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'fillIsAggressive") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 128) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'fillQuantity") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'sync") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 144) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))))))) +instance Control.DeepSeq.NFData CreateExternalOrder where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateExternalOrder'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'accountId x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'userId x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'contractSymbol x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'side x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'orderType x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'limitPrice x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'stopPrice x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'obsoleteFillQuantity x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'fillPrice x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'fillUtcTime x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'displayLimitPrice x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'displayStopPrice x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'displayFillPrice x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'openCloseType x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'speculationType x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'fillIsAggressive + x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'fillQuantity + x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrder'sync x__) + ())))))))))))))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.orderId' @:: Lens' CreateExternalOrderResult Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderId' @:: Lens' CreateExternalOrderResult (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' CreateExternalOrderResult Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' CreateExternalOrderResult (Prelude.Maybe Data.Text.Text)@ -} +data CreateExternalOrderResult + = CreateExternalOrderResult'_constructor {_CreateExternalOrderResult'orderId :: !(Prelude.Maybe Data.Text.Text), + _CreateExternalOrderResult'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _CreateExternalOrderResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show CreateExternalOrderResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField CreateExternalOrderResult "orderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrderResult'orderId + (\ x__ y__ -> x__ {_CreateExternalOrderResult'orderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrderResult "maybe'orderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrderResult'orderId + (\ x__ y__ -> x__ {_CreateExternalOrderResult'orderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField CreateExternalOrderResult "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrderResult'tradeLocationId + (\ x__ y__ + -> x__ {_CreateExternalOrderResult'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField CreateExternalOrderResult "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _CreateExternalOrderResult'tradeLocationId + (\ x__ y__ + -> x__ {_CreateExternalOrderResult'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Message CreateExternalOrderResult where + messageName _ + = Data.Text.pack "traderouting_1.CreateExternalOrderResult" + packedMessageDescriptor _ + = "\n\ + \\EMCreateExternalOrderResult\DC2\EM\n\ + \\border_id\CAN\ETX \SOH(\tR\aorderId\DC2*\n\ + \\DC1trade_location_id\CAN\EOT \SOH(\tR\SItradeLocationId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + orderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderId")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrderResult + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor CreateExternalOrderResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 3, orderId__field_descriptor), + (Data.ProtoLens.Tag 4, tradeLocationId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _CreateExternalOrderResult'_unknownFields + (\ x__ y__ + -> x__ {_CreateExternalOrderResult'_unknownFields = y__}) + defMessage + = CreateExternalOrderResult'_constructor + {_CreateExternalOrderResult'orderId = Prelude.Nothing, + _CreateExternalOrderResult'tradeLocationId = Prelude.Nothing, + _CreateExternalOrderResult'_unknownFields = []} + parseMessage + = let + loop :: + CreateExternalOrderResult + -> Data.ProtoLens.Encoding.Bytes.Parser CreateExternalOrderResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"orderId") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "CreateExternalOrderResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'orderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData CreateExternalOrderResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_CreateExternalOrderResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrderResult'orderId x__) + (Control.DeepSeq.deepseq + (_CreateExternalOrderResult'tradeLocationId x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' DeleteAccountPositions Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' DeleteAccountPositions (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.positionIds' @:: Lens' DeleteAccountPositions [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'positionIds' @:: Lens' DeleteAccountPositions (Data.Vector.Vector Data.Text.Text)@ -} +data DeleteAccountPositions + = DeleteAccountPositions'_constructor {_DeleteAccountPositions'accountId :: !(Prelude.Maybe Data.Text.Text), + _DeleteAccountPositions'positionIds :: !(Data.Vector.Vector Data.Text.Text), + _DeleteAccountPositions'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show DeleteAccountPositions where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField DeleteAccountPositions "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _DeleteAccountPositions'accountId + (\ x__ y__ -> x__ {_DeleteAccountPositions'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField DeleteAccountPositions "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _DeleteAccountPositions'accountId + (\ x__ y__ -> x__ {_DeleteAccountPositions'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField DeleteAccountPositions "positionIds" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _DeleteAccountPositions'positionIds + (\ x__ y__ -> x__ {_DeleteAccountPositions'positionIds = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField DeleteAccountPositions "vec'positionIds" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _DeleteAccountPositions'positionIds + (\ x__ y__ -> x__ {_DeleteAccountPositions'positionIds = y__})) + Prelude.id +instance Data.ProtoLens.Message DeleteAccountPositions where + messageName _ + = Data.Text.pack "traderouting_1.DeleteAccountPositions" + packedMessageDescriptor _ + = "\n\ + \\SYNDeleteAccountPositions\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2!\n\ + \\fposition_ids\CAN\STX \ETX(\tR\vpositionIds" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor DeleteAccountPositions + positionIds__field_descriptor + = Data.ProtoLens.FieldDescriptor + "position_ids" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"positionIds")) :: + Data.ProtoLens.FieldDescriptor DeleteAccountPositions + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, positionIds__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _DeleteAccountPositions'_unknownFields + (\ x__ y__ -> x__ {_DeleteAccountPositions'_unknownFields = y__}) + defMessage + = DeleteAccountPositions'_constructor + {_DeleteAccountPositions'accountId = Prelude.Nothing, + _DeleteAccountPositions'positionIds = Data.Vector.Generic.empty, + _DeleteAccountPositions'_unknownFields = []} + parseMessage + = let + loop :: + DeleteAccountPositions + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser DeleteAccountPositions + loop x mutable'positionIds + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'positionIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'positionIds) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'positionIds") frozen'positionIds + x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + mutable'positionIds + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "position_ids" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'positionIds y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'positionIds + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'positionIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'positionIds) + "DeleteAccountPositions" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'positionIds") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData DeleteAccountPositions where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_DeleteAccountPositions'_unknownFields x__) + (Control.DeepSeq.deepseq + (_DeleteAccountPositions'accountId x__) + (Control.DeepSeq.deepseq + (_DeleteAccountPositions'positionIds x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clearedFields' @:: Lens' EntityAllowedToTrade [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clearedFields' @:: Lens' EntityAllowedToTrade (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' EntityAllowedToTrade Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' EntityAllowedToTrade (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.allowedToTrade' @:: Lens' EntityAllowedToTrade Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowedToTrade' @:: Lens' EntityAllowedToTrade (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.enforce' @:: Lens' EntityAllowedToTrade Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforce' @:: Lens' EntityAllowedToTrade (Prelude.Maybe Prelude.Bool)@ -} +data EntityAllowedToTrade + = EntityAllowedToTrade'_constructor {_EntityAllowedToTrade'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _EntityAllowedToTrade'id :: !(Prelude.Maybe Data.Text.Text), + _EntityAllowedToTrade'allowedToTrade :: !(Prelude.Maybe Prelude.Bool), + _EntityAllowedToTrade'enforce :: !(Prelude.Maybe Prelude.Bool), + _EntityAllowedToTrade'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntityAllowedToTrade where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EntityAllowedToTrade "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntityAllowedToTrade'clearedFields + (\ x__ y__ -> x__ {_EntityAllowedToTrade'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EntityAllowedToTrade "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntityAllowedToTrade'clearedFields + (\ x__ y__ -> x__ {_EntityAllowedToTrade'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntityAllowedToTrade "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntityAllowedToTrade'id + (\ x__ y__ -> x__ {_EntityAllowedToTrade'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntityAllowedToTrade "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntityAllowedToTrade'id + (\ x__ y__ -> x__ {_EntityAllowedToTrade'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntityAllowedToTrade "allowedToTrade" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntityAllowedToTrade'allowedToTrade + (\ x__ y__ -> x__ {_EntityAllowedToTrade'allowedToTrade = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntityAllowedToTrade "maybe'allowedToTrade" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntityAllowedToTrade'allowedToTrade + (\ x__ y__ -> x__ {_EntityAllowedToTrade'allowedToTrade = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField EntityAllowedToTrade "enforce" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntityAllowedToTrade'enforce + (\ x__ y__ -> x__ {_EntityAllowedToTrade'enforce = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField EntityAllowedToTrade "maybe'enforce" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntityAllowedToTrade'enforce + (\ x__ y__ -> x__ {_EntityAllowedToTrade'enforce = y__})) + Prelude.id +instance Data.ProtoLens.Message EntityAllowedToTrade where + messageName _ + = Data.Text.pack "traderouting_1.EntityAllowedToTrade" + packedMessageDescriptor _ + = "\n\ + \\DC4EntityAllowedToTrade\DC2%\n\ + \\SOcleared_fields\CAN\EOT \ETX(\rR\rclearedFields\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2(\n\ + \\DLEallowed_to_trade\CAN\STX \SOH(\bR\SOallowedToTrade\DC2\CAN\n\ + \\aenforce\CAN\ETX \SOH(\bR\aenforce" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor EntityAllowedToTrade + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor EntityAllowedToTrade + allowedToTrade__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allowed_to_trade" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowedToTrade")) :: + Data.ProtoLens.FieldDescriptor EntityAllowedToTrade + enforce__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'enforce")) :: + Data.ProtoLens.FieldDescriptor EntityAllowedToTrade + in + Data.Map.fromList + [(Data.ProtoLens.Tag 4, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, allowedToTrade__field_descriptor), + (Data.ProtoLens.Tag 3, enforce__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EntityAllowedToTrade'_unknownFields + (\ x__ y__ -> x__ {_EntityAllowedToTrade'_unknownFields = y__}) + defMessage + = EntityAllowedToTrade'_constructor + {_EntityAllowedToTrade'clearedFields = Data.Vector.Generic.empty, + _EntityAllowedToTrade'id = Prelude.Nothing, + _EntityAllowedToTrade'allowedToTrade = Prelude.Nothing, + _EntityAllowedToTrade'enforce = Prelude.Nothing, + _EntityAllowedToTrade'_unknownFields = []} + parseMessage + = let + loop :: + EntityAllowedToTrade + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser EntityAllowedToTrade + loop x mutable'clearedFields + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 32 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x v + 34 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x y + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + mutable'clearedFields + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "allowed_to_trade" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowedToTrade") y x) + mutable'clearedFields + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"enforce") y x) + mutable'clearedFields + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'clearedFields + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'clearedFields) + "EntityAllowedToTrade" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allowedToTrade") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'enforce") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData EntityAllowedToTrade where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntityAllowedToTrade'_unknownFields x__) + (Control.DeepSeq.deepseq + (_EntityAllowedToTrade'clearedFields x__) + (Control.DeepSeq.deepseq + (_EntityAllowedToTrade'id x__) + (Control.DeepSeq.deepseq + (_EntityAllowedToTrade'allowedToTrade x__) + (Control.DeepSeq.deepseq (_EntityAllowedToTrade'enforce x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.currency' @:: Lens' Equity Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.securities' @:: Lens' Equity Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.balance' @:: Lens' Equity Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.ote' @:: Lens' Equity Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.totalEquity' @:: Lens' Equity Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.mvo' @:: Lens' Equity Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.totalValue' @:: Lens' Equity Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.cashExcess' @:: Lens' Equity Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'cashExcess' @:: Lens' Equity (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.initialMargin' @:: Lens' Equity Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'initialMargin' @:: Lens' Equity (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.maintMargin' @:: Lens' Equity Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'maintMargin' @:: Lens' Equity (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.postedMargin' @:: Lens' Equity Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'postedMargin' @:: Lens' Equity (Prelude.Maybe Prelude.Double)@ -} +data Equity + = Equity'_constructor {_Equity'currency :: !Data.Text.Text, + _Equity'securities :: !Prelude.Double, + _Equity'balance :: !Prelude.Double, + _Equity'ote :: !Prelude.Double, + _Equity'totalEquity :: !Prelude.Double, + _Equity'mvo :: !Prelude.Double, + _Equity'totalValue :: !Prelude.Double, + _Equity'cashExcess :: !(Prelude.Maybe Prelude.Double), + _Equity'initialMargin :: !(Prelude.Maybe Prelude.Double), + _Equity'maintMargin :: !(Prelude.Maybe Prelude.Double), + _Equity'postedMargin :: !(Prelude.Maybe Prelude.Double), + _Equity'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Equity where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Equity "currency" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'currency (\ x__ y__ -> x__ {_Equity'currency = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Equity "securities" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'securities (\ x__ y__ -> x__ {_Equity'securities = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Equity "balance" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'balance (\ x__ y__ -> x__ {_Equity'balance = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Equity "ote" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'ote (\ x__ y__ -> x__ {_Equity'ote = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Equity "totalEquity" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'totalEquity (\ x__ y__ -> x__ {_Equity'totalEquity = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Equity "mvo" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'mvo (\ x__ y__ -> x__ {_Equity'mvo = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Equity "totalValue" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'totalValue (\ x__ y__ -> x__ {_Equity'totalValue = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Equity "cashExcess" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'cashExcess (\ x__ y__ -> x__ {_Equity'cashExcess = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Equity "maybe'cashExcess" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'cashExcess (\ x__ y__ -> x__ {_Equity'cashExcess = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Equity "initialMargin" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'initialMargin + (\ x__ y__ -> x__ {_Equity'initialMargin = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Equity "maybe'initialMargin" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'initialMargin + (\ x__ y__ -> x__ {_Equity'initialMargin = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Equity "maintMargin" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'maintMargin (\ x__ y__ -> x__ {_Equity'maintMargin = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Equity "maybe'maintMargin" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'maintMargin (\ x__ y__ -> x__ {_Equity'maintMargin = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Equity "postedMargin" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'postedMargin + (\ x__ y__ -> x__ {_Equity'postedMargin = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Equity "maybe'postedMargin" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Equity'postedMargin + (\ x__ y__ -> x__ {_Equity'postedMargin = y__})) + Prelude.id +instance Data.ProtoLens.Message Equity where + messageName _ = Data.Text.pack "traderouting_1.Equity" + packedMessageDescriptor _ + = "\n\ + \\ACKEquity\DC2\SUB\n\ + \\bcurrency\CAN\SOH \STX(\tR\bcurrency\DC2\RS\n\ + \\n\ + \securities\CAN\STX \STX(\SOHR\n\ + \securities\DC2\CAN\n\ + \\abalance\CAN\ETX \STX(\SOHR\abalance\DC2\DLE\n\ + \\ETXote\CAN\EOT \STX(\SOHR\ETXote\DC2!\n\ + \\ftotal_equity\CAN\ENQ \STX(\SOHR\vtotalEquity\DC2\DLE\n\ + \\ETXmvo\CAN\ACK \STX(\SOHR\ETXmvo\DC2\US\n\ + \\vtotal_value\CAN\a \STX(\SOHR\n\ + \totalValue\DC2\US\n\ + \\vcash_excess\CAN\b \SOH(\SOHR\n\ + \cashExcess\DC2%\n\ + \\SOinitial_margin\CAN\t \SOH(\SOHR\rinitialMargin\DC2!\n\ + \\fmaint_margin\CAN\n\ + \ \SOH(\SOHR\vmaintMargin\DC2#\n\ + \\rposted_margin\CAN\v \SOH(\SOHR\fpostedMargin" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + currency__field_descriptor + = Data.ProtoLens.FieldDescriptor + "currency" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"currency")) :: + Data.ProtoLens.FieldDescriptor Equity + securities__field_descriptor + = Data.ProtoLens.FieldDescriptor + "securities" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"securities")) :: + Data.ProtoLens.FieldDescriptor Equity + balance__field_descriptor + = Data.ProtoLens.FieldDescriptor + "balance" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"balance")) :: + Data.ProtoLens.FieldDescriptor Equity + ote__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ote" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"ote")) :: + Data.ProtoLens.FieldDescriptor Equity + totalEquity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "total_equity" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"totalEquity")) :: + Data.ProtoLens.FieldDescriptor Equity + mvo__field_descriptor + = Data.ProtoLens.FieldDescriptor + "mvo" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"mvo")) :: + Data.ProtoLens.FieldDescriptor Equity + totalValue__field_descriptor + = Data.ProtoLens.FieldDescriptor + "total_value" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"totalValue")) :: + Data.ProtoLens.FieldDescriptor Equity + cashExcess__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cash_excess" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cashExcess")) :: + Data.ProtoLens.FieldDescriptor Equity + initialMargin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "initial_margin" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'initialMargin")) :: + Data.ProtoLens.FieldDescriptor Equity + maintMargin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "maint_margin" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'maintMargin")) :: + Data.ProtoLens.FieldDescriptor Equity + postedMargin__field_descriptor + = Data.ProtoLens.FieldDescriptor + "posted_margin" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'postedMargin")) :: + Data.ProtoLens.FieldDescriptor Equity + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, currency__field_descriptor), + (Data.ProtoLens.Tag 2, securities__field_descriptor), + (Data.ProtoLens.Tag 3, balance__field_descriptor), + (Data.ProtoLens.Tag 4, ote__field_descriptor), + (Data.ProtoLens.Tag 5, totalEquity__field_descriptor), + (Data.ProtoLens.Tag 6, mvo__field_descriptor), + (Data.ProtoLens.Tag 7, totalValue__field_descriptor), + (Data.ProtoLens.Tag 8, cashExcess__field_descriptor), + (Data.ProtoLens.Tag 9, initialMargin__field_descriptor), + (Data.ProtoLens.Tag 10, maintMargin__field_descriptor), + (Data.ProtoLens.Tag 11, postedMargin__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Equity'_unknownFields + (\ x__ y__ -> x__ {_Equity'_unknownFields = y__}) + defMessage + = Equity'_constructor + {_Equity'currency = Data.ProtoLens.fieldDefault, + _Equity'securities = Data.ProtoLens.fieldDefault, + _Equity'balance = Data.ProtoLens.fieldDefault, + _Equity'ote = Data.ProtoLens.fieldDefault, + _Equity'totalEquity = Data.ProtoLens.fieldDefault, + _Equity'mvo = Data.ProtoLens.fieldDefault, + _Equity'totalValue = Data.ProtoLens.fieldDefault, + _Equity'cashExcess = Prelude.Nothing, + _Equity'initialMargin = Prelude.Nothing, + _Equity'maintMargin = Prelude.Nothing, + _Equity'postedMargin = Prelude.Nothing, + _Equity'_unknownFields = []} + parseMessage + = let + loop :: + Equity + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser Equity + loop + x + required'balance + required'currency + required'mvo + required'ote + required'securities + required'totalEquity + required'totalValue + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'balance then (:) "balance" else Prelude.id) + ((if required'currency then (:) "currency" else Prelude.id) + ((if required'mvo then (:) "mvo" else Prelude.id) + ((if required'ote then (:) "ote" else Prelude.id) + ((if required'securities then + (:) "securities" + else + Prelude.id) + ((if required'totalEquity then + (:) "total_equity" + else + Prelude.id) + ((if required'totalValue then + (:) "total_value" + else + Prelude.id) + [])))))) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "currency" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"currency") y x) + required'balance Prelude.False required'mvo required'ote + required'securities required'totalEquity required'totalValue + 17 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "securities" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"securities") y x) + required'balance required'currency required'mvo required'ote + Prelude.False required'totalEquity required'totalValue + 25 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "balance" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"balance") y x) + Prelude.False required'currency required'mvo required'ote + required'securities required'totalEquity required'totalValue + 33 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "ote" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"ote") y x) + required'balance required'currency required'mvo Prelude.False + required'securities required'totalEquity required'totalValue + 41 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "total_equity" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"totalEquity") y x) + required'balance required'currency required'mvo required'ote + required'securities Prelude.False required'totalValue + 49 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "mvo" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"mvo") y x) + required'balance required'currency Prelude.False required'ote + required'securities required'totalEquity required'totalValue + 57 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "total_value" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"totalValue") y x) + required'balance required'currency required'mvo required'ote + required'securities required'totalEquity Prelude.False + 65 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "cash_excess" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"cashExcess") y x) + required'balance required'currency required'mvo required'ote + required'securities required'totalEquity required'totalValue + 73 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "initial_margin" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"initialMargin") y x) + required'balance required'currency required'mvo required'ote + required'securities required'totalEquity required'totalValue + 81 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "maint_margin" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"maintMargin") y x) + required'balance required'currency required'mvo required'ote + required'securities required'totalEquity required'totalValue + 89 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "posted_margin" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"postedMargin") y x) + required'balance required'currency required'mvo required'ote + required'securities required'totalEquity required'totalValue + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'balance required'currency required'mvo required'ote + required'securities required'totalEquity required'totalValue + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True + Prelude.True Prelude.True Prelude.True Prelude.True) + "Equity" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"currency") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 17) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"securities") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 25) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"balance") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 33) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"ote") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 41) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"totalEquity") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 49) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"mvo") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 57) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"totalValue") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'cashExcess") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 65) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'initialMargin") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 73) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'maintMargin") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 81) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'postedMargin") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 89) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x)))))))))))) +instance Control.DeepSeq.NFData Equity where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Equity'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Equity'currency x__) + (Control.DeepSeq.deepseq + (_Equity'securities x__) + (Control.DeepSeq.deepseq + (_Equity'balance x__) + (Control.DeepSeq.deepseq + (_Equity'ote x__) + (Control.DeepSeq.deepseq + (_Equity'totalEquity x__) + (Control.DeepSeq.deepseq + (_Equity'mvo x__) + (Control.DeepSeq.deepseq + (_Equity'totalValue x__) + (Control.DeepSeq.deepseq + (_Equity'cashExcess x__) + (Control.DeepSeq.deepseq + (_Equity'initialMargin x__) + (Control.DeepSeq.deepseq + (_Equity'maintMargin x__) + (Control.DeepSeq.deepseq + (_Equity'postedMargin x__) ()))))))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' ExchangeGroup Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.name' @:: Lens' ExchangeGroup Proto.Common.Shared1.Text@ + * 'Proto.CMS.Traderouting1_Fields.fungibleCommodity' @:: Lens' ExchangeGroup [FungibleCommodity]@ + * 'Proto.CMS.Traderouting1_Fields.vec'fungibleCommodity' @:: Lens' ExchangeGroup (Data.Vector.Vector FungibleCommodity)@ -} +data ExchangeGroup + = ExchangeGroup'_constructor {_ExchangeGroup'id :: !Data.Int.Int32, + _ExchangeGroup'name :: !Proto.Common.Shared1.Text, + _ExchangeGroup'fungibleCommodity :: !(Data.Vector.Vector FungibleCommodity), + _ExchangeGroup'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ExchangeGroup where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ExchangeGroup "id" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExchangeGroup'id (\ x__ y__ -> x__ {_ExchangeGroup'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ExchangeGroup "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExchangeGroup'name (\ x__ y__ -> x__ {_ExchangeGroup'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ExchangeGroup "fungibleCommodity" [FungibleCommodity] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExchangeGroup'fungibleCommodity + (\ x__ y__ -> x__ {_ExchangeGroup'fungibleCommodity = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ExchangeGroup "vec'fungibleCommodity" (Data.Vector.Vector FungibleCommodity) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExchangeGroup'fungibleCommodity + (\ x__ y__ -> x__ {_ExchangeGroup'fungibleCommodity = y__})) + Prelude.id +instance Data.ProtoLens.Message ExchangeGroup where + messageName _ = Data.Text.pack "traderouting_1.ExchangeGroup" + packedMessageDescriptor _ + = "\n\ + \\rExchangeGroup\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\DC1R\STXid\DC2\"\n\ + \\EOTname\CAN\STX \STX(\v2\SO.shared_1.TextR\EOTname\DC2P\n\ + \\DC2fungible_commodity\CAN\ETX \ETX(\v2!.traderouting_1.FungibleCommodityR\DC1fungibleCommodity" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"id")) :: + Data.ProtoLens.FieldDescriptor ExchangeGroup + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"name")) :: + Data.ProtoLens.FieldDescriptor ExchangeGroup + fungibleCommodity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fungible_commodity" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor FungibleCommodity) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"fungibleCommodity")) :: + Data.ProtoLens.FieldDescriptor ExchangeGroup + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, fungibleCommodity__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ExchangeGroup'_unknownFields + (\ x__ y__ -> x__ {_ExchangeGroup'_unknownFields = y__}) + defMessage + = ExchangeGroup'_constructor + {_ExchangeGroup'id = Data.ProtoLens.fieldDefault, + _ExchangeGroup'name = Data.ProtoLens.defMessage, + _ExchangeGroup'fungibleCommodity = Data.Vector.Generic.empty, + _ExchangeGroup'_unknownFields = []} + parseMessage + = let + loop :: + ExchangeGroup + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld FungibleCommodity + -> Data.ProtoLens.Encoding.Bytes.Parser ExchangeGroup + loop x required'id required'name mutable'fungibleCommodity + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'fungibleCommodity <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'fungibleCommodity) + (let + missing + = (if required'id then (:) "id" else Prelude.id) + ((if required'name then (:) "name" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'fungibleCommodity") + frozen'fungibleCommodity x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + Prelude.False required'name mutable'fungibleCommodity + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + required'id Prelude.False mutable'fungibleCommodity + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "fungible_commodity" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'fungibleCommodity y) + loop x required'id required'name v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'id required'name mutable'fungibleCommodity + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'fungibleCommodity <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True Prelude.True + mutable'fungibleCommodity) + "ExchangeGroup" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"id") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view (Data.ProtoLens.Field.field @"name") _x))) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'fungibleCommodity") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData ExchangeGroup where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ExchangeGroup'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ExchangeGroup'id x__) + (Control.DeepSeq.deepseq + (_ExchangeGroup'name x__) + (Control.DeepSeq.deepseq + (_ExchangeGroup'fungibleCommodity x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clearedFields' @:: Lens' ExchangeMarketLimits [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clearedFields' @:: Lens' ExchangeMarketLimits (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.exchangeGroupId' @:: Lens' ExchangeMarketLimits Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.defaultMarketLimits' @:: Lens' ExchangeMarketLimits MarketLimitsRecord@ + * 'Proto.CMS.Traderouting1_Fields.maybe'defaultMarketLimits' @:: Lens' ExchangeMarketLimits (Prelude.Maybe MarketLimitsRecord)@ + * 'Proto.CMS.Traderouting1_Fields.commodityMarketLimits' @:: Lens' ExchangeMarketLimits [CommodityMarketLimits]@ + * 'Proto.CMS.Traderouting1_Fields.vec'commodityMarketLimits' @:: Lens' ExchangeMarketLimits (Data.Vector.Vector CommodityMarketLimits)@ -} +data ExchangeMarketLimits + = ExchangeMarketLimits'_constructor {_ExchangeMarketLimits'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _ExchangeMarketLimits'exchangeGroupId :: !Data.Int.Int32, + _ExchangeMarketLimits'defaultMarketLimits :: !(Prelude.Maybe MarketLimitsRecord), + _ExchangeMarketLimits'commodityMarketLimits :: !(Data.Vector.Vector CommodityMarketLimits), + _ExchangeMarketLimits'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ExchangeMarketLimits where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ExchangeMarketLimits "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExchangeMarketLimits'clearedFields + (\ x__ y__ -> x__ {_ExchangeMarketLimits'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ExchangeMarketLimits "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExchangeMarketLimits'clearedFields + (\ x__ y__ -> x__ {_ExchangeMarketLimits'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ExchangeMarketLimits "exchangeGroupId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExchangeMarketLimits'exchangeGroupId + (\ x__ y__ -> x__ {_ExchangeMarketLimits'exchangeGroupId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ExchangeMarketLimits "defaultMarketLimits" MarketLimitsRecord where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExchangeMarketLimits'defaultMarketLimits + (\ x__ y__ + -> x__ {_ExchangeMarketLimits'defaultMarketLimits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ExchangeMarketLimits "maybe'defaultMarketLimits" (Prelude.Maybe MarketLimitsRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExchangeMarketLimits'defaultMarketLimits + (\ x__ y__ + -> x__ {_ExchangeMarketLimits'defaultMarketLimits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ExchangeMarketLimits "commodityMarketLimits" [CommodityMarketLimits] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExchangeMarketLimits'commodityMarketLimits + (\ x__ y__ + -> x__ {_ExchangeMarketLimits'commodityMarketLimits = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField ExchangeMarketLimits "vec'commodityMarketLimits" (Data.Vector.Vector CommodityMarketLimits) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExchangeMarketLimits'commodityMarketLimits + (\ x__ y__ + -> x__ {_ExchangeMarketLimits'commodityMarketLimits = y__})) + Prelude.id +instance Data.ProtoLens.Message ExchangeMarketLimits where + messageName _ + = Data.Text.pack "traderouting_1.ExchangeMarketLimits" + packedMessageDescriptor _ + = "\n\ + \\DC4ExchangeMarketLimits\DC2%\n\ + \\SOcleared_fields\CAN\EOT \ETX(\rR\rclearedFields\DC2*\n\ + \\DC1exchange_group_id\CAN\SOH \STX(\DC1R\SIexchangeGroupId\DC2V\n\ + \\NAKdefault_market_limits\CAN\STX \SOH(\v2\".traderouting_1.MarketLimitsRecordR\DC3defaultMarketLimits\DC2]\n\ + \\ETBcommodity_market_limits\CAN\ETX \ETX(\v2%.traderouting_1.CommodityMarketLimitsR\NAKcommodityMarketLimits" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor ExchangeMarketLimits + exchangeGroupId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exchange_group_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"exchangeGroupId")) :: + Data.ProtoLens.FieldDescriptor ExchangeMarketLimits + defaultMarketLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "default_market_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor MarketLimitsRecord) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'defaultMarketLimits")) :: + Data.ProtoLens.FieldDescriptor ExchangeMarketLimits + commodityMarketLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "commodity_market_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CommodityMarketLimits) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"commodityMarketLimits")) :: + Data.ProtoLens.FieldDescriptor ExchangeMarketLimits + in + Data.Map.fromList + [(Data.ProtoLens.Tag 4, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, exchangeGroupId__field_descriptor), + (Data.ProtoLens.Tag 2, defaultMarketLimits__field_descriptor), + (Data.ProtoLens.Tag 3, commodityMarketLimits__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ExchangeMarketLimits'_unknownFields + (\ x__ y__ -> x__ {_ExchangeMarketLimits'_unknownFields = y__}) + defMessage + = ExchangeMarketLimits'_constructor + {_ExchangeMarketLimits'clearedFields = Data.Vector.Generic.empty, + _ExchangeMarketLimits'exchangeGroupId = Data.ProtoLens.fieldDefault, + _ExchangeMarketLimits'defaultMarketLimits = Prelude.Nothing, + _ExchangeMarketLimits'commodityMarketLimits = Data.Vector.Generic.empty, + _ExchangeMarketLimits'_unknownFields = []} + parseMessage + = let + loop :: + ExchangeMarketLimits + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld CommodityMarketLimits + -> Data.ProtoLens.Encoding.Bytes.Parser ExchangeMarketLimits + loop + x + required'exchangeGroupId + mutable'clearedFields + mutable'commodityMarketLimits + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + frozen'commodityMarketLimits <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'commodityMarketLimits) + (let + missing + = (if required'exchangeGroupId then + (:) "exchange_group_id" + else + Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'commodityMarketLimits") + frozen'commodityMarketLimits x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 32 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x required'exchangeGroupId v mutable'commodityMarketLimits + 34 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x required'exchangeGroupId y mutable'commodityMarketLimits + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "exchange_group_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"exchangeGroupId") y x) + Prelude.False mutable'clearedFields mutable'commodityMarketLimits + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "default_market_limits" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"defaultMarketLimits") y x) + required'exchangeGroupId mutable'clearedFields + mutable'commodityMarketLimits + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "commodity_market_limits" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'commodityMarketLimits y) + loop x required'exchangeGroupId mutable'clearedFields v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'exchangeGroupId mutable'clearedFields + mutable'commodityMarketLimits + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'commodityMarketLimits <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True mutable'clearedFields + mutable'commodityMarketLimits) + "ExchangeMarketLimits" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"exchangeGroupId") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'defaultMarketLimits") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'commodityMarketLimits") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData ExchangeMarketLimits where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ExchangeMarketLimits'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ExchangeMarketLimits'clearedFields x__) + (Control.DeepSeq.deepseq + (_ExchangeMarketLimits'exchangeGroupId x__) + (Control.DeepSeq.deepseq + (_ExchangeMarketLimits'defaultMarketLimits x__) + (Control.DeepSeq.deepseq + (_ExchangeMarketLimits'commodityMarketLimits x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.daysBeforeExpiration' @:: Lens' ExpirationLimit Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'daysBeforeExpiration' @:: Lens' ExpirationLimit (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.value' @:: Lens' ExpirationLimit Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'value' @:: Lens' ExpirationLimit (Prelude.Maybe Data.Int.Int32)@ -} +data ExpirationLimit + = ExpirationLimit'_constructor {_ExpirationLimit'daysBeforeExpiration :: !(Prelude.Maybe Data.Word.Word32), + _ExpirationLimit'value :: !(Prelude.Maybe Data.Int.Int32), + _ExpirationLimit'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ExpirationLimit where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ExpirationLimit "daysBeforeExpiration" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExpirationLimit'daysBeforeExpiration + (\ x__ y__ -> x__ {_ExpirationLimit'daysBeforeExpiration = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ExpirationLimit "maybe'daysBeforeExpiration" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExpirationLimit'daysBeforeExpiration + (\ x__ y__ -> x__ {_ExpirationLimit'daysBeforeExpiration = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ExpirationLimit "value" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExpirationLimit'value + (\ x__ y__ -> x__ {_ExpirationLimit'value = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ExpirationLimit "maybe'value" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExpirationLimit'value + (\ x__ y__ -> x__ {_ExpirationLimit'value = y__})) + Prelude.id +instance Data.ProtoLens.Message ExpirationLimit where + messageName _ = Data.Text.pack "traderouting_1.ExpirationLimit" + packedMessageDescriptor _ + = "\n\ + \\SIExpirationLimit\DC24\n\ + \\SYNdays_before_expiration\CAN\SOH \SOH(\rR\DC4daysBeforeExpiration\DC2\DC4\n\ + \\ENQvalue\CAN\STX \SOH(\DC1R\ENQvalue" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + daysBeforeExpiration__field_descriptor + = Data.ProtoLens.FieldDescriptor + "days_before_expiration" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'daysBeforeExpiration")) :: + Data.ProtoLens.FieldDescriptor ExpirationLimit + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'value")) :: + Data.ProtoLens.FieldDescriptor ExpirationLimit + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, daysBeforeExpiration__field_descriptor), + (Data.ProtoLens.Tag 2, value__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ExpirationLimit'_unknownFields + (\ x__ y__ -> x__ {_ExpirationLimit'_unknownFields = y__}) + defMessage + = ExpirationLimit'_constructor + {_ExpirationLimit'daysBeforeExpiration = Prelude.Nothing, + _ExpirationLimit'value = Prelude.Nothing, + _ExpirationLimit'_unknownFields = []} + parseMessage + = let + loop :: + ExpirationLimit + -> Data.ProtoLens.Encoding.Bytes.Parser ExpirationLimit + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "days_before_expiration" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"daysBeforeExpiration") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "value" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ExpirationLimit" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'daysBeforeExpiration") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData ExpirationLimit where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ExpirationLimit'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ExpirationLimit'daysBeforeExpiration x__) + (Control.DeepSeq.deepseq (_ExpirationLimit'value x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.daysBeforeExpiration' @:: Lens' ExpirationLimitDecimal Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'daysBeforeExpiration' @:: Lens' ExpirationLimitDecimal (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.value' @:: Lens' ExpirationLimitDecimal Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'value' @:: Lens' ExpirationLimitDecimal (Prelude.Maybe Proto.Common.Decimal.Decimal)@ -} +data ExpirationLimitDecimal + = ExpirationLimitDecimal'_constructor {_ExpirationLimitDecimal'daysBeforeExpiration :: !(Prelude.Maybe Data.Word.Word32), + _ExpirationLimitDecimal'value :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _ExpirationLimitDecimal'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ExpirationLimitDecimal where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ExpirationLimitDecimal "daysBeforeExpiration" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExpirationLimitDecimal'daysBeforeExpiration + (\ x__ y__ + -> x__ {_ExpirationLimitDecimal'daysBeforeExpiration = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ExpirationLimitDecimal "maybe'daysBeforeExpiration" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExpirationLimitDecimal'daysBeforeExpiration + (\ x__ y__ + -> x__ {_ExpirationLimitDecimal'daysBeforeExpiration = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ExpirationLimitDecimal "value" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExpirationLimitDecimal'value + (\ x__ y__ -> x__ {_ExpirationLimitDecimal'value = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField ExpirationLimitDecimal "maybe'value" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ExpirationLimitDecimal'value + (\ x__ y__ -> x__ {_ExpirationLimitDecimal'value = y__})) + Prelude.id +instance Data.ProtoLens.Message ExpirationLimitDecimal where + messageName _ + = Data.Text.pack "traderouting_1.ExpirationLimitDecimal" + packedMessageDescriptor _ + = "\n\ + \\SYNExpirationLimitDecimal\DC24\n\ + \\SYNdays_before_expiration\CAN\SOH \SOH(\rR\DC4daysBeforeExpiration\DC2\"\n\ + \\ENQvalue\CAN\STX \SOH(\v2\f.cqg.DecimalR\ENQvalue" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + daysBeforeExpiration__field_descriptor + = Data.ProtoLens.FieldDescriptor + "days_before_expiration" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'daysBeforeExpiration")) :: + Data.ProtoLens.FieldDescriptor ExpirationLimitDecimal + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'value")) :: + Data.ProtoLens.FieldDescriptor ExpirationLimitDecimal + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, daysBeforeExpiration__field_descriptor), + (Data.ProtoLens.Tag 2, value__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ExpirationLimitDecimal'_unknownFields + (\ x__ y__ -> x__ {_ExpirationLimitDecimal'_unknownFields = y__}) + defMessage + = ExpirationLimitDecimal'_constructor + {_ExpirationLimitDecimal'daysBeforeExpiration = Prelude.Nothing, + _ExpirationLimitDecimal'value = Prelude.Nothing, + _ExpirationLimitDecimal'_unknownFields = []} + parseMessage + = let + loop :: + ExpirationLimitDecimal + -> Data.ProtoLens.Encoding.Bytes.Parser ExpirationLimitDecimal + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "days_before_expiration" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"daysBeforeExpiration") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "value" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ExpirationLimitDecimal" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'daysBeforeExpiration") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData ExpirationLimitDecimal where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ExpirationLimitDecimal'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ExpirationLimitDecimal'daysBeforeExpiration x__) + (Control.DeepSeq.deepseq (_ExpirationLimitDecimal'value x__) ())) +data ExtendedSide + = EXTENDED_SIDE_BUY | + EXTENDED_SIDE_SELL | + EXTENDED_SIDE_SELL_SHORT | + EXTENDED_SIDE_SELL_SHORT_EXEMPT + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum ExtendedSide where + maybeToEnum 1 = Prelude.Just EXTENDED_SIDE_BUY + maybeToEnum 2 = Prelude.Just EXTENDED_SIDE_SELL + maybeToEnum 5 = Prelude.Just EXTENDED_SIDE_SELL_SHORT + maybeToEnum 6 = Prelude.Just EXTENDED_SIDE_SELL_SHORT_EXEMPT + maybeToEnum _ = Prelude.Nothing + showEnum EXTENDED_SIDE_BUY = "EXTENDED_SIDE_BUY" + showEnum EXTENDED_SIDE_SELL = "EXTENDED_SIDE_SELL" + showEnum EXTENDED_SIDE_SELL_SHORT = "EXTENDED_SIDE_SELL_SHORT" + showEnum EXTENDED_SIDE_SELL_SHORT_EXEMPT + = "EXTENDED_SIDE_SELL_SHORT_EXEMPT" + readEnum k + | (Prelude.==) k "EXTENDED_SIDE_BUY" + = Prelude.Just EXTENDED_SIDE_BUY + | (Prelude.==) k "EXTENDED_SIDE_SELL" + = Prelude.Just EXTENDED_SIDE_SELL + | (Prelude.==) k "EXTENDED_SIDE_SELL_SHORT" + = Prelude.Just EXTENDED_SIDE_SELL_SHORT + | (Prelude.==) k "EXTENDED_SIDE_SELL_SHORT_EXEMPT" + = Prelude.Just EXTENDED_SIDE_SELL_SHORT_EXEMPT + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded ExtendedSide where + minBound = EXTENDED_SIDE_BUY + maxBound = EXTENDED_SIDE_SELL_SHORT_EXEMPT +instance Prelude.Enum ExtendedSide where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum ExtendedSide: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum EXTENDED_SIDE_BUY = 1 + fromEnum EXTENDED_SIDE_SELL = 2 + fromEnum EXTENDED_SIDE_SELL_SHORT = 5 + fromEnum EXTENDED_SIDE_SELL_SHORT_EXEMPT = 6 + succ EXTENDED_SIDE_SELL_SHORT_EXEMPT + = Prelude.error + "ExtendedSide.succ: bad argument EXTENDED_SIDE_SELL_SHORT_EXEMPT. This value would be out of bounds." + succ EXTENDED_SIDE_BUY = EXTENDED_SIDE_SELL + succ EXTENDED_SIDE_SELL = EXTENDED_SIDE_SELL_SHORT + succ EXTENDED_SIDE_SELL_SHORT = EXTENDED_SIDE_SELL_SHORT_EXEMPT + pred EXTENDED_SIDE_BUY + = Prelude.error + "ExtendedSide.pred: bad argument EXTENDED_SIDE_BUY. This value would be out of bounds." + pred EXTENDED_SIDE_SELL = EXTENDED_SIDE_BUY + pred EXTENDED_SIDE_SELL_SHORT = EXTENDED_SIDE_SELL + pred EXTENDED_SIDE_SELL_SHORT_EXEMPT = EXTENDED_SIDE_SELL_SHORT + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault ExtendedSide where + fieldDefault = EXTENDED_SIDE_BUY +instance Control.DeepSeq.NFData ExtendedSide where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' FungibleCommodity Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' FungibleCommodity (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.name' @:: Lens' FungibleCommodity Proto.Common.Shared1.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'name' @:: Lens' FungibleCommodity (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradableCommodity' @:: Lens' FungibleCommodity [TradableCommodity]@ + * 'Proto.CMS.Traderouting1_Fields.vec'tradableCommodity' @:: Lens' FungibleCommodity (Data.Vector.Vector TradableCommodity)@ + * 'Proto.CMS.Traderouting1_Fields.isUs' @:: Lens' FungibleCommodity Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isUs' @:: Lens' FungibleCommodity (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.instrumentTypeId' @:: Lens' FungibleCommodity [Data.Int.Int32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'instrumentTypeId' @:: Lens' FungibleCommodity (Data.Vector.Unboxed.Vector Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.marginGroupId' @:: Lens' FungibleCommodity Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'marginGroupId' @:: Lens' FungibleCommodity (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.prefix' @:: Lens' FungibleCommodity Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'prefix' @:: Lens' FungibleCommodity (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.extendedCode' @:: Lens' FungibleCommodity Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'extendedCode' @:: Lens' FungibleCommodity (Prelude.Maybe Data.Text.Text)@ -} +data FungibleCommodity + = FungibleCommodity'_constructor {_FungibleCommodity'id :: !(Prelude.Maybe Data.Int.Int32), + _FungibleCommodity'name :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _FungibleCommodity'tradableCommodity :: !(Data.Vector.Vector TradableCommodity), + _FungibleCommodity'isUs :: !(Prelude.Maybe Prelude.Bool), + _FungibleCommodity'instrumentTypeId :: !(Data.Vector.Unboxed.Vector Data.Int.Int32), + _FungibleCommodity'marginGroupId :: !(Prelude.Maybe Data.Text.Text), + _FungibleCommodity'prefix :: !(Prelude.Maybe Data.Text.Text), + _FungibleCommodity'extendedCode :: !(Prelude.Maybe Data.Text.Text), + _FungibleCommodity'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show FungibleCommodity where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField FungibleCommodity "id" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'id + (\ x__ y__ -> x__ {_FungibleCommodity'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField FungibleCommodity "maybe'id" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'id + (\ x__ y__ -> x__ {_FungibleCommodity'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField FungibleCommodity "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'name + (\ x__ y__ -> x__ {_FungibleCommodity'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField FungibleCommodity "maybe'name" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'name + (\ x__ y__ -> x__ {_FungibleCommodity'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField FungibleCommodity "tradableCommodity" [TradableCommodity] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'tradableCommodity + (\ x__ y__ -> x__ {_FungibleCommodity'tradableCommodity = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField FungibleCommodity "vec'tradableCommodity" (Data.Vector.Vector TradableCommodity) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'tradableCommodity + (\ x__ y__ -> x__ {_FungibleCommodity'tradableCommodity = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField FungibleCommodity "isUs" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'isUs + (\ x__ y__ -> x__ {_FungibleCommodity'isUs = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField FungibleCommodity "maybe'isUs" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'isUs + (\ x__ y__ -> x__ {_FungibleCommodity'isUs = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField FungibleCommodity "instrumentTypeId" [Data.Int.Int32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'instrumentTypeId + (\ x__ y__ -> x__ {_FungibleCommodity'instrumentTypeId = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField FungibleCommodity "vec'instrumentTypeId" (Data.Vector.Unboxed.Vector Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'instrumentTypeId + (\ x__ y__ -> x__ {_FungibleCommodity'instrumentTypeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField FungibleCommodity "marginGroupId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'marginGroupId + (\ x__ y__ -> x__ {_FungibleCommodity'marginGroupId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField FungibleCommodity "maybe'marginGroupId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'marginGroupId + (\ x__ y__ -> x__ {_FungibleCommodity'marginGroupId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField FungibleCommodity "prefix" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'prefix + (\ x__ y__ -> x__ {_FungibleCommodity'prefix = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField FungibleCommodity "maybe'prefix" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'prefix + (\ x__ y__ -> x__ {_FungibleCommodity'prefix = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField FungibleCommodity "extendedCode" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'extendedCode + (\ x__ y__ -> x__ {_FungibleCommodity'extendedCode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField FungibleCommodity "maybe'extendedCode" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _FungibleCommodity'extendedCode + (\ x__ y__ -> x__ {_FungibleCommodity'extendedCode = y__})) + Prelude.id +instance Data.ProtoLens.Message FungibleCommodity where + messageName _ = Data.Text.pack "traderouting_1.FungibleCommodity" + packedMessageDescriptor _ + = "\n\ + \\DC1FungibleCommodity\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\DC1R\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname\DC2P\n\ + \\DC2tradable_commodity\CAN\ETX \ETX(\v2!.traderouting_1.TradableCommodityR\DC1tradableCommodity\DC2\DC3\n\ + \\ENQis_us\CAN\EOT \SOH(\bR\EOTisUs\DC2,\n\ + \\DC2instrument_type_id\CAN\ENQ \ETX(\DC1R\DLEinstrumentTypeId\DC2&\n\ + \\SImargin_group_id\CAN\ACK \SOH(\tR\rmarginGroupId\DC2\SYN\n\ + \\ACKprefix\CAN\a \SOH(\tR\ACKprefix\DC2#\n\ + \\rextended_code\CAN\b \SOH(\tR\fextendedCode" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor FungibleCommodity + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor FungibleCommodity + tradableCommodity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "tradable_commodity" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TradableCommodity) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"tradableCommodity")) :: + Data.ProtoLens.FieldDescriptor FungibleCommodity + isUs__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_us" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isUs")) :: + Data.ProtoLens.FieldDescriptor FungibleCommodity + instrumentTypeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "instrument_type_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"instrumentTypeId")) :: + Data.ProtoLens.FieldDescriptor FungibleCommodity + marginGroupId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "margin_group_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'marginGroupId")) :: + Data.ProtoLens.FieldDescriptor FungibleCommodity + prefix__field_descriptor + = Data.ProtoLens.FieldDescriptor + "prefix" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'prefix")) :: + Data.ProtoLens.FieldDescriptor FungibleCommodity + extendedCode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "extended_code" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'extendedCode")) :: + Data.ProtoLens.FieldDescriptor FungibleCommodity + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, tradableCommodity__field_descriptor), + (Data.ProtoLens.Tag 4, isUs__field_descriptor), + (Data.ProtoLens.Tag 5, instrumentTypeId__field_descriptor), + (Data.ProtoLens.Tag 6, marginGroupId__field_descriptor), + (Data.ProtoLens.Tag 7, prefix__field_descriptor), + (Data.ProtoLens.Tag 8, extendedCode__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _FungibleCommodity'_unknownFields + (\ x__ y__ -> x__ {_FungibleCommodity'_unknownFields = y__}) + defMessage + = FungibleCommodity'_constructor + {_FungibleCommodity'id = Prelude.Nothing, + _FungibleCommodity'name = Prelude.Nothing, + _FungibleCommodity'tradableCommodity = Data.Vector.Generic.empty, + _FungibleCommodity'isUs = Prelude.Nothing, + _FungibleCommodity'instrumentTypeId = Data.Vector.Generic.empty, + _FungibleCommodity'marginGroupId = Prelude.Nothing, + _FungibleCommodity'prefix = Prelude.Nothing, + _FungibleCommodity'extendedCode = Prelude.Nothing, + _FungibleCommodity'_unknownFields = []} + parseMessage + = let + loop :: + FungibleCommodity + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Int.Int32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld TradableCommodity + -> Data.ProtoLens.Encoding.Bytes.Parser FungibleCommodity + loop x mutable'instrumentTypeId mutable'tradableCommodity + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'instrumentTypeId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'instrumentTypeId) + frozen'tradableCommodity <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'tradableCommodity) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'instrumentTypeId") + frozen'instrumentTypeId + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'tradableCommodity") + frozen'tradableCommodity x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + mutable'instrumentTypeId mutable'tradableCommodity + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + mutable'instrumentTypeId mutable'tradableCommodity + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "tradable_commodity" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'tradableCommodity y) + loop x mutable'instrumentTypeId v + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_us" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isUs") y x) + mutable'instrumentTypeId mutable'tradableCommodity + 40 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "instrument_type_id" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'instrumentTypeId y) + loop x v mutable'tradableCommodity + 42 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "instrument_type_id" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'instrumentTypeId) + loop x y mutable'tradableCommodity + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "margin_group_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"marginGroupId") y x) + mutable'instrumentTypeId mutable'tradableCommodity + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "prefix" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"prefix") y x) + mutable'instrumentTypeId mutable'tradableCommodity + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "extended_code" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"extendedCode") y x) + mutable'instrumentTypeId mutable'tradableCommodity + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'instrumentTypeId mutable'tradableCommodity + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'instrumentTypeId <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'tradableCommodity <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'instrumentTypeId + mutable'tradableCommodity) + "FungibleCommodity" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'tradableCommodity") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'isUs") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'instrumentTypeId") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'marginGroupId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'prefix") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'extendedCode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))))) +instance Control.DeepSeq.NFData FungibleCommodity where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_FungibleCommodity'_unknownFields x__) + (Control.DeepSeq.deepseq + (_FungibleCommodity'id x__) + (Control.DeepSeq.deepseq + (_FungibleCommodity'name x__) + (Control.DeepSeq.deepseq + (_FungibleCommodity'tradableCommodity x__) + (Control.DeepSeq.deepseq + (_FungibleCommodity'isUs x__) + (Control.DeepSeq.deepseq + (_FungibleCommodity'instrumentTypeId x__) + (Control.DeepSeq.deepseq + (_FungibleCommodity'marginGroupId x__) + (Control.DeepSeq.deepseq + (_FungibleCommodity'prefix x__) + (Control.DeepSeq.deepseq + (_FungibleCommodity'extendedCode x__) ())))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.chainOrderId' @:: Lens' IgnoreOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'chainOrderId' @:: Lens' IgnoreOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' IgnoreOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' IgnoreOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' IgnoreOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' IgnoreOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.action' @:: Lens' IgnoreOrder Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'action' @:: Lens' IgnoreOrder (Prelude.Maybe Prelude.Bool)@ -} +data IgnoreOrder + = IgnoreOrder'_constructor {_IgnoreOrder'chainOrderId :: !(Prelude.Maybe Data.Text.Text), + _IgnoreOrder'accountId :: !(Prelude.Maybe Data.Text.Text), + _IgnoreOrder'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _IgnoreOrder'action :: !(Prelude.Maybe Prelude.Bool), + _IgnoreOrder'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show IgnoreOrder where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField IgnoreOrder "chainOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _IgnoreOrder'chainOrderId + (\ x__ y__ -> x__ {_IgnoreOrder'chainOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField IgnoreOrder "maybe'chainOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _IgnoreOrder'chainOrderId + (\ x__ y__ -> x__ {_IgnoreOrder'chainOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField IgnoreOrder "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _IgnoreOrder'accountId + (\ x__ y__ -> x__ {_IgnoreOrder'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField IgnoreOrder "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _IgnoreOrder'accountId + (\ x__ y__ -> x__ {_IgnoreOrder'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField IgnoreOrder "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _IgnoreOrder'tradeLocationId + (\ x__ y__ -> x__ {_IgnoreOrder'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField IgnoreOrder "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _IgnoreOrder'tradeLocationId + (\ x__ y__ -> x__ {_IgnoreOrder'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField IgnoreOrder "action" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _IgnoreOrder'action (\ x__ y__ -> x__ {_IgnoreOrder'action = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField IgnoreOrder "maybe'action" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _IgnoreOrder'action (\ x__ y__ -> x__ {_IgnoreOrder'action = y__})) + Prelude.id +instance Data.ProtoLens.Message IgnoreOrder where + messageName _ = Data.Text.pack "traderouting_1.IgnoreOrder" + packedMessageDescriptor _ + = "\n\ + \\vIgnoreOrder\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\tR\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2\SYN\n\ + \\ACKaction\CAN\EOT \SOH(\bR\ACKaction" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + chainOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "chain_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'chainOrderId")) :: + Data.ProtoLens.FieldDescriptor IgnoreOrder + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor IgnoreOrder + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor IgnoreOrder + action__field_descriptor + = Data.ProtoLens.FieldDescriptor + "action" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'action")) :: + Data.ProtoLens.FieldDescriptor IgnoreOrder + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, chainOrderId__field_descriptor), + (Data.ProtoLens.Tag 2, accountId__field_descriptor), + (Data.ProtoLens.Tag 3, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 4, action__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _IgnoreOrder'_unknownFields + (\ x__ y__ -> x__ {_IgnoreOrder'_unknownFields = y__}) + defMessage + = IgnoreOrder'_constructor + {_IgnoreOrder'chainOrderId = Prelude.Nothing, + _IgnoreOrder'accountId = Prelude.Nothing, + _IgnoreOrder'tradeLocationId = Prelude.Nothing, + _IgnoreOrder'action = Prelude.Nothing, + _IgnoreOrder'_unknownFields = []} + parseMessage + = let + loop :: + IgnoreOrder -> Data.ProtoLens.Encoding.Bytes.Parser IgnoreOrder + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "chain_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"chainOrderId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "action" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"action") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "IgnoreOrder" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'chainOrderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'action") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData IgnoreOrder where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_IgnoreOrder'_unknownFields x__) + (Control.DeepSeq.deepseq + (_IgnoreOrder'chainOrderId x__) + (Control.DeepSeq.deepseq + (_IgnoreOrder'accountId x__) + (Control.DeepSeq.deepseq + (_IgnoreOrder'tradeLocationId x__) + (Control.DeepSeq.deepseq (_IgnoreOrder'action x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clearedFields' @:: Lens' InstrumentMarketLimits [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clearedFields' @:: Lens' InstrumentMarketLimits (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.instrumentTypeId' @:: Lens' InstrumentMarketLimits Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.positionAndTradeLimits' @:: Lens' InstrumentMarketLimits PositionAndTradeLimits@ + * 'Proto.CMS.Traderouting1_Fields.maybe'positionAndTradeLimits' @:: Lens' InstrumentMarketLimits (Prelude.Maybe PositionAndTradeLimits)@ + * 'Proto.CMS.Traderouting1_Fields.allowedToTradeCommodities' @:: Lens' InstrumentMarketLimits [EntityAllowedToTrade]@ + * 'Proto.CMS.Traderouting1_Fields.vec'allowedToTradeCommodities' @:: Lens' InstrumentMarketLimits (Data.Vector.Vector EntityAllowedToTrade)@ + * 'Proto.CMS.Traderouting1_Fields.allowedToTradeContracts' @:: Lens' InstrumentMarketLimits [EntityAllowedToTrade]@ + * 'Proto.CMS.Traderouting1_Fields.vec'allowedToTradeContracts' @:: Lens' InstrumentMarketLimits (Data.Vector.Vector EntityAllowedToTrade)@ -} +data InstrumentMarketLimits + = InstrumentMarketLimits'_constructor {_InstrumentMarketLimits'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _InstrumentMarketLimits'instrumentTypeId :: !Data.Int.Int32, + _InstrumentMarketLimits'positionAndTradeLimits :: !(Prelude.Maybe PositionAndTradeLimits), + _InstrumentMarketLimits'allowedToTradeCommodities :: !(Data.Vector.Vector EntityAllowedToTrade), + _InstrumentMarketLimits'allowedToTradeContracts :: !(Data.Vector.Vector EntityAllowedToTrade), + _InstrumentMarketLimits'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show InstrumentMarketLimits where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField InstrumentMarketLimits "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentMarketLimits'clearedFields + (\ x__ y__ -> x__ {_InstrumentMarketLimits'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField InstrumentMarketLimits "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentMarketLimits'clearedFields + (\ x__ y__ -> x__ {_InstrumentMarketLimits'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InstrumentMarketLimits "instrumentTypeId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentMarketLimits'instrumentTypeId + (\ x__ y__ + -> x__ {_InstrumentMarketLimits'instrumentTypeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InstrumentMarketLimits "positionAndTradeLimits" PositionAndTradeLimits where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentMarketLimits'positionAndTradeLimits + (\ x__ y__ + -> x__ {_InstrumentMarketLimits'positionAndTradeLimits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField InstrumentMarketLimits "maybe'positionAndTradeLimits" (Prelude.Maybe PositionAndTradeLimits) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentMarketLimits'positionAndTradeLimits + (\ x__ y__ + -> x__ {_InstrumentMarketLimits'positionAndTradeLimits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InstrumentMarketLimits "allowedToTradeCommodities" [EntityAllowedToTrade] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentMarketLimits'allowedToTradeCommodities + (\ x__ y__ + -> x__ {_InstrumentMarketLimits'allowedToTradeCommodities = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField InstrumentMarketLimits "vec'allowedToTradeCommodities" (Data.Vector.Vector EntityAllowedToTrade) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentMarketLimits'allowedToTradeCommodities + (\ x__ y__ + -> x__ {_InstrumentMarketLimits'allowedToTradeCommodities = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InstrumentMarketLimits "allowedToTradeContracts" [EntityAllowedToTrade] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentMarketLimits'allowedToTradeContracts + (\ x__ y__ + -> x__ {_InstrumentMarketLimits'allowedToTradeContracts = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField InstrumentMarketLimits "vec'allowedToTradeContracts" (Data.Vector.Vector EntityAllowedToTrade) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentMarketLimits'allowedToTradeContracts + (\ x__ y__ + -> x__ {_InstrumentMarketLimits'allowedToTradeContracts = y__})) + Prelude.id +instance Data.ProtoLens.Message InstrumentMarketLimits where + messageName _ + = Data.Text.pack "traderouting_1.InstrumentMarketLimits" + packedMessageDescriptor _ + = "\n\ + \\SYNInstrumentMarketLimits\DC2%\n\ + \\SOcleared_fields\CAN\ENQ \ETX(\rR\rclearedFields\DC2,\n\ + \\DC2instrument_type_id\CAN\SOH \STX(\DC1R\DLEinstrumentTypeId\DC2a\n\ + \\EMposition_and_trade_limits\CAN\STX \SOH(\v2&.traderouting_1.PositionAndTradeLimitsR\SYNpositionAndTradeLimits\DC2e\n\ + \\FSallowed_to_trade_commodities\CAN\ETX \ETX(\v2$.traderouting_1.EntityAllowedToTradeR\EMallowedToTradeCommodities\DC2a\n\ + \\SUBallowed_to_trade_contracts\CAN\EOT \ETX(\v2$.traderouting_1.EntityAllowedToTradeR\ETBallowedToTradeContracts" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor InstrumentMarketLimits + instrumentTypeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "instrument_type_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"instrumentTypeId")) :: + Data.ProtoLens.FieldDescriptor InstrumentMarketLimits + positionAndTradeLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "position_and_trade_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor PositionAndTradeLimits) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'positionAndTradeLimits")) :: + Data.ProtoLens.FieldDescriptor InstrumentMarketLimits + allowedToTradeCommodities__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allowed_to_trade_commodities" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EntityAllowedToTrade) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"allowedToTradeCommodities")) :: + Data.ProtoLens.FieldDescriptor InstrumentMarketLimits + allowedToTradeContracts__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allowed_to_trade_contracts" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EntityAllowedToTrade) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"allowedToTradeContracts")) :: + Data.ProtoLens.FieldDescriptor InstrumentMarketLimits + in + Data.Map.fromList + [(Data.ProtoLens.Tag 5, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, instrumentTypeId__field_descriptor), + (Data.ProtoLens.Tag 2, positionAndTradeLimits__field_descriptor), + (Data.ProtoLens.Tag 3, + allowedToTradeCommodities__field_descriptor), + (Data.ProtoLens.Tag 4, allowedToTradeContracts__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _InstrumentMarketLimits'_unknownFields + (\ x__ y__ -> x__ {_InstrumentMarketLimits'_unknownFields = y__}) + defMessage + = InstrumentMarketLimits'_constructor + {_InstrumentMarketLimits'clearedFields = Data.Vector.Generic.empty, + _InstrumentMarketLimits'instrumentTypeId = Data.ProtoLens.fieldDefault, + _InstrumentMarketLimits'positionAndTradeLimits = Prelude.Nothing, + _InstrumentMarketLimits'allowedToTradeCommodities = Data.Vector.Generic.empty, + _InstrumentMarketLimits'allowedToTradeContracts = Data.Vector.Generic.empty, + _InstrumentMarketLimits'_unknownFields = []} + parseMessage + = let + loop :: + InstrumentMarketLimits + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld EntityAllowedToTrade + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld EntityAllowedToTrade + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser InstrumentMarketLimits + loop + x + required'instrumentTypeId + mutable'allowedToTradeCommodities + mutable'allowedToTradeContracts + mutable'clearedFields + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'allowedToTradeCommodities <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'allowedToTradeCommodities) + frozen'allowedToTradeContracts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'allowedToTradeContracts) + frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + (let + missing + = (if required'instrumentTypeId then + (:) "instrument_type_id" + else + Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'allowedToTradeCommodities") + frozen'allowedToTradeCommodities + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'allowedToTradeContracts") + frozen'allowedToTradeContracts + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields x)))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 40 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop + x required'instrumentTypeId mutable'allowedToTradeCommodities + mutable'allowedToTradeContracts v + 42 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop + x required'instrumentTypeId mutable'allowedToTradeCommodities + mutable'allowedToTradeContracts y + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "instrument_type_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"instrumentTypeId") y x) + Prelude.False mutable'allowedToTradeCommodities + mutable'allowedToTradeContracts mutable'clearedFields + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "position_and_trade_limits" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"positionAndTradeLimits") y x) + required'instrumentTypeId mutable'allowedToTradeCommodities + mutable'allowedToTradeContracts mutable'clearedFields + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "allowed_to_trade_commodities" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'allowedToTradeCommodities y) + loop + x required'instrumentTypeId v mutable'allowedToTradeContracts + mutable'clearedFields + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "allowed_to_trade_contracts" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'allowedToTradeContracts y) + loop + x required'instrumentTypeId mutable'allowedToTradeCommodities v + mutable'clearedFields + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'instrumentTypeId mutable'allowedToTradeCommodities + mutable'allowedToTradeContracts mutable'clearedFields + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'allowedToTradeCommodities <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'allowedToTradeContracts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True + mutable'allowedToTradeCommodities mutable'allowedToTradeContracts + mutable'clearedFields) + "InstrumentMarketLimits" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"instrumentTypeId") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'positionAndTradeLimits") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'allowedToTradeCommodities") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'allowedToTradeContracts") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData InstrumentMarketLimits where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_InstrumentMarketLimits'_unknownFields x__) + (Control.DeepSeq.deepseq + (_InstrumentMarketLimits'clearedFields x__) + (Control.DeepSeq.deepseq + (_InstrumentMarketLimits'instrumentTypeId x__) + (Control.DeepSeq.deepseq + (_InstrumentMarketLimits'positionAndTradeLimits x__) + (Control.DeepSeq.deepseq + (_InstrumentMarketLimits'allowedToTradeCommodities x__) + (Control.DeepSeq.deepseq + (_InstrumentMarketLimits'allowedToTradeContracts x__) ()))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' InstrumentType Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.name' @:: Lens' InstrumentType Proto.Common.Shared1.Text@ + * 'Proto.CMS.Traderouting1_Fields.allowedLimits' @:: Lens' InstrumentType [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'allowedLimits' @:: Lens' InstrumentType (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.instrumentGroup' @:: Lens' InstrumentType Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'instrumentGroup' @:: Lens' InstrumentType (Prelude.Maybe Data.Word.Word32)@ -} +data InstrumentType + = InstrumentType'_constructor {_InstrumentType'id :: !Data.Int.Int32, + _InstrumentType'name :: !Proto.Common.Shared1.Text, + _InstrumentType'allowedLimits :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _InstrumentType'instrumentGroup :: !(Prelude.Maybe Data.Word.Word32), + _InstrumentType'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show InstrumentType where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField InstrumentType "id" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentType'id (\ x__ y__ -> x__ {_InstrumentType'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InstrumentType "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentType'name + (\ x__ y__ -> x__ {_InstrumentType'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InstrumentType "allowedLimits" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentType'allowedLimits + (\ x__ y__ -> x__ {_InstrumentType'allowedLimits = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField InstrumentType "vec'allowedLimits" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentType'allowedLimits + (\ x__ y__ -> x__ {_InstrumentType'allowedLimits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField InstrumentType "instrumentGroup" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentType'instrumentGroup + (\ x__ y__ -> x__ {_InstrumentType'instrumentGroup = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField InstrumentType "maybe'instrumentGroup" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _InstrumentType'instrumentGroup + (\ x__ y__ -> x__ {_InstrumentType'instrumentGroup = y__})) + Prelude.id +instance Data.ProtoLens.Message InstrumentType where + messageName _ = Data.Text.pack "traderouting_1.InstrumentType" + packedMessageDescriptor _ + = "\n\ + \\SOInstrumentType\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\DC1R\STXid\DC2\"\n\ + \\EOTname\CAN\STX \STX(\v2\SO.shared_1.TextR\EOTname\DC2%\n\ + \\SOallowed_limits\CAN\ETX \ETX(\rR\rallowedLimits\DC2)\n\ + \\DLEinstrument_group\CAN\EOT \SOH(\rR\SIinstrumentGroup\"\176\SOH\n\ + \\SIMarketLimitType\DC2\GS\n\ + \\EMINSTRUMENT_POSITION_LIMIT\DLE\SOH\DC2\ESC\n\ + \\ETBCONTRACT_POSITION_LIMIT\DLE\STX\DC2\DC4\n\ + \\DLETRADE_SIZE_LIMIT\DLE\ETX\DC2\NAK\n\ + \\DC1TRADE_PRICE_LIMIT\DLE\EOT\DC2\ESC\n\ + \\ETBLAST_TRADING_DATE_LIMIT\DLE\ENQ\DC2\ETB\n\ + \\DC3LONG_POSITIONS_ONLY\DLE\ACK\"\142\SOH\n\ + \\DC3InstrumentGroupType\DC2\v\n\ + \\aFUTURES\DLE\SOH\DC2\v\n\ + \\aOPTIONS\DLE\STX\DC2\SO\n\ + \\n\ + \STRATEGIES\DLE\ETX\DC2\v\n\ + \\aINDICES\DLE\EOT\DC2\DLE\n\ + \\fFIXED_INCOME\DLE\ENQ\DC2\r\n\ + \\tCASH_SPOT\DLE\ACK\DC2\DC1\n\ + \\rDAILY_FUTURES\DLE\a\DC2\f\n\ + \\bEQUITIES\DLE\b" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"id")) :: + Data.ProtoLens.FieldDescriptor InstrumentType + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"name")) :: + Data.ProtoLens.FieldDescriptor InstrumentType + allowedLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allowed_limits" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"allowedLimits")) :: + Data.ProtoLens.FieldDescriptor InstrumentType + instrumentGroup__field_descriptor + = Data.ProtoLens.FieldDescriptor + "instrument_group" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'instrumentGroup")) :: + Data.ProtoLens.FieldDescriptor InstrumentType + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, allowedLimits__field_descriptor), + (Data.ProtoLens.Tag 4, instrumentGroup__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _InstrumentType'_unknownFields + (\ x__ y__ -> x__ {_InstrumentType'_unknownFields = y__}) + defMessage + = InstrumentType'_constructor + {_InstrumentType'id = Data.ProtoLens.fieldDefault, + _InstrumentType'name = Data.ProtoLens.defMessage, + _InstrumentType'allowedLimits = Data.Vector.Generic.empty, + _InstrumentType'instrumentGroup = Prelude.Nothing, + _InstrumentType'_unknownFields = []} + parseMessage + = let + loop :: + InstrumentType + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser InstrumentType + loop x required'id required'name mutable'allowedLimits + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'allowedLimits <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'allowedLimits) + (let + missing + = (if required'id then (:) "id" else Prelude.id) + ((if required'name then (:) "name" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'allowedLimits") + frozen'allowedLimits x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + Prelude.False required'name mutable'allowedLimits + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + required'id Prelude.False mutable'allowedLimits + 24 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "allowed_limits" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'allowedLimits y) + loop x required'id required'name v + 26 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "allowed_limits" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'allowedLimits) + loop x required'id required'name y + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "instrument_group" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"instrumentGroup") y x) + required'id required'name mutable'allowedLimits + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'id required'name mutable'allowedLimits + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'allowedLimits <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True Prelude.True + mutable'allowedLimits) + "InstrumentType" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"id") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view (Data.ProtoLens.Field.field @"name") _x))) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'allowedLimits") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'instrumentGroup") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData InstrumentType where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_InstrumentType'_unknownFields x__) + (Control.DeepSeq.deepseq + (_InstrumentType'id x__) + (Control.DeepSeq.deepseq + (_InstrumentType'name x__) + (Control.DeepSeq.deepseq + (_InstrumentType'allowedLimits x__) + (Control.DeepSeq.deepseq + (_InstrumentType'instrumentGroup x__) ())))) +data InstrumentType'InstrumentGroupType + = InstrumentType'FUTURES | + InstrumentType'OPTIONS | + InstrumentType'STRATEGIES | + InstrumentType'INDICES | + InstrumentType'FIXED_INCOME | + InstrumentType'CASH_SPOT | + InstrumentType'DAILY_FUTURES | + InstrumentType'EQUITIES + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum InstrumentType'InstrumentGroupType where + maybeToEnum 1 = Prelude.Just InstrumentType'FUTURES + maybeToEnum 2 = Prelude.Just InstrumentType'OPTIONS + maybeToEnum 3 = Prelude.Just InstrumentType'STRATEGIES + maybeToEnum 4 = Prelude.Just InstrumentType'INDICES + maybeToEnum 5 = Prelude.Just InstrumentType'FIXED_INCOME + maybeToEnum 6 = Prelude.Just InstrumentType'CASH_SPOT + maybeToEnum 7 = Prelude.Just InstrumentType'DAILY_FUTURES + maybeToEnum 8 = Prelude.Just InstrumentType'EQUITIES + maybeToEnum _ = Prelude.Nothing + showEnum InstrumentType'FUTURES = "FUTURES" + showEnum InstrumentType'OPTIONS = "OPTIONS" + showEnum InstrumentType'STRATEGIES = "STRATEGIES" + showEnum InstrumentType'INDICES = "INDICES" + showEnum InstrumentType'FIXED_INCOME = "FIXED_INCOME" + showEnum InstrumentType'CASH_SPOT = "CASH_SPOT" + showEnum InstrumentType'DAILY_FUTURES = "DAILY_FUTURES" + showEnum InstrumentType'EQUITIES = "EQUITIES" + readEnum k + | (Prelude.==) k "FUTURES" = Prelude.Just InstrumentType'FUTURES + | (Prelude.==) k "OPTIONS" = Prelude.Just InstrumentType'OPTIONS + | (Prelude.==) k "STRATEGIES" + = Prelude.Just InstrumentType'STRATEGIES + | (Prelude.==) k "INDICES" = Prelude.Just InstrumentType'INDICES + | (Prelude.==) k "FIXED_INCOME" + = Prelude.Just InstrumentType'FIXED_INCOME + | (Prelude.==) k "CASH_SPOT" + = Prelude.Just InstrumentType'CASH_SPOT + | (Prelude.==) k "DAILY_FUTURES" + = Prelude.Just InstrumentType'DAILY_FUTURES + | (Prelude.==) k "EQUITIES" = Prelude.Just InstrumentType'EQUITIES + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded InstrumentType'InstrumentGroupType where + minBound = InstrumentType'FUTURES + maxBound = InstrumentType'EQUITIES +instance Prelude.Enum InstrumentType'InstrumentGroupType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum InstrumentGroupType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum InstrumentType'FUTURES = 1 + fromEnum InstrumentType'OPTIONS = 2 + fromEnum InstrumentType'STRATEGIES = 3 + fromEnum InstrumentType'INDICES = 4 + fromEnum InstrumentType'FIXED_INCOME = 5 + fromEnum InstrumentType'CASH_SPOT = 6 + fromEnum InstrumentType'DAILY_FUTURES = 7 + fromEnum InstrumentType'EQUITIES = 8 + succ InstrumentType'EQUITIES + = Prelude.error + "InstrumentType'InstrumentGroupType.succ: bad argument InstrumentType'EQUITIES. This value would be out of bounds." + succ InstrumentType'FUTURES = InstrumentType'OPTIONS + succ InstrumentType'OPTIONS = InstrumentType'STRATEGIES + succ InstrumentType'STRATEGIES = InstrumentType'INDICES + succ InstrumentType'INDICES = InstrumentType'FIXED_INCOME + succ InstrumentType'FIXED_INCOME = InstrumentType'CASH_SPOT + succ InstrumentType'CASH_SPOT = InstrumentType'DAILY_FUTURES + succ InstrumentType'DAILY_FUTURES = InstrumentType'EQUITIES + pred InstrumentType'FUTURES + = Prelude.error + "InstrumentType'InstrumentGroupType.pred: bad argument InstrumentType'FUTURES. This value would be out of bounds." + pred InstrumentType'OPTIONS = InstrumentType'FUTURES + pred InstrumentType'STRATEGIES = InstrumentType'OPTIONS + pred InstrumentType'INDICES = InstrumentType'STRATEGIES + pred InstrumentType'FIXED_INCOME = InstrumentType'INDICES + pred InstrumentType'CASH_SPOT = InstrumentType'FIXED_INCOME + pred InstrumentType'DAILY_FUTURES = InstrumentType'CASH_SPOT + pred InstrumentType'EQUITIES = InstrumentType'DAILY_FUTURES + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault InstrumentType'InstrumentGroupType where + fieldDefault = InstrumentType'FUTURES +instance Control.DeepSeq.NFData InstrumentType'InstrumentGroupType where + rnf x__ = Prelude.seq x__ () +data InstrumentType'MarketLimitType + = InstrumentType'INSTRUMENT_POSITION_LIMIT | + InstrumentType'CONTRACT_POSITION_LIMIT | + InstrumentType'TRADE_SIZE_LIMIT | + InstrumentType'TRADE_PRICE_LIMIT | + InstrumentType'LAST_TRADING_DATE_LIMIT | + InstrumentType'LONG_POSITIONS_ONLY + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum InstrumentType'MarketLimitType where + maybeToEnum 1 + = Prelude.Just InstrumentType'INSTRUMENT_POSITION_LIMIT + maybeToEnum 2 = Prelude.Just InstrumentType'CONTRACT_POSITION_LIMIT + maybeToEnum 3 = Prelude.Just InstrumentType'TRADE_SIZE_LIMIT + maybeToEnum 4 = Prelude.Just InstrumentType'TRADE_PRICE_LIMIT + maybeToEnum 5 = Prelude.Just InstrumentType'LAST_TRADING_DATE_LIMIT + maybeToEnum 6 = Prelude.Just InstrumentType'LONG_POSITIONS_ONLY + maybeToEnum _ = Prelude.Nothing + showEnum InstrumentType'INSTRUMENT_POSITION_LIMIT + = "INSTRUMENT_POSITION_LIMIT" + showEnum InstrumentType'CONTRACT_POSITION_LIMIT + = "CONTRACT_POSITION_LIMIT" + showEnum InstrumentType'TRADE_SIZE_LIMIT = "TRADE_SIZE_LIMIT" + showEnum InstrumentType'TRADE_PRICE_LIMIT = "TRADE_PRICE_LIMIT" + showEnum InstrumentType'LAST_TRADING_DATE_LIMIT + = "LAST_TRADING_DATE_LIMIT" + showEnum InstrumentType'LONG_POSITIONS_ONLY = "LONG_POSITIONS_ONLY" + readEnum k + | (Prelude.==) k "INSTRUMENT_POSITION_LIMIT" + = Prelude.Just InstrumentType'INSTRUMENT_POSITION_LIMIT + | (Prelude.==) k "CONTRACT_POSITION_LIMIT" + = Prelude.Just InstrumentType'CONTRACT_POSITION_LIMIT + | (Prelude.==) k "TRADE_SIZE_LIMIT" + = Prelude.Just InstrumentType'TRADE_SIZE_LIMIT + | (Prelude.==) k "TRADE_PRICE_LIMIT" + = Prelude.Just InstrumentType'TRADE_PRICE_LIMIT + | (Prelude.==) k "LAST_TRADING_DATE_LIMIT" + = Prelude.Just InstrumentType'LAST_TRADING_DATE_LIMIT + | (Prelude.==) k "LONG_POSITIONS_ONLY" + = Prelude.Just InstrumentType'LONG_POSITIONS_ONLY + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded InstrumentType'MarketLimitType where + minBound = InstrumentType'INSTRUMENT_POSITION_LIMIT + maxBound = InstrumentType'LONG_POSITIONS_ONLY +instance Prelude.Enum InstrumentType'MarketLimitType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum MarketLimitType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum InstrumentType'INSTRUMENT_POSITION_LIMIT = 1 + fromEnum InstrumentType'CONTRACT_POSITION_LIMIT = 2 + fromEnum InstrumentType'TRADE_SIZE_LIMIT = 3 + fromEnum InstrumentType'TRADE_PRICE_LIMIT = 4 + fromEnum InstrumentType'LAST_TRADING_DATE_LIMIT = 5 + fromEnum InstrumentType'LONG_POSITIONS_ONLY = 6 + succ InstrumentType'LONG_POSITIONS_ONLY + = Prelude.error + "InstrumentType'MarketLimitType.succ: bad argument InstrumentType'LONG_POSITIONS_ONLY. This value would be out of bounds." + succ InstrumentType'INSTRUMENT_POSITION_LIMIT + = InstrumentType'CONTRACT_POSITION_LIMIT + succ InstrumentType'CONTRACT_POSITION_LIMIT + = InstrumentType'TRADE_SIZE_LIMIT + succ InstrumentType'TRADE_SIZE_LIMIT + = InstrumentType'TRADE_PRICE_LIMIT + succ InstrumentType'TRADE_PRICE_LIMIT + = InstrumentType'LAST_TRADING_DATE_LIMIT + succ InstrumentType'LAST_TRADING_DATE_LIMIT + = InstrumentType'LONG_POSITIONS_ONLY + pred InstrumentType'INSTRUMENT_POSITION_LIMIT + = Prelude.error + "InstrumentType'MarketLimitType.pred: bad argument InstrumentType'INSTRUMENT_POSITION_LIMIT. This value would be out of bounds." + pred InstrumentType'CONTRACT_POSITION_LIMIT + = InstrumentType'INSTRUMENT_POSITION_LIMIT + pred InstrumentType'TRADE_SIZE_LIMIT + = InstrumentType'CONTRACT_POSITION_LIMIT + pred InstrumentType'TRADE_PRICE_LIMIT + = InstrumentType'TRADE_SIZE_LIMIT + pred InstrumentType'LAST_TRADING_DATE_LIMIT + = InstrumentType'TRADE_PRICE_LIMIT + pred InstrumentType'LONG_POSITIONS_ONLY + = InstrumentType'LAST_TRADING_DATE_LIMIT + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault InstrumentType'MarketLimitType where + fieldDefault = InstrumentType'INSTRUMENT_POSITION_LIMIT +instance Control.DeepSeq.NFData InstrumentType'MarketLimitType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' LegFill Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' LegFill (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.execId' @:: Lens' LegFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'execId' @:: Lens' LegFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.contractSymbol' @:: Lens' LegFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'contractSymbol' @:: Lens' LegFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteQuantity' @:: Lens' LegFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteQuantity' @:: Lens' LegFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.side' @:: Lens' LegFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'side' @:: Lens' LegFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.price' @:: Lens' LegFill Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'price' @:: Lens' LegFill (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.fillUtcTime' @:: Lens' LegFill Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillUtcTime' @:: Lens' LegFill (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.fillStatus' @:: Lens' LegFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillStatus' @:: Lens' LegFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.displayPrice' @:: Lens' LegFill Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayPrice' @:: Lens' LegFill (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.openCloseType' @:: Lens' LegFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'openCloseType' @:: Lens' LegFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.speculationType' @:: Lens' LegFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'speculationType' @:: Lens' LegFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.isAggressive' @:: Lens' LegFill Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isAggressive' @:: Lens' LegFill (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.quantity' @:: Lens' LegFill Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'quantity' @:: Lens' LegFill (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.extendedSide' @:: Lens' LegFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'extendedSide' @:: Lens' LegFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.locateId' @:: Lens' LegFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'locateId' @:: Lens' LegFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.fillExtraValues' @:: Lens' LegFill [Proto.CMS.Common1.Tuple]@ + * 'Proto.CMS.Traderouting1_Fields.vec'fillExtraValues' @:: Lens' LegFill (Data.Vector.Vector Proto.CMS.Common1.Tuple)@ + * 'Proto.CMS.Traderouting1_Fields.legNumber' @:: Lens' LegFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'legNumber' @:: Lens' LegFill (Prelude.Maybe Data.Text.Text)@ -} +data LegFill + = LegFill'_constructor {_LegFill'id :: !(Prelude.Maybe Data.Int.Int64), + _LegFill'execId :: !(Prelude.Maybe Data.Text.Text), + _LegFill'contractSymbol :: !(Prelude.Maybe Data.Text.Text), + _LegFill'obsoleteQuantity :: !(Prelude.Maybe Data.Word.Word32), + _LegFill'side :: !(Prelude.Maybe Data.Word.Word32), + _LegFill'price :: !(Prelude.Maybe Prelude.Double), + _LegFill'fillUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _LegFill'fillStatus :: !(Prelude.Maybe Data.Word.Word32), + _LegFill'displayPrice :: !(Prelude.Maybe Data.Int.Int64), + _LegFill'openCloseType :: !(Prelude.Maybe Data.Word.Word32), + _LegFill'speculationType :: !(Prelude.Maybe Data.Word.Word32), + _LegFill'isAggressive :: !(Prelude.Maybe Prelude.Bool), + _LegFill'quantity :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _LegFill'extendedSide :: !(Prelude.Maybe Data.Word.Word32), + _LegFill'locateId :: !(Prelude.Maybe Data.Text.Text), + _LegFill'fillExtraValues :: !(Data.Vector.Vector Proto.CMS.Common1.Tuple), + _LegFill'legNumber :: !(Prelude.Maybe Data.Text.Text), + _LegFill'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LegFill where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LegFill "id" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'id (\ x__ y__ -> x__ {_LegFill'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'id" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'id (\ x__ y__ -> x__ {_LegFill'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "execId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'execId (\ x__ y__ -> x__ {_LegFill'execId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'execId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'execId (\ x__ y__ -> x__ {_LegFill'execId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "contractSymbol" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'contractSymbol + (\ x__ y__ -> x__ {_LegFill'contractSymbol = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'contractSymbol" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'contractSymbol + (\ x__ y__ -> x__ {_LegFill'contractSymbol = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "obsoleteQuantity" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'obsoleteQuantity + (\ x__ y__ -> x__ {_LegFill'obsoleteQuantity = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'obsoleteQuantity" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'obsoleteQuantity + (\ x__ y__ -> x__ {_LegFill'obsoleteQuantity = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "side" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'side (\ x__ y__ -> x__ {_LegFill'side = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'side" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'side (\ x__ y__ -> x__ {_LegFill'side = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "price" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'price (\ x__ y__ -> x__ {_LegFill'price = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'price" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'price (\ x__ y__ -> x__ {_LegFill'price = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "fillUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'fillUtcTime + (\ x__ y__ -> x__ {_LegFill'fillUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'fillUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'fillUtcTime + (\ x__ y__ -> x__ {_LegFill'fillUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "fillStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'fillStatus (\ x__ y__ -> x__ {_LegFill'fillStatus = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'fillStatus" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'fillStatus (\ x__ y__ -> x__ {_LegFill'fillStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "displayPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'displayPrice + (\ x__ y__ -> x__ {_LegFill'displayPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'displayPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'displayPrice + (\ x__ y__ -> x__ {_LegFill'displayPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "openCloseType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'openCloseType + (\ x__ y__ -> x__ {_LegFill'openCloseType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'openCloseType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'openCloseType + (\ x__ y__ -> x__ {_LegFill'openCloseType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "speculationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'speculationType + (\ x__ y__ -> x__ {_LegFill'speculationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'speculationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'speculationType + (\ x__ y__ -> x__ {_LegFill'speculationType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "isAggressive" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'isAggressive + (\ x__ y__ -> x__ {_LegFill'isAggressive = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'isAggressive" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'isAggressive + (\ x__ y__ -> x__ {_LegFill'isAggressive = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "quantity" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'quantity (\ x__ y__ -> x__ {_LegFill'quantity = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField LegFill "maybe'quantity" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'quantity (\ x__ y__ -> x__ {_LegFill'quantity = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "extendedSide" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'extendedSide + (\ x__ y__ -> x__ {_LegFill'extendedSide = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'extendedSide" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'extendedSide + (\ x__ y__ -> x__ {_LegFill'extendedSide = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "locateId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'locateId (\ x__ y__ -> x__ {_LegFill'locateId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'locateId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'locateId (\ x__ y__ -> x__ {_LegFill'locateId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "fillExtraValues" [Proto.CMS.Common1.Tuple] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'fillExtraValues + (\ x__ y__ -> x__ {_LegFill'fillExtraValues = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LegFill "vec'fillExtraValues" (Data.Vector.Vector Proto.CMS.Common1.Tuple) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'fillExtraValues + (\ x__ y__ -> x__ {_LegFill'fillExtraValues = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LegFill "legNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'legNumber (\ x__ y__ -> x__ {_LegFill'legNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LegFill "maybe'legNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LegFill'legNumber (\ x__ y__ -> x__ {_LegFill'legNumber = y__})) + Prelude.id +instance Data.ProtoLens.Message LegFill where + messageName _ = Data.Text.pack "traderouting_1.LegFill" + packedMessageDescriptor _ + = "\n\ + \\aLegFill\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\DC2R\STXid\DC2\ETB\n\ + \\aexec_id\CAN\STX \SOH(\tR\ACKexecId\DC2'\n\ + \\SIcontract_symbol\CAN\ETX \SOH(\tR\SOcontractSymbol\DC2/\n\ + \\DC1obsolete_quantity\CAN\EOT \SOH(\rR\DLEobsoleteQuantityB\STX\CAN\SOH\DC2\DC2\n\ + \\EOTside\CAN\ENQ \SOH(\rR\EOTside\DC2\DC4\n\ + \\ENQprice\CAN\ACK \SOH(\SOHR\ENQprice\DC2\"\n\ + \\rfill_utc_time\CAN\a \SOH(\DC2R\vfillUtcTime\DC2\US\n\ + \\vfill_status\CAN\b \SOH(\rR\n\ + \fillStatus\DC2#\n\ + \\rdisplay_price\CAN\t \SOH(\DC2R\fdisplayPrice\DC2&\n\ + \\SIopen_close_type\CAN\n\ + \ \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN\v \SOH(\rR\SIspeculationType\DC2#\n\ + \\ris_aggressive\CAN\f \SOH(\bR\fisAggressive\DC2(\n\ + \\bquantity\CAN\r \SOH(\v2\f.cqg.DecimalR\bquantity\DC2#\n\ + \\rextended_side\CAN\SO \SOH(\rR\fextendedSide\DC2\ESC\n\ + \\tlocate_id\CAN\SI \SOH(\tR\blocateId\DC2;\n\ + \\DC1fill_extra_values\CAN\DLE \ETX(\v2\SI.common_1.TupleR\SIfillExtraValues\DC2\GS\n\ + \\n\ + \leg_number\CAN\DC1 \SOH(\tR\tlegNumber" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor LegFill + execId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exec_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'execId")) :: + Data.ProtoLens.FieldDescriptor LegFill + contractSymbol__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_symbol" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractSymbol")) :: + Data.ProtoLens.FieldDescriptor LegFill + obsoleteQuantity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_quantity" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteQuantity")) :: + Data.ProtoLens.FieldDescriptor LegFill + side__field_descriptor + = Data.ProtoLens.FieldDescriptor + "side" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'side")) :: + Data.ProtoLens.FieldDescriptor LegFill + price__field_descriptor + = Data.ProtoLens.FieldDescriptor + "price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'price")) :: + Data.ProtoLens.FieldDescriptor LegFill + fillUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillUtcTime")) :: + Data.ProtoLens.FieldDescriptor LegFill + fillStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillStatus")) :: + Data.ProtoLens.FieldDescriptor LegFill + displayPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayPrice")) :: + Data.ProtoLens.FieldDescriptor LegFill + openCloseType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "open_close_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'openCloseType")) :: + Data.ProtoLens.FieldDescriptor LegFill + speculationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "speculation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'speculationType")) :: + Data.ProtoLens.FieldDescriptor LegFill + isAggressive__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_aggressive" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isAggressive")) :: + Data.ProtoLens.FieldDescriptor LegFill + quantity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "quantity" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'quantity")) :: + Data.ProtoLens.FieldDescriptor LegFill + extendedSide__field_descriptor + = Data.ProtoLens.FieldDescriptor + "extended_side" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'extendedSide")) :: + Data.ProtoLens.FieldDescriptor LegFill + locateId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "locate_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'locateId")) :: + Data.ProtoLens.FieldDescriptor LegFill + fillExtraValues__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_extra_values" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Tuple) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"fillExtraValues")) :: + Data.ProtoLens.FieldDescriptor LegFill + legNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "leg_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'legNumber")) :: + Data.ProtoLens.FieldDescriptor LegFill + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, execId__field_descriptor), + (Data.ProtoLens.Tag 3, contractSymbol__field_descriptor), + (Data.ProtoLens.Tag 4, obsoleteQuantity__field_descriptor), + (Data.ProtoLens.Tag 5, side__field_descriptor), + (Data.ProtoLens.Tag 6, price__field_descriptor), + (Data.ProtoLens.Tag 7, fillUtcTime__field_descriptor), + (Data.ProtoLens.Tag 8, fillStatus__field_descriptor), + (Data.ProtoLens.Tag 9, displayPrice__field_descriptor), + (Data.ProtoLens.Tag 10, openCloseType__field_descriptor), + (Data.ProtoLens.Tag 11, speculationType__field_descriptor), + (Data.ProtoLens.Tag 12, isAggressive__field_descriptor), + (Data.ProtoLens.Tag 13, quantity__field_descriptor), + (Data.ProtoLens.Tag 14, extendedSide__field_descriptor), + (Data.ProtoLens.Tag 15, locateId__field_descriptor), + (Data.ProtoLens.Tag 16, fillExtraValues__field_descriptor), + (Data.ProtoLens.Tag 17, legNumber__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LegFill'_unknownFields + (\ x__ y__ -> x__ {_LegFill'_unknownFields = y__}) + defMessage + = LegFill'_constructor + {_LegFill'id = Prelude.Nothing, _LegFill'execId = Prelude.Nothing, + _LegFill'contractSymbol = Prelude.Nothing, + _LegFill'obsoleteQuantity = Prelude.Nothing, + _LegFill'side = Prelude.Nothing, _LegFill'price = Prelude.Nothing, + _LegFill'fillUtcTime = Prelude.Nothing, + _LegFill'fillStatus = Prelude.Nothing, + _LegFill'displayPrice = Prelude.Nothing, + _LegFill'openCloseType = Prelude.Nothing, + _LegFill'speculationType = Prelude.Nothing, + _LegFill'isAggressive = Prelude.Nothing, + _LegFill'quantity = Prelude.Nothing, + _LegFill'extendedSide = Prelude.Nothing, + _LegFill'locateId = Prelude.Nothing, + _LegFill'fillExtraValues = Data.Vector.Generic.empty, + _LegFill'legNumber = Prelude.Nothing, _LegFill'_unknownFields = []} + parseMessage + = let + loop :: + LegFill + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.Tuple + -> Data.ProtoLens.Encoding.Bytes.Parser LegFill + loop x mutable'fillExtraValues + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'fillExtraValues <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'fillExtraValues) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'fillExtraValues") + frozen'fillExtraValues x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + mutable'fillExtraValues + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "exec_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"execId") y x) + mutable'fillExtraValues + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_symbol" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractSymbol") y x) + mutable'fillExtraValues + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_quantity" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteQuantity") y x) + mutable'fillExtraValues + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "side" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"side") y x) + mutable'fillExtraValues + 49 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"price") y x) + mutable'fillExtraValues + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "fill_utc_time" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fillUtcTime") y x) + mutable'fillExtraValues + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "fill_status" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fillStatus") y x) + mutable'fillExtraValues + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayPrice") y x) + mutable'fillExtraValues + 80 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "open_close_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"openCloseType") y x) + mutable'fillExtraValues + 88 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "speculation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"speculationType") y x) + mutable'fillExtraValues + 96 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_aggressive" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"isAggressive") y x) + mutable'fillExtraValues + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "quantity" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"quantity") y x) + mutable'fillExtraValues + 112 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "extended_side" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"extendedSide") y x) + mutable'fillExtraValues + 122 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "locate_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"locateId") y x) + mutable'fillExtraValues + 130 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "fill_extra_values" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'fillExtraValues y) + loop x v + 138 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "leg_number" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"legNumber") y x) + mutable'fillExtraValues + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'fillExtraValues + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'fillExtraValues <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'fillExtraValues) + "LegFill" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'execId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'contractSymbol") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteQuantity") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'side") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'price") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 49) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'fillUtcTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'fillStatus") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'displayPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'openCloseType") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 80) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'speculationType") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'isAggressive") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 96) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'quantity") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'extendedSide") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 112) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'locateId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'fillExtraValues") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'legNumber") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))))) +instance Control.DeepSeq.NFData LegFill where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LegFill'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LegFill'id x__) + (Control.DeepSeq.deepseq + (_LegFill'execId x__) + (Control.DeepSeq.deepseq + (_LegFill'contractSymbol x__) + (Control.DeepSeq.deepseq + (_LegFill'obsoleteQuantity x__) + (Control.DeepSeq.deepseq + (_LegFill'side x__) + (Control.DeepSeq.deepseq + (_LegFill'price x__) + (Control.DeepSeq.deepseq + (_LegFill'fillUtcTime x__) + (Control.DeepSeq.deepseq + (_LegFill'fillStatus x__) + (Control.DeepSeq.deepseq + (_LegFill'displayPrice x__) + (Control.DeepSeq.deepseq + (_LegFill'openCloseType x__) + (Control.DeepSeq.deepseq + (_LegFill'speculationType x__) + (Control.DeepSeq.deepseq + (_LegFill'isAggressive x__) + (Control.DeepSeq.deepseq + (_LegFill'quantity x__) + (Control.DeepSeq.deepseq + (_LegFill'extendedSide x__) + (Control.DeepSeq.deepseq + (_LegFill'locateId x__) + (Control.DeepSeq.deepseq + (_LegFill'fillExtraValues x__) + (Control.DeepSeq.deepseq + (_LegFill'legNumber x__) + ()))))))))))))))))) +data LimitMode + = DEFAULT | UNLIMITED | LIMITED + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum LimitMode where + maybeToEnum 1 = Prelude.Just DEFAULT + maybeToEnum 2 = Prelude.Just UNLIMITED + maybeToEnum 3 = Prelude.Just LIMITED + maybeToEnum _ = Prelude.Nothing + showEnum DEFAULT = "DEFAULT" + showEnum UNLIMITED = "UNLIMITED" + showEnum LIMITED = "LIMITED" + readEnum k + | (Prelude.==) k "DEFAULT" = Prelude.Just DEFAULT + | (Prelude.==) k "UNLIMITED" = Prelude.Just UNLIMITED + | (Prelude.==) k "LIMITED" = Prelude.Just LIMITED + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded LimitMode where + minBound = DEFAULT + maxBound = LIMITED +instance Prelude.Enum LimitMode where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum LimitMode: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum DEFAULT = 1 + fromEnum UNLIMITED = 2 + fromEnum LIMITED = 3 + succ LIMITED + = Prelude.error + "LimitMode.succ: bad argument LIMITED. This value would be out of bounds." + succ DEFAULT = UNLIMITED + succ UNLIMITED = LIMITED + pred DEFAULT + = Prelude.error + "LimitMode.pred: bad argument DEFAULT. This value would be out of bounds." + pred UNLIMITED = DEFAULT + pred LIMITED = UNLIMITED + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault LimitMode where + fieldDefault = DEFAULT +instance Control.DeepSeq.NFData LimitMode where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.mode' @:: Lens' LimitValue Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'mode' @:: Lens' LimitValue (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.value' @:: Lens' LimitValue Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'value' @:: Lens' LimitValue (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteExpirationLimit' @:: Lens' LimitValue [ExpirationLimit]@ + * 'Proto.CMS.Traderouting1_Fields.vec'obsoleteExpirationLimit' @:: Lens' LimitValue (Data.Vector.Vector ExpirationLimit)@ + * 'Proto.CMS.Traderouting1_Fields.enforce' @:: Lens' LimitValue Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforce' @:: Lens' LimitValue (Prelude.Maybe Prelude.Bool)@ -} +data LimitValue + = LimitValue'_constructor {_LimitValue'mode :: !(Prelude.Maybe Data.Word.Word32), + _LimitValue'value :: !(Prelude.Maybe Data.Int.Int32), + _LimitValue'obsoleteExpirationLimit :: !(Data.Vector.Vector ExpirationLimit), + _LimitValue'enforce :: !(Prelude.Maybe Prelude.Bool), + _LimitValue'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LimitValue where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LimitValue "mode" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValue'mode (\ x__ y__ -> x__ {_LimitValue'mode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValue "maybe'mode" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValue'mode (\ x__ y__ -> x__ {_LimitValue'mode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValue "value" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValue'value (\ x__ y__ -> x__ {_LimitValue'value = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValue "maybe'value" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValue'value (\ x__ y__ -> x__ {_LimitValue'value = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValue "obsoleteExpirationLimit" [ExpirationLimit] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValue'obsoleteExpirationLimit + (\ x__ y__ -> x__ {_LimitValue'obsoleteExpirationLimit = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LimitValue "vec'obsoleteExpirationLimit" (Data.Vector.Vector ExpirationLimit) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValue'obsoleteExpirationLimit + (\ x__ y__ -> x__ {_LimitValue'obsoleteExpirationLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValue "enforce" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValue'enforce (\ x__ y__ -> x__ {_LimitValue'enforce = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValue "maybe'enforce" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValue'enforce (\ x__ y__ -> x__ {_LimitValue'enforce = y__})) + Prelude.id +instance Data.ProtoLens.Message LimitValue where + messageName _ = Data.Text.pack "traderouting_1.LimitValue" + packedMessageDescriptor _ + = "\n\ + \\n\ + \LimitValue\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC2\DC4\n\ + \\ENQvalue\CAN\STX \SOH(\DC1R\ENQvalue\DC2_\n\ + \\EMobsolete_expiration_limit\CAN\ETX \ETX(\v2\US.traderouting_1.ExpirationLimitR\ETBobsoleteExpirationLimitB\STX\CAN\SOH\DC2\CAN\n\ + \\aenforce\CAN\EOT \SOH(\bR\aenforce" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + mode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'mode")) :: + Data.ProtoLens.FieldDescriptor LimitValue + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'value")) :: + Data.ProtoLens.FieldDescriptor LimitValue + obsoleteExpirationLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_expiration_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ExpirationLimit) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"obsoleteExpirationLimit")) :: + Data.ProtoLens.FieldDescriptor LimitValue + enforce__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'enforce")) :: + Data.ProtoLens.FieldDescriptor LimitValue + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, mode__field_descriptor), + (Data.ProtoLens.Tag 2, value__field_descriptor), + (Data.ProtoLens.Tag 3, obsoleteExpirationLimit__field_descriptor), + (Data.ProtoLens.Tag 4, enforce__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LimitValue'_unknownFields + (\ x__ y__ -> x__ {_LimitValue'_unknownFields = y__}) + defMessage + = LimitValue'_constructor + {_LimitValue'mode = Prelude.Nothing, + _LimitValue'value = Prelude.Nothing, + _LimitValue'obsoleteExpirationLimit = Data.Vector.Generic.empty, + _LimitValue'enforce = Prelude.Nothing, + _LimitValue'_unknownFields = []} + parseMessage + = let + loop :: + LimitValue + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ExpirationLimit + -> Data.ProtoLens.Encoding.Bytes.Parser LimitValue + loop x mutable'obsoleteExpirationLimit + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'obsoleteExpirationLimit <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'obsoleteExpirationLimit) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'obsoleteExpirationLimit") + frozen'obsoleteExpirationLimit x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "mode" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"mode") y x) + mutable'obsoleteExpirationLimit + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "value" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + mutable'obsoleteExpirationLimit + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "obsolete_expiration_limit" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'obsoleteExpirationLimit y) + loop x v + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"enforce") y x) + mutable'obsoleteExpirationLimit + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'obsoleteExpirationLimit + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'obsoleteExpirationLimit <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'obsoleteExpirationLimit) + "LimitValue" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'mode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'obsoleteExpirationLimit") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'enforce") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData LimitValue where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LimitValue'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LimitValue'mode x__) + (Control.DeepSeq.deepseq + (_LimitValue'value x__) + (Control.DeepSeq.deepseq + (_LimitValue'obsoleteExpirationLimit x__) + (Control.DeepSeq.deepseq (_LimitValue'enforce x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.mode' @:: Lens' LimitValueBoolean Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'mode' @:: Lens' LimitValueBoolean (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.value' @:: Lens' LimitValueBoolean Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'value' @:: Lens' LimitValueBoolean (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.enforce' @:: Lens' LimitValueBoolean Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforce' @:: Lens' LimitValueBoolean (Prelude.Maybe Prelude.Bool)@ -} +data LimitValueBoolean + = LimitValueBoolean'_constructor {_LimitValueBoolean'mode :: !(Prelude.Maybe Data.Word.Word32), + _LimitValueBoolean'value :: !(Prelude.Maybe Prelude.Bool), + _LimitValueBoolean'enforce :: !(Prelude.Maybe Prelude.Bool), + _LimitValueBoolean'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LimitValueBoolean where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LimitValueBoolean "mode" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueBoolean'mode + (\ x__ y__ -> x__ {_LimitValueBoolean'mode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValueBoolean "maybe'mode" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueBoolean'mode + (\ x__ y__ -> x__ {_LimitValueBoolean'mode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValueBoolean "value" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueBoolean'value + (\ x__ y__ -> x__ {_LimitValueBoolean'value = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValueBoolean "maybe'value" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueBoolean'value + (\ x__ y__ -> x__ {_LimitValueBoolean'value = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValueBoolean "enforce" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueBoolean'enforce + (\ x__ y__ -> x__ {_LimitValueBoolean'enforce = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValueBoolean "maybe'enforce" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueBoolean'enforce + (\ x__ y__ -> x__ {_LimitValueBoolean'enforce = y__})) + Prelude.id +instance Data.ProtoLens.Message LimitValueBoolean where + messageName _ = Data.Text.pack "traderouting_1.LimitValueBoolean" + packedMessageDescriptor _ + = "\n\ + \\DC1LimitValueBoolean\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC2\DC4\n\ + \\ENQvalue\CAN\STX \SOH(\bR\ENQvalue\DC2\CAN\n\ + \\aenforce\CAN\ETX \SOH(\bR\aenforce" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + mode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'mode")) :: + Data.ProtoLens.FieldDescriptor LimitValueBoolean + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'value")) :: + Data.ProtoLens.FieldDescriptor LimitValueBoolean + enforce__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'enforce")) :: + Data.ProtoLens.FieldDescriptor LimitValueBoolean + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, mode__field_descriptor), + (Data.ProtoLens.Tag 2, value__field_descriptor), + (Data.ProtoLens.Tag 3, enforce__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LimitValueBoolean'_unknownFields + (\ x__ y__ -> x__ {_LimitValueBoolean'_unknownFields = y__}) + defMessage + = LimitValueBoolean'_constructor + {_LimitValueBoolean'mode = Prelude.Nothing, + _LimitValueBoolean'value = Prelude.Nothing, + _LimitValueBoolean'enforce = Prelude.Nothing, + _LimitValueBoolean'_unknownFields = []} + parseMessage + = let + loop :: + LimitValueBoolean + -> Data.ProtoLens.Encoding.Bytes.Parser LimitValueBoolean + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "mode" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"mode") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "value" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"enforce") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LimitValueBoolean" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'mode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'enforce") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData LimitValueBoolean where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LimitValueBoolean'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LimitValueBoolean'mode x__) + (Control.DeepSeq.deepseq + (_LimitValueBoolean'value x__) + (Control.DeepSeq.deepseq (_LimitValueBoolean'enforce x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clearedFields' @:: Lens' LimitValueDecimal [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clearedFields' @:: Lens' LimitValueDecimal (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.mode' @:: Lens' LimitValueDecimal Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'mode' @:: Lens' LimitValueDecimal (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.value' @:: Lens' LimitValueDecimal Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'value' @:: Lens' LimitValueDecimal (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.expirationLimit' @:: Lens' LimitValueDecimal [ExpirationLimitDecimal]@ + * 'Proto.CMS.Traderouting1_Fields.vec'expirationLimit' @:: Lens' LimitValueDecimal (Data.Vector.Vector ExpirationLimitDecimal)@ + * 'Proto.CMS.Traderouting1_Fields.enforce' @:: Lens' LimitValueDecimal Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforce' @:: Lens' LimitValueDecimal (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.loginEnforce' @:: Lens' LimitValueDecimal Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'loginEnforce' @:: Lens' LimitValueDecimal (Prelude.Maybe Prelude.Bool)@ -} +data LimitValueDecimal + = LimitValueDecimal'_constructor {_LimitValueDecimal'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _LimitValueDecimal'mode :: !(Prelude.Maybe Data.Word.Word32), + _LimitValueDecimal'value :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _LimitValueDecimal'expirationLimit :: !(Data.Vector.Vector ExpirationLimitDecimal), + _LimitValueDecimal'enforce :: !(Prelude.Maybe Prelude.Bool), + _LimitValueDecimal'loginEnforce :: !(Prelude.Maybe Prelude.Bool), + _LimitValueDecimal'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LimitValueDecimal where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LimitValueDecimal "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'clearedFields + (\ x__ y__ -> x__ {_LimitValueDecimal'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LimitValueDecimal "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'clearedFields + (\ x__ y__ -> x__ {_LimitValueDecimal'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValueDecimal "mode" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'mode + (\ x__ y__ -> x__ {_LimitValueDecimal'mode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValueDecimal "maybe'mode" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'mode + (\ x__ y__ -> x__ {_LimitValueDecimal'mode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValueDecimal "value" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'value + (\ x__ y__ -> x__ {_LimitValueDecimal'value = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField LimitValueDecimal "maybe'value" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'value + (\ x__ y__ -> x__ {_LimitValueDecimal'value = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValueDecimal "expirationLimit" [ExpirationLimitDecimal] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'expirationLimit + (\ x__ y__ -> x__ {_LimitValueDecimal'expirationLimit = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField LimitValueDecimal "vec'expirationLimit" (Data.Vector.Vector ExpirationLimitDecimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'expirationLimit + (\ x__ y__ -> x__ {_LimitValueDecimal'expirationLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValueDecimal "enforce" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'enforce + (\ x__ y__ -> x__ {_LimitValueDecimal'enforce = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValueDecimal "maybe'enforce" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'enforce + (\ x__ y__ -> x__ {_LimitValueDecimal'enforce = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValueDecimal "loginEnforce" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'loginEnforce + (\ x__ y__ -> x__ {_LimitValueDecimal'loginEnforce = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValueDecimal "maybe'loginEnforce" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDecimal'loginEnforce + (\ x__ y__ -> x__ {_LimitValueDecimal'loginEnforce = y__})) + Prelude.id +instance Data.ProtoLens.Message LimitValueDecimal where + messageName _ = Data.Text.pack "traderouting_1.LimitValueDecimal" + packedMessageDescriptor _ + = "\n\ + \\DC1LimitValueDecimal\DC2%\n\ + \\SOcleared_fields\CAN\ENQ \ETX(\rR\rclearedFields\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC2\"\n\ + \\ENQvalue\CAN\STX \SOH(\v2\f.cqg.DecimalR\ENQvalue\DC2Q\n\ + \\DLEexpiration_limit\CAN\ETX \ETX(\v2&.traderouting_1.ExpirationLimitDecimalR\SIexpirationLimit\DC2\CAN\n\ + \\aenforce\CAN\EOT \SOH(\bR\aenforce\DC2#\n\ + \\rlogin_enforce\CAN\ACK \SOH(\bR\floginEnforce" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor LimitValueDecimal + mode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'mode")) :: + Data.ProtoLens.FieldDescriptor LimitValueDecimal + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'value")) :: + Data.ProtoLens.FieldDescriptor LimitValueDecimal + expirationLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "expiration_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ExpirationLimitDecimal) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"expirationLimit")) :: + Data.ProtoLens.FieldDescriptor LimitValueDecimal + enforce__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'enforce")) :: + Data.ProtoLens.FieldDescriptor LimitValueDecimal + loginEnforce__field_descriptor + = Data.ProtoLens.FieldDescriptor + "login_enforce" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'loginEnforce")) :: + Data.ProtoLens.FieldDescriptor LimitValueDecimal + in + Data.Map.fromList + [(Data.ProtoLens.Tag 5, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, mode__field_descriptor), + (Data.ProtoLens.Tag 2, value__field_descriptor), + (Data.ProtoLens.Tag 3, expirationLimit__field_descriptor), + (Data.ProtoLens.Tag 4, enforce__field_descriptor), + (Data.ProtoLens.Tag 6, loginEnforce__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LimitValueDecimal'_unknownFields + (\ x__ y__ -> x__ {_LimitValueDecimal'_unknownFields = y__}) + defMessage + = LimitValueDecimal'_constructor + {_LimitValueDecimal'clearedFields = Data.Vector.Generic.empty, + _LimitValueDecimal'mode = Prelude.Nothing, + _LimitValueDecimal'value = Prelude.Nothing, + _LimitValueDecimal'expirationLimit = Data.Vector.Generic.empty, + _LimitValueDecimal'enforce = Prelude.Nothing, + _LimitValueDecimal'loginEnforce = Prelude.Nothing, + _LimitValueDecimal'_unknownFields = []} + parseMessage + = let + loop :: + LimitValueDecimal + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ExpirationLimitDecimal + -> Data.ProtoLens.Encoding.Bytes.Parser LimitValueDecimal + loop x mutable'clearedFields mutable'expirationLimit + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + frozen'expirationLimit <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'expirationLimit) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'expirationLimit") + frozen'expirationLimit x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 40 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x v mutable'expirationLimit + 42 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x y mutable'expirationLimit + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "mode" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"mode") y x) + mutable'clearedFields mutable'expirationLimit + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "value" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + mutable'clearedFields mutable'expirationLimit + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "expiration_limit" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'expirationLimit y) + loop x mutable'clearedFields v + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"enforce") y x) + mutable'clearedFields mutable'expirationLimit + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "login_enforce" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"loginEnforce") y x) + mutable'clearedFields mutable'expirationLimit + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'clearedFields mutable'expirationLimit + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'expirationLimit <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'clearedFields + mutable'expirationLimit) + "LimitValueDecimal" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'mode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'expirationLimit") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'enforce") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'loginEnforce") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))) +instance Control.DeepSeq.NFData LimitValueDecimal where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LimitValueDecimal'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LimitValueDecimal'clearedFields x__) + (Control.DeepSeq.deepseq + (_LimitValueDecimal'mode x__) + (Control.DeepSeq.deepseq + (_LimitValueDecimal'value x__) + (Control.DeepSeq.deepseq + (_LimitValueDecimal'expirationLimit x__) + (Control.DeepSeq.deepseq + (_LimitValueDecimal'enforce x__) + (Control.DeepSeq.deepseq + (_LimitValueDecimal'loginEnforce x__) ())))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.mode' @:: Lens' LimitValueDouble Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'mode' @:: Lens' LimitValueDouble (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.value' @:: Lens' LimitValueDouble Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'value' @:: Lens' LimitValueDouble (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.enforce' @:: Lens' LimitValueDouble Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforce' @:: Lens' LimitValueDouble (Prelude.Maybe Prelude.Bool)@ -} +data LimitValueDouble + = LimitValueDouble'_constructor {_LimitValueDouble'mode :: !(Prelude.Maybe Data.Word.Word32), + _LimitValueDouble'value :: !(Prelude.Maybe Prelude.Double), + _LimitValueDouble'enforce :: !(Prelude.Maybe Prelude.Bool), + _LimitValueDouble'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LimitValueDouble where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LimitValueDouble "mode" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDouble'mode + (\ x__ y__ -> x__ {_LimitValueDouble'mode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValueDouble "maybe'mode" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDouble'mode + (\ x__ y__ -> x__ {_LimitValueDouble'mode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValueDouble "value" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDouble'value + (\ x__ y__ -> x__ {_LimitValueDouble'value = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValueDouble "maybe'value" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDouble'value + (\ x__ y__ -> x__ {_LimitValueDouble'value = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LimitValueDouble "enforce" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDouble'enforce + (\ x__ y__ -> x__ {_LimitValueDouble'enforce = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LimitValueDouble "maybe'enforce" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LimitValueDouble'enforce + (\ x__ y__ -> x__ {_LimitValueDouble'enforce = y__})) + Prelude.id +instance Data.ProtoLens.Message LimitValueDouble where + messageName _ = Data.Text.pack "traderouting_1.LimitValueDouble" + packedMessageDescriptor _ + = "\n\ + \\DLELimitValueDouble\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC2\DC4\n\ + \\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue\DC2\CAN\n\ + \\aenforce\CAN\ETX \SOH(\bR\aenforce" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + mode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'mode")) :: + Data.ProtoLens.FieldDescriptor LimitValueDouble + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'value")) :: + Data.ProtoLens.FieldDescriptor LimitValueDouble + enforce__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'enforce")) :: + Data.ProtoLens.FieldDescriptor LimitValueDouble + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, mode__field_descriptor), + (Data.ProtoLens.Tag 2, value__field_descriptor), + (Data.ProtoLens.Tag 3, enforce__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LimitValueDouble'_unknownFields + (\ x__ y__ -> x__ {_LimitValueDouble'_unknownFields = y__}) + defMessage + = LimitValueDouble'_constructor + {_LimitValueDouble'mode = Prelude.Nothing, + _LimitValueDouble'value = Prelude.Nothing, + _LimitValueDouble'enforce = Prelude.Nothing, + _LimitValueDouble'_unknownFields = []} + parseMessage + = let + loop :: + LimitValueDouble + -> Data.ProtoLens.Encoding.Bytes.Parser LimitValueDouble + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "mode" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"mode") y x) + 17 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "value" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"enforce") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LimitValueDouble" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'mode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 17) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'enforce") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData LimitValueDouble where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LimitValueDouble'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LimitValueDouble'mode x__) + (Control.DeepSeq.deepseq + (_LimitValueDouble'value x__) + (Control.DeepSeq.deepseq (_LimitValueDouble'enforce x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.type'' @:: Lens' LossLimit Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'type'' @:: Lens' LossLimit (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.percent' @:: Lens' LossLimit Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'percent' @:: Lens' LossLimit (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.amount' @:: Lens' LossLimit Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'amount' @:: Lens' LossLimit (Prelude.Maybe Prelude.Double)@ -} +data LossLimit + = LossLimit'_constructor {_LossLimit'type' :: !(Prelude.Maybe Data.Word.Word32), + _LossLimit'percent :: !(Prelude.Maybe Prelude.Double), + _LossLimit'amount :: !(Prelude.Maybe Prelude.Double), + _LossLimit'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show LossLimit where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField LossLimit "type'" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LossLimit'type' (\ x__ y__ -> x__ {_LossLimit'type' = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LossLimit "maybe'type'" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LossLimit'type' (\ x__ y__ -> x__ {_LossLimit'type' = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LossLimit "percent" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LossLimit'percent (\ x__ y__ -> x__ {_LossLimit'percent = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LossLimit "maybe'percent" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LossLimit'percent (\ x__ y__ -> x__ {_LossLimit'percent = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField LossLimit "amount" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LossLimit'amount (\ x__ y__ -> x__ {_LossLimit'amount = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField LossLimit "maybe'amount" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _LossLimit'amount (\ x__ y__ -> x__ {_LossLimit'amount = y__})) + Prelude.id +instance Data.ProtoLens.Message LossLimit where + messageName _ = Data.Text.pack "traderouting_1.LossLimit" + packedMessageDescriptor _ + = "\n\ + \\tLossLimit\DC2\DC2\n\ + \\EOTtype\CAN\SOH \SOH(\rR\EOTtype\DC2\CAN\n\ + \\apercent\CAN\STX \SOH(\SOHR\apercent\DC2\SYN\n\ + \\ACKamount\CAN\ETX \SOH(\SOHR\ACKamount\"d\n\ + \\EOTType\DC2\v\n\ + \\aPERCENT\DLE\SOH\DC2\n\ + \\n\ + \\ACKAMOUNT\DLE\STX\DC2\SYN\n\ + \\DC2MIN_PERCENT_AMOUNT\DLE\ETX\DC2\SYN\n\ + \\DC2MAX_PERCENT_AMOUNT\DLE\EOT\DC2\DC3\n\ + \\SIAMOUNT_NO_LIMIT\DLE\ENQ" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + type'__field_descriptor + = Data.ProtoLens.FieldDescriptor + "type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'type'")) :: + Data.ProtoLens.FieldDescriptor LossLimit + percent__field_descriptor + = Data.ProtoLens.FieldDescriptor + "percent" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'percent")) :: + Data.ProtoLens.FieldDescriptor LossLimit + amount__field_descriptor + = Data.ProtoLens.FieldDescriptor + "amount" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'amount")) :: + Data.ProtoLens.FieldDescriptor LossLimit + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, type'__field_descriptor), + (Data.ProtoLens.Tag 2, percent__field_descriptor), + (Data.ProtoLens.Tag 3, amount__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _LossLimit'_unknownFields + (\ x__ y__ -> x__ {_LossLimit'_unknownFields = y__}) + defMessage + = LossLimit'_constructor + {_LossLimit'type' = Prelude.Nothing, + _LossLimit'percent = Prelude.Nothing, + _LossLimit'amount = Prelude.Nothing, + _LossLimit'_unknownFields = []} + parseMessage + = let + loop :: LossLimit -> Data.ProtoLens.Encoding.Bytes.Parser LossLimit + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "type" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"type'") y x) + 17 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "percent" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"percent") y x) + 25 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "amount" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"amount") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "LossLimit" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'type'") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'percent") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 17) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'amount") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 25) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData LossLimit where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_LossLimit'_unknownFields x__) + (Control.DeepSeq.deepseq + (_LossLimit'type' x__) + (Control.DeepSeq.deepseq + (_LossLimit'percent x__) + (Control.DeepSeq.deepseq (_LossLimit'amount x__) ()))) +data LossLimit'Type + = LossLimit'PERCENT | + LossLimit'AMOUNT | + LossLimit'MIN_PERCENT_AMOUNT | + LossLimit'MAX_PERCENT_AMOUNT | + LossLimit'AMOUNT_NO_LIMIT + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum LossLimit'Type where + maybeToEnum 1 = Prelude.Just LossLimit'PERCENT + maybeToEnum 2 = Prelude.Just LossLimit'AMOUNT + maybeToEnum 3 = Prelude.Just LossLimit'MIN_PERCENT_AMOUNT + maybeToEnum 4 = Prelude.Just LossLimit'MAX_PERCENT_AMOUNT + maybeToEnum 5 = Prelude.Just LossLimit'AMOUNT_NO_LIMIT + maybeToEnum _ = Prelude.Nothing + showEnum LossLimit'PERCENT = "PERCENT" + showEnum LossLimit'AMOUNT = "AMOUNT" + showEnum LossLimit'MIN_PERCENT_AMOUNT = "MIN_PERCENT_AMOUNT" + showEnum LossLimit'MAX_PERCENT_AMOUNT = "MAX_PERCENT_AMOUNT" + showEnum LossLimit'AMOUNT_NO_LIMIT = "AMOUNT_NO_LIMIT" + readEnum k + | (Prelude.==) k "PERCENT" = Prelude.Just LossLimit'PERCENT + | (Prelude.==) k "AMOUNT" = Prelude.Just LossLimit'AMOUNT + | (Prelude.==) k "MIN_PERCENT_AMOUNT" + = Prelude.Just LossLimit'MIN_PERCENT_AMOUNT + | (Prelude.==) k "MAX_PERCENT_AMOUNT" + = Prelude.Just LossLimit'MAX_PERCENT_AMOUNT + | (Prelude.==) k "AMOUNT_NO_LIMIT" + = Prelude.Just LossLimit'AMOUNT_NO_LIMIT + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded LossLimit'Type where + minBound = LossLimit'PERCENT + maxBound = LossLimit'AMOUNT_NO_LIMIT +instance Prelude.Enum LossLimit'Type where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum Type: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum LossLimit'PERCENT = 1 + fromEnum LossLimit'AMOUNT = 2 + fromEnum LossLimit'MIN_PERCENT_AMOUNT = 3 + fromEnum LossLimit'MAX_PERCENT_AMOUNT = 4 + fromEnum LossLimit'AMOUNT_NO_LIMIT = 5 + succ LossLimit'AMOUNT_NO_LIMIT + = Prelude.error + "LossLimit'Type.succ: bad argument LossLimit'AMOUNT_NO_LIMIT. This value would be out of bounds." + succ LossLimit'PERCENT = LossLimit'AMOUNT + succ LossLimit'AMOUNT = LossLimit'MIN_PERCENT_AMOUNT + succ LossLimit'MIN_PERCENT_AMOUNT = LossLimit'MAX_PERCENT_AMOUNT + succ LossLimit'MAX_PERCENT_AMOUNT = LossLimit'AMOUNT_NO_LIMIT + pred LossLimit'PERCENT + = Prelude.error + "LossLimit'Type.pred: bad argument LossLimit'PERCENT. This value would be out of bounds." + pred LossLimit'AMOUNT = LossLimit'PERCENT + pred LossLimit'MIN_PERCENT_AMOUNT = LossLimit'AMOUNT + pred LossLimit'MAX_PERCENT_AMOUNT = LossLimit'MIN_PERCENT_AMOUNT + pred LossLimit'AMOUNT_NO_LIMIT = LossLimit'MAX_PERCENT_AMOUNT + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault LossLimit'Type where + fieldDefault = LossLimit'PERCENT +instance Control.DeepSeq.NFData LossLimit'Type where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clearedFields' @:: Lens' MarketLimits [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clearedFields' @:: Lens' MarketLimits (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.allMarketLimits' @:: Lens' MarketLimits MarketLimitsRecord@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allMarketLimits' @:: Lens' MarketLimits (Prelude.Maybe MarketLimitsRecord)@ + * 'Proto.CMS.Traderouting1_Fields.usMarketLimits' @:: Lens' MarketLimits MarketLimitsRecord@ + * 'Proto.CMS.Traderouting1_Fields.maybe'usMarketLimits' @:: Lens' MarketLimits (Prelude.Maybe MarketLimitsRecord)@ + * 'Proto.CMS.Traderouting1_Fields.nonUsMarketLimits' @:: Lens' MarketLimits MarketLimitsRecord@ + * 'Proto.CMS.Traderouting1_Fields.maybe'nonUsMarketLimits' @:: Lens' MarketLimits (Prelude.Maybe MarketLimitsRecord)@ + * 'Proto.CMS.Traderouting1_Fields.exchangeMarketLimits' @:: Lens' MarketLimits [ExchangeMarketLimits]@ + * 'Proto.CMS.Traderouting1_Fields.vec'exchangeMarketLimits' @:: Lens' MarketLimits (Data.Vector.Vector ExchangeMarketLimits)@ -} +data MarketLimits + = MarketLimits'_constructor {_MarketLimits'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _MarketLimits'allMarketLimits :: !(Prelude.Maybe MarketLimitsRecord), + _MarketLimits'usMarketLimits :: !(Prelude.Maybe MarketLimitsRecord), + _MarketLimits'nonUsMarketLimits :: !(Prelude.Maybe MarketLimitsRecord), + _MarketLimits'exchangeMarketLimits :: !(Data.Vector.Vector ExchangeMarketLimits), + _MarketLimits'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show MarketLimits where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField MarketLimits "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimits'clearedFields + (\ x__ y__ -> x__ {_MarketLimits'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField MarketLimits "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimits'clearedFields + (\ x__ y__ -> x__ {_MarketLimits'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MarketLimits "allMarketLimits" MarketLimitsRecord where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimits'allMarketLimits + (\ x__ y__ -> x__ {_MarketLimits'allMarketLimits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField MarketLimits "maybe'allMarketLimits" (Prelude.Maybe MarketLimitsRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimits'allMarketLimits + (\ x__ y__ -> x__ {_MarketLimits'allMarketLimits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MarketLimits "usMarketLimits" MarketLimitsRecord where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimits'usMarketLimits + (\ x__ y__ -> x__ {_MarketLimits'usMarketLimits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField MarketLimits "maybe'usMarketLimits" (Prelude.Maybe MarketLimitsRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimits'usMarketLimits + (\ x__ y__ -> x__ {_MarketLimits'usMarketLimits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MarketLimits "nonUsMarketLimits" MarketLimitsRecord where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimits'nonUsMarketLimits + (\ x__ y__ -> x__ {_MarketLimits'nonUsMarketLimits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField MarketLimits "maybe'nonUsMarketLimits" (Prelude.Maybe MarketLimitsRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimits'nonUsMarketLimits + (\ x__ y__ -> x__ {_MarketLimits'nonUsMarketLimits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MarketLimits "exchangeMarketLimits" [ExchangeMarketLimits] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimits'exchangeMarketLimits + (\ x__ y__ -> x__ {_MarketLimits'exchangeMarketLimits = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField MarketLimits "vec'exchangeMarketLimits" (Data.Vector.Vector ExchangeMarketLimits) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimits'exchangeMarketLimits + (\ x__ y__ -> x__ {_MarketLimits'exchangeMarketLimits = y__})) + Prelude.id +instance Data.ProtoLens.Message MarketLimits where + messageName _ = Data.Text.pack "traderouting_1.MarketLimits" + packedMessageDescriptor _ + = "\n\ + \\fMarketLimits\DC2%\n\ + \\SOcleared_fields\CAN\ENQ \ETX(\rR\rclearedFields\DC2N\n\ + \\DC1all_market_limits\CAN\SOH \SOH(\v2\".traderouting_1.MarketLimitsRecordR\SIallMarketLimits\DC2L\n\ + \\DLEus_market_limits\CAN\STX \SOH(\v2\".traderouting_1.MarketLimitsRecordR\SOusMarketLimits\DC2S\n\ + \\DC4non_us_market_limits\CAN\ETX \SOH(\v2\".traderouting_1.MarketLimitsRecordR\DC1nonUsMarketLimits\DC2Z\n\ + \\SYNexchange_market_limits\CAN\EOT \ETX(\v2$.traderouting_1.ExchangeMarketLimitsR\DC4exchangeMarketLimits" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor MarketLimits + allMarketLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "all_market_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor MarketLimitsRecord) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allMarketLimits")) :: + Data.ProtoLens.FieldDescriptor MarketLimits + usMarketLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "us_market_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor MarketLimitsRecord) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'usMarketLimits")) :: + Data.ProtoLens.FieldDescriptor MarketLimits + nonUsMarketLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "non_us_market_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor MarketLimitsRecord) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'nonUsMarketLimits")) :: + Data.ProtoLens.FieldDescriptor MarketLimits + exchangeMarketLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exchange_market_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ExchangeMarketLimits) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"exchangeMarketLimits")) :: + Data.ProtoLens.FieldDescriptor MarketLimits + in + Data.Map.fromList + [(Data.ProtoLens.Tag 5, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, allMarketLimits__field_descriptor), + (Data.ProtoLens.Tag 2, usMarketLimits__field_descriptor), + (Data.ProtoLens.Tag 3, nonUsMarketLimits__field_descriptor), + (Data.ProtoLens.Tag 4, exchangeMarketLimits__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _MarketLimits'_unknownFields + (\ x__ y__ -> x__ {_MarketLimits'_unknownFields = y__}) + defMessage + = MarketLimits'_constructor + {_MarketLimits'clearedFields = Data.Vector.Generic.empty, + _MarketLimits'allMarketLimits = Prelude.Nothing, + _MarketLimits'usMarketLimits = Prelude.Nothing, + _MarketLimits'nonUsMarketLimits = Prelude.Nothing, + _MarketLimits'exchangeMarketLimits = Data.Vector.Generic.empty, + _MarketLimits'_unknownFields = []} + parseMessage + = let + loop :: + MarketLimits + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ExchangeMarketLimits + -> Data.ProtoLens.Encoding.Bytes.Parser MarketLimits + loop x mutable'clearedFields mutable'exchangeMarketLimits + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + frozen'exchangeMarketLimits <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'exchangeMarketLimits) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'exchangeMarketLimits") + frozen'exchangeMarketLimits x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 40 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x v mutable'exchangeMarketLimits + 42 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x y mutable'exchangeMarketLimits + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "all_market_limits" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allMarketLimits") y x) + mutable'clearedFields mutable'exchangeMarketLimits + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "us_market_limits" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"usMarketLimits") y x) + mutable'clearedFields mutable'exchangeMarketLimits + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "non_us_market_limits" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"nonUsMarketLimits") y x) + mutable'clearedFields mutable'exchangeMarketLimits + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "exchange_market_limits" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'exchangeMarketLimits y) + loop x mutable'clearedFields v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'clearedFields mutable'exchangeMarketLimits + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'exchangeMarketLimits <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'clearedFields + mutable'exchangeMarketLimits) + "MarketLimits" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allMarketLimits") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'usMarketLimits") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'nonUsMarketLimits") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'exchangeMarketLimits") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData MarketLimits where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_MarketLimits'_unknownFields x__) + (Control.DeepSeq.deepseq + (_MarketLimits'clearedFields x__) + (Control.DeepSeq.deepseq + (_MarketLimits'allMarketLimits x__) + (Control.DeepSeq.deepseq + (_MarketLimits'usMarketLimits x__) + (Control.DeepSeq.deepseq + (_MarketLimits'nonUsMarketLimits x__) + (Control.DeepSeq.deepseq + (_MarketLimits'exchangeMarketLimits x__) ()))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clearedFields' @:: Lens' MarketLimitsRecord [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clearedFields' @:: Lens' MarketLimitsRecord (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.allowedToTrade' @:: Lens' MarketLimitsRecord EntityAllowedToTrade@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowedToTrade' @:: Lens' MarketLimitsRecord (Prelude.Maybe EntityAllowedToTrade)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteMarginMultiplier' @:: Lens' MarketLimitsRecord Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteMarginMultiplier' @:: Lens' MarketLimitsRecord (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.positionAndTradeLimits' @:: Lens' MarketLimitsRecord PositionAndTradeLimits@ + * 'Proto.CMS.Traderouting1_Fields.maybe'positionAndTradeLimits' @:: Lens' MarketLimitsRecord (Prelude.Maybe PositionAndTradeLimits)@ + * 'Proto.CMS.Traderouting1_Fields.marginMultiplier' @:: Lens' MarketLimitsRecord LimitValueDouble@ + * 'Proto.CMS.Traderouting1_Fields.maybe'marginMultiplier' @:: Lens' MarketLimitsRecord (Prelude.Maybe LimitValueDouble)@ -} +data MarketLimitsRecord + = MarketLimitsRecord'_constructor {_MarketLimitsRecord'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _MarketLimitsRecord'allowedToTrade :: !(Prelude.Maybe EntityAllowedToTrade), + _MarketLimitsRecord'obsoleteMarginMultiplier :: !(Prelude.Maybe Prelude.Double), + _MarketLimitsRecord'positionAndTradeLimits :: !(Prelude.Maybe PositionAndTradeLimits), + _MarketLimitsRecord'marginMultiplier :: !(Prelude.Maybe LimitValueDouble), + _MarketLimitsRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show MarketLimitsRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField MarketLimitsRecord "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimitsRecord'clearedFields + (\ x__ y__ -> x__ {_MarketLimitsRecord'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField MarketLimitsRecord "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimitsRecord'clearedFields + (\ x__ y__ -> x__ {_MarketLimitsRecord'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MarketLimitsRecord "allowedToTrade" EntityAllowedToTrade where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimitsRecord'allowedToTrade + (\ x__ y__ -> x__ {_MarketLimitsRecord'allowedToTrade = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField MarketLimitsRecord "maybe'allowedToTrade" (Prelude.Maybe EntityAllowedToTrade) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimitsRecord'allowedToTrade + (\ x__ y__ -> x__ {_MarketLimitsRecord'allowedToTrade = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MarketLimitsRecord "obsoleteMarginMultiplier" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimitsRecord'obsoleteMarginMultiplier + (\ x__ y__ + -> x__ {_MarketLimitsRecord'obsoleteMarginMultiplier = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField MarketLimitsRecord "maybe'obsoleteMarginMultiplier" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimitsRecord'obsoleteMarginMultiplier + (\ x__ y__ + -> x__ {_MarketLimitsRecord'obsoleteMarginMultiplier = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MarketLimitsRecord "positionAndTradeLimits" PositionAndTradeLimits where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimitsRecord'positionAndTradeLimits + (\ x__ y__ + -> x__ {_MarketLimitsRecord'positionAndTradeLimits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField MarketLimitsRecord "maybe'positionAndTradeLimits" (Prelude.Maybe PositionAndTradeLimits) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimitsRecord'positionAndTradeLimits + (\ x__ y__ + -> x__ {_MarketLimitsRecord'positionAndTradeLimits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField MarketLimitsRecord "marginMultiplier" LimitValueDouble where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimitsRecord'marginMultiplier + (\ x__ y__ -> x__ {_MarketLimitsRecord'marginMultiplier = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField MarketLimitsRecord "maybe'marginMultiplier" (Prelude.Maybe LimitValueDouble) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _MarketLimitsRecord'marginMultiplier + (\ x__ y__ -> x__ {_MarketLimitsRecord'marginMultiplier = y__})) + Prelude.id +instance Data.ProtoLens.Message MarketLimitsRecord where + messageName _ = Data.Text.pack "traderouting_1.MarketLimitsRecord" + packedMessageDescriptor _ + = "\n\ + \\DC2MarketLimitsRecord\DC2%\n\ + \\SOcleared_fields\CAN\EOT \ETX(\rR\rclearedFields\DC2N\n\ + \\DLEallowed_to_trade\CAN\SOH \SOH(\v2$.traderouting_1.EntityAllowedToTradeR\SOallowedToTrade\DC2@\n\ + \\SUBobsolete_margin_multiplier\CAN\STX \SOH(\SOHR\CANobsoleteMarginMultiplierB\STX\CAN\SOH\DC2a\n\ + \\EMposition_and_trade_limits\CAN\ETX \SOH(\v2&.traderouting_1.PositionAndTradeLimitsR\SYNpositionAndTradeLimits\DC2M\n\ + \\DC1margin_multiplier\CAN\ENQ \SOH(\v2 .traderouting_1.LimitValueDoubleR\DLEmarginMultiplier" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor MarketLimitsRecord + allowedToTrade__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allowed_to_trade" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EntityAllowedToTrade) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowedToTrade")) :: + Data.ProtoLens.FieldDescriptor MarketLimitsRecord + obsoleteMarginMultiplier__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_margin_multiplier" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteMarginMultiplier")) :: + Data.ProtoLens.FieldDescriptor MarketLimitsRecord + positionAndTradeLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "position_and_trade_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor PositionAndTradeLimits) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'positionAndTradeLimits")) :: + Data.ProtoLens.FieldDescriptor MarketLimitsRecord + marginMultiplier__field_descriptor + = Data.ProtoLens.FieldDescriptor + "margin_multiplier" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDouble) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'marginMultiplier")) :: + Data.ProtoLens.FieldDescriptor MarketLimitsRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 4, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, allowedToTrade__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteMarginMultiplier__field_descriptor), + (Data.ProtoLens.Tag 3, positionAndTradeLimits__field_descriptor), + (Data.ProtoLens.Tag 5, marginMultiplier__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _MarketLimitsRecord'_unknownFields + (\ x__ y__ -> x__ {_MarketLimitsRecord'_unknownFields = y__}) + defMessage + = MarketLimitsRecord'_constructor + {_MarketLimitsRecord'clearedFields = Data.Vector.Generic.empty, + _MarketLimitsRecord'allowedToTrade = Prelude.Nothing, + _MarketLimitsRecord'obsoleteMarginMultiplier = Prelude.Nothing, + _MarketLimitsRecord'positionAndTradeLimits = Prelude.Nothing, + _MarketLimitsRecord'marginMultiplier = Prelude.Nothing, + _MarketLimitsRecord'_unknownFields = []} + parseMessage + = let + loop :: + MarketLimitsRecord + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser MarketLimitsRecord + loop x mutable'clearedFields + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 32 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x v + 34 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x y + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "allowed_to_trade" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowedToTrade") y x) + mutable'clearedFields + 17 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "obsolete_margin_multiplier" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteMarginMultiplier") y x) + mutable'clearedFields + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "position_and_trade_limits" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"positionAndTradeLimits") y x) + mutable'clearedFields + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "margin_multiplier" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"marginMultiplier") y x) + mutable'clearedFields + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'clearedFields + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'clearedFields) + "MarketLimitsRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allowedToTrade") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteMarginMultiplier") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 17) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'positionAndTradeLimits") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'marginMultiplier") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData MarketLimitsRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_MarketLimitsRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_MarketLimitsRecord'clearedFields x__) + (Control.DeepSeq.deepseq + (_MarketLimitsRecord'allowedToTrade x__) + (Control.DeepSeq.deepseq + (_MarketLimitsRecord'obsoleteMarginMultiplier x__) + (Control.DeepSeq.deepseq + (_MarketLimitsRecord'positionAndTradeLimits x__) + (Control.DeepSeq.deepseq + (_MarketLimitsRecord'marginMultiplier x__) ()))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.obsoleteQty' @:: Lens' OpenPosition Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteQty' @:: Lens' OpenPosition (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.price' @:: Lens' OpenPosition Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.tradeDate' @:: Lens' OpenPosition Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.statementDate' @:: Lens' OpenPosition Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.tradeUtcTime' @:: Lens' OpenPosition Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeUtcTime' @:: Lens' OpenPosition (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.positionId' @:: Lens' OpenPosition Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'positionId' @:: Lens' OpenPosition (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.status' @:: Lens' OpenPosition Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'status' @:: Lens' OpenPosition (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.qty' @:: Lens' OpenPosition Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'qty' @:: Lens' OpenPosition (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteCurrencyCode' @:: Lens' OpenPosition Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteCurrencyCode' @:: Lens' OpenPosition (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.speculationType' @:: Lens' OpenPosition Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'speculationType' @:: Lens' OpenPosition (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.orderChainId' @:: Lens' OpenPosition Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderChainId' @:: Lens' OpenPosition (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.displayPrice' @:: Lens' OpenPosition Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayPrice' @:: Lens' OpenPosition (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.currencyIsoCode' @:: Lens' OpenPosition Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'currencyIsoCode' @:: Lens' OpenPosition (Prelude.Maybe Data.Text.Text)@ -} +data OpenPosition + = OpenPosition'_constructor {_OpenPosition'obsoleteQty :: !(Prelude.Maybe Data.Word.Word32), + _OpenPosition'price :: !Prelude.Double, + _OpenPosition'tradeDate :: !Data.Int.Int64, + _OpenPosition'statementDate :: !Data.Int.Int64, + _OpenPosition'tradeUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _OpenPosition'positionId :: !(Prelude.Maybe Data.Text.Text), + _OpenPosition'status :: !(Prelude.Maybe Data.Word.Word32), + _OpenPosition'qty :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _OpenPosition'obsoleteCurrencyCode :: !(Prelude.Maybe Data.Text.Text), + _OpenPosition'speculationType :: !(Prelude.Maybe Data.Word.Word32), + _OpenPosition'orderChainId :: !(Prelude.Maybe Data.Text.Text), + _OpenPosition'displayPrice :: !(Prelude.Maybe Data.Int.Int64), + _OpenPosition'currencyIsoCode :: !(Prelude.Maybe Data.Text.Text), + _OpenPosition'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OpenPosition where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OpenPosition "obsoleteQty" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'obsoleteQty + (\ x__ y__ -> x__ {_OpenPosition'obsoleteQty = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OpenPosition "maybe'obsoleteQty" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'obsoleteQty + (\ x__ y__ -> x__ {_OpenPosition'obsoleteQty = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "price" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'price (\ x__ y__ -> x__ {_OpenPosition'price = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "tradeDate" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'tradeDate + (\ x__ y__ -> x__ {_OpenPosition'tradeDate = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "statementDate" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'statementDate + (\ x__ y__ -> x__ {_OpenPosition'statementDate = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "tradeUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'tradeUtcTime + (\ x__ y__ -> x__ {_OpenPosition'tradeUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OpenPosition "maybe'tradeUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'tradeUtcTime + (\ x__ y__ -> x__ {_OpenPosition'tradeUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "positionId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'positionId + (\ x__ y__ -> x__ {_OpenPosition'positionId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OpenPosition "maybe'positionId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'positionId + (\ x__ y__ -> x__ {_OpenPosition'positionId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "status" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'status + (\ x__ y__ -> x__ {_OpenPosition'status = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OpenPosition "maybe'status" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'status + (\ x__ y__ -> x__ {_OpenPosition'status = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "qty" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'qty (\ x__ y__ -> x__ {_OpenPosition'qty = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OpenPosition "maybe'qty" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'qty (\ x__ y__ -> x__ {_OpenPosition'qty = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "obsoleteCurrencyCode" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'obsoleteCurrencyCode + (\ x__ y__ -> x__ {_OpenPosition'obsoleteCurrencyCode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OpenPosition "maybe'obsoleteCurrencyCode" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'obsoleteCurrencyCode + (\ x__ y__ -> x__ {_OpenPosition'obsoleteCurrencyCode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "speculationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'speculationType + (\ x__ y__ -> x__ {_OpenPosition'speculationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OpenPosition "maybe'speculationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'speculationType + (\ x__ y__ -> x__ {_OpenPosition'speculationType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "orderChainId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'orderChainId + (\ x__ y__ -> x__ {_OpenPosition'orderChainId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OpenPosition "maybe'orderChainId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'orderChainId + (\ x__ y__ -> x__ {_OpenPosition'orderChainId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "displayPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'displayPrice + (\ x__ y__ -> x__ {_OpenPosition'displayPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OpenPosition "maybe'displayPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'displayPrice + (\ x__ y__ -> x__ {_OpenPosition'displayPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OpenPosition "currencyIsoCode" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'currencyIsoCode + (\ x__ y__ -> x__ {_OpenPosition'currencyIsoCode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OpenPosition "maybe'currencyIsoCode" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OpenPosition'currencyIsoCode + (\ x__ y__ -> x__ {_OpenPosition'currencyIsoCode = y__})) + Prelude.id +instance Data.ProtoLens.Message OpenPosition where + messageName _ = Data.Text.pack "traderouting_1.OpenPosition" + packedMessageDescriptor _ + = "\n\ + \\fOpenPosition\DC2%\n\ + \\fobsolete_qty\CAN\STX \SOH(\rR\vobsoleteQtyB\STX\CAN\SOH\DC2\DC4\n\ + \\ENQprice\CAN\ETX \STX(\SOHR\ENQprice\DC2\GS\n\ + \\n\ + \trade_date\CAN\EOT \STX(\DC2R\ttradeDate\DC2%\n\ + \\SOstatement_date\CAN\ENQ \STX(\DC2R\rstatementDate\DC2$\n\ + \\SOtrade_utc_time\CAN\ACK \SOH(\DC2R\ftradeUtcTime\DC2\US\n\ + \\vposition_id\CAN\a \SOH(\tR\n\ + \positionId\DC2\SYN\n\ + \\ACKstatus\CAN\b \SOH(\rR\ACKstatus\DC2\RS\n\ + \\ETXqty\CAN\t \SOH(\v2\f.cqg.DecimalR\ETXqty\DC28\n\ + \\SYNobsolete_currency_code\CAN\n\ + \ \SOH(\tR\DC4obsoleteCurrencyCodeB\STX\CAN\SOH\DC2)\n\ + \\DLEspeculation_type\CAN\v \SOH(\rR\SIspeculationType\DC2$\n\ + \\SOorder_chain_id\CAN\f \SOH(\tR\forderChainId\DC2#\n\ + \\rdisplay_price\CAN\r \SOH(\DC2R\fdisplayPrice\DC2*\n\ + \\DC1currency_iso_code\CAN\SO \SOH(\tR\SIcurrencyIsoCode\"1\n\ + \\SOPositionStatus\DC2\f\n\ + \\bPOSITION\DLE\SOH\DC2\DC1\n\ + \\rWORKING_ORDER\DLE\STX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteQty__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_qty" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteQty")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + price__field_descriptor + = Data.ProtoLens.FieldDescriptor + "price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"price")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + tradeDate__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_date" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"tradeDate")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + statementDate__field_descriptor + = Data.ProtoLens.FieldDescriptor + "statement_date" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"statementDate")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + tradeUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeUtcTime")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + positionId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "position_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'positionId")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + status__field_descriptor + = Data.ProtoLens.FieldDescriptor + "status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'status")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + qty__field_descriptor + = Data.ProtoLens.FieldDescriptor + "qty" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'qty")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + obsoleteCurrencyCode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_currency_code" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteCurrencyCode")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + speculationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "speculation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'speculationType")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + orderChainId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_chain_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderChainId")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + displayPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayPrice")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + currencyIsoCode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "currency_iso_code" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'currencyIsoCode")) :: + Data.ProtoLens.FieldDescriptor OpenPosition + in + Data.Map.fromList + [(Data.ProtoLens.Tag 2, obsoleteQty__field_descriptor), + (Data.ProtoLens.Tag 3, price__field_descriptor), + (Data.ProtoLens.Tag 4, tradeDate__field_descriptor), + (Data.ProtoLens.Tag 5, statementDate__field_descriptor), + (Data.ProtoLens.Tag 6, tradeUtcTime__field_descriptor), + (Data.ProtoLens.Tag 7, positionId__field_descriptor), + (Data.ProtoLens.Tag 8, status__field_descriptor), + (Data.ProtoLens.Tag 9, qty__field_descriptor), + (Data.ProtoLens.Tag 10, obsoleteCurrencyCode__field_descriptor), + (Data.ProtoLens.Tag 11, speculationType__field_descriptor), + (Data.ProtoLens.Tag 12, orderChainId__field_descriptor), + (Data.ProtoLens.Tag 13, displayPrice__field_descriptor), + (Data.ProtoLens.Tag 14, currencyIsoCode__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OpenPosition'_unknownFields + (\ x__ y__ -> x__ {_OpenPosition'_unknownFields = y__}) + defMessage + = OpenPosition'_constructor + {_OpenPosition'obsoleteQty = Prelude.Nothing, + _OpenPosition'price = Data.ProtoLens.fieldDefault, + _OpenPosition'tradeDate = Data.ProtoLens.fieldDefault, + _OpenPosition'statementDate = Data.ProtoLens.fieldDefault, + _OpenPosition'tradeUtcTime = Prelude.Nothing, + _OpenPosition'positionId = Prelude.Nothing, + _OpenPosition'status = Prelude.Nothing, + _OpenPosition'qty = Prelude.Nothing, + _OpenPosition'obsoleteCurrencyCode = Prelude.Nothing, + _OpenPosition'speculationType = Prelude.Nothing, + _OpenPosition'orderChainId = Prelude.Nothing, + _OpenPosition'displayPrice = Prelude.Nothing, + _OpenPosition'currencyIsoCode = Prelude.Nothing, + _OpenPosition'_unknownFields = []} + parseMessage + = let + loop :: + OpenPosition + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser OpenPosition + loop x required'price required'statementDate required'tradeDate + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'price then (:) "price" else Prelude.id) + ((if required'statementDate then + (:) "statement_date" + else + Prelude.id) + ((if required'tradeDate then (:) "trade_date" else Prelude.id) + [])) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_qty" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"obsoleteQty") y x) + required'price required'statementDate required'tradeDate + 25 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"price") y x) + Prelude.False required'statementDate required'tradeDate + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "trade_date" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"tradeDate") y x) + required'price required'statementDate Prelude.False + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "statement_date" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"statementDate") y x) + required'price Prelude.False required'tradeDate + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "trade_utc_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeUtcTime") y x) + required'price required'statementDate required'tradeDate + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "position_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"positionId") y x) + required'price required'statementDate required'tradeDate + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "status" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"status") y x) + required'price required'statementDate required'tradeDate + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "qty" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"qty") y x) + required'price required'statementDate required'tradeDate + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_currency_code" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCurrencyCode") y x) + required'price required'statementDate required'tradeDate + 88 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "speculation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"speculationType") y x) + required'price required'statementDate required'tradeDate + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_chain_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderChainId") y x) + required'price required'statementDate required'tradeDate + 104 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayPrice") y x) + required'price required'statementDate required'tradeDate + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "currency_iso_code" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"currencyIsoCode") y x) + required'price required'statementDate required'tradeDate + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'price required'statementDate required'tradeDate + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True) + "OpenPosition" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteQty") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 25) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"price") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"tradeDate") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"statementDate") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeUtcTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'positionId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'status") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'qty") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteCurrencyCode") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'speculationType") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderChainId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'displayPrice") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 104) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'currencyIsoCode") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x)))))))))))))) +instance Control.DeepSeq.NFData OpenPosition where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OpenPosition'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OpenPosition'obsoleteQty x__) + (Control.DeepSeq.deepseq + (_OpenPosition'price x__) + (Control.DeepSeq.deepseq + (_OpenPosition'tradeDate x__) + (Control.DeepSeq.deepseq + (_OpenPosition'statementDate x__) + (Control.DeepSeq.deepseq + (_OpenPosition'tradeUtcTime x__) + (Control.DeepSeq.deepseq + (_OpenPosition'positionId x__) + (Control.DeepSeq.deepseq + (_OpenPosition'status x__) + (Control.DeepSeq.deepseq + (_OpenPosition'qty x__) + (Control.DeepSeq.deepseq + (_OpenPosition'obsoleteCurrencyCode x__) + (Control.DeepSeq.deepseq + (_OpenPosition'speculationType x__) + (Control.DeepSeq.deepseq + (_OpenPosition'orderChainId x__) + (Control.DeepSeq.deepseq + (_OpenPosition'displayPrice x__) + (Control.DeepSeq.deepseq + (_OpenPosition'currencyIsoCode x__) + ()))))))))))))) +data OpenPosition'PositionStatus + = OpenPosition'POSITION | OpenPosition'WORKING_ORDER + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OpenPosition'PositionStatus where + maybeToEnum 1 = Prelude.Just OpenPosition'POSITION + maybeToEnum 2 = Prelude.Just OpenPosition'WORKING_ORDER + maybeToEnum _ = Prelude.Nothing + showEnum OpenPosition'POSITION = "POSITION" + showEnum OpenPosition'WORKING_ORDER = "WORKING_ORDER" + readEnum k + | (Prelude.==) k "POSITION" = Prelude.Just OpenPosition'POSITION + | (Prelude.==) k "WORKING_ORDER" + = Prelude.Just OpenPosition'WORKING_ORDER + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OpenPosition'PositionStatus where + minBound = OpenPosition'POSITION + maxBound = OpenPosition'WORKING_ORDER +instance Prelude.Enum OpenPosition'PositionStatus where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum PositionStatus: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OpenPosition'POSITION = 1 + fromEnum OpenPosition'WORKING_ORDER = 2 + succ OpenPosition'WORKING_ORDER + = Prelude.error + "OpenPosition'PositionStatus.succ: bad argument OpenPosition'WORKING_ORDER. This value would be out of bounds." + succ OpenPosition'POSITION = OpenPosition'WORKING_ORDER + pred OpenPosition'POSITION + = Prelude.error + "OpenPosition'PositionStatus.pred: bad argument OpenPosition'POSITION. This value would be out of bounds." + pred OpenPosition'WORKING_ORDER = OpenPosition'POSITION + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OpenPosition'PositionStatus where + fieldDefault = OpenPosition'POSITION +instance Control.DeepSeq.NFData OpenPosition'PositionStatus where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clientOrderId' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'clientOrderId' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.clientGuid' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'clientGuid' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.clientSystemId' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'clientSystemId' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.clientIp' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'clientIp' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.clientVersion' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'clientVersion' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.productId' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'productId' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.clientAppTypeName' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'clientAppTypeName' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.platformName' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'platformName' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.privateLabelName' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'privateLabelName' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.operatorId' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'operatorId' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.senderOperatorId' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'senderOperatorId' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.senderLocationId' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'senderLocationId' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.originatorLocationId' @:: Lens' OperationalDetails Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'originatorLocationId' @:: Lens' OperationalDetails (Prelude.Maybe Data.Text.Text)@ -} +data OperationalDetails + = OperationalDetails'_constructor {_OperationalDetails'clientOrderId :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'clientGuid :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'clientSystemId :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'clientIp :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'clientVersion :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'productId :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'clientAppTypeName :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'platformName :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'privateLabelName :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'operatorId :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'senderOperatorId :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'senderLocationId :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'originatorLocationId :: !(Prelude.Maybe Data.Text.Text), + _OperationalDetails'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OperationalDetails where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OperationalDetails "clientOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientOrderId + (\ x__ y__ -> x__ {_OperationalDetails'clientOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'clientOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientOrderId + (\ x__ y__ -> x__ {_OperationalDetails'clientOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "clientGuid" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientGuid + (\ x__ y__ -> x__ {_OperationalDetails'clientGuid = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'clientGuid" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientGuid + (\ x__ y__ -> x__ {_OperationalDetails'clientGuid = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "clientSystemId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientSystemId + (\ x__ y__ -> x__ {_OperationalDetails'clientSystemId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'clientSystemId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientSystemId + (\ x__ y__ -> x__ {_OperationalDetails'clientSystemId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "clientIp" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientIp + (\ x__ y__ -> x__ {_OperationalDetails'clientIp = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'clientIp" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientIp + (\ x__ y__ -> x__ {_OperationalDetails'clientIp = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "clientVersion" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientVersion + (\ x__ y__ -> x__ {_OperationalDetails'clientVersion = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'clientVersion" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientVersion + (\ x__ y__ -> x__ {_OperationalDetails'clientVersion = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'tradeLocationId + (\ x__ y__ -> x__ {_OperationalDetails'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'tradeLocationId + (\ x__ y__ -> x__ {_OperationalDetails'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "productId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'productId + (\ x__ y__ -> x__ {_OperationalDetails'productId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'productId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'productId + (\ x__ y__ -> x__ {_OperationalDetails'productId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "clientAppTypeName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientAppTypeName + (\ x__ y__ -> x__ {_OperationalDetails'clientAppTypeName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'clientAppTypeName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'clientAppTypeName + (\ x__ y__ -> x__ {_OperationalDetails'clientAppTypeName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "platformName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'platformName + (\ x__ y__ -> x__ {_OperationalDetails'platformName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'platformName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'platformName + (\ x__ y__ -> x__ {_OperationalDetails'platformName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "privateLabelName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'privateLabelName + (\ x__ y__ -> x__ {_OperationalDetails'privateLabelName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'privateLabelName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'privateLabelName + (\ x__ y__ -> x__ {_OperationalDetails'privateLabelName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "operatorId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'operatorId + (\ x__ y__ -> x__ {_OperationalDetails'operatorId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'operatorId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'operatorId + (\ x__ y__ -> x__ {_OperationalDetails'operatorId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "senderOperatorId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'senderOperatorId + (\ x__ y__ -> x__ {_OperationalDetails'senderOperatorId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'senderOperatorId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'senderOperatorId + (\ x__ y__ -> x__ {_OperationalDetails'senderOperatorId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "senderLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'senderLocationId + (\ x__ y__ -> x__ {_OperationalDetails'senderLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'senderLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'senderLocationId + (\ x__ y__ -> x__ {_OperationalDetails'senderLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OperationalDetails "originatorLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'originatorLocationId + (\ x__ y__ + -> x__ {_OperationalDetails'originatorLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OperationalDetails "maybe'originatorLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OperationalDetails'originatorLocationId + (\ x__ y__ + -> x__ {_OperationalDetails'originatorLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Message OperationalDetails where + messageName _ = Data.Text.pack "traderouting_1.OperationalDetails" + packedMessageDescriptor _ + = "\n\ + \\DC2OperationalDetails\DC2&\n\ + \\SIclient_order_id\CAN\SOH \SOH(\tR\rclientOrderId\DC2\US\n\ + \\vclient_guid\CAN\STX \SOH(\tR\n\ + \clientGuid\DC2(\n\ + \\DLEclient_system_id\CAN\ETX \SOH(\tR\SOclientSystemId\DC2\ESC\n\ + \\tclient_ip\CAN\EOT \SOH(\tR\bclientIp\DC2%\n\ + \\SOclient_version\CAN\ENQ \SOH(\tR\rclientVersion\DC2*\n\ + \\DC1trade_location_id\CAN\ACK \SOH(\tR\SItradeLocationId\DC2\GS\n\ + \\n\ + \product_id\CAN\a \SOH(\tR\tproductId\DC2/\n\ + \\DC4client_app_type_name\CAN\b \SOH(\tR\DC1clientAppTypeName\DC2#\n\ + \\rplatform_name\CAN\t \SOH(\tR\fplatformName\DC2,\n\ + \\DC2private_label_name\CAN\n\ + \ \SOH(\tR\DLEprivateLabelName\DC2\US\n\ + \\voperator_id\CAN\v \SOH(\tR\n\ + \operatorId\DC2,\n\ + \\DC2sender_operator_id\CAN\f \SOH(\tR\DLEsenderOperatorId\DC2,\n\ + \\DC2sender_location_id\CAN\r \SOH(\tR\DLEsenderLocationId\DC24\n\ + \\SYNoriginator_location_id\CAN\SO \SOH(\tR\DC4originatorLocationId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clientOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'clientOrderId")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + clientGuid__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_guid" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'clientGuid")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + clientSystemId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_system_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'clientSystemId")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + clientIp__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_ip" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'clientIp")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + clientVersion__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_version" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'clientVersion")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + productId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "product_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'productId")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + clientAppTypeName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_app_type_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'clientAppTypeName")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + platformName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "platform_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'platformName")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + privateLabelName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "private_label_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'privateLabelName")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + operatorId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operator_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'operatorId")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + senderOperatorId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sender_operator_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'senderOperatorId")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + senderLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sender_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'senderLocationId")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + originatorLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "originator_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'originatorLocationId")) :: + Data.ProtoLens.FieldDescriptor OperationalDetails + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, clientOrderId__field_descriptor), + (Data.ProtoLens.Tag 2, clientGuid__field_descriptor), + (Data.ProtoLens.Tag 3, clientSystemId__field_descriptor), + (Data.ProtoLens.Tag 4, clientIp__field_descriptor), + (Data.ProtoLens.Tag 5, clientVersion__field_descriptor), + (Data.ProtoLens.Tag 6, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 7, productId__field_descriptor), + (Data.ProtoLens.Tag 8, clientAppTypeName__field_descriptor), + (Data.ProtoLens.Tag 9, platformName__field_descriptor), + (Data.ProtoLens.Tag 10, privateLabelName__field_descriptor), + (Data.ProtoLens.Tag 11, operatorId__field_descriptor), + (Data.ProtoLens.Tag 12, senderOperatorId__field_descriptor), + (Data.ProtoLens.Tag 13, senderLocationId__field_descriptor), + (Data.ProtoLens.Tag 14, originatorLocationId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OperationalDetails'_unknownFields + (\ x__ y__ -> x__ {_OperationalDetails'_unknownFields = y__}) + defMessage + = OperationalDetails'_constructor + {_OperationalDetails'clientOrderId = Prelude.Nothing, + _OperationalDetails'clientGuid = Prelude.Nothing, + _OperationalDetails'clientSystemId = Prelude.Nothing, + _OperationalDetails'clientIp = Prelude.Nothing, + _OperationalDetails'clientVersion = Prelude.Nothing, + _OperationalDetails'tradeLocationId = Prelude.Nothing, + _OperationalDetails'productId = Prelude.Nothing, + _OperationalDetails'clientAppTypeName = Prelude.Nothing, + _OperationalDetails'platformName = Prelude.Nothing, + _OperationalDetails'privateLabelName = Prelude.Nothing, + _OperationalDetails'operatorId = Prelude.Nothing, + _OperationalDetails'senderOperatorId = Prelude.Nothing, + _OperationalDetails'senderLocationId = Prelude.Nothing, + _OperationalDetails'originatorLocationId = Prelude.Nothing, + _OperationalDetails'_unknownFields = []} + parseMessage + = let + loop :: + OperationalDetails + -> Data.ProtoLens.Encoding.Bytes.Parser OperationalDetails + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"clientOrderId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_guid" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"clientGuid") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_system_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"clientSystemId") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_ip" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"clientIp") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_version" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"clientVersion") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "product_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"productId") y x) + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_app_type_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"clientAppTypeName") y x) + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "platform_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"platformName") y x) + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "private_label_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"privateLabelName") y x) + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "operator_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"operatorId") y x) + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sender_operator_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"senderOperatorId") y x) + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sender_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"senderLocationId") y x) + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "originator_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"originatorLocationId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "OperationalDetails" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'clientOrderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'clientGuid") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'clientSystemId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'clientIp") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'clientVersion") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'productId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'clientAppTypeName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'platformName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'privateLabelName") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'operatorId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'senderOperatorId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'senderLocationId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'originatorLocationId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))) +instance Control.DeepSeq.NFData OperationalDetails where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OperationalDetails'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'clientOrderId x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'clientGuid x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'clientSystemId x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'clientIp x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'clientVersion x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'tradeLocationId x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'productId x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'clientAppTypeName x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'platformName x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'privateLabelName x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'operatorId x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'senderOperatorId x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'senderLocationId x__) + (Control.DeepSeq.deepseq + (_OperationalDetails'originatorLocationId + x__) + ())))))))))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.chainOrderId' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.orderId' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.chainOrigAccountId' @:: Lens' OrderChain Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.submittedUtcTime' @:: Lens' OrderChain Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.contractSymbol' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.side' @:: Lens' OrderChain Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteSize' @:: Lens' OrderChain Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteSize' @:: Lens' OrderChain (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.limitPrice' @:: Lens' OrderChain Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'limitPrice' @:: Lens' OrderChain (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.stopPrice' @:: Lens' OrderChain Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'stopPrice' @:: Lens' OrderChain (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.execInstruction' @:: Lens' OrderChain [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'execInstruction' @:: Lens' OrderChain (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.duration' @:: Lens' OrderChain Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.goodThruDate' @:: Lens' OrderChain Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'goodThruDate' @:: Lens' OrderChain (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.goodThruUtcTime' @:: Lens' OrderChain Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'goodThruUtcTime' @:: Lens' OrderChain (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.status' @:: Lens' OrderChain Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.orderType' @:: Lens' OrderChain Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.orderRequest' @:: Lens' OrderChain [OrderRequest]@ + * 'Proto.CMS.Traderouting1_Fields.vec'orderRequest' @:: Lens' OrderChain (Data.Vector.Vector OrderRequest)@ + * 'Proto.CMS.Traderouting1_Fields.orderFill' @:: Lens' OrderChain [OrderFill]@ + * 'Proto.CMS.Traderouting1_Fields.vec'orderFill' @:: Lens' OrderChain (Data.Vector.Vector OrderFill)@ + * 'Proto.CMS.Traderouting1_Fields.orderClasses' @:: Lens' OrderChain [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'orderClasses' @:: Lens' OrderChain (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.displayLimitPrice' @:: Lens' OrderChain Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayLimitPrice' @:: Lens' OrderChain (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.displayStopPrice' @:: Lens' OrderChain Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayStopPrice' @:: Lens' OrderChain (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.executionAccountName' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'executionAccountName' @:: Lens' OrderChain (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.trailing' @:: Lens' OrderChain OrderTrailing@ + * 'Proto.CMS.Traderouting1_Fields.maybe'trailing' @:: Lens' OrderChain (Prelude.Maybe OrderTrailing)@ + * 'Proto.CMS.Traderouting1_Fields.sizes' @:: Lens' OrderChain OrderSizes@ + * 'Proto.CMS.Traderouting1_Fields.maybe'sizes' @:: Lens' OrderChain (Prelude.Maybe OrderSizes)@ + * 'Proto.CMS.Traderouting1_Fields.accounts' @:: Lens' OrderChain [ChainAccount]@ + * 'Proto.CMS.Traderouting1_Fields.vec'accounts' @:: Lens' OrderChain (Data.Vector.Vector ChainAccount)@ + * 'Proto.CMS.Traderouting1_Fields.compoundTreeId' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'compoundTreeId' @:: Lens' OrderChain (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.rootChainOrderId' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'rootChainOrderId' @:: Lens' OrderChain (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.checked' @:: Lens' OrderChain Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'checked' @:: Lens' OrderChain (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.tradingExpression' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradingExpression' @:: Lens' OrderChain (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.legs' @:: Lens' OrderChain [OrderContractLeg]@ + * 'Proto.CMS.Traderouting1_Fields.vec'legs' @:: Lens' OrderChain (Data.Vector.Vector OrderContractLeg)@ + * 'Proto.CMS.Traderouting1_Fields.contractDescription' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'contractDescription' @:: Lens' OrderChain (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.userAttributes' @:: Lens' OrderChain [Proto.CMS.Common1.Tuple]@ + * 'Proto.CMS.Traderouting1_Fields.vec'userAttributes' @:: Lens' OrderChain (Data.Vector.Vector Proto.CMS.Common1.Tuple)@ + * 'Proto.CMS.Traderouting1_Fields.clientAlgoStrategy' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'clientAlgoStrategy' @:: Lens' OrderChain (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.algoStrategy' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'algoStrategy' @:: Lens' OrderChain (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.route' @:: Lens' OrderChain OrderRoute@ + * 'Proto.CMS.Traderouting1_Fields.maybe'route' @:: Lens' OrderChain (Prelude.Maybe OrderRoute)@ + * 'Proto.CMS.Traderouting1_Fields.expirationTime' @:: Lens' OrderChain Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'expirationTime' @:: Lens' OrderChain (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.openCloseType' @:: Lens' OrderChain Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'openCloseType' @:: Lens' OrderChain (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.speculationType' @:: Lens' OrderChain Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'speculationType' @:: Lens' OrderChain (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.archived' @:: Lens' OrderChain Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'archived' @:: Lens' OrderChain (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.orderIdAtExchange' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderIdAtExchange' @:: Lens' OrderChain (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteDiscretionaryOffset' @:: Lens' OrderChain Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteDiscretionaryOffset' @:: Lens' OrderChain (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.size' @:: Lens' OrderChain Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'size' @:: Lens' OrderChain (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.extendedSide' @:: Lens' OrderChain Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'extendedSide' @:: Lens' OrderChain (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.locateId' @:: Lens' OrderChain Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'locateId' @:: Lens' OrderChain (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.exchangeExtraValues' @:: Lens' OrderChain [Proto.CMS.Common1.Tuple]@ + * 'Proto.CMS.Traderouting1_Fields.vec'exchangeExtraValues' @:: Lens' OrderChain (Data.Vector.Vector Proto.CMS.Common1.Tuple)@ + * 'Proto.CMS.Traderouting1_Fields.isExcludedFromRiskCalculation' @:: Lens' OrderChain Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isExcludedFromRiskCalculation' @:: Lens' OrderChain (Prelude.Maybe Prelude.Bool)@ -} +data OrderChain + = OrderChain'_constructor {_OrderChain'chainOrderId :: !Data.Text.Text, + _OrderChain'orderId :: !Data.Text.Text, + _OrderChain'chainOrigAccountId :: !Data.Int.Int32, + _OrderChain'submittedUtcTime :: !Data.Int.Int64, + _OrderChain'contractSymbol :: !Data.Text.Text, + _OrderChain'side :: !Data.Word.Word32, + _OrderChain'obsoleteSize :: !(Prelude.Maybe Data.Word.Word32), + _OrderChain'limitPrice :: !(Prelude.Maybe Prelude.Double), + _OrderChain'stopPrice :: !(Prelude.Maybe Prelude.Double), + _OrderChain'execInstruction :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _OrderChain'duration :: !Data.Word.Word32, + _OrderChain'goodThruDate :: !(Prelude.Maybe Data.Int.Int64), + _OrderChain'goodThruUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _OrderChain'status :: !Data.Word.Word32, + _OrderChain'orderType :: !Data.Word.Word32, + _OrderChain'orderRequest :: !(Data.Vector.Vector OrderRequest), + _OrderChain'orderFill :: !(Data.Vector.Vector OrderFill), + _OrderChain'orderClasses :: !(Data.Vector.Vector Data.Text.Text), + _OrderChain'displayLimitPrice :: !(Prelude.Maybe Data.Int.Int64), + _OrderChain'displayStopPrice :: !(Prelude.Maybe Data.Int.Int64), + _OrderChain'executionAccountName :: !(Prelude.Maybe Data.Text.Text), + _OrderChain'trailing :: !(Prelude.Maybe OrderTrailing), + _OrderChain'sizes :: !(Prelude.Maybe OrderSizes), + _OrderChain'accounts :: !(Data.Vector.Vector ChainAccount), + _OrderChain'compoundTreeId :: !(Prelude.Maybe Data.Text.Text), + _OrderChain'rootChainOrderId :: !(Prelude.Maybe Data.Text.Text), + _OrderChain'checked :: !(Prelude.Maybe Prelude.Bool), + _OrderChain'tradingExpression :: !(Prelude.Maybe Data.Text.Text), + _OrderChain'legs :: !(Data.Vector.Vector OrderContractLeg), + _OrderChain'contractDescription :: !(Prelude.Maybe Data.Text.Text), + _OrderChain'userAttributes :: !(Data.Vector.Vector Proto.CMS.Common1.Tuple), + _OrderChain'clientAlgoStrategy :: !(Prelude.Maybe Data.Text.Text), + _OrderChain'algoStrategy :: !(Prelude.Maybe Data.Text.Text), + _OrderChain'route :: !(Prelude.Maybe OrderRoute), + _OrderChain'expirationTime :: !(Prelude.Maybe Data.Int.Int64), + _OrderChain'openCloseType :: !(Prelude.Maybe Data.Word.Word32), + _OrderChain'speculationType :: !(Prelude.Maybe Data.Word.Word32), + _OrderChain'archived :: !(Prelude.Maybe Prelude.Bool), + _OrderChain'orderIdAtExchange :: !(Prelude.Maybe Data.Text.Text), + _OrderChain'obsoleteDiscretionaryOffset :: !(Prelude.Maybe Data.Word.Word32), + _OrderChain'size :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _OrderChain'extendedSide :: !(Prelude.Maybe Data.Word.Word32), + _OrderChain'locateId :: !(Prelude.Maybe Data.Text.Text), + _OrderChain'exchangeExtraValues :: !(Data.Vector.Vector Proto.CMS.Common1.Tuple), + _OrderChain'isExcludedFromRiskCalculation :: !(Prelude.Maybe Prelude.Bool), + _OrderChain'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderChain where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderChain "chainOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'chainOrderId + (\ x__ y__ -> x__ {_OrderChain'chainOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "orderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'orderId (\ x__ y__ -> x__ {_OrderChain'orderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "chainOrigAccountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'chainOrigAccountId + (\ x__ y__ -> x__ {_OrderChain'chainOrigAccountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "submittedUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'submittedUtcTime + (\ x__ y__ -> x__ {_OrderChain'submittedUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "contractSymbol" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'contractSymbol + (\ x__ y__ -> x__ {_OrderChain'contractSymbol = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "side" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'side (\ x__ y__ -> x__ {_OrderChain'side = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "obsoleteSize" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'obsoleteSize + (\ x__ y__ -> x__ {_OrderChain'obsoleteSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'obsoleteSize" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'obsoleteSize + (\ x__ y__ -> x__ {_OrderChain'obsoleteSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "limitPrice" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'limitPrice + (\ x__ y__ -> x__ {_OrderChain'limitPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'limitPrice" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'limitPrice + (\ x__ y__ -> x__ {_OrderChain'limitPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "stopPrice" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'stopPrice + (\ x__ y__ -> x__ {_OrderChain'stopPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'stopPrice" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'stopPrice + (\ x__ y__ -> x__ {_OrderChain'stopPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "execInstruction" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'execInstruction + (\ x__ y__ -> x__ {_OrderChain'execInstruction = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderChain "vec'execInstruction" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'execInstruction + (\ x__ y__ -> x__ {_OrderChain'execInstruction = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "duration" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'duration + (\ x__ y__ -> x__ {_OrderChain'duration = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "goodThruDate" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'goodThruDate + (\ x__ y__ -> x__ {_OrderChain'goodThruDate = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'goodThruDate" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'goodThruDate + (\ x__ y__ -> x__ {_OrderChain'goodThruDate = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "goodThruUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'goodThruUtcTime + (\ x__ y__ -> x__ {_OrderChain'goodThruUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'goodThruUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'goodThruUtcTime + (\ x__ y__ -> x__ {_OrderChain'goodThruUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "status" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'status (\ x__ y__ -> x__ {_OrderChain'status = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "orderType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'orderType + (\ x__ y__ -> x__ {_OrderChain'orderType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "orderRequest" [OrderRequest] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'orderRequest + (\ x__ y__ -> x__ {_OrderChain'orderRequest = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderChain "vec'orderRequest" (Data.Vector.Vector OrderRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'orderRequest + (\ x__ y__ -> x__ {_OrderChain'orderRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "orderFill" [OrderFill] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'orderFill + (\ x__ y__ -> x__ {_OrderChain'orderFill = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderChain "vec'orderFill" (Data.Vector.Vector OrderFill) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'orderFill + (\ x__ y__ -> x__ {_OrderChain'orderFill = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "orderClasses" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'orderClasses + (\ x__ y__ -> x__ {_OrderChain'orderClasses = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderChain "vec'orderClasses" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'orderClasses + (\ x__ y__ -> x__ {_OrderChain'orderClasses = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "displayLimitPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'displayLimitPrice + (\ x__ y__ -> x__ {_OrderChain'displayLimitPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'displayLimitPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'displayLimitPrice + (\ x__ y__ -> x__ {_OrderChain'displayLimitPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "displayStopPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'displayStopPrice + (\ x__ y__ -> x__ {_OrderChain'displayStopPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'displayStopPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'displayStopPrice + (\ x__ y__ -> x__ {_OrderChain'displayStopPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "executionAccountName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'executionAccountName + (\ x__ y__ -> x__ {_OrderChain'executionAccountName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'executionAccountName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'executionAccountName + (\ x__ y__ -> x__ {_OrderChain'executionAccountName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "trailing" OrderTrailing where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'trailing + (\ x__ y__ -> x__ {_OrderChain'trailing = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'trailing" (Prelude.Maybe OrderTrailing) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'trailing + (\ x__ y__ -> x__ {_OrderChain'trailing = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "sizes" OrderSizes where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'sizes (\ x__ y__ -> x__ {_OrderChain'sizes = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'sizes" (Prelude.Maybe OrderSizes) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'sizes (\ x__ y__ -> x__ {_OrderChain'sizes = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "accounts" [ChainAccount] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'accounts + (\ x__ y__ -> x__ {_OrderChain'accounts = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderChain "vec'accounts" (Data.Vector.Vector ChainAccount) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'accounts + (\ x__ y__ -> x__ {_OrderChain'accounts = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "compoundTreeId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'compoundTreeId + (\ x__ y__ -> x__ {_OrderChain'compoundTreeId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'compoundTreeId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'compoundTreeId + (\ x__ y__ -> x__ {_OrderChain'compoundTreeId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "rootChainOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'rootChainOrderId + (\ x__ y__ -> x__ {_OrderChain'rootChainOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'rootChainOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'rootChainOrderId + (\ x__ y__ -> x__ {_OrderChain'rootChainOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "checked" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'checked (\ x__ y__ -> x__ {_OrderChain'checked = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'checked" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'checked (\ x__ y__ -> x__ {_OrderChain'checked = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "tradingExpression" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'tradingExpression + (\ x__ y__ -> x__ {_OrderChain'tradingExpression = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'tradingExpression" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'tradingExpression + (\ x__ y__ -> x__ {_OrderChain'tradingExpression = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "legs" [OrderContractLeg] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'legs (\ x__ y__ -> x__ {_OrderChain'legs = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderChain "vec'legs" (Data.Vector.Vector OrderContractLeg) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'legs (\ x__ y__ -> x__ {_OrderChain'legs = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "contractDescription" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'contractDescription + (\ x__ y__ -> x__ {_OrderChain'contractDescription = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'contractDescription" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'contractDescription + (\ x__ y__ -> x__ {_OrderChain'contractDescription = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "userAttributes" [Proto.CMS.Common1.Tuple] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'userAttributes + (\ x__ y__ -> x__ {_OrderChain'userAttributes = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderChain "vec'userAttributes" (Data.Vector.Vector Proto.CMS.Common1.Tuple) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'userAttributes + (\ x__ y__ -> x__ {_OrderChain'userAttributes = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "clientAlgoStrategy" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'clientAlgoStrategy + (\ x__ y__ -> x__ {_OrderChain'clientAlgoStrategy = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'clientAlgoStrategy" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'clientAlgoStrategy + (\ x__ y__ -> x__ {_OrderChain'clientAlgoStrategy = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "algoStrategy" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'algoStrategy + (\ x__ y__ -> x__ {_OrderChain'algoStrategy = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'algoStrategy" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'algoStrategy + (\ x__ y__ -> x__ {_OrderChain'algoStrategy = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "route" OrderRoute where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'route (\ x__ y__ -> x__ {_OrderChain'route = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'route" (Prelude.Maybe OrderRoute) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'route (\ x__ y__ -> x__ {_OrderChain'route = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "expirationTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'expirationTime + (\ x__ y__ -> x__ {_OrderChain'expirationTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'expirationTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'expirationTime + (\ x__ y__ -> x__ {_OrderChain'expirationTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "openCloseType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'openCloseType + (\ x__ y__ -> x__ {_OrderChain'openCloseType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'openCloseType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'openCloseType + (\ x__ y__ -> x__ {_OrderChain'openCloseType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "speculationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'speculationType + (\ x__ y__ -> x__ {_OrderChain'speculationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'speculationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'speculationType + (\ x__ y__ -> x__ {_OrderChain'speculationType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "archived" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'archived + (\ x__ y__ -> x__ {_OrderChain'archived = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'archived" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'archived + (\ x__ y__ -> x__ {_OrderChain'archived = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "orderIdAtExchange" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'orderIdAtExchange + (\ x__ y__ -> x__ {_OrderChain'orderIdAtExchange = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'orderIdAtExchange" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'orderIdAtExchange + (\ x__ y__ -> x__ {_OrderChain'orderIdAtExchange = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "obsoleteDiscretionaryOffset" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'obsoleteDiscretionaryOffset + (\ x__ y__ -> x__ {_OrderChain'obsoleteDiscretionaryOffset = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'obsoleteDiscretionaryOffset" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'obsoleteDiscretionaryOffset + (\ x__ y__ -> x__ {_OrderChain'obsoleteDiscretionaryOffset = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "size" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'size (\ x__ y__ -> x__ {_OrderChain'size = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'size" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'size (\ x__ y__ -> x__ {_OrderChain'size = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "extendedSide" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'extendedSide + (\ x__ y__ -> x__ {_OrderChain'extendedSide = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'extendedSide" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'extendedSide + (\ x__ y__ -> x__ {_OrderChain'extendedSide = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "locateId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'locateId + (\ x__ y__ -> x__ {_OrderChain'locateId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'locateId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'locateId + (\ x__ y__ -> x__ {_OrderChain'locateId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "exchangeExtraValues" [Proto.CMS.Common1.Tuple] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'exchangeExtraValues + (\ x__ y__ -> x__ {_OrderChain'exchangeExtraValues = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderChain "vec'exchangeExtraValues" (Data.Vector.Vector Proto.CMS.Common1.Tuple) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'exchangeExtraValues + (\ x__ y__ -> x__ {_OrderChain'exchangeExtraValues = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderChain "isExcludedFromRiskCalculation" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'isExcludedFromRiskCalculation + (\ x__ y__ + -> x__ {_OrderChain'isExcludedFromRiskCalculation = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderChain "maybe'isExcludedFromRiskCalculation" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderChain'isExcludedFromRiskCalculation + (\ x__ y__ + -> x__ {_OrderChain'isExcludedFromRiskCalculation = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderChain where + messageName _ = Data.Text.pack "traderouting_1.OrderChain" + packedMessageDescriptor _ + = "\n\ + \\n\ + \OrderChain\DC2$\n\ + \\SOchain_order_id\CAN\SOH \STX(\tR\fchainOrderId\DC2\EM\n\ + \\border_id\CAN\STX \STX(\tR\aorderId\DC21\n\ + \\NAKchain_orig_account_id\CAN\EOT \STX(\DC1R\DC2chainOrigAccountId\DC2,\n\ + \\DC2submitted_utc_time\CAN\ENQ \STX(\DC2R\DLEsubmittedUtcTime\DC2'\n\ + \\SIcontract_symbol\CAN\ACK \STX(\tR\SOcontractSymbol\DC2\DC2\n\ + \\EOTside\CAN\a \STX(\rR\EOTside\DC2'\n\ + \\robsolete_size\CAN\b \SOH(\rR\fobsoleteSizeB\STX\CAN\SOH\DC2\US\n\ + \\vlimit_price\CAN\t \SOH(\SOHR\n\ + \limitPrice\DC2\GS\n\ + \\n\ + \stop_price\CAN\n\ + \ \SOH(\SOHR\tstopPrice\DC2)\n\ + \\DLEexec_instruction\CAN\v \ETX(\rR\SIexecInstruction\DC2\SUB\n\ + \\bduration\CAN\f \STX(\rR\bduration\DC2$\n\ + \\SOgood_thru_date\CAN\r \SOH(\DC2R\fgoodThruDate\DC2+\n\ + \\DC2good_thru_utc_time\CAN\SO \SOH(\DC2R\SIgoodThruUtcTime\DC2\SYN\n\ + \\ACKstatus\CAN\SI \STX(\rR\ACKstatus\DC2\GS\n\ + \\n\ + \order_type\CAN\DLE \STX(\rR\torderType\DC2A\n\ + \\rorder_request\CAN\DC1 \ETX(\v2\FS.traderouting_1.OrderRequestR\forderRequest\DC28\n\ + \\n\ + \order_fill\CAN\DC2 \ETX(\v2\EM.traderouting_1.OrderFillR\torderFill\DC2#\n\ + \\rorder_classes\CAN\DC3 \ETX(\tR\forderClasses\DC2.\n\ + \\DC3display_limit_price\CAN\DC4 \SOH(\DC2R\DC1displayLimitPrice\DC2,\n\ + \\DC2display_stop_price\CAN\NAK \SOH(\DC2R\DLEdisplayStopPrice\DC24\n\ + \\SYNexecution_account_name\CAN\SYN \SOH(\tR\DC4executionAccountName\DC29\n\ + \\btrailing\CAN\ETB \SOH(\v2\GS.traderouting_1.OrderTrailingR\btrailing\DC20\n\ + \\ENQsizes\CAN\CAN \SOH(\v2\SUB.traderouting_1.OrderSizesR\ENQsizes\DC28\n\ + \\baccounts\CAN\EM \ETX(\v2\FS.traderouting_1.ChainAccountR\baccounts\DC2(\n\ + \\DLEcompound_tree_id\CAN\SUB \SOH(\tR\SOcompoundTreeId\DC2-\n\ + \\DC3root_chain_order_id\CAN\ESC \SOH(\tR\DLErootChainOrderId\DC2\CAN\n\ + \\achecked\CAN\FS \SOH(\bR\achecked\DC2-\n\ + \\DC2trading_expression\CAN\GS \SOH(\tR\DC1tradingExpression\DC24\n\ + \\EOTlegs\CAN\RS \ETX(\v2 .traderouting_1.OrderContractLegR\EOTlegs\DC21\n\ + \\DC4contract_description\CAN\US \SOH(\tR\DC3contractDescription\DC28\n\ + \\SIuser_attributes\CAN \ETX(\v2\SI.common_1.TupleR\SOuserAttributes\DC20\n\ + \\DC4client_algo_strategy\CAN! \SOH(\tR\DC2clientAlgoStrategy\DC2#\n\ + \\ralgo_strategy\CAN\" \SOH(\tR\falgoStrategy\DC20\n\ + \\ENQroute\CAN# \SOH(\v2\SUB.traderouting_1.OrderRouteR\ENQroute\DC2'\n\ + \\SIexpiration_time\CAN$ \SOH(\DC2R\SOexpirationTime\DC2&\n\ + \\SIopen_close_type\CAN% \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN& \SOH(\rR\SIspeculationType\DC2\SUB\n\ + \\barchived\CAN' \SOH(\bR\barchived\DC2/\n\ + \\DC4order_id_at_exchange\CAN( \SOH(\tR\DC1orderIdAtExchange\DC2F\n\ + \\GSobsolete_discretionary_offset\CAN) \SOH(\rR\ESCobsoleteDiscretionaryOffsetB\STX\CAN\SOH\DC2 \n\ + \\EOTsize\CAN* \SOH(\v2\f.cqg.DecimalR\EOTsize\DC2#\n\ + \\rextended_side\CAN+ \SOH(\rR\fextendedSide\DC2\ESC\n\ + \\tlocate_id\CAN, \SOH(\tR\blocateId\DC2C\n\ + \\NAKexchange_extra_values\CAN- \ETX(\v2\SI.common_1.TupleR\DC3exchangeExtraValues\DC2H\n\ + \!is_excluded_from_risk_calculation\CAN. \SOH(\bR\GSisExcludedFromRiskCalculation\"\EM\n\ + \\EOTSide\DC2\a\n\ + \\ETXBUY\DLE\SOH\DC2\b\n\ + \\EOTSELL\DLE\STX\":\n\ + \\tOrderType\DC2\a\n\ + \\ETXMKT\DLE\SOH\DC2\a\n\ + \\ETXLMT\DLE\STX\DC2\a\n\ + \\ETXSTP\DLE\ETX\DC2\a\n\ + \\ETXSTL\DLE\EOT\DC2\t\n\ + \\ENQCROSS\DLE\ENQ\"\143\STX\n\ + \\SIExecInstruction\DC2\a\n\ + \\ETXAON\DLE\SOH\DC2\v\n\ + \\aICEBERG\DLE\STX\DC2\ACK\n\ + \\STXQT\DLE\ETX\DC2\t\n\ + \\ENQTRAIL\DLE\EOT\DC2\n\ + \\n\ + \\ACKFUNARI\DLE\ENQ\DC2\a\n\ + \\ETXMIT\DLE\ACK\DC2\a\n\ + \\ETXMLM\DLE\a\DC2\a\n\ + \\ETXMTL\DLE\b\DC2\v\n\ + \\aAUCTION\DLE\t\DC2\f\n\ + \\bPOSTONLY\DLE\n\ + \\DC2\ETB\n\ + \\DC3OBSOLETE_DISCRETION\DLE\v\DC2\DLE\n\ + \\fAT_ANY_PRICE\DLE\f\DC2!\n\ + \\GSLIMIT_PREARRANGED_TRANSACTION\DLE\r\DC2\r\n\ + \\tNNE_CROSS\DLE\SO\DC2\v\n\ + \\aNNE_APA\DLE\SI\DC2\SO\n\ + \\n\ + \NND_CROSSO\DLE\DLE\DC2\SO\n\ + \\n\ + \NND_CROSSC\DLE\DC1\DC2\a\n\ + \\ETXICO\DLE\DC2\"R\n\ + \\bDuration\DC2\a\n\ + \\ETXDAY\DLE\SOH\DC2\a\n\ + \\ETXGTC\DLE\STX\DC2\a\n\ + \\ETXGTD\DLE\ETX\DC2\a\n\ + \\ETXGTT\DLE\EOT\DC2\a\n\ + \\ETXFAK\DLE\ENQ\DC2\a\n\ + \\ETXFOK\DLE\ACK\DC2\a\n\ + \\ETXATO\DLE\a\DC2\a\n\ + \\ETXATC\DLE\b\"\163\STX\n\ + \\ACKStatus\DC2\r\n\ + \\tUNDEFINED\DLE\NUL\DC2\SO\n\ + \\n\ + \IN_TRANSIT\DLE\SOH\DC2\f\n\ + \\bREJECTED\DLE\STX\DC2\v\n\ + \\aWORKING\DLE\ETX\DC2\v\n\ + \\aEXPIRED\DLE\EOT\DC2\r\n\ + \\tIN_CANCEL\DLE\ENQ\DC2\r\n\ + \\tIN_MODIFY\DLE\ACK\DC2\r\n\ + \\tCANCELLED\DLE\a\DC2\n\ + \\n\ + \\ACKFILLED\DLE\b\DC2\r\n\ + \\tSUSPENDED\DLE\t\DC2\DLE\n\ + \\fDISCONNECTED\DLE\n\ + \\DC2\r\n\ + \\tACTIVE_AT\DLE\v\DC2\DC4\n\ + \\DLEAPPROVE_REQUIRED\DLE\f\DC2\f\n\ + \\bAPPROVED\DLE\r\DC2\DC4\n\ + \\DLEAPPROVE_REJECTED\DLE\SO\DC2\v\n\ + \\aMATCHED\DLE\SI\DC2\DLE\n\ + \\fPART_MATCHED\DLE\DLE\DC2\DLE\n\ + \\fTRADE_BROKEN\DLE\DC1\"8\n\ + \\rOpenCloseType\DC2\b\n\ + \\EOTOPEN\DLE\SOH\DC2\t\n\ + \\ENQCLOSE\DLE\STX\DC2\DC2\n\ + \\SOCLOSE_PREVIOUS\DLE\ETX\"<\n\ + \\SISpeculationType\DC2\SI\n\ + \\vSPECULATION\DLE\SOH\DC2\t\n\ + \\ENQHEDGE\DLE\STX\DC2\r\n\ + \\tARBITRAGE\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + chainOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "chain_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"chainOrderId")) :: + Data.ProtoLens.FieldDescriptor OrderChain + orderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"orderId")) :: + Data.ProtoLens.FieldDescriptor OrderChain + chainOrigAccountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "chain_orig_account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"chainOrigAccountId")) :: + Data.ProtoLens.FieldDescriptor OrderChain + submittedUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "submitted_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"submittedUtcTime")) :: + Data.ProtoLens.FieldDescriptor OrderChain + contractSymbol__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_symbol" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"contractSymbol")) :: + Data.ProtoLens.FieldDescriptor OrderChain + side__field_descriptor + = Data.ProtoLens.FieldDescriptor + "side" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"side")) :: + Data.ProtoLens.FieldDescriptor OrderChain + obsoleteSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_size" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteSize")) :: + Data.ProtoLens.FieldDescriptor OrderChain + limitPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "limit_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'limitPrice")) :: + Data.ProtoLens.FieldDescriptor OrderChain + stopPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stop_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stopPrice")) :: + Data.ProtoLens.FieldDescriptor OrderChain + execInstruction__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exec_instruction" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"execInstruction")) :: + Data.ProtoLens.FieldDescriptor OrderChain + duration__field_descriptor + = Data.ProtoLens.FieldDescriptor + "duration" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"duration")) :: + Data.ProtoLens.FieldDescriptor OrderChain + goodThruDate__field_descriptor + = Data.ProtoLens.FieldDescriptor + "good_thru_date" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'goodThruDate")) :: + Data.ProtoLens.FieldDescriptor OrderChain + goodThruUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "good_thru_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'goodThruUtcTime")) :: + Data.ProtoLens.FieldDescriptor OrderChain + status__field_descriptor + = Data.ProtoLens.FieldDescriptor + "status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"status")) :: + Data.ProtoLens.FieldDescriptor OrderChain + orderType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"orderType")) :: + Data.ProtoLens.FieldDescriptor OrderChain + orderRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderRequest) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"orderRequest")) :: + Data.ProtoLens.FieldDescriptor OrderChain + orderFill__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_fill" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderFill) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"orderFill")) :: + Data.ProtoLens.FieldDescriptor OrderChain + orderClasses__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_classes" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"orderClasses")) :: + Data.ProtoLens.FieldDescriptor OrderChain + displayLimitPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_limit_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayLimitPrice")) :: + Data.ProtoLens.FieldDescriptor OrderChain + displayStopPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_stop_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayStopPrice")) :: + Data.ProtoLens.FieldDescriptor OrderChain + executionAccountName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "execution_account_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'executionAccountName")) :: + Data.ProtoLens.FieldDescriptor OrderChain + trailing__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trailing" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderTrailing) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'trailing")) :: + Data.ProtoLens.FieldDescriptor OrderChain + sizes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sizes" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderSizes) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sizes")) :: + Data.ProtoLens.FieldDescriptor OrderChain + accounts__field_descriptor + = Data.ProtoLens.FieldDescriptor + "accounts" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ChainAccount) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"accounts")) :: + Data.ProtoLens.FieldDescriptor OrderChain + compoundTreeId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "compound_tree_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'compoundTreeId")) :: + Data.ProtoLens.FieldDescriptor OrderChain + rootChainOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "root_chain_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'rootChainOrderId")) :: + Data.ProtoLens.FieldDescriptor OrderChain + checked__field_descriptor + = Data.ProtoLens.FieldDescriptor + "checked" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'checked")) :: + Data.ProtoLens.FieldDescriptor OrderChain + tradingExpression__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trading_expression" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradingExpression")) :: + Data.ProtoLens.FieldDescriptor OrderChain + legs__field_descriptor + = Data.ProtoLens.FieldDescriptor + "legs" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderContractLeg) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"legs")) :: + Data.ProtoLens.FieldDescriptor OrderChain + contractDescription__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_description" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractDescription")) :: + Data.ProtoLens.FieldDescriptor OrderChain + userAttributes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_attributes" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Tuple) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"userAttributes")) :: + Data.ProtoLens.FieldDescriptor OrderChain + clientAlgoStrategy__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_algo_strategy" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'clientAlgoStrategy")) :: + Data.ProtoLens.FieldDescriptor OrderChain + algoStrategy__field_descriptor + = Data.ProtoLens.FieldDescriptor + "algo_strategy" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'algoStrategy")) :: + Data.ProtoLens.FieldDescriptor OrderChain + route__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderRoute) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'route")) :: + Data.ProtoLens.FieldDescriptor OrderChain + expirationTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "expiration_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'expirationTime")) :: + Data.ProtoLens.FieldDescriptor OrderChain + openCloseType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "open_close_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'openCloseType")) :: + Data.ProtoLens.FieldDescriptor OrderChain + speculationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "speculation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'speculationType")) :: + Data.ProtoLens.FieldDescriptor OrderChain + archived__field_descriptor + = Data.ProtoLens.FieldDescriptor + "archived" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'archived")) :: + Data.ProtoLens.FieldDescriptor OrderChain + orderIdAtExchange__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_id_at_exchange" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderIdAtExchange")) :: + Data.ProtoLens.FieldDescriptor OrderChain + obsoleteDiscretionaryOffset__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_discretionary_offset" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteDiscretionaryOffset")) :: + Data.ProtoLens.FieldDescriptor OrderChain + size__field_descriptor + = Data.ProtoLens.FieldDescriptor + "size" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'size")) :: + Data.ProtoLens.FieldDescriptor OrderChain + extendedSide__field_descriptor + = Data.ProtoLens.FieldDescriptor + "extended_side" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'extendedSide")) :: + Data.ProtoLens.FieldDescriptor OrderChain + locateId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "locate_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'locateId")) :: + Data.ProtoLens.FieldDescriptor OrderChain + exchangeExtraValues__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exchange_extra_values" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Tuple) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"exchangeExtraValues")) :: + Data.ProtoLens.FieldDescriptor OrderChain + isExcludedFromRiskCalculation__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_excluded_from_risk_calculation" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'isExcludedFromRiskCalculation")) :: + Data.ProtoLens.FieldDescriptor OrderChain + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, chainOrderId__field_descriptor), + (Data.ProtoLens.Tag 2, orderId__field_descriptor), + (Data.ProtoLens.Tag 4, chainOrigAccountId__field_descriptor), + (Data.ProtoLens.Tag 5, submittedUtcTime__field_descriptor), + (Data.ProtoLens.Tag 6, contractSymbol__field_descriptor), + (Data.ProtoLens.Tag 7, side__field_descriptor), + (Data.ProtoLens.Tag 8, obsoleteSize__field_descriptor), + (Data.ProtoLens.Tag 9, limitPrice__field_descriptor), + (Data.ProtoLens.Tag 10, stopPrice__field_descriptor), + (Data.ProtoLens.Tag 11, execInstruction__field_descriptor), + (Data.ProtoLens.Tag 12, duration__field_descriptor), + (Data.ProtoLens.Tag 13, goodThruDate__field_descriptor), + (Data.ProtoLens.Tag 14, goodThruUtcTime__field_descriptor), + (Data.ProtoLens.Tag 15, status__field_descriptor), + (Data.ProtoLens.Tag 16, orderType__field_descriptor), + (Data.ProtoLens.Tag 17, orderRequest__field_descriptor), + (Data.ProtoLens.Tag 18, orderFill__field_descriptor), + (Data.ProtoLens.Tag 19, orderClasses__field_descriptor), + (Data.ProtoLens.Tag 20, displayLimitPrice__field_descriptor), + (Data.ProtoLens.Tag 21, displayStopPrice__field_descriptor), + (Data.ProtoLens.Tag 22, executionAccountName__field_descriptor), + (Data.ProtoLens.Tag 23, trailing__field_descriptor), + (Data.ProtoLens.Tag 24, sizes__field_descriptor), + (Data.ProtoLens.Tag 25, accounts__field_descriptor), + (Data.ProtoLens.Tag 26, compoundTreeId__field_descriptor), + (Data.ProtoLens.Tag 27, rootChainOrderId__field_descriptor), + (Data.ProtoLens.Tag 28, checked__field_descriptor), + (Data.ProtoLens.Tag 29, tradingExpression__field_descriptor), + (Data.ProtoLens.Tag 30, legs__field_descriptor), + (Data.ProtoLens.Tag 31, contractDescription__field_descriptor), + (Data.ProtoLens.Tag 32, userAttributes__field_descriptor), + (Data.ProtoLens.Tag 33, clientAlgoStrategy__field_descriptor), + (Data.ProtoLens.Tag 34, algoStrategy__field_descriptor), + (Data.ProtoLens.Tag 35, route__field_descriptor), + (Data.ProtoLens.Tag 36, expirationTime__field_descriptor), + (Data.ProtoLens.Tag 37, openCloseType__field_descriptor), + (Data.ProtoLens.Tag 38, speculationType__field_descriptor), + (Data.ProtoLens.Tag 39, archived__field_descriptor), + (Data.ProtoLens.Tag 40, orderIdAtExchange__field_descriptor), + (Data.ProtoLens.Tag 41, + obsoleteDiscretionaryOffset__field_descriptor), + (Data.ProtoLens.Tag 42, size__field_descriptor), + (Data.ProtoLens.Tag 43, extendedSide__field_descriptor), + (Data.ProtoLens.Tag 44, locateId__field_descriptor), + (Data.ProtoLens.Tag 45, exchangeExtraValues__field_descriptor), + (Data.ProtoLens.Tag 46, + isExcludedFromRiskCalculation__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderChain'_unknownFields + (\ x__ y__ -> x__ {_OrderChain'_unknownFields = y__}) + defMessage + = OrderChain'_constructor + {_OrderChain'chainOrderId = Data.ProtoLens.fieldDefault, + _OrderChain'orderId = Data.ProtoLens.fieldDefault, + _OrderChain'chainOrigAccountId = Data.ProtoLens.fieldDefault, + _OrderChain'submittedUtcTime = Data.ProtoLens.fieldDefault, + _OrderChain'contractSymbol = Data.ProtoLens.fieldDefault, + _OrderChain'side = Data.ProtoLens.fieldDefault, + _OrderChain'obsoleteSize = Prelude.Nothing, + _OrderChain'limitPrice = Prelude.Nothing, + _OrderChain'stopPrice = Prelude.Nothing, + _OrderChain'execInstruction = Data.Vector.Generic.empty, + _OrderChain'duration = Data.ProtoLens.fieldDefault, + _OrderChain'goodThruDate = Prelude.Nothing, + _OrderChain'goodThruUtcTime = Prelude.Nothing, + _OrderChain'status = Data.ProtoLens.fieldDefault, + _OrderChain'orderType = Data.ProtoLens.fieldDefault, + _OrderChain'orderRequest = Data.Vector.Generic.empty, + _OrderChain'orderFill = Data.Vector.Generic.empty, + _OrderChain'orderClasses = Data.Vector.Generic.empty, + _OrderChain'displayLimitPrice = Prelude.Nothing, + _OrderChain'displayStopPrice = Prelude.Nothing, + _OrderChain'executionAccountName = Prelude.Nothing, + _OrderChain'trailing = Prelude.Nothing, + _OrderChain'sizes = Prelude.Nothing, + _OrderChain'accounts = Data.Vector.Generic.empty, + _OrderChain'compoundTreeId = Prelude.Nothing, + _OrderChain'rootChainOrderId = Prelude.Nothing, + _OrderChain'checked = Prelude.Nothing, + _OrderChain'tradingExpression = Prelude.Nothing, + _OrderChain'legs = Data.Vector.Generic.empty, + _OrderChain'contractDescription = Prelude.Nothing, + _OrderChain'userAttributes = Data.Vector.Generic.empty, + _OrderChain'clientAlgoStrategy = Prelude.Nothing, + _OrderChain'algoStrategy = Prelude.Nothing, + _OrderChain'route = Prelude.Nothing, + _OrderChain'expirationTime = Prelude.Nothing, + _OrderChain'openCloseType = Prelude.Nothing, + _OrderChain'speculationType = Prelude.Nothing, + _OrderChain'archived = Prelude.Nothing, + _OrderChain'orderIdAtExchange = Prelude.Nothing, + _OrderChain'obsoleteDiscretionaryOffset = Prelude.Nothing, + _OrderChain'size = Prelude.Nothing, + _OrderChain'extendedSide = Prelude.Nothing, + _OrderChain'locateId = Prelude.Nothing, + _OrderChain'exchangeExtraValues = Data.Vector.Generic.empty, + _OrderChain'isExcludedFromRiskCalculation = Prelude.Nothing, + _OrderChain'_unknownFields = []} + parseMessage + = let + loop :: + OrderChain + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ChainAccount + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.Tuple + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld OrderContractLeg + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld OrderFill + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld OrderRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.Tuple + -> Data.ProtoLens.Encoding.Bytes.Parser OrderChain + loop + x + required'chainOrderId + required'chainOrigAccountId + required'contractSymbol + required'duration + required'orderId + required'orderType + required'side + required'status + required'submittedUtcTime + mutable'accounts + mutable'exchangeExtraValues + mutable'execInstruction + mutable'legs + mutable'orderClasses + mutable'orderFill + mutable'orderRequest + mutable'userAttributes + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'accounts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'accounts) + frozen'exchangeExtraValues <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'exchangeExtraValues) + frozen'execInstruction <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'execInstruction) + frozen'legs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'legs) + frozen'orderClasses <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'orderClasses) + frozen'orderFill <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'orderFill) + frozen'orderRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'orderRequest) + frozen'userAttributes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'userAttributes) + (let + missing + = (if required'chainOrderId then + (:) "chain_order_id" + else + Prelude.id) + ((if required'chainOrigAccountId then + (:) "chain_orig_account_id" + else + Prelude.id) + ((if required'contractSymbol then + (:) "contract_symbol" + else + Prelude.id) + ((if required'duration then (:) "duration" else Prelude.id) + ((if required'orderId then (:) "order_id" else Prelude.id) + ((if required'orderType then + (:) "order_type" + else + Prelude.id) + ((if required'side then (:) "side" else Prelude.id) + ((if required'status then + (:) "status" + else + Prelude.id) + ((if required'submittedUtcTime then + (:) "submitted_utc_time" + else + Prelude.id) + [])))))))) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'accounts") frozen'accounts + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'exchangeExtraValues") + frozen'exchangeExtraValues + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'execInstruction") + frozen'execInstruction + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'legs") frozen'legs + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'orderClasses") + frozen'orderClasses + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'orderFill") + frozen'orderFill + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'orderRequest") + frozen'orderRequest + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"vec'userAttributes") + frozen'userAttributes x))))))))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "chain_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"chainOrderId") y x) + Prelude.False required'chainOrigAccountId required'contractSymbol + required'duration required'orderId required'orderType + required'side required'status required'submittedUtcTime + mutable'accounts mutable'exchangeExtraValues + mutable'execInstruction mutable'legs mutable'orderClasses + mutable'orderFill mutable'orderRequest mutable'userAttributes + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderId") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration Prelude.False + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "chain_orig_account_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"chainOrigAccountId") y x) + required'chainOrderId Prelude.False required'contractSymbol + required'duration required'orderId required'orderType + required'side required'status required'submittedUtcTime + mutable'accounts mutable'exchangeExtraValues + mutable'execInstruction mutable'legs mutable'orderClasses + mutable'orderFill mutable'orderRequest mutable'userAttributes + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "submitted_utc_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"submittedUtcTime") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status Prelude.False + mutable'accounts mutable'exchangeExtraValues + mutable'execInstruction mutable'legs mutable'orderClasses + mutable'orderFill mutable'orderRequest mutable'userAttributes + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_symbol" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractSymbol") y x) + required'chainOrderId required'chainOrigAccountId Prelude.False + required'duration required'orderId required'orderType + required'side required'status required'submittedUtcTime + mutable'accounts mutable'exchangeExtraValues + mutable'execInstruction mutable'legs mutable'orderClasses + mutable'orderFill mutable'orderRequest mutable'userAttributes + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "side" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"side") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType Prelude.False required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_size" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteSize") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 73 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "limit_price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"limitPrice") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 81 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "stop_price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"stopPrice") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 88 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "exec_instruction" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'execInstruction y) + loop + x required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues v mutable'legs mutable'orderClasses + mutable'orderFill mutable'orderRequest mutable'userAttributes + 90 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "exec_instruction" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'execInstruction) + loop + x required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues y mutable'legs mutable'orderClasses + mutable'orderFill mutable'orderRequest mutable'userAttributes + 96 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "duration" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"duration") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol Prelude.False required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 104 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "good_thru_date" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"goodThruDate") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 112 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "good_thru_utc_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"goodThruUtcTime") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 120 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "status" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"status") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side Prelude.False + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 128 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "order_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderType") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + Prelude.False required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 138 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "order_request" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'orderRequest y) + loop + x required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill v mutable'userAttributes + 146 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "order_fill" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'orderFill y) + loop + x required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses v mutable'orderRequest mutable'userAttributes + 154 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_classes" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'orderClasses y) + loop + x required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs v + mutable'orderFill mutable'orderRequest mutable'userAttributes + 160 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_limit_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayLimitPrice") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 168 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_stop_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayStopPrice") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 178 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "execution_account_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"executionAccountName") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 186 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trailing" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"trailing") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 194 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "sizes" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"sizes") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 202 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "accounts" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'accounts y) + loop + x required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime v mutable'exchangeExtraValues + mutable'execInstruction mutable'legs mutable'orderClasses + mutable'orderFill mutable'orderRequest mutable'userAttributes + 210 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "compound_tree_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"compoundTreeId") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 218 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "root_chain_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"rootChainOrderId") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 224 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "checked" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"checked") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 234 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trading_expression" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradingExpression") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 242 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "legs" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'legs y) + loop + x required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction v + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 250 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_description" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractDescription") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 258 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "user_attributes" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'userAttributes y) + loop + x required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest v + 266 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_algo_strategy" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"clientAlgoStrategy") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 274 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "algo_strategy" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"algoStrategy") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 282 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "route" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"route") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 288 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "expiration_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"expirationTime") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 296 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "open_close_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"openCloseType") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 304 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "speculation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"speculationType") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 312 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "archived" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"archived") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 322 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_id_at_exchange" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderIdAtExchange") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 328 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_discretionary_offset" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteDiscretionaryOffset") y + x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 338 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "size" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"size") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 344 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "extended_side" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"extendedSide") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 354 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "locate_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"locateId") y x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + 362 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "exchange_extra_values" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'exchangeExtraValues y) + loop + x required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts v + mutable'execInstruction mutable'legs mutable'orderClasses + mutable'orderFill mutable'orderRequest mutable'userAttributes + 368 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_excluded_from_risk_calculation" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"isExcludedFromRiskCalculation") y + x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'chainOrderId required'chainOrigAccountId + required'contractSymbol required'duration required'orderId + required'orderType required'side required'status + required'submittedUtcTime mutable'accounts + mutable'exchangeExtraValues mutable'execInstruction mutable'legs + mutable'orderClasses mutable'orderFill mutable'orderRequest + mutable'userAttributes + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'accounts <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'exchangeExtraValues <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'execInstruction <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'legs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'orderClasses <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'orderFill <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'orderRequest <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'userAttributes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True + Prelude.True Prelude.True Prelude.True Prelude.True Prelude.True + Prelude.True mutable'accounts mutable'exchangeExtraValues + mutable'execInstruction mutable'legs mutable'orderClasses + mutable'orderFill mutable'orderRequest mutable'userAttributes) + "OrderChain" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"chainOrderId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"orderId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"chainOrigAccountId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"submittedUtcTime") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"contractSymbol") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"side") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'limitPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 73) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stopPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 81) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'execInstruction") + _x)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 96) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"duration") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'goodThruDate") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 104) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'goodThruUtcTime") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 112) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 120) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"status") + _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 128) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"orderType") + _x))) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'orderRequest") + _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 146) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'orderFill") + _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 154) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'orderClasses") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'displayLimitPrice") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 160) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'displayStopPrice") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 168) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'executionAccountName") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 178) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'trailing") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 186) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'sizes") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 194) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 202) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'accounts") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'compoundTreeId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 210) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'rootChainOrderId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 218) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'checked") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 224) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradingExpression") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 234) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 242) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'legs") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'contractDescription") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 250) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 258) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'userAttributes") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'clientAlgoStrategy") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 266) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'algoStrategy") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 274) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'route") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 282) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'expirationTime") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 288) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'openCloseType") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 296) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'speculationType") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 304) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'archived") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 312) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'orderIdAtExchange") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 322) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteDiscretionaryOffset") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 328) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'size") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 338) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'extendedSide") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 344) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'locateId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 354) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 362) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'exchangeExtraValues") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'isExcludedFromRiskCalculation") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 368) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))))))))))))))))))))))))))))))))) +instance Control.DeepSeq.NFData OrderChain where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderChain'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderChain'chainOrderId x__) + (Control.DeepSeq.deepseq + (_OrderChain'orderId x__) + (Control.DeepSeq.deepseq + (_OrderChain'chainOrigAccountId x__) + (Control.DeepSeq.deepseq + (_OrderChain'submittedUtcTime x__) + (Control.DeepSeq.deepseq + (_OrderChain'contractSymbol x__) + (Control.DeepSeq.deepseq + (_OrderChain'side x__) + (Control.DeepSeq.deepseq + (_OrderChain'obsoleteSize x__) + (Control.DeepSeq.deepseq + (_OrderChain'limitPrice x__) + (Control.DeepSeq.deepseq + (_OrderChain'stopPrice x__) + (Control.DeepSeq.deepseq + (_OrderChain'execInstruction x__) + (Control.DeepSeq.deepseq + (_OrderChain'duration x__) + (Control.DeepSeq.deepseq + (_OrderChain'goodThruDate x__) + (Control.DeepSeq.deepseq + (_OrderChain'goodThruUtcTime x__) + (Control.DeepSeq.deepseq + (_OrderChain'status x__) + (Control.DeepSeq.deepseq + (_OrderChain'orderType x__) + (Control.DeepSeq.deepseq + (_OrderChain'orderRequest x__) + (Control.DeepSeq.deepseq + (_OrderChain'orderFill x__) + (Control.DeepSeq.deepseq + (_OrderChain'orderClasses x__) + (Control.DeepSeq.deepseq + (_OrderChain'displayLimitPrice + x__) + (Control.DeepSeq.deepseq + (_OrderChain'displayStopPrice + x__) + (Control.DeepSeq.deepseq + (_OrderChain'executionAccountName + x__) + (Control.DeepSeq.deepseq + (_OrderChain'trailing + x__) + (Control.DeepSeq.deepseq + (_OrderChain'sizes + x__) + (Control.DeepSeq.deepseq + (_OrderChain'accounts + x__) + (Control.DeepSeq.deepseq + (_OrderChain'compoundTreeId + x__) + (Control.DeepSeq.deepseq + (_OrderChain'rootChainOrderId + x__) + (Control.DeepSeq.deepseq + (_OrderChain'checked + x__) + (Control.DeepSeq.deepseq + (_OrderChain'tradingExpression + x__) + (Control.DeepSeq.deepseq + (_OrderChain'legs + x__) + (Control.DeepSeq.deepseq + (_OrderChain'contractDescription + x__) + (Control.DeepSeq.deepseq + (_OrderChain'userAttributes + x__) + (Control.DeepSeq.deepseq + (_OrderChain'clientAlgoStrategy + x__) + (Control.DeepSeq.deepseq + (_OrderChain'algoStrategy + x__) + (Control.DeepSeq.deepseq + (_OrderChain'route + x__) + (Control.DeepSeq.deepseq + (_OrderChain'expirationTime + x__) + (Control.DeepSeq.deepseq + (_OrderChain'openCloseType + x__) + (Control.DeepSeq.deepseq + (_OrderChain'speculationType + x__) + (Control.DeepSeq.deepseq + (_OrderChain'archived + x__) + (Control.DeepSeq.deepseq + (_OrderChain'orderIdAtExchange + x__) + (Control.DeepSeq.deepseq + (_OrderChain'obsoleteDiscretionaryOffset + x__) + (Control.DeepSeq.deepseq + (_OrderChain'size + x__) + (Control.DeepSeq.deepseq + (_OrderChain'extendedSide + x__) + (Control.DeepSeq.deepseq + (_OrderChain'locateId + x__) + (Control.DeepSeq.deepseq + (_OrderChain'exchangeExtraValues + x__) + (Control.DeepSeq.deepseq + (_OrderChain'isExcludedFromRiskCalculation + x__) + ()))))))))))))))))))))))))))))))))))))))))))))) +data OrderChain'Duration + = OrderChain'DAY | + OrderChain'GTC | + OrderChain'GTD | + OrderChain'GTT | + OrderChain'FAK | + OrderChain'FOK | + OrderChain'ATO | + OrderChain'ATC + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderChain'Duration where + maybeToEnum 1 = Prelude.Just OrderChain'DAY + maybeToEnum 2 = Prelude.Just OrderChain'GTC + maybeToEnum 3 = Prelude.Just OrderChain'GTD + maybeToEnum 4 = Prelude.Just OrderChain'GTT + maybeToEnum 5 = Prelude.Just OrderChain'FAK + maybeToEnum 6 = Prelude.Just OrderChain'FOK + maybeToEnum 7 = Prelude.Just OrderChain'ATO + maybeToEnum 8 = Prelude.Just OrderChain'ATC + maybeToEnum _ = Prelude.Nothing + showEnum OrderChain'DAY = "DAY" + showEnum OrderChain'GTC = "GTC" + showEnum OrderChain'GTD = "GTD" + showEnum OrderChain'GTT = "GTT" + showEnum OrderChain'FAK = "FAK" + showEnum OrderChain'FOK = "FOK" + showEnum OrderChain'ATO = "ATO" + showEnum OrderChain'ATC = "ATC" + readEnum k + | (Prelude.==) k "DAY" = Prelude.Just OrderChain'DAY + | (Prelude.==) k "GTC" = Prelude.Just OrderChain'GTC + | (Prelude.==) k "GTD" = Prelude.Just OrderChain'GTD + | (Prelude.==) k "GTT" = Prelude.Just OrderChain'GTT + | (Prelude.==) k "FAK" = Prelude.Just OrderChain'FAK + | (Prelude.==) k "FOK" = Prelude.Just OrderChain'FOK + | (Prelude.==) k "ATO" = Prelude.Just OrderChain'ATO + | (Prelude.==) k "ATC" = Prelude.Just OrderChain'ATC + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderChain'Duration where + minBound = OrderChain'DAY + maxBound = OrderChain'ATC +instance Prelude.Enum OrderChain'Duration where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum Duration: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderChain'DAY = 1 + fromEnum OrderChain'GTC = 2 + fromEnum OrderChain'GTD = 3 + fromEnum OrderChain'GTT = 4 + fromEnum OrderChain'FAK = 5 + fromEnum OrderChain'FOK = 6 + fromEnum OrderChain'ATO = 7 + fromEnum OrderChain'ATC = 8 + succ OrderChain'ATC + = Prelude.error + "OrderChain'Duration.succ: bad argument OrderChain'ATC. This value would be out of bounds." + succ OrderChain'DAY = OrderChain'GTC + succ OrderChain'GTC = OrderChain'GTD + succ OrderChain'GTD = OrderChain'GTT + succ OrderChain'GTT = OrderChain'FAK + succ OrderChain'FAK = OrderChain'FOK + succ OrderChain'FOK = OrderChain'ATO + succ OrderChain'ATO = OrderChain'ATC + pred OrderChain'DAY + = Prelude.error + "OrderChain'Duration.pred: bad argument OrderChain'DAY. This value would be out of bounds." + pred OrderChain'GTC = OrderChain'DAY + pred OrderChain'GTD = OrderChain'GTC + pred OrderChain'GTT = OrderChain'GTD + pred OrderChain'FAK = OrderChain'GTT + pred OrderChain'FOK = OrderChain'FAK + pred OrderChain'ATO = OrderChain'FOK + pred OrderChain'ATC = OrderChain'ATO + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderChain'Duration where + fieldDefault = OrderChain'DAY +instance Control.DeepSeq.NFData OrderChain'Duration where + rnf x__ = Prelude.seq x__ () +data OrderChain'ExecInstruction + = OrderChain'AON | + OrderChain'ICEBERG | + OrderChain'QT | + OrderChain'TRAIL | + OrderChain'FUNARI | + OrderChain'MIT | + OrderChain'MLM | + OrderChain'MTL | + OrderChain'AUCTION | + OrderChain'POSTONLY | + OrderChain'OBSOLETE_DISCRETION | + OrderChain'AT_ANY_PRICE | + OrderChain'LIMIT_PREARRANGED_TRANSACTION | + OrderChain'NNE_CROSS | + OrderChain'NNE_APA | + OrderChain'NND_CROSSO | + OrderChain'NND_CROSSC | + OrderChain'ICO + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderChain'ExecInstruction where + maybeToEnum 1 = Prelude.Just OrderChain'AON + maybeToEnum 2 = Prelude.Just OrderChain'ICEBERG + maybeToEnum 3 = Prelude.Just OrderChain'QT + maybeToEnum 4 = Prelude.Just OrderChain'TRAIL + maybeToEnum 5 = Prelude.Just OrderChain'FUNARI + maybeToEnum 6 = Prelude.Just OrderChain'MIT + maybeToEnum 7 = Prelude.Just OrderChain'MLM + maybeToEnum 8 = Prelude.Just OrderChain'MTL + maybeToEnum 9 = Prelude.Just OrderChain'AUCTION + maybeToEnum 10 = Prelude.Just OrderChain'POSTONLY + maybeToEnum 11 = Prelude.Just OrderChain'OBSOLETE_DISCRETION + maybeToEnum 12 = Prelude.Just OrderChain'AT_ANY_PRICE + maybeToEnum 13 + = Prelude.Just OrderChain'LIMIT_PREARRANGED_TRANSACTION + maybeToEnum 14 = Prelude.Just OrderChain'NNE_CROSS + maybeToEnum 15 = Prelude.Just OrderChain'NNE_APA + maybeToEnum 16 = Prelude.Just OrderChain'NND_CROSSO + maybeToEnum 17 = Prelude.Just OrderChain'NND_CROSSC + maybeToEnum 18 = Prelude.Just OrderChain'ICO + maybeToEnum _ = Prelude.Nothing + showEnum OrderChain'AON = "AON" + showEnum OrderChain'ICEBERG = "ICEBERG" + showEnum OrderChain'QT = "QT" + showEnum OrderChain'TRAIL = "TRAIL" + showEnum OrderChain'FUNARI = "FUNARI" + showEnum OrderChain'MIT = "MIT" + showEnum OrderChain'MLM = "MLM" + showEnum OrderChain'MTL = "MTL" + showEnum OrderChain'AUCTION = "AUCTION" + showEnum OrderChain'POSTONLY = "POSTONLY" + showEnum OrderChain'OBSOLETE_DISCRETION = "OBSOLETE_DISCRETION" + showEnum OrderChain'AT_ANY_PRICE = "AT_ANY_PRICE" + showEnum OrderChain'LIMIT_PREARRANGED_TRANSACTION + = "LIMIT_PREARRANGED_TRANSACTION" + showEnum OrderChain'NNE_CROSS = "NNE_CROSS" + showEnum OrderChain'NNE_APA = "NNE_APA" + showEnum OrderChain'NND_CROSSO = "NND_CROSSO" + showEnum OrderChain'NND_CROSSC = "NND_CROSSC" + showEnum OrderChain'ICO = "ICO" + readEnum k + | (Prelude.==) k "AON" = Prelude.Just OrderChain'AON + | (Prelude.==) k "ICEBERG" = Prelude.Just OrderChain'ICEBERG + | (Prelude.==) k "QT" = Prelude.Just OrderChain'QT + | (Prelude.==) k "TRAIL" = Prelude.Just OrderChain'TRAIL + | (Prelude.==) k "FUNARI" = Prelude.Just OrderChain'FUNARI + | (Prelude.==) k "MIT" = Prelude.Just OrderChain'MIT + | (Prelude.==) k "MLM" = Prelude.Just OrderChain'MLM + | (Prelude.==) k "MTL" = Prelude.Just OrderChain'MTL + | (Prelude.==) k "AUCTION" = Prelude.Just OrderChain'AUCTION + | (Prelude.==) k "POSTONLY" = Prelude.Just OrderChain'POSTONLY + | (Prelude.==) k "OBSOLETE_DISCRETION" + = Prelude.Just OrderChain'OBSOLETE_DISCRETION + | (Prelude.==) k "AT_ANY_PRICE" + = Prelude.Just OrderChain'AT_ANY_PRICE + | (Prelude.==) k "LIMIT_PREARRANGED_TRANSACTION" + = Prelude.Just OrderChain'LIMIT_PREARRANGED_TRANSACTION + | (Prelude.==) k "NNE_CROSS" = Prelude.Just OrderChain'NNE_CROSS + | (Prelude.==) k "NNE_APA" = Prelude.Just OrderChain'NNE_APA + | (Prelude.==) k "NND_CROSSO" = Prelude.Just OrderChain'NND_CROSSO + | (Prelude.==) k "NND_CROSSC" = Prelude.Just OrderChain'NND_CROSSC + | (Prelude.==) k "ICO" = Prelude.Just OrderChain'ICO + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderChain'ExecInstruction where + minBound = OrderChain'AON + maxBound = OrderChain'ICO +instance Prelude.Enum OrderChain'ExecInstruction where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum ExecInstruction: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderChain'AON = 1 + fromEnum OrderChain'ICEBERG = 2 + fromEnum OrderChain'QT = 3 + fromEnum OrderChain'TRAIL = 4 + fromEnum OrderChain'FUNARI = 5 + fromEnum OrderChain'MIT = 6 + fromEnum OrderChain'MLM = 7 + fromEnum OrderChain'MTL = 8 + fromEnum OrderChain'AUCTION = 9 + fromEnum OrderChain'POSTONLY = 10 + fromEnum OrderChain'OBSOLETE_DISCRETION = 11 + fromEnum OrderChain'AT_ANY_PRICE = 12 + fromEnum OrderChain'LIMIT_PREARRANGED_TRANSACTION = 13 + fromEnum OrderChain'NNE_CROSS = 14 + fromEnum OrderChain'NNE_APA = 15 + fromEnum OrderChain'NND_CROSSO = 16 + fromEnum OrderChain'NND_CROSSC = 17 + fromEnum OrderChain'ICO = 18 + succ OrderChain'ICO + = Prelude.error + "OrderChain'ExecInstruction.succ: bad argument OrderChain'ICO. This value would be out of bounds." + succ OrderChain'AON = OrderChain'ICEBERG + succ OrderChain'ICEBERG = OrderChain'QT + succ OrderChain'QT = OrderChain'TRAIL + succ OrderChain'TRAIL = OrderChain'FUNARI + succ OrderChain'FUNARI = OrderChain'MIT + succ OrderChain'MIT = OrderChain'MLM + succ OrderChain'MLM = OrderChain'MTL + succ OrderChain'MTL = OrderChain'AUCTION + succ OrderChain'AUCTION = OrderChain'POSTONLY + succ OrderChain'POSTONLY = OrderChain'OBSOLETE_DISCRETION + succ OrderChain'OBSOLETE_DISCRETION = OrderChain'AT_ANY_PRICE + succ OrderChain'AT_ANY_PRICE + = OrderChain'LIMIT_PREARRANGED_TRANSACTION + succ OrderChain'LIMIT_PREARRANGED_TRANSACTION + = OrderChain'NNE_CROSS + succ OrderChain'NNE_CROSS = OrderChain'NNE_APA + succ OrderChain'NNE_APA = OrderChain'NND_CROSSO + succ OrderChain'NND_CROSSO = OrderChain'NND_CROSSC + succ OrderChain'NND_CROSSC = OrderChain'ICO + pred OrderChain'AON + = Prelude.error + "OrderChain'ExecInstruction.pred: bad argument OrderChain'AON. This value would be out of bounds." + pred OrderChain'ICEBERG = OrderChain'AON + pred OrderChain'QT = OrderChain'ICEBERG + pred OrderChain'TRAIL = OrderChain'QT + pred OrderChain'FUNARI = OrderChain'TRAIL + pred OrderChain'MIT = OrderChain'FUNARI + pred OrderChain'MLM = OrderChain'MIT + pred OrderChain'MTL = OrderChain'MLM + pred OrderChain'AUCTION = OrderChain'MTL + pred OrderChain'POSTONLY = OrderChain'AUCTION + pred OrderChain'OBSOLETE_DISCRETION = OrderChain'POSTONLY + pred OrderChain'AT_ANY_PRICE = OrderChain'OBSOLETE_DISCRETION + pred OrderChain'LIMIT_PREARRANGED_TRANSACTION + = OrderChain'AT_ANY_PRICE + pred OrderChain'NNE_CROSS + = OrderChain'LIMIT_PREARRANGED_TRANSACTION + pred OrderChain'NNE_APA = OrderChain'NNE_CROSS + pred OrderChain'NND_CROSSO = OrderChain'NNE_APA + pred OrderChain'NND_CROSSC = OrderChain'NND_CROSSO + pred OrderChain'ICO = OrderChain'NND_CROSSC + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderChain'ExecInstruction where + fieldDefault = OrderChain'AON +instance Control.DeepSeq.NFData OrderChain'ExecInstruction where + rnf x__ = Prelude.seq x__ () +data OrderChain'OpenCloseType + = OrderChain'OPEN | OrderChain'CLOSE | OrderChain'CLOSE_PREVIOUS + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderChain'OpenCloseType where + maybeToEnum 1 = Prelude.Just OrderChain'OPEN + maybeToEnum 2 = Prelude.Just OrderChain'CLOSE + maybeToEnum 3 = Prelude.Just OrderChain'CLOSE_PREVIOUS + maybeToEnum _ = Prelude.Nothing + showEnum OrderChain'OPEN = "OPEN" + showEnum OrderChain'CLOSE = "CLOSE" + showEnum OrderChain'CLOSE_PREVIOUS = "CLOSE_PREVIOUS" + readEnum k + | (Prelude.==) k "OPEN" = Prelude.Just OrderChain'OPEN + | (Prelude.==) k "CLOSE" = Prelude.Just OrderChain'CLOSE + | (Prelude.==) k "CLOSE_PREVIOUS" + = Prelude.Just OrderChain'CLOSE_PREVIOUS + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderChain'OpenCloseType where + minBound = OrderChain'OPEN + maxBound = OrderChain'CLOSE_PREVIOUS +instance Prelude.Enum OrderChain'OpenCloseType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum OpenCloseType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderChain'OPEN = 1 + fromEnum OrderChain'CLOSE = 2 + fromEnum OrderChain'CLOSE_PREVIOUS = 3 + succ OrderChain'CLOSE_PREVIOUS + = Prelude.error + "OrderChain'OpenCloseType.succ: bad argument OrderChain'CLOSE_PREVIOUS. This value would be out of bounds." + succ OrderChain'OPEN = OrderChain'CLOSE + succ OrderChain'CLOSE = OrderChain'CLOSE_PREVIOUS + pred OrderChain'OPEN + = Prelude.error + "OrderChain'OpenCloseType.pred: bad argument OrderChain'OPEN. This value would be out of bounds." + pred OrderChain'CLOSE = OrderChain'OPEN + pred OrderChain'CLOSE_PREVIOUS = OrderChain'CLOSE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderChain'OpenCloseType where + fieldDefault = OrderChain'OPEN +instance Control.DeepSeq.NFData OrderChain'OpenCloseType where + rnf x__ = Prelude.seq x__ () +data OrderChain'OrderType + = OrderChain'MKT | + OrderChain'LMT | + OrderChain'STP | + OrderChain'STL | + OrderChain'CROSS + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderChain'OrderType where + maybeToEnum 1 = Prelude.Just OrderChain'MKT + maybeToEnum 2 = Prelude.Just OrderChain'LMT + maybeToEnum 3 = Prelude.Just OrderChain'STP + maybeToEnum 4 = Prelude.Just OrderChain'STL + maybeToEnum 5 = Prelude.Just OrderChain'CROSS + maybeToEnum _ = Prelude.Nothing + showEnum OrderChain'MKT = "MKT" + showEnum OrderChain'LMT = "LMT" + showEnum OrderChain'STP = "STP" + showEnum OrderChain'STL = "STL" + showEnum OrderChain'CROSS = "CROSS" + readEnum k + | (Prelude.==) k "MKT" = Prelude.Just OrderChain'MKT + | (Prelude.==) k "LMT" = Prelude.Just OrderChain'LMT + | (Prelude.==) k "STP" = Prelude.Just OrderChain'STP + | (Prelude.==) k "STL" = Prelude.Just OrderChain'STL + | (Prelude.==) k "CROSS" = Prelude.Just OrderChain'CROSS + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderChain'OrderType where + minBound = OrderChain'MKT + maxBound = OrderChain'CROSS +instance Prelude.Enum OrderChain'OrderType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum OrderType: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderChain'MKT = 1 + fromEnum OrderChain'LMT = 2 + fromEnum OrderChain'STP = 3 + fromEnum OrderChain'STL = 4 + fromEnum OrderChain'CROSS = 5 + succ OrderChain'CROSS + = Prelude.error + "OrderChain'OrderType.succ: bad argument OrderChain'CROSS. This value would be out of bounds." + succ OrderChain'MKT = OrderChain'LMT + succ OrderChain'LMT = OrderChain'STP + succ OrderChain'STP = OrderChain'STL + succ OrderChain'STL = OrderChain'CROSS + pred OrderChain'MKT + = Prelude.error + "OrderChain'OrderType.pred: bad argument OrderChain'MKT. This value would be out of bounds." + pred OrderChain'LMT = OrderChain'MKT + pred OrderChain'STP = OrderChain'LMT + pred OrderChain'STL = OrderChain'STP + pred OrderChain'CROSS = OrderChain'STL + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderChain'OrderType where + fieldDefault = OrderChain'MKT +instance Control.DeepSeq.NFData OrderChain'OrderType where + rnf x__ = Prelude.seq x__ () +data OrderChain'Side + = OrderChain'BUY | OrderChain'SELL + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderChain'Side where + maybeToEnum 1 = Prelude.Just OrderChain'BUY + maybeToEnum 2 = Prelude.Just OrderChain'SELL + maybeToEnum _ = Prelude.Nothing + showEnum OrderChain'BUY = "BUY" + showEnum OrderChain'SELL = "SELL" + readEnum k + | (Prelude.==) k "BUY" = Prelude.Just OrderChain'BUY + | (Prelude.==) k "SELL" = Prelude.Just OrderChain'SELL + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderChain'Side where + minBound = OrderChain'BUY + maxBound = OrderChain'SELL +instance Prelude.Enum OrderChain'Side where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum Side: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderChain'BUY = 1 + fromEnum OrderChain'SELL = 2 + succ OrderChain'SELL + = Prelude.error + "OrderChain'Side.succ: bad argument OrderChain'SELL. This value would be out of bounds." + succ OrderChain'BUY = OrderChain'SELL + pred OrderChain'BUY + = Prelude.error + "OrderChain'Side.pred: bad argument OrderChain'BUY. This value would be out of bounds." + pred OrderChain'SELL = OrderChain'BUY + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderChain'Side where + fieldDefault = OrderChain'BUY +instance Control.DeepSeq.NFData OrderChain'Side where + rnf x__ = Prelude.seq x__ () +data OrderChain'SpeculationType + = OrderChain'SPECULATION | OrderChain'HEDGE | OrderChain'ARBITRAGE + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderChain'SpeculationType where + maybeToEnum 1 = Prelude.Just OrderChain'SPECULATION + maybeToEnum 2 = Prelude.Just OrderChain'HEDGE + maybeToEnum 3 = Prelude.Just OrderChain'ARBITRAGE + maybeToEnum _ = Prelude.Nothing + showEnum OrderChain'SPECULATION = "SPECULATION" + showEnum OrderChain'HEDGE = "HEDGE" + showEnum OrderChain'ARBITRAGE = "ARBITRAGE" + readEnum k + | (Prelude.==) k "SPECULATION" + = Prelude.Just OrderChain'SPECULATION + | (Prelude.==) k "HEDGE" = Prelude.Just OrderChain'HEDGE + | (Prelude.==) k "ARBITRAGE" = Prelude.Just OrderChain'ARBITRAGE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderChain'SpeculationType where + minBound = OrderChain'SPECULATION + maxBound = OrderChain'ARBITRAGE +instance Prelude.Enum OrderChain'SpeculationType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum SpeculationType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderChain'SPECULATION = 1 + fromEnum OrderChain'HEDGE = 2 + fromEnum OrderChain'ARBITRAGE = 3 + succ OrderChain'ARBITRAGE + = Prelude.error + "OrderChain'SpeculationType.succ: bad argument OrderChain'ARBITRAGE. This value would be out of bounds." + succ OrderChain'SPECULATION = OrderChain'HEDGE + succ OrderChain'HEDGE = OrderChain'ARBITRAGE + pred OrderChain'SPECULATION + = Prelude.error + "OrderChain'SpeculationType.pred: bad argument OrderChain'SPECULATION. This value would be out of bounds." + pred OrderChain'HEDGE = OrderChain'SPECULATION + pred OrderChain'ARBITRAGE = OrderChain'HEDGE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderChain'SpeculationType where + fieldDefault = OrderChain'SPECULATION +instance Control.DeepSeq.NFData OrderChain'SpeculationType where + rnf x__ = Prelude.seq x__ () +data OrderChain'Status + = OrderChain'UNDEFINED | + OrderChain'IN_TRANSIT | + OrderChain'REJECTED | + OrderChain'WORKING | + OrderChain'EXPIRED | + OrderChain'IN_CANCEL | + OrderChain'IN_MODIFY | + OrderChain'CANCELLED | + OrderChain'FILLED | + OrderChain'SUSPENDED | + OrderChain'DISCONNECTED | + OrderChain'ACTIVE_AT | + OrderChain'APPROVE_REQUIRED | + OrderChain'APPROVED | + OrderChain'APPROVE_REJECTED | + OrderChain'MATCHED | + OrderChain'PART_MATCHED | + OrderChain'TRADE_BROKEN + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderChain'Status where + maybeToEnum 0 = Prelude.Just OrderChain'UNDEFINED + maybeToEnum 1 = Prelude.Just OrderChain'IN_TRANSIT + maybeToEnum 2 = Prelude.Just OrderChain'REJECTED + maybeToEnum 3 = Prelude.Just OrderChain'WORKING + maybeToEnum 4 = Prelude.Just OrderChain'EXPIRED + maybeToEnum 5 = Prelude.Just OrderChain'IN_CANCEL + maybeToEnum 6 = Prelude.Just OrderChain'IN_MODIFY + maybeToEnum 7 = Prelude.Just OrderChain'CANCELLED + maybeToEnum 8 = Prelude.Just OrderChain'FILLED + maybeToEnum 9 = Prelude.Just OrderChain'SUSPENDED + maybeToEnum 10 = Prelude.Just OrderChain'DISCONNECTED + maybeToEnum 11 = Prelude.Just OrderChain'ACTIVE_AT + maybeToEnum 12 = Prelude.Just OrderChain'APPROVE_REQUIRED + maybeToEnum 13 = Prelude.Just OrderChain'APPROVED + maybeToEnum 14 = Prelude.Just OrderChain'APPROVE_REJECTED + maybeToEnum 15 = Prelude.Just OrderChain'MATCHED + maybeToEnum 16 = Prelude.Just OrderChain'PART_MATCHED + maybeToEnum 17 = Prelude.Just OrderChain'TRADE_BROKEN + maybeToEnum _ = Prelude.Nothing + showEnum OrderChain'UNDEFINED = "UNDEFINED" + showEnum OrderChain'IN_TRANSIT = "IN_TRANSIT" + showEnum OrderChain'REJECTED = "REJECTED" + showEnum OrderChain'WORKING = "WORKING" + showEnum OrderChain'EXPIRED = "EXPIRED" + showEnum OrderChain'IN_CANCEL = "IN_CANCEL" + showEnum OrderChain'IN_MODIFY = "IN_MODIFY" + showEnum OrderChain'CANCELLED = "CANCELLED" + showEnum OrderChain'FILLED = "FILLED" + showEnum OrderChain'SUSPENDED = "SUSPENDED" + showEnum OrderChain'DISCONNECTED = "DISCONNECTED" + showEnum OrderChain'ACTIVE_AT = "ACTIVE_AT" + showEnum OrderChain'APPROVE_REQUIRED = "APPROVE_REQUIRED" + showEnum OrderChain'APPROVED = "APPROVED" + showEnum OrderChain'APPROVE_REJECTED = "APPROVE_REJECTED" + showEnum OrderChain'MATCHED = "MATCHED" + showEnum OrderChain'PART_MATCHED = "PART_MATCHED" + showEnum OrderChain'TRADE_BROKEN = "TRADE_BROKEN" + readEnum k + | (Prelude.==) k "UNDEFINED" = Prelude.Just OrderChain'UNDEFINED + | (Prelude.==) k "IN_TRANSIT" = Prelude.Just OrderChain'IN_TRANSIT + | (Prelude.==) k "REJECTED" = Prelude.Just OrderChain'REJECTED + | (Prelude.==) k "WORKING" = Prelude.Just OrderChain'WORKING + | (Prelude.==) k "EXPIRED" = Prelude.Just OrderChain'EXPIRED + | (Prelude.==) k "IN_CANCEL" = Prelude.Just OrderChain'IN_CANCEL + | (Prelude.==) k "IN_MODIFY" = Prelude.Just OrderChain'IN_MODIFY + | (Prelude.==) k "CANCELLED" = Prelude.Just OrderChain'CANCELLED + | (Prelude.==) k "FILLED" = Prelude.Just OrderChain'FILLED + | (Prelude.==) k "SUSPENDED" = Prelude.Just OrderChain'SUSPENDED + | (Prelude.==) k "DISCONNECTED" + = Prelude.Just OrderChain'DISCONNECTED + | (Prelude.==) k "ACTIVE_AT" = Prelude.Just OrderChain'ACTIVE_AT + | (Prelude.==) k "APPROVE_REQUIRED" + = Prelude.Just OrderChain'APPROVE_REQUIRED + | (Prelude.==) k "APPROVED" = Prelude.Just OrderChain'APPROVED + | (Prelude.==) k "APPROVE_REJECTED" + = Prelude.Just OrderChain'APPROVE_REJECTED + | (Prelude.==) k "MATCHED" = Prelude.Just OrderChain'MATCHED + | (Prelude.==) k "PART_MATCHED" + = Prelude.Just OrderChain'PART_MATCHED + | (Prelude.==) k "TRADE_BROKEN" + = Prelude.Just OrderChain'TRADE_BROKEN + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderChain'Status where + minBound = OrderChain'UNDEFINED + maxBound = OrderChain'TRADE_BROKEN +instance Prelude.Enum OrderChain'Status where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum Status: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderChain'UNDEFINED = 0 + fromEnum OrderChain'IN_TRANSIT = 1 + fromEnum OrderChain'REJECTED = 2 + fromEnum OrderChain'WORKING = 3 + fromEnum OrderChain'EXPIRED = 4 + fromEnum OrderChain'IN_CANCEL = 5 + fromEnum OrderChain'IN_MODIFY = 6 + fromEnum OrderChain'CANCELLED = 7 + fromEnum OrderChain'FILLED = 8 + fromEnum OrderChain'SUSPENDED = 9 + fromEnum OrderChain'DISCONNECTED = 10 + fromEnum OrderChain'ACTIVE_AT = 11 + fromEnum OrderChain'APPROVE_REQUIRED = 12 + fromEnum OrderChain'APPROVED = 13 + fromEnum OrderChain'APPROVE_REJECTED = 14 + fromEnum OrderChain'MATCHED = 15 + fromEnum OrderChain'PART_MATCHED = 16 + fromEnum OrderChain'TRADE_BROKEN = 17 + succ OrderChain'TRADE_BROKEN + = Prelude.error + "OrderChain'Status.succ: bad argument OrderChain'TRADE_BROKEN. This value would be out of bounds." + succ OrderChain'UNDEFINED = OrderChain'IN_TRANSIT + succ OrderChain'IN_TRANSIT = OrderChain'REJECTED + succ OrderChain'REJECTED = OrderChain'WORKING + succ OrderChain'WORKING = OrderChain'EXPIRED + succ OrderChain'EXPIRED = OrderChain'IN_CANCEL + succ OrderChain'IN_CANCEL = OrderChain'IN_MODIFY + succ OrderChain'IN_MODIFY = OrderChain'CANCELLED + succ OrderChain'CANCELLED = OrderChain'FILLED + succ OrderChain'FILLED = OrderChain'SUSPENDED + succ OrderChain'SUSPENDED = OrderChain'DISCONNECTED + succ OrderChain'DISCONNECTED = OrderChain'ACTIVE_AT + succ OrderChain'ACTIVE_AT = OrderChain'APPROVE_REQUIRED + succ OrderChain'APPROVE_REQUIRED = OrderChain'APPROVED + succ OrderChain'APPROVED = OrderChain'APPROVE_REJECTED + succ OrderChain'APPROVE_REJECTED = OrderChain'MATCHED + succ OrderChain'MATCHED = OrderChain'PART_MATCHED + succ OrderChain'PART_MATCHED = OrderChain'TRADE_BROKEN + pred OrderChain'UNDEFINED + = Prelude.error + "OrderChain'Status.pred: bad argument OrderChain'UNDEFINED. This value would be out of bounds." + pred OrderChain'IN_TRANSIT = OrderChain'UNDEFINED + pred OrderChain'REJECTED = OrderChain'IN_TRANSIT + pred OrderChain'WORKING = OrderChain'REJECTED + pred OrderChain'EXPIRED = OrderChain'WORKING + pred OrderChain'IN_CANCEL = OrderChain'EXPIRED + pred OrderChain'IN_MODIFY = OrderChain'IN_CANCEL + pred OrderChain'CANCELLED = OrderChain'IN_MODIFY + pred OrderChain'FILLED = OrderChain'CANCELLED + pred OrderChain'SUSPENDED = OrderChain'FILLED + pred OrderChain'DISCONNECTED = OrderChain'SUSPENDED + pred OrderChain'ACTIVE_AT = OrderChain'DISCONNECTED + pred OrderChain'APPROVE_REQUIRED = OrderChain'ACTIVE_AT + pred OrderChain'APPROVED = OrderChain'APPROVE_REQUIRED + pred OrderChain'APPROVE_REJECTED = OrderChain'APPROVED + pred OrderChain'MATCHED = OrderChain'APPROVE_REJECTED + pred OrderChain'PART_MATCHED = OrderChain'MATCHED + pred OrderChain'TRADE_BROKEN = OrderChain'PART_MATCHED + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderChain'Status where + fieldDefault = OrderChain'UNDEFINED +instance Control.DeepSeq.NFData OrderChain'Status where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.number' @:: Lens' OrderContractLeg Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'number' @:: Lens' OrderContractLeg (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteSize' @:: Lens' OrderContractLeg Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteSize' @:: Lens' OrderContractLeg (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.side' @:: Lens' OrderContractLeg Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'side' @:: Lens' OrderContractLeg (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.contractSymbol' @:: Lens' OrderContractLeg Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'contractSymbol' @:: Lens' OrderContractLeg (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.size' @:: Lens' OrderContractLeg Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'size' @:: Lens' OrderContractLeg (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.extendedSide' @:: Lens' OrderContractLeg Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'extendedSide' @:: Lens' OrderContractLeg (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.locateId' @:: Lens' OrderContractLeg Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'locateId' @:: Lens' OrderContractLeg (Prelude.Maybe Data.Text.Text)@ -} +data OrderContractLeg + = OrderContractLeg'_constructor {_OrderContractLeg'number :: !(Prelude.Maybe Data.Word.Word32), + _OrderContractLeg'obsoleteSize :: !(Prelude.Maybe Data.Word.Word32), + _OrderContractLeg'side :: !(Prelude.Maybe Data.Word.Word32), + _OrderContractLeg'contractSymbol :: !(Prelude.Maybe Data.Text.Text), + _OrderContractLeg'size :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _OrderContractLeg'extendedSide :: !(Prelude.Maybe Data.Word.Word32), + _OrderContractLeg'locateId :: !(Prelude.Maybe Data.Text.Text), + _OrderContractLeg'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderContractLeg where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderContractLeg "number" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'number + (\ x__ y__ -> x__ {_OrderContractLeg'number = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderContractLeg "maybe'number" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'number + (\ x__ y__ -> x__ {_OrderContractLeg'number = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderContractLeg "obsoleteSize" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'obsoleteSize + (\ x__ y__ -> x__ {_OrderContractLeg'obsoleteSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderContractLeg "maybe'obsoleteSize" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'obsoleteSize + (\ x__ y__ -> x__ {_OrderContractLeg'obsoleteSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderContractLeg "side" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'side + (\ x__ y__ -> x__ {_OrderContractLeg'side = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderContractLeg "maybe'side" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'side + (\ x__ y__ -> x__ {_OrderContractLeg'side = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderContractLeg "contractSymbol" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'contractSymbol + (\ x__ y__ -> x__ {_OrderContractLeg'contractSymbol = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderContractLeg "maybe'contractSymbol" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'contractSymbol + (\ x__ y__ -> x__ {_OrderContractLeg'contractSymbol = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderContractLeg "size" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'size + (\ x__ y__ -> x__ {_OrderContractLeg'size = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderContractLeg "maybe'size" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'size + (\ x__ y__ -> x__ {_OrderContractLeg'size = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderContractLeg "extendedSide" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'extendedSide + (\ x__ y__ -> x__ {_OrderContractLeg'extendedSide = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderContractLeg "maybe'extendedSide" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'extendedSide + (\ x__ y__ -> x__ {_OrderContractLeg'extendedSide = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderContractLeg "locateId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'locateId + (\ x__ y__ -> x__ {_OrderContractLeg'locateId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderContractLeg "maybe'locateId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderContractLeg'locateId + (\ x__ y__ -> x__ {_OrderContractLeg'locateId = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderContractLeg where + messageName _ = Data.Text.pack "traderouting_1.OrderContractLeg" + packedMessageDescriptor _ + = "\n\ + \\DLEOrderContractLeg\DC2\SYN\n\ + \\ACKnumber\CAN\SOH \SOH(\rR\ACKnumber\DC2'\n\ + \\robsolete_size\CAN\STX \SOH(\rR\fobsoleteSizeB\STX\CAN\SOH\DC2\DC2\n\ + \\EOTside\CAN\ETX \SOH(\rR\EOTside\DC2'\n\ + \\SIcontract_symbol\CAN\EOT \SOH(\tR\SOcontractSymbol\DC2 \n\ + \\EOTsize\CAN\ENQ \SOH(\v2\f.cqg.DecimalR\EOTsize\DC2#\n\ + \\rextended_side\CAN\ACK \SOH(\rR\fextendedSide\DC2\ESC\n\ + \\tlocate_id\CAN\a \SOH(\tR\blocateId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + number__field_descriptor + = Data.ProtoLens.FieldDescriptor + "number" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'number")) :: + Data.ProtoLens.FieldDescriptor OrderContractLeg + obsoleteSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_size" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteSize")) :: + Data.ProtoLens.FieldDescriptor OrderContractLeg + side__field_descriptor + = Data.ProtoLens.FieldDescriptor + "side" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'side")) :: + Data.ProtoLens.FieldDescriptor OrderContractLeg + contractSymbol__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_symbol" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractSymbol")) :: + Data.ProtoLens.FieldDescriptor OrderContractLeg + size__field_descriptor + = Data.ProtoLens.FieldDescriptor + "size" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'size")) :: + Data.ProtoLens.FieldDescriptor OrderContractLeg + extendedSide__field_descriptor + = Data.ProtoLens.FieldDescriptor + "extended_side" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'extendedSide")) :: + Data.ProtoLens.FieldDescriptor OrderContractLeg + locateId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "locate_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'locateId")) :: + Data.ProtoLens.FieldDescriptor OrderContractLeg + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, number__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteSize__field_descriptor), + (Data.ProtoLens.Tag 3, side__field_descriptor), + (Data.ProtoLens.Tag 4, contractSymbol__field_descriptor), + (Data.ProtoLens.Tag 5, size__field_descriptor), + (Data.ProtoLens.Tag 6, extendedSide__field_descriptor), + (Data.ProtoLens.Tag 7, locateId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderContractLeg'_unknownFields + (\ x__ y__ -> x__ {_OrderContractLeg'_unknownFields = y__}) + defMessage + = OrderContractLeg'_constructor + {_OrderContractLeg'number = Prelude.Nothing, + _OrderContractLeg'obsoleteSize = Prelude.Nothing, + _OrderContractLeg'side = Prelude.Nothing, + _OrderContractLeg'contractSymbol = Prelude.Nothing, + _OrderContractLeg'size = Prelude.Nothing, + _OrderContractLeg'extendedSide = Prelude.Nothing, + _OrderContractLeg'locateId = Prelude.Nothing, + _OrderContractLeg'_unknownFields = []} + parseMessage + = let + loop :: + OrderContractLeg + -> Data.ProtoLens.Encoding.Bytes.Parser OrderContractLeg + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "number" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"number") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_size" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteSize") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "side" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"side") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_symbol" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractSymbol") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "size" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"size") y x) + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "extended_side" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"extendedSide") y x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "locate_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"locateId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "OrderContractLeg" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'number") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'side") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'contractSymbol") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'size") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'extendedSide") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'locateId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData OrderContractLeg where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderContractLeg'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderContractLeg'number x__) + (Control.DeepSeq.deepseq + (_OrderContractLeg'obsoleteSize x__) + (Control.DeepSeq.deepseq + (_OrderContractLeg'side x__) + (Control.DeepSeq.deepseq + (_OrderContractLeg'contractSymbol x__) + (Control.DeepSeq.deepseq + (_OrderContractLeg'size x__) + (Control.DeepSeq.deepseq + (_OrderContractLeg'extendedSide x__) + (Control.DeepSeq.deepseq (_OrderContractLeg'locateId x__) ()))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' OrderDetailsRequest Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' OrderDetailsRequest (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.orderId' @:: Lens' OrderDetailsRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderId' @:: Lens' OrderDetailsRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' OrderDetailsRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' OrderDetailsRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.orderRequestsTop' @:: Lens' OrderDetailsRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderRequestsTop' @:: Lens' OrderDetailsRequest (Prelude.Maybe Data.Word.Word32)@ -} +data OrderDetailsRequest + = OrderDetailsRequest'_constructor {_OrderDetailsRequest'accountId :: !(Prelude.Maybe Data.Int.Int32), + _OrderDetailsRequest'orderId :: !(Prelude.Maybe Data.Text.Text), + _OrderDetailsRequest'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _OrderDetailsRequest'orderRequestsTop :: !(Prelude.Maybe Data.Word.Word32), + _OrderDetailsRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderDetailsRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderDetailsRequest "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderDetailsRequest'accountId + (\ x__ y__ -> x__ {_OrderDetailsRequest'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderDetailsRequest "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderDetailsRequest'accountId + (\ x__ y__ -> x__ {_OrderDetailsRequest'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderDetailsRequest "orderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderDetailsRequest'orderId + (\ x__ y__ -> x__ {_OrderDetailsRequest'orderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderDetailsRequest "maybe'orderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderDetailsRequest'orderId + (\ x__ y__ -> x__ {_OrderDetailsRequest'orderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderDetailsRequest "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderDetailsRequest'tradeLocationId + (\ x__ y__ -> x__ {_OrderDetailsRequest'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderDetailsRequest "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderDetailsRequest'tradeLocationId + (\ x__ y__ -> x__ {_OrderDetailsRequest'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderDetailsRequest "orderRequestsTop" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderDetailsRequest'orderRequestsTop + (\ x__ y__ -> x__ {_OrderDetailsRequest'orderRequestsTop = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderDetailsRequest "maybe'orderRequestsTop" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderDetailsRequest'orderRequestsTop + (\ x__ y__ -> x__ {_OrderDetailsRequest'orderRequestsTop = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderDetailsRequest where + messageName _ = Data.Text.pack "traderouting_1.OrderDetailsRequest" + packedMessageDescriptor _ + = "\n\ + \\DC3OrderDetailsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\EM\n\ + \\border_id\CAN\STX \SOH(\tR\aorderId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2,\n\ + \\DC2order_requests_top\CAN\EOT \SOH(\rR\DLEorderRequestsTop" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor OrderDetailsRequest + orderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderId")) :: + Data.ProtoLens.FieldDescriptor OrderDetailsRequest + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor OrderDetailsRequest + orderRequestsTop__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_requests_top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderRequestsTop")) :: + Data.ProtoLens.FieldDescriptor OrderDetailsRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, orderId__field_descriptor), + (Data.ProtoLens.Tag 3, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 4, orderRequestsTop__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderDetailsRequest'_unknownFields + (\ x__ y__ -> x__ {_OrderDetailsRequest'_unknownFields = y__}) + defMessage + = OrderDetailsRequest'_constructor + {_OrderDetailsRequest'accountId = Prelude.Nothing, + _OrderDetailsRequest'orderId = Prelude.Nothing, + _OrderDetailsRequest'tradeLocationId = Prelude.Nothing, + _OrderDetailsRequest'orderRequestsTop = Prelude.Nothing, + _OrderDetailsRequest'_unknownFields = []} + parseMessage + = let + loop :: + OrderDetailsRequest + -> Data.ProtoLens.Encoding.Bytes.Parser OrderDetailsRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"orderId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "order_requests_top" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderRequestsTop") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "OrderDetailsRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'orderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderRequestsTop") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData OrderDetailsRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderDetailsRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderDetailsRequest'accountId x__) + (Control.DeepSeq.deepseq + (_OrderDetailsRequest'orderId x__) + (Control.DeepSeq.deepseq + (_OrderDetailsRequest'tradeLocationId x__) + (Control.DeepSeq.deepseq + (_OrderDetailsRequest'orderRequestsTop x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.orderChain' @:: Lens' OrderDetailsResult OrderChain@ + * 'Proto.CMS.Traderouting1_Fields.isComplete' @:: Lens' OrderDetailsResult Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isComplete' @:: Lens' OrderDetailsResult (Prelude.Maybe Prelude.Bool)@ -} +data OrderDetailsResult + = OrderDetailsResult'_constructor {_OrderDetailsResult'orderChain :: !OrderChain, + _OrderDetailsResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _OrderDetailsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderDetailsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderDetailsResult "orderChain" OrderChain where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderDetailsResult'orderChain + (\ x__ y__ -> x__ {_OrderDetailsResult'orderChain = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderDetailsResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderDetailsResult'isComplete + (\ x__ y__ -> x__ {_OrderDetailsResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField OrderDetailsResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderDetailsResult'isComplete + (\ x__ y__ -> x__ {_OrderDetailsResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderDetailsResult where + messageName _ = Data.Text.pack "traderouting_1.OrderDetailsResult" + packedMessageDescriptor _ + = "\n\ + \\DC2OrderDetailsResult\DC2;\n\ + \\vorder_chain\CAN\SOH \STX(\v2\SUB.traderouting_1.OrderChainR\n\ + \orderChain\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + orderChain__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_chain" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderChain) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"orderChain")) :: + Data.ProtoLens.FieldDescriptor OrderDetailsResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor OrderDetailsResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, orderChain__field_descriptor), + (Data.ProtoLens.Tag 2, isComplete__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderDetailsResult'_unknownFields + (\ x__ y__ -> x__ {_OrderDetailsResult'_unknownFields = y__}) + defMessage + = OrderDetailsResult'_constructor + {_OrderDetailsResult'orderChain = Data.ProtoLens.defMessage, + _OrderDetailsResult'isComplete = Prelude.Nothing, + _OrderDetailsResult'_unknownFields = []} + parseMessage + = let + loop :: + OrderDetailsResult + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser OrderDetailsResult + loop x required'orderChain + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'orderChain then (:) "order_chain" else Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "order_chain" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderChain") y x) + Prelude.False + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + required'orderChain + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'orderChain + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "OrderDetailsResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage + (Lens.Family2.view (Data.ProtoLens.Field.field @"orderChain") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData OrderDetailsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderDetailsResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderDetailsResult'orderChain x__) + (Control.DeepSeq.deepseq (_OrderDetailsResult'isComplete x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' OrderFill Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' OrderFill (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.execId' @:: Lens' OrderFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'execId' @:: Lens' OrderFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteQuantity' @:: Lens' OrderFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteQuantity' @:: Lens' OrderFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.price' @:: Lens' OrderFill Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'price' @:: Lens' OrderFill (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.fillUtcTime' @:: Lens' OrderFill Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillUtcTime' @:: Lens' OrderFill (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.isAggressive' @:: Lens' OrderFill Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isAggressive' @:: Lens' OrderFill (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.legFills' @:: Lens' OrderFill [LegFill]@ + * 'Proto.CMS.Traderouting1_Fields.vec'legFills' @:: Lens' OrderFill (Data.Vector.Vector LegFill)@ + * 'Proto.CMS.Traderouting1_Fields.orderId' @:: Lens' OrderFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderId' @:: Lens' OrderFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.fillStatus' @:: Lens' OrderFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillStatus' @:: Lens' OrderFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.fillCareOrderRequestId' @:: Lens' OrderFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'fillCareOrderRequestId' @:: Lens' OrderFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.displayPrice' @:: Lens' OrderFill Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayPrice' @:: Lens' OrderFill (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.openCloseType' @:: Lens' OrderFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'openCloseType' @:: Lens' OrderFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.speculationType' @:: Lens' OrderFill Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'speculationType' @:: Lens' OrderFill (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.commission' @:: Lens' OrderFill Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'commission' @:: Lens' OrderFill (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.commissionCurrency' @:: Lens' OrderFill Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'commissionCurrency' @:: Lens' OrderFill (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.quantity' @:: Lens' OrderFill Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'quantity' @:: Lens' OrderFill (Prelude.Maybe Proto.Common.Decimal.Decimal)@ -} +data OrderFill + = OrderFill'_constructor {_OrderFill'id :: !(Prelude.Maybe Data.Int.Int64), + _OrderFill'execId :: !(Prelude.Maybe Data.Text.Text), + _OrderFill'obsoleteQuantity :: !(Prelude.Maybe Data.Word.Word32), + _OrderFill'price :: !(Prelude.Maybe Prelude.Double), + _OrderFill'fillUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _OrderFill'isAggressive :: !(Prelude.Maybe Prelude.Bool), + _OrderFill'legFills :: !(Data.Vector.Vector LegFill), + _OrderFill'orderId :: !(Prelude.Maybe Data.Text.Text), + _OrderFill'fillStatus :: !(Prelude.Maybe Data.Word.Word32), + _OrderFill'fillCareOrderRequestId :: !(Prelude.Maybe Data.Text.Text), + _OrderFill'displayPrice :: !(Prelude.Maybe Data.Int.Int64), + _OrderFill'openCloseType :: !(Prelude.Maybe Data.Word.Word32), + _OrderFill'speculationType :: !(Prelude.Maybe Data.Word.Word32), + _OrderFill'commission :: !(Prelude.Maybe Prelude.Double), + _OrderFill'commissionCurrency :: !(Prelude.Maybe Data.Text.Text), + _OrderFill'quantity :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _OrderFill'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderFill where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderFill "id" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'id (\ x__ y__ -> x__ {_OrderFill'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'id" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'id (\ x__ y__ -> x__ {_OrderFill'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "execId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'execId (\ x__ y__ -> x__ {_OrderFill'execId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'execId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'execId (\ x__ y__ -> x__ {_OrderFill'execId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "obsoleteQuantity" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'obsoleteQuantity + (\ x__ y__ -> x__ {_OrderFill'obsoleteQuantity = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'obsoleteQuantity" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'obsoleteQuantity + (\ x__ y__ -> x__ {_OrderFill'obsoleteQuantity = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "price" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'price (\ x__ y__ -> x__ {_OrderFill'price = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'price" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'price (\ x__ y__ -> x__ {_OrderFill'price = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "fillUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'fillUtcTime + (\ x__ y__ -> x__ {_OrderFill'fillUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'fillUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'fillUtcTime + (\ x__ y__ -> x__ {_OrderFill'fillUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "isAggressive" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'isAggressive + (\ x__ y__ -> x__ {_OrderFill'isAggressive = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'isAggressive" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'isAggressive + (\ x__ y__ -> x__ {_OrderFill'isAggressive = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "legFills" [LegFill] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'legFills (\ x__ y__ -> x__ {_OrderFill'legFills = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderFill "vec'legFills" (Data.Vector.Vector LegFill) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'legFills (\ x__ y__ -> x__ {_OrderFill'legFills = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "orderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'orderId (\ x__ y__ -> x__ {_OrderFill'orderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'orderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'orderId (\ x__ y__ -> x__ {_OrderFill'orderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "fillStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'fillStatus + (\ x__ y__ -> x__ {_OrderFill'fillStatus = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'fillStatus" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'fillStatus + (\ x__ y__ -> x__ {_OrderFill'fillStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "fillCareOrderRequestId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'fillCareOrderRequestId + (\ x__ y__ -> x__ {_OrderFill'fillCareOrderRequestId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'fillCareOrderRequestId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'fillCareOrderRequestId + (\ x__ y__ -> x__ {_OrderFill'fillCareOrderRequestId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "displayPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'displayPrice + (\ x__ y__ -> x__ {_OrderFill'displayPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'displayPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'displayPrice + (\ x__ y__ -> x__ {_OrderFill'displayPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "openCloseType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'openCloseType + (\ x__ y__ -> x__ {_OrderFill'openCloseType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'openCloseType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'openCloseType + (\ x__ y__ -> x__ {_OrderFill'openCloseType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "speculationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'speculationType + (\ x__ y__ -> x__ {_OrderFill'speculationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'speculationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'speculationType + (\ x__ y__ -> x__ {_OrderFill'speculationType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "commission" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'commission + (\ x__ y__ -> x__ {_OrderFill'commission = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'commission" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'commission + (\ x__ y__ -> x__ {_OrderFill'commission = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "commissionCurrency" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'commissionCurrency + (\ x__ y__ -> x__ {_OrderFill'commissionCurrency = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'commissionCurrency" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'commissionCurrency + (\ x__ y__ -> x__ {_OrderFill'commissionCurrency = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderFill "quantity" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'quantity (\ x__ y__ -> x__ {_OrderFill'quantity = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderFill "maybe'quantity" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderFill'quantity (\ x__ y__ -> x__ {_OrderFill'quantity = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderFill where + messageName _ = Data.Text.pack "traderouting_1.OrderFill" + packedMessageDescriptor _ + = "\n\ + \\tOrderFill\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\DC2R\STXid\DC2\ETB\n\ + \\aexec_id\CAN\STX \SOH(\tR\ACKexecId\DC2/\n\ + \\DC1obsolete_quantity\CAN\ETX \SOH(\rR\DLEobsoleteQuantityB\STX\CAN\SOH\DC2\DC4\n\ + \\ENQprice\CAN\EOT \SOH(\SOHR\ENQprice\DC2\"\n\ + \\rfill_utc_time\CAN\ENQ \SOH(\DC2R\vfillUtcTime\DC2#\n\ + \\ris_aggressive\CAN\ACK \SOH(\bR\fisAggressive\DC24\n\ + \\tleg_fills\CAN\a \ETX(\v2\ETB.traderouting_1.LegFillR\blegFills\DC2\EM\n\ + \\border_id\CAN\b \SOH(\tR\aorderId\DC2\US\n\ + \\vfill_status\CAN\t \SOH(\rR\n\ + \fillStatus\DC2:\n\ + \\SUBfill_care_order_request_id\CAN\n\ + \ \SOH(\tR\SYNfillCareOrderRequestId\DC2#\n\ + \\rdisplay_price\CAN\v \SOH(\DC2R\fdisplayPrice\DC2&\n\ + \\SIopen_close_type\CAN\f \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN\r \SOH(\rR\SIspeculationType\DC2\RS\n\ + \\n\ + \commission\CAN\SO \SOH(\SOHR\n\ + \commission\DC2/\n\ + \\DC3commission_currency\CAN\SI \SOH(\tR\DC2commissionCurrency\DC2(\n\ + \\bquantity\CAN\DLE \SOH(\v2\f.cqg.DecimalR\bquantity\"A\n\ + \\n\ + \FillStatus\DC2\t\n\ + \\ENQVALID\DLE\SOH\DC2\n\ + \\n\ + \\ACKBUSTED\DLE\STX\DC2\r\n\ + \\tCORRECTED\DLE\ETX\DC2\r\n\ + \\tCANCELLED\DLE\EOT" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor OrderFill + execId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exec_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'execId")) :: + Data.ProtoLens.FieldDescriptor OrderFill + obsoleteQuantity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_quantity" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteQuantity")) :: + Data.ProtoLens.FieldDescriptor OrderFill + price__field_descriptor + = Data.ProtoLens.FieldDescriptor + "price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'price")) :: + Data.ProtoLens.FieldDescriptor OrderFill + fillUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillUtcTime")) :: + Data.ProtoLens.FieldDescriptor OrderFill + isAggressive__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_aggressive" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isAggressive")) :: + Data.ProtoLens.FieldDescriptor OrderFill + legFills__field_descriptor + = Data.ProtoLens.FieldDescriptor + "leg_fills" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LegFill) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"legFills")) :: + Data.ProtoLens.FieldDescriptor OrderFill + orderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderId")) :: + Data.ProtoLens.FieldDescriptor OrderFill + fillStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillStatus")) :: + Data.ProtoLens.FieldDescriptor OrderFill + fillCareOrderRequestId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "fill_care_order_request_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'fillCareOrderRequestId")) :: + Data.ProtoLens.FieldDescriptor OrderFill + displayPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayPrice")) :: + Data.ProtoLens.FieldDescriptor OrderFill + openCloseType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "open_close_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'openCloseType")) :: + Data.ProtoLens.FieldDescriptor OrderFill + speculationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "speculation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'speculationType")) :: + Data.ProtoLens.FieldDescriptor OrderFill + commission__field_descriptor + = Data.ProtoLens.FieldDescriptor + "commission" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'commission")) :: + Data.ProtoLens.FieldDescriptor OrderFill + commissionCurrency__field_descriptor + = Data.ProtoLens.FieldDescriptor + "commission_currency" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'commissionCurrency")) :: + Data.ProtoLens.FieldDescriptor OrderFill + quantity__field_descriptor + = Data.ProtoLens.FieldDescriptor + "quantity" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'quantity")) :: + Data.ProtoLens.FieldDescriptor OrderFill + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, execId__field_descriptor), + (Data.ProtoLens.Tag 3, obsoleteQuantity__field_descriptor), + (Data.ProtoLens.Tag 4, price__field_descriptor), + (Data.ProtoLens.Tag 5, fillUtcTime__field_descriptor), + (Data.ProtoLens.Tag 6, isAggressive__field_descriptor), + (Data.ProtoLens.Tag 7, legFills__field_descriptor), + (Data.ProtoLens.Tag 8, orderId__field_descriptor), + (Data.ProtoLens.Tag 9, fillStatus__field_descriptor), + (Data.ProtoLens.Tag 10, fillCareOrderRequestId__field_descriptor), + (Data.ProtoLens.Tag 11, displayPrice__field_descriptor), + (Data.ProtoLens.Tag 12, openCloseType__field_descriptor), + (Data.ProtoLens.Tag 13, speculationType__field_descriptor), + (Data.ProtoLens.Tag 14, commission__field_descriptor), + (Data.ProtoLens.Tag 15, commissionCurrency__field_descriptor), + (Data.ProtoLens.Tag 16, quantity__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderFill'_unknownFields + (\ x__ y__ -> x__ {_OrderFill'_unknownFields = y__}) + defMessage + = OrderFill'_constructor + {_OrderFill'id = Prelude.Nothing, + _OrderFill'execId = Prelude.Nothing, + _OrderFill'obsoleteQuantity = Prelude.Nothing, + _OrderFill'price = Prelude.Nothing, + _OrderFill'fillUtcTime = Prelude.Nothing, + _OrderFill'isAggressive = Prelude.Nothing, + _OrderFill'legFills = Data.Vector.Generic.empty, + _OrderFill'orderId = Prelude.Nothing, + _OrderFill'fillStatus = Prelude.Nothing, + _OrderFill'fillCareOrderRequestId = Prelude.Nothing, + _OrderFill'displayPrice = Prelude.Nothing, + _OrderFill'openCloseType = Prelude.Nothing, + _OrderFill'speculationType = Prelude.Nothing, + _OrderFill'commission = Prelude.Nothing, + _OrderFill'commissionCurrency = Prelude.Nothing, + _OrderFill'quantity = Prelude.Nothing, + _OrderFill'_unknownFields = []} + parseMessage + = let + loop :: + OrderFill + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld LegFill + -> Data.ProtoLens.Encoding.Bytes.Parser OrderFill + loop x mutable'legFills + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'legFills <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'legFills) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'legFills") frozen'legFills x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + mutable'legFills + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "exec_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"execId") y x) + mutable'legFills + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_quantity" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteQuantity") y x) + mutable'legFills + 33 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"price") y x) + mutable'legFills + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "fill_utc_time" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fillUtcTime") y x) + mutable'legFills + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_aggressive" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"isAggressive") y x) + mutable'legFills + 58 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "leg_fills" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'legFills y) + loop x v + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderId") y x) + mutable'legFills + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "fill_status" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"fillStatus") y x) + mutable'legFills + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "fill_care_order_request_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"fillCareOrderRequestId") y x) + mutable'legFills + 88 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayPrice") y x) + mutable'legFills + 96 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "open_close_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"openCloseType") y x) + mutable'legFills + 104 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "speculation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"speculationType") y x) + mutable'legFills + 113 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "commission" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"commission") y x) + mutable'legFills + 122 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "commission_currency" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"commissionCurrency") y x) + mutable'legFills + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "quantity" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"quantity") y x) + mutable'legFills + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'legFills + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'legFills <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'legFills) + "OrderFill" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'execId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteQuantity") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'price") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 33) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'fillUtcTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isAggressive") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'legFills") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'fillStatus") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'fillCareOrderRequestId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'displayPrice") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'openCloseType") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 96) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'speculationType") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 104) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'commission") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 113) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'commissionCurrency") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'quantity") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))))) +instance Control.DeepSeq.NFData OrderFill where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderFill'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderFill'id x__) + (Control.DeepSeq.deepseq + (_OrderFill'execId x__) + (Control.DeepSeq.deepseq + (_OrderFill'obsoleteQuantity x__) + (Control.DeepSeq.deepseq + (_OrderFill'price x__) + (Control.DeepSeq.deepseq + (_OrderFill'fillUtcTime x__) + (Control.DeepSeq.deepseq + (_OrderFill'isAggressive x__) + (Control.DeepSeq.deepseq + (_OrderFill'legFills x__) + (Control.DeepSeq.deepseq + (_OrderFill'orderId x__) + (Control.DeepSeq.deepseq + (_OrderFill'fillStatus x__) + (Control.DeepSeq.deepseq + (_OrderFill'fillCareOrderRequestId x__) + (Control.DeepSeq.deepseq + (_OrderFill'displayPrice x__) + (Control.DeepSeq.deepseq + (_OrderFill'openCloseType x__) + (Control.DeepSeq.deepseq + (_OrderFill'speculationType x__) + (Control.DeepSeq.deepseq + (_OrderFill'commission x__) + (Control.DeepSeq.deepseq + (_OrderFill'commissionCurrency x__) + (Control.DeepSeq.deepseq + (_OrderFill'quantity x__) + ())))))))))))))))) +data OrderFill'FillStatus + = OrderFill'VALID | + OrderFill'BUSTED | + OrderFill'CORRECTED | + OrderFill'CANCELLED + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderFill'FillStatus where + maybeToEnum 1 = Prelude.Just OrderFill'VALID + maybeToEnum 2 = Prelude.Just OrderFill'BUSTED + maybeToEnum 3 = Prelude.Just OrderFill'CORRECTED + maybeToEnum 4 = Prelude.Just OrderFill'CANCELLED + maybeToEnum _ = Prelude.Nothing + showEnum OrderFill'VALID = "VALID" + showEnum OrderFill'BUSTED = "BUSTED" + showEnum OrderFill'CORRECTED = "CORRECTED" + showEnum OrderFill'CANCELLED = "CANCELLED" + readEnum k + | (Prelude.==) k "VALID" = Prelude.Just OrderFill'VALID + | (Prelude.==) k "BUSTED" = Prelude.Just OrderFill'BUSTED + | (Prelude.==) k "CORRECTED" = Prelude.Just OrderFill'CORRECTED + | (Prelude.==) k "CANCELLED" = Prelude.Just OrderFill'CANCELLED + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderFill'FillStatus where + minBound = OrderFill'VALID + maxBound = OrderFill'CANCELLED +instance Prelude.Enum OrderFill'FillStatus where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum FillStatus: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderFill'VALID = 1 + fromEnum OrderFill'BUSTED = 2 + fromEnum OrderFill'CORRECTED = 3 + fromEnum OrderFill'CANCELLED = 4 + succ OrderFill'CANCELLED + = Prelude.error + "OrderFill'FillStatus.succ: bad argument OrderFill'CANCELLED. This value would be out of bounds." + succ OrderFill'VALID = OrderFill'BUSTED + succ OrderFill'BUSTED = OrderFill'CORRECTED + succ OrderFill'CORRECTED = OrderFill'CANCELLED + pred OrderFill'VALID + = Prelude.error + "OrderFill'FillStatus.pred: bad argument OrderFill'VALID. This value would be out of bounds." + pred OrderFill'BUSTED = OrderFill'VALID + pred OrderFill'CORRECTED = OrderFill'BUSTED + pred OrderFill'CANCELLED = OrderFill'CORRECTED + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderFill'FillStatus where + fieldDefault = OrderFill'VALID +instance Control.DeepSeq.NFData OrderFill'FillStatus where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.orderId' @:: Lens' OrderRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.submittedUtcTime' @:: Lens' OrderRequest Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.requestType' @:: Lens' OrderRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.orderType' @:: Lens' OrderRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderType' @:: Lens' OrderRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteSize' @:: Lens' OrderRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteSize' @:: Lens' OrderRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.limitPrice' @:: Lens' OrderRequest Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'limitPrice' @:: Lens' OrderRequest (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.stopPrice' @:: Lens' OrderRequest Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'stopPrice' @:: Lens' OrderRequest (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.duration' @:: Lens' OrderRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'duration' @:: Lens' OrderRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.goodThruDate' @:: Lens' OrderRequest Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'goodThruDate' @:: Lens' OrderRequest (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.goodThruUtcTime' @:: Lens' OrderRequest Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'goodThruUtcTime' @:: Lens' OrderRequest (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.state' @:: Lens' OrderRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.linkOrderId' @:: Lens' OrderRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'linkOrderId' @:: Lens' OrderRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.transactionStatus' @:: Lens' OrderRequest [OrderTransactionStatus]@ + * 'Proto.CMS.Traderouting1_Fields.vec'transactionStatus' @:: Lens' OrderRequest (Data.Vector.Vector OrderTransactionStatus)@ + * 'Proto.CMS.Traderouting1_Fields.accountAndUserInfo' @:: Lens' OrderRequest [AccountAndUserInfo]@ + * 'Proto.CMS.Traderouting1_Fields.vec'accountAndUserInfo' @:: Lens' OrderRequest (Data.Vector.Vector AccountAndUserInfo)@ + * 'Proto.CMS.Traderouting1_Fields.displayLimitPrice' @:: Lens' OrderRequest Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayLimitPrice' @:: Lens' OrderRequest (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.displayStopPrice' @:: Lens' OrderRequest Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayStopPrice' @:: Lens' OrderRequest (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.trailing' @:: Lens' OrderRequest OrderTrailing@ + * 'Proto.CMS.Traderouting1_Fields.maybe'trailing' @:: Lens' OrderRequest (Prelude.Maybe OrderTrailing)@ + * 'Proto.CMS.Traderouting1_Fields.sizes' @:: Lens' OrderRequest OrderSizes@ + * 'Proto.CMS.Traderouting1_Fields.maybe'sizes' @:: Lens' OrderRequest (Prelude.Maybe OrderSizes)@ + * 'Proto.CMS.Traderouting1_Fields.ticketNumber' @:: Lens' OrderRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'ticketNumber' @:: Lens' OrderRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.comments' @:: Lens' OrderRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'comments' @:: Lens' OrderRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.orderClasses' @:: Lens' OrderRequest [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'orderClasses' @:: Lens' OrderRequest (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.nativeOrderType' @:: Lens' OrderRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'nativeOrderType' @:: Lens' OrderRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.activationTime' @:: Lens' OrderRequest Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'activationTime' @:: Lens' OrderRequest (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.suspensionTime' @:: Lens' OrderRequest Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'suspensionTime' @:: Lens' OrderRequest (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.expirationTime' @:: Lens' OrderRequest Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'expirationTime' @:: Lens' OrderRequest (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.routes' @:: Lens' OrderRequest [OrderRoute]@ + * 'Proto.CMS.Traderouting1_Fields.vec'routes' @:: Lens' OrderRequest (Data.Vector.Vector OrderRoute)@ + * 'Proto.CMS.Traderouting1_Fields.clientRegulatoryAlgorithmId' @:: Lens' OrderRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'clientRegulatoryAlgorithmId' @:: Lens' OrderRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.effectiveRegulatoryAlgorithmId' @:: Lens' OrderRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'effectiveRegulatoryAlgorithmId' @:: Lens' OrderRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.operationalDetails' @:: Lens' OrderRequest OperationalDetails@ + * 'Proto.CMS.Traderouting1_Fields.maybe'operationalDetails' @:: Lens' OrderRequest (Prelude.Maybe OperationalDetails)@ + * 'Proto.CMS.Traderouting1_Fields.instructions' @:: Lens' OrderRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'instructions' @:: Lens' OrderRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.clientExtraValues' @:: Lens' OrderRequest [Proto.CMS.Common1.Tuple]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clientExtraValues' @:: Lens' OrderRequest (Data.Vector.Vector Proto.CMS.Common1.Tuple)@ + * 'Proto.CMS.Traderouting1_Fields.routeClientOrderId' @:: Lens' OrderRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'routeClientOrderId' @:: Lens' OrderRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteDiscretionaryOffset' @:: Lens' OrderRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteDiscretionaryOffset' @:: Lens' OrderRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.execInstruction' @:: Lens' OrderRequest [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'execInstruction' @:: Lens' OrderRequest (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.size' @:: Lens' OrderRequest Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'size' @:: Lens' OrderRequest (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.executionSourceCode' @:: Lens' OrderRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'executionSourceCode' @:: Lens' OrderRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.extendedSide' @:: Lens' OrderRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'extendedSide' @:: Lens' OrderRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.locateId' @:: Lens' OrderRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'locateId' @:: Lens' OrderRequest (Prelude.Maybe Data.Text.Text)@ -} +data OrderRequest + = OrderRequest'_constructor {_OrderRequest'orderId :: !Data.Text.Text, + _OrderRequest'submittedUtcTime :: !Data.Int.Int64, + _OrderRequest'requestType :: !Data.Word.Word32, + _OrderRequest'orderType :: !(Prelude.Maybe Data.Word.Word32), + _OrderRequest'obsoleteSize :: !(Prelude.Maybe Data.Word.Word32), + _OrderRequest'limitPrice :: !(Prelude.Maybe Prelude.Double), + _OrderRequest'stopPrice :: !(Prelude.Maybe Prelude.Double), + _OrderRequest'duration :: !(Prelude.Maybe Data.Word.Word32), + _OrderRequest'goodThruDate :: !(Prelude.Maybe Data.Int.Int64), + _OrderRequest'goodThruUtcTime :: !(Prelude.Maybe Data.Int.Int64), + _OrderRequest'state :: !Data.Word.Word32, + _OrderRequest'linkOrderId :: !(Prelude.Maybe Data.Text.Text), + _OrderRequest'transactionStatus :: !(Data.Vector.Vector OrderTransactionStatus), + _OrderRequest'accountAndUserInfo :: !(Data.Vector.Vector AccountAndUserInfo), + _OrderRequest'displayLimitPrice :: !(Prelude.Maybe Data.Int.Int64), + _OrderRequest'displayStopPrice :: !(Prelude.Maybe Data.Int.Int64), + _OrderRequest'trailing :: !(Prelude.Maybe OrderTrailing), + _OrderRequest'sizes :: !(Prelude.Maybe OrderSizes), + _OrderRequest'ticketNumber :: !(Prelude.Maybe Data.Text.Text), + _OrderRequest'comments :: !(Prelude.Maybe Data.Text.Text), + _OrderRequest'orderClasses :: !(Data.Vector.Vector Data.Text.Text), + _OrderRequest'nativeOrderType :: !(Prelude.Maybe Data.Word.Word32), + _OrderRequest'activationTime :: !(Prelude.Maybe Data.Int.Int64), + _OrderRequest'suspensionTime :: !(Prelude.Maybe Data.Int.Int64), + _OrderRequest'expirationTime :: !(Prelude.Maybe Data.Int.Int64), + _OrderRequest'routes :: !(Data.Vector.Vector OrderRoute), + _OrderRequest'clientRegulatoryAlgorithmId :: !(Prelude.Maybe Data.Text.Text), + _OrderRequest'effectiveRegulatoryAlgorithmId :: !(Prelude.Maybe Data.Text.Text), + _OrderRequest'operationalDetails :: !(Prelude.Maybe OperationalDetails), + _OrderRequest'instructions :: !(Prelude.Maybe Data.Text.Text), + _OrderRequest'clientExtraValues :: !(Data.Vector.Vector Proto.CMS.Common1.Tuple), + _OrderRequest'routeClientOrderId :: !(Prelude.Maybe Data.Text.Text), + _OrderRequest'obsoleteDiscretionaryOffset :: !(Prelude.Maybe Data.Word.Word32), + _OrderRequest'execInstruction :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _OrderRequest'size :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _OrderRequest'executionSourceCode :: !(Prelude.Maybe Data.Text.Text), + _OrderRequest'extendedSide :: !(Prelude.Maybe Data.Word.Word32), + _OrderRequest'locateId :: !(Prelude.Maybe Data.Text.Text), + _OrderRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderRequest "orderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'orderId + (\ x__ y__ -> x__ {_OrderRequest'orderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "submittedUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'submittedUtcTime + (\ x__ y__ -> x__ {_OrderRequest'submittedUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "requestType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'requestType + (\ x__ y__ -> x__ {_OrderRequest'requestType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "orderType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'orderType + (\ x__ y__ -> x__ {_OrderRequest'orderType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'orderType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'orderType + (\ x__ y__ -> x__ {_OrderRequest'orderType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "obsoleteSize" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'obsoleteSize + (\ x__ y__ -> x__ {_OrderRequest'obsoleteSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'obsoleteSize" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'obsoleteSize + (\ x__ y__ -> x__ {_OrderRequest'obsoleteSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "limitPrice" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'limitPrice + (\ x__ y__ -> x__ {_OrderRequest'limitPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'limitPrice" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'limitPrice + (\ x__ y__ -> x__ {_OrderRequest'limitPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "stopPrice" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'stopPrice + (\ x__ y__ -> x__ {_OrderRequest'stopPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'stopPrice" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'stopPrice + (\ x__ y__ -> x__ {_OrderRequest'stopPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "duration" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'duration + (\ x__ y__ -> x__ {_OrderRequest'duration = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'duration" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'duration + (\ x__ y__ -> x__ {_OrderRequest'duration = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "goodThruDate" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'goodThruDate + (\ x__ y__ -> x__ {_OrderRequest'goodThruDate = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'goodThruDate" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'goodThruDate + (\ x__ y__ -> x__ {_OrderRequest'goodThruDate = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "goodThruUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'goodThruUtcTime + (\ x__ y__ -> x__ {_OrderRequest'goodThruUtcTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'goodThruUtcTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'goodThruUtcTime + (\ x__ y__ -> x__ {_OrderRequest'goodThruUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "state" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'state (\ x__ y__ -> x__ {_OrderRequest'state = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "linkOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'linkOrderId + (\ x__ y__ -> x__ {_OrderRequest'linkOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'linkOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'linkOrderId + (\ x__ y__ -> x__ {_OrderRequest'linkOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "transactionStatus" [OrderTransactionStatus] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'transactionStatus + (\ x__ y__ -> x__ {_OrderRequest'transactionStatus = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderRequest "vec'transactionStatus" (Data.Vector.Vector OrderTransactionStatus) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'transactionStatus + (\ x__ y__ -> x__ {_OrderRequest'transactionStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "accountAndUserInfo" [AccountAndUserInfo] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'accountAndUserInfo + (\ x__ y__ -> x__ {_OrderRequest'accountAndUserInfo = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderRequest "vec'accountAndUserInfo" (Data.Vector.Vector AccountAndUserInfo) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'accountAndUserInfo + (\ x__ y__ -> x__ {_OrderRequest'accountAndUserInfo = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "displayLimitPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'displayLimitPrice + (\ x__ y__ -> x__ {_OrderRequest'displayLimitPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'displayLimitPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'displayLimitPrice + (\ x__ y__ -> x__ {_OrderRequest'displayLimitPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "displayStopPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'displayStopPrice + (\ x__ y__ -> x__ {_OrderRequest'displayStopPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'displayStopPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'displayStopPrice + (\ x__ y__ -> x__ {_OrderRequest'displayStopPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "trailing" OrderTrailing where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'trailing + (\ x__ y__ -> x__ {_OrderRequest'trailing = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'trailing" (Prelude.Maybe OrderTrailing) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'trailing + (\ x__ y__ -> x__ {_OrderRequest'trailing = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "sizes" OrderSizes where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'sizes (\ x__ y__ -> x__ {_OrderRequest'sizes = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'sizes" (Prelude.Maybe OrderSizes) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'sizes (\ x__ y__ -> x__ {_OrderRequest'sizes = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "ticketNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'ticketNumber + (\ x__ y__ -> x__ {_OrderRequest'ticketNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'ticketNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'ticketNumber + (\ x__ y__ -> x__ {_OrderRequest'ticketNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "comments" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'comments + (\ x__ y__ -> x__ {_OrderRequest'comments = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'comments" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'comments + (\ x__ y__ -> x__ {_OrderRequest'comments = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "orderClasses" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'orderClasses + (\ x__ y__ -> x__ {_OrderRequest'orderClasses = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderRequest "vec'orderClasses" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'orderClasses + (\ x__ y__ -> x__ {_OrderRequest'orderClasses = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "nativeOrderType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'nativeOrderType + (\ x__ y__ -> x__ {_OrderRequest'nativeOrderType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'nativeOrderType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'nativeOrderType + (\ x__ y__ -> x__ {_OrderRequest'nativeOrderType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "activationTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'activationTime + (\ x__ y__ -> x__ {_OrderRequest'activationTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'activationTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'activationTime + (\ x__ y__ -> x__ {_OrderRequest'activationTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "suspensionTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'suspensionTime + (\ x__ y__ -> x__ {_OrderRequest'suspensionTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'suspensionTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'suspensionTime + (\ x__ y__ -> x__ {_OrderRequest'suspensionTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "expirationTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'expirationTime + (\ x__ y__ -> x__ {_OrderRequest'expirationTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'expirationTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'expirationTime + (\ x__ y__ -> x__ {_OrderRequest'expirationTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "routes" [OrderRoute] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'routes + (\ x__ y__ -> x__ {_OrderRequest'routes = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderRequest "vec'routes" (Data.Vector.Vector OrderRoute) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'routes + (\ x__ y__ -> x__ {_OrderRequest'routes = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "clientRegulatoryAlgorithmId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'clientRegulatoryAlgorithmId + (\ x__ y__ + -> x__ {_OrderRequest'clientRegulatoryAlgorithmId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'clientRegulatoryAlgorithmId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'clientRegulatoryAlgorithmId + (\ x__ y__ + -> x__ {_OrderRequest'clientRegulatoryAlgorithmId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "effectiveRegulatoryAlgorithmId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'effectiveRegulatoryAlgorithmId + (\ x__ y__ + -> x__ {_OrderRequest'effectiveRegulatoryAlgorithmId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'effectiveRegulatoryAlgorithmId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'effectiveRegulatoryAlgorithmId + (\ x__ y__ + -> x__ {_OrderRequest'effectiveRegulatoryAlgorithmId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "operationalDetails" OperationalDetails where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'operationalDetails + (\ x__ y__ -> x__ {_OrderRequest'operationalDetails = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'operationalDetails" (Prelude.Maybe OperationalDetails) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'operationalDetails + (\ x__ y__ -> x__ {_OrderRequest'operationalDetails = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "instructions" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'instructions + (\ x__ y__ -> x__ {_OrderRequest'instructions = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'instructions" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'instructions + (\ x__ y__ -> x__ {_OrderRequest'instructions = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "clientExtraValues" [Proto.CMS.Common1.Tuple] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'clientExtraValues + (\ x__ y__ -> x__ {_OrderRequest'clientExtraValues = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderRequest "vec'clientExtraValues" (Data.Vector.Vector Proto.CMS.Common1.Tuple) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'clientExtraValues + (\ x__ y__ -> x__ {_OrderRequest'clientExtraValues = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "routeClientOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'routeClientOrderId + (\ x__ y__ -> x__ {_OrderRequest'routeClientOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'routeClientOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'routeClientOrderId + (\ x__ y__ -> x__ {_OrderRequest'routeClientOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "obsoleteDiscretionaryOffset" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'obsoleteDiscretionaryOffset + (\ x__ y__ + -> x__ {_OrderRequest'obsoleteDiscretionaryOffset = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'obsoleteDiscretionaryOffset" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'obsoleteDiscretionaryOffset + (\ x__ y__ + -> x__ {_OrderRequest'obsoleteDiscretionaryOffset = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "execInstruction" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'execInstruction + (\ x__ y__ -> x__ {_OrderRequest'execInstruction = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderRequest "vec'execInstruction" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'execInstruction + (\ x__ y__ -> x__ {_OrderRequest'execInstruction = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "size" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'size (\ x__ y__ -> x__ {_OrderRequest'size = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'size" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'size (\ x__ y__ -> x__ {_OrderRequest'size = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "executionSourceCode" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'executionSourceCode + (\ x__ y__ -> x__ {_OrderRequest'executionSourceCode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'executionSourceCode" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'executionSourceCode + (\ x__ y__ -> x__ {_OrderRequest'executionSourceCode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "extendedSide" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'extendedSide + (\ x__ y__ -> x__ {_OrderRequest'extendedSide = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'extendedSide" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'extendedSide + (\ x__ y__ -> x__ {_OrderRequest'extendedSide = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRequest "locateId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'locateId + (\ x__ y__ -> x__ {_OrderRequest'locateId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRequest "maybe'locateId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRequest'locateId + (\ x__ y__ -> x__ {_OrderRequest'locateId = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderRequest where + messageName _ = Data.Text.pack "traderouting_1.OrderRequest" + packedMessageDescriptor _ + = "\n\ + \\fOrderRequest\DC2\EM\n\ + \\border_id\CAN\SOH \STX(\tR\aorderId\DC2,\n\ + \\DC2submitted_utc_time\CAN\STX \STX(\DC2R\DLEsubmittedUtcTime\DC2!\n\ + \\frequest_type\CAN\ETX \STX(\rR\vrequestType\DC2\GS\n\ + \\n\ + \order_type\CAN\EOT \SOH(\rR\torderType\DC2'\n\ + \\robsolete_size\CAN\ACK \SOH(\rR\fobsoleteSizeB\STX\CAN\SOH\DC2\US\n\ + \\vlimit_price\CAN\a \SOH(\SOHR\n\ + \limitPrice\DC2\GS\n\ + \\n\ + \stop_price\CAN\b \SOH(\SOHR\tstopPrice\DC2\SUB\n\ + \\bduration\CAN\t \SOH(\rR\bduration\DC2$\n\ + \\SOgood_thru_date\CAN\n\ + \ \SOH(\DC2R\fgoodThruDate\DC2+\n\ + \\DC2good_thru_utc_time\CAN\v \SOH(\DC2R\SIgoodThruUtcTime\DC2\DC4\n\ + \\ENQstate\CAN\f \STX(\rR\ENQstate\DC2\"\n\ + \\rlink_order_id\CAN\r \SOH(\tR\vlinkOrderId\DC2U\n\ + \\DC2transaction_status\CAN\SO \ETX(\v2&.traderouting_1.OrderTransactionStatusR\DC1transactionStatus\DC2U\n\ + \\NAKaccount_and_user_info\CAN\SI \ETX(\v2\".traderouting_1.AccountAndUserInfoR\DC2accountAndUserInfo\DC2.\n\ + \\DC3display_limit_price\CAN\DLE \SOH(\DC2R\DC1displayLimitPrice\DC2,\n\ + \\DC2display_stop_price\CAN\DC1 \SOH(\DC2R\DLEdisplayStopPrice\DC29\n\ + \\btrailing\CAN\DC3 \SOH(\v2\GS.traderouting_1.OrderTrailingR\btrailing\DC20\n\ + \\ENQsizes\CAN\DC4 \SOH(\v2\SUB.traderouting_1.OrderSizesR\ENQsizes\DC2#\n\ + \\rticket_number\CAN\NAK \SOH(\tR\fticketNumber\DC2\SUB\n\ + \\bcomments\CAN\SYN \SOH(\tR\bcomments\DC2#\n\ + \\rorder_classes\CAN\ETB \ETX(\tR\forderClasses\DC2*\n\ + \\DC1native_order_type\CAN\CAN \SOH(\rR\SInativeOrderType\DC2'\n\ + \\SIactivation_time\CAN\EM \SOH(\DC2R\SOactivationTime\DC2'\n\ + \\SIsuspension_time\CAN\SUB \SOH(\DC2R\SOsuspensionTime\DC2'\n\ + \\SIexpiration_time\CAN\ESC \SOH(\DC2R\SOexpirationTime\DC22\n\ + \\ACKroutes\CAN\FS \ETX(\v2\SUB.traderouting_1.OrderRouteR\ACKroutes\DC2C\n\ + \\RSclient_regulatory_algorithm_id\CAN\GS \SOH(\tR\ESCclientRegulatoryAlgorithmId\DC2I\n\ + \!effective_regulatory_algorithm_id\CAN\RS \SOH(\tR\RSeffectiveRegulatoryAlgorithmId\DC2S\n\ + \\DC3operational_details\CAN\" \SOH(\v2\".traderouting_1.OperationalDetailsR\DC2operationalDetails\DC2\"\n\ + \\finstructions\CAN# \SOH(\tR\finstructions\DC2?\n\ + \\DC3client_extra_values\CAN$ \ETX(\v2\SI.common_1.TupleR\DC1clientExtraValues\DC21\n\ + \\NAKroute_client_order_id\CAN% \SOH(\tR\DC2routeClientOrderId\DC2F\n\ + \\GSobsolete_discretionary_offset\CAN& \SOH(\rR\ESCobsoleteDiscretionaryOffsetB\STX\CAN\SOH\DC2)\n\ + \\DLEexec_instruction\CAN' \ETX(\rR\SIexecInstruction\DC2 \n\ + \\EOTsize\CAN( \SOH(\v2\f.cqg.DecimalR\EOTsize\DC22\n\ + \\NAKexecution_source_code\CAN) \SOH(\tR\DC3executionSourceCode\DC2#\n\ + \\rextended_side\CAN* \SOH(\rR\fextendedSide\DC2\ESC\n\ + \\tlocate_id\CAN+ \SOH(\tR\blocateId\"1\n\ + \\vRequestType\DC2\t\n\ + \\ENQPLACE\DLE\SOH\DC2\v\n\ + \\aREPLACE\DLE\STX\DC2\n\ + \\n\ + \\ACKCANCEL\DLE\ETX\"\144\SOH\n\ + \\ENQState\DC2\r\n\ + \\tACTIVE_AT\DLE\SOH\DC2\r\n\ + \\tSUSPENDED\DLE\STX\DC2\v\n\ + \\aPENDING\DLE\ETX\DC2\v\n\ + \\aWORKING\DLE\EOT\DC2\f\n\ + \\bREPLACED\DLE\ENQ\DC2\r\n\ + \\tCANCELLED\DLE\ACK\DC2\f\n\ + \\bREJECTED\DLE\a\DC2\n\ + \\n\ + \\ACKFILLED\DLE\b\DC2\v\n\ + \\aEXPIRED\DLE\t\DC2\v\n\ + \\aMATCHED\DLE\n" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + orderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"orderId")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + submittedUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "submitted_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"submittedUtcTime")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + requestType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "request_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"requestType")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + orderType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderType")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + obsoleteSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_size" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteSize")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + limitPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "limit_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'limitPrice")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + stopPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stop_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stopPrice")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + duration__field_descriptor + = Data.ProtoLens.FieldDescriptor + "duration" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'duration")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + goodThruDate__field_descriptor + = Data.ProtoLens.FieldDescriptor + "good_thru_date" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'goodThruDate")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + goodThruUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "good_thru_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'goodThruUtcTime")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + state__field_descriptor + = Data.ProtoLens.FieldDescriptor + "state" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"state")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + linkOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "link_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'linkOrderId")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + transactionStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "transaction_status" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderTransactionStatus) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"transactionStatus")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + accountAndUserInfo__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_and_user_info" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountAndUserInfo) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"accountAndUserInfo")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + displayLimitPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_limit_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayLimitPrice")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + displayStopPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_stop_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayStopPrice")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + trailing__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trailing" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderTrailing) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'trailing")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + sizes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sizes" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderSizes) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sizes")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + ticketNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ticket_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'ticketNumber")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + comments__field_descriptor + = Data.ProtoLens.FieldDescriptor + "comments" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'comments")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + orderClasses__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_classes" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"orderClasses")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + nativeOrderType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "native_order_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'nativeOrderType")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + activationTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "activation_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'activationTime")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + suspensionTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "suspension_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'suspensionTime")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + expirationTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "expiration_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'expirationTime")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + routes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "routes" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderRoute) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"routes")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + clientRegulatoryAlgorithmId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_regulatory_algorithm_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'clientRegulatoryAlgorithmId")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + effectiveRegulatoryAlgorithmId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "effective_regulatory_algorithm_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'effectiveRegulatoryAlgorithmId")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + operationalDetails__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operational_details" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OperationalDetails) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'operationalDetails")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + instructions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "instructions" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'instructions")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + clientExtraValues__field_descriptor + = Data.ProtoLens.FieldDescriptor + "client_extra_values" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Tuple) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clientExtraValues")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + routeClientOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route_client_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'routeClientOrderId")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + obsoleteDiscretionaryOffset__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_discretionary_offset" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteDiscretionaryOffset")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + execInstruction__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exec_instruction" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"execInstruction")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + size__field_descriptor + = Data.ProtoLens.FieldDescriptor + "size" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'size")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + executionSourceCode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "execution_source_code" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'executionSourceCode")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + extendedSide__field_descriptor + = Data.ProtoLens.FieldDescriptor + "extended_side" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'extendedSide")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + locateId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "locate_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'locateId")) :: + Data.ProtoLens.FieldDescriptor OrderRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, orderId__field_descriptor), + (Data.ProtoLens.Tag 2, submittedUtcTime__field_descriptor), + (Data.ProtoLens.Tag 3, requestType__field_descriptor), + (Data.ProtoLens.Tag 4, orderType__field_descriptor), + (Data.ProtoLens.Tag 6, obsoleteSize__field_descriptor), + (Data.ProtoLens.Tag 7, limitPrice__field_descriptor), + (Data.ProtoLens.Tag 8, stopPrice__field_descriptor), + (Data.ProtoLens.Tag 9, duration__field_descriptor), + (Data.ProtoLens.Tag 10, goodThruDate__field_descriptor), + (Data.ProtoLens.Tag 11, goodThruUtcTime__field_descriptor), + (Data.ProtoLens.Tag 12, state__field_descriptor), + (Data.ProtoLens.Tag 13, linkOrderId__field_descriptor), + (Data.ProtoLens.Tag 14, transactionStatus__field_descriptor), + (Data.ProtoLens.Tag 15, accountAndUserInfo__field_descriptor), + (Data.ProtoLens.Tag 16, displayLimitPrice__field_descriptor), + (Data.ProtoLens.Tag 17, displayStopPrice__field_descriptor), + (Data.ProtoLens.Tag 19, trailing__field_descriptor), + (Data.ProtoLens.Tag 20, sizes__field_descriptor), + (Data.ProtoLens.Tag 21, ticketNumber__field_descriptor), + (Data.ProtoLens.Tag 22, comments__field_descriptor), + (Data.ProtoLens.Tag 23, orderClasses__field_descriptor), + (Data.ProtoLens.Tag 24, nativeOrderType__field_descriptor), + (Data.ProtoLens.Tag 25, activationTime__field_descriptor), + (Data.ProtoLens.Tag 26, suspensionTime__field_descriptor), + (Data.ProtoLens.Tag 27, expirationTime__field_descriptor), + (Data.ProtoLens.Tag 28, routes__field_descriptor), + (Data.ProtoLens.Tag 29, + clientRegulatoryAlgorithmId__field_descriptor), + (Data.ProtoLens.Tag 30, + effectiveRegulatoryAlgorithmId__field_descriptor), + (Data.ProtoLens.Tag 34, operationalDetails__field_descriptor), + (Data.ProtoLens.Tag 35, instructions__field_descriptor), + (Data.ProtoLens.Tag 36, clientExtraValues__field_descriptor), + (Data.ProtoLens.Tag 37, routeClientOrderId__field_descriptor), + (Data.ProtoLens.Tag 38, + obsoleteDiscretionaryOffset__field_descriptor), + (Data.ProtoLens.Tag 39, execInstruction__field_descriptor), + (Data.ProtoLens.Tag 40, size__field_descriptor), + (Data.ProtoLens.Tag 41, executionSourceCode__field_descriptor), + (Data.ProtoLens.Tag 42, extendedSide__field_descriptor), + (Data.ProtoLens.Tag 43, locateId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderRequest'_unknownFields + (\ x__ y__ -> x__ {_OrderRequest'_unknownFields = y__}) + defMessage + = OrderRequest'_constructor + {_OrderRequest'orderId = Data.ProtoLens.fieldDefault, + _OrderRequest'submittedUtcTime = Data.ProtoLens.fieldDefault, + _OrderRequest'requestType = Data.ProtoLens.fieldDefault, + _OrderRequest'orderType = Prelude.Nothing, + _OrderRequest'obsoleteSize = Prelude.Nothing, + _OrderRequest'limitPrice = Prelude.Nothing, + _OrderRequest'stopPrice = Prelude.Nothing, + _OrderRequest'duration = Prelude.Nothing, + _OrderRequest'goodThruDate = Prelude.Nothing, + _OrderRequest'goodThruUtcTime = Prelude.Nothing, + _OrderRequest'state = Data.ProtoLens.fieldDefault, + _OrderRequest'linkOrderId = Prelude.Nothing, + _OrderRequest'transactionStatus = Data.Vector.Generic.empty, + _OrderRequest'accountAndUserInfo = Data.Vector.Generic.empty, + _OrderRequest'displayLimitPrice = Prelude.Nothing, + _OrderRequest'displayStopPrice = Prelude.Nothing, + _OrderRequest'trailing = Prelude.Nothing, + _OrderRequest'sizes = Prelude.Nothing, + _OrderRequest'ticketNumber = Prelude.Nothing, + _OrderRequest'comments = Prelude.Nothing, + _OrderRequest'orderClasses = Data.Vector.Generic.empty, + _OrderRequest'nativeOrderType = Prelude.Nothing, + _OrderRequest'activationTime = Prelude.Nothing, + _OrderRequest'suspensionTime = Prelude.Nothing, + _OrderRequest'expirationTime = Prelude.Nothing, + _OrderRequest'routes = Data.Vector.Generic.empty, + _OrderRequest'clientRegulatoryAlgorithmId = Prelude.Nothing, + _OrderRequest'effectiveRegulatoryAlgorithmId = Prelude.Nothing, + _OrderRequest'operationalDetails = Prelude.Nothing, + _OrderRequest'instructions = Prelude.Nothing, + _OrderRequest'clientExtraValues = Data.Vector.Generic.empty, + _OrderRequest'routeClientOrderId = Prelude.Nothing, + _OrderRequest'obsoleteDiscretionaryOffset = Prelude.Nothing, + _OrderRequest'execInstruction = Data.Vector.Generic.empty, + _OrderRequest'size = Prelude.Nothing, + _OrderRequest'executionSourceCode = Prelude.Nothing, + _OrderRequest'extendedSide = Prelude.Nothing, + _OrderRequest'locateId = Prelude.Nothing, + _OrderRequest'_unknownFields = []} + parseMessage + = let + loop :: + OrderRequest + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountAndUserInfo + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.Tuple + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld OrderRoute + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld OrderTransactionStatus + -> Data.ProtoLens.Encoding.Bytes.Parser OrderRequest + loop + x + required'orderId + required'requestType + required'state + required'submittedUtcTime + mutable'accountAndUserInfo + mutable'clientExtraValues + mutable'execInstruction + mutable'orderClasses + mutable'routes + mutable'transactionStatus + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'accountAndUserInfo <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'accountAndUserInfo) + frozen'clientExtraValues <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clientExtraValues) + frozen'execInstruction <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'execInstruction) + frozen'orderClasses <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'orderClasses) + frozen'routes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'routes) + frozen'transactionStatus <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'transactionStatus) + (let + missing + = (if required'orderId then (:) "order_id" else Prelude.id) + ((if required'requestType then (:) "request_type" else Prelude.id) + ((if required'state then (:) "state" else Prelude.id) + ((if required'submittedUtcTime then + (:) "submitted_utc_time" + else + Prelude.id) + []))) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'accountAndUserInfo") + frozen'accountAndUserInfo + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clientExtraValues") + frozen'clientExtraValues + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'execInstruction") + frozen'execInstruction + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'orderClasses") + frozen'orderClasses + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'routes") frozen'routes + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'transactionStatus") + frozen'transactionStatus x))))))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderId") y x) + Prelude.False required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "submitted_utc_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"submittedUtcTime") y x) + required'orderId required'requestType required'state Prelude.False + mutable'accountAndUserInfo mutable'clientExtraValues + mutable'execInstruction mutable'orderClasses mutable'routes + mutable'transactionStatus + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "request_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"requestType") y x) + required'orderId Prelude.False required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "order_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderType") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_size" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteSize") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 57 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "limit_price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"limitPrice") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 65 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "stop_price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"stopPrice") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "duration" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"duration") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 80 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "good_thru_date" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"goodThruDate") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 88 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "good_thru_utc_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"goodThruUtcTime") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 96 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "state" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"state") y x) + required'orderId required'requestType Prelude.False + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "link_order_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"linkOrderId") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 114 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "transaction_status" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'transactionStatus y) + loop + x required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes v + 122 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "account_and_user_info" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'accountAndUserInfo y) + loop + x required'orderId required'requestType required'state + required'submittedUtcTime v mutable'clientExtraValues + mutable'execInstruction mutable'orderClasses mutable'routes + mutable'transactionStatus + 128 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_limit_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayLimitPrice") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 136 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_stop_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayStopPrice") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 154 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trailing" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"trailing") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 162 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "sizes" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"sizes") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 170 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "ticket_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"ticketNumber") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 178 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "comments" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"comments") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 186 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_classes" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'orderClasses y) + loop + x required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction v mutable'routes + mutable'transactionStatus + 192 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "native_order_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"nativeOrderType") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 200 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "activation_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"activationTime") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 208 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "suspension_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"suspensionTime") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 216 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "expiration_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"expirationTime") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 226 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "routes" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'routes y) + loop + x required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses v mutable'transactionStatus + 234 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "client_regulatory_algorithm_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"clientRegulatoryAlgorithmId") y + x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 242 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "effective_regulatory_algorithm_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"effectiveRegulatoryAlgorithmId") + y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 274 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "operational_details" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationalDetails") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 282 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "instructions" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"instructions") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 290 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "client_extra_values" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clientExtraValues y) + loop + x required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo v + mutable'execInstruction mutable'orderClasses mutable'routes + mutable'transactionStatus + 298 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "route_client_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"routeClientOrderId") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 304 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_discretionary_offset" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteDiscretionaryOffset") y + x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 312 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "exec_instruction" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'execInstruction y) + loop + x required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues v mutable'orderClasses mutable'routes + mutable'transactionStatus + 314 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "exec_instruction" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'execInstruction) + loop + x required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues y mutable'orderClasses mutable'routes + mutable'transactionStatus + 322 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "size" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"size") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 330 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "execution_source_code" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"executionSourceCode") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 336 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "extended_side" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"extendedSide") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + 346 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "locate_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"locateId") y x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'orderId required'requestType required'state + required'submittedUtcTime mutable'accountAndUserInfo + mutable'clientExtraValues mutable'execInstruction + mutable'orderClasses mutable'routes mutable'transactionStatus + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'accountAndUserInfo <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'clientExtraValues <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'execInstruction <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'orderClasses <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'routes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'transactionStatus <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True + Prelude.True mutable'accountAndUserInfo mutable'clientExtraValues + mutable'execInstruction mutable'orderClasses mutable'routes + mutable'transactionStatus) + "OrderRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"orderId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"submittedUtcTime") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"requestType") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'limitPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 57) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stopPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 65) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'duration") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'goodThruDate") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 80) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'goodThruUtcTime") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 96) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"state") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'linkOrderId") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'transactionStatus") + _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'accountAndUserInfo") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'displayLimitPrice") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 128) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'displayStopPrice") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 136) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'trailing") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 154) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'sizes") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 162) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'ticketNumber") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 170) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'comments") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 178) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 186) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'orderClasses") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'nativeOrderType") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 192) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'activationTime") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 200) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'suspensionTime") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 208) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'expirationTime") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 216) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 226) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'routes") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'clientRegulatoryAlgorithmId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 234) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'effectiveRegulatoryAlgorithmId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 242) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'operationalDetails") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 274) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'instructions") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 282) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 290) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'clientExtraValues") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'routeClientOrderId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 298) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteDiscretionaryOffset") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 304) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 312) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'execInstruction") + _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'size") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 322) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'executionSourceCode") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 330) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'extendedSide") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 336) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'locateId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 346) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))))))))))))))))))))))))))) +instance Control.DeepSeq.NFData OrderRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderRequest'orderId x__) + (Control.DeepSeq.deepseq + (_OrderRequest'submittedUtcTime x__) + (Control.DeepSeq.deepseq + (_OrderRequest'requestType x__) + (Control.DeepSeq.deepseq + (_OrderRequest'orderType x__) + (Control.DeepSeq.deepseq + (_OrderRequest'obsoleteSize x__) + (Control.DeepSeq.deepseq + (_OrderRequest'limitPrice x__) + (Control.DeepSeq.deepseq + (_OrderRequest'stopPrice x__) + (Control.DeepSeq.deepseq + (_OrderRequest'duration x__) + (Control.DeepSeq.deepseq + (_OrderRequest'goodThruDate x__) + (Control.DeepSeq.deepseq + (_OrderRequest'goodThruUtcTime x__) + (Control.DeepSeq.deepseq + (_OrderRequest'state x__) + (Control.DeepSeq.deepseq + (_OrderRequest'linkOrderId x__) + (Control.DeepSeq.deepseq + (_OrderRequest'transactionStatus x__) + (Control.DeepSeq.deepseq + (_OrderRequest'accountAndUserInfo x__) + (Control.DeepSeq.deepseq + (_OrderRequest'displayLimitPrice x__) + (Control.DeepSeq.deepseq + (_OrderRequest'displayStopPrice x__) + (Control.DeepSeq.deepseq + (_OrderRequest'trailing x__) + (Control.DeepSeq.deepseq + (_OrderRequest'sizes x__) + (Control.DeepSeq.deepseq + (_OrderRequest'ticketNumber + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'comments + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'orderClasses + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'nativeOrderType + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'activationTime + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'suspensionTime + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'expirationTime + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'routes + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'clientRegulatoryAlgorithmId + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'effectiveRegulatoryAlgorithmId + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'operationalDetails + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'instructions + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'clientExtraValues + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'routeClientOrderId + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'obsoleteDiscretionaryOffset + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'execInstruction + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'size + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'executionSourceCode + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'extendedSide + x__) + (Control.DeepSeq.deepseq + (_OrderRequest'locateId + x__) + ())))))))))))))))))))))))))))))))))))))) +data OrderRequest'RequestType + = OrderRequest'PLACE | OrderRequest'REPLACE | OrderRequest'CANCEL + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderRequest'RequestType where + maybeToEnum 1 = Prelude.Just OrderRequest'PLACE + maybeToEnum 2 = Prelude.Just OrderRequest'REPLACE + maybeToEnum 3 = Prelude.Just OrderRequest'CANCEL + maybeToEnum _ = Prelude.Nothing + showEnum OrderRequest'PLACE = "PLACE" + showEnum OrderRequest'REPLACE = "REPLACE" + showEnum OrderRequest'CANCEL = "CANCEL" + readEnum k + | (Prelude.==) k "PLACE" = Prelude.Just OrderRequest'PLACE + | (Prelude.==) k "REPLACE" = Prelude.Just OrderRequest'REPLACE + | (Prelude.==) k "CANCEL" = Prelude.Just OrderRequest'CANCEL + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderRequest'RequestType where + minBound = OrderRequest'PLACE + maxBound = OrderRequest'CANCEL +instance Prelude.Enum OrderRequest'RequestType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum RequestType: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderRequest'PLACE = 1 + fromEnum OrderRequest'REPLACE = 2 + fromEnum OrderRequest'CANCEL = 3 + succ OrderRequest'CANCEL + = Prelude.error + "OrderRequest'RequestType.succ: bad argument OrderRequest'CANCEL. This value would be out of bounds." + succ OrderRequest'PLACE = OrderRequest'REPLACE + succ OrderRequest'REPLACE = OrderRequest'CANCEL + pred OrderRequest'PLACE + = Prelude.error + "OrderRequest'RequestType.pred: bad argument OrderRequest'PLACE. This value would be out of bounds." + pred OrderRequest'REPLACE = OrderRequest'PLACE + pred OrderRequest'CANCEL = OrderRequest'REPLACE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderRequest'RequestType where + fieldDefault = OrderRequest'PLACE +instance Control.DeepSeq.NFData OrderRequest'RequestType where + rnf x__ = Prelude.seq x__ () +data OrderRequest'State + = OrderRequest'ACTIVE_AT | + OrderRequest'SUSPENDED | + OrderRequest'PENDING | + OrderRequest'WORKING | + OrderRequest'REPLACED | + OrderRequest'CANCELLED | + OrderRequest'REJECTED | + OrderRequest'FILLED | + OrderRequest'EXPIRED | + OrderRequest'MATCHED + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderRequest'State where + maybeToEnum 1 = Prelude.Just OrderRequest'ACTIVE_AT + maybeToEnum 2 = Prelude.Just OrderRequest'SUSPENDED + maybeToEnum 3 = Prelude.Just OrderRequest'PENDING + maybeToEnum 4 = Prelude.Just OrderRequest'WORKING + maybeToEnum 5 = Prelude.Just OrderRequest'REPLACED + maybeToEnum 6 = Prelude.Just OrderRequest'CANCELLED + maybeToEnum 7 = Prelude.Just OrderRequest'REJECTED + maybeToEnum 8 = Prelude.Just OrderRequest'FILLED + maybeToEnum 9 = Prelude.Just OrderRequest'EXPIRED + maybeToEnum 10 = Prelude.Just OrderRequest'MATCHED + maybeToEnum _ = Prelude.Nothing + showEnum OrderRequest'ACTIVE_AT = "ACTIVE_AT" + showEnum OrderRequest'SUSPENDED = "SUSPENDED" + showEnum OrderRequest'PENDING = "PENDING" + showEnum OrderRequest'WORKING = "WORKING" + showEnum OrderRequest'REPLACED = "REPLACED" + showEnum OrderRequest'CANCELLED = "CANCELLED" + showEnum OrderRequest'REJECTED = "REJECTED" + showEnum OrderRequest'FILLED = "FILLED" + showEnum OrderRequest'EXPIRED = "EXPIRED" + showEnum OrderRequest'MATCHED = "MATCHED" + readEnum k + | (Prelude.==) k "ACTIVE_AT" = Prelude.Just OrderRequest'ACTIVE_AT + | (Prelude.==) k "SUSPENDED" = Prelude.Just OrderRequest'SUSPENDED + | (Prelude.==) k "PENDING" = Prelude.Just OrderRequest'PENDING + | (Prelude.==) k "WORKING" = Prelude.Just OrderRequest'WORKING + | (Prelude.==) k "REPLACED" = Prelude.Just OrderRequest'REPLACED + | (Prelude.==) k "CANCELLED" = Prelude.Just OrderRequest'CANCELLED + | (Prelude.==) k "REJECTED" = Prelude.Just OrderRequest'REJECTED + | (Prelude.==) k "FILLED" = Prelude.Just OrderRequest'FILLED + | (Prelude.==) k "EXPIRED" = Prelude.Just OrderRequest'EXPIRED + | (Prelude.==) k "MATCHED" = Prelude.Just OrderRequest'MATCHED + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderRequest'State where + minBound = OrderRequest'ACTIVE_AT + maxBound = OrderRequest'MATCHED +instance Prelude.Enum OrderRequest'State where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum State: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderRequest'ACTIVE_AT = 1 + fromEnum OrderRequest'SUSPENDED = 2 + fromEnum OrderRequest'PENDING = 3 + fromEnum OrderRequest'WORKING = 4 + fromEnum OrderRequest'REPLACED = 5 + fromEnum OrderRequest'CANCELLED = 6 + fromEnum OrderRequest'REJECTED = 7 + fromEnum OrderRequest'FILLED = 8 + fromEnum OrderRequest'EXPIRED = 9 + fromEnum OrderRequest'MATCHED = 10 + succ OrderRequest'MATCHED + = Prelude.error + "OrderRequest'State.succ: bad argument OrderRequest'MATCHED. This value would be out of bounds." + succ OrderRequest'ACTIVE_AT = OrderRequest'SUSPENDED + succ OrderRequest'SUSPENDED = OrderRequest'PENDING + succ OrderRequest'PENDING = OrderRequest'WORKING + succ OrderRequest'WORKING = OrderRequest'REPLACED + succ OrderRequest'REPLACED = OrderRequest'CANCELLED + succ OrderRequest'CANCELLED = OrderRequest'REJECTED + succ OrderRequest'REJECTED = OrderRequest'FILLED + succ OrderRequest'FILLED = OrderRequest'EXPIRED + succ OrderRequest'EXPIRED = OrderRequest'MATCHED + pred OrderRequest'ACTIVE_AT + = Prelude.error + "OrderRequest'State.pred: bad argument OrderRequest'ACTIVE_AT. This value would be out of bounds." + pred OrderRequest'SUSPENDED = OrderRequest'ACTIVE_AT + pred OrderRequest'PENDING = OrderRequest'SUSPENDED + pred OrderRequest'WORKING = OrderRequest'PENDING + pred OrderRequest'REPLACED = OrderRequest'WORKING + pred OrderRequest'CANCELLED = OrderRequest'REPLACED + pred OrderRequest'REJECTED = OrderRequest'CANCELLED + pred OrderRequest'FILLED = OrderRequest'REJECTED + pred OrderRequest'EXPIRED = OrderRequest'FILLED + pred OrderRequest'MATCHED = OrderRequest'EXPIRED + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderRequest'State where + fieldDefault = OrderRequest'ACTIVE_AT +instance Control.DeepSeq.NFData OrderRequest'State where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.code' @:: Lens' OrderRoute Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'code' @:: Lens' OrderRoute (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.name' @:: Lens' OrderRoute Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'name' @:: Lens' OrderRoute (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.orderId' @:: Lens' OrderRoute Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderId' @:: Lens' OrderRoute (Prelude.Maybe Data.Text.Text)@ -} +data OrderRoute + = OrderRoute'_constructor {_OrderRoute'code :: !(Prelude.Maybe Data.Text.Text), + _OrderRoute'name :: !(Prelude.Maybe Data.Text.Text), + _OrderRoute'orderId :: !(Prelude.Maybe Data.Text.Text), + _OrderRoute'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderRoute where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderRoute "code" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRoute'code (\ x__ y__ -> x__ {_OrderRoute'code = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRoute "maybe'code" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRoute'code (\ x__ y__ -> x__ {_OrderRoute'code = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRoute "name" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRoute'name (\ x__ y__ -> x__ {_OrderRoute'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRoute "maybe'name" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRoute'name (\ x__ y__ -> x__ {_OrderRoute'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderRoute "orderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRoute'orderId (\ x__ y__ -> x__ {_OrderRoute'orderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderRoute "maybe'orderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderRoute'orderId (\ x__ y__ -> x__ {_OrderRoute'orderId = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderRoute where + messageName _ = Data.Text.pack "traderouting_1.OrderRoute" + packedMessageDescriptor _ + = "\n\ + \\n\ + \OrderRoute\DC2\DC2\n\ + \\EOTcode\CAN\SOH \SOH(\tR\EOTcode\DC2\DC2\n\ + \\EOTname\CAN\STX \SOH(\tR\EOTname\DC2\EM\n\ + \\border_id\CAN\ETX \SOH(\tR\aorderId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + code__field_descriptor + = Data.ProtoLens.FieldDescriptor + "code" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'code")) :: + Data.ProtoLens.FieldDescriptor OrderRoute + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor OrderRoute + orderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderId")) :: + Data.ProtoLens.FieldDescriptor OrderRoute + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, code__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, orderId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderRoute'_unknownFields + (\ x__ y__ -> x__ {_OrderRoute'_unknownFields = y__}) + defMessage + = OrderRoute'_constructor + {_OrderRoute'code = Prelude.Nothing, + _OrderRoute'name = Prelude.Nothing, + _OrderRoute'orderId = Prelude.Nothing, + _OrderRoute'_unknownFields = []} + parseMessage + = let + loop :: + OrderRoute -> Data.ProtoLens.Encoding.Bytes.Parser OrderRoute + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "code" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"code") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "name" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"orderId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "OrderRoute" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'code") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'orderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData OrderRoute where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderRoute'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderRoute'code x__) + (Control.DeepSeq.deepseq + (_OrderRoute'name x__) + (Control.DeepSeq.deepseq (_OrderRoute'orderId x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.orderDetailsRequest' @:: Lens' OrderScopeRequest OrderDetailsRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderDetailsRequest' @:: Lens' OrderScopeRequest (Prelude.Maybe OrderDetailsRequest)@ + * 'Proto.CMS.Traderouting1_Fields.addFill' @:: Lens' OrderScopeRequest AddFill@ + * 'Proto.CMS.Traderouting1_Fields.maybe'addFill' @:: Lens' OrderScopeRequest (Prelude.Maybe AddFill)@ + * 'Proto.CMS.Traderouting1_Fields.createExternalOrder' @:: Lens' OrderScopeRequest CreateExternalOrder@ + * 'Proto.CMS.Traderouting1_Fields.maybe'createExternalOrder' @:: Lens' OrderScopeRequest (Prelude.Maybe CreateExternalOrder)@ + * 'Proto.CMS.Traderouting1_Fields.orderSearchRequest' @:: Lens' OrderScopeRequest OrderSearchRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderSearchRequest' @:: Lens' OrderScopeRequest (Prelude.Maybe OrderSearchRequest)@ + * 'Proto.CMS.Traderouting1_Fields.relatedOrderTreeRequest' @:: Lens' OrderScopeRequest RelatedOrderTreeRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'relatedOrderTreeRequest' @:: Lens' OrderScopeRequest (Prelude.Maybe RelatedOrderTreeRequest)@ + * 'Proto.CMS.Traderouting1_Fields.compoundOrderTreeRequest' @:: Lens' OrderScopeRequest CompoundOrderTreeRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'compoundOrderTreeRequest' @:: Lens' OrderScopeRequest (Prelude.Maybe CompoundOrderTreeRequest)@ + * 'Proto.CMS.Traderouting1_Fields.syntheticStrategyTreeRequest' @:: Lens' OrderScopeRequest SyntheticStrategyTreeRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'syntheticStrategyTreeRequest' @:: Lens' OrderScopeRequest (Prelude.Maybe SyntheticStrategyTreeRequest)@ + * 'Proto.CMS.Traderouting1_Fields.cancelOrder' @:: Lens' OrderScopeRequest CancelOrder@ + * 'Proto.CMS.Traderouting1_Fields.maybe'cancelOrder' @:: Lens' OrderScopeRequest (Prelude.Maybe CancelOrder)@ + * 'Proto.CMS.Traderouting1_Fields.reflectAsCanceledOrder' @:: Lens' OrderScopeRequest ReflectAsCanceledOrder@ + * 'Proto.CMS.Traderouting1_Fields.maybe'reflectAsCanceledOrder' @:: Lens' OrderScopeRequest (Prelude.Maybe ReflectAsCanceledOrder)@ + * 'Proto.CMS.Traderouting1_Fields.cancelCompoundOrderTree' @:: Lens' OrderScopeRequest CancelCompoundOrderTree@ + * 'Proto.CMS.Traderouting1_Fields.maybe'cancelCompoundOrderTree' @:: Lens' OrderScopeRequest (Prelude.Maybe CancelCompoundOrderTree)@ + * 'Proto.CMS.Traderouting1_Fields.confirmOrderSentToExchange' @:: Lens' OrderScopeRequest ConfirmOrderSentToExchange@ + * 'Proto.CMS.Traderouting1_Fields.maybe'confirmOrderSentToExchange' @:: Lens' OrderScopeRequest (Prelude.Maybe ConfirmOrderSentToExchange)@ + * 'Proto.CMS.Traderouting1_Fields.activateOrder' @:: Lens' OrderScopeRequest ActivateOrder@ + * 'Proto.CMS.Traderouting1_Fields.maybe'activateOrder' @:: Lens' OrderScopeRequest (Prelude.Maybe ActivateOrder)@ + * 'Proto.CMS.Traderouting1_Fields.correctFill' @:: Lens' OrderScopeRequest CorrectFill@ + * 'Proto.CMS.Traderouting1_Fields.maybe'correctFill' @:: Lens' OrderScopeRequest (Prelude.Maybe CorrectFill)@ + * 'Proto.CMS.Traderouting1_Fields.cancelFill' @:: Lens' OrderScopeRequest CancelFill@ + * 'Proto.CMS.Traderouting1_Fields.maybe'cancelFill' @:: Lens' OrderScopeRequest (Prelude.Maybe CancelFill)@ + * 'Proto.CMS.Traderouting1_Fields.ignoreOrder' @:: Lens' OrderScopeRequest IgnoreOrder@ + * 'Proto.CMS.Traderouting1_Fields.maybe'ignoreOrder' @:: Lens' OrderScopeRequest (Prelude.Maybe IgnoreOrder)@ + * 'Proto.CMS.Traderouting1_Fields.batchOrdersOperation' @:: Lens' OrderScopeRequest Proto.CMS.Order1.BatchOrdersOperation@ + * 'Proto.CMS.Traderouting1_Fields.maybe'batchOrdersOperation' @:: Lens' OrderScopeRequest (Prelude.Maybe Proto.CMS.Order1.BatchOrdersOperation)@ -} +data OrderScopeRequest + = OrderScopeRequest'_constructor {_OrderScopeRequest'orderDetailsRequest :: !(Prelude.Maybe OrderDetailsRequest), + _OrderScopeRequest'addFill :: !(Prelude.Maybe AddFill), + _OrderScopeRequest'createExternalOrder :: !(Prelude.Maybe CreateExternalOrder), + _OrderScopeRequest'orderSearchRequest :: !(Prelude.Maybe OrderSearchRequest), + _OrderScopeRequest'relatedOrderTreeRequest :: !(Prelude.Maybe RelatedOrderTreeRequest), + _OrderScopeRequest'compoundOrderTreeRequest :: !(Prelude.Maybe CompoundOrderTreeRequest), + _OrderScopeRequest'syntheticStrategyTreeRequest :: !(Prelude.Maybe SyntheticStrategyTreeRequest), + _OrderScopeRequest'cancelOrder :: !(Prelude.Maybe CancelOrder), + _OrderScopeRequest'reflectAsCanceledOrder :: !(Prelude.Maybe ReflectAsCanceledOrder), + _OrderScopeRequest'cancelCompoundOrderTree :: !(Prelude.Maybe CancelCompoundOrderTree), + _OrderScopeRequest'confirmOrderSentToExchange :: !(Prelude.Maybe ConfirmOrderSentToExchange), + _OrderScopeRequest'activateOrder :: !(Prelude.Maybe ActivateOrder), + _OrderScopeRequest'correctFill :: !(Prelude.Maybe CorrectFill), + _OrderScopeRequest'cancelFill :: !(Prelude.Maybe CancelFill), + _OrderScopeRequest'ignoreOrder :: !(Prelude.Maybe IgnoreOrder), + _OrderScopeRequest'batchOrdersOperation :: !(Prelude.Maybe Proto.CMS.Order1.BatchOrdersOperation), + _OrderScopeRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderScopeRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "orderDetailsRequest" OrderDetailsRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'orderDetailsRequest + (\ x__ y__ -> x__ {_OrderScopeRequest'orderDetailsRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'orderDetailsRequest" (Prelude.Maybe OrderDetailsRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'orderDetailsRequest + (\ x__ y__ -> x__ {_OrderScopeRequest'orderDetailsRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "addFill" AddFill where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'addFill + (\ x__ y__ -> x__ {_OrderScopeRequest'addFill = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'addFill" (Prelude.Maybe AddFill) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'addFill + (\ x__ y__ -> x__ {_OrderScopeRequest'addFill = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "createExternalOrder" CreateExternalOrder where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'createExternalOrder + (\ x__ y__ -> x__ {_OrderScopeRequest'createExternalOrder = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'createExternalOrder" (Prelude.Maybe CreateExternalOrder) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'createExternalOrder + (\ x__ y__ -> x__ {_OrderScopeRequest'createExternalOrder = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "orderSearchRequest" OrderSearchRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'orderSearchRequest + (\ x__ y__ -> x__ {_OrderScopeRequest'orderSearchRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'orderSearchRequest" (Prelude.Maybe OrderSearchRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'orderSearchRequest + (\ x__ y__ -> x__ {_OrderScopeRequest'orderSearchRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "relatedOrderTreeRequest" RelatedOrderTreeRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'relatedOrderTreeRequest + (\ x__ y__ + -> x__ {_OrderScopeRequest'relatedOrderTreeRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'relatedOrderTreeRequest" (Prelude.Maybe RelatedOrderTreeRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'relatedOrderTreeRequest + (\ x__ y__ + -> x__ {_OrderScopeRequest'relatedOrderTreeRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "compoundOrderTreeRequest" CompoundOrderTreeRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'compoundOrderTreeRequest + (\ x__ y__ + -> x__ {_OrderScopeRequest'compoundOrderTreeRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'compoundOrderTreeRequest" (Prelude.Maybe CompoundOrderTreeRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'compoundOrderTreeRequest + (\ x__ y__ + -> x__ {_OrderScopeRequest'compoundOrderTreeRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "syntheticStrategyTreeRequest" SyntheticStrategyTreeRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'syntheticStrategyTreeRequest + (\ x__ y__ + -> x__ {_OrderScopeRequest'syntheticStrategyTreeRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'syntheticStrategyTreeRequest" (Prelude.Maybe SyntheticStrategyTreeRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'syntheticStrategyTreeRequest + (\ x__ y__ + -> x__ {_OrderScopeRequest'syntheticStrategyTreeRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "cancelOrder" CancelOrder where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'cancelOrder + (\ x__ y__ -> x__ {_OrderScopeRequest'cancelOrder = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'cancelOrder" (Prelude.Maybe CancelOrder) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'cancelOrder + (\ x__ y__ -> x__ {_OrderScopeRequest'cancelOrder = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "reflectAsCanceledOrder" ReflectAsCanceledOrder where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'reflectAsCanceledOrder + (\ x__ y__ + -> x__ {_OrderScopeRequest'reflectAsCanceledOrder = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'reflectAsCanceledOrder" (Prelude.Maybe ReflectAsCanceledOrder) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'reflectAsCanceledOrder + (\ x__ y__ + -> x__ {_OrderScopeRequest'reflectAsCanceledOrder = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "cancelCompoundOrderTree" CancelCompoundOrderTree where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'cancelCompoundOrderTree + (\ x__ y__ + -> x__ {_OrderScopeRequest'cancelCompoundOrderTree = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'cancelCompoundOrderTree" (Prelude.Maybe CancelCompoundOrderTree) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'cancelCompoundOrderTree + (\ x__ y__ + -> x__ {_OrderScopeRequest'cancelCompoundOrderTree = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "confirmOrderSentToExchange" ConfirmOrderSentToExchange where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'confirmOrderSentToExchange + (\ x__ y__ + -> x__ {_OrderScopeRequest'confirmOrderSentToExchange = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'confirmOrderSentToExchange" (Prelude.Maybe ConfirmOrderSentToExchange) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'confirmOrderSentToExchange + (\ x__ y__ + -> x__ {_OrderScopeRequest'confirmOrderSentToExchange = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "activateOrder" ActivateOrder where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'activateOrder + (\ x__ y__ -> x__ {_OrderScopeRequest'activateOrder = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'activateOrder" (Prelude.Maybe ActivateOrder) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'activateOrder + (\ x__ y__ -> x__ {_OrderScopeRequest'activateOrder = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "correctFill" CorrectFill where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'correctFill + (\ x__ y__ -> x__ {_OrderScopeRequest'correctFill = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'correctFill" (Prelude.Maybe CorrectFill) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'correctFill + (\ x__ y__ -> x__ {_OrderScopeRequest'correctFill = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "cancelFill" CancelFill where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'cancelFill + (\ x__ y__ -> x__ {_OrderScopeRequest'cancelFill = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'cancelFill" (Prelude.Maybe CancelFill) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'cancelFill + (\ x__ y__ -> x__ {_OrderScopeRequest'cancelFill = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "ignoreOrder" IgnoreOrder where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'ignoreOrder + (\ x__ y__ -> x__ {_OrderScopeRequest'ignoreOrder = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'ignoreOrder" (Prelude.Maybe IgnoreOrder) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'ignoreOrder + (\ x__ y__ -> x__ {_OrderScopeRequest'ignoreOrder = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeRequest "batchOrdersOperation" Proto.CMS.Order1.BatchOrdersOperation where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'batchOrdersOperation + (\ x__ y__ -> x__ {_OrderScopeRequest'batchOrdersOperation = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeRequest "maybe'batchOrdersOperation" (Prelude.Maybe Proto.CMS.Order1.BatchOrdersOperation) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeRequest'batchOrdersOperation + (\ x__ y__ -> x__ {_OrderScopeRequest'batchOrdersOperation = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderScopeRequest where + messageName _ = Data.Text.pack "traderouting_1.OrderScopeRequest" + packedMessageDescriptor _ + = "\n\ + \\DC1OrderScopeRequest\DC2W\n\ + \\NAKorder_details_request\CAN\SOH \SOH(\v2#.traderouting_1.OrderDetailsRequestR\DC3orderDetailsRequest\DC22\n\ + \\badd_fill\CAN\STX \SOH(\v2\ETB.traderouting_1.AddFillR\aaddFill\DC2W\n\ + \\NAKcreate_external_order\CAN\ETX \SOH(\v2#.traderouting_1.CreateExternalOrderR\DC3createExternalOrder\DC2T\n\ + \\DC4order_search_request\CAN\EOT \SOH(\v2\".traderouting_1.OrderSearchRequestR\DC2orderSearchRequest\DC2d\n\ + \\SUBrelated_order_tree_request\CAN\ENQ \SOH(\v2'.traderouting_1.RelatedOrderTreeRequestR\ETBrelatedOrderTreeRequest\DC2g\n\ + \\ESCcompound_order_tree_request\CAN\ACK \SOH(\v2(.traderouting_1.CompoundOrderTreeRequestR\CANcompoundOrderTreeRequest\DC2s\n\ + \\USsynthetic_strategy_tree_request\CAN\a \SOH(\v2,.traderouting_1.SyntheticStrategyTreeRequestR\FSsyntheticStrategyTreeRequest\DC2>\n\ + \\fcancel_order\CAN\b \SOH(\v2\ESC.traderouting_1.CancelOrderR\vcancelOrder\DC2a\n\ + \\EMreflect_as_canceled_order\CAN\t \SOH(\v2&.traderouting_1.ReflectAsCanceledOrderR\SYNreflectAsCanceledOrder\DC2d\n\ + \\SUBcancel_compound_order_tree\CAN\n\ + \ \SOH(\v2'.traderouting_1.CancelCompoundOrderTreeR\ETBcancelCompoundOrderTree\DC2n\n\ + \\RSconfirm_order_sent_to_exchange\CAN\v \SOH(\v2*.traderouting_1.ConfirmOrderSentToExchangeR\SUBconfirmOrderSentToExchange\DC2D\n\ + \\SOactivate_order\CAN\f \SOH(\v2\GS.traderouting_1.ActivateOrderR\ractivateOrder\DC2>\n\ + \\fcorrect_fill\CAN\r \SOH(\v2\ESC.traderouting_1.CorrectFillR\vcorrectFill\DC2;\n\ + \\vcancel_fill\CAN\SO \SOH(\v2\SUB.traderouting_1.CancelFillR\n\ + \cancelFill\DC2>\n\ + \\fignore_order\CAN\SI \SOH(\v2\ESC.traderouting_1.IgnoreOrderR\vignoreOrder\DC2S\n\ + \\SYNbatch_orders_operation\CAN\DLE \SOH(\v2\GS.order_1.BatchOrdersOperationR\DC4batchOrdersOperation" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + orderDetailsRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_details_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderDetailsRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderDetailsRequest")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + addFill__field_descriptor + = Data.ProtoLens.FieldDescriptor + "add_fill" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AddFill) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'addFill")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + createExternalOrder__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_external_order" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateExternalOrder) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createExternalOrder")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + orderSearchRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_search_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderSearchRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderSearchRequest")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + relatedOrderTreeRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "related_order_tree_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RelatedOrderTreeRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'relatedOrderTreeRequest")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + compoundOrderTreeRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "compound_order_tree_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CompoundOrderTreeRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'compoundOrderTreeRequest")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + syntheticStrategyTreeRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "synthetic_strategy_tree_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SyntheticStrategyTreeRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'syntheticStrategyTreeRequest")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + cancelOrder__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cancel_order" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CancelOrder) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cancelOrder")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + reflectAsCanceledOrder__field_descriptor + = Data.ProtoLens.FieldDescriptor + "reflect_as_canceled_order" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ReflectAsCanceledOrder) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'reflectAsCanceledOrder")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + cancelCompoundOrderTree__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cancel_compound_order_tree" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CancelCompoundOrderTree) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cancelCompoundOrderTree")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + confirmOrderSentToExchange__field_descriptor + = Data.ProtoLens.FieldDescriptor + "confirm_order_sent_to_exchange" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ConfirmOrderSentToExchange) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'confirmOrderSentToExchange")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + activateOrder__field_descriptor + = Data.ProtoLens.FieldDescriptor + "activate_order" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ActivateOrder) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'activateOrder")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + correctFill__field_descriptor + = Data.ProtoLens.FieldDescriptor + "correct_fill" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CorrectFill) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'correctFill")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + cancelFill__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cancel_fill" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CancelFill) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cancelFill")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + ignoreOrder__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ignore_order" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor IgnoreOrder) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'ignoreOrder")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + batchOrdersOperation__field_descriptor + = Data.ProtoLens.FieldDescriptor + "batch_orders_operation" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Order1.BatchOrdersOperation) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'batchOrdersOperation")) :: + Data.ProtoLens.FieldDescriptor OrderScopeRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, orderDetailsRequest__field_descriptor), + (Data.ProtoLens.Tag 2, addFill__field_descriptor), + (Data.ProtoLens.Tag 3, createExternalOrder__field_descriptor), + (Data.ProtoLens.Tag 4, orderSearchRequest__field_descriptor), + (Data.ProtoLens.Tag 5, relatedOrderTreeRequest__field_descriptor), + (Data.ProtoLens.Tag 6, compoundOrderTreeRequest__field_descriptor), + (Data.ProtoLens.Tag 7, + syntheticStrategyTreeRequest__field_descriptor), + (Data.ProtoLens.Tag 8, cancelOrder__field_descriptor), + (Data.ProtoLens.Tag 9, reflectAsCanceledOrder__field_descriptor), + (Data.ProtoLens.Tag 10, cancelCompoundOrderTree__field_descriptor), + (Data.ProtoLens.Tag 11, + confirmOrderSentToExchange__field_descriptor), + (Data.ProtoLens.Tag 12, activateOrder__field_descriptor), + (Data.ProtoLens.Tag 13, correctFill__field_descriptor), + (Data.ProtoLens.Tag 14, cancelFill__field_descriptor), + (Data.ProtoLens.Tag 15, ignoreOrder__field_descriptor), + (Data.ProtoLens.Tag 16, batchOrdersOperation__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderScopeRequest'_unknownFields + (\ x__ y__ -> x__ {_OrderScopeRequest'_unknownFields = y__}) + defMessage + = OrderScopeRequest'_constructor + {_OrderScopeRequest'orderDetailsRequest = Prelude.Nothing, + _OrderScopeRequest'addFill = Prelude.Nothing, + _OrderScopeRequest'createExternalOrder = Prelude.Nothing, + _OrderScopeRequest'orderSearchRequest = Prelude.Nothing, + _OrderScopeRequest'relatedOrderTreeRequest = Prelude.Nothing, + _OrderScopeRequest'compoundOrderTreeRequest = Prelude.Nothing, + _OrderScopeRequest'syntheticStrategyTreeRequest = Prelude.Nothing, + _OrderScopeRequest'cancelOrder = Prelude.Nothing, + _OrderScopeRequest'reflectAsCanceledOrder = Prelude.Nothing, + _OrderScopeRequest'cancelCompoundOrderTree = Prelude.Nothing, + _OrderScopeRequest'confirmOrderSentToExchange = Prelude.Nothing, + _OrderScopeRequest'activateOrder = Prelude.Nothing, + _OrderScopeRequest'correctFill = Prelude.Nothing, + _OrderScopeRequest'cancelFill = Prelude.Nothing, + _OrderScopeRequest'ignoreOrder = Prelude.Nothing, + _OrderScopeRequest'batchOrdersOperation = Prelude.Nothing, + _OrderScopeRequest'_unknownFields = []} + parseMessage + = let + loop :: + OrderScopeRequest + -> Data.ProtoLens.Encoding.Bytes.Parser OrderScopeRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "order_details_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderDetailsRequest") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "add_fill" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"addFill") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_external_order" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"createExternalOrder") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "order_search_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderSearchRequest") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "related_order_tree_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"relatedOrderTreeRequest") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "compound_order_tree_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"compoundOrderTreeRequest") y x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "synthetic_strategy_tree_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"syntheticStrategyTreeRequest") y + x) + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "cancel_order" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"cancelOrder") y x) + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "reflect_as_canceled_order" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"reflectAsCanceledOrder") y x) + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "cancel_compound_order_tree" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"cancelCompoundOrderTree") y x) + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "confirm_order_sent_to_exchange" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"confirmOrderSentToExchange") y x) + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "activate_order" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"activateOrder") y x) + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "correct_fill" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"correctFill") y x) + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "cancel_fill" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"cancelFill") y x) + 122 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "ignore_order" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"ignoreOrder") y x) + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "batch_orders_operation" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"batchOrdersOperation") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "OrderScopeRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderDetailsRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'addFill") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'createExternalOrder") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderSearchRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'relatedOrderTreeRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'compoundOrderTreeRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'syntheticStrategyTreeRequest") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'cancelOrder") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'reflectAsCanceledOrder") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'cancelCompoundOrderTree") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'confirmOrderSentToExchange") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'activateOrder") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'correctFill") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'cancelFill") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'ignoreOrder") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'batchOrdersOperation") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))))) +instance Control.DeepSeq.NFData OrderScopeRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderScopeRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'orderDetailsRequest x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'addFill x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'createExternalOrder x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'orderSearchRequest x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'relatedOrderTreeRequest x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'compoundOrderTreeRequest x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'syntheticStrategyTreeRequest x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'cancelOrder x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'reflectAsCanceledOrder x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'cancelCompoundOrderTree x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'confirmOrderSentToExchange x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'activateOrder x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'correctFill x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'cancelFill x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'ignoreOrder x__) + (Control.DeepSeq.deepseq + (_OrderScopeRequest'batchOrdersOperation + x__) + ())))))))))))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.orderDetailsResult' @:: Lens' OrderScopeResult OrderDetailsResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderDetailsResult' @:: Lens' OrderScopeResult (Prelude.Maybe OrderDetailsResult)@ + * 'Proto.CMS.Traderouting1_Fields.addFillResult' @:: Lens' OrderScopeResult AddFillResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'addFillResult' @:: Lens' OrderScopeResult (Prelude.Maybe AddFillResult)@ + * 'Proto.CMS.Traderouting1_Fields.createExternalOrderResult' @:: Lens' OrderScopeResult CreateExternalOrderResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'createExternalOrderResult' @:: Lens' OrderScopeResult (Prelude.Maybe CreateExternalOrderResult)@ + * 'Proto.CMS.Traderouting1_Fields.orderSearchResult' @:: Lens' OrderScopeResult OrderSearchResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderSearchResult' @:: Lens' OrderScopeResult (Prelude.Maybe OrderSearchResult)@ + * 'Proto.CMS.Traderouting1_Fields.relatedOrderTreeResult' @:: Lens' OrderScopeResult RelatedOrderTreeResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'relatedOrderTreeResult' @:: Lens' OrderScopeResult (Prelude.Maybe RelatedOrderTreeResult)@ + * 'Proto.CMS.Traderouting1_Fields.compoundOrderTreeResult' @:: Lens' OrderScopeResult CompoundOrderTreeResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'compoundOrderTreeResult' @:: Lens' OrderScopeResult (Prelude.Maybe CompoundOrderTreeResult)@ + * 'Proto.CMS.Traderouting1_Fields.syntheticStrategyTreeResult' @:: Lens' OrderScopeResult SyntheticStrategyTreeResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'syntheticStrategyTreeResult' @:: Lens' OrderScopeResult (Prelude.Maybe SyntheticStrategyTreeResult)@ + * 'Proto.CMS.Traderouting1_Fields.cancelOrderResult' @:: Lens' OrderScopeResult CancelOrderResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'cancelOrderResult' @:: Lens' OrderScopeResult (Prelude.Maybe CancelOrderResult)@ + * 'Proto.CMS.Traderouting1_Fields.reflectAsCanceledOrderResult' @:: Lens' OrderScopeResult ReflectAsCanceledOrderResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'reflectAsCanceledOrderResult' @:: Lens' OrderScopeResult (Prelude.Maybe ReflectAsCanceledOrderResult)@ + * 'Proto.CMS.Traderouting1_Fields.cancelCompoundOrderTreeResult' @:: Lens' OrderScopeResult CancelCompoundOrderTreeResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'cancelCompoundOrderTreeResult' @:: Lens' OrderScopeResult (Prelude.Maybe CancelCompoundOrderTreeResult)@ + * 'Proto.CMS.Traderouting1_Fields.batchOrdersOperationResult' @:: Lens' OrderScopeResult Proto.CMS.Order1.BatchOrdersOperationResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'batchOrdersOperationResult' @:: Lens' OrderScopeResult (Prelude.Maybe Proto.CMS.Order1.BatchOrdersOperationResult)@ -} +data OrderScopeResult + = OrderScopeResult'_constructor {_OrderScopeResult'orderDetailsResult :: !(Prelude.Maybe OrderDetailsResult), + _OrderScopeResult'addFillResult :: !(Prelude.Maybe AddFillResult), + _OrderScopeResult'createExternalOrderResult :: !(Prelude.Maybe CreateExternalOrderResult), + _OrderScopeResult'orderSearchResult :: !(Prelude.Maybe OrderSearchResult), + _OrderScopeResult'relatedOrderTreeResult :: !(Prelude.Maybe RelatedOrderTreeResult), + _OrderScopeResult'compoundOrderTreeResult :: !(Prelude.Maybe CompoundOrderTreeResult), + _OrderScopeResult'syntheticStrategyTreeResult :: !(Prelude.Maybe SyntheticStrategyTreeResult), + _OrderScopeResult'cancelOrderResult :: !(Prelude.Maybe CancelOrderResult), + _OrderScopeResult'reflectAsCanceledOrderResult :: !(Prelude.Maybe ReflectAsCanceledOrderResult), + _OrderScopeResult'cancelCompoundOrderTreeResult :: !(Prelude.Maybe CancelCompoundOrderTreeResult), + _OrderScopeResult'batchOrdersOperationResult :: !(Prelude.Maybe Proto.CMS.Order1.BatchOrdersOperationResult), + _OrderScopeResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderScopeResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderScopeResult "orderDetailsResult" OrderDetailsResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'orderDetailsResult + (\ x__ y__ -> x__ {_OrderScopeResult'orderDetailsResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeResult "maybe'orderDetailsResult" (Prelude.Maybe OrderDetailsResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'orderDetailsResult + (\ x__ y__ -> x__ {_OrderScopeResult'orderDetailsResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeResult "addFillResult" AddFillResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'addFillResult + (\ x__ y__ -> x__ {_OrderScopeResult'addFillResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeResult "maybe'addFillResult" (Prelude.Maybe AddFillResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'addFillResult + (\ x__ y__ -> x__ {_OrderScopeResult'addFillResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeResult "createExternalOrderResult" CreateExternalOrderResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'createExternalOrderResult + (\ x__ y__ + -> x__ {_OrderScopeResult'createExternalOrderResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeResult "maybe'createExternalOrderResult" (Prelude.Maybe CreateExternalOrderResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'createExternalOrderResult + (\ x__ y__ + -> x__ {_OrderScopeResult'createExternalOrderResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeResult "orderSearchResult" OrderSearchResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'orderSearchResult + (\ x__ y__ -> x__ {_OrderScopeResult'orderSearchResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeResult "maybe'orderSearchResult" (Prelude.Maybe OrderSearchResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'orderSearchResult + (\ x__ y__ -> x__ {_OrderScopeResult'orderSearchResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeResult "relatedOrderTreeResult" RelatedOrderTreeResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'relatedOrderTreeResult + (\ x__ y__ + -> x__ {_OrderScopeResult'relatedOrderTreeResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeResult "maybe'relatedOrderTreeResult" (Prelude.Maybe RelatedOrderTreeResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'relatedOrderTreeResult + (\ x__ y__ + -> x__ {_OrderScopeResult'relatedOrderTreeResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeResult "compoundOrderTreeResult" CompoundOrderTreeResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'compoundOrderTreeResult + (\ x__ y__ + -> x__ {_OrderScopeResult'compoundOrderTreeResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeResult "maybe'compoundOrderTreeResult" (Prelude.Maybe CompoundOrderTreeResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'compoundOrderTreeResult + (\ x__ y__ + -> x__ {_OrderScopeResult'compoundOrderTreeResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeResult "syntheticStrategyTreeResult" SyntheticStrategyTreeResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'syntheticStrategyTreeResult + (\ x__ y__ + -> x__ {_OrderScopeResult'syntheticStrategyTreeResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeResult "maybe'syntheticStrategyTreeResult" (Prelude.Maybe SyntheticStrategyTreeResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'syntheticStrategyTreeResult + (\ x__ y__ + -> x__ {_OrderScopeResult'syntheticStrategyTreeResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeResult "cancelOrderResult" CancelOrderResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'cancelOrderResult + (\ x__ y__ -> x__ {_OrderScopeResult'cancelOrderResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeResult "maybe'cancelOrderResult" (Prelude.Maybe CancelOrderResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'cancelOrderResult + (\ x__ y__ -> x__ {_OrderScopeResult'cancelOrderResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeResult "reflectAsCanceledOrderResult" ReflectAsCanceledOrderResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'reflectAsCanceledOrderResult + (\ x__ y__ + -> x__ {_OrderScopeResult'reflectAsCanceledOrderResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeResult "maybe'reflectAsCanceledOrderResult" (Prelude.Maybe ReflectAsCanceledOrderResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'reflectAsCanceledOrderResult + (\ x__ y__ + -> x__ {_OrderScopeResult'reflectAsCanceledOrderResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeResult "cancelCompoundOrderTreeResult" CancelCompoundOrderTreeResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'cancelCompoundOrderTreeResult + (\ x__ y__ + -> x__ {_OrderScopeResult'cancelCompoundOrderTreeResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeResult "maybe'cancelCompoundOrderTreeResult" (Prelude.Maybe CancelCompoundOrderTreeResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'cancelCompoundOrderTreeResult + (\ x__ y__ + -> x__ {_OrderScopeResult'cancelCompoundOrderTreeResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderScopeResult "batchOrdersOperationResult" Proto.CMS.Order1.BatchOrdersOperationResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'batchOrdersOperationResult + (\ x__ y__ + -> x__ {_OrderScopeResult'batchOrdersOperationResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderScopeResult "maybe'batchOrdersOperationResult" (Prelude.Maybe Proto.CMS.Order1.BatchOrdersOperationResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderScopeResult'batchOrdersOperationResult + (\ x__ y__ + -> x__ {_OrderScopeResult'batchOrdersOperationResult = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderScopeResult where + messageName _ = Data.Text.pack "traderouting_1.OrderScopeResult" + packedMessageDescriptor _ + = "\n\ + \\DLEOrderScopeResult\DC2T\n\ + \\DC4order_details_result\CAN\SOH \SOH(\v2\".traderouting_1.OrderDetailsResultR\DC2orderDetailsResult\DC2E\n\ + \\SIadd_fill_result\CAN\STX \SOH(\v2\GS.traderouting_1.AddFillResultR\raddFillResult\DC2j\n\ + \\FScreate_external_order_result\CAN\ETX \SOH(\v2).traderouting_1.CreateExternalOrderResultR\EMcreateExternalOrderResult\DC2Q\n\ + \\DC3order_search_result\CAN\EOT \SOH(\v2!.traderouting_1.OrderSearchResultR\DC1orderSearchResult\DC2a\n\ + \\EMrelated_order_tree_result\CAN\ENQ \SOH(\v2&.traderouting_1.RelatedOrderTreeResultR\SYNrelatedOrderTreeResult\DC2d\n\ + \\SUBcompound_order_tree_result\CAN\ACK \SOH(\v2'.traderouting_1.CompoundOrderTreeResultR\ETBcompoundOrderTreeResult\DC2p\n\ + \\RSsynthetic_strategy_tree_result\CAN\a \SOH(\v2+.traderouting_1.SyntheticStrategyTreeResultR\ESCsyntheticStrategyTreeResult\DC2Q\n\ + \\DC3cancel_order_result\CAN\b \SOH(\v2!.traderouting_1.CancelOrderResultR\DC1cancelOrderResult\DC2t\n\ + \ reflect_as_canceled_order_result\CAN\t \SOH(\v2,.traderouting_1.ReflectAsCanceledOrderResultR\FSreflectAsCanceledOrderResult\DC2w\n\ + \!cancel_compound_order_tree_result\CAN\n\ + \ \SOH(\v2-.traderouting_1.CancelCompoundOrderTreeResultR\GScancelCompoundOrderTreeResult\DC2f\n\ + \\GSbatch_orders_operation_result\CAN\v \SOH(\v2#.order_1.BatchOrdersOperationResultR\SUBbatchOrdersOperationResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + orderDetailsResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_details_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderDetailsResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderDetailsResult")) :: + Data.ProtoLens.FieldDescriptor OrderScopeResult + addFillResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "add_fill_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AddFillResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'addFillResult")) :: + Data.ProtoLens.FieldDescriptor OrderScopeResult + createExternalOrderResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "create_external_order_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CreateExternalOrderResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'createExternalOrderResult")) :: + Data.ProtoLens.FieldDescriptor OrderScopeResult + orderSearchResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_search_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderSearchResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderSearchResult")) :: + Data.ProtoLens.FieldDescriptor OrderScopeResult + relatedOrderTreeResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "related_order_tree_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RelatedOrderTreeResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'relatedOrderTreeResult")) :: + Data.ProtoLens.FieldDescriptor OrderScopeResult + compoundOrderTreeResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "compound_order_tree_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CompoundOrderTreeResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'compoundOrderTreeResult")) :: + Data.ProtoLens.FieldDescriptor OrderScopeResult + syntheticStrategyTreeResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "synthetic_strategy_tree_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SyntheticStrategyTreeResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'syntheticStrategyTreeResult")) :: + Data.ProtoLens.FieldDescriptor OrderScopeResult + cancelOrderResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cancel_order_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CancelOrderResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'cancelOrderResult")) :: + Data.ProtoLens.FieldDescriptor OrderScopeResult + reflectAsCanceledOrderResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "reflect_as_canceled_order_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ReflectAsCanceledOrderResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'reflectAsCanceledOrderResult")) :: + Data.ProtoLens.FieldDescriptor OrderScopeResult + cancelCompoundOrderTreeResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cancel_compound_order_tree_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor CancelCompoundOrderTreeResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'cancelCompoundOrderTreeResult")) :: + Data.ProtoLens.FieldDescriptor OrderScopeResult + batchOrdersOperationResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "batch_orders_operation_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Order1.BatchOrdersOperationResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'batchOrdersOperationResult")) :: + Data.ProtoLens.FieldDescriptor OrderScopeResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, orderDetailsResult__field_descriptor), + (Data.ProtoLens.Tag 2, addFillResult__field_descriptor), + (Data.ProtoLens.Tag 3, + createExternalOrderResult__field_descriptor), + (Data.ProtoLens.Tag 4, orderSearchResult__field_descriptor), + (Data.ProtoLens.Tag 5, relatedOrderTreeResult__field_descriptor), + (Data.ProtoLens.Tag 6, compoundOrderTreeResult__field_descriptor), + (Data.ProtoLens.Tag 7, + syntheticStrategyTreeResult__field_descriptor), + (Data.ProtoLens.Tag 8, cancelOrderResult__field_descriptor), + (Data.ProtoLens.Tag 9, + reflectAsCanceledOrderResult__field_descriptor), + (Data.ProtoLens.Tag 10, + cancelCompoundOrderTreeResult__field_descriptor), + (Data.ProtoLens.Tag 11, + batchOrdersOperationResult__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderScopeResult'_unknownFields + (\ x__ y__ -> x__ {_OrderScopeResult'_unknownFields = y__}) + defMessage + = OrderScopeResult'_constructor + {_OrderScopeResult'orderDetailsResult = Prelude.Nothing, + _OrderScopeResult'addFillResult = Prelude.Nothing, + _OrderScopeResult'createExternalOrderResult = Prelude.Nothing, + _OrderScopeResult'orderSearchResult = Prelude.Nothing, + _OrderScopeResult'relatedOrderTreeResult = Prelude.Nothing, + _OrderScopeResult'compoundOrderTreeResult = Prelude.Nothing, + _OrderScopeResult'syntheticStrategyTreeResult = Prelude.Nothing, + _OrderScopeResult'cancelOrderResult = Prelude.Nothing, + _OrderScopeResult'reflectAsCanceledOrderResult = Prelude.Nothing, + _OrderScopeResult'cancelCompoundOrderTreeResult = Prelude.Nothing, + _OrderScopeResult'batchOrdersOperationResult = Prelude.Nothing, + _OrderScopeResult'_unknownFields = []} + parseMessage + = let + loop :: + OrderScopeResult + -> Data.ProtoLens.Encoding.Bytes.Parser OrderScopeResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "order_details_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderDetailsResult") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "add_fill_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"addFillResult") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "create_external_order_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"createExternalOrderResult") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "order_search_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderSearchResult") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "related_order_tree_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"relatedOrderTreeResult") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "compound_order_tree_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"compoundOrderTreeResult") y x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "synthetic_strategy_tree_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"syntheticStrategyTreeResult") y + x) + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "cancel_order_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"cancelOrderResult") y x) + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "reflect_as_canceled_order_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"reflectAsCanceledOrderResult") y + x) + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "cancel_compound_order_tree_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"cancelCompoundOrderTreeResult") y + x) + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "batch_orders_operation_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"batchOrdersOperationResult") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "OrderScopeResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderDetailsResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'addFillResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'createExternalOrderResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderSearchResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'relatedOrderTreeResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'compoundOrderTreeResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'syntheticStrategyTreeResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'cancelOrderResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'reflectAsCanceledOrderResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'cancelCompoundOrderTreeResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'batchOrdersOperationResult") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x)))))))))))) +instance Control.DeepSeq.NFData OrderScopeResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderScopeResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderScopeResult'orderDetailsResult x__) + (Control.DeepSeq.deepseq + (_OrderScopeResult'addFillResult x__) + (Control.DeepSeq.deepseq + (_OrderScopeResult'createExternalOrderResult x__) + (Control.DeepSeq.deepseq + (_OrderScopeResult'orderSearchResult x__) + (Control.DeepSeq.deepseq + (_OrderScopeResult'relatedOrderTreeResult x__) + (Control.DeepSeq.deepseq + (_OrderScopeResult'compoundOrderTreeResult x__) + (Control.DeepSeq.deepseq + (_OrderScopeResult'syntheticStrategyTreeResult x__) + (Control.DeepSeq.deepseq + (_OrderScopeResult'cancelOrderResult x__) + (Control.DeepSeq.deepseq + (_OrderScopeResult'reflectAsCanceledOrderResult x__) + (Control.DeepSeq.deepseq + (_OrderScopeResult'cancelCompoundOrderTreeResult x__) + (Control.DeepSeq.deepseq + (_OrderScopeResult'batchOrdersOperationResult x__) + ()))))))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.obsoleteText' @:: Lens' OrderSearchRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteText' @:: Lens' OrderSearchRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteSearchCriteria' @:: Lens' OrderSearchRequest [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'obsoleteSearchCriteria' @:: Lens' OrderSearchRequest (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.top' @:: Lens' OrderSearchRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'top' @:: Lens' OrderSearchRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' OrderSearchRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' OrderSearchRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.archived' @:: Lens' OrderSearchRequest Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'archived' @:: Lens' OrderSearchRequest (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.searchOptions' @:: Lens' OrderSearchRequest [Proto.CMS.Common1.SearchOption]@ + * 'Proto.CMS.Traderouting1_Fields.vec'searchOptions' @:: Lens' OrderSearchRequest (Data.Vector.Vector Proto.CMS.Common1.SearchOption)@ + * 'Proto.CMS.Traderouting1_Fields.allMatchMode' @:: Lens' OrderSearchRequest Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allMatchMode' @:: Lens' OrderSearchRequest (Prelude.Maybe Prelude.Bool)@ -} +data OrderSearchRequest + = OrderSearchRequest'_constructor {_OrderSearchRequest'obsoleteText :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchRequest'obsoleteSearchCriteria :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _OrderSearchRequest'top :: !(Prelude.Maybe Data.Word.Word32), + _OrderSearchRequest'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchRequest'archived :: !(Prelude.Maybe Prelude.Bool), + _OrderSearchRequest'searchOptions :: !(Data.Vector.Vector Proto.CMS.Common1.SearchOption), + _OrderSearchRequest'allMatchMode :: !(Prelude.Maybe Prelude.Bool), + _OrderSearchRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderSearchRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderSearchRequest "obsoleteText" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'obsoleteText + (\ x__ y__ -> x__ {_OrderSearchRequest'obsoleteText = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchRequest "maybe'obsoleteText" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'obsoleteText + (\ x__ y__ -> x__ {_OrderSearchRequest'obsoleteText = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchRequest "obsoleteSearchCriteria" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'obsoleteSearchCriteria + (\ x__ y__ + -> x__ {_OrderSearchRequest'obsoleteSearchCriteria = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderSearchRequest "vec'obsoleteSearchCriteria" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'obsoleteSearchCriteria + (\ x__ y__ + -> x__ {_OrderSearchRequest'obsoleteSearchCriteria = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchRequest "top" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'top + (\ x__ y__ -> x__ {_OrderSearchRequest'top = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchRequest "maybe'top" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'top + (\ x__ y__ -> x__ {_OrderSearchRequest'top = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchRequest "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'tradeLocationId + (\ x__ y__ -> x__ {_OrderSearchRequest'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchRequest "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'tradeLocationId + (\ x__ y__ -> x__ {_OrderSearchRequest'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchRequest "archived" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'archived + (\ x__ y__ -> x__ {_OrderSearchRequest'archived = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchRequest "maybe'archived" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'archived + (\ x__ y__ -> x__ {_OrderSearchRequest'archived = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchRequest "searchOptions" [Proto.CMS.Common1.SearchOption] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'searchOptions + (\ x__ y__ -> x__ {_OrderSearchRequest'searchOptions = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderSearchRequest "vec'searchOptions" (Data.Vector.Vector Proto.CMS.Common1.SearchOption) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'searchOptions + (\ x__ y__ -> x__ {_OrderSearchRequest'searchOptions = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchRequest "allMatchMode" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_OrderSearchRequest'allMatchMode = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField OrderSearchRequest "maybe'allMatchMode" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchRequest'allMatchMode + (\ x__ y__ -> x__ {_OrderSearchRequest'allMatchMode = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderSearchRequest where + messageName _ = Data.Text.pack "traderouting_1.OrderSearchRequest" + packedMessageDescriptor _ + = "\n\ + \\DC2OrderSearchRequest\DC2'\n\ + \\robsolete_text\CAN\SOH \SOH(\tR\fobsoleteTextB\STX\CAN\SOH\DC2<\n\ + \\CANobsolete_search_criteria\CAN\STX \ETX(\rR\SYNobsoleteSearchCriteriaB\STX\CAN\SOH\DC2\DLE\n\ + \\ETXtop\CAN\ETX \SOH(\rR\ETXtop\DC2*\n\ + \\DC1trade_location_id\CAN\EOT \SOH(\tR\SItradeLocationId\DC2\SUB\n\ + \\barchived\CAN\ENQ \SOH(\bR\barchived\DC2=\n\ + \\SOsearch_options\CAN\ACK \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\a \SOH(\b:\ENQfalseR\fallMatchMode\"\160\EOT\n\ + \\SOSearchCriteria\DC2\f\n\ + \\bORDER_ID\DLE\SOH\DC2\DC3\n\ + \\SICLIENT_ORDER_ID\DLE\STX\DC2\DC1\n\ + \\rTICKET_NUMBER\DLE\ETX\DC2\f\n\ + \\bCONTRACT\DLE\EOT\DC2\SO\n\ + \\n\ + \ACCOUNT_ID\DLE\ENQ\DC2\DLE\n\ + \\fACCOUNT_NAME\DLE\ACK\DC2\DC4\n\ + \\DLEBROKERAGE_NUMBER\DLE\a\DC2\r\n\ + \\tUSER_NAME\DLE\b\DC2\SYN\n\ + \\DC2CUSTOMER_LAST_NAME\DLE\t\DC2\ETB\n\ + \\DC3CUSTOMER_FIRST_NAME\DLE\n\ + \\DC2\v\n\ + \\aUSER_ID\DLE\v\DC2\DC2\n\ + \\SOROUTE_ORDER_ID\DLE\f\DC2\EM\n\ + \\NAKROUTE_CLIENT_ORDER_ID\DLE\r\DC2\SO\n\ + \\n\ + \ORDER_GUID\DLE\SO\DC2\SYN\n\ + \\DC2FILL_CARE_ORDER_ID\DLE\SI\DC2\DC2\n\ + \\SOCHAIN_ORDER_ID\DLE\DLE\DC2\ETB\n\ + \\DC3SALES_SERIES_NUMBER\DLE\DC1\DC2\NAK\n\ + \\DC1SALES_SERIES_NAME\DLE\DC2\DC2\DC3\n\ + \\SISALES_SERIES_ID\DLE\DC3\DC2\DC1\n\ + \\rEXCHANGE_NAME\DLE\DC4\DC2\SO\n\ + \\n\ + \ROUTE_CODE\DLE\NAK\DC2\SO\n\ + \\n\ + \ROUTE_NAME\DLE\SYN\DC2\ESC\n\ + \\ETBPROFILE_SALES_SERIES_ID\DLE\ETB\DC2\SYN\n\ + \\DC2BATCH_REQUEST_GUID\DLE\CAN\DC2\EM\n\ + \\NAKCHAIN_ORDER_STATUS_ID\DLE\EM\DC2\DC2\n\ + \\SOORDER_STATE_ID\DLE\SUB" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteText__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_text" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteText")) :: + Data.ProtoLens.FieldDescriptor OrderSearchRequest + obsoleteSearchCriteria__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_search_criteria" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"obsoleteSearchCriteria")) :: + Data.ProtoLens.FieldDescriptor OrderSearchRequest + top__field_descriptor + = Data.ProtoLens.FieldDescriptor + "top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'top")) :: + Data.ProtoLens.FieldDescriptor OrderSearchRequest + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor OrderSearchRequest + archived__field_descriptor + = Data.ProtoLens.FieldDescriptor + "archived" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'archived")) :: + Data.ProtoLens.FieldDescriptor OrderSearchRequest + searchOptions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "search_options" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.SearchOption) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"searchOptions")) :: + Data.ProtoLens.FieldDescriptor OrderSearchRequest + allMatchMode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "all_match_mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allMatchMode")) :: + Data.ProtoLens.FieldDescriptor OrderSearchRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteText__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteSearchCriteria__field_descriptor), + (Data.ProtoLens.Tag 3, top__field_descriptor), + (Data.ProtoLens.Tag 4, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 5, archived__field_descriptor), + (Data.ProtoLens.Tag 6, searchOptions__field_descriptor), + (Data.ProtoLens.Tag 7, allMatchMode__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderSearchRequest'_unknownFields + (\ x__ y__ -> x__ {_OrderSearchRequest'_unknownFields = y__}) + defMessage + = OrderSearchRequest'_constructor + {_OrderSearchRequest'obsoleteText = Prelude.Nothing, + _OrderSearchRequest'obsoleteSearchCriteria = Data.Vector.Generic.empty, + _OrderSearchRequest'top = Prelude.Nothing, + _OrderSearchRequest'tradeLocationId = Prelude.Nothing, + _OrderSearchRequest'archived = Prelude.Nothing, + _OrderSearchRequest'searchOptions = Data.Vector.Generic.empty, + _OrderSearchRequest'allMatchMode = Prelude.Nothing, + _OrderSearchRequest'_unknownFields = []} + parseMessage + = let + loop :: + OrderSearchRequest + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.SearchOption + -> Data.ProtoLens.Encoding.Bytes.Parser OrderSearchRequest + loop x mutable'obsoleteSearchCriteria mutable'searchOptions + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'obsoleteSearchCriteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'obsoleteSearchCriteria) + frozen'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'searchOptions) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria") + frozen'obsoleteSearchCriteria + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'searchOptions") + frozen'searchOptions x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "obsolete_text" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteText") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + 16 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_search_criteria" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'obsoleteSearchCriteria y) + loop x v mutable'searchOptions + 18 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_search_criteria" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'obsoleteSearchCriteria) + loop x y mutable'searchOptions + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "top" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"top") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "archived" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"archived") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + 50 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "search_options" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'searchOptions y) + loop x mutable'obsoleteSearchCriteria v + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "all_match_mode" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allMatchMode") y x) + mutable'obsoleteSearchCriteria mutable'searchOptions + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'obsoleteSearchCriteria mutable'searchOptions + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'obsoleteSearchCriteria <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'searchOptions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'obsoleteSearchCriteria + mutable'searchOptions) + "OrderSearchRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteText") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'top") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'archived") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'searchOptions") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allMatchMode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData OrderSearchRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderSearchRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderSearchRequest'obsoleteText x__) + (Control.DeepSeq.deepseq + (_OrderSearchRequest'obsoleteSearchCriteria x__) + (Control.DeepSeq.deepseq + (_OrderSearchRequest'top x__) + (Control.DeepSeq.deepseq + (_OrderSearchRequest'tradeLocationId x__) + (Control.DeepSeq.deepseq + (_OrderSearchRequest'archived x__) + (Control.DeepSeq.deepseq + (_OrderSearchRequest'searchOptions x__) + (Control.DeepSeq.deepseq + (_OrderSearchRequest'allMatchMode x__) ()))))))) +data OrderSearchRequest'SearchCriteria + = OrderSearchRequest'ORDER_ID | + OrderSearchRequest'CLIENT_ORDER_ID | + OrderSearchRequest'TICKET_NUMBER | + OrderSearchRequest'CONTRACT | + OrderSearchRequest'ACCOUNT_ID | + OrderSearchRequest'ACCOUNT_NAME | + OrderSearchRequest'BROKERAGE_NUMBER | + OrderSearchRequest'USER_NAME | + OrderSearchRequest'CUSTOMER_LAST_NAME | + OrderSearchRequest'CUSTOMER_FIRST_NAME | + OrderSearchRequest'USER_ID | + OrderSearchRequest'ROUTE_ORDER_ID | + OrderSearchRequest'ROUTE_CLIENT_ORDER_ID | + OrderSearchRequest'ORDER_GUID | + OrderSearchRequest'FILL_CARE_ORDER_ID | + OrderSearchRequest'CHAIN_ORDER_ID | + OrderSearchRequest'SALES_SERIES_NUMBER | + OrderSearchRequest'SALES_SERIES_NAME | + OrderSearchRequest'SALES_SERIES_ID | + OrderSearchRequest'EXCHANGE_NAME | + OrderSearchRequest'ROUTE_CODE | + OrderSearchRequest'ROUTE_NAME | + OrderSearchRequest'PROFILE_SALES_SERIES_ID | + OrderSearchRequest'BATCH_REQUEST_GUID | + OrderSearchRequest'CHAIN_ORDER_STATUS_ID | + OrderSearchRequest'ORDER_STATE_ID + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderSearchRequest'SearchCriteria where + maybeToEnum 1 = Prelude.Just OrderSearchRequest'ORDER_ID + maybeToEnum 2 = Prelude.Just OrderSearchRequest'CLIENT_ORDER_ID + maybeToEnum 3 = Prelude.Just OrderSearchRequest'TICKET_NUMBER + maybeToEnum 4 = Prelude.Just OrderSearchRequest'CONTRACT + maybeToEnum 5 = Prelude.Just OrderSearchRequest'ACCOUNT_ID + maybeToEnum 6 = Prelude.Just OrderSearchRequest'ACCOUNT_NAME + maybeToEnum 7 = Prelude.Just OrderSearchRequest'BROKERAGE_NUMBER + maybeToEnum 8 = Prelude.Just OrderSearchRequest'USER_NAME + maybeToEnum 9 = Prelude.Just OrderSearchRequest'CUSTOMER_LAST_NAME + maybeToEnum 10 + = Prelude.Just OrderSearchRequest'CUSTOMER_FIRST_NAME + maybeToEnum 11 = Prelude.Just OrderSearchRequest'USER_ID + maybeToEnum 12 = Prelude.Just OrderSearchRequest'ROUTE_ORDER_ID + maybeToEnum 13 + = Prelude.Just OrderSearchRequest'ROUTE_CLIENT_ORDER_ID + maybeToEnum 14 = Prelude.Just OrderSearchRequest'ORDER_GUID + maybeToEnum 15 = Prelude.Just OrderSearchRequest'FILL_CARE_ORDER_ID + maybeToEnum 16 = Prelude.Just OrderSearchRequest'CHAIN_ORDER_ID + maybeToEnum 17 + = Prelude.Just OrderSearchRequest'SALES_SERIES_NUMBER + maybeToEnum 18 = Prelude.Just OrderSearchRequest'SALES_SERIES_NAME + maybeToEnum 19 = Prelude.Just OrderSearchRequest'SALES_SERIES_ID + maybeToEnum 20 = Prelude.Just OrderSearchRequest'EXCHANGE_NAME + maybeToEnum 21 = Prelude.Just OrderSearchRequest'ROUTE_CODE + maybeToEnum 22 = Prelude.Just OrderSearchRequest'ROUTE_NAME + maybeToEnum 23 + = Prelude.Just OrderSearchRequest'PROFILE_SALES_SERIES_ID + maybeToEnum 24 = Prelude.Just OrderSearchRequest'BATCH_REQUEST_GUID + maybeToEnum 25 + = Prelude.Just OrderSearchRequest'CHAIN_ORDER_STATUS_ID + maybeToEnum 26 = Prelude.Just OrderSearchRequest'ORDER_STATE_ID + maybeToEnum _ = Prelude.Nothing + showEnum OrderSearchRequest'ORDER_ID = "ORDER_ID" + showEnum OrderSearchRequest'CLIENT_ORDER_ID = "CLIENT_ORDER_ID" + showEnum OrderSearchRequest'TICKET_NUMBER = "TICKET_NUMBER" + showEnum OrderSearchRequest'CONTRACT = "CONTRACT" + showEnum OrderSearchRequest'ACCOUNT_ID = "ACCOUNT_ID" + showEnum OrderSearchRequest'ACCOUNT_NAME = "ACCOUNT_NAME" + showEnum OrderSearchRequest'BROKERAGE_NUMBER = "BROKERAGE_NUMBER" + showEnum OrderSearchRequest'USER_NAME = "USER_NAME" + showEnum OrderSearchRequest'CUSTOMER_LAST_NAME + = "CUSTOMER_LAST_NAME" + showEnum OrderSearchRequest'CUSTOMER_FIRST_NAME + = "CUSTOMER_FIRST_NAME" + showEnum OrderSearchRequest'USER_ID = "USER_ID" + showEnum OrderSearchRequest'ROUTE_ORDER_ID = "ROUTE_ORDER_ID" + showEnum OrderSearchRequest'ROUTE_CLIENT_ORDER_ID + = "ROUTE_CLIENT_ORDER_ID" + showEnum OrderSearchRequest'ORDER_GUID = "ORDER_GUID" + showEnum OrderSearchRequest'FILL_CARE_ORDER_ID + = "FILL_CARE_ORDER_ID" + showEnum OrderSearchRequest'CHAIN_ORDER_ID = "CHAIN_ORDER_ID" + showEnum OrderSearchRequest'SALES_SERIES_NUMBER + = "SALES_SERIES_NUMBER" + showEnum OrderSearchRequest'SALES_SERIES_NAME = "SALES_SERIES_NAME" + showEnum OrderSearchRequest'SALES_SERIES_ID = "SALES_SERIES_ID" + showEnum OrderSearchRequest'EXCHANGE_NAME = "EXCHANGE_NAME" + showEnum OrderSearchRequest'ROUTE_CODE = "ROUTE_CODE" + showEnum OrderSearchRequest'ROUTE_NAME = "ROUTE_NAME" + showEnum OrderSearchRequest'PROFILE_SALES_SERIES_ID + = "PROFILE_SALES_SERIES_ID" + showEnum OrderSearchRequest'BATCH_REQUEST_GUID + = "BATCH_REQUEST_GUID" + showEnum OrderSearchRequest'CHAIN_ORDER_STATUS_ID + = "CHAIN_ORDER_STATUS_ID" + showEnum OrderSearchRequest'ORDER_STATE_ID = "ORDER_STATE_ID" + readEnum k + | (Prelude.==) k "ORDER_ID" + = Prelude.Just OrderSearchRequest'ORDER_ID + | (Prelude.==) k "CLIENT_ORDER_ID" + = Prelude.Just OrderSearchRequest'CLIENT_ORDER_ID + | (Prelude.==) k "TICKET_NUMBER" + = Prelude.Just OrderSearchRequest'TICKET_NUMBER + | (Prelude.==) k "CONTRACT" + = Prelude.Just OrderSearchRequest'CONTRACT + | (Prelude.==) k "ACCOUNT_ID" + = Prelude.Just OrderSearchRequest'ACCOUNT_ID + | (Prelude.==) k "ACCOUNT_NAME" + = Prelude.Just OrderSearchRequest'ACCOUNT_NAME + | (Prelude.==) k "BROKERAGE_NUMBER" + = Prelude.Just OrderSearchRequest'BROKERAGE_NUMBER + | (Prelude.==) k "USER_NAME" + = Prelude.Just OrderSearchRequest'USER_NAME + | (Prelude.==) k "CUSTOMER_LAST_NAME" + = Prelude.Just OrderSearchRequest'CUSTOMER_LAST_NAME + | (Prelude.==) k "CUSTOMER_FIRST_NAME" + = Prelude.Just OrderSearchRequest'CUSTOMER_FIRST_NAME + | (Prelude.==) k "USER_ID" + = Prelude.Just OrderSearchRequest'USER_ID + | (Prelude.==) k "ROUTE_ORDER_ID" + = Prelude.Just OrderSearchRequest'ROUTE_ORDER_ID + | (Prelude.==) k "ROUTE_CLIENT_ORDER_ID" + = Prelude.Just OrderSearchRequest'ROUTE_CLIENT_ORDER_ID + | (Prelude.==) k "ORDER_GUID" + = Prelude.Just OrderSearchRequest'ORDER_GUID + | (Prelude.==) k "FILL_CARE_ORDER_ID" + = Prelude.Just OrderSearchRequest'FILL_CARE_ORDER_ID + | (Prelude.==) k "CHAIN_ORDER_ID" + = Prelude.Just OrderSearchRequest'CHAIN_ORDER_ID + | (Prelude.==) k "SALES_SERIES_NUMBER" + = Prelude.Just OrderSearchRequest'SALES_SERIES_NUMBER + | (Prelude.==) k "SALES_SERIES_NAME" + = Prelude.Just OrderSearchRequest'SALES_SERIES_NAME + | (Prelude.==) k "SALES_SERIES_ID" + = Prelude.Just OrderSearchRequest'SALES_SERIES_ID + | (Prelude.==) k "EXCHANGE_NAME" + = Prelude.Just OrderSearchRequest'EXCHANGE_NAME + | (Prelude.==) k "ROUTE_CODE" + = Prelude.Just OrderSearchRequest'ROUTE_CODE + | (Prelude.==) k "ROUTE_NAME" + = Prelude.Just OrderSearchRequest'ROUTE_NAME + | (Prelude.==) k "PROFILE_SALES_SERIES_ID" + = Prelude.Just OrderSearchRequest'PROFILE_SALES_SERIES_ID + | (Prelude.==) k "BATCH_REQUEST_GUID" + = Prelude.Just OrderSearchRequest'BATCH_REQUEST_GUID + | (Prelude.==) k "CHAIN_ORDER_STATUS_ID" + = Prelude.Just OrderSearchRequest'CHAIN_ORDER_STATUS_ID + | (Prelude.==) k "ORDER_STATE_ID" + = Prelude.Just OrderSearchRequest'ORDER_STATE_ID + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderSearchRequest'SearchCriteria where + minBound = OrderSearchRequest'ORDER_ID + maxBound = OrderSearchRequest'ORDER_STATE_ID +instance Prelude.Enum OrderSearchRequest'SearchCriteria where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum SearchCriteria: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderSearchRequest'ORDER_ID = 1 + fromEnum OrderSearchRequest'CLIENT_ORDER_ID = 2 + fromEnum OrderSearchRequest'TICKET_NUMBER = 3 + fromEnum OrderSearchRequest'CONTRACT = 4 + fromEnum OrderSearchRequest'ACCOUNT_ID = 5 + fromEnum OrderSearchRequest'ACCOUNT_NAME = 6 + fromEnum OrderSearchRequest'BROKERAGE_NUMBER = 7 + fromEnum OrderSearchRequest'USER_NAME = 8 + fromEnum OrderSearchRequest'CUSTOMER_LAST_NAME = 9 + fromEnum OrderSearchRequest'CUSTOMER_FIRST_NAME = 10 + fromEnum OrderSearchRequest'USER_ID = 11 + fromEnum OrderSearchRequest'ROUTE_ORDER_ID = 12 + fromEnum OrderSearchRequest'ROUTE_CLIENT_ORDER_ID = 13 + fromEnum OrderSearchRequest'ORDER_GUID = 14 + fromEnum OrderSearchRequest'FILL_CARE_ORDER_ID = 15 + fromEnum OrderSearchRequest'CHAIN_ORDER_ID = 16 + fromEnum OrderSearchRequest'SALES_SERIES_NUMBER = 17 + fromEnum OrderSearchRequest'SALES_SERIES_NAME = 18 + fromEnum OrderSearchRequest'SALES_SERIES_ID = 19 + fromEnum OrderSearchRequest'EXCHANGE_NAME = 20 + fromEnum OrderSearchRequest'ROUTE_CODE = 21 + fromEnum OrderSearchRequest'ROUTE_NAME = 22 + fromEnum OrderSearchRequest'PROFILE_SALES_SERIES_ID = 23 + fromEnum OrderSearchRequest'BATCH_REQUEST_GUID = 24 + fromEnum OrderSearchRequest'CHAIN_ORDER_STATUS_ID = 25 + fromEnum OrderSearchRequest'ORDER_STATE_ID = 26 + succ OrderSearchRequest'ORDER_STATE_ID + = Prelude.error + "OrderSearchRequest'SearchCriteria.succ: bad argument OrderSearchRequest'ORDER_STATE_ID. This value would be out of bounds." + succ OrderSearchRequest'ORDER_ID + = OrderSearchRequest'CLIENT_ORDER_ID + succ OrderSearchRequest'CLIENT_ORDER_ID + = OrderSearchRequest'TICKET_NUMBER + succ OrderSearchRequest'TICKET_NUMBER = OrderSearchRequest'CONTRACT + succ OrderSearchRequest'CONTRACT = OrderSearchRequest'ACCOUNT_ID + succ OrderSearchRequest'ACCOUNT_ID + = OrderSearchRequest'ACCOUNT_NAME + succ OrderSearchRequest'ACCOUNT_NAME + = OrderSearchRequest'BROKERAGE_NUMBER + succ OrderSearchRequest'BROKERAGE_NUMBER + = OrderSearchRequest'USER_NAME + succ OrderSearchRequest'USER_NAME + = OrderSearchRequest'CUSTOMER_LAST_NAME + succ OrderSearchRequest'CUSTOMER_LAST_NAME + = OrderSearchRequest'CUSTOMER_FIRST_NAME + succ OrderSearchRequest'CUSTOMER_FIRST_NAME + = OrderSearchRequest'USER_ID + succ OrderSearchRequest'USER_ID = OrderSearchRequest'ROUTE_ORDER_ID + succ OrderSearchRequest'ROUTE_ORDER_ID + = OrderSearchRequest'ROUTE_CLIENT_ORDER_ID + succ OrderSearchRequest'ROUTE_CLIENT_ORDER_ID + = OrderSearchRequest'ORDER_GUID + succ OrderSearchRequest'ORDER_GUID + = OrderSearchRequest'FILL_CARE_ORDER_ID + succ OrderSearchRequest'FILL_CARE_ORDER_ID + = OrderSearchRequest'CHAIN_ORDER_ID + succ OrderSearchRequest'CHAIN_ORDER_ID + = OrderSearchRequest'SALES_SERIES_NUMBER + succ OrderSearchRequest'SALES_SERIES_NUMBER + = OrderSearchRequest'SALES_SERIES_NAME + succ OrderSearchRequest'SALES_SERIES_NAME + = OrderSearchRequest'SALES_SERIES_ID + succ OrderSearchRequest'SALES_SERIES_ID + = OrderSearchRequest'EXCHANGE_NAME + succ OrderSearchRequest'EXCHANGE_NAME + = OrderSearchRequest'ROUTE_CODE + succ OrderSearchRequest'ROUTE_CODE = OrderSearchRequest'ROUTE_NAME + succ OrderSearchRequest'ROUTE_NAME + = OrderSearchRequest'PROFILE_SALES_SERIES_ID + succ OrderSearchRequest'PROFILE_SALES_SERIES_ID + = OrderSearchRequest'BATCH_REQUEST_GUID + succ OrderSearchRequest'BATCH_REQUEST_GUID + = OrderSearchRequest'CHAIN_ORDER_STATUS_ID + succ OrderSearchRequest'CHAIN_ORDER_STATUS_ID + = OrderSearchRequest'ORDER_STATE_ID + pred OrderSearchRequest'ORDER_ID + = Prelude.error + "OrderSearchRequest'SearchCriteria.pred: bad argument OrderSearchRequest'ORDER_ID. This value would be out of bounds." + pred OrderSearchRequest'CLIENT_ORDER_ID + = OrderSearchRequest'ORDER_ID + pred OrderSearchRequest'TICKET_NUMBER + = OrderSearchRequest'CLIENT_ORDER_ID + pred OrderSearchRequest'CONTRACT = OrderSearchRequest'TICKET_NUMBER + pred OrderSearchRequest'ACCOUNT_ID = OrderSearchRequest'CONTRACT + pred OrderSearchRequest'ACCOUNT_NAME + = OrderSearchRequest'ACCOUNT_ID + pred OrderSearchRequest'BROKERAGE_NUMBER + = OrderSearchRequest'ACCOUNT_NAME + pred OrderSearchRequest'USER_NAME + = OrderSearchRequest'BROKERAGE_NUMBER + pred OrderSearchRequest'CUSTOMER_LAST_NAME + = OrderSearchRequest'USER_NAME + pred OrderSearchRequest'CUSTOMER_FIRST_NAME + = OrderSearchRequest'CUSTOMER_LAST_NAME + pred OrderSearchRequest'USER_ID + = OrderSearchRequest'CUSTOMER_FIRST_NAME + pred OrderSearchRequest'ROUTE_ORDER_ID = OrderSearchRequest'USER_ID + pred OrderSearchRequest'ROUTE_CLIENT_ORDER_ID + = OrderSearchRequest'ROUTE_ORDER_ID + pred OrderSearchRequest'ORDER_GUID + = OrderSearchRequest'ROUTE_CLIENT_ORDER_ID + pred OrderSearchRequest'FILL_CARE_ORDER_ID + = OrderSearchRequest'ORDER_GUID + pred OrderSearchRequest'CHAIN_ORDER_ID + = OrderSearchRequest'FILL_CARE_ORDER_ID + pred OrderSearchRequest'SALES_SERIES_NUMBER + = OrderSearchRequest'CHAIN_ORDER_ID + pred OrderSearchRequest'SALES_SERIES_NAME + = OrderSearchRequest'SALES_SERIES_NUMBER + pred OrderSearchRequest'SALES_SERIES_ID + = OrderSearchRequest'SALES_SERIES_NAME + pred OrderSearchRequest'EXCHANGE_NAME + = OrderSearchRequest'SALES_SERIES_ID + pred OrderSearchRequest'ROUTE_CODE + = OrderSearchRequest'EXCHANGE_NAME + pred OrderSearchRequest'ROUTE_NAME = OrderSearchRequest'ROUTE_CODE + pred OrderSearchRequest'PROFILE_SALES_SERIES_ID + = OrderSearchRequest'ROUTE_NAME + pred OrderSearchRequest'BATCH_REQUEST_GUID + = OrderSearchRequest'PROFILE_SALES_SERIES_ID + pred OrderSearchRequest'CHAIN_ORDER_STATUS_ID + = OrderSearchRequest'BATCH_REQUEST_GUID + pred OrderSearchRequest'ORDER_STATE_ID + = OrderSearchRequest'CHAIN_ORDER_STATUS_ID + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderSearchRequest'SearchCriteria where + fieldDefault = OrderSearchRequest'ORDER_ID +instance Control.DeepSeq.NFData OrderSearchRequest'SearchCriteria where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.orderRecord' @:: Lens' OrderSearchResult [OrderSearchResultRecord]@ + * 'Proto.CMS.Traderouting1_Fields.vec'orderRecord' @:: Lens' OrderSearchResult (Data.Vector.Vector OrderSearchResultRecord)@ + * 'Proto.CMS.Traderouting1_Fields.isComplete' @:: Lens' OrderSearchResult Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isComplete' @:: Lens' OrderSearchResult (Prelude.Maybe Prelude.Bool)@ -} +data OrderSearchResult + = OrderSearchResult'_constructor {_OrderSearchResult'orderRecord :: !(Data.Vector.Vector OrderSearchResultRecord), + _OrderSearchResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _OrderSearchResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderSearchResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderSearchResult "orderRecord" [OrderSearchResultRecord] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResult'orderRecord + (\ x__ y__ -> x__ {_OrderSearchResult'orderRecord = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField OrderSearchResult "vec'orderRecord" (Data.Vector.Vector OrderSearchResultRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResult'orderRecord + (\ x__ y__ -> x__ {_OrderSearchResult'orderRecord = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResult'isComplete + (\ x__ y__ -> x__ {_OrderSearchResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField OrderSearchResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResult'isComplete + (\ x__ y__ -> x__ {_OrderSearchResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderSearchResult where + messageName _ = Data.Text.pack "traderouting_1.OrderSearchResult" + packedMessageDescriptor _ + = "\n\ + \\DC1OrderSearchResult\DC2J\n\ + \\forder_record\CAN\SOH \ETX(\v2'.traderouting_1.OrderSearchResultRecordR\vorderRecord\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + orderRecord__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_record" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderSearchResultRecord) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"orderRecord")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, orderRecord__field_descriptor), + (Data.ProtoLens.Tag 2, isComplete__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderSearchResult'_unknownFields + (\ x__ y__ -> x__ {_OrderSearchResult'_unknownFields = y__}) + defMessage + = OrderSearchResult'_constructor + {_OrderSearchResult'orderRecord = Data.Vector.Generic.empty, + _OrderSearchResult'isComplete = Prelude.Nothing, + _OrderSearchResult'_unknownFields = []} + parseMessage + = let + loop :: + OrderSearchResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld OrderSearchResultRecord + -> Data.ProtoLens.Encoding.Bytes.Parser OrderSearchResult + loop x mutable'orderRecord + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'orderRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'orderRecord) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'orderRecord") frozen'orderRecord + x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "order_record" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'orderRecord y) + loop x v + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + mutable'orderRecord + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'orderRecord + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'orderRecord <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'orderRecord) + "OrderSearchResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'orderRecord") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData OrderSearchResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderSearchResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderSearchResult'orderRecord x__) + (Control.DeepSeq.deepseq (_OrderSearchResult'isComplete x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.brokerageAccountNumber' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.orderId' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.ticketNumber' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'ticketNumber' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.side' @:: Lens' OrderSearchResultRecord Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.type'' @:: Lens' OrderSearchResultRecord Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.limitPrice' @:: Lens' OrderSearchResultRecord Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'limitPrice' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.stopPrice' @:: Lens' OrderSearchResultRecord Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'stopPrice' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.contractName' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.submittedUtcTime' @:: Lens' OrderSearchResultRecord Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.status' @:: Lens' OrderSearchResultRecord Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.userName' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'userName' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.customerLastName' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'customerLastName' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageName' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.routeName' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' OrderSearchResultRecord Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.accountName' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.nativeRouteName' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'nativeRouteName' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.routeClientOrderId' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.exchangeName' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.chainOrderId' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'chainOrderId' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.displayLimitPrice' @:: Lens' OrderSearchResultRecord Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayLimitPrice' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.displayStopPrice' @:: Lens' OrderSearchResultRecord Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayStopPrice' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteSize' @:: Lens' OrderSearchResultRecord Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteSize' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.salesSeriesNumber' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'salesSeriesNumber' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.salesSeriesName' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'salesSeriesName' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.salesSeriesId' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'salesSeriesId' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.size' @:: Lens' OrderSearchResultRecord Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'size' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.profileSalesSeriesId' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'profileSalesSeriesId' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.extendedSide' @:: Lens' OrderSearchResultRecord Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'extendedSide' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.batchRequestGuid' @:: Lens' OrderSearchResultRecord Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'batchRequestGuid' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.orderState' @:: Lens' OrderSearchResultRecord Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderState' @:: Lens' OrderSearchResultRecord (Prelude.Maybe Data.Word.Word32)@ -} +data OrderSearchResultRecord + = OrderSearchResultRecord'_constructor {_OrderSearchResultRecord'brokerageAccountNumber :: !Data.Text.Text, + _OrderSearchResultRecord'orderId :: !Data.Text.Text, + _OrderSearchResultRecord'ticketNumber :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchResultRecord'side :: !Data.Word.Word32, + _OrderSearchResultRecord'type' :: !Data.Word.Word32, + _OrderSearchResultRecord'limitPrice :: !(Prelude.Maybe Prelude.Double), + _OrderSearchResultRecord'stopPrice :: !(Prelude.Maybe Prelude.Double), + _OrderSearchResultRecord'contractName :: !Data.Text.Text, + _OrderSearchResultRecord'submittedUtcTime :: !Data.Int.Int64, + _OrderSearchResultRecord'status :: !Data.Word.Word32, + _OrderSearchResultRecord'userName :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchResultRecord'customerLastName :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchResultRecord'brokerageName :: !Data.Text.Text, + _OrderSearchResultRecord'routeName :: !Data.Text.Text, + _OrderSearchResultRecord'accountId :: !Data.Int.Int32, + _OrderSearchResultRecord'accountName :: !Data.Text.Text, + _OrderSearchResultRecord'nativeRouteName :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchResultRecord'routeClientOrderId :: !Data.Text.Text, + _OrderSearchResultRecord'exchangeName :: !Data.Text.Text, + _OrderSearchResultRecord'chainOrderId :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchResultRecord'displayLimitPrice :: !(Prelude.Maybe Data.Int.Int64), + _OrderSearchResultRecord'displayStopPrice :: !(Prelude.Maybe Data.Int.Int64), + _OrderSearchResultRecord'obsoleteSize :: !(Prelude.Maybe Data.Word.Word32), + _OrderSearchResultRecord'salesSeriesNumber :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchResultRecord'salesSeriesName :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchResultRecord'salesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchResultRecord'size :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _OrderSearchResultRecord'profileSalesSeriesId :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchResultRecord'extendedSide :: !(Prelude.Maybe Data.Word.Word32), + _OrderSearchResultRecord'batchRequestGuid :: !(Prelude.Maybe Data.Text.Text), + _OrderSearchResultRecord'orderState :: !(Prelude.Maybe Data.Word.Word32), + _OrderSearchResultRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderSearchResultRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "brokerageAccountNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'brokerageAccountNumber + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'brokerageAccountNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "orderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'orderId + (\ x__ y__ -> x__ {_OrderSearchResultRecord'orderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "ticketNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'ticketNumber + (\ x__ y__ -> x__ {_OrderSearchResultRecord'ticketNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'ticketNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'ticketNumber + (\ x__ y__ -> x__ {_OrderSearchResultRecord'ticketNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "side" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'side + (\ x__ y__ -> x__ {_OrderSearchResultRecord'side = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "type'" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'type' + (\ x__ y__ -> x__ {_OrderSearchResultRecord'type' = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "limitPrice" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'limitPrice + (\ x__ y__ -> x__ {_OrderSearchResultRecord'limitPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'limitPrice" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'limitPrice + (\ x__ y__ -> x__ {_OrderSearchResultRecord'limitPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "stopPrice" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'stopPrice + (\ x__ y__ -> x__ {_OrderSearchResultRecord'stopPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'stopPrice" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'stopPrice + (\ x__ y__ -> x__ {_OrderSearchResultRecord'stopPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "contractName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'contractName + (\ x__ y__ -> x__ {_OrderSearchResultRecord'contractName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "submittedUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'submittedUtcTime + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'submittedUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "status" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'status + (\ x__ y__ -> x__ {_OrderSearchResultRecord'status = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "userName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'userName + (\ x__ y__ -> x__ {_OrderSearchResultRecord'userName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'userName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'userName + (\ x__ y__ -> x__ {_OrderSearchResultRecord'userName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "customerLastName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'customerLastName + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'customerLastName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'customerLastName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'customerLastName + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'customerLastName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "brokerageName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'brokerageName + (\ x__ y__ -> x__ {_OrderSearchResultRecord'brokerageName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "routeName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'routeName + (\ x__ y__ -> x__ {_OrderSearchResultRecord'routeName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'accountId + (\ x__ y__ -> x__ {_OrderSearchResultRecord'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "accountName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'accountName + (\ x__ y__ -> x__ {_OrderSearchResultRecord'accountName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "nativeRouteName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'nativeRouteName + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'nativeRouteName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'nativeRouteName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'nativeRouteName + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'nativeRouteName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "routeClientOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'routeClientOrderId + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'routeClientOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "exchangeName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'exchangeName + (\ x__ y__ -> x__ {_OrderSearchResultRecord'exchangeName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "chainOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'chainOrderId + (\ x__ y__ -> x__ {_OrderSearchResultRecord'chainOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'chainOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'chainOrderId + (\ x__ y__ -> x__ {_OrderSearchResultRecord'chainOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "displayLimitPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'displayLimitPrice + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'displayLimitPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'displayLimitPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'displayLimitPrice + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'displayLimitPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "displayStopPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'displayStopPrice + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'displayStopPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'displayStopPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'displayStopPrice + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'displayStopPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "obsoleteSize" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'obsoleteSize + (\ x__ y__ -> x__ {_OrderSearchResultRecord'obsoleteSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'obsoleteSize" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'obsoleteSize + (\ x__ y__ -> x__ {_OrderSearchResultRecord'obsoleteSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "salesSeriesNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'salesSeriesNumber + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'salesSeriesNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'salesSeriesNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'salesSeriesNumber + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'salesSeriesNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "salesSeriesName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'salesSeriesName + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'salesSeriesName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'salesSeriesName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'salesSeriesName + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'salesSeriesName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "salesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'salesSeriesId + (\ x__ y__ -> x__ {_OrderSearchResultRecord'salesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'salesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'salesSeriesId + (\ x__ y__ -> x__ {_OrderSearchResultRecord'salesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "size" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'size + (\ x__ y__ -> x__ {_OrderSearchResultRecord'size = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'size" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'size + (\ x__ y__ -> x__ {_OrderSearchResultRecord'size = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "profileSalesSeriesId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'profileSalesSeriesId + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'profileSalesSeriesId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'profileSalesSeriesId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'profileSalesSeriesId + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'profileSalesSeriesId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "extendedSide" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'extendedSide + (\ x__ y__ -> x__ {_OrderSearchResultRecord'extendedSide = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'extendedSide" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'extendedSide + (\ x__ y__ -> x__ {_OrderSearchResultRecord'extendedSide = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "batchRequestGuid" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'batchRequestGuid + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'batchRequestGuid = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'batchRequestGuid" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'batchRequestGuid + (\ x__ y__ + -> x__ {_OrderSearchResultRecord'batchRequestGuid = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "orderState" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'orderState + (\ x__ y__ -> x__ {_OrderSearchResultRecord'orderState = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSearchResultRecord "maybe'orderState" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'orderState + (\ x__ y__ -> x__ {_OrderSearchResultRecord'orderState = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderSearchResultRecord where + messageName _ + = Data.Text.pack "traderouting_1.OrderSearchResultRecord" + packedMessageDescriptor _ + = "\n\ + \\ETBOrderSearchResultRecord\DC28\n\ + \\CANbrokerage_account_number\CAN\SOH \STX(\tR\SYNbrokerageAccountNumber\DC2\EM\n\ + \\border_id\CAN\STX \STX(\tR\aorderId\DC2#\n\ + \\rticket_number\CAN\ETX \SOH(\tR\fticketNumber\DC2\DC2\n\ + \\EOTside\CAN\EOT \STX(\rR\EOTside\DC2\DC2\n\ + \\EOTtype\CAN\ENQ \STX(\rR\EOTtype\DC2\US\n\ + \\vlimit_price\CAN\ACK \SOH(\SOHR\n\ + \limitPrice\DC2\GS\n\ + \\n\ + \stop_price\CAN\a \SOH(\SOHR\tstopPrice\DC2#\n\ + \\rcontract_name\CAN\b \STX(\tR\fcontractName\DC2,\n\ + \\DC2submitted_utc_time\CAN\t \STX(\DC2R\DLEsubmittedUtcTime\DC2\SYN\n\ + \\ACKstatus\CAN\n\ + \ \STX(\rR\ACKstatus\DC2\ESC\n\ + \\tuser_name\CAN\v \SOH(\tR\buserName\DC2,\n\ + \\DC2customer_last_name\CAN\f \SOH(\tR\DLEcustomerLastName\DC2%\n\ + \\SObrokerage_name\CAN\r \STX(\tR\rbrokerageName\DC2\GS\n\ + \\n\ + \route_name\CAN\SO \STX(\tR\trouteName\DC2\GS\n\ + \\n\ + \account_id\CAN\SI \STX(\DC1R\taccountId\DC2!\n\ + \\faccount_name\CAN\DLE \STX(\tR\vaccountName\DC2*\n\ + \\DC1native_route_name\CAN\DC1 \SOH(\tR\SInativeRouteName\DC21\n\ + \\NAKroute_client_order_id\CAN\DC2 \STX(\tR\DC2routeClientOrderId\DC2#\n\ + \\rexchange_name\CAN\DC3 \STX(\tR\fexchangeName\DC2$\n\ + \\SOchain_order_id\CAN\DC4 \SOH(\tR\fchainOrderId\DC2.\n\ + \\DC3display_limit_price\CAN\NAK \SOH(\DC2R\DC1displayLimitPrice\DC2,\n\ + \\DC2display_stop_price\CAN\SYN \SOH(\DC2R\DLEdisplayStopPrice\DC2'\n\ + \\robsolete_size\CAN\ETB \SOH(\rR\fobsoleteSizeB\STX\CAN\SOH\DC2.\n\ + \\DC3sales_series_number\CAN\CAN \SOH(\tR\DC1salesSeriesNumber\DC2*\n\ + \\DC1sales_series_name\CAN\EM \SOH(\tR\SIsalesSeriesName\DC2&\n\ + \\SIsales_series_id\CAN\SUB \SOH(\tR\rsalesSeriesId\DC2 \n\ + \\EOTsize\CAN\ESC \SOH(\v2\f.cqg.DecimalR\EOTsize\DC25\n\ + \\ETBprofile_sales_series_id\CAN\FS \SOH(\tR\DC4profileSalesSeriesId\DC2#\n\ + \\rextended_side\CAN\GS \SOH(\rR\fextendedSide\DC2,\n\ + \\DC2batch_request_guid\CAN\RS \SOH(\tR\DLEbatchRequestGuid\DC2\US\n\ + \\vorder_state\CAN\US \SOH(\rR\n\ + \orderState" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + brokerageAccountNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_account_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"brokerageAccountNumber")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + orderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"orderId")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + ticketNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ticket_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'ticketNumber")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + side__field_descriptor + = Data.ProtoLens.FieldDescriptor + "side" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"side")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + type'__field_descriptor + = Data.ProtoLens.FieldDescriptor + "type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"type'")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + limitPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "limit_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'limitPrice")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + stopPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stop_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stopPrice")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + contractName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"contractName")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + submittedUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "submitted_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"submittedUtcTime")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + status__field_descriptor + = Data.ProtoLens.FieldDescriptor + "status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"status")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + userName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "user_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'userName")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + customerLastName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "customer_last_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'customerLastName")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + brokerageName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"brokerageName")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + routeName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"routeName")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + accountName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountName")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + nativeRouteName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "native_route_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'nativeRouteName")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + routeClientOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route_client_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"routeClientOrderId")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + exchangeName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exchange_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"exchangeName")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + chainOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "chain_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'chainOrderId")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + displayLimitPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_limit_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayLimitPrice")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + displayStopPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_stop_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayStopPrice")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + obsoleteSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_size" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteSize")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + salesSeriesNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesNumber")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + salesSeriesName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesName")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + salesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'salesSeriesId")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + size__field_descriptor + = Data.ProtoLens.FieldDescriptor + "size" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'size")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + profileSalesSeriesId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_sales_series_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileSalesSeriesId")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + extendedSide__field_descriptor + = Data.ProtoLens.FieldDescriptor + "extended_side" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'extendedSide")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + batchRequestGuid__field_descriptor + = Data.ProtoLens.FieldDescriptor + "batch_request_guid" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'batchRequestGuid")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + orderState__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_state" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderState")) :: + Data.ProtoLens.FieldDescriptor OrderSearchResultRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, brokerageAccountNumber__field_descriptor), + (Data.ProtoLens.Tag 2, orderId__field_descriptor), + (Data.ProtoLens.Tag 3, ticketNumber__field_descriptor), + (Data.ProtoLens.Tag 4, side__field_descriptor), + (Data.ProtoLens.Tag 5, type'__field_descriptor), + (Data.ProtoLens.Tag 6, limitPrice__field_descriptor), + (Data.ProtoLens.Tag 7, stopPrice__field_descriptor), + (Data.ProtoLens.Tag 8, contractName__field_descriptor), + (Data.ProtoLens.Tag 9, submittedUtcTime__field_descriptor), + (Data.ProtoLens.Tag 10, status__field_descriptor), + (Data.ProtoLens.Tag 11, userName__field_descriptor), + (Data.ProtoLens.Tag 12, customerLastName__field_descriptor), + (Data.ProtoLens.Tag 13, brokerageName__field_descriptor), + (Data.ProtoLens.Tag 14, routeName__field_descriptor), + (Data.ProtoLens.Tag 15, accountId__field_descriptor), + (Data.ProtoLens.Tag 16, accountName__field_descriptor), + (Data.ProtoLens.Tag 17, nativeRouteName__field_descriptor), + (Data.ProtoLens.Tag 18, routeClientOrderId__field_descriptor), + (Data.ProtoLens.Tag 19, exchangeName__field_descriptor), + (Data.ProtoLens.Tag 20, chainOrderId__field_descriptor), + (Data.ProtoLens.Tag 21, displayLimitPrice__field_descriptor), + (Data.ProtoLens.Tag 22, displayStopPrice__field_descriptor), + (Data.ProtoLens.Tag 23, obsoleteSize__field_descriptor), + (Data.ProtoLens.Tag 24, salesSeriesNumber__field_descriptor), + (Data.ProtoLens.Tag 25, salesSeriesName__field_descriptor), + (Data.ProtoLens.Tag 26, salesSeriesId__field_descriptor), + (Data.ProtoLens.Tag 27, size__field_descriptor), + (Data.ProtoLens.Tag 28, profileSalesSeriesId__field_descriptor), + (Data.ProtoLens.Tag 29, extendedSide__field_descriptor), + (Data.ProtoLens.Tag 30, batchRequestGuid__field_descriptor), + (Data.ProtoLens.Tag 31, orderState__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderSearchResultRecord'_unknownFields + (\ x__ y__ -> x__ {_OrderSearchResultRecord'_unknownFields = y__}) + defMessage + = OrderSearchResultRecord'_constructor + {_OrderSearchResultRecord'brokerageAccountNumber = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'orderId = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'ticketNumber = Prelude.Nothing, + _OrderSearchResultRecord'side = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'type' = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'limitPrice = Prelude.Nothing, + _OrderSearchResultRecord'stopPrice = Prelude.Nothing, + _OrderSearchResultRecord'contractName = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'submittedUtcTime = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'status = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'userName = Prelude.Nothing, + _OrderSearchResultRecord'customerLastName = Prelude.Nothing, + _OrderSearchResultRecord'brokerageName = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'routeName = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'accountId = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'accountName = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'nativeRouteName = Prelude.Nothing, + _OrderSearchResultRecord'routeClientOrderId = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'exchangeName = Data.ProtoLens.fieldDefault, + _OrderSearchResultRecord'chainOrderId = Prelude.Nothing, + _OrderSearchResultRecord'displayLimitPrice = Prelude.Nothing, + _OrderSearchResultRecord'displayStopPrice = Prelude.Nothing, + _OrderSearchResultRecord'obsoleteSize = Prelude.Nothing, + _OrderSearchResultRecord'salesSeriesNumber = Prelude.Nothing, + _OrderSearchResultRecord'salesSeriesName = Prelude.Nothing, + _OrderSearchResultRecord'salesSeriesId = Prelude.Nothing, + _OrderSearchResultRecord'size = Prelude.Nothing, + _OrderSearchResultRecord'profileSalesSeriesId = Prelude.Nothing, + _OrderSearchResultRecord'extendedSide = Prelude.Nothing, + _OrderSearchResultRecord'batchRequestGuid = Prelude.Nothing, + _OrderSearchResultRecord'orderState = Prelude.Nothing, + _OrderSearchResultRecord'_unknownFields = []} + parseMessage + = let + loop :: + OrderSearchResultRecord + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser OrderSearchResultRecord + loop + x + required'accountId + required'accountName + required'brokerageAccountNumber + required'brokerageName + required'contractName + required'exchangeName + required'orderId + required'routeClientOrderId + required'routeName + required'side + required'status + required'submittedUtcTime + required'type' + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) + ((if required'accountName then (:) "account_name" else Prelude.id) + ((if required'brokerageAccountNumber then + (:) "brokerage_account_number" + else + Prelude.id) + ((if required'brokerageName then + (:) "brokerage_name" + else + Prelude.id) + ((if required'contractName then + (:) "contract_name" + else + Prelude.id) + ((if required'exchangeName then + (:) "exchange_name" + else + Prelude.id) + ((if required'orderId then + (:) "order_id" + else + Prelude.id) + ((if required'routeClientOrderId then + (:) "route_client_order_id" + else + Prelude.id) + ((if required'routeName then + (:) "route_name" + else + Prelude.id) + ((if required'side then + (:) "side" + else + Prelude.id) + ((if required'status then + (:) "status" + else + Prelude.id) + ((if required'submittedUtcTime then + (:) "submitted_utc_time" + else + Prelude.id) + ((if required'type' then + (:) "type" + else + Prelude.id) + [])))))))))))) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_account_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAccountNumber") y x) + required'accountId required'accountName Prelude.False + required'brokerageName required'contractName required'exchangeName + required'orderId required'routeClientOrderId required'routeName + required'side required'status required'submittedUtcTime + required'type' + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "order_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderId") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName Prelude.False + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "ticket_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"ticketNumber") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "side" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"side") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName Prelude.False + required'status required'submittedUtcTime required'type' + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"type'") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime Prelude.False + 49 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "limit_price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"limitPrice") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 57 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "stop_price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"stopPrice") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractName") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + Prelude.False required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "submitted_utc_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"submittedUtcTime") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status Prelude.False required'type' + 80 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "status" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"status") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + Prelude.False required'submittedUtcTime required'type' + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "user_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"userName") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "customer_last_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"customerLastName") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageName") y x) + required'accountId required'accountName + required'brokerageAccountNumber Prelude.False + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "route_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"routeName") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId Prelude.False required'side + required'status required'submittedUtcTime required'type' + 120 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False required'accountName required'brokerageAccountNumber + required'brokerageName required'contractName required'exchangeName + required'orderId required'routeClientOrderId required'routeName + required'side required'status required'submittedUtcTime + required'type' + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountName") y x) + required'accountId Prelude.False required'brokerageAccountNumber + required'brokerageName required'contractName required'exchangeName + required'orderId required'routeClientOrderId required'routeName + required'side required'status required'submittedUtcTime + required'type' + 138 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "native_route_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"nativeRouteName") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 146 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "route_client_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"routeClientOrderId") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + Prelude.False required'routeName required'side required'status + required'submittedUtcTime required'type' + 154 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "exchange_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"exchangeName") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName Prelude.False required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 162 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "chain_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"chainOrderId") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 168 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_limit_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayLimitPrice") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 176 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_stop_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayStopPrice") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 184 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_size" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteSize") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 194 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesNumber") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 202 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesName") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 210 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"salesSeriesId") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 218 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "size" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"size") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 226 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "profile_sales_series_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"profileSalesSeriesId") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 232 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "extended_side" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"extendedSide") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 242 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "batch_request_guid" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"batchRequestGuid") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + 248 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "order_state" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderState") y x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId required'accountName + required'brokerageAccountNumber required'brokerageName + required'contractName required'exchangeName required'orderId + required'routeClientOrderId required'routeName required'side + required'status required'submittedUtcTime required'type' + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True + Prelude.True Prelude.True Prelude.True Prelude.True Prelude.True + Prelude.True Prelude.True Prelude.True Prelude.True Prelude.True) + "OrderSearchResultRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"brokerageAccountNumber") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"orderId") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'ticketNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"side") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"type'") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'limitPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 49) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stopPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 57) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"contractName") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"submittedUtcTime") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 80) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"status") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'userName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'customerLastName") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"brokerageName") + _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"routeName") + _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 120) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"accountId") + _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"accountName") + _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'nativeRouteName") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 146) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"routeClientOrderId") + _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 154) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"exchangeName") + _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'chainOrderId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 162) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'displayLimitPrice") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 168) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'displayStopPrice") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 176) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteSize") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 184) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'salesSeriesNumber") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 194) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'salesSeriesName") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 202) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'salesSeriesId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 210) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'size") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 218) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'profileSalesSeriesId") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 226) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'extendedSide") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 232) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'batchRequestGuid") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 242) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.Text.Encoding.encodeUtf8 + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'orderState") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 248) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))))))))))))))))))) +instance Control.DeepSeq.NFData OrderSearchResultRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderSearchResultRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'brokerageAccountNumber x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'orderId x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'ticketNumber x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'side x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'type' x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'limitPrice x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'stopPrice x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'contractName x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'submittedUtcTime x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'status x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'userName x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'customerLastName x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'brokerageName x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'routeName x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'accountId x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'accountName + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'nativeRouteName + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'routeClientOrderId + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'exchangeName + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'chainOrderId + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'displayLimitPrice + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'displayStopPrice + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'obsoleteSize + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'salesSeriesNumber + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'salesSeriesName + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'salesSeriesId + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'size + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'profileSalesSeriesId + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'extendedSide + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'batchRequestGuid + x__) + (Control.DeepSeq.deepseq + (_OrderSearchResultRecord'orderState + x__) + ()))))))))))))))))))))))))))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.obsoleteTriggerSize' @:: Lens' OrderSizes Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteTriggerSize' @:: Lens' OrderSizes (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteVisibleSize' @:: Lens' OrderSizes Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteVisibleSize' @:: Lens' OrderSizes (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteMinVisibleSize' @:: Lens' OrderSizes Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteMinVisibleSize' @:: Lens' OrderSizes (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteRemainingSize' @:: Lens' OrderSizes Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteRemainingSize' @:: Lens' OrderSizes (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.triggerSize' @:: Lens' OrderSizes Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'triggerSize' @:: Lens' OrderSizes (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.visibleSize' @:: Lens' OrderSizes Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'visibleSize' @:: Lens' OrderSizes (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.minVisibleSize' @:: Lens' OrderSizes Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'minVisibleSize' @:: Lens' OrderSizes (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.remainingSize' @:: Lens' OrderSizes Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'remainingSize' @:: Lens' OrderSizes (Prelude.Maybe Proto.Common.Decimal.Decimal)@ -} +data OrderSizes + = OrderSizes'_constructor {_OrderSizes'obsoleteTriggerSize :: !(Prelude.Maybe Data.Word.Word32), + _OrderSizes'obsoleteVisibleSize :: !(Prelude.Maybe Data.Word.Word32), + _OrderSizes'obsoleteMinVisibleSize :: !(Prelude.Maybe Data.Word.Word32), + _OrderSizes'obsoleteRemainingSize :: !(Prelude.Maybe Data.Word.Word32), + _OrderSizes'triggerSize :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _OrderSizes'visibleSize :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _OrderSizes'minVisibleSize :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _OrderSizes'remainingSize :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _OrderSizes'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderSizes where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderSizes "obsoleteTriggerSize" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'obsoleteTriggerSize + (\ x__ y__ -> x__ {_OrderSizes'obsoleteTriggerSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSizes "maybe'obsoleteTriggerSize" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'obsoleteTriggerSize + (\ x__ y__ -> x__ {_OrderSizes'obsoleteTriggerSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSizes "obsoleteVisibleSize" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'obsoleteVisibleSize + (\ x__ y__ -> x__ {_OrderSizes'obsoleteVisibleSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSizes "maybe'obsoleteVisibleSize" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'obsoleteVisibleSize + (\ x__ y__ -> x__ {_OrderSizes'obsoleteVisibleSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSizes "obsoleteMinVisibleSize" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'obsoleteMinVisibleSize + (\ x__ y__ -> x__ {_OrderSizes'obsoleteMinVisibleSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSizes "maybe'obsoleteMinVisibleSize" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'obsoleteMinVisibleSize + (\ x__ y__ -> x__ {_OrderSizes'obsoleteMinVisibleSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSizes "obsoleteRemainingSize" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'obsoleteRemainingSize + (\ x__ y__ -> x__ {_OrderSizes'obsoleteRemainingSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderSizes "maybe'obsoleteRemainingSize" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'obsoleteRemainingSize + (\ x__ y__ -> x__ {_OrderSizes'obsoleteRemainingSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSizes "triggerSize" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'triggerSize + (\ x__ y__ -> x__ {_OrderSizes'triggerSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderSizes "maybe'triggerSize" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'triggerSize + (\ x__ y__ -> x__ {_OrderSizes'triggerSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSizes "visibleSize" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'visibleSize + (\ x__ y__ -> x__ {_OrderSizes'visibleSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderSizes "maybe'visibleSize" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'visibleSize + (\ x__ y__ -> x__ {_OrderSizes'visibleSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSizes "minVisibleSize" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'minVisibleSize + (\ x__ y__ -> x__ {_OrderSizes'minVisibleSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderSizes "maybe'minVisibleSize" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'minVisibleSize + (\ x__ y__ -> x__ {_OrderSizes'minVisibleSize = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderSizes "remainingSize" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'remainingSize + (\ x__ y__ -> x__ {_OrderSizes'remainingSize = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField OrderSizes "maybe'remainingSize" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderSizes'remainingSize + (\ x__ y__ -> x__ {_OrderSizes'remainingSize = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderSizes where + messageName _ = Data.Text.pack "traderouting_1.OrderSizes" + packedMessageDescriptor _ + = "\n\ + \\n\ + \OrderSizes\DC26\n\ + \\NAKobsolete_trigger_size\CAN\SOH \SOH(\rR\DC3obsoleteTriggerSizeB\STX\CAN\SOH\DC26\n\ + \\NAKobsolete_visible_size\CAN\STX \SOH(\rR\DC3obsoleteVisibleSizeB\STX\CAN\SOH\DC2=\n\ + \\EMobsolete_min_visible_size\CAN\ETX \SOH(\rR\SYNobsoleteMinVisibleSizeB\STX\CAN\SOH\DC2:\n\ + \\ETBobsolete_remaining_size\CAN\EOT \SOH(\rR\NAKobsoleteRemainingSizeB\STX\CAN\SOH\DC2/\n\ + \\ftrigger_size\CAN\ENQ \SOH(\v2\f.cqg.DecimalR\vtriggerSize\DC2/\n\ + \\fvisible_size\CAN\ACK \SOH(\v2\f.cqg.DecimalR\vvisibleSize\DC26\n\ + \\DLEmin_visible_size\CAN\a \SOH(\v2\f.cqg.DecimalR\SOminVisibleSize\DC23\n\ + \\SOremaining_size\CAN\b \SOH(\v2\f.cqg.DecimalR\rremainingSize" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteTriggerSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_trigger_size" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteTriggerSize")) :: + Data.ProtoLens.FieldDescriptor OrderSizes + obsoleteVisibleSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_visible_size" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteVisibleSize")) :: + Data.ProtoLens.FieldDescriptor OrderSizes + obsoleteMinVisibleSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_min_visible_size" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteMinVisibleSize")) :: + Data.ProtoLens.FieldDescriptor OrderSizes + obsoleteRemainingSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_remaining_size" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteRemainingSize")) :: + Data.ProtoLens.FieldDescriptor OrderSizes + triggerSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trigger_size" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'triggerSize")) :: + Data.ProtoLens.FieldDescriptor OrderSizes + visibleSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "visible_size" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'visibleSize")) :: + Data.ProtoLens.FieldDescriptor OrderSizes + minVisibleSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "min_visible_size" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'minVisibleSize")) :: + Data.ProtoLens.FieldDescriptor OrderSizes + remainingSize__field_descriptor + = Data.ProtoLens.FieldDescriptor + "remaining_size" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'remainingSize")) :: + Data.ProtoLens.FieldDescriptor OrderSizes + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteTriggerSize__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteVisibleSize__field_descriptor), + (Data.ProtoLens.Tag 3, obsoleteMinVisibleSize__field_descriptor), + (Data.ProtoLens.Tag 4, obsoleteRemainingSize__field_descriptor), + (Data.ProtoLens.Tag 5, triggerSize__field_descriptor), + (Data.ProtoLens.Tag 6, visibleSize__field_descriptor), + (Data.ProtoLens.Tag 7, minVisibleSize__field_descriptor), + (Data.ProtoLens.Tag 8, remainingSize__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderSizes'_unknownFields + (\ x__ y__ -> x__ {_OrderSizes'_unknownFields = y__}) + defMessage + = OrderSizes'_constructor + {_OrderSizes'obsoleteTriggerSize = Prelude.Nothing, + _OrderSizes'obsoleteVisibleSize = Prelude.Nothing, + _OrderSizes'obsoleteMinVisibleSize = Prelude.Nothing, + _OrderSizes'obsoleteRemainingSize = Prelude.Nothing, + _OrderSizes'triggerSize = Prelude.Nothing, + _OrderSizes'visibleSize = Prelude.Nothing, + _OrderSizes'minVisibleSize = Prelude.Nothing, + _OrderSizes'remainingSize = Prelude.Nothing, + _OrderSizes'_unknownFields = []} + parseMessage + = let + loop :: + OrderSizes -> Data.ProtoLens.Encoding.Bytes.Parser OrderSizes + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_trigger_size" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteTriggerSize") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_visible_size" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteVisibleSize") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_min_visible_size" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteMinVisibleSize") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_remaining_size" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteRemainingSize") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trigger_size" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"triggerSize") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "visible_size" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"visibleSize") y x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "min_visible_size" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"minVisibleSize") y x) + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "remaining_size" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"remainingSize") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "OrderSizes" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteTriggerSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteVisibleSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteMinVisibleSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteRemainingSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'triggerSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'visibleSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'minVisibleSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'remainingSize") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))))) +instance Control.DeepSeq.NFData OrderSizes where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderSizes'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderSizes'obsoleteTriggerSize x__) + (Control.DeepSeq.deepseq + (_OrderSizes'obsoleteVisibleSize x__) + (Control.DeepSeq.deepseq + (_OrderSizes'obsoleteMinVisibleSize x__) + (Control.DeepSeq.deepseq + (_OrderSizes'obsoleteRemainingSize x__) + (Control.DeepSeq.deepseq + (_OrderSizes'triggerSize x__) + (Control.DeepSeq.deepseq + (_OrderSizes'visibleSize x__) + (Control.DeepSeq.deepseq + (_OrderSizes'minVisibleSize x__) + (Control.DeepSeq.deepseq + (_OrderSizes'remainingSize x__) ())))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.trailType' @:: Lens' OrderTrailing Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'trailType' @:: Lens' OrderTrailing (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.offset' @:: Lens' OrderTrailing Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'offset' @:: Lens' OrderTrailing (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.stopPrice' @:: Lens' OrderTrailing Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'stopPrice' @:: Lens' OrderTrailing (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.limitPrice' @:: Lens' OrderTrailing Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'limitPrice' @:: Lens' OrderTrailing (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.displayOffset' @:: Lens' OrderTrailing Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayOffset' @:: Lens' OrderTrailing (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.displayStopPrice' @:: Lens' OrderTrailing Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayStopPrice' @:: Lens' OrderTrailing (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.displayLimitPrice' @:: Lens' OrderTrailing Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'displayLimitPrice' @:: Lens' OrderTrailing (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.CMS.Traderouting1_Fields.updateTime' @:: Lens' OrderTrailing Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'updateTime' @:: Lens' OrderTrailing (Prelude.Maybe Data.Int.Int64)@ -} +data OrderTrailing + = OrderTrailing'_constructor {_OrderTrailing'trailType :: !(Prelude.Maybe Data.Word.Word32), + _OrderTrailing'offset :: !(Prelude.Maybe Prelude.Double), + _OrderTrailing'stopPrice :: !(Prelude.Maybe Prelude.Double), + _OrderTrailing'limitPrice :: !(Prelude.Maybe Prelude.Double), + _OrderTrailing'displayOffset :: !(Prelude.Maybe Data.Int.Int64), + _OrderTrailing'displayStopPrice :: !(Prelude.Maybe Data.Int.Int64), + _OrderTrailing'displayLimitPrice :: !(Prelude.Maybe Data.Int.Int64), + _OrderTrailing'updateTime :: !(Prelude.Maybe Data.Int.Int64), + _OrderTrailing'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderTrailing where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderTrailing "trailType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'trailType + (\ x__ y__ -> x__ {_OrderTrailing'trailType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderTrailing "maybe'trailType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'trailType + (\ x__ y__ -> x__ {_OrderTrailing'trailType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTrailing "offset" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'offset + (\ x__ y__ -> x__ {_OrderTrailing'offset = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderTrailing "maybe'offset" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'offset + (\ x__ y__ -> x__ {_OrderTrailing'offset = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTrailing "stopPrice" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'stopPrice + (\ x__ y__ -> x__ {_OrderTrailing'stopPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderTrailing "maybe'stopPrice" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'stopPrice + (\ x__ y__ -> x__ {_OrderTrailing'stopPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTrailing "limitPrice" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'limitPrice + (\ x__ y__ -> x__ {_OrderTrailing'limitPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderTrailing "maybe'limitPrice" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'limitPrice + (\ x__ y__ -> x__ {_OrderTrailing'limitPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTrailing "displayOffset" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'displayOffset + (\ x__ y__ -> x__ {_OrderTrailing'displayOffset = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderTrailing "maybe'displayOffset" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'displayOffset + (\ x__ y__ -> x__ {_OrderTrailing'displayOffset = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTrailing "displayStopPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'displayStopPrice + (\ x__ y__ -> x__ {_OrderTrailing'displayStopPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderTrailing "maybe'displayStopPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'displayStopPrice + (\ x__ y__ -> x__ {_OrderTrailing'displayStopPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTrailing "displayLimitPrice" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'displayLimitPrice + (\ x__ y__ -> x__ {_OrderTrailing'displayLimitPrice = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderTrailing "maybe'displayLimitPrice" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'displayLimitPrice + (\ x__ y__ -> x__ {_OrderTrailing'displayLimitPrice = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTrailing "updateTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'updateTime + (\ x__ y__ -> x__ {_OrderTrailing'updateTime = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderTrailing "maybe'updateTime" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTrailing'updateTime + (\ x__ y__ -> x__ {_OrderTrailing'updateTime = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderTrailing where + messageName _ = Data.Text.pack "traderouting_1.OrderTrailing" + packedMessageDescriptor _ + = "\n\ + \\rOrderTrailing\DC2\GS\n\ + \\n\ + \trail_type\CAN\SOH \SOH(\rR\ttrailType\DC2\SYN\n\ + \\ACKoffset\CAN\STX \SOH(\SOHR\ACKoffset\DC2\GS\n\ + \\n\ + \stop_price\CAN\ETX \SOH(\SOHR\tstopPrice\DC2\US\n\ + \\vlimit_price\CAN\EOT \SOH(\SOHR\n\ + \limitPrice\DC2%\n\ + \\SOdisplay_offset\CAN\ENQ \SOH(\DC2R\rdisplayOffset\DC2,\n\ + \\DC2display_stop_price\CAN\ACK \SOH(\DC2R\DLEdisplayStopPrice\DC2.\n\ + \\DC3display_limit_price\CAN\a \SOH(\DC2R\DC1displayLimitPrice\DC2\US\n\ + \\vupdate_time\CAN\b \SOH(\DC2R\n\ + \updateTime\"7\n\ + \\tTrailType\DC2\f\n\ + \\bBEST_BID\DLE\SOH\DC2\f\n\ + \\bBEST_ASK\DLE\STX\DC2\SO\n\ + \\n\ + \LAST_TRADE\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + trailType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trail_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'trailType")) :: + Data.ProtoLens.FieldDescriptor OrderTrailing + offset__field_descriptor + = Data.ProtoLens.FieldDescriptor + "offset" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'offset")) :: + Data.ProtoLens.FieldDescriptor OrderTrailing + stopPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "stop_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'stopPrice")) :: + Data.ProtoLens.FieldDescriptor OrderTrailing + limitPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "limit_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'limitPrice")) :: + Data.ProtoLens.FieldDescriptor OrderTrailing + displayOffset__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_offset" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayOffset")) :: + Data.ProtoLens.FieldDescriptor OrderTrailing + displayStopPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_stop_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayStopPrice")) :: + Data.ProtoLens.FieldDescriptor OrderTrailing + displayLimitPrice__field_descriptor + = Data.ProtoLens.FieldDescriptor + "display_limit_price" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'displayLimitPrice")) :: + Data.ProtoLens.FieldDescriptor OrderTrailing + updateTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "update_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'updateTime")) :: + Data.ProtoLens.FieldDescriptor OrderTrailing + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, trailType__field_descriptor), + (Data.ProtoLens.Tag 2, offset__field_descriptor), + (Data.ProtoLens.Tag 3, stopPrice__field_descriptor), + (Data.ProtoLens.Tag 4, limitPrice__field_descriptor), + (Data.ProtoLens.Tag 5, displayOffset__field_descriptor), + (Data.ProtoLens.Tag 6, displayStopPrice__field_descriptor), + (Data.ProtoLens.Tag 7, displayLimitPrice__field_descriptor), + (Data.ProtoLens.Tag 8, updateTime__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderTrailing'_unknownFields + (\ x__ y__ -> x__ {_OrderTrailing'_unknownFields = y__}) + defMessage + = OrderTrailing'_constructor + {_OrderTrailing'trailType = Prelude.Nothing, + _OrderTrailing'offset = Prelude.Nothing, + _OrderTrailing'stopPrice = Prelude.Nothing, + _OrderTrailing'limitPrice = Prelude.Nothing, + _OrderTrailing'displayOffset = Prelude.Nothing, + _OrderTrailing'displayStopPrice = Prelude.Nothing, + _OrderTrailing'displayLimitPrice = Prelude.Nothing, + _OrderTrailing'updateTime = Prelude.Nothing, + _OrderTrailing'_unknownFields = []} + parseMessage + = let + loop :: + OrderTrailing -> Data.ProtoLens.Encoding.Bytes.Parser OrderTrailing + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "trail_type" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"trailType") y x) + 17 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "offset" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"offset") y x) + 25 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "stop_price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"stopPrice") y x) + 33 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "limit_price" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"limitPrice") y x) + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_offset" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayOffset") y x) + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_stop_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayStopPrice") y x) + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "display_limit_price" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"displayLimitPrice") y x) + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "update_time" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"updateTime") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "OrderTrailing" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'trailType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'offset") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 17) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'stopPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 25) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'limitPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 33) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'displayOffset") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'displayStopPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'displayLimitPrice") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'updateTime") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))))) +instance Control.DeepSeq.NFData OrderTrailing where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderTrailing'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderTrailing'trailType x__) + (Control.DeepSeq.deepseq + (_OrderTrailing'offset x__) + (Control.DeepSeq.deepseq + (_OrderTrailing'stopPrice x__) + (Control.DeepSeq.deepseq + (_OrderTrailing'limitPrice x__) + (Control.DeepSeq.deepseq + (_OrderTrailing'displayOffset x__) + (Control.DeepSeq.deepseq + (_OrderTrailing'displayStopPrice x__) + (Control.DeepSeq.deepseq + (_OrderTrailing'displayLimitPrice x__) + (Control.DeepSeq.deepseq + (_OrderTrailing'updateTime x__) ())))))))) +data OrderTrailing'TrailType + = OrderTrailing'BEST_BID | + OrderTrailing'BEST_ASK | + OrderTrailing'LAST_TRADE + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderTrailing'TrailType where + maybeToEnum 1 = Prelude.Just OrderTrailing'BEST_BID + maybeToEnum 2 = Prelude.Just OrderTrailing'BEST_ASK + maybeToEnum 3 = Prelude.Just OrderTrailing'LAST_TRADE + maybeToEnum _ = Prelude.Nothing + showEnum OrderTrailing'BEST_BID = "BEST_BID" + showEnum OrderTrailing'BEST_ASK = "BEST_ASK" + showEnum OrderTrailing'LAST_TRADE = "LAST_TRADE" + readEnum k + | (Prelude.==) k "BEST_BID" = Prelude.Just OrderTrailing'BEST_BID + | (Prelude.==) k "BEST_ASK" = Prelude.Just OrderTrailing'BEST_ASK + | (Prelude.==) k "LAST_TRADE" + = Prelude.Just OrderTrailing'LAST_TRADE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderTrailing'TrailType where + minBound = OrderTrailing'BEST_BID + maxBound = OrderTrailing'LAST_TRADE +instance Prelude.Enum OrderTrailing'TrailType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum TrailType: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderTrailing'BEST_BID = 1 + fromEnum OrderTrailing'BEST_ASK = 2 + fromEnum OrderTrailing'LAST_TRADE = 3 + succ OrderTrailing'LAST_TRADE + = Prelude.error + "OrderTrailing'TrailType.succ: bad argument OrderTrailing'LAST_TRADE. This value would be out of bounds." + succ OrderTrailing'BEST_BID = OrderTrailing'BEST_ASK + succ OrderTrailing'BEST_ASK = OrderTrailing'LAST_TRADE + pred OrderTrailing'BEST_BID + = Prelude.error + "OrderTrailing'TrailType.pred: bad argument OrderTrailing'BEST_BID. This value would be out of bounds." + pred OrderTrailing'BEST_ASK = OrderTrailing'BEST_BID + pred OrderTrailing'LAST_TRADE = OrderTrailing'BEST_ASK + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderTrailing'TrailType where + fieldDefault = OrderTrailing'BEST_BID +instance Control.DeepSeq.NFData OrderTrailing'TrailType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.status' @:: Lens' OrderTransactionStatus Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.transId' @:: Lens' OrderTransactionStatus Data.Word.Word64@ + * 'Proto.CMS.Traderouting1_Fields.transUtcTime' @:: Lens' OrderTransactionStatus Data.Int.Int64@ + * 'Proto.CMS.Traderouting1_Fields.orderState' @:: Lens' OrderTransactionStatus Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.orderChainStatus' @:: Lens' OrderTransactionStatus Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.textMessage' @:: Lens' OrderTransactionStatus Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'textMessage' @:: Lens' OrderTransactionStatus (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteNewDiscretionaryOffset' @:: Lens' OrderTransactionStatus Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteNewDiscretionaryOffset' @:: Lens' OrderTransactionStatus (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoletePrevDiscretionaryOffset' @:: Lens' OrderTransactionStatus Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoletePrevDiscretionaryOffset' @:: Lens' OrderTransactionStatus (Prelude.Maybe Data.Word.Word32)@ -} +data OrderTransactionStatus + = OrderTransactionStatus'_constructor {_OrderTransactionStatus'status :: !Data.Word.Word32, + _OrderTransactionStatus'transId :: !Data.Word.Word64, + _OrderTransactionStatus'transUtcTime :: !Data.Int.Int64, + _OrderTransactionStatus'orderState :: !Data.Word.Word32, + _OrderTransactionStatus'orderChainStatus :: !Data.Word.Word32, + _OrderTransactionStatus'textMessage :: !(Prelude.Maybe Data.Text.Text), + _OrderTransactionStatus'obsoleteNewDiscretionaryOffset :: !(Prelude.Maybe Data.Word.Word32), + _OrderTransactionStatus'obsoletePrevDiscretionaryOffset :: !(Prelude.Maybe Data.Word.Word32), + _OrderTransactionStatus'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderTransactionStatus where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField OrderTransactionStatus "status" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTransactionStatus'status + (\ x__ y__ -> x__ {_OrderTransactionStatus'status = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTransactionStatus "transId" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTransactionStatus'transId + (\ x__ y__ -> x__ {_OrderTransactionStatus'transId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTransactionStatus "transUtcTime" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTransactionStatus'transUtcTime + (\ x__ y__ -> x__ {_OrderTransactionStatus'transUtcTime = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTransactionStatus "orderState" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTransactionStatus'orderState + (\ x__ y__ -> x__ {_OrderTransactionStatus'orderState = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTransactionStatus "orderChainStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTransactionStatus'orderChainStatus + (\ x__ y__ + -> x__ {_OrderTransactionStatus'orderChainStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTransactionStatus "textMessage" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTransactionStatus'textMessage + (\ x__ y__ -> x__ {_OrderTransactionStatus'textMessage = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderTransactionStatus "maybe'textMessage" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTransactionStatus'textMessage + (\ x__ y__ -> x__ {_OrderTransactionStatus'textMessage = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTransactionStatus "obsoleteNewDiscretionaryOffset" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTransactionStatus'obsoleteNewDiscretionaryOffset + (\ x__ y__ + -> x__ + {_OrderTransactionStatus'obsoleteNewDiscretionaryOffset = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderTransactionStatus "maybe'obsoleteNewDiscretionaryOffset" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTransactionStatus'obsoleteNewDiscretionaryOffset + (\ x__ y__ + -> x__ + {_OrderTransactionStatus'obsoleteNewDiscretionaryOffset = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField OrderTransactionStatus "obsoletePrevDiscretionaryOffset" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTransactionStatus'obsoletePrevDiscretionaryOffset + (\ x__ y__ + -> x__ + {_OrderTransactionStatus'obsoletePrevDiscretionaryOffset = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField OrderTransactionStatus "maybe'obsoletePrevDiscretionaryOffset" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _OrderTransactionStatus'obsoletePrevDiscretionaryOffset + (\ x__ y__ + -> x__ + {_OrderTransactionStatus'obsoletePrevDiscretionaryOffset = y__})) + Prelude.id +instance Data.ProtoLens.Message OrderTransactionStatus where + messageName _ + = Data.Text.pack "traderouting_1.OrderTransactionStatus" + packedMessageDescriptor _ + = "\n\ + \\SYNOrderTransactionStatus\DC2\SYN\n\ + \\ACKstatus\CAN\SOH \STX(\rR\ACKstatus\DC2\EM\n\ + \\btrans_id\CAN\STX \STX(\EOTR\atransId\DC2$\n\ + \\SOtrans_utc_time\CAN\ETX \STX(\DC2R\ftransUtcTime\DC2\US\n\ + \\vorder_state\CAN\EOT \STX(\rR\n\ + \orderState\DC2,\n\ + \\DC2order_chain_status\CAN\ENQ \STX(\rR\DLEorderChainStatus\DC2!\n\ + \\ftext_message\CAN\ACK \SOH(\tR\vtextMessage\DC2M\n\ + \!obsolete_new_discretionary_offset\CAN\a \SOH(\rR\RSobsoleteNewDiscretionaryOffsetB\STX\CAN\SOH\DC2O\n\ + \\"obsolete_prev_discretionary_offset\CAN\b \SOH(\rR\USobsoletePrevDiscretionaryOffsetB\STX\CAN\SOH\"\139\EOT\n\ + \\ACKStatus\DC2\r\n\ + \\tUNDEFINED\DLE\NUL\DC2\SO\n\ + \\n\ + \IN_TRANSIT\DLE\SOH\DC2\f\n\ + \\bREJECTED\DLE\STX\DC2\r\n\ + \\tACK_PLACE\DLE\ETX\DC2\v\n\ + \\aEXPIRED\DLE\EOT\DC2\r\n\ + \\tIN_CANCEL\DLE\ENQ\DC2\SO\n\ + \\n\ + \ACK_CANCEL\DLE\ACK\DC2\DC1\n\ + \\rREJECT_CANCEL\DLE\a\DC2\r\n\ + \\tIN_MODIFY\DLE\b\DC2\SO\n\ + \\n\ + \ACK_MODIFY\DLE\t\DC2\DC1\n\ + \\rREJECT_MODIFY\DLE\n\ + \\DC2\b\n\ + \\EOTFILL\DLE\v\DC2\v\n\ + \\aSUSPEND\DLE\f\DC2\DLE\n\ + \\fFILL_CORRECT\DLE\r\DC2\SI\n\ + \\vFILL_CANCEL\DLE\SO\DC2\r\n\ + \\tFILL_BUST\DLE\SI\DC2\f\n\ + \\bACTIVEAT\DLE\DLE\DC2\SO\n\ + \\n\ + \DISCONNECT\DLE\DC1\DC2\ETB\n\ + \\DC3SYNTHETIC_ACTIVATED\DLE\DC2\DC2\n\ + \\n\ + \\ACKUPDATE\DLE\DC3\DC2\DC4\n\ + \\DLESYNTHETIC_FAILED\DLE\DC4\DC2\SYN\n\ + \\DC2SYNTHETIC_OVERFILL\DLE\NAK\DC2\DC2\n\ + \\SOSYNTHETIC_HANG\DLE\SYN\DC2\r\n\ + \\tAPPROVING\DLE\ETB\DC2\NAK\n\ + \\DC1APPROVE_REQUESTED\DLE\CAN\DC2\CAN\n\ + \\DC4APPROVED_BY_EXCHANGE\DLE\EM\DC2\DC4\n\ + \\DLEREJECTED_BY_USER\DLE\SUB\DC2\v\n\ + \\aMATCHED\DLE\ESC\DC2\DC1\n\ + \\rTRADE_AMENDED\DLE\FS\DC2\DLE\n\ + \\fTRADE_BROKEN\DLE\GS" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + status__field_descriptor + = Data.ProtoLens.FieldDescriptor + "status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"status")) :: + Data.ProtoLens.FieldDescriptor OrderTransactionStatus + transId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trans_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"transId")) :: + Data.ProtoLens.FieldDescriptor OrderTransactionStatus + transUtcTime__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trans_utc_time" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"transUtcTime")) :: + Data.ProtoLens.FieldDescriptor OrderTransactionStatus + orderState__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_state" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"orderState")) :: + Data.ProtoLens.FieldDescriptor OrderTransactionStatus + orderChainStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_chain_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"orderChainStatus")) :: + Data.ProtoLens.FieldDescriptor OrderTransactionStatus + textMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "text_message" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'textMessage")) :: + Data.ProtoLens.FieldDescriptor OrderTransactionStatus + obsoleteNewDiscretionaryOffset__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_new_discretionary_offset" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteNewDiscretionaryOffset")) :: + Data.ProtoLens.FieldDescriptor OrderTransactionStatus + obsoletePrevDiscretionaryOffset__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_prev_discretionary_offset" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoletePrevDiscretionaryOffset")) :: + Data.ProtoLens.FieldDescriptor OrderTransactionStatus + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, status__field_descriptor), + (Data.ProtoLens.Tag 2, transId__field_descriptor), + (Data.ProtoLens.Tag 3, transUtcTime__field_descriptor), + (Data.ProtoLens.Tag 4, orderState__field_descriptor), + (Data.ProtoLens.Tag 5, orderChainStatus__field_descriptor), + (Data.ProtoLens.Tag 6, textMessage__field_descriptor), + (Data.ProtoLens.Tag 7, + obsoleteNewDiscretionaryOffset__field_descriptor), + (Data.ProtoLens.Tag 8, + obsoletePrevDiscretionaryOffset__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderTransactionStatus'_unknownFields + (\ x__ y__ -> x__ {_OrderTransactionStatus'_unknownFields = y__}) + defMessage + = OrderTransactionStatus'_constructor + {_OrderTransactionStatus'status = Data.ProtoLens.fieldDefault, + _OrderTransactionStatus'transId = Data.ProtoLens.fieldDefault, + _OrderTransactionStatus'transUtcTime = Data.ProtoLens.fieldDefault, + _OrderTransactionStatus'orderState = Data.ProtoLens.fieldDefault, + _OrderTransactionStatus'orderChainStatus = Data.ProtoLens.fieldDefault, + _OrderTransactionStatus'textMessage = Prelude.Nothing, + _OrderTransactionStatus'obsoleteNewDiscretionaryOffset = Prelude.Nothing, + _OrderTransactionStatus'obsoletePrevDiscretionaryOffset = Prelude.Nothing, + _OrderTransactionStatus'_unknownFields = []} + parseMessage + = let + loop :: + OrderTransactionStatus + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser OrderTransactionStatus + loop + x + required'orderChainStatus + required'orderState + required'status + required'transId + required'transUtcTime + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'orderChainStatus then + (:) "order_chain_status" + else + Prelude.id) + ((if required'orderState then (:) "order_state" else Prelude.id) + ((if required'status then (:) "status" else Prelude.id) + ((if required'transId then (:) "trans_id" else Prelude.id) + ((if required'transUtcTime then + (:) "trans_utc_time" + else + Prelude.id) + [])))) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "status" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"status") y x) + required'orderChainStatus required'orderState Prelude.False + required'transId required'transUtcTime + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "trans_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"transId") y x) + required'orderChainStatus required'orderState required'status + Prelude.False required'transUtcTime + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "trans_utc_time" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"transUtcTime") y x) + required'orderChainStatus required'orderState required'status + required'transId Prelude.False + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "order_state" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderState") y x) + required'orderChainStatus Prelude.False required'status + required'transId required'transUtcTime + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "order_chain_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderChainStatus") y x) + Prelude.False required'orderState required'status required'transId + required'transUtcTime + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "text_message" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"textMessage") y x) + required'orderChainStatus required'orderState required'status + required'transId required'transUtcTime + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_new_discretionary_offset" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteNewDiscretionaryOffset") + y x) + required'orderChainStatus required'orderState required'status + required'transId required'transUtcTime + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_prev_discretionary_offset" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoletePrevDiscretionaryOffset") + y x) + required'orderChainStatus required'orderState required'status + required'transId required'transUtcTime + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'orderChainStatus required'orderState required'status + required'transId required'transUtcTime + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop + Data.ProtoLens.defMessage Prelude.True Prelude.True Prelude.True + Prelude.True Prelude.True) + "OrderTransactionStatus" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"status") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Lens.Family2.view (Data.ProtoLens.Field.field @"transId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord + (Lens.Family2.view + (Data.ProtoLens.Field.field @"transUtcTime") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"orderState") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"orderChainStatus") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'textMessage") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteNewDiscretionaryOffset") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoletePrevDiscretionaryOffset") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))))))) +instance Control.DeepSeq.NFData OrderTransactionStatus where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_OrderTransactionStatus'_unknownFields x__) + (Control.DeepSeq.deepseq + (_OrderTransactionStatus'status x__) + (Control.DeepSeq.deepseq + (_OrderTransactionStatus'transId x__) + (Control.DeepSeq.deepseq + (_OrderTransactionStatus'transUtcTime x__) + (Control.DeepSeq.deepseq + (_OrderTransactionStatus'orderState x__) + (Control.DeepSeq.deepseq + (_OrderTransactionStatus'orderChainStatus x__) + (Control.DeepSeq.deepseq + (_OrderTransactionStatus'textMessage x__) + (Control.DeepSeq.deepseq + (_OrderTransactionStatus'obsoleteNewDiscretionaryOffset x__) + (Control.DeepSeq.deepseq + (_OrderTransactionStatus'obsoletePrevDiscretionaryOffset x__) + ())))))))) +data OrderTransactionStatus'Status + = OrderTransactionStatus'UNDEFINED | + OrderTransactionStatus'IN_TRANSIT | + OrderTransactionStatus'REJECTED | + OrderTransactionStatus'ACK_PLACE | + OrderTransactionStatus'EXPIRED | + OrderTransactionStatus'IN_CANCEL | + OrderTransactionStatus'ACK_CANCEL | + OrderTransactionStatus'REJECT_CANCEL | + OrderTransactionStatus'IN_MODIFY | + OrderTransactionStatus'ACK_MODIFY | + OrderTransactionStatus'REJECT_MODIFY | + OrderTransactionStatus'FILL | + OrderTransactionStatus'SUSPEND | + OrderTransactionStatus'FILL_CORRECT | + OrderTransactionStatus'FILL_CANCEL | + OrderTransactionStatus'FILL_BUST | + OrderTransactionStatus'ACTIVEAT | + OrderTransactionStatus'DISCONNECT | + OrderTransactionStatus'SYNTHETIC_ACTIVATED | + OrderTransactionStatus'UPDATE | + OrderTransactionStatus'SYNTHETIC_FAILED | + OrderTransactionStatus'SYNTHETIC_OVERFILL | + OrderTransactionStatus'SYNTHETIC_HANG | + OrderTransactionStatus'APPROVING | + OrderTransactionStatus'APPROVE_REQUESTED | + OrderTransactionStatus'APPROVED_BY_EXCHANGE | + OrderTransactionStatus'REJECTED_BY_USER | + OrderTransactionStatus'MATCHED | + OrderTransactionStatus'TRADE_AMENDED | + OrderTransactionStatus'TRADE_BROKEN + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderTransactionStatus'Status where + maybeToEnum 0 = Prelude.Just OrderTransactionStatus'UNDEFINED + maybeToEnum 1 = Prelude.Just OrderTransactionStatus'IN_TRANSIT + maybeToEnum 2 = Prelude.Just OrderTransactionStatus'REJECTED + maybeToEnum 3 = Prelude.Just OrderTransactionStatus'ACK_PLACE + maybeToEnum 4 = Prelude.Just OrderTransactionStatus'EXPIRED + maybeToEnum 5 = Prelude.Just OrderTransactionStatus'IN_CANCEL + maybeToEnum 6 = Prelude.Just OrderTransactionStatus'ACK_CANCEL + maybeToEnum 7 = Prelude.Just OrderTransactionStatus'REJECT_CANCEL + maybeToEnum 8 = Prelude.Just OrderTransactionStatus'IN_MODIFY + maybeToEnum 9 = Prelude.Just OrderTransactionStatus'ACK_MODIFY + maybeToEnum 10 = Prelude.Just OrderTransactionStatus'REJECT_MODIFY + maybeToEnum 11 = Prelude.Just OrderTransactionStatus'FILL + maybeToEnum 12 = Prelude.Just OrderTransactionStatus'SUSPEND + maybeToEnum 13 = Prelude.Just OrderTransactionStatus'FILL_CORRECT + maybeToEnum 14 = Prelude.Just OrderTransactionStatus'FILL_CANCEL + maybeToEnum 15 = Prelude.Just OrderTransactionStatus'FILL_BUST + maybeToEnum 16 = Prelude.Just OrderTransactionStatus'ACTIVEAT + maybeToEnum 17 = Prelude.Just OrderTransactionStatus'DISCONNECT + maybeToEnum 18 + = Prelude.Just OrderTransactionStatus'SYNTHETIC_ACTIVATED + maybeToEnum 19 = Prelude.Just OrderTransactionStatus'UPDATE + maybeToEnum 20 + = Prelude.Just OrderTransactionStatus'SYNTHETIC_FAILED + maybeToEnum 21 + = Prelude.Just OrderTransactionStatus'SYNTHETIC_OVERFILL + maybeToEnum 22 = Prelude.Just OrderTransactionStatus'SYNTHETIC_HANG + maybeToEnum 23 = Prelude.Just OrderTransactionStatus'APPROVING + maybeToEnum 24 + = Prelude.Just OrderTransactionStatus'APPROVE_REQUESTED + maybeToEnum 25 + = Prelude.Just OrderTransactionStatus'APPROVED_BY_EXCHANGE + maybeToEnum 26 + = Prelude.Just OrderTransactionStatus'REJECTED_BY_USER + maybeToEnum 27 = Prelude.Just OrderTransactionStatus'MATCHED + maybeToEnum 28 = Prelude.Just OrderTransactionStatus'TRADE_AMENDED + maybeToEnum 29 = Prelude.Just OrderTransactionStatus'TRADE_BROKEN + maybeToEnum _ = Prelude.Nothing + showEnum OrderTransactionStatus'UNDEFINED = "UNDEFINED" + showEnum OrderTransactionStatus'IN_TRANSIT = "IN_TRANSIT" + showEnum OrderTransactionStatus'REJECTED = "REJECTED" + showEnum OrderTransactionStatus'ACK_PLACE = "ACK_PLACE" + showEnum OrderTransactionStatus'EXPIRED = "EXPIRED" + showEnum OrderTransactionStatus'IN_CANCEL = "IN_CANCEL" + showEnum OrderTransactionStatus'ACK_CANCEL = "ACK_CANCEL" + showEnum OrderTransactionStatus'REJECT_CANCEL = "REJECT_CANCEL" + showEnum OrderTransactionStatus'IN_MODIFY = "IN_MODIFY" + showEnum OrderTransactionStatus'ACK_MODIFY = "ACK_MODIFY" + showEnum OrderTransactionStatus'REJECT_MODIFY = "REJECT_MODIFY" + showEnum OrderTransactionStatus'FILL = "FILL" + showEnum OrderTransactionStatus'SUSPEND = "SUSPEND" + showEnum OrderTransactionStatus'FILL_CORRECT = "FILL_CORRECT" + showEnum OrderTransactionStatus'FILL_CANCEL = "FILL_CANCEL" + showEnum OrderTransactionStatus'FILL_BUST = "FILL_BUST" + showEnum OrderTransactionStatus'ACTIVEAT = "ACTIVEAT" + showEnum OrderTransactionStatus'DISCONNECT = "DISCONNECT" + showEnum OrderTransactionStatus'SYNTHETIC_ACTIVATED + = "SYNTHETIC_ACTIVATED" + showEnum OrderTransactionStatus'UPDATE = "UPDATE" + showEnum OrderTransactionStatus'SYNTHETIC_FAILED + = "SYNTHETIC_FAILED" + showEnum OrderTransactionStatus'SYNTHETIC_OVERFILL + = "SYNTHETIC_OVERFILL" + showEnum OrderTransactionStatus'SYNTHETIC_HANG = "SYNTHETIC_HANG" + showEnum OrderTransactionStatus'APPROVING = "APPROVING" + showEnum OrderTransactionStatus'APPROVE_REQUESTED + = "APPROVE_REQUESTED" + showEnum OrderTransactionStatus'APPROVED_BY_EXCHANGE + = "APPROVED_BY_EXCHANGE" + showEnum OrderTransactionStatus'REJECTED_BY_USER + = "REJECTED_BY_USER" + showEnum OrderTransactionStatus'MATCHED = "MATCHED" + showEnum OrderTransactionStatus'TRADE_AMENDED = "TRADE_AMENDED" + showEnum OrderTransactionStatus'TRADE_BROKEN = "TRADE_BROKEN" + readEnum k + | (Prelude.==) k "UNDEFINED" + = Prelude.Just OrderTransactionStatus'UNDEFINED + | (Prelude.==) k "IN_TRANSIT" + = Prelude.Just OrderTransactionStatus'IN_TRANSIT + | (Prelude.==) k "REJECTED" + = Prelude.Just OrderTransactionStatus'REJECTED + | (Prelude.==) k "ACK_PLACE" + = Prelude.Just OrderTransactionStatus'ACK_PLACE + | (Prelude.==) k "EXPIRED" + = Prelude.Just OrderTransactionStatus'EXPIRED + | (Prelude.==) k "IN_CANCEL" + = Prelude.Just OrderTransactionStatus'IN_CANCEL + | (Prelude.==) k "ACK_CANCEL" + = Prelude.Just OrderTransactionStatus'ACK_CANCEL + | (Prelude.==) k "REJECT_CANCEL" + = Prelude.Just OrderTransactionStatus'REJECT_CANCEL + | (Prelude.==) k "IN_MODIFY" + = Prelude.Just OrderTransactionStatus'IN_MODIFY + | (Prelude.==) k "ACK_MODIFY" + = Prelude.Just OrderTransactionStatus'ACK_MODIFY + | (Prelude.==) k "REJECT_MODIFY" + = Prelude.Just OrderTransactionStatus'REJECT_MODIFY + | (Prelude.==) k "FILL" = Prelude.Just OrderTransactionStatus'FILL + | (Prelude.==) k "SUSPEND" + = Prelude.Just OrderTransactionStatus'SUSPEND + | (Prelude.==) k "FILL_CORRECT" + = Prelude.Just OrderTransactionStatus'FILL_CORRECT + | (Prelude.==) k "FILL_CANCEL" + = Prelude.Just OrderTransactionStatus'FILL_CANCEL + | (Prelude.==) k "FILL_BUST" + = Prelude.Just OrderTransactionStatus'FILL_BUST + | (Prelude.==) k "ACTIVEAT" + = Prelude.Just OrderTransactionStatus'ACTIVEAT + | (Prelude.==) k "DISCONNECT" + = Prelude.Just OrderTransactionStatus'DISCONNECT + | (Prelude.==) k "SYNTHETIC_ACTIVATED" + = Prelude.Just OrderTransactionStatus'SYNTHETIC_ACTIVATED + | (Prelude.==) k "UPDATE" + = Prelude.Just OrderTransactionStatus'UPDATE + | (Prelude.==) k "SYNTHETIC_FAILED" + = Prelude.Just OrderTransactionStatus'SYNTHETIC_FAILED + | (Prelude.==) k "SYNTHETIC_OVERFILL" + = Prelude.Just OrderTransactionStatus'SYNTHETIC_OVERFILL + | (Prelude.==) k "SYNTHETIC_HANG" + = Prelude.Just OrderTransactionStatus'SYNTHETIC_HANG + | (Prelude.==) k "APPROVING" + = Prelude.Just OrderTransactionStatus'APPROVING + | (Prelude.==) k "APPROVE_REQUESTED" + = Prelude.Just OrderTransactionStatus'APPROVE_REQUESTED + | (Prelude.==) k "APPROVED_BY_EXCHANGE" + = Prelude.Just OrderTransactionStatus'APPROVED_BY_EXCHANGE + | (Prelude.==) k "REJECTED_BY_USER" + = Prelude.Just OrderTransactionStatus'REJECTED_BY_USER + | (Prelude.==) k "MATCHED" + = Prelude.Just OrderTransactionStatus'MATCHED + | (Prelude.==) k "TRADE_AMENDED" + = Prelude.Just OrderTransactionStatus'TRADE_AMENDED + | (Prelude.==) k "TRADE_BROKEN" + = Prelude.Just OrderTransactionStatus'TRADE_BROKEN + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderTransactionStatus'Status where + minBound = OrderTransactionStatus'UNDEFINED + maxBound = OrderTransactionStatus'TRADE_BROKEN +instance Prelude.Enum OrderTransactionStatus'Status where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum Status: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderTransactionStatus'UNDEFINED = 0 + fromEnum OrderTransactionStatus'IN_TRANSIT = 1 + fromEnum OrderTransactionStatus'REJECTED = 2 + fromEnum OrderTransactionStatus'ACK_PLACE = 3 + fromEnum OrderTransactionStatus'EXPIRED = 4 + fromEnum OrderTransactionStatus'IN_CANCEL = 5 + fromEnum OrderTransactionStatus'ACK_CANCEL = 6 + fromEnum OrderTransactionStatus'REJECT_CANCEL = 7 + fromEnum OrderTransactionStatus'IN_MODIFY = 8 + fromEnum OrderTransactionStatus'ACK_MODIFY = 9 + fromEnum OrderTransactionStatus'REJECT_MODIFY = 10 + fromEnum OrderTransactionStatus'FILL = 11 + fromEnum OrderTransactionStatus'SUSPEND = 12 + fromEnum OrderTransactionStatus'FILL_CORRECT = 13 + fromEnum OrderTransactionStatus'FILL_CANCEL = 14 + fromEnum OrderTransactionStatus'FILL_BUST = 15 + fromEnum OrderTransactionStatus'ACTIVEAT = 16 + fromEnum OrderTransactionStatus'DISCONNECT = 17 + fromEnum OrderTransactionStatus'SYNTHETIC_ACTIVATED = 18 + fromEnum OrderTransactionStatus'UPDATE = 19 + fromEnum OrderTransactionStatus'SYNTHETIC_FAILED = 20 + fromEnum OrderTransactionStatus'SYNTHETIC_OVERFILL = 21 + fromEnum OrderTransactionStatus'SYNTHETIC_HANG = 22 + fromEnum OrderTransactionStatus'APPROVING = 23 + fromEnum OrderTransactionStatus'APPROVE_REQUESTED = 24 + fromEnum OrderTransactionStatus'APPROVED_BY_EXCHANGE = 25 + fromEnum OrderTransactionStatus'REJECTED_BY_USER = 26 + fromEnum OrderTransactionStatus'MATCHED = 27 + fromEnum OrderTransactionStatus'TRADE_AMENDED = 28 + fromEnum OrderTransactionStatus'TRADE_BROKEN = 29 + succ OrderTransactionStatus'TRADE_BROKEN + = Prelude.error + "OrderTransactionStatus'Status.succ: bad argument OrderTransactionStatus'TRADE_BROKEN. This value would be out of bounds." + succ OrderTransactionStatus'UNDEFINED + = OrderTransactionStatus'IN_TRANSIT + succ OrderTransactionStatus'IN_TRANSIT + = OrderTransactionStatus'REJECTED + succ OrderTransactionStatus'REJECTED + = OrderTransactionStatus'ACK_PLACE + succ OrderTransactionStatus'ACK_PLACE + = OrderTransactionStatus'EXPIRED + succ OrderTransactionStatus'EXPIRED + = OrderTransactionStatus'IN_CANCEL + succ OrderTransactionStatus'IN_CANCEL + = OrderTransactionStatus'ACK_CANCEL + succ OrderTransactionStatus'ACK_CANCEL + = OrderTransactionStatus'REJECT_CANCEL + succ OrderTransactionStatus'REJECT_CANCEL + = OrderTransactionStatus'IN_MODIFY + succ OrderTransactionStatus'IN_MODIFY + = OrderTransactionStatus'ACK_MODIFY + succ OrderTransactionStatus'ACK_MODIFY + = OrderTransactionStatus'REJECT_MODIFY + succ OrderTransactionStatus'REJECT_MODIFY + = OrderTransactionStatus'FILL + succ OrderTransactionStatus'FILL = OrderTransactionStatus'SUSPEND + succ OrderTransactionStatus'SUSPEND + = OrderTransactionStatus'FILL_CORRECT + succ OrderTransactionStatus'FILL_CORRECT + = OrderTransactionStatus'FILL_CANCEL + succ OrderTransactionStatus'FILL_CANCEL + = OrderTransactionStatus'FILL_BUST + succ OrderTransactionStatus'FILL_BUST + = OrderTransactionStatus'ACTIVEAT + succ OrderTransactionStatus'ACTIVEAT + = OrderTransactionStatus'DISCONNECT + succ OrderTransactionStatus'DISCONNECT + = OrderTransactionStatus'SYNTHETIC_ACTIVATED + succ OrderTransactionStatus'SYNTHETIC_ACTIVATED + = OrderTransactionStatus'UPDATE + succ OrderTransactionStatus'UPDATE + = OrderTransactionStatus'SYNTHETIC_FAILED + succ OrderTransactionStatus'SYNTHETIC_FAILED + = OrderTransactionStatus'SYNTHETIC_OVERFILL + succ OrderTransactionStatus'SYNTHETIC_OVERFILL + = OrderTransactionStatus'SYNTHETIC_HANG + succ OrderTransactionStatus'SYNTHETIC_HANG + = OrderTransactionStatus'APPROVING + succ OrderTransactionStatus'APPROVING + = OrderTransactionStatus'APPROVE_REQUESTED + succ OrderTransactionStatus'APPROVE_REQUESTED + = OrderTransactionStatus'APPROVED_BY_EXCHANGE + succ OrderTransactionStatus'APPROVED_BY_EXCHANGE + = OrderTransactionStatus'REJECTED_BY_USER + succ OrderTransactionStatus'REJECTED_BY_USER + = OrderTransactionStatus'MATCHED + succ OrderTransactionStatus'MATCHED + = OrderTransactionStatus'TRADE_AMENDED + succ OrderTransactionStatus'TRADE_AMENDED + = OrderTransactionStatus'TRADE_BROKEN + pred OrderTransactionStatus'UNDEFINED + = Prelude.error + "OrderTransactionStatus'Status.pred: bad argument OrderTransactionStatus'UNDEFINED. This value would be out of bounds." + pred OrderTransactionStatus'IN_TRANSIT + = OrderTransactionStatus'UNDEFINED + pred OrderTransactionStatus'REJECTED + = OrderTransactionStatus'IN_TRANSIT + pred OrderTransactionStatus'ACK_PLACE + = OrderTransactionStatus'REJECTED + pred OrderTransactionStatus'EXPIRED + = OrderTransactionStatus'ACK_PLACE + pred OrderTransactionStatus'IN_CANCEL + = OrderTransactionStatus'EXPIRED + pred OrderTransactionStatus'ACK_CANCEL + = OrderTransactionStatus'IN_CANCEL + pred OrderTransactionStatus'REJECT_CANCEL + = OrderTransactionStatus'ACK_CANCEL + pred OrderTransactionStatus'IN_MODIFY + = OrderTransactionStatus'REJECT_CANCEL + pred OrderTransactionStatus'ACK_MODIFY + = OrderTransactionStatus'IN_MODIFY + pred OrderTransactionStatus'REJECT_MODIFY + = OrderTransactionStatus'ACK_MODIFY + pred OrderTransactionStatus'FILL + = OrderTransactionStatus'REJECT_MODIFY + pred OrderTransactionStatus'SUSPEND = OrderTransactionStatus'FILL + pred OrderTransactionStatus'FILL_CORRECT + = OrderTransactionStatus'SUSPEND + pred OrderTransactionStatus'FILL_CANCEL + = OrderTransactionStatus'FILL_CORRECT + pred OrderTransactionStatus'FILL_BUST + = OrderTransactionStatus'FILL_CANCEL + pred OrderTransactionStatus'ACTIVEAT + = OrderTransactionStatus'FILL_BUST + pred OrderTransactionStatus'DISCONNECT + = OrderTransactionStatus'ACTIVEAT + pred OrderTransactionStatus'SYNTHETIC_ACTIVATED + = OrderTransactionStatus'DISCONNECT + pred OrderTransactionStatus'UPDATE + = OrderTransactionStatus'SYNTHETIC_ACTIVATED + pred OrderTransactionStatus'SYNTHETIC_FAILED + = OrderTransactionStatus'UPDATE + pred OrderTransactionStatus'SYNTHETIC_OVERFILL + = OrderTransactionStatus'SYNTHETIC_FAILED + pred OrderTransactionStatus'SYNTHETIC_HANG + = OrderTransactionStatus'SYNTHETIC_OVERFILL + pred OrderTransactionStatus'APPROVING + = OrderTransactionStatus'SYNTHETIC_HANG + pred OrderTransactionStatus'APPROVE_REQUESTED + = OrderTransactionStatus'APPROVING + pred OrderTransactionStatus'APPROVED_BY_EXCHANGE + = OrderTransactionStatus'APPROVE_REQUESTED + pred OrderTransactionStatus'REJECTED_BY_USER + = OrderTransactionStatus'APPROVED_BY_EXCHANGE + pred OrderTransactionStatus'MATCHED + = OrderTransactionStatus'REJECTED_BY_USER + pred OrderTransactionStatus'TRADE_AMENDED + = OrderTransactionStatus'MATCHED + pred OrderTransactionStatus'TRADE_BROKEN + = OrderTransactionStatus'TRADE_AMENDED + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderTransactionStatus'Status where + fieldDefault = OrderTransactionStatus'UNDEFINED +instance Control.DeepSeq.NFData OrderTransactionStatus'Status where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.clearedFields' @:: Lens' PositionAndTradeLimits [Data.Word.Word32]@ + * 'Proto.CMS.Traderouting1_Fields.vec'clearedFields' @:: Lens' PositionAndTradeLimits (Data.Vector.Unboxed.Vector Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteCommodityPositionLimit' @:: Lens' PositionAndTradeLimits LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteCommodityPositionLimit' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteInstrumentPositionLimit' @:: Lens' PositionAndTradeLimits LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteInstrumentPositionLimit' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteContractPositionLimit' @:: Lens' PositionAndTradeLimits LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteContractPositionLimit' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteTradeSizeLimit' @:: Lens' PositionAndTradeLimits LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteTradeSizeLimit' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.tradePriceLimitTicks' @:: Lens' PositionAndTradeLimits LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradePriceLimitTicks' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.tradePriceLimitPercent' @:: Lens' PositionAndTradeLimits LimitValueDouble@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradePriceLimitPercent' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValueDouble)@ + * 'Proto.CMS.Traderouting1_Fields.tradePriceLimitTicksContinuous' @:: Lens' PositionAndTradeLimits TradePriceLimitsTicks@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradePriceLimitTicksContinuous' @:: Lens' PositionAndTradeLimits (Prelude.Maybe TradePriceLimitsTicks)@ + * 'Proto.CMS.Traderouting1_Fields.tradePriceLimitTicksNonContinuous' @:: Lens' PositionAndTradeLimits TradePriceLimitsTicks@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradePriceLimitTicksNonContinuous' @:: Lens' PositionAndTradeLimits (Prelude.Maybe TradePriceLimitsTicks)@ + * 'Proto.CMS.Traderouting1_Fields.tradePriceLimitPercentContinuous' @:: Lens' PositionAndTradeLimits TradePriceLimitsPercent@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradePriceLimitPercentContinuous' @:: Lens' PositionAndTradeLimits (Prelude.Maybe TradePriceLimitsPercent)@ + * 'Proto.CMS.Traderouting1_Fields.tradePriceLimitPercentNonContinuous' @:: Lens' PositionAndTradeLimits TradePriceLimitsPercent@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradePriceLimitPercentNonContinuous' @:: Lens' PositionAndTradeLimits (Prelude.Maybe TradePriceLimitsPercent)@ + * 'Proto.CMS.Traderouting1_Fields.lastTradingDateLimit' @:: Lens' PositionAndTradeLimits LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'lastTradingDateLimit' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.commodityPositionLimit' @:: Lens' PositionAndTradeLimits LimitValueDecimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'commodityPositionLimit' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValueDecimal)@ + * 'Proto.CMS.Traderouting1_Fields.instrumentPositionLimit' @:: Lens' PositionAndTradeLimits LimitValueDecimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'instrumentPositionLimit' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValueDecimal)@ + * 'Proto.CMS.Traderouting1_Fields.contractPositionLimit' @:: Lens' PositionAndTradeLimits LimitValueDecimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'contractPositionLimit' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValueDecimal)@ + * 'Proto.CMS.Traderouting1_Fields.tradeSizeLimit' @:: Lens' PositionAndTradeLimits LimitValueDecimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeSizeLimit' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValueDecimal)@ + * 'Proto.CMS.Traderouting1_Fields.longPositionsOnly' @:: Lens' PositionAndTradeLimits LimitValueBoolean@ + * 'Proto.CMS.Traderouting1_Fields.maybe'longPositionsOnly' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValueBoolean)@ + * 'Proto.CMS.Traderouting1_Fields.commodityGrossOpenPositionLimit' @:: Lens' PositionAndTradeLimits LimitValueDecimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'commodityGrossOpenPositionLimit' @:: Lens' PositionAndTradeLimits (Prelude.Maybe LimitValueDecimal)@ -} +data PositionAndTradeLimits + = PositionAndTradeLimits'_constructor {_PositionAndTradeLimits'clearedFields :: !(Data.Vector.Unboxed.Vector Data.Word.Word32), + _PositionAndTradeLimits'obsoleteCommodityPositionLimit :: !(Prelude.Maybe LimitValue), + _PositionAndTradeLimits'obsoleteInstrumentPositionLimit :: !(Prelude.Maybe LimitValue), + _PositionAndTradeLimits'obsoleteContractPositionLimit :: !(Prelude.Maybe LimitValue), + _PositionAndTradeLimits'obsoleteTradeSizeLimit :: !(Prelude.Maybe LimitValue), + _PositionAndTradeLimits'tradePriceLimitTicks :: !(Prelude.Maybe LimitValue), + _PositionAndTradeLimits'tradePriceLimitPercent :: !(Prelude.Maybe LimitValueDouble), + _PositionAndTradeLimits'tradePriceLimitTicksContinuous :: !(Prelude.Maybe TradePriceLimitsTicks), + _PositionAndTradeLimits'tradePriceLimitTicksNonContinuous :: !(Prelude.Maybe TradePriceLimitsTicks), + _PositionAndTradeLimits'tradePriceLimitPercentContinuous :: !(Prelude.Maybe TradePriceLimitsPercent), + _PositionAndTradeLimits'tradePriceLimitPercentNonContinuous :: !(Prelude.Maybe TradePriceLimitsPercent), + _PositionAndTradeLimits'lastTradingDateLimit :: !(Prelude.Maybe LimitValue), + _PositionAndTradeLimits'commodityPositionLimit :: !(Prelude.Maybe LimitValueDecimal), + _PositionAndTradeLimits'instrumentPositionLimit :: !(Prelude.Maybe LimitValueDecimal), + _PositionAndTradeLimits'contractPositionLimit :: !(Prelude.Maybe LimitValueDecimal), + _PositionAndTradeLimits'tradeSizeLimit :: !(Prelude.Maybe LimitValueDecimal), + _PositionAndTradeLimits'longPositionsOnly :: !(Prelude.Maybe LimitValueBoolean), + _PositionAndTradeLimits'commodityGrossOpenPositionLimit :: !(Prelude.Maybe LimitValueDecimal), + _PositionAndTradeLimits'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show PositionAndTradeLimits where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "clearedFields" [Data.Word.Word32] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'clearedFields + (\ x__ y__ -> x__ {_PositionAndTradeLimits'clearedFields = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "vec'clearedFields" (Data.Vector.Unboxed.Vector Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'clearedFields + (\ x__ y__ -> x__ {_PositionAndTradeLimits'clearedFields = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "obsoleteCommodityPositionLimit" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'obsoleteCommodityPositionLimit + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'obsoleteCommodityPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'obsoleteCommodityPositionLimit" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'obsoleteCommodityPositionLimit + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'obsoleteCommodityPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "obsoleteInstrumentPositionLimit" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'obsoleteInstrumentPositionLimit + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'obsoleteInstrumentPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'obsoleteInstrumentPositionLimit" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'obsoleteInstrumentPositionLimit + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'obsoleteInstrumentPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "obsoleteContractPositionLimit" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'obsoleteContractPositionLimit + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'obsoleteContractPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'obsoleteContractPositionLimit" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'obsoleteContractPositionLimit + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'obsoleteContractPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "obsoleteTradeSizeLimit" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'obsoleteTradeSizeLimit + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'obsoleteTradeSizeLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'obsoleteTradeSizeLimit" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'obsoleteTradeSizeLimit + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'obsoleteTradeSizeLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "tradePriceLimitTicks" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitTicks + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'tradePriceLimitTicks = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'tradePriceLimitTicks" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitTicks + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'tradePriceLimitTicks = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "tradePriceLimitPercent" LimitValueDouble where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitPercent + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'tradePriceLimitPercent = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'tradePriceLimitPercent" (Prelude.Maybe LimitValueDouble) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitPercent + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'tradePriceLimitPercent = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "tradePriceLimitTicksContinuous" TradePriceLimitsTicks where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitTicksContinuous + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'tradePriceLimitTicksContinuous = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'tradePriceLimitTicksContinuous" (Prelude.Maybe TradePriceLimitsTicks) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitTicksContinuous + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'tradePriceLimitTicksContinuous = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "tradePriceLimitTicksNonContinuous" TradePriceLimitsTicks where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitTicksNonContinuous + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'tradePriceLimitTicksNonContinuous = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'tradePriceLimitTicksNonContinuous" (Prelude.Maybe TradePriceLimitsTicks) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitTicksNonContinuous + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'tradePriceLimitTicksNonContinuous = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "tradePriceLimitPercentContinuous" TradePriceLimitsPercent where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitPercentContinuous + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'tradePriceLimitPercentContinuous = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'tradePriceLimitPercentContinuous" (Prelude.Maybe TradePriceLimitsPercent) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitPercentContinuous + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'tradePriceLimitPercentContinuous = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "tradePriceLimitPercentNonContinuous" TradePriceLimitsPercent where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitPercentNonContinuous + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'tradePriceLimitPercentNonContinuous = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'tradePriceLimitPercentNonContinuous" (Prelude.Maybe TradePriceLimitsPercent) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradePriceLimitPercentNonContinuous + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'tradePriceLimitPercentNonContinuous = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "lastTradingDateLimit" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'lastTradingDateLimit + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'lastTradingDateLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'lastTradingDateLimit" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'lastTradingDateLimit + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'lastTradingDateLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "commodityPositionLimit" LimitValueDecimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'commodityPositionLimit + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'commodityPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'commodityPositionLimit" (Prelude.Maybe LimitValueDecimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'commodityPositionLimit + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'commodityPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "instrumentPositionLimit" LimitValueDecimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'instrumentPositionLimit + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'instrumentPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'instrumentPositionLimit" (Prelude.Maybe LimitValueDecimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'instrumentPositionLimit + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'instrumentPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "contractPositionLimit" LimitValueDecimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'contractPositionLimit + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'contractPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'contractPositionLimit" (Prelude.Maybe LimitValueDecimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'contractPositionLimit + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'contractPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "tradeSizeLimit" LimitValueDecimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradeSizeLimit + (\ x__ y__ -> x__ {_PositionAndTradeLimits'tradeSizeLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'tradeSizeLimit" (Prelude.Maybe LimitValueDecimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'tradeSizeLimit + (\ x__ y__ -> x__ {_PositionAndTradeLimits'tradeSizeLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "longPositionsOnly" LimitValueBoolean where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'longPositionsOnly + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'longPositionsOnly = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'longPositionsOnly" (Prelude.Maybe LimitValueBoolean) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'longPositionsOnly + (\ x__ y__ + -> x__ {_PositionAndTradeLimits'longPositionsOnly = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "commodityGrossOpenPositionLimit" LimitValueDecimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'commodityGrossOpenPositionLimit + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'commodityGrossOpenPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PositionAndTradeLimits "maybe'commodityGrossOpenPositionLimit" (Prelude.Maybe LimitValueDecimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'commodityGrossOpenPositionLimit + (\ x__ y__ + -> x__ + {_PositionAndTradeLimits'commodityGrossOpenPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Message PositionAndTradeLimits where + messageName _ + = Data.Text.pack "traderouting_1.PositionAndTradeLimits" + packedMessageDescriptor _ + = "\n\ + \\SYNPositionAndTradeLimits\DC2%\n\ + \\SOcleared_fields\CAN\f \ETX(\rR\rclearedFields\DC2i\n\ + \!obsolete_commodity_position_limit\CAN\SOH \SOH(\v2\SUB.traderouting_1.LimitValueR\RSobsoleteCommodityPositionLimitB\STX\CAN\SOH\DC2k\n\ + \\"obsolete_instrument_position_limit\CAN\STX \SOH(\v2\SUB.traderouting_1.LimitValueR\USobsoleteInstrumentPositionLimitB\STX\CAN\SOH\DC2g\n\ + \ obsolete_contract_position_limit\CAN\ETX \SOH(\v2\SUB.traderouting_1.LimitValueR\GSobsoleteContractPositionLimitB\STX\CAN\SOH\DC2Y\n\ + \\EMobsolete_trade_size_limit\CAN\EOT \SOH(\v2\SUB.traderouting_1.LimitValueR\SYNobsoleteTradeSizeLimitB\STX\CAN\SOH\DC2Q\n\ + \\ETBtrade_price_limit_ticks\CAN\ENQ \SOH(\v2\SUB.traderouting_1.LimitValueR\DC4tradePriceLimitTicks\DC2[\n\ + \\EMtrade_price_limit_percent\CAN\ACK \SOH(\v2 .traderouting_1.LimitValueDoubleR\SYNtradePriceLimitPercent\DC2q\n\ + \\"trade_price_limit_ticks_continuous\CAN\a \SOH(\v2%.traderouting_1.TradePriceLimitsTicksR\RStradePriceLimitTicksContinuous\DC2x\n\ + \&trade_price_limit_ticks_non_continuous\CAN\b \SOH(\v2%.traderouting_1.TradePriceLimitsTicksR!tradePriceLimitTicksNonContinuous\DC2w\n\ + \$trade_price_limit_percent_continuous\CAN\t \SOH(\v2'.traderouting_1.TradePriceLimitsPercentR tradePriceLimitPercentContinuous\DC2~\n\ + \(trade_price_limit_percent_non_continuous\CAN\n\ + \ \SOH(\v2'.traderouting_1.TradePriceLimitsPercentR#tradePriceLimitPercentNonContinuous\DC2Q\n\ + \\ETBlast_trading_date_limit\CAN\v \SOH(\v2\SUB.traderouting_1.LimitValueR\DC4lastTradingDateLimit\DC2[\n\ + \\CANcommodity_position_limit\CAN\r \SOH(\v2!.traderouting_1.LimitValueDecimalR\SYNcommodityPositionLimit\DC2]\n\ + \\EMinstrument_position_limit\CAN\SO \SOH(\v2!.traderouting_1.LimitValueDecimalR\ETBinstrumentPositionLimit\DC2Y\n\ + \\ETBcontract_position_limit\CAN\SI \SOH(\v2!.traderouting_1.LimitValueDecimalR\NAKcontractPositionLimit\DC2K\n\ + \\DLEtrade_size_limit\CAN\DLE \SOH(\v2!.traderouting_1.LimitValueDecimalR\SOtradeSizeLimit\DC2Q\n\ + \\DC3long_positions_only\CAN\DC1 \SOH(\v2!.traderouting_1.LimitValueBooleanR\DC1longPositionsOnly\DC2o\n\ + \#commodity_gross_open_position_limit\CAN\DC2 \SOH(\v2!.traderouting_1.LimitValueDecimalR\UScommodityGrossOpenPositionLimit" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + clearedFields__field_descriptor + = Data.ProtoLens.FieldDescriptor + "cleared_fields" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"clearedFields")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + obsoleteCommodityPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_commodity_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteCommodityPositionLimit")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + obsoleteInstrumentPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_instrument_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteInstrumentPositionLimit")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + obsoleteContractPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_contract_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteContractPositionLimit")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + obsoleteTradeSizeLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_trade_size_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteTradeSizeLimit")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + tradePriceLimitTicks__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_price_limit_ticks" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradePriceLimitTicks")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + tradePriceLimitPercent__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_price_limit_percent" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDouble) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradePriceLimitPercent")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + tradePriceLimitTicksContinuous__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_price_limit_ticks_continuous" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TradePriceLimitsTicks) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'tradePriceLimitTicksContinuous")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + tradePriceLimitTicksNonContinuous__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_price_limit_ticks_non_continuous" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TradePriceLimitsTicks) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'tradePriceLimitTicksNonContinuous")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + tradePriceLimitPercentContinuous__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_price_limit_percent_continuous" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TradePriceLimitsPercent) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'tradePriceLimitPercentContinuous")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + tradePriceLimitPercentNonContinuous__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_price_limit_percent_non_continuous" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TradePriceLimitsPercent) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'tradePriceLimitPercentNonContinuous")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + lastTradingDateLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "last_trading_date_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'lastTradingDateLimit")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + commodityPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "commodity_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDecimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'commodityPositionLimit")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + instrumentPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "instrument_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDecimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'instrumentPositionLimit")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + contractPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDecimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractPositionLimit")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + tradeSizeLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_size_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDecimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeSizeLimit")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + longPositionsOnly__field_descriptor + = Data.ProtoLens.FieldDescriptor + "long_positions_only" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueBoolean) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'longPositionsOnly")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + commodityGrossOpenPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "commodity_gross_open_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDecimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'commodityGrossOpenPositionLimit")) :: + Data.ProtoLens.FieldDescriptor PositionAndTradeLimits + in + Data.Map.fromList + [(Data.ProtoLens.Tag 12, clearedFields__field_descriptor), + (Data.ProtoLens.Tag 1, + obsoleteCommodityPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 2, + obsoleteInstrumentPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 3, + obsoleteContractPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 4, obsoleteTradeSizeLimit__field_descriptor), + (Data.ProtoLens.Tag 5, tradePriceLimitTicks__field_descriptor), + (Data.ProtoLens.Tag 6, tradePriceLimitPercent__field_descriptor), + (Data.ProtoLens.Tag 7, + tradePriceLimitTicksContinuous__field_descriptor), + (Data.ProtoLens.Tag 8, + tradePriceLimitTicksNonContinuous__field_descriptor), + (Data.ProtoLens.Tag 9, + tradePriceLimitPercentContinuous__field_descriptor), + (Data.ProtoLens.Tag 10, + tradePriceLimitPercentNonContinuous__field_descriptor), + (Data.ProtoLens.Tag 11, lastTradingDateLimit__field_descriptor), + (Data.ProtoLens.Tag 13, commodityPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 14, instrumentPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 15, contractPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 16, tradeSizeLimit__field_descriptor), + (Data.ProtoLens.Tag 17, longPositionsOnly__field_descriptor), + (Data.ProtoLens.Tag 18, + commodityGrossOpenPositionLimit__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _PositionAndTradeLimits'_unknownFields + (\ x__ y__ -> x__ {_PositionAndTradeLimits'_unknownFields = y__}) + defMessage + = PositionAndTradeLimits'_constructor + {_PositionAndTradeLimits'clearedFields = Data.Vector.Generic.empty, + _PositionAndTradeLimits'obsoleteCommodityPositionLimit = Prelude.Nothing, + _PositionAndTradeLimits'obsoleteInstrumentPositionLimit = Prelude.Nothing, + _PositionAndTradeLimits'obsoleteContractPositionLimit = Prelude.Nothing, + _PositionAndTradeLimits'obsoleteTradeSizeLimit = Prelude.Nothing, + _PositionAndTradeLimits'tradePriceLimitTicks = Prelude.Nothing, + _PositionAndTradeLimits'tradePriceLimitPercent = Prelude.Nothing, + _PositionAndTradeLimits'tradePriceLimitTicksContinuous = Prelude.Nothing, + _PositionAndTradeLimits'tradePriceLimitTicksNonContinuous = Prelude.Nothing, + _PositionAndTradeLimits'tradePriceLimitPercentContinuous = Prelude.Nothing, + _PositionAndTradeLimits'tradePriceLimitPercentNonContinuous = Prelude.Nothing, + _PositionAndTradeLimits'lastTradingDateLimit = Prelude.Nothing, + _PositionAndTradeLimits'commodityPositionLimit = Prelude.Nothing, + _PositionAndTradeLimits'instrumentPositionLimit = Prelude.Nothing, + _PositionAndTradeLimits'contractPositionLimit = Prelude.Nothing, + _PositionAndTradeLimits'tradeSizeLimit = Prelude.Nothing, + _PositionAndTradeLimits'longPositionsOnly = Prelude.Nothing, + _PositionAndTradeLimits'commodityGrossOpenPositionLimit = Prelude.Nothing, + _PositionAndTradeLimits'_unknownFields = []} + parseMessage + = let + loop :: + PositionAndTradeLimits + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32 + -> Data.ProtoLens.Encoding.Bytes.Parser PositionAndTradeLimits + loop x mutable'clearedFields + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'clearedFields) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'clearedFields") + frozen'clearedFields x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 96 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'clearedFields y) + loop x v + 98 + -> do y <- do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + ((let + ploop qs + = do packedEnd <- Data.ProtoLens.Encoding.Bytes.atEnd + if packedEnd then + Prelude.return qs + else + do !q <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "cleared_fields" + qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + qs q) + ploop qs' + in ploop) + mutable'clearedFields) + loop x y + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_commodity_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCommodityPositionLimit") + y x) + mutable'clearedFields + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_instrument_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteInstrumentPositionLimit") + y x) + mutable'clearedFields + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_contract_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteContractPositionLimit") y + x) + mutable'clearedFields + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_trade_size_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteTradeSizeLimit") y x) + mutable'clearedFields + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trade_price_limit_ticks" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradePriceLimitTicks") y x) + mutable'clearedFields + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trade_price_limit_percent" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradePriceLimitPercent") y x) + mutable'clearedFields + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trade_price_limit_ticks_continuous" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradePriceLimitTicksContinuous") + y x) + mutable'clearedFields + 66 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trade_price_limit_ticks_non_continuous" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"tradePriceLimitTicksNonContinuous") + y x) + mutable'clearedFields + 74 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trade_price_limit_percent_continuous" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"tradePriceLimitPercentContinuous") + y x) + mutable'clearedFields + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trade_price_limit_percent_non_continuous" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"tradePriceLimitPercentNonContinuous") + y x) + mutable'clearedFields + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "last_trading_date_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"lastTradingDateLimit") y x) + mutable'clearedFields + 106 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "commodity_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"commodityPositionLimit") y x) + mutable'clearedFields + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "instrument_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"instrumentPositionLimit") y x) + mutable'clearedFields + 122 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "contract_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractPositionLimit") y x) + mutable'clearedFields + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trade_size_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeSizeLimit") y x) + mutable'clearedFields + 138 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "long_positions_only" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"longPositionsOnly") y x) + mutable'clearedFields + 146 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "commodity_gross_open_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"commodityGrossOpenPositionLimit") + y x) + mutable'clearedFields + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'clearedFields + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'clearedFields <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'clearedFields) + "PositionAndTradeLimits" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 96) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'clearedFields") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteCommodityPositionLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteInstrumentPositionLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteContractPositionLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteTradeSizeLimit") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradePriceLimitTicks") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradePriceLimitPercent") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradePriceLimitTicksContinuous") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradePriceLimitTicksNonContinuous") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradePriceLimitPercentContinuous") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 74) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradePriceLimitPercentNonContinuous") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'lastTradingDateLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'commodityPositionLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 106) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'instrumentPositionLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'contractPositionLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 122) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradeSizeLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'longPositionsOnly") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'commodityGrossOpenPositionLimit") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 146) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))))))) +instance Control.DeepSeq.NFData PositionAndTradeLimits where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_PositionAndTradeLimits'_unknownFields x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'clearedFields x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'obsoleteCommodityPositionLimit x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'obsoleteInstrumentPositionLimit x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'obsoleteContractPositionLimit x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'obsoleteTradeSizeLimit x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'tradePriceLimitTicks x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'tradePriceLimitPercent x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'tradePriceLimitTicksContinuous x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'tradePriceLimitTicksNonContinuous + x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'tradePriceLimitPercentContinuous + x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'tradePriceLimitPercentNonContinuous + x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'lastTradingDateLimit x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'commodityPositionLimit + x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'instrumentPositionLimit + x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'contractPositionLimit + x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'tradeSizeLimit + x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'longPositionsOnly + x__) + (Control.DeepSeq.deepseq + (_PositionAndTradeLimits'commodityGrossOpenPositionLimit + x__) + ())))))))))))))))))) +data PriceLimitMode + = AGGRESSIVE_LMT | AGGRESSIVE_LMT_STP | ALL_LMT | ALL_LMT_STP + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum PriceLimitMode where + maybeToEnum 1 = Prelude.Just AGGRESSIVE_LMT + maybeToEnum 2 = Prelude.Just AGGRESSIVE_LMT_STP + maybeToEnum 3 = Prelude.Just ALL_LMT + maybeToEnum 4 = Prelude.Just ALL_LMT_STP + maybeToEnum _ = Prelude.Nothing + showEnum AGGRESSIVE_LMT = "AGGRESSIVE_LMT" + showEnum AGGRESSIVE_LMT_STP = "AGGRESSIVE_LMT_STP" + showEnum ALL_LMT = "ALL_LMT" + showEnum ALL_LMT_STP = "ALL_LMT_STP" + readEnum k + | (Prelude.==) k "AGGRESSIVE_LMT" = Prelude.Just AGGRESSIVE_LMT + | (Prelude.==) k "AGGRESSIVE_LMT_STP" + = Prelude.Just AGGRESSIVE_LMT_STP + | (Prelude.==) k "ALL_LMT" = Prelude.Just ALL_LMT + | (Prelude.==) k "ALL_LMT_STP" = Prelude.Just ALL_LMT_STP + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded PriceLimitMode where + minBound = AGGRESSIVE_LMT + maxBound = ALL_LMT_STP +instance Prelude.Enum PriceLimitMode where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum PriceLimitMode: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum AGGRESSIVE_LMT = 1 + fromEnum AGGRESSIVE_LMT_STP = 2 + fromEnum ALL_LMT = 3 + fromEnum ALL_LMT_STP = 4 + succ ALL_LMT_STP + = Prelude.error + "PriceLimitMode.succ: bad argument ALL_LMT_STP. This value would be out of bounds." + succ AGGRESSIVE_LMT = AGGRESSIVE_LMT_STP + succ AGGRESSIVE_LMT_STP = ALL_LMT + succ ALL_LMT = ALL_LMT_STP + pred AGGRESSIVE_LMT + = Prelude.error + "PriceLimitMode.pred: bad argument AGGRESSIVE_LMT. This value would be out of bounds." + pred AGGRESSIVE_LMT_STP = AGGRESSIVE_LMT + pred ALL_LMT = AGGRESSIVE_LMT_STP + pred ALL_LMT_STP = ALL_LMT + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault PriceLimitMode where + fieldDefault = AGGRESSIVE_LMT +instance Control.DeepSeq.NFData PriceLimitMode where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.msAllowableMarginCredit' @:: Lens' PurchasingPowerParameters Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'msAllowableMarginCredit' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.msCrossMargining' @:: Lens' PurchasingPowerParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'msCrossMargining' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.msIncludeOtePp' @:: Lens' PurchasingPowerParameters Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'msIncludeOtePp' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.msIncludeNovPp' @:: Lens' PurchasingPowerParameters Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'msIncludeNovPp' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.includeUplLl' @:: Lens' PurchasingPowerParameters Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'includeUplLl' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.includeOteLl' @:: Lens' PurchasingPowerParameters Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'includeOteLl' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.checkNegativeBalance' @:: Lens' PurchasingPowerParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'checkNegativeBalance' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.useTheoPrices' @:: Lens' PurchasingPowerParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'useTheoPrices' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.theoTicks' @:: Lens' PurchasingPowerParameters Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'theoTicks' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.useBbaOte' @:: Lens' PurchasingPowerParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'useBbaOte' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.useBbaNovUpl' @:: Lens' PurchasingPowerParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'useBbaNovUpl' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.adjustPriceByNetchange' @:: Lens' PurchasingPowerParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'adjustPriceByNetchange' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.useBrokerageMarginsOnly' @:: Lens' PurchasingPowerParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'useBrokerageMarginsOnly' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteMarginMultiplier' @:: Lens' PurchasingPowerParameters Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteMarginMultiplier' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.msUseInstrumentGroupMarginMultiplier' @:: Lens' PurchasingPowerParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'msUseInstrumentGroupMarginMultiplier' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.msInstrumentGroupMarginMultiplier' @:: Lens' PurchasingPowerParameters Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'msInstrumentGroupMarginMultiplier' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.marginMultiplier' @:: Lens' PurchasingPowerParameters LimitValueDouble@ + * 'Proto.CMS.Traderouting1_Fields.maybe'marginMultiplier' @:: Lens' PurchasingPowerParameters (Prelude.Maybe LimitValueDouble)@ + * 'Proto.CMS.Traderouting1_Fields.alwaysAllowLiquidation' @:: Lens' PurchasingPowerParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'alwaysAllowLiquidation' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.enforceMaxPurchasingPower' @:: Lens' PurchasingPowerParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforceMaxPurchasingPower' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.maxPurchasingPower' @:: Lens' PurchasingPowerParameters Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'maxPurchasingPower' @:: Lens' PurchasingPowerParameters (Prelude.Maybe Prelude.Double)@ -} +data PurchasingPowerParameters + = PurchasingPowerParameters'_constructor {_PurchasingPowerParameters'msAllowableMarginCredit :: !(Prelude.Maybe Prelude.Double), + _PurchasingPowerParameters'msCrossMargining :: !(Prelude.Maybe Prelude.Bool), + _PurchasingPowerParameters'msIncludeOtePp :: !(Prelude.Maybe Data.Word.Word32), + _PurchasingPowerParameters'msIncludeNovPp :: !(Prelude.Maybe Data.Word.Word32), + _PurchasingPowerParameters'includeUplLl :: !(Prelude.Maybe Data.Word.Word32), + _PurchasingPowerParameters'includeOteLl :: !(Prelude.Maybe Data.Word.Word32), + _PurchasingPowerParameters'checkNegativeBalance :: !(Prelude.Maybe Prelude.Bool), + _PurchasingPowerParameters'useTheoPrices :: !(Prelude.Maybe Prelude.Bool), + _PurchasingPowerParameters'theoTicks :: !(Prelude.Maybe Data.Int.Int32), + _PurchasingPowerParameters'useBbaOte :: !(Prelude.Maybe Prelude.Bool), + _PurchasingPowerParameters'useBbaNovUpl :: !(Prelude.Maybe Prelude.Bool), + _PurchasingPowerParameters'adjustPriceByNetchange :: !(Prelude.Maybe Prelude.Bool), + _PurchasingPowerParameters'useBrokerageMarginsOnly :: !(Prelude.Maybe Prelude.Bool), + _PurchasingPowerParameters'obsoleteMarginMultiplier :: !(Prelude.Maybe Prelude.Double), + _PurchasingPowerParameters'msUseInstrumentGroupMarginMultiplier :: !(Prelude.Maybe Prelude.Bool), + _PurchasingPowerParameters'msInstrumentGroupMarginMultiplier :: !(Prelude.Maybe Prelude.Double), + _PurchasingPowerParameters'marginMultiplier :: !(Prelude.Maybe LimitValueDouble), + _PurchasingPowerParameters'alwaysAllowLiquidation :: !(Prelude.Maybe Prelude.Bool), + _PurchasingPowerParameters'enforceMaxPurchasingPower :: !(Prelude.Maybe Prelude.Bool), + _PurchasingPowerParameters'maxPurchasingPower :: !(Prelude.Maybe Prelude.Double), + _PurchasingPowerParameters'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show PurchasingPowerParameters where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "msAllowableMarginCredit" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msAllowableMarginCredit + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'msAllowableMarginCredit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'msAllowableMarginCredit" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msAllowableMarginCredit + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'msAllowableMarginCredit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "msCrossMargining" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msCrossMargining + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'msCrossMargining = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'msCrossMargining" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msCrossMargining + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'msCrossMargining = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "msIncludeOtePp" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msIncludeOtePp + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'msIncludeOtePp = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'msIncludeOtePp" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msIncludeOtePp + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'msIncludeOtePp = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "msIncludeNovPp" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msIncludeNovPp + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'msIncludeNovPp = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'msIncludeNovPp" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msIncludeNovPp + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'msIncludeNovPp = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "includeUplLl" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'includeUplLl + (\ x__ y__ -> x__ {_PurchasingPowerParameters'includeUplLl = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'includeUplLl" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'includeUplLl + (\ x__ y__ -> x__ {_PurchasingPowerParameters'includeUplLl = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "includeOteLl" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'includeOteLl + (\ x__ y__ -> x__ {_PurchasingPowerParameters'includeOteLl = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'includeOteLl" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'includeOteLl + (\ x__ y__ -> x__ {_PurchasingPowerParameters'includeOteLl = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "checkNegativeBalance" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'checkNegativeBalance + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'checkNegativeBalance = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'checkNegativeBalance" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'checkNegativeBalance + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'checkNegativeBalance = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "useTheoPrices" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'useTheoPrices + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'useTheoPrices = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'useTheoPrices" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'useTheoPrices + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'useTheoPrices = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "theoTicks" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'theoTicks + (\ x__ y__ -> x__ {_PurchasingPowerParameters'theoTicks = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'theoTicks" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'theoTicks + (\ x__ y__ -> x__ {_PurchasingPowerParameters'theoTicks = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "useBbaOte" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'useBbaOte + (\ x__ y__ -> x__ {_PurchasingPowerParameters'useBbaOte = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'useBbaOte" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'useBbaOte + (\ x__ y__ -> x__ {_PurchasingPowerParameters'useBbaOte = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "useBbaNovUpl" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'useBbaNovUpl + (\ x__ y__ -> x__ {_PurchasingPowerParameters'useBbaNovUpl = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'useBbaNovUpl" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'useBbaNovUpl + (\ x__ y__ -> x__ {_PurchasingPowerParameters'useBbaNovUpl = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "adjustPriceByNetchange" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'adjustPriceByNetchange + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'adjustPriceByNetchange = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'adjustPriceByNetchange" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'adjustPriceByNetchange + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'adjustPriceByNetchange = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "useBrokerageMarginsOnly" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'useBrokerageMarginsOnly + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'useBrokerageMarginsOnly = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'useBrokerageMarginsOnly" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'useBrokerageMarginsOnly + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'useBrokerageMarginsOnly = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "obsoleteMarginMultiplier" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'obsoleteMarginMultiplier + (\ x__ y__ + -> x__ + {_PurchasingPowerParameters'obsoleteMarginMultiplier = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'obsoleteMarginMultiplier" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'obsoleteMarginMultiplier + (\ x__ y__ + -> x__ + {_PurchasingPowerParameters'obsoleteMarginMultiplier = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "msUseInstrumentGroupMarginMultiplier" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msUseInstrumentGroupMarginMultiplier + (\ x__ y__ + -> x__ + {_PurchasingPowerParameters'msUseInstrumentGroupMarginMultiplier = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'msUseInstrumentGroupMarginMultiplier" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msUseInstrumentGroupMarginMultiplier + (\ x__ y__ + -> x__ + {_PurchasingPowerParameters'msUseInstrumentGroupMarginMultiplier = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "msInstrumentGroupMarginMultiplier" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msInstrumentGroupMarginMultiplier + (\ x__ y__ + -> x__ + {_PurchasingPowerParameters'msInstrumentGroupMarginMultiplier = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'msInstrumentGroupMarginMultiplier" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'msInstrumentGroupMarginMultiplier + (\ x__ y__ + -> x__ + {_PurchasingPowerParameters'msInstrumentGroupMarginMultiplier = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "marginMultiplier" LimitValueDouble where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'marginMultiplier + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'marginMultiplier = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'marginMultiplier" (Prelude.Maybe LimitValueDouble) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'marginMultiplier + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'marginMultiplier = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "alwaysAllowLiquidation" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'alwaysAllowLiquidation + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'alwaysAllowLiquidation = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'alwaysAllowLiquidation" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'alwaysAllowLiquidation + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'alwaysAllowLiquidation = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "enforceMaxPurchasingPower" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'enforceMaxPurchasingPower + (\ x__ y__ + -> x__ + {_PurchasingPowerParameters'enforceMaxPurchasingPower = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'enforceMaxPurchasingPower" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'enforceMaxPurchasingPower + (\ x__ y__ + -> x__ + {_PurchasingPowerParameters'enforceMaxPurchasingPower = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maxPurchasingPower" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'maxPurchasingPower + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'maxPurchasingPower = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField PurchasingPowerParameters "maybe'maxPurchasingPower" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'maxPurchasingPower + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'maxPurchasingPower = y__})) + Prelude.id +instance Data.ProtoLens.Message PurchasingPowerParameters where + messageName _ + = Data.Text.pack "traderouting_1.PurchasingPowerParameters" + packedMessageDescriptor _ + = "\n\ + \\EMPurchasingPowerParameters\DC2;\n\ + \\SUBms_allowable_margin_credit\CAN\SOH \SOH(\SOHR\ETBmsAllowableMarginCredit\DC2,\n\ + \\DC2ms_cross_margining\CAN\STX \SOH(\bR\DLEmsCrossMargining\DC2)\n\ + \\DC1ms_include_ote_pp\CAN\ETX \SOH(\rR\SOmsIncludeOtePp\DC2)\n\ + \\DC1ms_include_nov_pp\CAN\EOT \SOH(\rR\SOmsIncludeNovPp\DC2$\n\ + \\SOinclude_upl_ll\CAN\ENQ \SOH(\rR\fincludeUplLl\DC2$\n\ + \\SOinclude_ote_ll\CAN\ACK \SOH(\rR\fincludeOteLl\DC24\n\ + \\SYNcheck_negative_balance\CAN\a \SOH(\bR\DC4checkNegativeBalance\DC2&\n\ + \\SIuse_theo_prices\CAN\b \SOH(\bR\ruseTheoPrices\DC2\GS\n\ + \\n\ + \theo_ticks\CAN\t \SOH(\DC1R\ttheoTicks\DC2\RS\n\ + \\vuse_bba_ote\CAN\n\ + \ \SOH(\bR\tuseBbaOte\DC2%\n\ + \\SIuse_bba_nov_upl\CAN\v \SOH(\bR\fuseBbaNovUpl\DC29\n\ + \\EMadjust_price_by_netchange\CAN\f \SOH(\bR\SYNadjustPriceByNetchange\DC2;\n\ + \\SUBuse_brokerage_margins_only\CAN\r \SOH(\bR\ETBuseBrokerageMarginsOnly\DC2@\n\ + \\SUBobsolete_margin_multiplier\CAN\SO \SOH(\SOHR\CANobsoleteMarginMultiplierB\STX\CAN\SOH\DC2W\n\ + \)ms_use_instrument_group_margin_multiplier\CAN\SI \SOH(\bR$msUseInstrumentGroupMarginMultiplier\DC2P\n\ + \%ms_instrument_group_margin_multiplier\CAN\DLE \SOH(\SOHR!msInstrumentGroupMarginMultiplier\DC2M\n\ + \\DC1margin_multiplier\CAN\DC1 \SOH(\v2 .traderouting_1.LimitValueDoubleR\DLEmarginMultiplier\DC28\n\ + \\CANalways_allow_liquidation\CAN\DC2 \SOH(\bR\SYNalwaysAllowLiquidation\DC2?\n\ + \\FSenforce_max_purchasing_power\CAN\DC3 \SOH(\bR\EMenforceMaxPurchasingPower\DC20\n\ + \\DC4max_purchasing_power\CAN\DC4 \SOH(\SOHR\DC2maxPurchasingPower\".\n\ + \\rIncludeOption\DC2\a\n\ + \\ETXYES\DLE\SOH\DC2\f\n\ + \\bNEGATIVE\DLE\STX\DC2\ACK\n\ + \\STXNO\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + msAllowableMarginCredit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ms_allowable_margin_credit" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'msAllowableMarginCredit")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + msCrossMargining__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ms_cross_margining" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'msCrossMargining")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + msIncludeOtePp__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ms_include_ote_pp" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'msIncludeOtePp")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + msIncludeNovPp__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ms_include_nov_pp" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'msIncludeNovPp")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + includeUplLl__field_descriptor + = Data.ProtoLens.FieldDescriptor + "include_upl_ll" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'includeUplLl")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + includeOteLl__field_descriptor + = Data.ProtoLens.FieldDescriptor + "include_ote_ll" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'includeOteLl")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + checkNegativeBalance__field_descriptor + = Data.ProtoLens.FieldDescriptor + "check_negative_balance" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'checkNegativeBalance")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + useTheoPrices__field_descriptor + = Data.ProtoLens.FieldDescriptor + "use_theo_prices" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'useTheoPrices")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + theoTicks__field_descriptor + = Data.ProtoLens.FieldDescriptor + "theo_ticks" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'theoTicks")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + useBbaOte__field_descriptor + = Data.ProtoLens.FieldDescriptor + "use_bba_ote" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'useBbaOte")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + useBbaNovUpl__field_descriptor + = Data.ProtoLens.FieldDescriptor + "use_bba_nov_upl" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'useBbaNovUpl")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + adjustPriceByNetchange__field_descriptor + = Data.ProtoLens.FieldDescriptor + "adjust_price_by_netchange" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'adjustPriceByNetchange")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + useBrokerageMarginsOnly__field_descriptor + = Data.ProtoLens.FieldDescriptor + "use_brokerage_margins_only" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'useBrokerageMarginsOnly")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + obsoleteMarginMultiplier__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_margin_multiplier" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteMarginMultiplier")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + msUseInstrumentGroupMarginMultiplier__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ms_use_instrument_group_margin_multiplier" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'msUseInstrumentGroupMarginMultiplier")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + msInstrumentGroupMarginMultiplier__field_descriptor + = Data.ProtoLens.FieldDescriptor + "ms_instrument_group_margin_multiplier" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'msInstrumentGroupMarginMultiplier")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + marginMultiplier__field_descriptor + = Data.ProtoLens.FieldDescriptor + "margin_multiplier" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDouble) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'marginMultiplier")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + alwaysAllowLiquidation__field_descriptor + = Data.ProtoLens.FieldDescriptor + "always_allow_liquidation" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'alwaysAllowLiquidation")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + enforceMaxPurchasingPower__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_max_purchasing_power" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'enforceMaxPurchasingPower")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + maxPurchasingPower__field_descriptor + = Data.ProtoLens.FieldDescriptor + "max_purchasing_power" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'maxPurchasingPower")) :: + Data.ProtoLens.FieldDescriptor PurchasingPowerParameters + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, msAllowableMarginCredit__field_descriptor), + (Data.ProtoLens.Tag 2, msCrossMargining__field_descriptor), + (Data.ProtoLens.Tag 3, msIncludeOtePp__field_descriptor), + (Data.ProtoLens.Tag 4, msIncludeNovPp__field_descriptor), + (Data.ProtoLens.Tag 5, includeUplLl__field_descriptor), + (Data.ProtoLens.Tag 6, includeOteLl__field_descriptor), + (Data.ProtoLens.Tag 7, checkNegativeBalance__field_descriptor), + (Data.ProtoLens.Tag 8, useTheoPrices__field_descriptor), + (Data.ProtoLens.Tag 9, theoTicks__field_descriptor), + (Data.ProtoLens.Tag 10, useBbaOte__field_descriptor), + (Data.ProtoLens.Tag 11, useBbaNovUpl__field_descriptor), + (Data.ProtoLens.Tag 12, adjustPriceByNetchange__field_descriptor), + (Data.ProtoLens.Tag 13, useBrokerageMarginsOnly__field_descriptor), + (Data.ProtoLens.Tag 14, + obsoleteMarginMultiplier__field_descriptor), + (Data.ProtoLens.Tag 15, + msUseInstrumentGroupMarginMultiplier__field_descriptor), + (Data.ProtoLens.Tag 16, + msInstrumentGroupMarginMultiplier__field_descriptor), + (Data.ProtoLens.Tag 17, marginMultiplier__field_descriptor), + (Data.ProtoLens.Tag 18, alwaysAllowLiquidation__field_descriptor), + (Data.ProtoLens.Tag 19, + enforceMaxPurchasingPower__field_descriptor), + (Data.ProtoLens.Tag 20, maxPurchasingPower__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _PurchasingPowerParameters'_unknownFields + (\ x__ y__ + -> x__ {_PurchasingPowerParameters'_unknownFields = y__}) + defMessage + = PurchasingPowerParameters'_constructor + {_PurchasingPowerParameters'msAllowableMarginCredit = Prelude.Nothing, + _PurchasingPowerParameters'msCrossMargining = Prelude.Nothing, + _PurchasingPowerParameters'msIncludeOtePp = Prelude.Nothing, + _PurchasingPowerParameters'msIncludeNovPp = Prelude.Nothing, + _PurchasingPowerParameters'includeUplLl = Prelude.Nothing, + _PurchasingPowerParameters'includeOteLl = Prelude.Nothing, + _PurchasingPowerParameters'checkNegativeBalance = Prelude.Nothing, + _PurchasingPowerParameters'useTheoPrices = Prelude.Nothing, + _PurchasingPowerParameters'theoTicks = Prelude.Nothing, + _PurchasingPowerParameters'useBbaOte = Prelude.Nothing, + _PurchasingPowerParameters'useBbaNovUpl = Prelude.Nothing, + _PurchasingPowerParameters'adjustPriceByNetchange = Prelude.Nothing, + _PurchasingPowerParameters'useBrokerageMarginsOnly = Prelude.Nothing, + _PurchasingPowerParameters'obsoleteMarginMultiplier = Prelude.Nothing, + _PurchasingPowerParameters'msUseInstrumentGroupMarginMultiplier = Prelude.Nothing, + _PurchasingPowerParameters'msInstrumentGroupMarginMultiplier = Prelude.Nothing, + _PurchasingPowerParameters'marginMultiplier = Prelude.Nothing, + _PurchasingPowerParameters'alwaysAllowLiquidation = Prelude.Nothing, + _PurchasingPowerParameters'enforceMaxPurchasingPower = Prelude.Nothing, + _PurchasingPowerParameters'maxPurchasingPower = Prelude.Nothing, + _PurchasingPowerParameters'_unknownFields = []} + parseMessage + = let + loop :: + PurchasingPowerParameters + -> Data.ProtoLens.Encoding.Bytes.Parser PurchasingPowerParameters + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 9 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "ms_allowable_margin_credit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"msAllowableMarginCredit") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "ms_cross_margining" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"msCrossMargining") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "ms_include_ote_pp" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"msIncludeOtePp") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "ms_include_nov_pp" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"msIncludeNovPp") y x) + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "include_upl_ll" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"includeUplLl") y x) + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "include_ote_ll" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"includeOteLl") y x) + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "check_negative_balance" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"checkNegativeBalance") y x) + 64 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "use_theo_prices" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"useTheoPrices") y x) + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "theo_ticks" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"theoTicks") y x) + 80 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "use_bba_ote" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"useBbaOte") y x) + 88 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "use_bba_nov_upl" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"useBbaNovUpl") y x) + 96 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "adjust_price_by_netchange" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"adjustPriceByNetchange") y x) + 104 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "use_brokerage_margins_only" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"useBrokerageMarginsOnly") y x) + 113 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "obsolete_margin_multiplier" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteMarginMultiplier") y x) + 120 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "ms_use_instrument_group_margin_multiplier" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"msUseInstrumentGroupMarginMultiplier") + y x) + 129 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "ms_instrument_group_margin_multiplier" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"msInstrumentGroupMarginMultiplier") + y x) + 138 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "margin_multiplier" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"marginMultiplier") y x) + 144 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "always_allow_liquidation" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"alwaysAllowLiquidation") y x) + 152 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_max_purchasing_power" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"enforceMaxPurchasingPower") y x) + 161 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "max_purchasing_power" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"maxPurchasingPower") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "PurchasingPowerParameters" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'msAllowableMarginCredit") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 9) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'msCrossMargining") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'msIncludeOtePp") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'msIncludeNovPp") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'includeUplLl") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'includeOteLl") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'checkNegativeBalance") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'useTheoPrices") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 64) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'theoTicks") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'useBbaOte") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 80) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'useBbaNovUpl") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'adjustPriceByNetchange") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 96) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'useBrokerageMarginsOnly") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 104) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteMarginMultiplier") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 113) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'msUseInstrumentGroupMarginMultiplier") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 120) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'msInstrumentGroupMarginMultiplier") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 129) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'marginMultiplier") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 138) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'alwaysAllowLiquidation") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 144) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'enforceMaxPurchasingPower") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 152) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'maxPurchasingPower") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 161) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x))))))))))))))))))))) +instance Control.DeepSeq.NFData PurchasingPowerParameters where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_PurchasingPowerParameters'_unknownFields x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'msAllowableMarginCredit x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'msCrossMargining x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'msIncludeOtePp x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'msIncludeNovPp x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'includeUplLl x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'includeOteLl x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'checkNegativeBalance x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'useTheoPrices x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'theoTicks x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'useBbaOte x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'useBbaNovUpl x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'adjustPriceByNetchange + x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'useBrokerageMarginsOnly + x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'obsoleteMarginMultiplier + x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'msUseInstrumentGroupMarginMultiplier + x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'msInstrumentGroupMarginMultiplier + x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'marginMultiplier + x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'alwaysAllowLiquidation + x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'enforceMaxPurchasingPower + x__) + (Control.DeepSeq.deepseq + (_PurchasingPowerParameters'maxPurchasingPower + x__) + ())))))))))))))))))))) +data PurchasingPowerParameters'IncludeOption + = PurchasingPowerParameters'YES | + PurchasingPowerParameters'NEGATIVE | + PurchasingPowerParameters'NO + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum PurchasingPowerParameters'IncludeOption where + maybeToEnum 1 = Prelude.Just PurchasingPowerParameters'YES + maybeToEnum 2 = Prelude.Just PurchasingPowerParameters'NEGATIVE + maybeToEnum 3 = Prelude.Just PurchasingPowerParameters'NO + maybeToEnum _ = Prelude.Nothing + showEnum PurchasingPowerParameters'YES = "YES" + showEnum PurchasingPowerParameters'NEGATIVE = "NEGATIVE" + showEnum PurchasingPowerParameters'NO = "NO" + readEnum k + | (Prelude.==) k "YES" = Prelude.Just PurchasingPowerParameters'YES + | (Prelude.==) k "NEGATIVE" + = Prelude.Just PurchasingPowerParameters'NEGATIVE + | (Prelude.==) k "NO" = Prelude.Just PurchasingPowerParameters'NO + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded PurchasingPowerParameters'IncludeOption where + minBound = PurchasingPowerParameters'YES + maxBound = PurchasingPowerParameters'NO +instance Prelude.Enum PurchasingPowerParameters'IncludeOption where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum IncludeOption: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum PurchasingPowerParameters'YES = 1 + fromEnum PurchasingPowerParameters'NEGATIVE = 2 + fromEnum PurchasingPowerParameters'NO = 3 + succ PurchasingPowerParameters'NO + = Prelude.error + "PurchasingPowerParameters'IncludeOption.succ: bad argument PurchasingPowerParameters'NO. This value would be out of bounds." + succ PurchasingPowerParameters'YES + = PurchasingPowerParameters'NEGATIVE + succ PurchasingPowerParameters'NEGATIVE + = PurchasingPowerParameters'NO + pred PurchasingPowerParameters'YES + = Prelude.error + "PurchasingPowerParameters'IncludeOption.pred: bad argument PurchasingPowerParameters'YES. This value would be out of bounds." + pred PurchasingPowerParameters'NEGATIVE + = PurchasingPowerParameters'YES + pred PurchasingPowerParameters'NO + = PurchasingPowerParameters'NEGATIVE + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault PurchasingPowerParameters'IncludeOption where + fieldDefault = PurchasingPowerParameters'YES +instance Control.DeepSeq.NFData PurchasingPowerParameters'IncludeOption where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.chainOrderId' @:: Lens' ReflectAsCanceledOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'chainOrderId' @:: Lens' ReflectAsCanceledOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' ReflectAsCanceledOrder Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' ReflectAsCanceledOrder (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' ReflectAsCanceledOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' ReflectAsCanceledOrder (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.sync' @:: Lens' ReflectAsCanceledOrder Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'sync' @:: Lens' ReflectAsCanceledOrder (Prelude.Maybe Prelude.Bool)@ -} +data ReflectAsCanceledOrder + = ReflectAsCanceledOrder'_constructor {_ReflectAsCanceledOrder'chainOrderId :: !(Prelude.Maybe Data.Text.Text), + _ReflectAsCanceledOrder'accountId :: !(Prelude.Maybe Data.Int.Int32), + _ReflectAsCanceledOrder'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _ReflectAsCanceledOrder'sync :: !(Prelude.Maybe Prelude.Bool), + _ReflectAsCanceledOrder'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ReflectAsCanceledOrder where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ReflectAsCanceledOrder "chainOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ReflectAsCanceledOrder'chainOrderId + (\ x__ y__ -> x__ {_ReflectAsCanceledOrder'chainOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ReflectAsCanceledOrder "maybe'chainOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ReflectAsCanceledOrder'chainOrderId + (\ x__ y__ -> x__ {_ReflectAsCanceledOrder'chainOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ReflectAsCanceledOrder "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ReflectAsCanceledOrder'accountId + (\ x__ y__ -> x__ {_ReflectAsCanceledOrder'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ReflectAsCanceledOrder "maybe'accountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ReflectAsCanceledOrder'accountId + (\ x__ y__ -> x__ {_ReflectAsCanceledOrder'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ReflectAsCanceledOrder "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ReflectAsCanceledOrder'tradeLocationId + (\ x__ y__ -> x__ {_ReflectAsCanceledOrder'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ReflectAsCanceledOrder "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ReflectAsCanceledOrder'tradeLocationId + (\ x__ y__ -> x__ {_ReflectAsCanceledOrder'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ReflectAsCanceledOrder "sync" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ReflectAsCanceledOrder'sync + (\ x__ y__ -> x__ {_ReflectAsCanceledOrder'sync = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField ReflectAsCanceledOrder "maybe'sync" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ReflectAsCanceledOrder'sync + (\ x__ y__ -> x__ {_ReflectAsCanceledOrder'sync = y__})) + Prelude.id +instance Data.ProtoLens.Message ReflectAsCanceledOrder where + messageName _ + = Data.Text.pack "traderouting_1.ReflectAsCanceledOrder" + packedMessageDescriptor _ + = "\n\ + \\SYNReflectAsCanceledOrder\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\DC1R\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2\EM\n\ + \\EOTsync\CAN\EOT \SOH(\b:\ENQfalseR\EOTsync" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + chainOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "chain_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'chainOrderId")) :: + Data.ProtoLens.FieldDescriptor ReflectAsCanceledOrder + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor ReflectAsCanceledOrder + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor ReflectAsCanceledOrder + sync__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sync" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'sync")) :: + Data.ProtoLens.FieldDescriptor ReflectAsCanceledOrder + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, chainOrderId__field_descriptor), + (Data.ProtoLens.Tag 2, accountId__field_descriptor), + (Data.ProtoLens.Tag 3, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 4, sync__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ReflectAsCanceledOrder'_unknownFields + (\ x__ y__ -> x__ {_ReflectAsCanceledOrder'_unknownFields = y__}) + defMessage + = ReflectAsCanceledOrder'_constructor + {_ReflectAsCanceledOrder'chainOrderId = Prelude.Nothing, + _ReflectAsCanceledOrder'accountId = Prelude.Nothing, + _ReflectAsCanceledOrder'tradeLocationId = Prelude.Nothing, + _ReflectAsCanceledOrder'sync = Prelude.Nothing, + _ReflectAsCanceledOrder'_unknownFields = []} + parseMessage + = let + loop :: + ReflectAsCanceledOrder + -> Data.ProtoLens.Encoding.Bytes.Parser ReflectAsCanceledOrder + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "chain_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"chainOrderId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "sync" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"sync") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ReflectAsCanceledOrder" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'chainOrderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'sync") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData ReflectAsCanceledOrder where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ReflectAsCanceledOrder'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ReflectAsCanceledOrder'chainOrderId x__) + (Control.DeepSeq.deepseq + (_ReflectAsCanceledOrder'accountId x__) + (Control.DeepSeq.deepseq + (_ReflectAsCanceledOrder'tradeLocationId x__) + (Control.DeepSeq.deepseq (_ReflectAsCanceledOrder'sync x__) ())))) +{- | Fields : + -} +data ReflectAsCanceledOrderResult + = ReflectAsCanceledOrderResult'_constructor {_ReflectAsCanceledOrderResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ReflectAsCanceledOrderResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message ReflectAsCanceledOrderResult where + messageName _ + = Data.Text.pack "traderouting_1.ReflectAsCanceledOrderResult" + packedMessageDescriptor _ + = "\n\ + \\FSReflectAsCanceledOrderResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _ReflectAsCanceledOrderResult'_unknownFields + (\ x__ y__ + -> x__ {_ReflectAsCanceledOrderResult'_unknownFields = y__}) + defMessage + = ReflectAsCanceledOrderResult'_constructor + {_ReflectAsCanceledOrderResult'_unknownFields = []} + parseMessage + = let + loop :: + ReflectAsCanceledOrderResult + -> Data.ProtoLens.Encoding.Bytes.Parser ReflectAsCanceledOrderResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ReflectAsCanceledOrderResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData ReflectAsCanceledOrderResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ReflectAsCanceledOrderResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.orderChain' @:: Lens' RelatedOrder OrderChain@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderChain' @:: Lens' RelatedOrder (Prelude.Maybe OrderChain)@ + * 'Proto.CMS.Traderouting1_Fields.children' @:: Lens' RelatedOrder [RelatedOrder]@ + * 'Proto.CMS.Traderouting1_Fields.vec'children' @:: Lens' RelatedOrder (Data.Vector.Vector RelatedOrder)@ + * 'Proto.CMS.Traderouting1_Fields.legPath' @:: Lens' RelatedOrder Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'legPath' @:: Lens' RelatedOrder (Prelude.Maybe Data.Text.Text)@ -} +data RelatedOrder + = RelatedOrder'_constructor {_RelatedOrder'orderChain :: !(Prelude.Maybe OrderChain), + _RelatedOrder'children :: !(Data.Vector.Vector RelatedOrder), + _RelatedOrder'legPath :: !(Prelude.Maybe Data.Text.Text), + _RelatedOrder'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RelatedOrder where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RelatedOrder "orderChain" OrderChain where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrder'orderChain + (\ x__ y__ -> x__ {_RelatedOrder'orderChain = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RelatedOrder "maybe'orderChain" (Prelude.Maybe OrderChain) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrder'orderChain + (\ x__ y__ -> x__ {_RelatedOrder'orderChain = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RelatedOrder "children" [RelatedOrder] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrder'children + (\ x__ y__ -> x__ {_RelatedOrder'children = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField RelatedOrder "vec'children" (Data.Vector.Vector RelatedOrder) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrder'children + (\ x__ y__ -> x__ {_RelatedOrder'children = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RelatedOrder "legPath" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrder'legPath + (\ x__ y__ -> x__ {_RelatedOrder'legPath = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RelatedOrder "maybe'legPath" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrder'legPath + (\ x__ y__ -> x__ {_RelatedOrder'legPath = y__})) + Prelude.id +instance Data.ProtoLens.Message RelatedOrder where + messageName _ = Data.Text.pack "traderouting_1.RelatedOrder" + packedMessageDescriptor _ + = "\n\ + \\fRelatedOrder\DC2;\n\ + \\vorder_chain\CAN\SOH \SOH(\v2\SUB.traderouting_1.OrderChainR\n\ + \orderChain\DC28\n\ + \\bchildren\CAN\STX \ETX(\v2\FS.traderouting_1.RelatedOrderR\bchildren\DC2\EM\n\ + \\bleg_path\CAN\ETX \SOH(\tR\alegPath" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + orderChain__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_chain" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderChain) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderChain")) :: + Data.ProtoLens.FieldDescriptor RelatedOrder + children__field_descriptor + = Data.ProtoLens.FieldDescriptor + "children" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RelatedOrder) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"children")) :: + Data.ProtoLens.FieldDescriptor RelatedOrder + legPath__field_descriptor + = Data.ProtoLens.FieldDescriptor + "leg_path" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'legPath")) :: + Data.ProtoLens.FieldDescriptor RelatedOrder + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, orderChain__field_descriptor), + (Data.ProtoLens.Tag 2, children__field_descriptor), + (Data.ProtoLens.Tag 3, legPath__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RelatedOrder'_unknownFields + (\ x__ y__ -> x__ {_RelatedOrder'_unknownFields = y__}) + defMessage + = RelatedOrder'_constructor + {_RelatedOrder'orderChain = Prelude.Nothing, + _RelatedOrder'children = Data.Vector.Generic.empty, + _RelatedOrder'legPath = Prelude.Nothing, + _RelatedOrder'_unknownFields = []} + parseMessage + = let + loop :: + RelatedOrder + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld RelatedOrder + -> Data.ProtoLens.Encoding.Bytes.Parser RelatedOrder + loop x mutable'children + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'children <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'children) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'children") frozen'children x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "order_chain" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"orderChain") y x) + mutable'children + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "children" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'children y) + loop x v + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "leg_path" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"legPath") y x) + mutable'children + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'children + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'children <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'children) + "RelatedOrder" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderChain") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'children") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'legPath") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData RelatedOrder where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RelatedOrder'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RelatedOrder'orderChain x__) + (Control.DeepSeq.deepseq + (_RelatedOrder'children x__) + (Control.DeepSeq.deepseq (_RelatedOrder'legPath x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.chainOrderId' @:: Lens' RelatedOrderTreeRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'chainOrderId' @:: Lens' RelatedOrderTreeRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' RelatedOrderTreeRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' RelatedOrderTreeRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.orderRequestsTop' @:: Lens' RelatedOrderTreeRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderRequestsTop' @:: Lens' RelatedOrderTreeRequest (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.top' @:: Lens' RelatedOrderTreeRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'top' @:: Lens' RelatedOrderTreeRequest (Prelude.Maybe Data.Word.Word32)@ -} +data RelatedOrderTreeRequest + = RelatedOrderTreeRequest'_constructor {_RelatedOrderTreeRequest'chainOrderId :: !(Prelude.Maybe Data.Text.Text), + _RelatedOrderTreeRequest'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _RelatedOrderTreeRequest'orderRequestsTop :: !(Prelude.Maybe Data.Word.Word32), + _RelatedOrderTreeRequest'top :: !(Prelude.Maybe Data.Word.Word32), + _RelatedOrderTreeRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RelatedOrderTreeRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RelatedOrderTreeRequest "chainOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeRequest'chainOrderId + (\ x__ y__ -> x__ {_RelatedOrderTreeRequest'chainOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RelatedOrderTreeRequest "maybe'chainOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeRequest'chainOrderId + (\ x__ y__ -> x__ {_RelatedOrderTreeRequest'chainOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RelatedOrderTreeRequest "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeRequest'tradeLocationId + (\ x__ y__ + -> x__ {_RelatedOrderTreeRequest'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RelatedOrderTreeRequest "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeRequest'tradeLocationId + (\ x__ y__ + -> x__ {_RelatedOrderTreeRequest'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RelatedOrderTreeRequest "orderRequestsTop" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeRequest'orderRequestsTop + (\ x__ y__ + -> x__ {_RelatedOrderTreeRequest'orderRequestsTop = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RelatedOrderTreeRequest "maybe'orderRequestsTop" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeRequest'orderRequestsTop + (\ x__ y__ + -> x__ {_RelatedOrderTreeRequest'orderRequestsTop = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RelatedOrderTreeRequest "top" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeRequest'top + (\ x__ y__ -> x__ {_RelatedOrderTreeRequest'top = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RelatedOrderTreeRequest "maybe'top" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeRequest'top + (\ x__ y__ -> x__ {_RelatedOrderTreeRequest'top = y__})) + Prelude.id +instance Data.ProtoLens.Message RelatedOrderTreeRequest where + messageName _ + = Data.Text.pack "traderouting_1.RelatedOrderTreeRequest" + packedMessageDescriptor _ + = "\n\ + \\ETBRelatedOrderTreeRequest\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2*\n\ + \\DC1trade_location_id\CAN\STX \SOH(\tR\SItradeLocationId\DC2,\n\ + \\DC2order_requests_top\CAN\ETX \SOH(\rR\DLEorderRequestsTop\DC2\DLE\n\ + \\ETXtop\CAN\EOT \SOH(\rR\ETXtop" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + chainOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "chain_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'chainOrderId")) :: + Data.ProtoLens.FieldDescriptor RelatedOrderTreeRequest + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor RelatedOrderTreeRequest + orderRequestsTop__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_requests_top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderRequestsTop")) :: + Data.ProtoLens.FieldDescriptor RelatedOrderTreeRequest + top__field_descriptor + = Data.ProtoLens.FieldDescriptor + "top" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'top")) :: + Data.ProtoLens.FieldDescriptor RelatedOrderTreeRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, chainOrderId__field_descriptor), + (Data.ProtoLens.Tag 2, tradeLocationId__field_descriptor), + (Data.ProtoLens.Tag 3, orderRequestsTop__field_descriptor), + (Data.ProtoLens.Tag 4, top__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RelatedOrderTreeRequest'_unknownFields + (\ x__ y__ -> x__ {_RelatedOrderTreeRequest'_unknownFields = y__}) + defMessage + = RelatedOrderTreeRequest'_constructor + {_RelatedOrderTreeRequest'chainOrderId = Prelude.Nothing, + _RelatedOrderTreeRequest'tradeLocationId = Prelude.Nothing, + _RelatedOrderTreeRequest'orderRequestsTop = Prelude.Nothing, + _RelatedOrderTreeRequest'top = Prelude.Nothing, + _RelatedOrderTreeRequest'_unknownFields = []} + parseMessage + = let + loop :: + RelatedOrderTreeRequest + -> Data.ProtoLens.Encoding.Bytes.Parser RelatedOrderTreeRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "chain_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"chainOrderId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "order_requests_top" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderRequestsTop") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "top" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"top") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RelatedOrderTreeRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'chainOrderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderRequestsTop") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'top") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData RelatedOrderTreeRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RelatedOrderTreeRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RelatedOrderTreeRequest'chainOrderId x__) + (Control.DeepSeq.deepseq + (_RelatedOrderTreeRequest'tradeLocationId x__) + (Control.DeepSeq.deepseq + (_RelatedOrderTreeRequest'orderRequestsTop x__) + (Control.DeepSeq.deepseq (_RelatedOrderTreeRequest'top x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.relatedOrder' @:: Lens' RelatedOrderTreeResult RelatedOrder@ + * 'Proto.CMS.Traderouting1_Fields.maybe'relatedOrder' @:: Lens' RelatedOrderTreeResult (Prelude.Maybe RelatedOrder)@ + * 'Proto.CMS.Traderouting1_Fields.isComplete' @:: Lens' RelatedOrderTreeResult Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'isComplete' @:: Lens' RelatedOrderTreeResult (Prelude.Maybe Prelude.Bool)@ -} +data RelatedOrderTreeResult + = RelatedOrderTreeResult'_constructor {_RelatedOrderTreeResult'relatedOrder :: !(Prelude.Maybe RelatedOrder), + _RelatedOrderTreeResult'isComplete :: !(Prelude.Maybe Prelude.Bool), + _RelatedOrderTreeResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RelatedOrderTreeResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RelatedOrderTreeResult "relatedOrder" RelatedOrder where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeResult'relatedOrder + (\ x__ y__ -> x__ {_RelatedOrderTreeResult'relatedOrder = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RelatedOrderTreeResult "maybe'relatedOrder" (Prelude.Maybe RelatedOrder) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeResult'relatedOrder + (\ x__ y__ -> x__ {_RelatedOrderTreeResult'relatedOrder = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RelatedOrderTreeResult "isComplete" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeResult'isComplete + (\ x__ y__ -> x__ {_RelatedOrderTreeResult'isComplete = y__})) + (Data.ProtoLens.maybeLens Prelude.True) +instance Data.ProtoLens.Field.HasField RelatedOrderTreeResult "maybe'isComplete" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RelatedOrderTreeResult'isComplete + (\ x__ y__ -> x__ {_RelatedOrderTreeResult'isComplete = y__})) + Prelude.id +instance Data.ProtoLens.Message RelatedOrderTreeResult where + messageName _ + = Data.Text.pack "traderouting_1.RelatedOrderTreeResult" + packedMessageDescriptor _ + = "\n\ + \\SYNRelatedOrderTreeResult\DC2A\n\ + \\rrelated_order\CAN\SOH \SOH(\v2\FS.traderouting_1.RelatedOrderR\frelatedOrder\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + relatedOrder__field_descriptor + = Data.ProtoLens.FieldDescriptor + "related_order" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RelatedOrder) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'relatedOrder")) :: + Data.ProtoLens.FieldDescriptor RelatedOrderTreeResult + isComplete__field_descriptor + = Data.ProtoLens.FieldDescriptor + "is_complete" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'isComplete")) :: + Data.ProtoLens.FieldDescriptor RelatedOrderTreeResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, relatedOrder__field_descriptor), + (Data.ProtoLens.Tag 2, isComplete__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RelatedOrderTreeResult'_unknownFields + (\ x__ y__ -> x__ {_RelatedOrderTreeResult'_unknownFields = y__}) + defMessage + = RelatedOrderTreeResult'_constructor + {_RelatedOrderTreeResult'relatedOrder = Prelude.Nothing, + _RelatedOrderTreeResult'isComplete = Prelude.Nothing, + _RelatedOrderTreeResult'_unknownFields = []} + parseMessage + = let + loop :: + RelatedOrderTreeResult + -> Data.ProtoLens.Encoding.Bytes.Parser RelatedOrderTreeResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "related_order" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"relatedOrder") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "is_complete" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"isComplete") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RelatedOrderTreeResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'relatedOrder") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'isComplete") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData RelatedOrderTreeResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RelatedOrderTreeResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RelatedOrderTreeResult'relatedOrder x__) + (Control.DeepSeq.deepseq + (_RelatedOrderTreeResult'isComplete x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' RemoveAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' RemoveAccount (Prelude.Maybe Data.Text.Text)@ -} +data RemoveAccount + = RemoveAccount'_constructor {_RemoveAccount'accountId :: !(Prelude.Maybe Data.Text.Text), + _RemoveAccount'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RemoveAccount where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RemoveAccount "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RemoveAccount'accountId + (\ x__ y__ -> x__ {_RemoveAccount'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RemoveAccount "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RemoveAccount'accountId + (\ x__ y__ -> x__ {_RemoveAccount'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message RemoveAccount where + messageName _ = Data.Text.pack "traderouting_1.RemoveAccount" + packedMessageDescriptor _ + = "\n\ + \\rRemoveAccount\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor RemoveAccount + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RemoveAccount'_unknownFields + (\ x__ y__ -> x__ {_RemoveAccount'_unknownFields = y__}) + defMessage + = RemoveAccount'_constructor + {_RemoveAccount'accountId = Prelude.Nothing, + _RemoveAccount'_unknownFields = []} + parseMessage + = let + loop :: + RemoveAccount -> Data.ProtoLens.Encoding.Bytes.Parser RemoveAccount + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RemoveAccount" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData RemoveAccount where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RemoveAccount'_unknownFields x__) + (Control.DeepSeq.deepseq (_RemoveAccount'accountId x__) ()) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountGroupId' @:: Lens' RemoveAccountGroup Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountGroupId' @:: Lens' RemoveAccountGroup (Prelude.Maybe Data.Text.Text)@ -} +data RemoveAccountGroup + = RemoveAccountGroup'_constructor {_RemoveAccountGroup'accountGroupId :: !(Prelude.Maybe Data.Text.Text), + _RemoveAccountGroup'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RemoveAccountGroup where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RemoveAccountGroup "accountGroupId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RemoveAccountGroup'accountGroupId + (\ x__ y__ -> x__ {_RemoveAccountGroup'accountGroupId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RemoveAccountGroup "maybe'accountGroupId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RemoveAccountGroup'accountGroupId + (\ x__ y__ -> x__ {_RemoveAccountGroup'accountGroupId = y__})) + Prelude.id +instance Data.ProtoLens.Message RemoveAccountGroup where + messageName _ = Data.Text.pack "traderouting_1.RemoveAccountGroup" + packedMessageDescriptor _ + = "\n\ + \\DC2RemoveAccountGroup\DC2(\n\ + \\DLEaccount_group_id\CAN\SOH \SOH(\tR\SOaccountGroupId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountGroupId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_group_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountGroupId")) :: + Data.ProtoLens.FieldDescriptor RemoveAccountGroup + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountGroupId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RemoveAccountGroup'_unknownFields + (\ x__ y__ -> x__ {_RemoveAccountGroup'_unknownFields = y__}) + defMessage + = RemoveAccountGroup'_constructor + {_RemoveAccountGroup'accountGroupId = Prelude.Nothing, + _RemoveAccountGroup'_unknownFields = []} + parseMessage + = let + loop :: + RemoveAccountGroup + -> Data.ProtoLens.Encoding.Bytes.Parser RemoveAccountGroup + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_group_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountGroupId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RemoveAccountGroup" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountGroupId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData RemoveAccountGroup where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RemoveAccountGroup'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RemoveAccountGroup'accountGroupId x__) ()) +{- | Fields : + -} +data RemoveAccountResult + = RemoveAccountResult'_constructor {_RemoveAccountResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RemoveAccountResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message RemoveAccountResult where + messageName _ = Data.Text.pack "traderouting_1.RemoveAccountResult" + packedMessageDescriptor _ + = "\n\ + \\DC3RemoveAccountResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _RemoveAccountResult'_unknownFields + (\ x__ y__ -> x__ {_RemoveAccountResult'_unknownFields = y__}) + defMessage + = RemoveAccountResult'_constructor + {_RemoveAccountResult'_unknownFields = []} + parseMessage + = let + loop :: + RemoveAccountResult + -> Data.ProtoLens.Encoding.Bytes.Parser RemoveAccountResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RemoveAccountResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData RemoveAccountResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RemoveAccountResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' RestoreAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' RestoreAccount (Prelude.Maybe Data.Text.Text)@ -} +data RestoreAccount + = RestoreAccount'_constructor {_RestoreAccount'accountId :: !(Prelude.Maybe Data.Text.Text), + _RestoreAccount'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RestoreAccount where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RestoreAccount "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreAccount'accountId + (\ x__ y__ -> x__ {_RestoreAccount'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RestoreAccount "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RestoreAccount'accountId + (\ x__ y__ -> x__ {_RestoreAccount'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Message RestoreAccount where + messageName _ = Data.Text.pack "traderouting_1.RestoreAccount" + packedMessageDescriptor _ + = "\n\ + \\SORestoreAccount\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor RestoreAccount + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RestoreAccount'_unknownFields + (\ x__ y__ -> x__ {_RestoreAccount'_unknownFields = y__}) + defMessage + = RestoreAccount'_constructor + {_RestoreAccount'accountId = Prelude.Nothing, + _RestoreAccount'_unknownFields = []} + parseMessage + = let + loop :: + RestoreAccount + -> Data.ProtoLens.Encoding.Bytes.Parser RestoreAccount + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RestoreAccount" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData RestoreAccount where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RestoreAccount'_unknownFields x__) + (Control.DeepSeq.deepseq (_RestoreAccount'accountId x__) ()) +{- | Fields : + -} +data RestoreAccountResult + = RestoreAccountResult'_constructor {_RestoreAccountResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RestoreAccountResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message RestoreAccountResult where + messageName _ + = Data.Text.pack "traderouting_1.RestoreAccountResult" + packedMessageDescriptor _ + = "\n\ + \\DC4RestoreAccountResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _RestoreAccountResult'_unknownFields + (\ x__ y__ -> x__ {_RestoreAccountResult'_unknownFields = y__}) + defMessage + = RestoreAccountResult'_constructor + {_RestoreAccountResult'_unknownFields = []} + parseMessage + = let + loop :: + RestoreAccountResult + -> Data.ProtoLens.Encoding.Bytes.Parser RestoreAccountResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RestoreAccountResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData RestoreAccountResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RestoreAccountResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.obsoleteAccountId' @:: Lens' RiskParameters Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteAccountId' @:: Lens' RiskParameters (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.liquidationOnly' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'liquidationOnly' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.allowFutures' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowFutures' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.allowOptions' @:: Lens' RiskParameters Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowOptions' @:: Lens' RiskParameters (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.enforceTradeSizeLimit' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforceTradeSizeLimit' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteTradeSizeLimit' @:: Lens' RiskParameters Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteTradeSizeLimit' @:: Lens' RiskParameters (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.enforceTradeMarginLimit' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforceTradeMarginLimit' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.tradeMarginLimit' @:: Lens' RiskParameters Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeMarginLimit' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.enforceTradePriceLimitTicks' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforceTradePriceLimitTicks' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.tradePriceLimitTicks' @:: Lens' RiskParameters TradePriceLimit@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradePriceLimitTicks' @:: Lens' RiskParameters (Prelude.Maybe TradePriceLimit)@ + * 'Proto.CMS.Traderouting1_Fields.enforceCommodityPositionLimit' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforceCommodityPositionLimit' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteCommodityPositionLimit' @:: Lens' RiskParameters LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteCommodityPositionLimit' @:: Lens' RiskParameters (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.enforceContractPositionLimit' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforceContractPositionLimit' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteContractPositionLimit' @:: Lens' RiskParameters LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteContractPositionLimit' @:: Lens' RiskParameters (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.enforceMarginSubsystemParameters' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforceMarginSubsystemParameters' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.purchasingPowerParameters' @:: Lens' RiskParameters PurchasingPowerParameters@ + * 'Proto.CMS.Traderouting1_Fields.maybe'purchasingPowerParameters' @:: Lens' RiskParameters (Prelude.Maybe PurchasingPowerParameters)@ + * 'Proto.CMS.Traderouting1_Fields.enforceDailyLossLimit' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforceDailyLossLimit' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.dailyLossLimit' @:: Lens' RiskParameters LossLimit@ + * 'Proto.CMS.Traderouting1_Fields.maybe'dailyLossLimit' @:: Lens' RiskParameters (Prelude.Maybe LossLimit)@ + * 'Proto.CMS.Traderouting1_Fields.enforceDeltaDailyLossLimit' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforceDeltaDailyLossLimit' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.deltaDailyLossLimit' @:: Lens' RiskParameters LossLimit@ + * 'Proto.CMS.Traderouting1_Fields.maybe'deltaDailyLossLimit' @:: Lens' RiskParameters (Prelude.Maybe LossLimit)@ + * 'Proto.CMS.Traderouting1_Fields.maximumOrderRate' @:: Lens' RiskParameters Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'maximumOrderRate' @:: Lens' RiskParameters (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.rejectRiskyMarketOrders' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'rejectRiskyMarketOrders' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.enforceTradePriceLimitPercent' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforceTradePriceLimitPercent' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.tradePriceLimitPercent' @:: Lens' RiskParameters TradePriceLimitPercent@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradePriceLimitPercent' @:: Lens' RiskParameters (Prelude.Maybe TradePriceLimitPercent)@ + * 'Proto.CMS.Traderouting1_Fields.tradeSizeLimit' @:: Lens' RiskParameters Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeSizeLimit' @:: Lens' RiskParameters (Prelude.Maybe Proto.Common.Decimal.Decimal)@ + * 'Proto.CMS.Traderouting1_Fields.commodityPositionLimit' @:: Lens' RiskParameters LimitValueDecimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'commodityPositionLimit' @:: Lens' RiskParameters (Prelude.Maybe LimitValueDecimal)@ + * 'Proto.CMS.Traderouting1_Fields.contractPositionLimit' @:: Lens' RiskParameters LimitValueDecimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'contractPositionLimit' @:: Lens' RiskParameters (Prelude.Maybe LimitValueDecimal)@ + * 'Proto.CMS.Traderouting1_Fields.lastTradingDateLimit' @:: Lens' RiskParameters LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'lastTradingDateLimit' @:: Lens' RiskParameters (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.tradeSizeLimitWithModes' @:: Lens' RiskParameters LimitValueDecimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeSizeLimitWithModes' @:: Lens' RiskParameters (Prelude.Maybe LimitValueDecimal)@ + * 'Proto.CMS.Traderouting1_Fields.enforceTotalGrossOpenPositionLimit' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'enforceTotalGrossOpenPositionLimit' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.totalGrossOpenPositionLimit' @:: Lens' RiskParameters LimitValueDecimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'totalGrossOpenPositionLimit' @:: Lens' RiskParameters (Prelude.Maybe LimitValueDecimal)@ + * 'Proto.CMS.Traderouting1_Fields.longOptionPremiumCheckAgainstPurchasingPower' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'longOptionPremiumCheckAgainstPurchasingPower' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.useIntradayCurrencyRate' @:: Lens' RiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'useIntradayCurrencyRate' @:: Lens' RiskParameters (Prelude.Maybe Prelude.Bool)@ -} +data RiskParameters + = RiskParameters'_constructor {_RiskParameters'obsoleteAccountId :: !(Prelude.Maybe Data.Int.Int32), + _RiskParameters'liquidationOnly :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'allowFutures :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'allowOptions :: !(Prelude.Maybe Data.Word.Word32), + _RiskParameters'enforceTradeSizeLimit :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'obsoleteTradeSizeLimit :: !(Prelude.Maybe Data.Int.Int32), + _RiskParameters'enforceTradeMarginLimit :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'tradeMarginLimit :: !(Prelude.Maybe Prelude.Double), + _RiskParameters'enforceTradePriceLimitTicks :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'tradePriceLimitTicks :: !(Prelude.Maybe TradePriceLimit), + _RiskParameters'enforceCommodityPositionLimit :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'obsoleteCommodityPositionLimit :: !(Prelude.Maybe LimitValue), + _RiskParameters'enforceContractPositionLimit :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'obsoleteContractPositionLimit :: !(Prelude.Maybe LimitValue), + _RiskParameters'enforceMarginSubsystemParameters :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'purchasingPowerParameters :: !(Prelude.Maybe PurchasingPowerParameters), + _RiskParameters'enforceDailyLossLimit :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'dailyLossLimit :: !(Prelude.Maybe LossLimit), + _RiskParameters'enforceDeltaDailyLossLimit :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'deltaDailyLossLimit :: !(Prelude.Maybe LossLimit), + _RiskParameters'maximumOrderRate :: !(Prelude.Maybe Data.Int.Int32), + _RiskParameters'rejectRiskyMarketOrders :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'enforceTradePriceLimitPercent :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'tradePriceLimitPercent :: !(Prelude.Maybe TradePriceLimitPercent), + _RiskParameters'tradeSizeLimit :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _RiskParameters'commodityPositionLimit :: !(Prelude.Maybe LimitValueDecimal), + _RiskParameters'contractPositionLimit :: !(Prelude.Maybe LimitValueDecimal), + _RiskParameters'lastTradingDateLimit :: !(Prelude.Maybe LimitValue), + _RiskParameters'tradeSizeLimitWithModes :: !(Prelude.Maybe LimitValueDecimal), + _RiskParameters'enforceTotalGrossOpenPositionLimit :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'totalGrossOpenPositionLimit :: !(Prelude.Maybe LimitValueDecimal), + _RiskParameters'longOptionPremiumCheckAgainstPurchasingPower :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'useIntradayCurrencyRate :: !(Prelude.Maybe Prelude.Bool), + _RiskParameters'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RiskParameters where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RiskParameters "obsoleteAccountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'obsoleteAccountId + (\ x__ y__ -> x__ {_RiskParameters'obsoleteAccountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'obsoleteAccountId" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'obsoleteAccountId + (\ x__ y__ -> x__ {_RiskParameters'obsoleteAccountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "liquidationOnly" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'liquidationOnly + (\ x__ y__ -> x__ {_RiskParameters'liquidationOnly = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'liquidationOnly" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'liquidationOnly + (\ x__ y__ -> x__ {_RiskParameters'liquidationOnly = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "allowFutures" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'allowFutures + (\ x__ y__ -> x__ {_RiskParameters'allowFutures = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'allowFutures" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'allowFutures + (\ x__ y__ -> x__ {_RiskParameters'allowFutures = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "allowOptions" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'allowOptions + (\ x__ y__ -> x__ {_RiskParameters'allowOptions = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'allowOptions" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'allowOptions + (\ x__ y__ -> x__ {_RiskParameters'allowOptions = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "enforceTradeSizeLimit" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceTradeSizeLimit + (\ x__ y__ -> x__ {_RiskParameters'enforceTradeSizeLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'enforceTradeSizeLimit" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceTradeSizeLimit + (\ x__ y__ -> x__ {_RiskParameters'enforceTradeSizeLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "obsoleteTradeSizeLimit" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'obsoleteTradeSizeLimit + (\ x__ y__ -> x__ {_RiskParameters'obsoleteTradeSizeLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'obsoleteTradeSizeLimit" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'obsoleteTradeSizeLimit + (\ x__ y__ -> x__ {_RiskParameters'obsoleteTradeSizeLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "enforceTradeMarginLimit" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceTradeMarginLimit + (\ x__ y__ -> x__ {_RiskParameters'enforceTradeMarginLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'enforceTradeMarginLimit" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceTradeMarginLimit + (\ x__ y__ -> x__ {_RiskParameters'enforceTradeMarginLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "tradeMarginLimit" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'tradeMarginLimit + (\ x__ y__ -> x__ {_RiskParameters'tradeMarginLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'tradeMarginLimit" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'tradeMarginLimit + (\ x__ y__ -> x__ {_RiskParameters'tradeMarginLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "enforceTradePriceLimitTicks" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceTradePriceLimitTicks + (\ x__ y__ + -> x__ {_RiskParameters'enforceTradePriceLimitTicks = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'enforceTradePriceLimitTicks" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceTradePriceLimitTicks + (\ x__ y__ + -> x__ {_RiskParameters'enforceTradePriceLimitTicks = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "tradePriceLimitTicks" TradePriceLimit where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'tradePriceLimitTicks + (\ x__ y__ -> x__ {_RiskParameters'tradePriceLimitTicks = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'tradePriceLimitTicks" (Prelude.Maybe TradePriceLimit) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'tradePriceLimitTicks + (\ x__ y__ -> x__ {_RiskParameters'tradePriceLimitTicks = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "enforceCommodityPositionLimit" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceCommodityPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'enforceCommodityPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'enforceCommodityPositionLimit" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceCommodityPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'enforceCommodityPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "obsoleteCommodityPositionLimit" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'obsoleteCommodityPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'obsoleteCommodityPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'obsoleteCommodityPositionLimit" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'obsoleteCommodityPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'obsoleteCommodityPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "enforceContractPositionLimit" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceContractPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'enforceContractPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'enforceContractPositionLimit" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceContractPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'enforceContractPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "obsoleteContractPositionLimit" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'obsoleteContractPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'obsoleteContractPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'obsoleteContractPositionLimit" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'obsoleteContractPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'obsoleteContractPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "enforceMarginSubsystemParameters" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceMarginSubsystemParameters + (\ x__ y__ + -> x__ {_RiskParameters'enforceMarginSubsystemParameters = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'enforceMarginSubsystemParameters" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceMarginSubsystemParameters + (\ x__ y__ + -> x__ {_RiskParameters'enforceMarginSubsystemParameters = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "purchasingPowerParameters" PurchasingPowerParameters where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'purchasingPowerParameters + (\ x__ y__ + -> x__ {_RiskParameters'purchasingPowerParameters = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'purchasingPowerParameters" (Prelude.Maybe PurchasingPowerParameters) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'purchasingPowerParameters + (\ x__ y__ + -> x__ {_RiskParameters'purchasingPowerParameters = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "enforceDailyLossLimit" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceDailyLossLimit + (\ x__ y__ -> x__ {_RiskParameters'enforceDailyLossLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'enforceDailyLossLimit" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceDailyLossLimit + (\ x__ y__ -> x__ {_RiskParameters'enforceDailyLossLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "dailyLossLimit" LossLimit where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'dailyLossLimit + (\ x__ y__ -> x__ {_RiskParameters'dailyLossLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'dailyLossLimit" (Prelude.Maybe LossLimit) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'dailyLossLimit + (\ x__ y__ -> x__ {_RiskParameters'dailyLossLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "enforceDeltaDailyLossLimit" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceDeltaDailyLossLimit + (\ x__ y__ + -> x__ {_RiskParameters'enforceDeltaDailyLossLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'enforceDeltaDailyLossLimit" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceDeltaDailyLossLimit + (\ x__ y__ + -> x__ {_RiskParameters'enforceDeltaDailyLossLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "deltaDailyLossLimit" LossLimit where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'deltaDailyLossLimit + (\ x__ y__ -> x__ {_RiskParameters'deltaDailyLossLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'deltaDailyLossLimit" (Prelude.Maybe LossLimit) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'deltaDailyLossLimit + (\ x__ y__ -> x__ {_RiskParameters'deltaDailyLossLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "maximumOrderRate" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'maximumOrderRate + (\ x__ y__ -> x__ {_RiskParameters'maximumOrderRate = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'maximumOrderRate" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'maximumOrderRate + (\ x__ y__ -> x__ {_RiskParameters'maximumOrderRate = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "rejectRiskyMarketOrders" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'rejectRiskyMarketOrders + (\ x__ y__ -> x__ {_RiskParameters'rejectRiskyMarketOrders = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'rejectRiskyMarketOrders" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'rejectRiskyMarketOrders + (\ x__ y__ -> x__ {_RiskParameters'rejectRiskyMarketOrders = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "enforceTradePriceLimitPercent" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceTradePriceLimitPercent + (\ x__ y__ + -> x__ {_RiskParameters'enforceTradePriceLimitPercent = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'enforceTradePriceLimitPercent" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceTradePriceLimitPercent + (\ x__ y__ + -> x__ {_RiskParameters'enforceTradePriceLimitPercent = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "tradePriceLimitPercent" TradePriceLimitPercent where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'tradePriceLimitPercent + (\ x__ y__ -> x__ {_RiskParameters'tradePriceLimitPercent = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'tradePriceLimitPercent" (Prelude.Maybe TradePriceLimitPercent) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'tradePriceLimitPercent + (\ x__ y__ -> x__ {_RiskParameters'tradePriceLimitPercent = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "tradeSizeLimit" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'tradeSizeLimit + (\ x__ y__ -> x__ {_RiskParameters'tradeSizeLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'tradeSizeLimit" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'tradeSizeLimit + (\ x__ y__ -> x__ {_RiskParameters'tradeSizeLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "commodityPositionLimit" LimitValueDecimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'commodityPositionLimit + (\ x__ y__ -> x__ {_RiskParameters'commodityPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'commodityPositionLimit" (Prelude.Maybe LimitValueDecimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'commodityPositionLimit + (\ x__ y__ -> x__ {_RiskParameters'commodityPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "contractPositionLimit" LimitValueDecimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'contractPositionLimit + (\ x__ y__ -> x__ {_RiskParameters'contractPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'contractPositionLimit" (Prelude.Maybe LimitValueDecimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'contractPositionLimit + (\ x__ y__ -> x__ {_RiskParameters'contractPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "lastTradingDateLimit" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'lastTradingDateLimit + (\ x__ y__ -> x__ {_RiskParameters'lastTradingDateLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'lastTradingDateLimit" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'lastTradingDateLimit + (\ x__ y__ -> x__ {_RiskParameters'lastTradingDateLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "tradeSizeLimitWithModes" LimitValueDecimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'tradeSizeLimitWithModes + (\ x__ y__ -> x__ {_RiskParameters'tradeSizeLimitWithModes = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'tradeSizeLimitWithModes" (Prelude.Maybe LimitValueDecimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'tradeSizeLimitWithModes + (\ x__ y__ -> x__ {_RiskParameters'tradeSizeLimitWithModes = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "enforceTotalGrossOpenPositionLimit" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceTotalGrossOpenPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'enforceTotalGrossOpenPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'enforceTotalGrossOpenPositionLimit" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'enforceTotalGrossOpenPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'enforceTotalGrossOpenPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "totalGrossOpenPositionLimit" LimitValueDecimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'totalGrossOpenPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'totalGrossOpenPositionLimit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'totalGrossOpenPositionLimit" (Prelude.Maybe LimitValueDecimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'totalGrossOpenPositionLimit + (\ x__ y__ + -> x__ {_RiskParameters'totalGrossOpenPositionLimit = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "longOptionPremiumCheckAgainstPurchasingPower" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'longOptionPremiumCheckAgainstPurchasingPower + (\ x__ y__ + -> x__ + {_RiskParameters'longOptionPremiumCheckAgainstPurchasingPower = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'longOptionPremiumCheckAgainstPurchasingPower" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'longOptionPremiumCheckAgainstPurchasingPower + (\ x__ y__ + -> x__ + {_RiskParameters'longOptionPremiumCheckAgainstPurchasingPower = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RiskParameters "useIntradayCurrencyRate" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'useIntradayCurrencyRate + (\ x__ y__ -> x__ {_RiskParameters'useIntradayCurrencyRate = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RiskParameters "maybe'useIntradayCurrencyRate" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RiskParameters'useIntradayCurrencyRate + (\ x__ y__ -> x__ {_RiskParameters'useIntradayCurrencyRate = y__})) + Prelude.id +instance Data.ProtoLens.Message RiskParameters where + messageName _ = Data.Text.pack "traderouting_1.RiskParameters" + packedMessageDescriptor _ + = "\n\ + \\SORiskParameters\DC22\n\ + \\DC3obsolete_account_id\CAN\SOH \SOH(\DC1R\DC1obsoleteAccountIdB\STX\CAN\SOH\DC2)\n\ + \\DLEliquidation_only\CAN\STX \SOH(\bR\SIliquidationOnly\DC2#\n\ + \\rallow_futures\CAN\ETX \SOH(\bR\fallowFutures\DC2#\n\ + \\rallow_options\CAN\EOT \SOH(\rR\fallowOptions\DC27\n\ + \\CANenforce_trade_size_limit\CAN\ENQ \SOH(\bR\NAKenforceTradeSizeLimit\DC2=\n\ + \\EMobsolete_trade_size_limit\CAN\ACK \SOH(\DC1R\SYNobsoleteTradeSizeLimitB\STX\CAN\SOH\DC2;\n\ + \\SUBenforce_trade_margin_limit\CAN\a \SOH(\bR\ETBenforceTradeMarginLimit\DC2,\n\ + \\DC2trade_margin_limit\CAN\b \SOH(\SOHR\DLEtradeMarginLimit\DC2D\n\ + \\USenforce_trade_price_limit_ticks\CAN\t \SOH(\bR\ESCenforceTradePriceLimitTicks\DC2V\n\ + \\ETBtrade_price_limit_ticks\CAN\n\ + \ \SOH(\v2\US.traderouting_1.TradePriceLimitR\DC4tradePriceLimitTicks\DC2G\n\ + \ enforce_commodity_position_limit\CAN\v \SOH(\bR\GSenforceCommodityPositionLimit\DC2i\n\ + \!obsolete_commodity_position_limit\CAN\f \SOH(\v2\SUB.traderouting_1.LimitValueR\RSobsoleteCommodityPositionLimitB\STX\CAN\SOH\DC2E\n\ + \\USenforce_contract_position_limit\CAN\r \SOH(\bR\FSenforceContractPositionLimit\DC2g\n\ + \ obsolete_contract_position_limit\CAN\SO \SOH(\v2\SUB.traderouting_1.LimitValueR\GSobsoleteContractPositionLimitB\STX\CAN\SOH\DC2M\n\ + \#enforce_margin_subsystem_parameters\CAN\SI \SOH(\bR enforceMarginSubsystemParameters\DC2i\n\ + \\ESCpurchasing_power_parameters\CAN\DLE \SOH(\v2).traderouting_1.PurchasingPowerParametersR\EMpurchasingPowerParameters\DC27\n\ + \\CANenforce_daily_loss_limit\CAN\DC1 \SOH(\bR\NAKenforceDailyLossLimit\DC2C\n\ + \\DLEdaily_loss_limit\CAN\DC2 \SOH(\v2\EM.traderouting_1.LossLimitR\SOdailyLossLimit\DC2B\n\ + \\RSenforce_delta_daily_loss_limit\CAN\DC3 \SOH(\bR\SUBenforceDeltaDailyLossLimit\DC2N\n\ + \\SYNdelta_daily_loss_limit\CAN\DC4 \SOH(\v2\EM.traderouting_1.LossLimitR\DC3deltaDailyLossLimit\DC2,\n\ + \\DC2maximum_order_rate\CAN\NAK \SOH(\DC1R\DLEmaximumOrderRate\DC2;\n\ + \\SUBreject_risky_market_orders\CAN\SYN \SOH(\bR\ETBrejectRiskyMarketOrders\DC2H\n\ + \!enforce_trade_price_limit_percent\CAN\ETB \SOH(\bR\GSenforceTradePriceLimitPercent\DC2a\n\ + \\EMtrade_price_limit_percent\CAN\CAN \SOH(\v2&.traderouting_1.TradePriceLimitPercentR\SYNtradePriceLimitPercent\DC26\n\ + \\DLEtrade_size_limit\CAN\EM \SOH(\v2\f.cqg.DecimalR\SOtradeSizeLimit\DC2[\n\ + \\CANcommodity_position_limit\CAN\SUB \SOH(\v2!.traderouting_1.LimitValueDecimalR\SYNcommodityPositionLimit\DC2Y\n\ + \\ETBcontract_position_limit\CAN\ESC \SOH(\v2!.traderouting_1.LimitValueDecimalR\NAKcontractPositionLimit\DC2Q\n\ + \\ETBlast_trading_date_limit\CAN\FS \SOH(\v2\SUB.traderouting_1.LimitValueR\DC4lastTradingDateLimit\DC2_\n\ + \\ESCtrade_size_limit_with_modes\CAN\GS \SOH(\v2!.traderouting_1.LimitValueDecimalR\ETBtradeSizeLimitWithModes\DC2S\n\ + \'enforce_total_gross_open_position_limit\CAN\RS \SOH(\bR\"enforceTotalGrossOpenPositionLimit\DC2g\n\ + \\UStotal_gross_open_position_limit\CAN\US \SOH(\v2!.traderouting_1.LimitValueDecimalR\ESCtotalGrossOpenPositionLimit\DC2h\n\ + \2long_option_premium_check_against_purchasing_power\CAN \SOH(\bR,longOptionPremiumCheckAgainstPurchasingPower\DC2;\n\ + \\SUBuse_intraday_currency_rate\CAN! \SOH(\bR\ETBuseIntradayCurrencyRate\"*\n\ + \\SOOptionsTrading\DC2\ACK\n\ + \\STXNO\DLE\SOH\DC2\a\n\ + \\ETXBUY\DLE\STX\DC2\a\n\ + \\ETXALL\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteAccountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteAccountId")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + liquidationOnly__field_descriptor + = Data.ProtoLens.FieldDescriptor + "liquidation_only" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'liquidationOnly")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + allowFutures__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allow_futures" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowFutures")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + allowOptions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allow_options" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowOptions")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + enforceTradeSizeLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_trade_size_limit" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'enforceTradeSizeLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + obsoleteTradeSizeLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_trade_size_limit" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteTradeSizeLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + enforceTradeMarginLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_trade_margin_limit" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'enforceTradeMarginLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + tradeMarginLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_margin_limit" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeMarginLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + enforceTradePriceLimitTicks__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_trade_price_limit_ticks" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'enforceTradePriceLimitTicks")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + tradePriceLimitTicks__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_price_limit_ticks" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TradePriceLimit) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradePriceLimitTicks")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + enforceCommodityPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_commodity_position_limit" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'enforceCommodityPositionLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + obsoleteCommodityPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_commodity_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteCommodityPositionLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + enforceContractPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_contract_position_limit" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'enforceContractPositionLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + obsoleteContractPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_contract_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteContractPositionLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + enforceMarginSubsystemParameters__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_margin_subsystem_parameters" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'enforceMarginSubsystemParameters")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + purchasingPowerParameters__field_descriptor + = Data.ProtoLens.FieldDescriptor + "purchasing_power_parameters" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor PurchasingPowerParameters) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'purchasingPowerParameters")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + enforceDailyLossLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_daily_loss_limit" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'enforceDailyLossLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + dailyLossLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "daily_loss_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LossLimit) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'dailyLossLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + enforceDeltaDailyLossLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_delta_daily_loss_limit" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'enforceDeltaDailyLossLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + deltaDailyLossLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "delta_daily_loss_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LossLimit) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'deltaDailyLossLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + maximumOrderRate__field_descriptor + = Data.ProtoLens.FieldDescriptor + "maximum_order_rate" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'maximumOrderRate")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + rejectRiskyMarketOrders__field_descriptor + = Data.ProtoLens.FieldDescriptor + "reject_risky_market_orders" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'rejectRiskyMarketOrders")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + enforceTradePriceLimitPercent__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_trade_price_limit_percent" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'enforceTradePriceLimitPercent")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + tradePriceLimitPercent__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_price_limit_percent" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor TradePriceLimitPercent) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradePriceLimitPercent")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + tradeSizeLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_size_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeSizeLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + commodityPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "commodity_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDecimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'commodityPositionLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + contractPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDecimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractPositionLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + lastTradingDateLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "last_trading_date_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'lastTradingDateLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + tradeSizeLimitWithModes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_size_limit_with_modes" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDecimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeSizeLimitWithModes")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + enforceTotalGrossOpenPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "enforce_total_gross_open_position_limit" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'enforceTotalGrossOpenPositionLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + totalGrossOpenPositionLimit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "total_gross_open_position_limit" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDecimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'totalGrossOpenPositionLimit")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + longOptionPremiumCheckAgainstPurchasingPower__field_descriptor + = Data.ProtoLens.FieldDescriptor + "long_option_premium_check_against_purchasing_power" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'longOptionPremiumCheckAgainstPurchasingPower")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + useIntradayCurrencyRate__field_descriptor + = Data.ProtoLens.FieldDescriptor + "use_intraday_currency_rate" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'useIntradayCurrencyRate")) :: + Data.ProtoLens.FieldDescriptor RiskParameters + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteAccountId__field_descriptor), + (Data.ProtoLens.Tag 2, liquidationOnly__field_descriptor), + (Data.ProtoLens.Tag 3, allowFutures__field_descriptor), + (Data.ProtoLens.Tag 4, allowOptions__field_descriptor), + (Data.ProtoLens.Tag 5, enforceTradeSizeLimit__field_descriptor), + (Data.ProtoLens.Tag 6, obsoleteTradeSizeLimit__field_descriptor), + (Data.ProtoLens.Tag 7, enforceTradeMarginLimit__field_descriptor), + (Data.ProtoLens.Tag 8, tradeMarginLimit__field_descriptor), + (Data.ProtoLens.Tag 9, + enforceTradePriceLimitTicks__field_descriptor), + (Data.ProtoLens.Tag 10, tradePriceLimitTicks__field_descriptor), + (Data.ProtoLens.Tag 11, + enforceCommodityPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 12, + obsoleteCommodityPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 13, + enforceContractPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 14, + obsoleteContractPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 15, + enforceMarginSubsystemParameters__field_descriptor), + (Data.ProtoLens.Tag 16, + purchasingPowerParameters__field_descriptor), + (Data.ProtoLens.Tag 17, enforceDailyLossLimit__field_descriptor), + (Data.ProtoLens.Tag 18, dailyLossLimit__field_descriptor), + (Data.ProtoLens.Tag 19, + enforceDeltaDailyLossLimit__field_descriptor), + (Data.ProtoLens.Tag 20, deltaDailyLossLimit__field_descriptor), + (Data.ProtoLens.Tag 21, maximumOrderRate__field_descriptor), + (Data.ProtoLens.Tag 22, rejectRiskyMarketOrders__field_descriptor), + (Data.ProtoLens.Tag 23, + enforceTradePriceLimitPercent__field_descriptor), + (Data.ProtoLens.Tag 24, tradePriceLimitPercent__field_descriptor), + (Data.ProtoLens.Tag 25, tradeSizeLimit__field_descriptor), + (Data.ProtoLens.Tag 26, commodityPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 27, contractPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 28, lastTradingDateLimit__field_descriptor), + (Data.ProtoLens.Tag 29, tradeSizeLimitWithModes__field_descriptor), + (Data.ProtoLens.Tag 30, + enforceTotalGrossOpenPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 31, + totalGrossOpenPositionLimit__field_descriptor), + (Data.ProtoLens.Tag 32, + longOptionPremiumCheckAgainstPurchasingPower__field_descriptor), + (Data.ProtoLens.Tag 33, useIntradayCurrencyRate__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RiskParameters'_unknownFields + (\ x__ y__ -> x__ {_RiskParameters'_unknownFields = y__}) + defMessage + = RiskParameters'_constructor + {_RiskParameters'obsoleteAccountId = Prelude.Nothing, + _RiskParameters'liquidationOnly = Prelude.Nothing, + _RiskParameters'allowFutures = Prelude.Nothing, + _RiskParameters'allowOptions = Prelude.Nothing, + _RiskParameters'enforceTradeSizeLimit = Prelude.Nothing, + _RiskParameters'obsoleteTradeSizeLimit = Prelude.Nothing, + _RiskParameters'enforceTradeMarginLimit = Prelude.Nothing, + _RiskParameters'tradeMarginLimit = Prelude.Nothing, + _RiskParameters'enforceTradePriceLimitTicks = Prelude.Nothing, + _RiskParameters'tradePriceLimitTicks = Prelude.Nothing, + _RiskParameters'enforceCommodityPositionLimit = Prelude.Nothing, + _RiskParameters'obsoleteCommodityPositionLimit = Prelude.Nothing, + _RiskParameters'enforceContractPositionLimit = Prelude.Nothing, + _RiskParameters'obsoleteContractPositionLimit = Prelude.Nothing, + _RiskParameters'enforceMarginSubsystemParameters = Prelude.Nothing, + _RiskParameters'purchasingPowerParameters = Prelude.Nothing, + _RiskParameters'enforceDailyLossLimit = Prelude.Nothing, + _RiskParameters'dailyLossLimit = Prelude.Nothing, + _RiskParameters'enforceDeltaDailyLossLimit = Prelude.Nothing, + _RiskParameters'deltaDailyLossLimit = Prelude.Nothing, + _RiskParameters'maximumOrderRate = Prelude.Nothing, + _RiskParameters'rejectRiskyMarketOrders = Prelude.Nothing, + _RiskParameters'enforceTradePriceLimitPercent = Prelude.Nothing, + _RiskParameters'tradePriceLimitPercent = Prelude.Nothing, + _RiskParameters'tradeSizeLimit = Prelude.Nothing, + _RiskParameters'commodityPositionLimit = Prelude.Nothing, + _RiskParameters'contractPositionLimit = Prelude.Nothing, + _RiskParameters'lastTradingDateLimit = Prelude.Nothing, + _RiskParameters'tradeSizeLimitWithModes = Prelude.Nothing, + _RiskParameters'enforceTotalGrossOpenPositionLimit = Prelude.Nothing, + _RiskParameters'totalGrossOpenPositionLimit = Prelude.Nothing, + _RiskParameters'longOptionPremiumCheckAgainstPurchasingPower = Prelude.Nothing, + _RiskParameters'useIntradayCurrencyRate = Prelude.Nothing, + _RiskParameters'_unknownFields = []} + parseMessage + = let + loop :: + RiskParameters + -> Data.ProtoLens.Encoding.Bytes.Parser RiskParameters + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "obsolete_account_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteAccountId") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "liquidation_only" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"liquidationOnly") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "allow_futures" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowFutures") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "allow_options" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowOptions") y x) + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_trade_size_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"enforceTradeSizeLimit") y x) + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "obsolete_trade_size_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteTradeSizeLimit") y x) + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_trade_margin_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"enforceTradeMarginLimit") y x) + 65 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "trade_margin_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeMarginLimit") y x) + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_trade_price_limit_ticks" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"enforceTradePriceLimitTicks") y + x) + 82 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trade_price_limit_ticks" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradePriceLimitTicks") y x) + 88 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_commodity_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"enforceCommodityPositionLimit") y + x) + 98 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_commodity_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteCommodityPositionLimit") + y x) + 104 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_contract_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"enforceContractPositionLimit") y + x) + 114 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_contract_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteContractPositionLimit") y + x) + 120 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_margin_subsystem_parameters" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"enforceMarginSubsystemParameters") + y x) + 130 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "purchasing_power_parameters" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"purchasingPowerParameters") y x) + 136 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_daily_loss_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"enforceDailyLossLimit") y x) + 146 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "daily_loss_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"dailyLossLimit") y x) + 152 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_delta_daily_loss_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"enforceDeltaDailyLossLimit") y x) + 162 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "delta_daily_loss_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"deltaDailyLossLimit") y x) + 168 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "maximum_order_rate" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"maximumOrderRate") y x) + 176 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "reject_risky_market_orders" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"rejectRiskyMarketOrders") y x) + 184 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_trade_price_limit_percent" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"enforceTradePriceLimitPercent") y + x) + 194 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trade_price_limit_percent" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradePriceLimitPercent") y x) + 202 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trade_size_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeSizeLimit") y x) + 210 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "commodity_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"commodityPositionLimit") y x) + 218 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "contract_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractPositionLimit") y x) + 226 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "last_trading_date_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"lastTradingDateLimit") y x) + 234 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "trade_size_limit_with_modes" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeSizeLimitWithModes") y x) + 240 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "enforce_total_gross_open_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"enforceTotalGrossOpenPositionLimit") + y x) + 250 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "total_gross_open_position_limit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"totalGrossOpenPositionLimit") y + x) + 256 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "long_option_premium_check_against_purchasing_power" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"longOptionPremiumCheckAgainstPurchasingPower") + y x) + 264 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "use_intraday_currency_rate" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"useIntradayCurrencyRate") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RiskParameters" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteAccountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'liquidationOnly") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allowFutures") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allowOptions") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'enforceTradeSizeLimit") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteTradeSizeLimit") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'enforceTradeMarginLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeMarginLimit") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 65) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'enforceTradePriceLimitTicks") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradePriceLimitTicks") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 82) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'enforceCommodityPositionLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 88) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteCommodityPositionLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 98) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'enforceContractPositionLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 104) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteContractPositionLimit") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 114) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'enforceMarginSubsystemParameters") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 120) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'purchasingPowerParameters") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 130) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'enforceDailyLossLimit") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 136) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'dailyLossLimit") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 146) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'enforceDeltaDailyLossLimit") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 152) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'deltaDailyLossLimit") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 162) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'maximumOrderRate") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 168) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'rejectRiskyMarketOrders") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 176) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'enforceTradePriceLimitPercent") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 184) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradePriceLimitPercent") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 194) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradeSizeLimit") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 202) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'commodityPositionLimit") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 210) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'contractPositionLimit") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 218) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'lastTradingDateLimit") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 226) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'tradeSizeLimitWithModes") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 234) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'enforceTotalGrossOpenPositionLimit") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 240) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'totalGrossOpenPositionLimit") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 250) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length + bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'longOptionPremiumCheckAgainstPurchasingPower") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 256) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'useIntradayCurrencyRate") + _x + of + Prelude.Nothing + -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + 264) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b + -> if b then + 1 + else + 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields + _x)))))))))))))))))))))))))))))))))) +instance Control.DeepSeq.NFData RiskParameters where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RiskParameters'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RiskParameters'obsoleteAccountId x__) + (Control.DeepSeq.deepseq + (_RiskParameters'liquidationOnly x__) + (Control.DeepSeq.deepseq + (_RiskParameters'allowFutures x__) + (Control.DeepSeq.deepseq + (_RiskParameters'allowOptions x__) + (Control.DeepSeq.deepseq + (_RiskParameters'enforceTradeSizeLimit x__) + (Control.DeepSeq.deepseq + (_RiskParameters'obsoleteTradeSizeLimit x__) + (Control.DeepSeq.deepseq + (_RiskParameters'enforceTradeMarginLimit x__) + (Control.DeepSeq.deepseq + (_RiskParameters'tradeMarginLimit x__) + (Control.DeepSeq.deepseq + (_RiskParameters'enforceTradePriceLimitTicks x__) + (Control.DeepSeq.deepseq + (_RiskParameters'tradePriceLimitTicks x__) + (Control.DeepSeq.deepseq + (_RiskParameters'enforceCommodityPositionLimit x__) + (Control.DeepSeq.deepseq + (_RiskParameters'obsoleteCommodityPositionLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'enforceContractPositionLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'obsoleteContractPositionLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'enforceMarginSubsystemParameters + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'purchasingPowerParameters + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'enforceDailyLossLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'dailyLossLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'enforceDeltaDailyLossLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'deltaDailyLossLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'maximumOrderRate + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'rejectRiskyMarketOrders + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'enforceTradePriceLimitPercent + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'tradePriceLimitPercent + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'tradeSizeLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'commodityPositionLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'contractPositionLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'lastTradingDateLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'tradeSizeLimitWithModes + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'enforceTotalGrossOpenPositionLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'totalGrossOpenPositionLimit + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'longOptionPremiumCheckAgainstPurchasingPower + x__) + (Control.DeepSeq.deepseq + (_RiskParameters'useIntradayCurrencyRate + x__) + ()))))))))))))))))))))))))))))))))) +data RiskParameters'OptionsTrading + = RiskParameters'NO | RiskParameters'BUY | RiskParameters'ALL + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum RiskParameters'OptionsTrading where + maybeToEnum 1 = Prelude.Just RiskParameters'NO + maybeToEnum 2 = Prelude.Just RiskParameters'BUY + maybeToEnum 3 = Prelude.Just RiskParameters'ALL + maybeToEnum _ = Prelude.Nothing + showEnum RiskParameters'NO = "NO" + showEnum RiskParameters'BUY = "BUY" + showEnum RiskParameters'ALL = "ALL" + readEnum k + | (Prelude.==) k "NO" = Prelude.Just RiskParameters'NO + | (Prelude.==) k "BUY" = Prelude.Just RiskParameters'BUY + | (Prelude.==) k "ALL" = Prelude.Just RiskParameters'ALL + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded RiskParameters'OptionsTrading where + minBound = RiskParameters'NO + maxBound = RiskParameters'ALL +instance Prelude.Enum RiskParameters'OptionsTrading where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum OptionsTrading: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum RiskParameters'NO = 1 + fromEnum RiskParameters'BUY = 2 + fromEnum RiskParameters'ALL = 3 + succ RiskParameters'ALL + = Prelude.error + "RiskParameters'OptionsTrading.succ: bad argument RiskParameters'ALL. This value would be out of bounds." + succ RiskParameters'NO = RiskParameters'BUY + succ RiskParameters'BUY = RiskParameters'ALL + pred RiskParameters'NO + = Prelude.error + "RiskParameters'OptionsTrading.pred: bad argument RiskParameters'NO. This value would be out of bounds." + pred RiskParameters'BUY = RiskParameters'NO + pred RiskParameters'ALL = RiskParameters'BUY + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault RiskParameters'OptionsTrading where + fieldDefault = RiskParameters'NO +instance Control.DeepSeq.NFData RiskParameters'OptionsTrading where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' RouteAlgoStrategy Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' RouteAlgoStrategy (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.name' @:: Lens' RouteAlgoStrategy Proto.Common.Shared1.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'name' @:: Lens' RouteAlgoStrategy (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Traderouting1_Fields.removed' @:: Lens' RouteAlgoStrategy Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'removed' @:: Lens' RouteAlgoStrategy (Prelude.Maybe Prelude.Bool)@ -} +data RouteAlgoStrategy + = RouteAlgoStrategy'_constructor {_RouteAlgoStrategy'id :: !(Prelude.Maybe Data.Text.Text), + _RouteAlgoStrategy'name :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _RouteAlgoStrategy'removed :: !(Prelude.Maybe Prelude.Bool), + _RouteAlgoStrategy'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RouteAlgoStrategy where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RouteAlgoStrategy "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteAlgoStrategy'id + (\ x__ y__ -> x__ {_RouteAlgoStrategy'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteAlgoStrategy "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteAlgoStrategy'id + (\ x__ y__ -> x__ {_RouteAlgoStrategy'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteAlgoStrategy "name" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteAlgoStrategy'name + (\ x__ y__ -> x__ {_RouteAlgoStrategy'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField RouteAlgoStrategy "maybe'name" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteAlgoStrategy'name + (\ x__ y__ -> x__ {_RouteAlgoStrategy'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteAlgoStrategy "removed" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteAlgoStrategy'removed + (\ x__ y__ -> x__ {_RouteAlgoStrategy'removed = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteAlgoStrategy "maybe'removed" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteAlgoStrategy'removed + (\ x__ y__ -> x__ {_RouteAlgoStrategy'removed = y__})) + Prelude.id +instance Data.ProtoLens.Message RouteAlgoStrategy where + messageName _ = Data.Text.pack "traderouting_1.RouteAlgoStrategy" + packedMessageDescriptor _ + = "\n\ + \\DC1RouteAlgoStrategy\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname\DC2\CAN\n\ + \\aremoved\CAN\ETX \SOH(\bR\aremoved" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor RouteAlgoStrategy + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor RouteAlgoStrategy + removed__field_descriptor + = Data.ProtoLens.FieldDescriptor + "removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removed")) :: + Data.ProtoLens.FieldDescriptor RouteAlgoStrategy + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, removed__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RouteAlgoStrategy'_unknownFields + (\ x__ y__ -> x__ {_RouteAlgoStrategy'_unknownFields = y__}) + defMessage + = RouteAlgoStrategy'_constructor + {_RouteAlgoStrategy'id = Prelude.Nothing, + _RouteAlgoStrategy'name = Prelude.Nothing, + _RouteAlgoStrategy'removed = Prelude.Nothing, + _RouteAlgoStrategy'_unknownFields = []} + parseMessage + = let + loop :: + RouteAlgoStrategy + -> Data.ProtoLens.Encoding.Bytes.Parser RouteAlgoStrategy + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "name" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "removed" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"removed") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RouteAlgoStrategy" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'removed") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData RouteAlgoStrategy where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RouteAlgoStrategy'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RouteAlgoStrategy'id x__) + (Control.DeepSeq.deepseq + (_RouteAlgoStrategy'name x__) + (Control.DeepSeq.deepseq (_RouteAlgoStrategy'removed x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.routeCode' @:: Lens' RouteInformation Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'routeCode' @:: Lens' RouteInformation (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.routeName' @:: Lens' RouteInformation Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'routeName' @:: Lens' RouteInformation (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.syntheticStrategies' @:: Lens' RouteInformation Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'syntheticStrategies' @:: Lens' RouteInformation (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.attributes' @:: Lens' RouteInformation [AccountRouteAttribute]@ + * 'Proto.CMS.Traderouting1_Fields.vec'attributes' @:: Lens' RouteInformation (Data.Vector.Vector AccountRouteAttribute)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteHasOverlappedInstruments' @:: Lens' RouteInformation Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteHasOverlappedInstruments' @:: Lens' RouteInformation (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.authorizationRequired' @:: Lens' RouteInformation Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'authorizationRequired' @:: Lens' RouteInformation (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.allowSyntheticOrderTypes' @:: Lens' RouteInformation Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowSyntheticOrderTypes' @:: Lens' RouteInformation (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.routeAlgoStrategies' @:: Lens' RouteInformation [RouteAlgoStrategy]@ + * 'Proto.CMS.Traderouting1_Fields.vec'routeAlgoStrategies' @:: Lens' RouteInformation (Data.Vector.Vector RouteAlgoStrategy)@ + * 'Proto.CMS.Traderouting1_Fields.primaryLoginRequired' @:: Lens' RouteInformation Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'primaryLoginRequired' @:: Lens' RouteInformation (Prelude.Maybe Prelude.Bool)@ -} +data RouteInformation + = RouteInformation'_constructor {_RouteInformation'routeCode :: !(Prelude.Maybe Data.Text.Text), + _RouteInformation'routeName :: !(Prelude.Maybe Data.Text.Text), + _RouteInformation'syntheticStrategies :: !(Prelude.Maybe Prelude.Bool), + _RouteInformation'attributes :: !(Data.Vector.Vector AccountRouteAttribute), + _RouteInformation'obsoleteHasOverlappedInstruments :: !(Prelude.Maybe Prelude.Bool), + _RouteInformation'authorizationRequired :: !(Prelude.Maybe Prelude.Bool), + _RouteInformation'allowSyntheticOrderTypes :: !(Prelude.Maybe Prelude.Bool), + _RouteInformation'routeAlgoStrategies :: !(Data.Vector.Vector RouteAlgoStrategy), + _RouteInformation'primaryLoginRequired :: !(Prelude.Maybe Prelude.Bool), + _RouteInformation'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RouteInformation where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RouteInformation "routeCode" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'routeCode + (\ x__ y__ -> x__ {_RouteInformation'routeCode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteInformation "maybe'routeCode" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'routeCode + (\ x__ y__ -> x__ {_RouteInformation'routeCode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteInformation "routeName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'routeName + (\ x__ y__ -> x__ {_RouteInformation'routeName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteInformation "maybe'routeName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'routeName + (\ x__ y__ -> x__ {_RouteInformation'routeName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteInformation "syntheticStrategies" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'syntheticStrategies + (\ x__ y__ -> x__ {_RouteInformation'syntheticStrategies = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteInformation "maybe'syntheticStrategies" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'syntheticStrategies + (\ x__ y__ -> x__ {_RouteInformation'syntheticStrategies = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteInformation "attributes" [AccountRouteAttribute] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'attributes + (\ x__ y__ -> x__ {_RouteInformation'attributes = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField RouteInformation "vec'attributes" (Data.Vector.Vector AccountRouteAttribute) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'attributes + (\ x__ y__ -> x__ {_RouteInformation'attributes = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteInformation "obsoleteHasOverlappedInstruments" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'obsoleteHasOverlappedInstruments + (\ x__ y__ + -> x__ {_RouteInformation'obsoleteHasOverlappedInstruments = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteInformation "maybe'obsoleteHasOverlappedInstruments" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'obsoleteHasOverlappedInstruments + (\ x__ y__ + -> x__ {_RouteInformation'obsoleteHasOverlappedInstruments = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteInformation "authorizationRequired" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'authorizationRequired + (\ x__ y__ -> x__ {_RouteInformation'authorizationRequired = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteInformation "maybe'authorizationRequired" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'authorizationRequired + (\ x__ y__ -> x__ {_RouteInformation'authorizationRequired = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteInformation "allowSyntheticOrderTypes" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'allowSyntheticOrderTypes + (\ x__ y__ + -> x__ {_RouteInformation'allowSyntheticOrderTypes = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteInformation "maybe'allowSyntheticOrderTypes" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'allowSyntheticOrderTypes + (\ x__ y__ + -> x__ {_RouteInformation'allowSyntheticOrderTypes = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteInformation "routeAlgoStrategies" [RouteAlgoStrategy] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'routeAlgoStrategies + (\ x__ y__ -> x__ {_RouteInformation'routeAlgoStrategies = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField RouteInformation "vec'routeAlgoStrategies" (Data.Vector.Vector RouteAlgoStrategy) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'routeAlgoStrategies + (\ x__ y__ -> x__ {_RouteInformation'routeAlgoStrategies = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteInformation "primaryLoginRequired" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'primaryLoginRequired + (\ x__ y__ -> x__ {_RouteInformation'primaryLoginRequired = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteInformation "maybe'primaryLoginRequired" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteInformation'primaryLoginRequired + (\ x__ y__ -> x__ {_RouteInformation'primaryLoginRequired = y__})) + Prelude.id +instance Data.ProtoLens.Message RouteInformation where + messageName _ = Data.Text.pack "traderouting_1.RouteInformation" + packedMessageDescriptor _ + = "\n\ + \\DLERouteInformation\DC2\GS\n\ + \\n\ + \route_code\CAN\SOH \SOH(\tR\trouteCode\DC2\GS\n\ + \\n\ + \route_name\CAN\STX \SOH(\tR\trouteName\DC21\n\ + \\DC4synthetic_strategies\CAN\ETX \SOH(\bR\DC3syntheticStrategies\DC2E\n\ + \\n\ + \attributes\CAN\EOT \ETX(\v2%.traderouting_1.AccountRouteAttributeR\n\ + \attributes\DC2Q\n\ + \#obsolete_has_overlapped_instruments\CAN\ENQ \SOH(\bR obsoleteHasOverlappedInstrumentsB\STX\CAN\SOH\DC25\n\ + \\SYNauthorization_required\CAN\ACK \SOH(\bR\NAKauthorizationRequired\DC2=\n\ + \\ESCallow_synthetic_order_types\CAN\a \SOH(\bR\CANallowSyntheticOrderTypes\DC2U\n\ + \\NAKroute_algo_strategies\CAN\b \ETX(\v2!.traderouting_1.RouteAlgoStrategyR\DC3routeAlgoStrategies\DC24\n\ + \\SYNprimary_login_required\CAN\t \SOH(\bR\DC4primaryLoginRequired" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + routeCode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route_code" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'routeCode")) :: + Data.ProtoLens.FieldDescriptor RouteInformation + routeName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'routeName")) :: + Data.ProtoLens.FieldDescriptor RouteInformation + syntheticStrategies__field_descriptor + = Data.ProtoLens.FieldDescriptor + "synthetic_strategies" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'syntheticStrategies")) :: + Data.ProtoLens.FieldDescriptor RouteInformation + attributes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "attributes" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountRouteAttribute) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"attributes")) :: + Data.ProtoLens.FieldDescriptor RouteInformation + obsoleteHasOverlappedInstruments__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_has_overlapped_instruments" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteHasOverlappedInstruments")) :: + Data.ProtoLens.FieldDescriptor RouteInformation + authorizationRequired__field_descriptor + = Data.ProtoLens.FieldDescriptor + "authorization_required" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'authorizationRequired")) :: + Data.ProtoLens.FieldDescriptor RouteInformation + allowSyntheticOrderTypes__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allow_synthetic_order_types" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowSyntheticOrderTypes")) :: + Data.ProtoLens.FieldDescriptor RouteInformation + routeAlgoStrategies__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route_algo_strategies" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RouteAlgoStrategy) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"routeAlgoStrategies")) :: + Data.ProtoLens.FieldDescriptor RouteInformation + primaryLoginRequired__field_descriptor + = Data.ProtoLens.FieldDescriptor + "primary_login_required" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'primaryLoginRequired")) :: + Data.ProtoLens.FieldDescriptor RouteInformation + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, routeCode__field_descriptor), + (Data.ProtoLens.Tag 2, routeName__field_descriptor), + (Data.ProtoLens.Tag 3, syntheticStrategies__field_descriptor), + (Data.ProtoLens.Tag 4, attributes__field_descriptor), + (Data.ProtoLens.Tag 5, + obsoleteHasOverlappedInstruments__field_descriptor), + (Data.ProtoLens.Tag 6, authorizationRequired__field_descriptor), + (Data.ProtoLens.Tag 7, allowSyntheticOrderTypes__field_descriptor), + (Data.ProtoLens.Tag 8, routeAlgoStrategies__field_descriptor), + (Data.ProtoLens.Tag 9, primaryLoginRequired__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RouteInformation'_unknownFields + (\ x__ y__ -> x__ {_RouteInformation'_unknownFields = y__}) + defMessage + = RouteInformation'_constructor + {_RouteInformation'routeCode = Prelude.Nothing, + _RouteInformation'routeName = Prelude.Nothing, + _RouteInformation'syntheticStrategies = Prelude.Nothing, + _RouteInformation'attributes = Data.Vector.Generic.empty, + _RouteInformation'obsoleteHasOverlappedInstruments = Prelude.Nothing, + _RouteInformation'authorizationRequired = Prelude.Nothing, + _RouteInformation'allowSyntheticOrderTypes = Prelude.Nothing, + _RouteInformation'routeAlgoStrategies = Data.Vector.Generic.empty, + _RouteInformation'primaryLoginRequired = Prelude.Nothing, + _RouteInformation'_unknownFields = []} + parseMessage + = let + loop :: + RouteInformation + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountRouteAttribute + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld RouteAlgoStrategy + -> Data.ProtoLens.Encoding.Bytes.Parser RouteInformation + loop x mutable'attributes mutable'routeAlgoStrategies + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'attributes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'attributes) + frozen'routeAlgoStrategies <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'routeAlgoStrategies) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'attributes") frozen'attributes + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'routeAlgoStrategies") + frozen'routeAlgoStrategies x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "route_code" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"routeCode") y x) + mutable'attributes mutable'routeAlgoStrategies + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "route_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"routeName") y x) + mutable'attributes mutable'routeAlgoStrategies + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "synthetic_strategies" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"syntheticStrategies") y x) + mutable'attributes mutable'routeAlgoStrategies + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "attributes" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'attributes y) + loop x v mutable'routeAlgoStrategies + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "obsolete_has_overlapped_instruments" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"obsoleteHasOverlappedInstruments") + y x) + mutable'attributes mutable'routeAlgoStrategies + 48 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "authorization_required" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"authorizationRequired") y x) + mutable'attributes mutable'routeAlgoStrategies + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "allow_synthetic_order_types" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowSyntheticOrderTypes") y x) + mutable'attributes mutable'routeAlgoStrategies + 66 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "route_algo_strategies" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'routeAlgoStrategies y) + loop x mutable'attributes v + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "primary_login_required" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"primaryLoginRequired") y x) + mutable'attributes mutable'routeAlgoStrategies + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'attributes mutable'routeAlgoStrategies + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'attributes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'routeAlgoStrategies <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'attributes + mutable'routeAlgoStrategies) + "RouteInformation" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'routeCode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'routeName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'syntheticStrategies") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'attributes") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteHasOverlappedInstruments") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'authorizationRequired") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 48) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allowSyntheticOrderTypes") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'routeAlgoStrategies") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'primaryLoginRequired") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + (\ b -> if b then 1 else 0) _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))))) +instance Control.DeepSeq.NFData RouteInformation where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RouteInformation'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RouteInformation'routeCode x__) + (Control.DeepSeq.deepseq + (_RouteInformation'routeName x__) + (Control.DeepSeq.deepseq + (_RouteInformation'syntheticStrategies x__) + (Control.DeepSeq.deepseq + (_RouteInformation'attributes x__) + (Control.DeepSeq.deepseq + (_RouteInformation'obsoleteHasOverlappedInstruments x__) + (Control.DeepSeq.deepseq + (_RouteInformation'authorizationRequired x__) + (Control.DeepSeq.deepseq + (_RouteInformation'allowSyntheticOrderTypes x__) + (Control.DeepSeq.deepseq + (_RouteInformation'routeAlgoStrategies x__) + (Control.DeepSeq.deepseq + (_RouteInformation'primaryLoginRequired x__) ()))))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' RouteOmnibusAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' RouteOmnibusAccount (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountName' @:: Lens' RouteOmnibusAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountName' @:: Lens' RouteOmnibusAccount (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageAccountNumber' @:: Lens' RouteOmnibusAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'brokerageAccountNumber' @:: Lens' RouteOmnibusAccount (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.priority' @:: Lens' RouteOmnibusAccount Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'priority' @:: Lens' RouteOmnibusAccount (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.riskServerInstanceId' @:: Lens' RouteOmnibusAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'riskServerInstanceId' @:: Lens' RouteOmnibusAccount (Prelude.Maybe Data.Text.Text)@ -} +data RouteOmnibusAccount + = RouteOmnibusAccount'_constructor {_RouteOmnibusAccount'accountId :: !(Prelude.Maybe Data.Text.Text), + _RouteOmnibusAccount'accountName :: !(Prelude.Maybe Data.Text.Text), + _RouteOmnibusAccount'brokerageAccountNumber :: !(Prelude.Maybe Data.Text.Text), + _RouteOmnibusAccount'priority :: !(Prelude.Maybe Data.Word.Word32), + _RouteOmnibusAccount'riskServerInstanceId :: !(Prelude.Maybe Data.Text.Text), + _RouteOmnibusAccount'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show RouteOmnibusAccount where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField RouteOmnibusAccount "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteOmnibusAccount'accountId + (\ x__ y__ -> x__ {_RouteOmnibusAccount'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteOmnibusAccount "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteOmnibusAccount'accountId + (\ x__ y__ -> x__ {_RouteOmnibusAccount'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteOmnibusAccount "accountName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteOmnibusAccount'accountName + (\ x__ y__ -> x__ {_RouteOmnibusAccount'accountName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteOmnibusAccount "maybe'accountName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteOmnibusAccount'accountName + (\ x__ y__ -> x__ {_RouteOmnibusAccount'accountName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteOmnibusAccount "brokerageAccountNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteOmnibusAccount'brokerageAccountNumber + (\ x__ y__ + -> x__ {_RouteOmnibusAccount'brokerageAccountNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteOmnibusAccount "maybe'brokerageAccountNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteOmnibusAccount'brokerageAccountNumber + (\ x__ y__ + -> x__ {_RouteOmnibusAccount'brokerageAccountNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteOmnibusAccount "priority" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteOmnibusAccount'priority + (\ x__ y__ -> x__ {_RouteOmnibusAccount'priority = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteOmnibusAccount "maybe'priority" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteOmnibusAccount'priority + (\ x__ y__ -> x__ {_RouteOmnibusAccount'priority = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField RouteOmnibusAccount "riskServerInstanceId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteOmnibusAccount'riskServerInstanceId + (\ x__ y__ + -> x__ {_RouteOmnibusAccount'riskServerInstanceId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField RouteOmnibusAccount "maybe'riskServerInstanceId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _RouteOmnibusAccount'riskServerInstanceId + (\ x__ y__ + -> x__ {_RouteOmnibusAccount'riskServerInstanceId = y__})) + Prelude.id +instance Data.ProtoLens.Message RouteOmnibusAccount where + messageName _ = Data.Text.pack "traderouting_1.RouteOmnibusAccount" + packedMessageDescriptor _ + = "\n\ + \\DC3RouteOmnibusAccount\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2!\n\ + \\faccount_name\CAN\STX \SOH(\tR\vaccountName\DC28\n\ + \\CANbrokerage_account_number\CAN\ETX \SOH(\tR\SYNbrokerageAccountNumber\DC2\SUB\n\ + \\bpriority\CAN\EOT \SOH(\rR\bpriority\DC25\n\ + \\ETBrisk_server_instance_id\CAN\ENQ \SOH(\tR\DC4riskServerInstanceId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor RouteOmnibusAccount + accountName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountName")) :: + Data.ProtoLens.FieldDescriptor RouteOmnibusAccount + brokerageAccountNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_account_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber")) :: + Data.ProtoLens.FieldDescriptor RouteOmnibusAccount + priority__field_descriptor + = Data.ProtoLens.FieldDescriptor + "priority" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'priority")) :: + Data.ProtoLens.FieldDescriptor RouteOmnibusAccount + riskServerInstanceId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "risk_server_instance_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'riskServerInstanceId")) :: + Data.ProtoLens.FieldDescriptor RouteOmnibusAccount + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, accountName__field_descriptor), + (Data.ProtoLens.Tag 3, brokerageAccountNumber__field_descriptor), + (Data.ProtoLens.Tag 4, priority__field_descriptor), + (Data.ProtoLens.Tag 5, riskServerInstanceId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _RouteOmnibusAccount'_unknownFields + (\ x__ y__ -> x__ {_RouteOmnibusAccount'_unknownFields = y__}) + defMessage + = RouteOmnibusAccount'_constructor + {_RouteOmnibusAccount'accountId = Prelude.Nothing, + _RouteOmnibusAccount'accountName = Prelude.Nothing, + _RouteOmnibusAccount'brokerageAccountNumber = Prelude.Nothing, + _RouteOmnibusAccount'priority = Prelude.Nothing, + _RouteOmnibusAccount'riskServerInstanceId = Prelude.Nothing, + _RouteOmnibusAccount'_unknownFields = []} + parseMessage + = let + loop :: + RouteOmnibusAccount + -> Data.ProtoLens.Encoding.Bytes.Parser RouteOmnibusAccount + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountName") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_account_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAccountNumber") y x) + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "priority" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"priority") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "risk_server_instance_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"riskServerInstanceId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "RouteOmnibusAccount" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'priority") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'riskServerInstanceId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData RouteOmnibusAccount where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_RouteOmnibusAccount'_unknownFields x__) + (Control.DeepSeq.deepseq + (_RouteOmnibusAccount'accountId x__) + (Control.DeepSeq.deepseq + (_RouteOmnibusAccount'accountName x__) + (Control.DeepSeq.deepseq + (_RouteOmnibusAccount'brokerageAccountNumber x__) + (Control.DeepSeq.deepseq + (_RouteOmnibusAccount'priority x__) + (Control.DeepSeq.deepseq + (_RouteOmnibusAccount'riskServerInstanceId x__) ()))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' ServiceGroup Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'id' @:: Lens' ServiceGroup (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.name' @:: Lens' ServiceGroup Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'name' @:: Lens' ServiceGroup (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.removed' @:: Lens' ServiceGroup Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'removed' @:: Lens' ServiceGroup (Prelude.Maybe Prelude.Bool)@ -} +data ServiceGroup + = ServiceGroup'_constructor {_ServiceGroup'id :: !(Prelude.Maybe Data.Text.Text), + _ServiceGroup'name :: !(Prelude.Maybe Data.Text.Text), + _ServiceGroup'removed :: !(Prelude.Maybe Prelude.Bool), + _ServiceGroup'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ServiceGroup where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ServiceGroup "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServiceGroup'id (\ x__ y__ -> x__ {_ServiceGroup'id = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ServiceGroup "maybe'id" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServiceGroup'id (\ x__ y__ -> x__ {_ServiceGroup'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServiceGroup "name" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServiceGroup'name (\ x__ y__ -> x__ {_ServiceGroup'name = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ServiceGroup "maybe'name" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServiceGroup'name (\ x__ y__ -> x__ {_ServiceGroup'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ServiceGroup "removed" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServiceGroup'removed + (\ x__ y__ -> x__ {_ServiceGroup'removed = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField ServiceGroup "maybe'removed" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ServiceGroup'removed + (\ x__ y__ -> x__ {_ServiceGroup'removed = y__})) + Prelude.id +instance Data.ProtoLens.Message ServiceGroup where + messageName _ = Data.Text.pack "traderouting_1.ServiceGroup" + packedMessageDescriptor _ + = "\n\ + \\fServiceGroup\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\DC2\n\ + \\EOTname\CAN\STX \SOH(\tR\EOTname\DC2\CAN\n\ + \\aremoved\CAN\ETX \SOH(\bR\aremoved" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'id")) :: + Data.ProtoLens.FieldDescriptor ServiceGroup + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'name")) :: + Data.ProtoLens.FieldDescriptor ServiceGroup + removed__field_descriptor + = Data.ProtoLens.FieldDescriptor + "removed" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'removed")) :: + Data.ProtoLens.FieldDescriptor ServiceGroup + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, name__field_descriptor), + (Data.ProtoLens.Tag 3, removed__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ServiceGroup'_unknownFields + (\ x__ y__ -> x__ {_ServiceGroup'_unknownFields = y__}) + defMessage + = ServiceGroup'_constructor + {_ServiceGroup'id = Prelude.Nothing, + _ServiceGroup'name = Prelude.Nothing, + _ServiceGroup'removed = Prelude.Nothing, + _ServiceGroup'_unknownFields = []} + parseMessage + = let + loop :: + ServiceGroup -> Data.ProtoLens.Encoding.Bytes.Parser ServiceGroup + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "name" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "removed" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"removed") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "ServiceGroup" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'id") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'name") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'removed") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData ServiceGroup where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ServiceGroup'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ServiceGroup'id x__) + (Control.DeepSeq.deepseq + (_ServiceGroup'name x__) + (Control.DeepSeq.deepseq (_ServiceGroup'removed x__) ()))) +data ServiceGroupAuthorizationLevel + = NONE | ONE_REQUIRED | ANY_REQUIRED + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum ServiceGroupAuthorizationLevel where + maybeToEnum 0 = Prelude.Just NONE + maybeToEnum 1 = Prelude.Just ONE_REQUIRED + maybeToEnum 2 = Prelude.Just ANY_REQUIRED + maybeToEnum _ = Prelude.Nothing + showEnum NONE = "NONE" + showEnum ONE_REQUIRED = "ONE_REQUIRED" + showEnum ANY_REQUIRED = "ANY_REQUIRED" + readEnum k + | (Prelude.==) k "NONE" = Prelude.Just NONE + | (Prelude.==) k "ONE_REQUIRED" = Prelude.Just ONE_REQUIRED + | (Prelude.==) k "ANY_REQUIRED" = Prelude.Just ANY_REQUIRED + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded ServiceGroupAuthorizationLevel where + minBound = NONE + maxBound = ANY_REQUIRED +instance Prelude.Enum ServiceGroupAuthorizationLevel where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum ServiceGroupAuthorizationLevel: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum NONE = 0 + fromEnum ONE_REQUIRED = 1 + fromEnum ANY_REQUIRED = 2 + succ ANY_REQUIRED + = Prelude.error + "ServiceGroupAuthorizationLevel.succ: bad argument ANY_REQUIRED. This value would be out of bounds." + succ NONE = ONE_REQUIRED + succ ONE_REQUIRED = ANY_REQUIRED + pred NONE + = Prelude.error + "ServiceGroupAuthorizationLevel.pred: bad argument NONE. This value would be out of bounds." + pred ONE_REQUIRED = NONE + pred ANY_REQUIRED = ONE_REQUIRED + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault ServiceGroupAuthorizationLevel where + fieldDefault = NONE +instance Control.DeepSeq.NFData ServiceGroupAuthorizationLevel where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.legPath' @:: Lens' StrategyLeg Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'legPath' @:: Lens' StrategyLeg (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.contractSymbol' @:: Lens' StrategyLeg Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'contractSymbol' @:: Lens' StrategyLeg (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteQuantityRatio' @:: Lens' StrategyLeg Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteQuantityRatio' @:: Lens' StrategyLeg (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.priceRatio' @:: Lens' StrategyLeg Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'priceRatio' @:: Lens' StrategyLeg (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.mode' @:: Lens' StrategyLeg Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'mode' @:: Lens' StrategyLeg (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.account' @:: Lens' StrategyLeg ChainAccount@ + * 'Proto.CMS.Traderouting1_Fields.maybe'account' @:: Lens' StrategyLeg (Prelude.Maybe ChainAccount)@ + * 'Proto.CMS.Traderouting1_Fields.yieldModel' @:: Lens' StrategyLeg [Proto.CMS.Common1.Tuple]@ + * 'Proto.CMS.Traderouting1_Fields.vec'yieldModel' @:: Lens' StrategyLeg (Data.Vector.Vector Proto.CMS.Common1.Tuple)@ + * 'Proto.CMS.Traderouting1_Fields.legs' @:: Lens' StrategyLeg [StrategyLeg]@ + * 'Proto.CMS.Traderouting1_Fields.vec'legs' @:: Lens' StrategyLeg (Data.Vector.Vector StrategyLeg)@ + * 'Proto.CMS.Traderouting1_Fields.openCloseType' @:: Lens' StrategyLeg Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'openCloseType' @:: Lens' StrategyLeg (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.speculationType' @:: Lens' StrategyLeg Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'speculationType' @:: Lens' StrategyLeg (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.quantityRatio' @:: Lens' StrategyLeg Proto.Common.Decimal.Decimal@ + * 'Proto.CMS.Traderouting1_Fields.maybe'quantityRatio' @:: Lens' StrategyLeg (Prelude.Maybe Proto.Common.Decimal.Decimal)@ -} +data StrategyLeg + = StrategyLeg'_constructor {_StrategyLeg'legPath :: !(Prelude.Maybe Data.Text.Text), + _StrategyLeg'contractSymbol :: !(Prelude.Maybe Data.Text.Text), + _StrategyLeg'obsoleteQuantityRatio :: !(Prelude.Maybe Prelude.Double), + _StrategyLeg'priceRatio :: !(Prelude.Maybe Prelude.Double), + _StrategyLeg'mode :: !(Prelude.Maybe Data.Word.Word32), + _StrategyLeg'account :: !(Prelude.Maybe ChainAccount), + _StrategyLeg'yieldModel :: !(Data.Vector.Vector Proto.CMS.Common1.Tuple), + _StrategyLeg'legs :: !(Data.Vector.Vector StrategyLeg), + _StrategyLeg'openCloseType :: !(Prelude.Maybe Data.Word.Word32), + _StrategyLeg'speculationType :: !(Prelude.Maybe Data.Word.Word32), + _StrategyLeg'quantityRatio :: !(Prelude.Maybe Proto.Common.Decimal.Decimal), + _StrategyLeg'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show StrategyLeg where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField StrategyLeg "legPath" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'legPath + (\ x__ y__ -> x__ {_StrategyLeg'legPath = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField StrategyLeg "maybe'legPath" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'legPath + (\ x__ y__ -> x__ {_StrategyLeg'legPath = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StrategyLeg "contractSymbol" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'contractSymbol + (\ x__ y__ -> x__ {_StrategyLeg'contractSymbol = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField StrategyLeg "maybe'contractSymbol" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'contractSymbol + (\ x__ y__ -> x__ {_StrategyLeg'contractSymbol = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StrategyLeg "obsoleteQuantityRatio" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'obsoleteQuantityRatio + (\ x__ y__ -> x__ {_StrategyLeg'obsoleteQuantityRatio = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField StrategyLeg "maybe'obsoleteQuantityRatio" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'obsoleteQuantityRatio + (\ x__ y__ -> x__ {_StrategyLeg'obsoleteQuantityRatio = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StrategyLeg "priceRatio" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'priceRatio + (\ x__ y__ -> x__ {_StrategyLeg'priceRatio = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField StrategyLeg "maybe'priceRatio" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'priceRatio + (\ x__ y__ -> x__ {_StrategyLeg'priceRatio = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StrategyLeg "mode" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'mode (\ x__ y__ -> x__ {_StrategyLeg'mode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField StrategyLeg "maybe'mode" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'mode (\ x__ y__ -> x__ {_StrategyLeg'mode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StrategyLeg "account" ChainAccount where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'account + (\ x__ y__ -> x__ {_StrategyLeg'account = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField StrategyLeg "maybe'account" (Prelude.Maybe ChainAccount) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'account + (\ x__ y__ -> x__ {_StrategyLeg'account = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StrategyLeg "yieldModel" [Proto.CMS.Common1.Tuple] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'yieldModel + (\ x__ y__ -> x__ {_StrategyLeg'yieldModel = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField StrategyLeg "vec'yieldModel" (Data.Vector.Vector Proto.CMS.Common1.Tuple) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'yieldModel + (\ x__ y__ -> x__ {_StrategyLeg'yieldModel = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StrategyLeg "legs" [StrategyLeg] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'legs (\ x__ y__ -> x__ {_StrategyLeg'legs = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField StrategyLeg "vec'legs" (Data.Vector.Vector StrategyLeg) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'legs (\ x__ y__ -> x__ {_StrategyLeg'legs = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StrategyLeg "openCloseType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'openCloseType + (\ x__ y__ -> x__ {_StrategyLeg'openCloseType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField StrategyLeg "maybe'openCloseType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'openCloseType + (\ x__ y__ -> x__ {_StrategyLeg'openCloseType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StrategyLeg "speculationType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'speculationType + (\ x__ y__ -> x__ {_StrategyLeg'speculationType = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField StrategyLeg "maybe'speculationType" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'speculationType + (\ x__ y__ -> x__ {_StrategyLeg'speculationType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField StrategyLeg "quantityRatio" Proto.Common.Decimal.Decimal where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'quantityRatio + (\ x__ y__ -> x__ {_StrategyLeg'quantityRatio = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField StrategyLeg "maybe'quantityRatio" (Prelude.Maybe Proto.Common.Decimal.Decimal) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _StrategyLeg'quantityRatio + (\ x__ y__ -> x__ {_StrategyLeg'quantityRatio = y__})) + Prelude.id +instance Data.ProtoLens.Message StrategyLeg where + messageName _ = Data.Text.pack "traderouting_1.StrategyLeg" + packedMessageDescriptor _ + = "\n\ + \\vStrategyLeg\DC2\EM\n\ + \\bleg_path\CAN\SOH \SOH(\tR\alegPath\DC2'\n\ + \\SIcontract_symbol\CAN\STX \SOH(\tR\SOcontractSymbol\DC2:\n\ + \\ETBobsolete_quantity_ratio\CAN\ETX \SOH(\SOHR\NAKobsoleteQuantityRatioB\STX\CAN\SOH\DC2\US\n\ + \\vprice_ratio\CAN\EOT \SOH(\SOHR\n\ + \priceRatio\DC2\DC2\n\ + \\EOTmode\CAN\ENQ \SOH(\rR\EOTmode\DC26\n\ + \\aaccount\CAN\ACK \SOH(\v2\FS.traderouting_1.ChainAccountR\aaccount\DC20\n\ + \\vyield_model\CAN\a \ETX(\v2\SI.common_1.TupleR\n\ + \yieldModel\DC2/\n\ + \\EOTlegs\CAN\b \ETX(\v2\ESC.traderouting_1.StrategyLegR\EOTlegs\DC2&\n\ + \\SIopen_close_type\CAN\t \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN\n\ + \ \SOH(\rR\SIspeculationType\DC23\n\ + \\SOquantity_ratio\CAN\v \SOH(\v2\f.cqg.DecimalR\rquantityRatio\"*\n\ + \\fStrategyMode\DC2\a\n\ + \\ETXALL\DLE\SOH\DC2\b\n\ + \\EOTAGGR\DLE\STX\DC2\a\n\ + \\ETXMUL\DLE\ETX" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + legPath__field_descriptor + = Data.ProtoLens.FieldDescriptor + "leg_path" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'legPath")) :: + Data.ProtoLens.FieldDescriptor StrategyLeg + contractSymbol__field_descriptor + = Data.ProtoLens.FieldDescriptor + "contract_symbol" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'contractSymbol")) :: + Data.ProtoLens.FieldDescriptor StrategyLeg + obsoleteQuantityRatio__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_quantity_ratio" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteQuantityRatio")) :: + Data.ProtoLens.FieldDescriptor StrategyLeg + priceRatio__field_descriptor + = Data.ProtoLens.FieldDescriptor + "price_ratio" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'priceRatio")) :: + Data.ProtoLens.FieldDescriptor StrategyLeg + mode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'mode")) :: + Data.ProtoLens.FieldDescriptor StrategyLeg + account__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ChainAccount) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'account")) :: + Data.ProtoLens.FieldDescriptor StrategyLeg + yieldModel__field_descriptor + = Data.ProtoLens.FieldDescriptor + "yield_model" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Tuple) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"yieldModel")) :: + Data.ProtoLens.FieldDescriptor StrategyLeg + legs__field_descriptor + = Data.ProtoLens.FieldDescriptor + "legs" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StrategyLeg) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"legs")) :: + Data.ProtoLens.FieldDescriptor StrategyLeg + openCloseType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "open_close_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'openCloseType")) :: + Data.ProtoLens.FieldDescriptor StrategyLeg + speculationType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "speculation_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'speculationType")) :: + Data.ProtoLens.FieldDescriptor StrategyLeg + quantityRatio__field_descriptor + = Data.ProtoLens.FieldDescriptor + "quantity_ratio" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Decimal.Decimal) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'quantityRatio")) :: + Data.ProtoLens.FieldDescriptor StrategyLeg + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, legPath__field_descriptor), + (Data.ProtoLens.Tag 2, contractSymbol__field_descriptor), + (Data.ProtoLens.Tag 3, obsoleteQuantityRatio__field_descriptor), + (Data.ProtoLens.Tag 4, priceRatio__field_descriptor), + (Data.ProtoLens.Tag 5, mode__field_descriptor), + (Data.ProtoLens.Tag 6, account__field_descriptor), + (Data.ProtoLens.Tag 7, yieldModel__field_descriptor), + (Data.ProtoLens.Tag 8, legs__field_descriptor), + (Data.ProtoLens.Tag 9, openCloseType__field_descriptor), + (Data.ProtoLens.Tag 10, speculationType__field_descriptor), + (Data.ProtoLens.Tag 11, quantityRatio__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _StrategyLeg'_unknownFields + (\ x__ y__ -> x__ {_StrategyLeg'_unknownFields = y__}) + defMessage + = StrategyLeg'_constructor + {_StrategyLeg'legPath = Prelude.Nothing, + _StrategyLeg'contractSymbol = Prelude.Nothing, + _StrategyLeg'obsoleteQuantityRatio = Prelude.Nothing, + _StrategyLeg'priceRatio = Prelude.Nothing, + _StrategyLeg'mode = Prelude.Nothing, + _StrategyLeg'account = Prelude.Nothing, + _StrategyLeg'yieldModel = Data.Vector.Generic.empty, + _StrategyLeg'legs = Data.Vector.Generic.empty, + _StrategyLeg'openCloseType = Prelude.Nothing, + _StrategyLeg'speculationType = Prelude.Nothing, + _StrategyLeg'quantityRatio = Prelude.Nothing, + _StrategyLeg'_unknownFields = []} + parseMessage + = let + loop :: + StrategyLeg + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld StrategyLeg + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.Tuple + -> Data.ProtoLens.Encoding.Bytes.Parser StrategyLeg + loop x mutable'legs mutable'yieldModel + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'legs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'legs) + frozen'yieldModel <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'yieldModel) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'legs") frozen'legs + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'yieldModel") frozen'yieldModel + x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "leg_path" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"legPath") y x) + mutable'legs mutable'yieldModel + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "contract_symbol" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"contractSymbol") y x) + mutable'legs mutable'yieldModel + 25 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "obsolete_quantity_ratio" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteQuantityRatio") y x) + mutable'legs mutable'yieldModel + 33 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "price_ratio" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"priceRatio") y x) + mutable'legs mutable'yieldModel + 40 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "mode" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"mode") y x) + mutable'legs mutable'yieldModel + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"account") y x) + mutable'legs mutable'yieldModel + 58 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "yield_model" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'yieldModel y) + loop x mutable'legs v + 66 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "legs" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'legs y) + loop x v mutable'yieldModel + 72 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "open_close_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"openCloseType") y x) + mutable'legs mutable'yieldModel + 80 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "speculation_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"speculationType") y x) + mutable'legs mutable'yieldModel + 90 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "quantity_ratio" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"quantityRatio") y x) + mutable'legs mutable'yieldModel + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'legs mutable'yieldModel + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'legs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'yieldModel <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'legs mutable'yieldModel) + "StrategyLeg" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'legPath") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'contractSymbol") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteQuantityRatio") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 25) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'priceRatio") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 33) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'mode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 40) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'account") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'yieldModel") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 66) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'legs") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'openCloseType") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 72) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'speculationType") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 80) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt + Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'quantityRatio") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 90) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes + bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view + Data.ProtoLens.unknownFields _x)))))))))))) +instance Control.DeepSeq.NFData StrategyLeg where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_StrategyLeg'_unknownFields x__) + (Control.DeepSeq.deepseq + (_StrategyLeg'legPath x__) + (Control.DeepSeq.deepseq + (_StrategyLeg'contractSymbol x__) + (Control.DeepSeq.deepseq + (_StrategyLeg'obsoleteQuantityRatio x__) + (Control.DeepSeq.deepseq + (_StrategyLeg'priceRatio x__) + (Control.DeepSeq.deepseq + (_StrategyLeg'mode x__) + (Control.DeepSeq.deepseq + (_StrategyLeg'account x__) + (Control.DeepSeq.deepseq + (_StrategyLeg'yieldModel x__) + (Control.DeepSeq.deepseq + (_StrategyLeg'legs x__) + (Control.DeepSeq.deepseq + (_StrategyLeg'openCloseType x__) + (Control.DeepSeq.deepseq + (_StrategyLeg'speculationType x__) + (Control.DeepSeq.deepseq + (_StrategyLeg'quantityRatio x__) ()))))))))))) +data StrategyLeg'StrategyMode + = StrategyLeg'ALL | StrategyLeg'AGGR | StrategyLeg'MUL + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum StrategyLeg'StrategyMode where + maybeToEnum 1 = Prelude.Just StrategyLeg'ALL + maybeToEnum 2 = Prelude.Just StrategyLeg'AGGR + maybeToEnum 3 = Prelude.Just StrategyLeg'MUL + maybeToEnum _ = Prelude.Nothing + showEnum StrategyLeg'ALL = "ALL" + showEnum StrategyLeg'AGGR = "AGGR" + showEnum StrategyLeg'MUL = "MUL" + readEnum k + | (Prelude.==) k "ALL" = Prelude.Just StrategyLeg'ALL + | (Prelude.==) k "AGGR" = Prelude.Just StrategyLeg'AGGR + | (Prelude.==) k "MUL" = Prelude.Just StrategyLeg'MUL + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded StrategyLeg'StrategyMode where + minBound = StrategyLeg'ALL + maxBound = StrategyLeg'MUL +instance Prelude.Enum StrategyLeg'StrategyMode where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum StrategyMode: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum StrategyLeg'ALL = 1 + fromEnum StrategyLeg'AGGR = 2 + fromEnum StrategyLeg'MUL = 3 + succ StrategyLeg'MUL + = Prelude.error + "StrategyLeg'StrategyMode.succ: bad argument StrategyLeg'MUL. This value would be out of bounds." + succ StrategyLeg'ALL = StrategyLeg'AGGR + succ StrategyLeg'AGGR = StrategyLeg'MUL + pred StrategyLeg'ALL + = Prelude.error + "StrategyLeg'StrategyMode.pred: bad argument StrategyLeg'ALL. This value would be out of bounds." + pred StrategyLeg'AGGR = StrategyLeg'ALL + pred StrategyLeg'MUL = StrategyLeg'AGGR + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault StrategyLeg'StrategyMode where + fieldDefault = StrategyLeg'ALL +instance Control.DeepSeq.NFData StrategyLeg'StrategyMode where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' SubAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' SubAccount (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountName' @:: Lens' SubAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountName' @:: Lens' SubAccount (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.brokerageAccountNumber' @:: Lens' SubAccount Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'brokerageAccountNumber' @:: Lens' SubAccount (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.purchasingPowerFraction' @:: Lens' SubAccount Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'purchasingPowerFraction' @:: Lens' SubAccount (Prelude.Maybe Prelude.Double)@ -} +data SubAccount + = SubAccount'_constructor {_SubAccount'accountId :: !(Prelude.Maybe Data.Text.Text), + _SubAccount'accountName :: !(Prelude.Maybe Data.Text.Text), + _SubAccount'brokerageAccountNumber :: !(Prelude.Maybe Data.Text.Text), + _SubAccount'purchasingPowerFraction :: !(Prelude.Maybe Prelude.Double), + _SubAccount'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SubAccount where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SubAccount "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SubAccount'accountId + (\ x__ y__ -> x__ {_SubAccount'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SubAccount "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SubAccount'accountId + (\ x__ y__ -> x__ {_SubAccount'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SubAccount "accountName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SubAccount'accountName + (\ x__ y__ -> x__ {_SubAccount'accountName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SubAccount "maybe'accountName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SubAccount'accountName + (\ x__ y__ -> x__ {_SubAccount'accountName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SubAccount "brokerageAccountNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SubAccount'brokerageAccountNumber + (\ x__ y__ -> x__ {_SubAccount'brokerageAccountNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SubAccount "maybe'brokerageAccountNumber" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SubAccount'brokerageAccountNumber + (\ x__ y__ -> x__ {_SubAccount'brokerageAccountNumber = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SubAccount "purchasingPowerFraction" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SubAccount'purchasingPowerFraction + (\ x__ y__ -> x__ {_SubAccount'purchasingPowerFraction = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SubAccount "maybe'purchasingPowerFraction" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SubAccount'purchasingPowerFraction + (\ x__ y__ -> x__ {_SubAccount'purchasingPowerFraction = y__})) + Prelude.id +instance Data.ProtoLens.Message SubAccount where + messageName _ = Data.Text.pack "traderouting_1.SubAccount" + packedMessageDescriptor _ + = "\n\ + \\n\ + \SubAccount\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2!\n\ + \\faccount_name\CAN\STX \SOH(\tR\vaccountName\DC28\n\ + \\CANbrokerage_account_number\CAN\ETX \SOH(\tR\SYNbrokerageAccountNumber\DC2:\n\ + \\EMpurchasing_power_fraction\CAN\EOT \SOH(\SOHR\ETBpurchasingPowerFraction" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor SubAccount + accountName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountName")) :: + Data.ProtoLens.FieldDescriptor SubAccount + brokerageAccountNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "brokerage_account_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber")) :: + Data.ProtoLens.FieldDescriptor SubAccount + purchasingPowerFraction__field_descriptor + = Data.ProtoLens.FieldDescriptor + "purchasing_power_fraction" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'purchasingPowerFraction")) :: + Data.ProtoLens.FieldDescriptor SubAccount + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, accountName__field_descriptor), + (Data.ProtoLens.Tag 3, brokerageAccountNumber__field_descriptor), + (Data.ProtoLens.Tag 4, purchasingPowerFraction__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SubAccount'_unknownFields + (\ x__ y__ -> x__ {_SubAccount'_unknownFields = y__}) + defMessage + = SubAccount'_constructor + {_SubAccount'accountId = Prelude.Nothing, + _SubAccount'accountName = Prelude.Nothing, + _SubAccount'brokerageAccountNumber = Prelude.Nothing, + _SubAccount'purchasingPowerFraction = Prelude.Nothing, + _SubAccount'_unknownFields = []} + parseMessage + = let + loop :: + SubAccount -> Data.ProtoLens.Encoding.Bytes.Parser SubAccount + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountName") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "brokerage_account_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"brokerageAccountNumber") y x) + 33 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "purchasing_power_fraction" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"purchasingPowerFraction") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "SubAccount" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'purchasingPowerFraction") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 33) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData SubAccount where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SubAccount'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SubAccount'accountId x__) + (Control.DeepSeq.deepseq + (_SubAccount'accountName x__) + (Control.DeepSeq.deepseq + (_SubAccount'brokerageAccountNumber x__) + (Control.DeepSeq.deepseq + (_SubAccount'purchasingPowerFraction x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.rootChainOrderId' @:: Lens' SyntheticStrategyTreeRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'rootChainOrderId' @:: Lens' SyntheticStrategyTreeRequest (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradeLocationId' @:: Lens' SyntheticStrategyTreeRequest Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'tradeLocationId' @:: Lens' SyntheticStrategyTreeRequest (Prelude.Maybe Data.Text.Text)@ -} +data SyntheticStrategyTreeRequest + = SyntheticStrategyTreeRequest'_constructor {_SyntheticStrategyTreeRequest'rootChainOrderId :: !(Prelude.Maybe Data.Text.Text), + _SyntheticStrategyTreeRequest'tradeLocationId :: !(Prelude.Maybe Data.Text.Text), + _SyntheticStrategyTreeRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SyntheticStrategyTreeRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SyntheticStrategyTreeRequest "rootChainOrderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SyntheticStrategyTreeRequest'rootChainOrderId + (\ x__ y__ + -> x__ {_SyntheticStrategyTreeRequest'rootChainOrderId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SyntheticStrategyTreeRequest "maybe'rootChainOrderId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SyntheticStrategyTreeRequest'rootChainOrderId + (\ x__ y__ + -> x__ {_SyntheticStrategyTreeRequest'rootChainOrderId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SyntheticStrategyTreeRequest "tradeLocationId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SyntheticStrategyTreeRequest'tradeLocationId + (\ x__ y__ + -> x__ {_SyntheticStrategyTreeRequest'tradeLocationId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SyntheticStrategyTreeRequest "maybe'tradeLocationId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SyntheticStrategyTreeRequest'tradeLocationId + (\ x__ y__ + -> x__ {_SyntheticStrategyTreeRequest'tradeLocationId = y__})) + Prelude.id +instance Data.ProtoLens.Message SyntheticStrategyTreeRequest where + messageName _ + = Data.Text.pack "traderouting_1.SyntheticStrategyTreeRequest" + packedMessageDescriptor _ + = "\n\ + \\FSSyntheticStrategyTreeRequest\DC2-\n\ + \\DC3root_chain_order_id\CAN\SOH \SOH(\tR\DLErootChainOrderId\DC2*\n\ + \\DC1trade_location_id\CAN\STX \SOH(\tR\SItradeLocationId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + rootChainOrderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "root_chain_order_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'rootChainOrderId")) :: + Data.ProtoLens.FieldDescriptor SyntheticStrategyTreeRequest + tradeLocationId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trade_location_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'tradeLocationId")) :: + Data.ProtoLens.FieldDescriptor SyntheticStrategyTreeRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, rootChainOrderId__field_descriptor), + (Data.ProtoLens.Tag 2, tradeLocationId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SyntheticStrategyTreeRequest'_unknownFields + (\ x__ y__ + -> x__ {_SyntheticStrategyTreeRequest'_unknownFields = y__}) + defMessage + = SyntheticStrategyTreeRequest'_constructor + {_SyntheticStrategyTreeRequest'rootChainOrderId = Prelude.Nothing, + _SyntheticStrategyTreeRequest'tradeLocationId = Prelude.Nothing, + _SyntheticStrategyTreeRequest'_unknownFields = []} + parseMessage + = let + loop :: + SyntheticStrategyTreeRequest + -> Data.ProtoLens.Encoding.Bytes.Parser SyntheticStrategyTreeRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "root_chain_order_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"rootChainOrderId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trade_location_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"tradeLocationId") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "SyntheticStrategyTreeRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'rootChainOrderId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'tradeLocationId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData SyntheticStrategyTreeRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SyntheticStrategyTreeRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SyntheticStrategyTreeRequest'rootChainOrderId x__) + (Control.DeepSeq.deepseq + (_SyntheticStrategyTreeRequest'tradeLocationId x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.legs' @:: Lens' SyntheticStrategyTreeResult [StrategyLeg]@ + * 'Proto.CMS.Traderouting1_Fields.vec'legs' @:: Lens' SyntheticStrategyTreeResult (Data.Vector.Vector StrategyLeg)@ + * 'Proto.CMS.Traderouting1_Fields.strategyName' @:: Lens' SyntheticStrategyTreeResult Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'strategyName' @:: Lens' SyntheticStrategyTreeResult (Prelude.Maybe Data.Text.Text)@ -} +data SyntheticStrategyTreeResult + = SyntheticStrategyTreeResult'_constructor {_SyntheticStrategyTreeResult'legs :: !(Data.Vector.Vector StrategyLeg), + _SyntheticStrategyTreeResult'strategyName :: !(Prelude.Maybe Data.Text.Text), + _SyntheticStrategyTreeResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SyntheticStrategyTreeResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SyntheticStrategyTreeResult "legs" [StrategyLeg] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SyntheticStrategyTreeResult'legs + (\ x__ y__ -> x__ {_SyntheticStrategyTreeResult'legs = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField SyntheticStrategyTreeResult "vec'legs" (Data.Vector.Vector StrategyLeg) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SyntheticStrategyTreeResult'legs + (\ x__ y__ -> x__ {_SyntheticStrategyTreeResult'legs = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SyntheticStrategyTreeResult "strategyName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SyntheticStrategyTreeResult'strategyName + (\ x__ y__ + -> x__ {_SyntheticStrategyTreeResult'strategyName = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField SyntheticStrategyTreeResult "maybe'strategyName" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SyntheticStrategyTreeResult'strategyName + (\ x__ y__ + -> x__ {_SyntheticStrategyTreeResult'strategyName = y__})) + Prelude.id +instance Data.ProtoLens.Message SyntheticStrategyTreeResult where + messageName _ + = Data.Text.pack "traderouting_1.SyntheticStrategyTreeResult" + packedMessageDescriptor _ + = "\n\ + \\ESCSyntheticStrategyTreeResult\DC2/\n\ + \\EOTlegs\CAN\SOH \ETX(\v2\ESC.traderouting_1.StrategyLegR\EOTlegs\DC2#\n\ + \\rstrategy_name\CAN\STX \SOH(\tR\fstrategyName" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + legs__field_descriptor + = Data.ProtoLens.FieldDescriptor + "legs" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor StrategyLeg) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"legs")) :: + Data.ProtoLens.FieldDescriptor SyntheticStrategyTreeResult + strategyName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "strategy_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'strategyName")) :: + Data.ProtoLens.FieldDescriptor SyntheticStrategyTreeResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, legs__field_descriptor), + (Data.ProtoLens.Tag 2, strategyName__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SyntheticStrategyTreeResult'_unknownFields + (\ x__ y__ + -> x__ {_SyntheticStrategyTreeResult'_unknownFields = y__}) + defMessage + = SyntheticStrategyTreeResult'_constructor + {_SyntheticStrategyTreeResult'legs = Data.Vector.Generic.empty, + _SyntheticStrategyTreeResult'strategyName = Prelude.Nothing, + _SyntheticStrategyTreeResult'_unknownFields = []} + parseMessage + = let + loop :: + SyntheticStrategyTreeResult + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld StrategyLeg + -> Data.ProtoLens.Encoding.Bytes.Parser SyntheticStrategyTreeResult + loop x mutable'legs + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'legs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'legs) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'legs") frozen'legs x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "legs" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'legs y) + loop x v + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "strategy_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"strategyName") y x) + mutable'legs + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'legs + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'legs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'legs) + "SyntheticStrategyTreeResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'legs") _x)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'strategyName") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData SyntheticStrategyTreeResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SyntheticStrategyTreeResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SyntheticStrategyTreeResult'legs x__) + (Control.DeepSeq.deepseq + (_SyntheticStrategyTreeResult'strategyName x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' TradableCommodity Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.symbol' @:: Lens' TradableCommodity Data.Text.Text@ -} +data TradableCommodity + = TradableCommodity'_constructor {_TradableCommodity'id :: !Data.Text.Text, + _TradableCommodity'symbol :: !Data.Text.Text, + _TradableCommodity'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TradableCommodity where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TradableCommodity "id" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradableCommodity'id + (\ x__ y__ -> x__ {_TradableCommodity'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradableCommodity "symbol" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradableCommodity'symbol + (\ x__ y__ -> x__ {_TradableCommodity'symbol = y__})) + Prelude.id +instance Data.ProtoLens.Message TradableCommodity where + messageName _ = Data.Text.pack "traderouting_1.TradableCommodity" + packedMessageDescriptor _ + = "\n\ + \\DC1TradableCommodity\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\tR\STXid\DC2\SYN\n\ + \\ACKsymbol\CAN\STX \STX(\tR\ACKsymbol" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"id")) :: + Data.ProtoLens.FieldDescriptor TradableCommodity + symbol__field_descriptor + = Data.ProtoLens.FieldDescriptor + "symbol" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"symbol")) :: + Data.ProtoLens.FieldDescriptor TradableCommodity + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, symbol__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TradableCommodity'_unknownFields + (\ x__ y__ -> x__ {_TradableCommodity'_unknownFields = y__}) + defMessage + = TradableCommodity'_constructor + {_TradableCommodity'id = Data.ProtoLens.fieldDefault, + _TradableCommodity'symbol = Data.ProtoLens.fieldDefault, + _TradableCommodity'_unknownFields = []} + parseMessage + = let + loop :: + TradableCommodity + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser TradableCommodity + loop x required'id required'symbol + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'id then (:) "id" else Prelude.id) + ((if required'symbol then (:) "symbol" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + Prelude.False required'symbol + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "symbol" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"symbol") y x) + required'id Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'id required'symbol + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "TradableCommodity" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"id") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"symbol") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData TradableCommodity where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TradableCommodity'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TradableCommodity'id x__) + (Control.DeepSeq.deepseq (_TradableCommodity'symbol x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.mode' @:: Lens' TradePriceLimit Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'mode' @:: Lens' TradePriceLimit (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteTicks' @:: Lens' TradePriceLimit Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteTicks' @:: Lens' TradePriceLimit (Prelude.Maybe Data.Int.Int32)@ + * 'Proto.CMS.Traderouting1_Fields.value' @:: Lens' TradePriceLimit LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'value' @:: Lens' TradePriceLimit (Prelude.Maybe LimitValue)@ -} +data TradePriceLimit + = TradePriceLimit'_constructor {_TradePriceLimit'mode :: !(Prelude.Maybe Data.Word.Word32), + _TradePriceLimit'obsoleteTicks :: !(Prelude.Maybe Data.Int.Int32), + _TradePriceLimit'value :: !(Prelude.Maybe LimitValue), + _TradePriceLimit'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TradePriceLimit where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TradePriceLimit "mode" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimit'mode + (\ x__ y__ -> x__ {_TradePriceLimit'mode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField TradePriceLimit "maybe'mode" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimit'mode + (\ x__ y__ -> x__ {_TradePriceLimit'mode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradePriceLimit "obsoleteTicks" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimit'obsoleteTicks + (\ x__ y__ -> x__ {_TradePriceLimit'obsoleteTicks = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField TradePriceLimit "maybe'obsoleteTicks" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimit'obsoleteTicks + (\ x__ y__ -> x__ {_TradePriceLimit'obsoleteTicks = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradePriceLimit "value" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimit'value + (\ x__ y__ -> x__ {_TradePriceLimit'value = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradePriceLimit "maybe'value" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimit'value + (\ x__ y__ -> x__ {_TradePriceLimit'value = y__})) + Prelude.id +instance Data.ProtoLens.Message TradePriceLimit where + messageName _ = Data.Text.pack "traderouting_1.TradePriceLimit" + packedMessageDescriptor _ + = "\n\ + \\SITradePriceLimit\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC2)\n\ + \\SOobsolete_ticks\CAN\STX \SOH(\DC1R\robsoleteTicksB\STX\CAN\SOH\DC20\n\ + \\ENQvalue\CAN\ETX \SOH(\v2\SUB.traderouting_1.LimitValueR\ENQvalue" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + mode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'mode")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimit + obsoleteTicks__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_ticks" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteTicks")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimit + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'value")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimit + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, mode__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteTicks__field_descriptor), + (Data.ProtoLens.Tag 3, value__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TradePriceLimit'_unknownFields + (\ x__ y__ -> x__ {_TradePriceLimit'_unknownFields = y__}) + defMessage + = TradePriceLimit'_constructor + {_TradePriceLimit'mode = Prelude.Nothing, + _TradePriceLimit'obsoleteTicks = Prelude.Nothing, + _TradePriceLimit'value = Prelude.Nothing, + _TradePriceLimit'_unknownFields = []} + parseMessage + = let + loop :: + TradePriceLimit + -> Data.ProtoLens.Encoding.Bytes.Parser TradePriceLimit + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "mode" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"mode") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "obsolete_ticks" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteTicks") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "value" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TradePriceLimit" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'mode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteTicks") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData TradePriceLimit where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TradePriceLimit'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TradePriceLimit'mode x__) + (Control.DeepSeq.deepseq + (_TradePriceLimit'obsoleteTicks x__) + (Control.DeepSeq.deepseq (_TradePriceLimit'value x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.mode' @:: Lens' TradePriceLimitPercent Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'mode' @:: Lens' TradePriceLimitPercent (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.value' @:: Lens' TradePriceLimitPercent LimitValueDouble@ + * 'Proto.CMS.Traderouting1_Fields.maybe'value' @:: Lens' TradePriceLimitPercent (Prelude.Maybe LimitValueDouble)@ -} +data TradePriceLimitPercent + = TradePriceLimitPercent'_constructor {_TradePriceLimitPercent'mode :: !(Prelude.Maybe Data.Word.Word32), + _TradePriceLimitPercent'value :: !(Prelude.Maybe LimitValueDouble), + _TradePriceLimitPercent'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TradePriceLimitPercent where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TradePriceLimitPercent "mode" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitPercent'mode + (\ x__ y__ -> x__ {_TradePriceLimitPercent'mode = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField TradePriceLimitPercent "maybe'mode" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitPercent'mode + (\ x__ y__ -> x__ {_TradePriceLimitPercent'mode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradePriceLimitPercent "value" LimitValueDouble where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitPercent'value + (\ x__ y__ -> x__ {_TradePriceLimitPercent'value = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradePriceLimitPercent "maybe'value" (Prelude.Maybe LimitValueDouble) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitPercent'value + (\ x__ y__ -> x__ {_TradePriceLimitPercent'value = y__})) + Prelude.id +instance Data.ProtoLens.Message TradePriceLimitPercent where + messageName _ + = Data.Text.pack "traderouting_1.TradePriceLimitPercent" + packedMessageDescriptor _ + = "\n\ + \\SYNTradePriceLimitPercent\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC26\n\ + \\ENQvalue\CAN\STX \SOH(\v2 .traderouting_1.LimitValueDoubleR\ENQvalue" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + mode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "mode" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'mode")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimitPercent + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDouble) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'value")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimitPercent + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, mode__field_descriptor), + (Data.ProtoLens.Tag 2, value__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TradePriceLimitPercent'_unknownFields + (\ x__ y__ -> x__ {_TradePriceLimitPercent'_unknownFields = y__}) + defMessage + = TradePriceLimitPercent'_constructor + {_TradePriceLimitPercent'mode = Prelude.Nothing, + _TradePriceLimitPercent'value = Prelude.Nothing, + _TradePriceLimitPercent'_unknownFields = []} + parseMessage + = let + loop :: + TradePriceLimitPercent + -> Data.ProtoLens.Encoding.Bytes.Parser TradePriceLimitPercent + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "mode" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"mode") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "value" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TradePriceLimitPercent" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'mode") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData TradePriceLimitPercent where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TradePriceLimitPercent'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TradePriceLimitPercent'mode x__) + (Control.DeepSeq.deepseq (_TradePriceLimitPercent'value x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.bidAsk' @:: Lens' TradePriceLimitsPercent LimitValueDouble@ + * 'Proto.CMS.Traderouting1_Fields.maybe'bidAsk' @:: Lens' TradePriceLimitsPercent (Prelude.Maybe LimitValueDouble)@ + * 'Proto.CMS.Traderouting1_Fields.last' @:: Lens' TradePriceLimitsPercent LimitValueDouble@ + * 'Proto.CMS.Traderouting1_Fields.maybe'last' @:: Lens' TradePriceLimitsPercent (Prelude.Maybe LimitValueDouble)@ + * 'Proto.CMS.Traderouting1_Fields.open' @:: Lens' TradePriceLimitsPercent LimitValueDouble@ + * 'Proto.CMS.Traderouting1_Fields.maybe'open' @:: Lens' TradePriceLimitsPercent (Prelude.Maybe LimitValueDouble)@ + * 'Proto.CMS.Traderouting1_Fields.settlement' @:: Lens' TradePriceLimitsPercent LimitValueDouble@ + * 'Proto.CMS.Traderouting1_Fields.maybe'settlement' @:: Lens' TradePriceLimitsPercent (Prelude.Maybe LimitValueDouble)@ -} +data TradePriceLimitsPercent + = TradePriceLimitsPercent'_constructor {_TradePriceLimitsPercent'bidAsk :: !(Prelude.Maybe LimitValueDouble), + _TradePriceLimitsPercent'last :: !(Prelude.Maybe LimitValueDouble), + _TradePriceLimitsPercent'open :: !(Prelude.Maybe LimitValueDouble), + _TradePriceLimitsPercent'settlement :: !(Prelude.Maybe LimitValueDouble), + _TradePriceLimitsPercent'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TradePriceLimitsPercent where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TradePriceLimitsPercent "bidAsk" LimitValueDouble where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsPercent'bidAsk + (\ x__ y__ -> x__ {_TradePriceLimitsPercent'bidAsk = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradePriceLimitsPercent "maybe'bidAsk" (Prelude.Maybe LimitValueDouble) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsPercent'bidAsk + (\ x__ y__ -> x__ {_TradePriceLimitsPercent'bidAsk = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradePriceLimitsPercent "last" LimitValueDouble where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsPercent'last + (\ x__ y__ -> x__ {_TradePriceLimitsPercent'last = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradePriceLimitsPercent "maybe'last" (Prelude.Maybe LimitValueDouble) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsPercent'last + (\ x__ y__ -> x__ {_TradePriceLimitsPercent'last = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradePriceLimitsPercent "open" LimitValueDouble where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsPercent'open + (\ x__ y__ -> x__ {_TradePriceLimitsPercent'open = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradePriceLimitsPercent "maybe'open" (Prelude.Maybe LimitValueDouble) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsPercent'open + (\ x__ y__ -> x__ {_TradePriceLimitsPercent'open = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradePriceLimitsPercent "settlement" LimitValueDouble where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsPercent'settlement + (\ x__ y__ -> x__ {_TradePriceLimitsPercent'settlement = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradePriceLimitsPercent "maybe'settlement" (Prelude.Maybe LimitValueDouble) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsPercent'settlement + (\ x__ y__ -> x__ {_TradePriceLimitsPercent'settlement = y__})) + Prelude.id +instance Data.ProtoLens.Message TradePriceLimitsPercent where + messageName _ + = Data.Text.pack "traderouting_1.TradePriceLimitsPercent" + packedMessageDescriptor _ + = "\n\ + \\ETBTradePriceLimitsPercent\DC29\n\ + \\abid_ask\CAN\SOH \SOH(\v2 .traderouting_1.LimitValueDoubleR\ACKbidAsk\DC24\n\ + \\EOTlast\CAN\STX \SOH(\v2 .traderouting_1.LimitValueDoubleR\EOTlast\DC24\n\ + \\EOTopen\CAN\ETX \SOH(\v2 .traderouting_1.LimitValueDoubleR\EOTopen\DC2@\n\ + \\n\ + \settlement\CAN\EOT \SOH(\v2 .traderouting_1.LimitValueDoubleR\n\ + \settlement" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + bidAsk__field_descriptor + = Data.ProtoLens.FieldDescriptor + "bid_ask" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDouble) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'bidAsk")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimitsPercent + last__field_descriptor + = Data.ProtoLens.FieldDescriptor + "last" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDouble) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'last")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimitsPercent + open__field_descriptor + = Data.ProtoLens.FieldDescriptor + "open" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDouble) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'open")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimitsPercent + settlement__field_descriptor + = Data.ProtoLens.FieldDescriptor + "settlement" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValueDouble) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'settlement")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimitsPercent + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, bidAsk__field_descriptor), + (Data.ProtoLens.Tag 2, last__field_descriptor), + (Data.ProtoLens.Tag 3, open__field_descriptor), + (Data.ProtoLens.Tag 4, settlement__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TradePriceLimitsPercent'_unknownFields + (\ x__ y__ -> x__ {_TradePriceLimitsPercent'_unknownFields = y__}) + defMessage + = TradePriceLimitsPercent'_constructor + {_TradePriceLimitsPercent'bidAsk = Prelude.Nothing, + _TradePriceLimitsPercent'last = Prelude.Nothing, + _TradePriceLimitsPercent'open = Prelude.Nothing, + _TradePriceLimitsPercent'settlement = Prelude.Nothing, + _TradePriceLimitsPercent'_unknownFields = []} + parseMessage + = let + loop :: + TradePriceLimitsPercent + -> Data.ProtoLens.Encoding.Bytes.Parser TradePriceLimitsPercent + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "bid_ask" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"bidAsk") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "last" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"last") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "open" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"open") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "settlement" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"settlement") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TradePriceLimitsPercent" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'bidAsk") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'last") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'open") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'settlement") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData TradePriceLimitsPercent where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TradePriceLimitsPercent'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TradePriceLimitsPercent'bidAsk x__) + (Control.DeepSeq.deepseq + (_TradePriceLimitsPercent'last x__) + (Control.DeepSeq.deepseq + (_TradePriceLimitsPercent'open x__) + (Control.DeepSeq.deepseq + (_TradePriceLimitsPercent'settlement x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.bidAsk' @:: Lens' TradePriceLimitsTicks LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'bidAsk' @:: Lens' TradePriceLimitsTicks (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.last' @:: Lens' TradePriceLimitsTicks LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'last' @:: Lens' TradePriceLimitsTicks (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.open' @:: Lens' TradePriceLimitsTicks LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'open' @:: Lens' TradePriceLimitsTicks (Prelude.Maybe LimitValue)@ + * 'Proto.CMS.Traderouting1_Fields.settlement' @:: Lens' TradePriceLimitsTicks LimitValue@ + * 'Proto.CMS.Traderouting1_Fields.maybe'settlement' @:: Lens' TradePriceLimitsTicks (Prelude.Maybe LimitValue)@ -} +data TradePriceLimitsTicks + = TradePriceLimitsTicks'_constructor {_TradePriceLimitsTicks'bidAsk :: !(Prelude.Maybe LimitValue), + _TradePriceLimitsTicks'last :: !(Prelude.Maybe LimitValue), + _TradePriceLimitsTicks'open :: !(Prelude.Maybe LimitValue), + _TradePriceLimitsTicks'settlement :: !(Prelude.Maybe LimitValue), + _TradePriceLimitsTicks'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TradePriceLimitsTicks where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TradePriceLimitsTicks "bidAsk" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsTicks'bidAsk + (\ x__ y__ -> x__ {_TradePriceLimitsTicks'bidAsk = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradePriceLimitsTicks "maybe'bidAsk" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsTicks'bidAsk + (\ x__ y__ -> x__ {_TradePriceLimitsTicks'bidAsk = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradePriceLimitsTicks "last" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsTicks'last + (\ x__ y__ -> x__ {_TradePriceLimitsTicks'last = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradePriceLimitsTicks "maybe'last" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsTicks'last + (\ x__ y__ -> x__ {_TradePriceLimitsTicks'last = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradePriceLimitsTicks "open" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsTicks'open + (\ x__ y__ -> x__ {_TradePriceLimitsTicks'open = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradePriceLimitsTicks "maybe'open" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsTicks'open + (\ x__ y__ -> x__ {_TradePriceLimitsTicks'open = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradePriceLimitsTicks "settlement" LimitValue where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsTicks'settlement + (\ x__ y__ -> x__ {_TradePriceLimitsTicks'settlement = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradePriceLimitsTicks "maybe'settlement" (Prelude.Maybe LimitValue) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradePriceLimitsTicks'settlement + (\ x__ y__ -> x__ {_TradePriceLimitsTicks'settlement = y__})) + Prelude.id +instance Data.ProtoLens.Message TradePriceLimitsTicks where + messageName _ + = Data.Text.pack "traderouting_1.TradePriceLimitsTicks" + packedMessageDescriptor _ + = "\n\ + \\NAKTradePriceLimitsTicks\DC23\n\ + \\abid_ask\CAN\SOH \SOH(\v2\SUB.traderouting_1.LimitValueR\ACKbidAsk\DC2.\n\ + \\EOTlast\CAN\STX \SOH(\v2\SUB.traderouting_1.LimitValueR\EOTlast\DC2.\n\ + \\EOTopen\CAN\ETX \SOH(\v2\SUB.traderouting_1.LimitValueR\EOTopen\DC2:\n\ + \\n\ + \settlement\CAN\EOT \SOH(\v2\SUB.traderouting_1.LimitValueR\n\ + \settlement" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + bidAsk__field_descriptor + = Data.ProtoLens.FieldDescriptor + "bid_ask" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'bidAsk")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimitsTicks + last__field_descriptor + = Data.ProtoLens.FieldDescriptor + "last" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'last")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimitsTicks + open__field_descriptor + = Data.ProtoLens.FieldDescriptor + "open" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'open")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimitsTicks + settlement__field_descriptor + = Data.ProtoLens.FieldDescriptor + "settlement" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor LimitValue) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'settlement")) :: + Data.ProtoLens.FieldDescriptor TradePriceLimitsTicks + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, bidAsk__field_descriptor), + (Data.ProtoLens.Tag 2, last__field_descriptor), + (Data.ProtoLens.Tag 3, open__field_descriptor), + (Data.ProtoLens.Tag 4, settlement__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TradePriceLimitsTicks'_unknownFields + (\ x__ y__ -> x__ {_TradePriceLimitsTicks'_unknownFields = y__}) + defMessage + = TradePriceLimitsTicks'_constructor + {_TradePriceLimitsTicks'bidAsk = Prelude.Nothing, + _TradePriceLimitsTicks'last = Prelude.Nothing, + _TradePriceLimitsTicks'open = Prelude.Nothing, + _TradePriceLimitsTicks'settlement = Prelude.Nothing, + _TradePriceLimitsTicks'_unknownFields = []} + parseMessage + = let + loop :: + TradePriceLimitsTicks + -> Data.ProtoLens.Encoding.Bytes.Parser TradePriceLimitsTicks + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "bid_ask" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"bidAsk") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "last" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"last") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "open" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"open") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "settlement" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"settlement") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TradePriceLimitsTicks" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'bidAsk") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'last") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'open") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'settlement") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData TradePriceLimitsTicks where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TradePriceLimitsTicks'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TradePriceLimitsTicks'bidAsk x__) + (Control.DeepSeq.deepseq + (_TradePriceLimitsTicks'last x__) + (Control.DeepSeq.deepseq + (_TradePriceLimitsTicks'open x__) + (Control.DeepSeq.deepseq + (_TradePriceLimitsTicks'settlement x__) ())))) +data TradeRoutingLookupPropertyType + = ACCOUNT_TYPE | + MODES_ACCOUNT_GROUP | + TIME_ZONE | + RISK_SERVER_INSTANCE | + TRADE_LOCATION | + ORDER_CLASS | + ACCOUNT_ORIGIN | + EXECUTION_SOURCE_CODE | + CQG_MIFID_ALGORITHM | + FLEXIBLE_IDENTIFIER + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum TradeRoutingLookupPropertyType where + maybeToEnum 101 = Prelude.Just ACCOUNT_TYPE + maybeToEnum 102 = Prelude.Just MODES_ACCOUNT_GROUP + maybeToEnum 103 = Prelude.Just TIME_ZONE + maybeToEnum 104 = Prelude.Just RISK_SERVER_INSTANCE + maybeToEnum 105 = Prelude.Just TRADE_LOCATION + maybeToEnum 106 = Prelude.Just ORDER_CLASS + maybeToEnum 107 = Prelude.Just ACCOUNT_ORIGIN + maybeToEnum 108 = Prelude.Just EXECUTION_SOURCE_CODE + maybeToEnum 109 = Prelude.Just CQG_MIFID_ALGORITHM + maybeToEnum 110 = Prelude.Just FLEXIBLE_IDENTIFIER + maybeToEnum _ = Prelude.Nothing + showEnum ACCOUNT_TYPE = "ACCOUNT_TYPE" + showEnum MODES_ACCOUNT_GROUP = "MODES_ACCOUNT_GROUP" + showEnum TIME_ZONE = "TIME_ZONE" + showEnum RISK_SERVER_INSTANCE = "RISK_SERVER_INSTANCE" + showEnum TRADE_LOCATION = "TRADE_LOCATION" + showEnum ORDER_CLASS = "ORDER_CLASS" + showEnum ACCOUNT_ORIGIN = "ACCOUNT_ORIGIN" + showEnum EXECUTION_SOURCE_CODE = "EXECUTION_SOURCE_CODE" + showEnum CQG_MIFID_ALGORITHM = "CQG_MIFID_ALGORITHM" + showEnum FLEXIBLE_IDENTIFIER = "FLEXIBLE_IDENTIFIER" + readEnum k + | (Prelude.==) k "ACCOUNT_TYPE" = Prelude.Just ACCOUNT_TYPE + | (Prelude.==) k "MODES_ACCOUNT_GROUP" + = Prelude.Just MODES_ACCOUNT_GROUP + | (Prelude.==) k "TIME_ZONE" = Prelude.Just TIME_ZONE + | (Prelude.==) k "RISK_SERVER_INSTANCE" + = Prelude.Just RISK_SERVER_INSTANCE + | (Prelude.==) k "TRADE_LOCATION" = Prelude.Just TRADE_LOCATION + | (Prelude.==) k "ORDER_CLASS" = Prelude.Just ORDER_CLASS + | (Prelude.==) k "ACCOUNT_ORIGIN" = Prelude.Just ACCOUNT_ORIGIN + | (Prelude.==) k "EXECUTION_SOURCE_CODE" + = Prelude.Just EXECUTION_SOURCE_CODE + | (Prelude.==) k "CQG_MIFID_ALGORITHM" + = Prelude.Just CQG_MIFID_ALGORITHM + | (Prelude.==) k "FLEXIBLE_IDENTIFIER" + = Prelude.Just FLEXIBLE_IDENTIFIER + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded TradeRoutingLookupPropertyType where + minBound = ACCOUNT_TYPE + maxBound = FLEXIBLE_IDENTIFIER +instance Prelude.Enum TradeRoutingLookupPropertyType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum TradeRoutingLookupPropertyType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum ACCOUNT_TYPE = 101 + fromEnum MODES_ACCOUNT_GROUP = 102 + fromEnum TIME_ZONE = 103 + fromEnum RISK_SERVER_INSTANCE = 104 + fromEnum TRADE_LOCATION = 105 + fromEnum ORDER_CLASS = 106 + fromEnum ACCOUNT_ORIGIN = 107 + fromEnum EXECUTION_SOURCE_CODE = 108 + fromEnum CQG_MIFID_ALGORITHM = 109 + fromEnum FLEXIBLE_IDENTIFIER = 110 + succ FLEXIBLE_IDENTIFIER + = Prelude.error + "TradeRoutingLookupPropertyType.succ: bad argument FLEXIBLE_IDENTIFIER. This value would be out of bounds." + succ ACCOUNT_TYPE = MODES_ACCOUNT_GROUP + succ MODES_ACCOUNT_GROUP = TIME_ZONE + succ TIME_ZONE = RISK_SERVER_INSTANCE + succ RISK_SERVER_INSTANCE = TRADE_LOCATION + succ TRADE_LOCATION = ORDER_CLASS + succ ORDER_CLASS = ACCOUNT_ORIGIN + succ ACCOUNT_ORIGIN = EXECUTION_SOURCE_CODE + succ EXECUTION_SOURCE_CODE = CQG_MIFID_ALGORITHM + succ CQG_MIFID_ALGORITHM = FLEXIBLE_IDENTIFIER + pred ACCOUNT_TYPE + = Prelude.error + "TradeRoutingLookupPropertyType.pred: bad argument ACCOUNT_TYPE. This value would be out of bounds." + pred MODES_ACCOUNT_GROUP = ACCOUNT_TYPE + pred TIME_ZONE = MODES_ACCOUNT_GROUP + pred RISK_SERVER_INSTANCE = TIME_ZONE + pred TRADE_LOCATION = RISK_SERVER_INSTANCE + pred ORDER_CLASS = TRADE_LOCATION + pred ACCOUNT_ORIGIN = ORDER_CLASS + pred EXECUTION_SOURCE_CODE = ACCOUNT_ORIGIN + pred CQG_MIFID_ALGORITHM = EXECUTION_SOURCE_CODE + pred FLEXIBLE_IDENTIFIER = CQG_MIFID_ALGORITHM + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault TradeRoutingLookupPropertyType where + fieldDefault = ACCOUNT_TYPE +instance Control.DeepSeq.NFData TradeRoutingLookupPropertyType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.id' @:: Lens' TradeRoutingRequest Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.accountScopeRequest' @:: Lens' TradeRoutingRequest AccountScopeRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountScopeRequest' @:: Lens' TradeRoutingRequest (Prelude.Maybe AccountScopeRequest)@ + * 'Proto.CMS.Traderouting1_Fields.orderScopeRequest' @:: Lens' TradeRoutingRequest OrderScopeRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderScopeRequest' @:: Lens' TradeRoutingRequest (Prelude.Maybe OrderScopeRequest)@ + * 'Proto.CMS.Traderouting1_Fields.lookupPropertyListRequest' @:: Lens' TradeRoutingRequest Proto.CMS.Common1.LookupPropertyListRequest@ + * 'Proto.CMS.Traderouting1_Fields.maybe'lookupPropertyListRequest' @:: Lens' TradeRoutingRequest (Prelude.Maybe Proto.CMS.Common1.LookupPropertyListRequest)@ -} +data TradeRoutingRequest + = TradeRoutingRequest'_constructor {_TradeRoutingRequest'id :: !Data.Word.Word32, + _TradeRoutingRequest'accountScopeRequest :: !(Prelude.Maybe AccountScopeRequest), + _TradeRoutingRequest'orderScopeRequest :: !(Prelude.Maybe OrderScopeRequest), + _TradeRoutingRequest'lookupPropertyListRequest :: !(Prelude.Maybe Proto.CMS.Common1.LookupPropertyListRequest), + _TradeRoutingRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TradeRoutingRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TradeRoutingRequest "id" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingRequest'id + (\ x__ y__ -> x__ {_TradeRoutingRequest'id = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradeRoutingRequest "accountScopeRequest" AccountScopeRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingRequest'accountScopeRequest + (\ x__ y__ + -> x__ {_TradeRoutingRequest'accountScopeRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradeRoutingRequest "maybe'accountScopeRequest" (Prelude.Maybe AccountScopeRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingRequest'accountScopeRequest + (\ x__ y__ + -> x__ {_TradeRoutingRequest'accountScopeRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradeRoutingRequest "orderScopeRequest" OrderScopeRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingRequest'orderScopeRequest + (\ x__ y__ -> x__ {_TradeRoutingRequest'orderScopeRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradeRoutingRequest "maybe'orderScopeRequest" (Prelude.Maybe OrderScopeRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingRequest'orderScopeRequest + (\ x__ y__ -> x__ {_TradeRoutingRequest'orderScopeRequest = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradeRoutingRequest "lookupPropertyListRequest" Proto.CMS.Common1.LookupPropertyListRequest where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingRequest'lookupPropertyListRequest + (\ x__ y__ + -> x__ {_TradeRoutingRequest'lookupPropertyListRequest = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradeRoutingRequest "maybe'lookupPropertyListRequest" (Prelude.Maybe Proto.CMS.Common1.LookupPropertyListRequest) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingRequest'lookupPropertyListRequest + (\ x__ y__ + -> x__ {_TradeRoutingRequest'lookupPropertyListRequest = y__})) + Prelude.id +instance Data.ProtoLens.Message TradeRoutingRequest where + messageName _ = Data.Text.pack "traderouting_1.TradeRoutingRequest" + packedMessageDescriptor _ + = "\n\ + \\DC3TradeRoutingRequest\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC2W\n\ + \\NAKaccount_scope_request\CAN\STX \SOH(\v2#.traderouting_1.AccountScopeRequestR\DC3accountScopeRequest\DC2Q\n\ + \\DC3order_scope_request\CAN\ETX \SOH(\v2!.traderouting_1.OrderScopeRequestR\DC1orderScopeRequest\DC2d\n\ + \\FSlookup_property_list_request\CAN\EOT \SOH(\v2#.common_1.LookupPropertyListRequestR\EMlookupPropertyListRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + id__field_descriptor + = Data.ProtoLens.FieldDescriptor + "id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"id")) :: + Data.ProtoLens.FieldDescriptor TradeRoutingRequest + accountScopeRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_scope_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountScopeRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountScopeRequest")) :: + Data.ProtoLens.FieldDescriptor TradeRoutingRequest + orderScopeRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_scope_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderScopeRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderScopeRequest")) :: + Data.ProtoLens.FieldDescriptor TradeRoutingRequest + lookupPropertyListRequest__field_descriptor + = Data.ProtoLens.FieldDescriptor + "lookup_property_list_request" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LookupPropertyListRequest) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'lookupPropertyListRequest")) :: + Data.ProtoLens.FieldDescriptor TradeRoutingRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, id__field_descriptor), + (Data.ProtoLens.Tag 2, accountScopeRequest__field_descriptor), + (Data.ProtoLens.Tag 3, orderScopeRequest__field_descriptor), + (Data.ProtoLens.Tag 4, + lookupPropertyListRequest__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TradeRoutingRequest'_unknownFields + (\ x__ y__ -> x__ {_TradeRoutingRequest'_unknownFields = y__}) + defMessage + = TradeRoutingRequest'_constructor + {_TradeRoutingRequest'id = Data.ProtoLens.fieldDefault, + _TradeRoutingRequest'accountScopeRequest = Prelude.Nothing, + _TradeRoutingRequest'orderScopeRequest = Prelude.Nothing, + _TradeRoutingRequest'lookupPropertyListRequest = Prelude.Nothing, + _TradeRoutingRequest'_unknownFields = []} + parseMessage + = let + loop :: + TradeRoutingRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser TradeRoutingRequest + loop x required'id + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = (if required'id then (:) "id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x) + Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_scope_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountScopeRequest") y x) + required'id + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "order_scope_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderScopeRequest") y x) + required'id + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "lookup_property_list_request" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"lookupPropertyListRequest") y x) + required'id + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'id + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "TradeRoutingRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"id") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountScopeRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderScopeRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'lookupPropertyListRequest") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData TradeRoutingRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TradeRoutingRequest'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TradeRoutingRequest'id x__) + (Control.DeepSeq.deepseq + (_TradeRoutingRequest'accountScopeRequest x__) + (Control.DeepSeq.deepseq + (_TradeRoutingRequest'orderScopeRequest x__) + (Control.DeepSeq.deepseq + (_TradeRoutingRequest'lookupPropertyListRequest x__) ())))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.requestId' @:: Lens' TradeRoutingResult Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.operationStatus' @:: Lens' TradeRoutingResult Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.errorMessage' @:: Lens' TradeRoutingResult Proto.Common.Shared1.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'errorMessage' @:: Lens' TradeRoutingResult (Prelude.Maybe Proto.Common.Shared1.Text)@ + * 'Proto.CMS.Traderouting1_Fields.accountScopeResult' @:: Lens' TradeRoutingResult AccountScopeResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountScopeResult' @:: Lens' TradeRoutingResult (Prelude.Maybe AccountScopeResult)@ + * 'Proto.CMS.Traderouting1_Fields.orderScopeResult' @:: Lens' TradeRoutingResult OrderScopeResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'orderScopeResult' @:: Lens' TradeRoutingResult (Prelude.Maybe OrderScopeResult)@ + * 'Proto.CMS.Traderouting1_Fields.lookupPropertyListResult' @:: Lens' TradeRoutingResult Proto.CMS.Common1.LookupPropertyListResult@ + * 'Proto.CMS.Traderouting1_Fields.maybe'lookupPropertyListResult' @:: Lens' TradeRoutingResult (Prelude.Maybe Proto.CMS.Common1.LookupPropertyListResult)@ + * 'Proto.CMS.Traderouting1_Fields.trackingNumber' @:: Lens' TradeRoutingResult Data.Word.Word64@ + * 'Proto.CMS.Traderouting1_Fields.maybe'trackingNumber' @:: Lens' TradeRoutingResult (Prelude.Maybe Data.Word.Word64)@ -} +data TradeRoutingResult + = TradeRoutingResult'_constructor {_TradeRoutingResult'requestId :: !Data.Word.Word32, + _TradeRoutingResult'operationStatus :: !Data.Word.Word32, + _TradeRoutingResult'errorMessage :: !(Prelude.Maybe Proto.Common.Shared1.Text), + _TradeRoutingResult'accountScopeResult :: !(Prelude.Maybe AccountScopeResult), + _TradeRoutingResult'orderScopeResult :: !(Prelude.Maybe OrderScopeResult), + _TradeRoutingResult'lookupPropertyListResult :: !(Prelude.Maybe Proto.CMS.Common1.LookupPropertyListResult), + _TradeRoutingResult'trackingNumber :: !(Prelude.Maybe Data.Word.Word64), + _TradeRoutingResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TradeRoutingResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField TradeRoutingResult "requestId" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'requestId + (\ x__ y__ -> x__ {_TradeRoutingResult'requestId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradeRoutingResult "operationStatus" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'operationStatus + (\ x__ y__ -> x__ {_TradeRoutingResult'operationStatus = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradeRoutingResult "errorMessage" Proto.Common.Shared1.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'errorMessage + (\ x__ y__ -> x__ {_TradeRoutingResult'errorMessage = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradeRoutingResult "maybe'errorMessage" (Prelude.Maybe Proto.Common.Shared1.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'errorMessage + (\ x__ y__ -> x__ {_TradeRoutingResult'errorMessage = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradeRoutingResult "accountScopeResult" AccountScopeResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'accountScopeResult + (\ x__ y__ -> x__ {_TradeRoutingResult'accountScopeResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradeRoutingResult "maybe'accountScopeResult" (Prelude.Maybe AccountScopeResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'accountScopeResult + (\ x__ y__ -> x__ {_TradeRoutingResult'accountScopeResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradeRoutingResult "orderScopeResult" OrderScopeResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'orderScopeResult + (\ x__ y__ -> x__ {_TradeRoutingResult'orderScopeResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradeRoutingResult "maybe'orderScopeResult" (Prelude.Maybe OrderScopeResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'orderScopeResult + (\ x__ y__ -> x__ {_TradeRoutingResult'orderScopeResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradeRoutingResult "lookupPropertyListResult" Proto.CMS.Common1.LookupPropertyListResult where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'lookupPropertyListResult + (\ x__ y__ + -> x__ {_TradeRoutingResult'lookupPropertyListResult = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField TradeRoutingResult "maybe'lookupPropertyListResult" (Prelude.Maybe Proto.CMS.Common1.LookupPropertyListResult) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'lookupPropertyListResult + (\ x__ y__ + -> x__ {_TradeRoutingResult'lookupPropertyListResult = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField TradeRoutingResult "trackingNumber" Data.Word.Word64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'trackingNumber + (\ x__ y__ -> x__ {_TradeRoutingResult'trackingNumber = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField TradeRoutingResult "maybe'trackingNumber" (Prelude.Maybe Data.Word.Word64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _TradeRoutingResult'trackingNumber + (\ x__ y__ -> x__ {_TradeRoutingResult'trackingNumber = y__})) + Prelude.id +instance Data.ProtoLens.Message TradeRoutingResult where + messageName _ = Data.Text.pack "traderouting_1.TradeRoutingResult" + packedMessageDescriptor _ + = "\n\ + \\DC2TradeRoutingResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \STX(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \STX(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\ETX \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2T\n\ + \\DC4account_scope_result\CAN\EOT \SOH(\v2\".traderouting_1.AccountScopeResultR\DC2accountScopeResult\DC2N\n\ + \\DC2order_scope_result\CAN\ENQ \SOH(\v2 .traderouting_1.OrderScopeResultR\DLEorderScopeResult\DC2a\n\ + \\ESClookup_property_list_result\CAN\ACK \SOH(\v2\".common_1.LookupPropertyListResultR\CANlookupPropertyListResult\DC2'\n\ + \\SItracking_number\CAN\a \SOH(\EOTR\SOtrackingNumber" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + requestId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "request_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"requestId")) :: + Data.ProtoLens.FieldDescriptor TradeRoutingResult + operationStatus__field_descriptor + = Data.ProtoLens.FieldDescriptor + "operation_status" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"operationStatus")) :: + Data.ProtoLens.FieldDescriptor TradeRoutingResult + errorMessage__field_descriptor + = Data.ProtoLens.FieldDescriptor + "error_message" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.Common.Shared1.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'errorMessage")) :: + Data.ProtoLens.FieldDescriptor TradeRoutingResult + accountScopeResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_scope_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountScopeResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountScopeResult")) :: + Data.ProtoLens.FieldDescriptor TradeRoutingResult + orderScopeResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "order_scope_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor OrderScopeResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'orderScopeResult")) :: + Data.ProtoLens.FieldDescriptor TradeRoutingResult + lookupPropertyListResult__field_descriptor + = Data.ProtoLens.FieldDescriptor + "lookup_property_list_result" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.LookupPropertyListResult) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'lookupPropertyListResult")) :: + Data.ProtoLens.FieldDescriptor TradeRoutingResult + trackingNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "tracking_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'trackingNumber")) :: + Data.ProtoLens.FieldDescriptor TradeRoutingResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, requestId__field_descriptor), + (Data.ProtoLens.Tag 2, operationStatus__field_descriptor), + (Data.ProtoLens.Tag 3, errorMessage__field_descriptor), + (Data.ProtoLens.Tag 4, accountScopeResult__field_descriptor), + (Data.ProtoLens.Tag 5, orderScopeResult__field_descriptor), + (Data.ProtoLens.Tag 6, lookupPropertyListResult__field_descriptor), + (Data.ProtoLens.Tag 7, trackingNumber__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _TradeRoutingResult'_unknownFields + (\ x__ y__ -> x__ {_TradeRoutingResult'_unknownFields = y__}) + defMessage + = TradeRoutingResult'_constructor + {_TradeRoutingResult'requestId = Data.ProtoLens.fieldDefault, + _TradeRoutingResult'operationStatus = Data.ProtoLens.fieldDefault, + _TradeRoutingResult'errorMessage = Prelude.Nothing, + _TradeRoutingResult'accountScopeResult = Prelude.Nothing, + _TradeRoutingResult'orderScopeResult = Prelude.Nothing, + _TradeRoutingResult'lookupPropertyListResult = Prelude.Nothing, + _TradeRoutingResult'trackingNumber = Prelude.Nothing, + _TradeRoutingResult'_unknownFields = []} + parseMessage + = let + loop :: + TradeRoutingResult + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser TradeRoutingResult + loop x required'operationStatus required'requestId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'operationStatus then + (:) "operation_status" + else + Prelude.id) + ((if required'requestId then (:) "request_id" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "request_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x) + required'operationStatus Prelude.False + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "operation_status" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"operationStatus") y x) + Prelude.False required'requestId + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "error_message" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"errorMessage") y x) + required'operationStatus required'requestId + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_scope_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountScopeResult") y x) + required'operationStatus required'requestId + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "order_scope_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"orderScopeResult") y x) + required'operationStatus required'requestId + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "lookup_property_list_result" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"lookupPropertyListResult") y x) + required'operationStatus required'requestId + 56 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + Data.ProtoLens.Encoding.Bytes.getVarInt "tracking_number" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"trackingNumber") y x) + required'operationStatus required'requestId + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'operationStatus required'requestId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "TradeRoutingResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"requestId") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"operationStatus") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'errorMessage") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountScopeResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'orderScopeResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'lookupPropertyListResult") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'trackingNumber") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 56) + (Data.ProtoLens.Encoding.Bytes.putVarInt _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData TradeRoutingResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TradeRoutingResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_TradeRoutingResult'requestId x__) + (Control.DeepSeq.deepseq + (_TradeRoutingResult'operationStatus x__) + (Control.DeepSeq.deepseq + (_TradeRoutingResult'errorMessage x__) + (Control.DeepSeq.deepseq + (_TradeRoutingResult'accountScopeResult x__) + (Control.DeepSeq.deepseq + (_TradeRoutingResult'orderScopeResult x__) + (Control.DeepSeq.deepseq + (_TradeRoutingResult'lookupPropertyListResult x__) + (Control.DeepSeq.deepseq + (_TradeRoutingResult'trackingNumber x__) ()))))))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.account' @:: Lens' UpdateAccount Account@ + * 'Proto.CMS.Traderouting1_Fields.maybe'account' @:: Lens' UpdateAccount (Prelude.Maybe Account)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteOriginalAccount' @:: Lens' UpdateAccount Account@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteOriginalAccount' @:: Lens' UpdateAccount (Prelude.Maybe Account)@ -} +data UpdateAccount + = UpdateAccount'_constructor {_UpdateAccount'account :: !(Prelude.Maybe Account), + _UpdateAccount'obsoleteOriginalAccount :: !(Prelude.Maybe Account), + _UpdateAccount'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccount where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccount "account" Account where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccount'account + (\ x__ y__ -> x__ {_UpdateAccount'account = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateAccount "maybe'account" (Prelude.Maybe Account) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccount'account + (\ x__ y__ -> x__ {_UpdateAccount'account = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccount "obsoleteOriginalAccount" Account where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccount'obsoleteOriginalAccount + (\ x__ y__ -> x__ {_UpdateAccount'obsoleteOriginalAccount = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateAccount "maybe'obsoleteOriginalAccount" (Prelude.Maybe Account) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccount'obsoleteOriginalAccount + (\ x__ y__ -> x__ {_UpdateAccount'obsoleteOriginalAccount = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccount where + messageName _ = Data.Text.pack "traderouting_1.UpdateAccount" + packedMessageDescriptor _ + = "\n\ + \\rUpdateAccount\DC21\n\ + \\aaccount\CAN\SOH \SOH(\v2\ETB.traderouting_1.AccountR\aaccount\DC2W\n\ + \\EMobsolete_original_account\CAN\STX \SOH(\v2\ETB.traderouting_1.AccountR\ETBobsoleteOriginalAccountB\STX\CAN\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + account__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Account) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'account")) :: + Data.ProtoLens.FieldDescriptor UpdateAccount + obsoleteOriginalAccount__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_original_account" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Account) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteOriginalAccount")) :: + Data.ProtoLens.FieldDescriptor UpdateAccount + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, account__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteOriginalAccount__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccount'_unknownFields + (\ x__ y__ -> x__ {_UpdateAccount'_unknownFields = y__}) + defMessage + = UpdateAccount'_constructor + {_UpdateAccount'account = Prelude.Nothing, + _UpdateAccount'obsoleteOriginalAccount = Prelude.Nothing, + _UpdateAccount'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccount -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccount + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account" + loop (Lens.Family2.set (Data.ProtoLens.Field.field @"account") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_original_account" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteOriginalAccount") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateAccount" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'account") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteOriginalAccount") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UpdateAccount where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccount'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccount'account x__) + (Control.DeepSeq.deepseq + (_UpdateAccount'obsoleteOriginalAccount x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.obsoleteAccountCluster' @:: Lens' UpdateAccountCluster AccountCluster@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteAccountCluster' @:: Lens' UpdateAccountCluster (Prelude.Maybe AccountCluster)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteOriginalAccountCluster' @:: Lens' UpdateAccountCluster AccountCluster@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteOriginalAccountCluster' @:: Lens' UpdateAccountCluster (Prelude.Maybe AccountCluster)@ -} +data UpdateAccountCluster + = UpdateAccountCluster'_constructor {_UpdateAccountCluster'obsoleteAccountCluster :: !(Prelude.Maybe AccountCluster), + _UpdateAccountCluster'obsoleteOriginalAccountCluster :: !(Prelude.Maybe AccountCluster), + _UpdateAccountCluster'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountCluster where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccountCluster "obsoleteAccountCluster" AccountCluster where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountCluster'obsoleteAccountCluster + (\ x__ y__ + -> x__ {_UpdateAccountCluster'obsoleteAccountCluster = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateAccountCluster "maybe'obsoleteAccountCluster" (Prelude.Maybe AccountCluster) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountCluster'obsoleteAccountCluster + (\ x__ y__ + -> x__ {_UpdateAccountCluster'obsoleteAccountCluster = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountCluster "obsoleteOriginalAccountCluster" AccountCluster where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountCluster'obsoleteOriginalAccountCluster + (\ x__ y__ + -> x__ + {_UpdateAccountCluster'obsoleteOriginalAccountCluster = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateAccountCluster "maybe'obsoleteOriginalAccountCluster" (Prelude.Maybe AccountCluster) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountCluster'obsoleteOriginalAccountCluster + (\ x__ y__ + -> x__ + {_UpdateAccountCluster'obsoleteOriginalAccountCluster = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccountCluster where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountCluster" + packedMessageDescriptor _ + = "\n\ + \\DC4UpdateAccountCluster\DC2\\\n\ + \\CANobsolete_account_cluster\CAN\SOH \SOH(\v2\RS.traderouting_1.AccountClusterR\SYNobsoleteAccountClusterB\STX\CAN\SOH\DC2m\n\ + \!obsolete_original_account_cluster\CAN\STX \SOH(\v2\RS.traderouting_1.AccountClusterR\RSobsoleteOriginalAccountClusterB\STX\CAN\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + obsoleteAccountCluster__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_account_cluster" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountCluster) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteAccountCluster")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountCluster + obsoleteOriginalAccountCluster__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_original_account_cluster" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountCluster) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteOriginalAccountCluster")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountCluster + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, obsoleteAccountCluster__field_descriptor), + (Data.ProtoLens.Tag 2, + obsoleteOriginalAccountCluster__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountCluster'_unknownFields + (\ x__ y__ -> x__ {_UpdateAccountCluster'_unknownFields = y__}) + defMessage + = UpdateAccountCluster'_constructor + {_UpdateAccountCluster'obsoleteAccountCluster = Prelude.Nothing, + _UpdateAccountCluster'obsoleteOriginalAccountCluster = Prelude.Nothing, + _UpdateAccountCluster'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountCluster + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountCluster + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_account_cluster" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteAccountCluster") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_original_account_cluster" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteOriginalAccountCluster") + y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateAccountCluster" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteAccountCluster") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteOriginalAccountCluster") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UpdateAccountCluster where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountCluster'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccountCluster'obsoleteAccountCluster x__) + (Control.DeepSeq.deepseq + (_UpdateAccountCluster'obsoleteOriginalAccountCluster x__) ())) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountClusterId' @:: Lens' UpdateAccountClusterPriceOffsets Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountClusterId' @:: Lens' UpdateAccountClusterPriceOffsets (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.offsetsToSet' @:: Lens' UpdateAccountClusterPriceOffsets [AccountClusterPriceOffset]@ + * 'Proto.CMS.Traderouting1_Fields.vec'offsetsToSet' @:: Lens' UpdateAccountClusterPriceOffsets (Data.Vector.Vector AccountClusterPriceOffset)@ + * 'Proto.CMS.Traderouting1_Fields.offsetsToRemove' @:: Lens' UpdateAccountClusterPriceOffsets [AccountClusterPriceOffset]@ + * 'Proto.CMS.Traderouting1_Fields.vec'offsetsToRemove' @:: Lens' UpdateAccountClusterPriceOffsets (Data.Vector.Vector AccountClusterPriceOffset)@ -} +data UpdateAccountClusterPriceOffsets + = UpdateAccountClusterPriceOffsets'_constructor {_UpdateAccountClusterPriceOffsets'accountClusterId :: !(Prelude.Maybe Data.Text.Text), + _UpdateAccountClusterPriceOffsets'offsetsToSet :: !(Data.Vector.Vector AccountClusterPriceOffset), + _UpdateAccountClusterPriceOffsets'offsetsToRemove :: !(Data.Vector.Vector AccountClusterPriceOffset), + _UpdateAccountClusterPriceOffsets'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountClusterPriceOffsets where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccountClusterPriceOffsets "accountClusterId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountClusterPriceOffsets'accountClusterId + (\ x__ y__ + -> x__ {_UpdateAccountClusterPriceOffsets'accountClusterId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateAccountClusterPriceOffsets "maybe'accountClusterId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountClusterPriceOffsets'accountClusterId + (\ x__ y__ + -> x__ {_UpdateAccountClusterPriceOffsets'accountClusterId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountClusterPriceOffsets "offsetsToSet" [AccountClusterPriceOffset] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountClusterPriceOffsets'offsetsToSet + (\ x__ y__ + -> x__ {_UpdateAccountClusterPriceOffsets'offsetsToSet = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountClusterPriceOffsets "vec'offsetsToSet" (Data.Vector.Vector AccountClusterPriceOffset) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountClusterPriceOffsets'offsetsToSet + (\ x__ y__ + -> x__ {_UpdateAccountClusterPriceOffsets'offsetsToSet = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountClusterPriceOffsets "offsetsToRemove" [AccountClusterPriceOffset] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountClusterPriceOffsets'offsetsToRemove + (\ x__ y__ + -> x__ {_UpdateAccountClusterPriceOffsets'offsetsToRemove = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountClusterPriceOffsets "vec'offsetsToRemove" (Data.Vector.Vector AccountClusterPriceOffset) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountClusterPriceOffsets'offsetsToRemove + (\ x__ y__ + -> x__ {_UpdateAccountClusterPriceOffsets'offsetsToRemove = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccountClusterPriceOffsets where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountClusterPriceOffsets" + packedMessageDescriptor _ + = "\n\ + \ UpdateAccountClusterPriceOffsets\DC2,\n\ + \\DC2account_cluster_id\CAN\SOH \SOH(\tR\DLEaccountClusterId\DC2O\n\ + \\SOoffsets_to_set\CAN\STX \ETX(\v2).traderouting_1.AccountClusterPriceOffsetR\foffsetsToSet\DC2U\n\ + \\DC1offsets_to_remove\CAN\ETX \ETX(\v2).traderouting_1.AccountClusterPriceOffsetR\SIoffsetsToRemove" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountClusterId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_cluster_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountClusterId")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountClusterPriceOffsets + offsetsToSet__field_descriptor + = Data.ProtoLens.FieldDescriptor + "offsets_to_set" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountClusterPriceOffset) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"offsetsToSet")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountClusterPriceOffsets + offsetsToRemove__field_descriptor + = Data.ProtoLens.FieldDescriptor + "offsets_to_remove" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountClusterPriceOffset) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"offsetsToRemove")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountClusterPriceOffsets + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountClusterId__field_descriptor), + (Data.ProtoLens.Tag 2, offsetsToSet__field_descriptor), + (Data.ProtoLens.Tag 3, offsetsToRemove__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountClusterPriceOffsets'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountClusterPriceOffsets'_unknownFields = y__}) + defMessage + = UpdateAccountClusterPriceOffsets'_constructor + {_UpdateAccountClusterPriceOffsets'accountClusterId = Prelude.Nothing, + _UpdateAccountClusterPriceOffsets'offsetsToSet = Data.Vector.Generic.empty, + _UpdateAccountClusterPriceOffsets'offsetsToRemove = Data.Vector.Generic.empty, + _UpdateAccountClusterPriceOffsets'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountClusterPriceOffsets + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountClusterPriceOffset + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountClusterPriceOffset + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountClusterPriceOffsets + loop x mutable'offsetsToRemove mutable'offsetsToSet + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'offsetsToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'offsetsToRemove) + frozen'offsetsToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'offsetsToSet) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'offsetsToRemove") + frozen'offsetsToRemove + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'offsetsToSet") + frozen'offsetsToSet x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_cluster_id" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountClusterId") y x) + mutable'offsetsToRemove mutable'offsetsToSet + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "offsets_to_set" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'offsetsToSet y) + loop x mutable'offsetsToRemove v + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "offsets_to_remove" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'offsetsToRemove y) + loop x v mutable'offsetsToSet + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'offsetsToRemove mutable'offsetsToSet + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'offsetsToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'offsetsToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'offsetsToRemove + mutable'offsetsToSet) + "UpdateAccountClusterPriceOffsets" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountClusterId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'offsetsToSet") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'offsetsToRemove") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData UpdateAccountClusterPriceOffsets where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountClusterPriceOffsets'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccountClusterPriceOffsets'accountClusterId x__) + (Control.DeepSeq.deepseq + (_UpdateAccountClusterPriceOffsets'offsetsToSet x__) + (Control.DeepSeq.deepseq + (_UpdateAccountClusterPriceOffsets'offsetsToRemove x__) ()))) +{- | Fields : + -} +data UpdateAccountClusterPriceOffsetsResult + = UpdateAccountClusterPriceOffsetsResult'_constructor {_UpdateAccountClusterPriceOffsetsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountClusterPriceOffsetsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateAccountClusterPriceOffsetsResult where + messageName _ + = Data.Text.pack + "traderouting_1.UpdateAccountClusterPriceOffsetsResult" + packedMessageDescriptor _ + = "\n\ + \&UpdateAccountClusterPriceOffsetsResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountClusterPriceOffsetsResult'_unknownFields + (\ x__ y__ + -> x__ + {_UpdateAccountClusterPriceOffsetsResult'_unknownFields = y__}) + defMessage + = UpdateAccountClusterPriceOffsetsResult'_constructor + {_UpdateAccountClusterPriceOffsetsResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountClusterPriceOffsetsResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountClusterPriceOffsetsResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "UpdateAccountClusterPriceOffsetsResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateAccountClusterPriceOffsetsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountClusterPriceOffsetsResult'_unknownFields x__) () +{- | Fields : + -} +data UpdateAccountClusterResult + = UpdateAccountClusterResult'_constructor {_UpdateAccountClusterResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountClusterResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateAccountClusterResult where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountClusterResult" + packedMessageDescriptor _ + = "\n\ + \\SUBUpdateAccountClusterResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountClusterResult'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountClusterResult'_unknownFields = y__}) + defMessage + = UpdateAccountClusterResult'_constructor + {_UpdateAccountClusterResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountClusterResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountClusterResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateAccountClusterResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateAccountClusterResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountClusterResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountGroup' @:: Lens' UpdateAccountGroup AccountGroup@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountGroup' @:: Lens' UpdateAccountGroup (Prelude.Maybe AccountGroup)@ + * 'Proto.CMS.Traderouting1_Fields.subAccountsToSet' @:: Lens' UpdateAccountGroup [SubAccount]@ + * 'Proto.CMS.Traderouting1_Fields.vec'subAccountsToSet' @:: Lens' UpdateAccountGroup (Data.Vector.Vector SubAccount)@ + * 'Proto.CMS.Traderouting1_Fields.subAccountIdsToRemove' @:: Lens' UpdateAccountGroup [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'subAccountIdsToRemove' @:: Lens' UpdateAccountGroup (Data.Vector.Vector Data.Text.Text)@ -} +data UpdateAccountGroup + = UpdateAccountGroup'_constructor {_UpdateAccountGroup'accountGroup :: !(Prelude.Maybe AccountGroup), + _UpdateAccountGroup'subAccountsToSet :: !(Data.Vector.Vector SubAccount), + _UpdateAccountGroup'subAccountIdsToRemove :: !(Data.Vector.Vector Data.Text.Text), + _UpdateAccountGroup'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountGroup where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccountGroup "accountGroup" AccountGroup where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountGroup'accountGroup + (\ x__ y__ -> x__ {_UpdateAccountGroup'accountGroup = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateAccountGroup "maybe'accountGroup" (Prelude.Maybe AccountGroup) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountGroup'accountGroup + (\ x__ y__ -> x__ {_UpdateAccountGroup'accountGroup = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountGroup "subAccountsToSet" [SubAccount] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountGroup'subAccountsToSet + (\ x__ y__ -> x__ {_UpdateAccountGroup'subAccountsToSet = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountGroup "vec'subAccountsToSet" (Data.Vector.Vector SubAccount) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountGroup'subAccountsToSet + (\ x__ y__ -> x__ {_UpdateAccountGroup'subAccountsToSet = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountGroup "subAccountIdsToRemove" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountGroup'subAccountIdsToRemove + (\ x__ y__ + -> x__ {_UpdateAccountGroup'subAccountIdsToRemove = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountGroup "vec'subAccountIdsToRemove" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountGroup'subAccountIdsToRemove + (\ x__ y__ + -> x__ {_UpdateAccountGroup'subAccountIdsToRemove = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccountGroup where + messageName _ = Data.Text.pack "traderouting_1.UpdateAccountGroup" + packedMessageDescriptor _ + = "\n\ + \\DC2UpdateAccountGroup\DC2A\n\ + \\raccount_group\CAN\SOH \SOH(\v2\FS.traderouting_1.AccountGroupR\faccountGroup\DC2I\n\ + \\DC3sub_accounts_to_set\CAN\STX \ETX(\v2\SUB.traderouting_1.SubAccountR\DLEsubAccountsToSet\DC28\n\ + \\EMsub_account_ids_to_remove\CAN\ETX \ETX(\tR\NAKsubAccountIdsToRemove" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountGroup__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_group" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountGroup) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountGroup")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountGroup + subAccountsToSet__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sub_accounts_to_set" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SubAccount) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"subAccountsToSet")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountGroup + subAccountIdsToRemove__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sub_account_ids_to_remove" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"subAccountIdsToRemove")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountGroup + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountGroup__field_descriptor), + (Data.ProtoLens.Tag 2, subAccountsToSet__field_descriptor), + (Data.ProtoLens.Tag 3, subAccountIdsToRemove__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountGroup'_unknownFields + (\ x__ y__ -> x__ {_UpdateAccountGroup'_unknownFields = y__}) + defMessage + = UpdateAccountGroup'_constructor + {_UpdateAccountGroup'accountGroup = Prelude.Nothing, + _UpdateAccountGroup'subAccountsToSet = Data.Vector.Generic.empty, + _UpdateAccountGroup'subAccountIdsToRemove = Data.Vector.Generic.empty, + _UpdateAccountGroup'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountGroup + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld SubAccount + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountGroup + loop x mutable'subAccountIdsToRemove mutable'subAccountsToSet + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'subAccountIdsToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'subAccountIdsToRemove) + frozen'subAccountsToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'subAccountsToSet) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'subAccountIdsToRemove") + frozen'subAccountIdsToRemove + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'subAccountsToSet") + frozen'subAccountsToSet x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "account_group" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"accountGroup") y x) + mutable'subAccountIdsToRemove mutable'subAccountsToSet + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "sub_accounts_to_set" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'subAccountsToSet y) + loop x mutable'subAccountIdsToRemove v + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sub_account_ids_to_remove" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'subAccountIdsToRemove y) + loop x v mutable'subAccountsToSet + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'subAccountIdsToRemove mutable'subAccountsToSet + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'subAccountIdsToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'subAccountsToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'subAccountIdsToRemove + mutable'subAccountsToSet) + "UpdateAccountGroup" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountGroup") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'subAccountsToSet") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'subAccountIdsToRemove") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData UpdateAccountGroup where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountGroup'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccountGroup'accountGroup x__) + (Control.DeepSeq.deepseq + (_UpdateAccountGroup'subAccountsToSet x__) + (Control.DeepSeq.deepseq + (_UpdateAccountGroup'subAccountIdsToRemove x__) ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' UpdateAccountMarketLimits Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' UpdateAccountMarketLimits (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.marketLimits' @:: Lens' UpdateAccountMarketLimits MarketLimits@ + * 'Proto.CMS.Traderouting1_Fields.maybe'marketLimits' @:: Lens' UpdateAccountMarketLimits (Prelude.Maybe MarketLimits)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteOriginalMarketLimits' @:: Lens' UpdateAccountMarketLimits MarketLimits@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteOriginalMarketLimits' @:: Lens' UpdateAccountMarketLimits (Prelude.Maybe MarketLimits)@ -} +data UpdateAccountMarketLimits + = UpdateAccountMarketLimits'_constructor {_UpdateAccountMarketLimits'accountId :: !(Prelude.Maybe Data.Text.Text), + _UpdateAccountMarketLimits'marketLimits :: !(Prelude.Maybe MarketLimits), + _UpdateAccountMarketLimits'obsoleteOriginalMarketLimits :: !(Prelude.Maybe MarketLimits), + _UpdateAccountMarketLimits'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountMarketLimits where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccountMarketLimits "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountMarketLimits'accountId + (\ x__ y__ -> x__ {_UpdateAccountMarketLimits'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateAccountMarketLimits "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountMarketLimits'accountId + (\ x__ y__ -> x__ {_UpdateAccountMarketLimits'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountMarketLimits "marketLimits" MarketLimits where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountMarketLimits'marketLimits + (\ x__ y__ -> x__ {_UpdateAccountMarketLimits'marketLimits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateAccountMarketLimits "maybe'marketLimits" (Prelude.Maybe MarketLimits) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountMarketLimits'marketLimits + (\ x__ y__ -> x__ {_UpdateAccountMarketLimits'marketLimits = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountMarketLimits "obsoleteOriginalMarketLimits" MarketLimits where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountMarketLimits'obsoleteOriginalMarketLimits + (\ x__ y__ + -> x__ + {_UpdateAccountMarketLimits'obsoleteOriginalMarketLimits = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateAccountMarketLimits "maybe'obsoleteOriginalMarketLimits" (Prelude.Maybe MarketLimits) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountMarketLimits'obsoleteOriginalMarketLimits + (\ x__ y__ + -> x__ + {_UpdateAccountMarketLimits'obsoleteOriginalMarketLimits = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccountMarketLimits where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountMarketLimits" + packedMessageDescriptor _ + = "\n\ + \\EMUpdateAccountMarketLimits\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2A\n\ + \\rmarket_limits\CAN\STX \SOH(\v2\FS.traderouting_1.MarketLimitsR\fmarketLimits\DC2g\n\ + \\USobsolete_original_market_limits\CAN\ETX \SOH(\v2\FS.traderouting_1.MarketLimitsR\FSobsoleteOriginalMarketLimitsB\STX\CAN\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountMarketLimits + marketLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "market_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor MarketLimits) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'marketLimits")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountMarketLimits + obsoleteOriginalMarketLimits__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_original_market_limits" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor MarketLimits) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteOriginalMarketLimits")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountMarketLimits + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, marketLimits__field_descriptor), + (Data.ProtoLens.Tag 3, + obsoleteOriginalMarketLimits__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountMarketLimits'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountMarketLimits'_unknownFields = y__}) + defMessage + = UpdateAccountMarketLimits'_constructor + {_UpdateAccountMarketLimits'accountId = Prelude.Nothing, + _UpdateAccountMarketLimits'marketLimits = Prelude.Nothing, + _UpdateAccountMarketLimits'obsoleteOriginalMarketLimits = Prelude.Nothing, + _UpdateAccountMarketLimits'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountMarketLimits + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountMarketLimits + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "market_limits" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"marketLimits") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_original_market_limits" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteOriginalMarketLimits") y + x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateAccountMarketLimits" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'marketLimits") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteOriginalMarketLimits") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData UpdateAccountMarketLimits where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountMarketLimits'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccountMarketLimits'accountId x__) + (Control.DeepSeq.deepseq + (_UpdateAccountMarketLimits'marketLimits x__) + (Control.DeepSeq.deepseq + (_UpdateAccountMarketLimits'obsoleteOriginalMarketLimits x__) ()))) +{- | Fields : + -} +data UpdateAccountMarketLimitsResult + = UpdateAccountMarketLimitsResult'_constructor {_UpdateAccountMarketLimitsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountMarketLimitsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateAccountMarketLimitsResult where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountMarketLimitsResult" + packedMessageDescriptor _ + = "\n\ + \\USUpdateAccountMarketLimitsResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountMarketLimitsResult'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountMarketLimitsResult'_unknownFields = y__}) + defMessage + = UpdateAccountMarketLimitsResult'_constructor + {_UpdateAccountMarketLimitsResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountMarketLimitsResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountMarketLimitsResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "UpdateAccountMarketLimitsResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateAccountMarketLimitsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountMarketLimitsResult'_unknownFields x__) () +{- | Fields : + -} +data UpdateAccountResult + = UpdateAccountResult'_constructor {_UpdateAccountResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateAccountResult where + messageName _ = Data.Text.pack "traderouting_1.UpdateAccountResult" + packedMessageDescriptor _ + = "\n\ + \\DC3UpdateAccountResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountResult'_unknownFields + (\ x__ y__ -> x__ {_UpdateAccountResult'_unknownFields = y__}) + defMessage + = UpdateAccountResult'_constructor + {_UpdateAccountResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateAccountResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateAccountResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' UpdateAccountRiskParameters Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' UpdateAccountRiskParameters (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.riskParameters' @:: Lens' UpdateAccountRiskParameters RiskParameters@ + * 'Proto.CMS.Traderouting1_Fields.maybe'riskParameters' @:: Lens' UpdateAccountRiskParameters (Prelude.Maybe RiskParameters)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteOriginalRiskParameters' @:: Lens' UpdateAccountRiskParameters RiskParameters@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteOriginalRiskParameters' @:: Lens' UpdateAccountRiskParameters (Prelude.Maybe RiskParameters)@ -} +data UpdateAccountRiskParameters + = UpdateAccountRiskParameters'_constructor {_UpdateAccountRiskParameters'accountId :: !(Prelude.Maybe Data.Text.Text), + _UpdateAccountRiskParameters'riskParameters :: !(Prelude.Maybe RiskParameters), + _UpdateAccountRiskParameters'obsoleteOriginalRiskParameters :: !(Prelude.Maybe RiskParameters), + _UpdateAccountRiskParameters'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountRiskParameters where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccountRiskParameters "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRiskParameters'accountId + (\ x__ y__ -> x__ {_UpdateAccountRiskParameters'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateAccountRiskParameters "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRiskParameters'accountId + (\ x__ y__ -> x__ {_UpdateAccountRiskParameters'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountRiskParameters "riskParameters" RiskParameters where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRiskParameters'riskParameters + (\ x__ y__ + -> x__ {_UpdateAccountRiskParameters'riskParameters = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateAccountRiskParameters "maybe'riskParameters" (Prelude.Maybe RiskParameters) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRiskParameters'riskParameters + (\ x__ y__ + -> x__ {_UpdateAccountRiskParameters'riskParameters = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountRiskParameters "obsoleteOriginalRiskParameters" RiskParameters where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRiskParameters'obsoleteOriginalRiskParameters + (\ x__ y__ + -> x__ + {_UpdateAccountRiskParameters'obsoleteOriginalRiskParameters = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateAccountRiskParameters "maybe'obsoleteOriginalRiskParameters" (Prelude.Maybe RiskParameters) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRiskParameters'obsoleteOriginalRiskParameters + (\ x__ y__ + -> x__ + {_UpdateAccountRiskParameters'obsoleteOriginalRiskParameters = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccountRiskParameters where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountRiskParameters" + packedMessageDescriptor _ + = "\n\ + \\ESCUpdateAccountRiskParameters\DC2\GS\n\ + \\n\ + \account_id\CAN\ETX \SOH(\tR\taccountId\DC2G\n\ + \\SIrisk_parameters\CAN\SOH \SOH(\v2\RS.traderouting_1.RiskParametersR\SOriskParameters\DC2m\n\ + \!obsolete_original_risk_parameters\CAN\STX \SOH(\v2\RS.traderouting_1.RiskParametersR\RSobsoleteOriginalRiskParametersB\STX\CAN\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountRiskParameters + riskParameters__field_descriptor + = Data.ProtoLens.FieldDescriptor + "risk_parameters" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RiskParameters) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'riskParameters")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountRiskParameters + obsoleteOriginalRiskParameters__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_original_risk_parameters" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor RiskParameters) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field + @"maybe'obsoleteOriginalRiskParameters")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountRiskParameters + in + Data.Map.fromList + [(Data.ProtoLens.Tag 3, accountId__field_descriptor), + (Data.ProtoLens.Tag 1, riskParameters__field_descriptor), + (Data.ProtoLens.Tag 2, + obsoleteOriginalRiskParameters__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountRiskParameters'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountRiskParameters'_unknownFields = y__}) + defMessage + = UpdateAccountRiskParameters'_constructor + {_UpdateAccountRiskParameters'accountId = Prelude.Nothing, + _UpdateAccountRiskParameters'riskParameters = Prelude.Nothing, + _UpdateAccountRiskParameters'obsoleteOriginalRiskParameters = Prelude.Nothing, + _UpdateAccountRiskParameters'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountRiskParameters + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountRiskParameters + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "risk_parameters" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"riskParameters") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_original_risk_parameters" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteOriginalRiskParameters") + y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateAccountRiskParameters" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'riskParameters") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field + @"maybe'obsoleteOriginalRiskParameters") + _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData UpdateAccountRiskParameters where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountRiskParameters'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccountRiskParameters'accountId x__) + (Control.DeepSeq.deepseq + (_UpdateAccountRiskParameters'riskParameters x__) + (Control.DeepSeq.deepseq + (_UpdateAccountRiskParameters'obsoleteOriginalRiskParameters x__) + ()))) +{- | Fields : + -} +data UpdateAccountRiskParametersResult + = UpdateAccountRiskParametersResult'_constructor {_UpdateAccountRiskParametersResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountRiskParametersResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateAccountRiskParametersResult where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountRiskParametersResult" + packedMessageDescriptor _ + = "\n\ + \!UpdateAccountRiskParametersResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountRiskParametersResult'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountRiskParametersResult'_unknownFields = y__}) + defMessage + = UpdateAccountRiskParametersResult'_constructor + {_UpdateAccountRiskParametersResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountRiskParametersResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountRiskParametersResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "UpdateAccountRiskParametersResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateAccountRiskParametersResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountRiskParametersResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' UpdateAccountRouteList Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' UpdateAccountRouteList (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.routesToSet' @:: Lens' UpdateAccountRouteList [AccountRouteRecord]@ + * 'Proto.CMS.Traderouting1_Fields.vec'routesToSet' @:: Lens' UpdateAccountRouteList (Data.Vector.Vector AccountRouteRecord)@ + * 'Proto.CMS.Traderouting1_Fields.routeCodesToRemove' @:: Lens' UpdateAccountRouteList [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'routeCodesToRemove' @:: Lens' UpdateAccountRouteList (Data.Vector.Vector Data.Text.Text)@ -} +data UpdateAccountRouteList + = UpdateAccountRouteList'_constructor {_UpdateAccountRouteList'accountId :: !(Prelude.Maybe Data.Text.Text), + _UpdateAccountRouteList'routesToSet :: !(Data.Vector.Vector AccountRouteRecord), + _UpdateAccountRouteList'routeCodesToRemove :: !(Data.Vector.Vector Data.Text.Text), + _UpdateAccountRouteList'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountRouteList where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccountRouteList "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRouteList'accountId + (\ x__ y__ -> x__ {_UpdateAccountRouteList'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateAccountRouteList "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRouteList'accountId + (\ x__ y__ -> x__ {_UpdateAccountRouteList'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountRouteList "routesToSet" [AccountRouteRecord] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRouteList'routesToSet + (\ x__ y__ -> x__ {_UpdateAccountRouteList'routesToSet = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountRouteList "vec'routesToSet" (Data.Vector.Vector AccountRouteRecord) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRouteList'routesToSet + (\ x__ y__ -> x__ {_UpdateAccountRouteList'routesToSet = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountRouteList "routeCodesToRemove" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRouteList'routeCodesToRemove + (\ x__ y__ + -> x__ {_UpdateAccountRouteList'routeCodesToRemove = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountRouteList "vec'routeCodesToRemove" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountRouteList'routeCodesToRemove + (\ x__ y__ + -> x__ {_UpdateAccountRouteList'routeCodesToRemove = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccountRouteList where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountRouteList" + packedMessageDescriptor _ + = "\n\ + \\SYNUpdateAccountRouteList\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2F\n\ + \\rroutes_to_set\CAN\STX \ETX(\v2\".traderouting_1.AccountRouteRecordR\vroutesToSet\DC21\n\ + \\NAKroute_codes_to_remove\CAN\ETX \ETX(\tR\DC2routeCodesToRemove" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountRouteList + routesToSet__field_descriptor + = Data.ProtoLens.FieldDescriptor + "routes_to_set" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountRouteRecord) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"routesToSet")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountRouteList + routeCodesToRemove__field_descriptor + = Data.ProtoLens.FieldDescriptor + "route_codes_to_remove" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"routeCodesToRemove")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountRouteList + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, routesToSet__field_descriptor), + (Data.ProtoLens.Tag 3, routeCodesToRemove__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountRouteList'_unknownFields + (\ x__ y__ -> x__ {_UpdateAccountRouteList'_unknownFields = y__}) + defMessage + = UpdateAccountRouteList'_constructor + {_UpdateAccountRouteList'accountId = Prelude.Nothing, + _UpdateAccountRouteList'routesToSet = Data.Vector.Generic.empty, + _UpdateAccountRouteList'routeCodesToRemove = Data.Vector.Generic.empty, + _UpdateAccountRouteList'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountRouteList + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountRouteRecord + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountRouteList + loop x mutable'routeCodesToRemove mutable'routesToSet + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'routeCodesToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'routeCodesToRemove) + frozen'routesToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'routesToSet) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'routeCodesToRemove") + frozen'routeCodesToRemove + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'routesToSet") frozen'routesToSet + x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + mutable'routeCodesToRemove mutable'routesToSet + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "routes_to_set" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'routesToSet y) + loop x mutable'routeCodesToRemove v + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "route_codes_to_remove" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'routeCodesToRemove y) + loop x v mutable'routesToSet + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'routeCodesToRemove mutable'routesToSet + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'routeCodesToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'routesToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'routeCodesToRemove + mutable'routesToSet) + "UpdateAccountRouteList" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'routesToSet") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'routeCodesToRemove") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData UpdateAccountRouteList where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountRouteList'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccountRouteList'accountId x__) + (Control.DeepSeq.deepseq + (_UpdateAccountRouteList'routesToSet x__) + (Control.DeepSeq.deepseq + (_UpdateAccountRouteList'routeCodesToRemove x__) ()))) +{- | Fields : + -} +data UpdateAccountRouteListResult + = UpdateAccountRouteListResult'_constructor {_UpdateAccountRouteListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountRouteListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateAccountRouteListResult where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountRouteListResult" + packedMessageDescriptor _ + = "\n\ + \\FSUpdateAccountRouteListResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountRouteListResult'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountRouteListResult'_unknownFields = y__}) + defMessage + = UpdateAccountRouteListResult'_constructor + {_UpdateAccountRouteListResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountRouteListResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountRouteListResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateAccountRouteListResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateAccountRouteListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountRouteListResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' UpdateAccountServiceGroupList Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' UpdateAccountServiceGroupList (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.serviceGroupIdsToSet' @:: Lens' UpdateAccountServiceGroupList [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'serviceGroupIdsToSet' @:: Lens' UpdateAccountServiceGroupList (Data.Vector.Vector Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.serviceGroupIdsToRemove' @:: Lens' UpdateAccountServiceGroupList [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'serviceGroupIdsToRemove' @:: Lens' UpdateAccountServiceGroupList (Data.Vector.Vector Data.Text.Text)@ -} +data UpdateAccountServiceGroupList + = UpdateAccountServiceGroupList'_constructor {_UpdateAccountServiceGroupList'accountId :: !(Prelude.Maybe Data.Text.Text), + _UpdateAccountServiceGroupList'serviceGroupIdsToSet :: !(Data.Vector.Vector Data.Text.Text), + _UpdateAccountServiceGroupList'serviceGroupIdsToRemove :: !(Data.Vector.Vector Data.Text.Text), + _UpdateAccountServiceGroupList'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountServiceGroupList where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccountServiceGroupList "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountServiceGroupList'accountId + (\ x__ y__ + -> x__ {_UpdateAccountServiceGroupList'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateAccountServiceGroupList "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountServiceGroupList'accountId + (\ x__ y__ + -> x__ {_UpdateAccountServiceGroupList'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountServiceGroupList "serviceGroupIdsToSet" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountServiceGroupList'serviceGroupIdsToSet + (\ x__ y__ + -> x__ + {_UpdateAccountServiceGroupList'serviceGroupIdsToSet = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountServiceGroupList "vec'serviceGroupIdsToSet" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountServiceGroupList'serviceGroupIdsToSet + (\ x__ y__ + -> x__ + {_UpdateAccountServiceGroupList'serviceGroupIdsToSet = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountServiceGroupList "serviceGroupIdsToRemove" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountServiceGroupList'serviceGroupIdsToRemove + (\ x__ y__ + -> x__ + {_UpdateAccountServiceGroupList'serviceGroupIdsToRemove = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountServiceGroupList "vec'serviceGroupIdsToRemove" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountServiceGroupList'serviceGroupIdsToRemove + (\ x__ y__ + -> x__ + {_UpdateAccountServiceGroupList'serviceGroupIdsToRemove = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccountServiceGroupList where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountServiceGroupList" + packedMessageDescriptor _ + = "\n\ + \\GSUpdateAccountServiceGroupList\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC26\n\ + \\CANservice_group_ids_to_set\CAN\STX \ETX(\tR\DC4serviceGroupIdsToSet\DC2<\n\ + \\ESCservice_group_ids_to_remove\CAN\ETX \ETX(\tR\ETBserviceGroupIdsToRemove" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountServiceGroupList + serviceGroupIdsToSet__field_descriptor + = Data.ProtoLens.FieldDescriptor + "service_group_ids_to_set" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"serviceGroupIdsToSet")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountServiceGroupList + serviceGroupIdsToRemove__field_descriptor + = Data.ProtoLens.FieldDescriptor + "service_group_ids_to_remove" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"serviceGroupIdsToRemove")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountServiceGroupList + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, serviceGroupIdsToSet__field_descriptor), + (Data.ProtoLens.Tag 3, serviceGroupIdsToRemove__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountServiceGroupList'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountServiceGroupList'_unknownFields = y__}) + defMessage + = UpdateAccountServiceGroupList'_constructor + {_UpdateAccountServiceGroupList'accountId = Prelude.Nothing, + _UpdateAccountServiceGroupList'serviceGroupIdsToSet = Data.Vector.Generic.empty, + _UpdateAccountServiceGroupList'serviceGroupIdsToRemove = Data.Vector.Generic.empty, + _UpdateAccountServiceGroupList'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountServiceGroupList + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountServiceGroupList + loop x mutable'serviceGroupIdsToRemove mutable'serviceGroupIdsToSet + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'serviceGroupIdsToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'serviceGroupIdsToRemove) + frozen'serviceGroupIdsToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'serviceGroupIdsToSet) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'serviceGroupIdsToRemove") + frozen'serviceGroupIdsToRemove + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'serviceGroupIdsToSet") + frozen'serviceGroupIdsToSet x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + mutable'serviceGroupIdsToRemove mutable'serviceGroupIdsToSet + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "service_group_ids_to_set" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'serviceGroupIdsToSet y) + loop x mutable'serviceGroupIdsToRemove v + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "service_group_ids_to_remove" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'serviceGroupIdsToRemove y) + loop x v mutable'serviceGroupIdsToSet + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'serviceGroupIdsToRemove mutable'serviceGroupIdsToSet + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'serviceGroupIdsToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'serviceGroupIdsToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'serviceGroupIdsToRemove + mutable'serviceGroupIdsToSet) + "UpdateAccountServiceGroupList" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'serviceGroupIdsToSet") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'serviceGroupIdsToRemove") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData UpdateAccountServiceGroupList where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountServiceGroupList'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccountServiceGroupList'accountId x__) + (Control.DeepSeq.deepseq + (_UpdateAccountServiceGroupList'serviceGroupIdsToSet x__) + (Control.DeepSeq.deepseq + (_UpdateAccountServiceGroupList'serviceGroupIdsToRemove x__) ()))) +{- | Fields : + -} +data UpdateAccountServiceGroupListResult + = UpdateAccountServiceGroupListResult'_constructor {_UpdateAccountServiceGroupListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountServiceGroupListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateAccountServiceGroupListResult where + messageName _ + = Data.Text.pack + "traderouting_1.UpdateAccountServiceGroupListResult" + packedMessageDescriptor _ + = "\n\ + \#UpdateAccountServiceGroupListResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountServiceGroupListResult'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountServiceGroupListResult'_unknownFields = y__}) + defMessage + = UpdateAccountServiceGroupListResult'_constructor + {_UpdateAccountServiceGroupListResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountServiceGroupListResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountServiceGroupListResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "UpdateAccountServiceGroupListResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateAccountServiceGroupListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountServiceGroupListResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.settings' @:: Lens' UpdateAccountSettings AccountSettings@ + * 'Proto.CMS.Traderouting1_Fields.maybe'settings' @:: Lens' UpdateAccountSettings (Prelude.Maybe AccountSettings)@ + * 'Proto.CMS.Traderouting1_Fields.obsoleteOriginalSettings' @:: Lens' UpdateAccountSettings AccountSettings@ + * 'Proto.CMS.Traderouting1_Fields.maybe'obsoleteOriginalSettings' @:: Lens' UpdateAccountSettings (Prelude.Maybe AccountSettings)@ -} +data UpdateAccountSettings + = UpdateAccountSettings'_constructor {_UpdateAccountSettings'settings :: !(Prelude.Maybe AccountSettings), + _UpdateAccountSettings'obsoleteOriginalSettings :: !(Prelude.Maybe AccountSettings), + _UpdateAccountSettings'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountSettings where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccountSettings "settings" AccountSettings where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountSettings'settings + (\ x__ y__ -> x__ {_UpdateAccountSettings'settings = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateAccountSettings "maybe'settings" (Prelude.Maybe AccountSettings) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountSettings'settings + (\ x__ y__ -> x__ {_UpdateAccountSettings'settings = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountSettings "obsoleteOriginalSettings" AccountSettings where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountSettings'obsoleteOriginalSettings + (\ x__ y__ + -> x__ {_UpdateAccountSettings'obsoleteOriginalSettings = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField UpdateAccountSettings "maybe'obsoleteOriginalSettings" (Prelude.Maybe AccountSettings) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountSettings'obsoleteOriginalSettings + (\ x__ y__ + -> x__ {_UpdateAccountSettings'obsoleteOriginalSettings = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccountSettings where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountSettings" + packedMessageDescriptor _ + = "\n\ + \\NAKUpdateAccountSettings\DC2;\n\ + \\bsettings\CAN\SOH \SOH(\v2\US.traderouting_1.AccountSettingsR\bsettings\DC2a\n\ + \\SUBobsolete_original_settings\CAN\STX \SOH(\v2\US.traderouting_1.AccountSettingsR\CANobsoleteOriginalSettingsB\STX\CAN\SOH" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + settings__field_descriptor + = Data.ProtoLens.FieldDescriptor + "settings" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountSettings) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'settings")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountSettings + obsoleteOriginalSettings__field_descriptor + = Data.ProtoLens.FieldDescriptor + "obsolete_original_settings" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountSettings) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'obsoleteOriginalSettings")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountSettings + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, settings__field_descriptor), + (Data.ProtoLens.Tag 2, obsoleteOriginalSettings__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountSettings'_unknownFields + (\ x__ y__ -> x__ {_UpdateAccountSettings'_unknownFields = y__}) + defMessage + = UpdateAccountSettings'_constructor + {_UpdateAccountSettings'settings = Prelude.Nothing, + _UpdateAccountSettings'obsoleteOriginalSettings = Prelude.Nothing, + _UpdateAccountSettings'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountSettings + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountSettings + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "settings" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"settings") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "obsolete_original_settings" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"obsoleteOriginalSettings") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateAccountSettings" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'settings") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'obsoleteOriginalSettings") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UpdateAccountSettings where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountSettings'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccountSettings'settings x__) + (Control.DeepSeq.deepseq + (_UpdateAccountSettings'obsoleteOriginalSettings x__) ())) +{- | Fields : + -} +data UpdateAccountSettingsResult + = UpdateAccountSettingsResult'_constructor {_UpdateAccountSettingsResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountSettingsResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateAccountSettingsResult where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountSettingsResult" + packedMessageDescriptor _ + = "\n\ + \\ESCUpdateAccountSettingsResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountSettingsResult'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountSettingsResult'_unknownFields = y__}) + defMessage + = UpdateAccountSettingsResult'_constructor + {_UpdateAccountSettingsResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountSettingsResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountSettingsResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateAccountSettingsResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateAccountSettingsResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountSettingsResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' UpdateAccountTradingFeatures Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' UpdateAccountTradingFeatures (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.tradingInterfaceElementsToSet' @:: Lens' UpdateAccountTradingFeatures [AccountTradingInterfaceElement]@ + * 'Proto.CMS.Traderouting1_Fields.vec'tradingInterfaceElementsToSet' @:: Lens' UpdateAccountTradingFeatures (Data.Vector.Vector AccountTradingInterfaceElement)@ + * 'Proto.CMS.Traderouting1_Fields.tradingInterfaceElementIdsToRemove' @:: Lens' UpdateAccountTradingFeatures [Data.Text.Text]@ + * 'Proto.CMS.Traderouting1_Fields.vec'tradingInterfaceElementIdsToRemove' @:: Lens' UpdateAccountTradingFeatures (Data.Vector.Vector Data.Text.Text)@ -} +data UpdateAccountTradingFeatures + = UpdateAccountTradingFeatures'_constructor {_UpdateAccountTradingFeatures'accountId :: !(Prelude.Maybe Data.Text.Text), + _UpdateAccountTradingFeatures'tradingInterfaceElementsToSet :: !(Data.Vector.Vector AccountTradingInterfaceElement), + _UpdateAccountTradingFeatures'tradingInterfaceElementIdsToRemove :: !(Data.Vector.Vector Data.Text.Text), + _UpdateAccountTradingFeatures'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountTradingFeatures where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccountTradingFeatures "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTradingFeatures'accountId + (\ x__ y__ -> x__ {_UpdateAccountTradingFeatures'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateAccountTradingFeatures "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTradingFeatures'accountId + (\ x__ y__ -> x__ {_UpdateAccountTradingFeatures'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountTradingFeatures "tradingInterfaceElementsToSet" [AccountTradingInterfaceElement] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTradingFeatures'tradingInterfaceElementsToSet + (\ x__ y__ + -> x__ + {_UpdateAccountTradingFeatures'tradingInterfaceElementsToSet = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountTradingFeatures "vec'tradingInterfaceElementsToSet" (Data.Vector.Vector AccountTradingInterfaceElement) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTradingFeatures'tradingInterfaceElementsToSet + (\ x__ y__ + -> x__ + {_UpdateAccountTradingFeatures'tradingInterfaceElementsToSet = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountTradingFeatures "tradingInterfaceElementIdsToRemove" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTradingFeatures'tradingInterfaceElementIdsToRemove + (\ x__ y__ + -> x__ + {_UpdateAccountTradingFeatures'tradingInterfaceElementIdsToRemove = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountTradingFeatures "vec'tradingInterfaceElementIdsToRemove" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTradingFeatures'tradingInterfaceElementIdsToRemove + (\ x__ y__ + -> x__ + {_UpdateAccountTradingFeatures'tradingInterfaceElementIdsToRemove = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccountTradingFeatures where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountTradingFeatures" + packedMessageDescriptor _ + = "\n\ + \\FSUpdateAccountTradingFeatures\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2x\n\ + \!trading_interface_elements_to_set\CAN\STX \ETX(\v2..traderouting_1.AccountTradingInterfaceElementR\GStradingInterfaceElementsToSet\DC2S\n\ + \'trading_interface_element_ids_to_remove\CAN\ETX \ETX(\tR\"tradingInterfaceElementIdsToRemove" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountTradingFeatures + tradingInterfaceElementsToSet__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trading_interface_elements_to_set" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountTradingInterfaceElement) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"tradingInterfaceElementsToSet")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountTradingFeatures + tradingInterfaceElementIdsToRemove__field_descriptor + = Data.ProtoLens.FieldDescriptor + "trading_interface_element_ids_to_remove" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field + @"tradingInterfaceElementIdsToRemove")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountTradingFeatures + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, + tradingInterfaceElementsToSet__field_descriptor), + (Data.ProtoLens.Tag 3, + tradingInterfaceElementIdsToRemove__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountTradingFeatures'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountTradingFeatures'_unknownFields = y__}) + defMessage + = UpdateAccountTradingFeatures'_constructor + {_UpdateAccountTradingFeatures'accountId = Prelude.Nothing, + _UpdateAccountTradingFeatures'tradingInterfaceElementsToSet = Data.Vector.Generic.empty, + _UpdateAccountTradingFeatures'tradingInterfaceElementIdsToRemove = Data.Vector.Generic.empty, + _UpdateAccountTradingFeatures'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountTradingFeatures + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountTradingInterfaceElement + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountTradingFeatures + loop + x + mutable'tradingInterfaceElementIdsToRemove + mutable'tradingInterfaceElementsToSet + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'tradingInterfaceElementIdsToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'tradingInterfaceElementIdsToRemove) + frozen'tradingInterfaceElementsToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'tradingInterfaceElementsToSet) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field + @"vec'tradingInterfaceElementIdsToRemove") + frozen'tradingInterfaceElementIdsToRemove + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'tradingInterfaceElementsToSet") + frozen'tradingInterfaceElementsToSet x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + mutable'tradingInterfaceElementIdsToRemove + mutable'tradingInterfaceElementsToSet + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "trading_interface_elements_to_set" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'tradingInterfaceElementsToSet y) + loop x mutable'tradingInterfaceElementIdsToRemove v + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "trading_interface_element_ids_to_remove" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'tradingInterfaceElementIdsToRemove y) + loop x v mutable'tradingInterfaceElementsToSet + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'tradingInterfaceElementIdsToRemove + mutable'tradingInterfaceElementsToSet + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'tradingInterfaceElementIdsToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'tradingInterfaceElementsToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage + mutable'tradingInterfaceElementIdsToRemove + mutable'tradingInterfaceElementsToSet) + "UpdateAccountTradingFeatures" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'tradingInterfaceElementsToSet") + _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field + @"vec'tradingInterfaceElementIdsToRemove") + _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData UpdateAccountTradingFeatures where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountTradingFeatures'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccountTradingFeatures'accountId x__) + (Control.DeepSeq.deepseq + (_UpdateAccountTradingFeatures'tradingInterfaceElementsToSet x__) + (Control.DeepSeq.deepseq + (_UpdateAccountTradingFeatures'tradingInterfaceElementIdsToRemove + x__) + ()))) +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' UpdateAccountTypeOverrideList Data.Text.Text@ + * 'Proto.CMS.Traderouting1_Fields.maybe'accountId' @:: Lens' UpdateAccountTypeOverrideList (Prelude.Maybe Data.Text.Text)@ + * 'Proto.CMS.Traderouting1_Fields.overridesToSet' @:: Lens' UpdateAccountTypeOverrideList [AccountTypeOverride]@ + * 'Proto.CMS.Traderouting1_Fields.vec'overridesToSet' @:: Lens' UpdateAccountTypeOverrideList (Data.Vector.Vector AccountTypeOverride)@ + * 'Proto.CMS.Traderouting1_Fields.overridesToRemove' @:: Lens' UpdateAccountTypeOverrideList [Proto.CMS.Common1.Tuple]@ + * 'Proto.CMS.Traderouting1_Fields.vec'overridesToRemove' @:: Lens' UpdateAccountTypeOverrideList (Data.Vector.Vector Proto.CMS.Common1.Tuple)@ -} +data UpdateAccountTypeOverrideList + = UpdateAccountTypeOverrideList'_constructor {_UpdateAccountTypeOverrideList'accountId :: !(Prelude.Maybe Data.Text.Text), + _UpdateAccountTypeOverrideList'overridesToSet :: !(Data.Vector.Vector AccountTypeOverride), + _UpdateAccountTypeOverrideList'overridesToRemove :: !(Data.Vector.Vector Proto.CMS.Common1.Tuple), + _UpdateAccountTypeOverrideList'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountTypeOverrideList where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccountTypeOverrideList "accountId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTypeOverrideList'accountId + (\ x__ y__ + -> x__ {_UpdateAccountTypeOverrideList'accountId = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateAccountTypeOverrideList "maybe'accountId" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTypeOverrideList'accountId + (\ x__ y__ + -> x__ {_UpdateAccountTypeOverrideList'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountTypeOverrideList "overridesToSet" [AccountTypeOverride] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTypeOverrideList'overridesToSet + (\ x__ y__ + -> x__ {_UpdateAccountTypeOverrideList'overridesToSet = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountTypeOverrideList "vec'overridesToSet" (Data.Vector.Vector AccountTypeOverride) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTypeOverrideList'overridesToSet + (\ x__ y__ + -> x__ {_UpdateAccountTypeOverrideList'overridesToSet = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountTypeOverrideList "overridesToRemove" [Proto.CMS.Common1.Tuple] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTypeOverrideList'overridesToRemove + (\ x__ y__ + -> x__ {_UpdateAccountTypeOverrideList'overridesToRemove = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountTypeOverrideList "vec'overridesToRemove" (Data.Vector.Vector Proto.CMS.Common1.Tuple) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountTypeOverrideList'overridesToRemove + (\ x__ y__ + -> x__ {_UpdateAccountTypeOverrideList'overridesToRemove = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccountTypeOverrideList where + messageName _ + = Data.Text.pack "traderouting_1.UpdateAccountTypeOverrideList" + packedMessageDescriptor _ + = "\n\ + \\GSUpdateAccountTypeOverrideList\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2M\n\ + \\DLEoverrides_to_set\CAN\STX \ETX(\v2#.traderouting_1.AccountTypeOverrideR\SOoverridesToSet\DC2?\n\ + \\DC3overrides_to_remove\CAN\ETX \ETX(\v2\SI.common_1.TupleR\DC1overridesToRemove" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'accountId")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountTypeOverrideList + overridesToSet__field_descriptor + = Data.ProtoLens.FieldDescriptor + "overrides_to_set" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountTypeOverride) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"overridesToSet")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountTypeOverrideList + overridesToRemove__field_descriptor + = Data.ProtoLens.FieldDescriptor + "overrides_to_remove" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Tuple) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"overridesToRemove")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountTypeOverrideList + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, overridesToSet__field_descriptor), + (Data.ProtoLens.Tag 3, overridesToRemove__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountTypeOverrideList'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountTypeOverrideList'_unknownFields = y__}) + defMessage + = UpdateAccountTypeOverrideList'_constructor + {_UpdateAccountTypeOverrideList'accountId = Prelude.Nothing, + _UpdateAccountTypeOverrideList'overridesToSet = Data.Vector.Generic.empty, + _UpdateAccountTypeOverrideList'overridesToRemove = Data.Vector.Generic.empty, + _UpdateAccountTypeOverrideList'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountTypeOverrideList + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.Tuple + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountTypeOverride + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountTypeOverrideList + loop x mutable'overridesToRemove mutable'overridesToSet + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'overridesToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'overridesToRemove) + frozen'overridesToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'overridesToSet) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'overridesToRemove") + frozen'overridesToRemove + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'overridesToSet") + frozen'overridesToSet x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + mutable'overridesToRemove mutable'overridesToSet + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "overrides_to_set" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'overridesToSet y) + loop x mutable'overridesToRemove v + 26 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "overrides_to_remove" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'overridesToRemove y) + loop x v mutable'overridesToSet + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'overridesToRemove mutable'overridesToSet + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'overridesToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'overridesToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'overridesToRemove + mutable'overridesToSet) + "UpdateAccountTypeOverrideList" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'accountId") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'overridesToSet") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'overridesToRemove") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData UpdateAccountTypeOverrideList where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountTypeOverrideList'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccountTypeOverrideList'accountId x__) + (Control.DeepSeq.deepseq + (_UpdateAccountTypeOverrideList'overridesToSet x__) + (Control.DeepSeq.deepseq + (_UpdateAccountTypeOverrideList'overridesToRemove x__) ()))) +{- | Fields : + -} +data UpdateAccountTypeOverrideListResult + = UpdateAccountTypeOverrideListResult'_constructor {_UpdateAccountTypeOverrideListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountTypeOverrideListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateAccountTypeOverrideListResult where + messageName _ + = Data.Text.pack + "traderouting_1.UpdateAccountTypeOverrideListResult" + packedMessageDescriptor _ + = "\n\ + \#UpdateAccountTypeOverrideListResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountTypeOverrideListResult'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountTypeOverrideListResult'_unknownFields = y__}) + defMessage + = UpdateAccountTypeOverrideListResult'_constructor + {_UpdateAccountTypeOverrideListResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountTypeOverrideListResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountTypeOverrideListResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "UpdateAccountTypeOverrideListResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateAccountTypeOverrideListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountTypeOverrideListResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.linksToSet' @:: Lens' UpdateAccountUserAuthorizationList [AccountUserLink]@ + * 'Proto.CMS.Traderouting1_Fields.vec'linksToSet' @:: Lens' UpdateAccountUserAuthorizationList (Data.Vector.Vector AccountUserLink)@ + * 'Proto.CMS.Traderouting1_Fields.linksToRemove' @:: Lens' UpdateAccountUserAuthorizationList [Proto.CMS.Common1.Tuple]@ + * 'Proto.CMS.Traderouting1_Fields.vec'linksToRemove' @:: Lens' UpdateAccountUserAuthorizationList (Data.Vector.Vector Proto.CMS.Common1.Tuple)@ -} +data UpdateAccountUserAuthorizationList + = UpdateAccountUserAuthorizationList'_constructor {_UpdateAccountUserAuthorizationList'linksToSet :: !(Data.Vector.Vector AccountUserLink), + _UpdateAccountUserAuthorizationList'linksToRemove :: !(Data.Vector.Vector Proto.CMS.Common1.Tuple), + _UpdateAccountUserAuthorizationList'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountUserAuthorizationList where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateAccountUserAuthorizationList "linksToSet" [AccountUserLink] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountUserAuthorizationList'linksToSet + (\ x__ y__ + -> x__ {_UpdateAccountUserAuthorizationList'linksToSet = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountUserAuthorizationList "vec'linksToSet" (Data.Vector.Vector AccountUserLink) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountUserAuthorizationList'linksToSet + (\ x__ y__ + -> x__ {_UpdateAccountUserAuthorizationList'linksToSet = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateAccountUserAuthorizationList "linksToRemove" [Proto.CMS.Common1.Tuple] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountUserAuthorizationList'linksToRemove + (\ x__ y__ + -> x__ {_UpdateAccountUserAuthorizationList'linksToRemove = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField UpdateAccountUserAuthorizationList "vec'linksToRemove" (Data.Vector.Vector Proto.CMS.Common1.Tuple) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateAccountUserAuthorizationList'linksToRemove + (\ x__ y__ + -> x__ {_UpdateAccountUserAuthorizationList'linksToRemove = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateAccountUserAuthorizationList where + messageName _ + = Data.Text.pack + "traderouting_1.UpdateAccountUserAuthorizationList" + packedMessageDescriptor _ + = "\n\ + \\"UpdateAccountUserAuthorizationList\DC2A\n\ + \\flinks_to_set\CAN\SOH \ETX(\v2\US.traderouting_1.AccountUserLinkR\n\ + \linksToSet\DC27\n\ + \\SIlinks_to_remove\CAN\STX \ETX(\v2\SI.common_1.TupleR\rlinksToRemove" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + linksToSet__field_descriptor + = Data.ProtoLens.FieldDescriptor + "links_to_set" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor AccountUserLink) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"linksToSet")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountUserAuthorizationList + linksToRemove__field_descriptor + = Data.ProtoLens.FieldDescriptor + "links_to_remove" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Proto.CMS.Common1.Tuple) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"linksToRemove")) :: + Data.ProtoLens.FieldDescriptor UpdateAccountUserAuthorizationList + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, linksToSet__field_descriptor), + (Data.ProtoLens.Tag 2, linksToRemove__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountUserAuthorizationList'_unknownFields + (\ x__ y__ + -> x__ {_UpdateAccountUserAuthorizationList'_unknownFields = y__}) + defMessage + = UpdateAccountUserAuthorizationList'_constructor + {_UpdateAccountUserAuthorizationList'linksToSet = Data.Vector.Generic.empty, + _UpdateAccountUserAuthorizationList'linksToRemove = Data.Vector.Generic.empty, + _UpdateAccountUserAuthorizationList'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountUserAuthorizationList + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.CMS.Common1.Tuple + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld AccountUserLink + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountUserAuthorizationList + loop x mutable'linksToRemove mutable'linksToSet + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'linksToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'linksToRemove) + frozen'linksToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'linksToSet) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'linksToRemove") + frozen'linksToRemove + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'linksToSet") frozen'linksToSet + x))) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "links_to_set" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'linksToSet y) + loop x mutable'linksToRemove v + 18 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "links_to_remove" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'linksToRemove y) + loop x v mutable'linksToSet + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'linksToRemove mutable'linksToSet + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'linksToRemove <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + mutable'linksToSet <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop + Data.ProtoLens.defMessage mutable'linksToRemove mutable'linksToSet) + "UpdateAccountUserAuthorizationList" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'linksToSet") _x)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'linksToRemove") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData UpdateAccountUserAuthorizationList where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountUserAuthorizationList'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateAccountUserAuthorizationList'linksToSet x__) + (Control.DeepSeq.deepseq + (_UpdateAccountUserAuthorizationList'linksToRemove x__) ())) +{- | Fields : + -} +data UpdateAccountUserAuthorizationListResult + = UpdateAccountUserAuthorizationListResult'_constructor {_UpdateAccountUserAuthorizationListResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateAccountUserAuthorizationListResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateAccountUserAuthorizationListResult where + messageName _ + = Data.Text.pack + "traderouting_1.UpdateAccountUserAuthorizationListResult" + packedMessageDescriptor _ + = "\n\ + \(UpdateAccountUserAuthorizationListResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateAccountUserAuthorizationListResult'_unknownFields + (\ x__ y__ + -> x__ + {_UpdateAccountUserAuthorizationListResult'_unknownFields = y__}) + defMessage + = UpdateAccountUserAuthorizationListResult'_constructor + {_UpdateAccountUserAuthorizationListResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateAccountUserAuthorizationListResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateAccountUserAuthorizationListResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) + "UpdateAccountUserAuthorizationListResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateAccountUserAuthorizationListResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateAccountUserAuthorizationListResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.balanceId' @:: Lens' UpdateBalanceRecord Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.endCashBalance' @:: Lens' UpdateBalanceRecord Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'endCashBalance' @:: Lens' UpdateBalanceRecord (Prelude.Maybe Prelude.Double)@ + * 'Proto.CMS.Traderouting1_Fields.collateral' @:: Lens' UpdateBalanceRecord Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'collateral' @:: Lens' UpdateBalanceRecord (Prelude.Maybe Prelude.Double)@ -} +data UpdateBalanceRecord + = UpdateBalanceRecord'_constructor {_UpdateBalanceRecord'balanceId :: !Data.Int.Int32, + _UpdateBalanceRecord'endCashBalance :: !(Prelude.Maybe Prelude.Double), + _UpdateBalanceRecord'collateral :: !(Prelude.Maybe Prelude.Double), + _UpdateBalanceRecord'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateBalanceRecord where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateBalanceRecord "balanceId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateBalanceRecord'balanceId + (\ x__ y__ -> x__ {_UpdateBalanceRecord'balanceId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateBalanceRecord "endCashBalance" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateBalanceRecord'endCashBalance + (\ x__ y__ -> x__ {_UpdateBalanceRecord'endCashBalance = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateBalanceRecord "maybe'endCashBalance" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateBalanceRecord'endCashBalance + (\ x__ y__ -> x__ {_UpdateBalanceRecord'endCashBalance = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateBalanceRecord "collateral" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateBalanceRecord'collateral + (\ x__ y__ -> x__ {_UpdateBalanceRecord'collateral = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateBalanceRecord "maybe'collateral" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateBalanceRecord'collateral + (\ x__ y__ -> x__ {_UpdateBalanceRecord'collateral = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateBalanceRecord where + messageName _ = Data.Text.pack "traderouting_1.UpdateBalanceRecord" + packedMessageDescriptor _ + = "\n\ + \\DC3UpdateBalanceRecord\DC2\GS\n\ + \\n\ + \balance_id\CAN\SOH \STX(\DC1R\tbalanceId\DC2(\n\ + \\DLEend_cash_balance\CAN\STX \SOH(\SOHR\SOendCashBalance\DC2\RS\n\ + \\n\ + \collateral\CAN\ETX \SOH(\SOHR\n\ + \collateral" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + balanceId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "balance_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"balanceId")) :: + Data.ProtoLens.FieldDescriptor UpdateBalanceRecord + endCashBalance__field_descriptor + = Data.ProtoLens.FieldDescriptor + "end_cash_balance" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'endCashBalance")) :: + Data.ProtoLens.FieldDescriptor UpdateBalanceRecord + collateral__field_descriptor + = Data.ProtoLens.FieldDescriptor + "collateral" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'collateral")) :: + Data.ProtoLens.FieldDescriptor UpdateBalanceRecord + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, balanceId__field_descriptor), + (Data.ProtoLens.Tag 2, endCashBalance__field_descriptor), + (Data.ProtoLens.Tag 3, collateral__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateBalanceRecord'_unknownFields + (\ x__ y__ -> x__ {_UpdateBalanceRecord'_unknownFields = y__}) + defMessage + = UpdateBalanceRecord'_constructor + {_UpdateBalanceRecord'balanceId = Data.ProtoLens.fieldDefault, + _UpdateBalanceRecord'endCashBalance = Prelude.Nothing, + _UpdateBalanceRecord'collateral = Prelude.Nothing, + _UpdateBalanceRecord'_unknownFields = []} + parseMessage + = let + loop :: + UpdateBalanceRecord + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateBalanceRecord + loop x required'balanceId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'balanceId then (:) "balance_id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "balance_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"balanceId") y x) + Prelude.False + 17 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "end_cash_balance" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"endCashBalance") y x) + required'balanceId + 25 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "collateral" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"collateral") y x) + required'balanceId + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'balanceId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "UpdateBalanceRecord" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"balanceId") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'endCashBalance") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 17) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'collateral") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 25) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData UpdateBalanceRecord where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateBalanceRecord'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateBalanceRecord'balanceId x__) + (Control.DeepSeq.deepseq + (_UpdateBalanceRecord'endCashBalance x__) + (Control.DeepSeq.deepseq + (_UpdateBalanceRecord'collateral x__) ()))) +{- | Fields : + -} +data UpdateBalanceRecordResult + = UpdateBalanceRecordResult'_constructor {_UpdateBalanceRecordResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateBalanceRecordResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateBalanceRecordResult where + messageName _ + = Data.Text.pack "traderouting_1.UpdateBalanceRecordResult" + packedMessageDescriptor _ + = "\n\ + \\EMUpdateBalanceRecordResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateBalanceRecordResult'_unknownFields + (\ x__ y__ + -> x__ {_UpdateBalanceRecordResult'_unknownFields = y__}) + defMessage + = UpdateBalanceRecordResult'_constructor + {_UpdateBalanceRecordResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateBalanceRecordResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateBalanceRecordResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateBalanceRecordResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateBalanceRecordResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateBalanceRecordResult'_unknownFields x__) () +{- | Fields : + + * 'Proto.CMS.Traderouting1_Fields.accountId' @:: Lens' UpdateRiskParameters Data.Int.Int32@ + * 'Proto.CMS.Traderouting1_Fields.liquidationOnly' @:: Lens' UpdateRiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'liquidationOnly' @:: Lens' UpdateRiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.allowFutures' @:: Lens' UpdateRiskParameters Prelude.Bool@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowFutures' @:: Lens' UpdateRiskParameters (Prelude.Maybe Prelude.Bool)@ + * 'Proto.CMS.Traderouting1_Fields.allowOptions' @:: Lens' UpdateRiskParameters Data.Word.Word32@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowOptions' @:: Lens' UpdateRiskParameters (Prelude.Maybe Data.Word.Word32)@ + * 'Proto.CMS.Traderouting1_Fields.allowableMarginCredit' @:: Lens' UpdateRiskParameters Prelude.Double@ + * 'Proto.CMS.Traderouting1_Fields.maybe'allowableMarginCredit' @:: Lens' UpdateRiskParameters (Prelude.Maybe Prelude.Double)@ -} +data UpdateRiskParameters + = UpdateRiskParameters'_constructor {_UpdateRiskParameters'accountId :: !Data.Int.Int32, + _UpdateRiskParameters'liquidationOnly :: !(Prelude.Maybe Prelude.Bool), + _UpdateRiskParameters'allowFutures :: !(Prelude.Maybe Prelude.Bool), + _UpdateRiskParameters'allowOptions :: !(Prelude.Maybe Data.Word.Word32), + _UpdateRiskParameters'allowableMarginCredit :: !(Prelude.Maybe Prelude.Double), + _UpdateRiskParameters'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateRiskParameters where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField UpdateRiskParameters "accountId" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateRiskParameters'accountId + (\ x__ y__ -> x__ {_UpdateRiskParameters'accountId = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateRiskParameters "liquidationOnly" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateRiskParameters'liquidationOnly + (\ x__ y__ -> x__ {_UpdateRiskParameters'liquidationOnly = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateRiskParameters "maybe'liquidationOnly" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateRiskParameters'liquidationOnly + (\ x__ y__ -> x__ {_UpdateRiskParameters'liquidationOnly = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateRiskParameters "allowFutures" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateRiskParameters'allowFutures + (\ x__ y__ -> x__ {_UpdateRiskParameters'allowFutures = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateRiskParameters "maybe'allowFutures" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateRiskParameters'allowFutures + (\ x__ y__ -> x__ {_UpdateRiskParameters'allowFutures = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateRiskParameters "allowOptions" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateRiskParameters'allowOptions + (\ x__ y__ -> x__ {_UpdateRiskParameters'allowOptions = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateRiskParameters "maybe'allowOptions" (Prelude.Maybe Data.Word.Word32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateRiskParameters'allowOptions + (\ x__ y__ -> x__ {_UpdateRiskParameters'allowOptions = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField UpdateRiskParameters "allowableMarginCredit" Prelude.Double where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateRiskParameters'allowableMarginCredit + (\ x__ y__ + -> x__ {_UpdateRiskParameters'allowableMarginCredit = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField UpdateRiskParameters "maybe'allowableMarginCredit" (Prelude.Maybe Prelude.Double) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _UpdateRiskParameters'allowableMarginCredit + (\ x__ y__ + -> x__ {_UpdateRiskParameters'allowableMarginCredit = y__})) + Prelude.id +instance Data.ProtoLens.Message UpdateRiskParameters where + messageName _ + = Data.Text.pack "traderouting_1.UpdateRiskParameters" + packedMessageDescriptor _ + = "\n\ + \\DC4UpdateRiskParameters\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\DC2)\n\ + \\DLEliquidation_only\CAN\STX \SOH(\bR\SIliquidationOnly\DC2#\n\ + \\rallow_futures\CAN\ETX \SOH(\bR\fallowFutures\DC2#\n\ + \\rallow_options\CAN\EOT \SOH(\rR\fallowOptions\DC26\n\ + \\ETBallowable_margin_credit\CAN\ENQ \SOH(\SOHR\NAKallowableMarginCredit" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accountId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "account_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accountId")) :: + Data.ProtoLens.FieldDescriptor UpdateRiskParameters + liquidationOnly__field_descriptor + = Data.ProtoLens.FieldDescriptor + "liquidation_only" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'liquidationOnly")) :: + Data.ProtoLens.FieldDescriptor UpdateRiskParameters + allowFutures__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allow_futures" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowFutures")) :: + Data.ProtoLens.FieldDescriptor UpdateRiskParameters + allowOptions__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allow_options" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowOptions")) :: + Data.ProtoLens.FieldDescriptor UpdateRiskParameters + allowableMarginCredit__field_descriptor + = Data.ProtoLens.FieldDescriptor + "allowable_margin_credit" + (Data.ProtoLens.ScalarField Data.ProtoLens.DoubleField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Double) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'allowableMarginCredit")) :: + Data.ProtoLens.FieldDescriptor UpdateRiskParameters + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accountId__field_descriptor), + (Data.ProtoLens.Tag 2, liquidationOnly__field_descriptor), + (Data.ProtoLens.Tag 3, allowFutures__field_descriptor), + (Data.ProtoLens.Tag 4, allowOptions__field_descriptor), + (Data.ProtoLens.Tag 5, allowableMarginCredit__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateRiskParameters'_unknownFields + (\ x__ y__ -> x__ {_UpdateRiskParameters'_unknownFields = y__}) + defMessage + = UpdateRiskParameters'_constructor + {_UpdateRiskParameters'accountId = Data.ProtoLens.fieldDefault, + _UpdateRiskParameters'liquidationOnly = Prelude.Nothing, + _UpdateRiskParameters'allowFutures = Prelude.Nothing, + _UpdateRiskParameters'allowOptions = Prelude.Nothing, + _UpdateRiskParameters'allowableMarginCredit = Prelude.Nothing, + _UpdateRiskParameters'_unknownFields = []} + parseMessage + = let + loop :: + UpdateRiskParameters + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateRiskParameters + loop x required'accountId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accountId then (:) "account_id" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "account_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accountId") y x) + Prelude.False + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "liquidation_only" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"liquidationOnly") y x) + required'accountId + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "allow_futures" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowFutures") y x) + required'accountId + 32 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "allow_options" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowOptions") y x) + required'accountId + 41 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToDouble + Data.ProtoLens.Encoding.Bytes.getFixed64) + "allowable_margin_credit" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"allowableMarginCredit") y x) + required'accountId + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accountId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) + "UpdateRiskParameters" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord + (Lens.Family2.view (Data.ProtoLens.Field.field @"accountId") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'liquidationOnly") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allowFutures") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allowOptions") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 32) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'allowableMarginCredit") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 41) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putFixed64 + Data.ProtoLens.Encoding.Bytes.doubleToWord _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))) +instance Control.DeepSeq.NFData UpdateRiskParameters where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateRiskParameters'_unknownFields x__) + (Control.DeepSeq.deepseq + (_UpdateRiskParameters'accountId x__) + (Control.DeepSeq.deepseq + (_UpdateRiskParameters'liquidationOnly x__) + (Control.DeepSeq.deepseq + (_UpdateRiskParameters'allowFutures x__) + (Control.DeepSeq.deepseq + (_UpdateRiskParameters'allowOptions x__) + (Control.DeepSeq.deepseq + (_UpdateRiskParameters'allowableMarginCredit x__) ()))))) +{- | Fields : + -} +data UpdateRiskParametersResult + = UpdateRiskParametersResult'_constructor {_UpdateRiskParametersResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show UpdateRiskParametersResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message UpdateRiskParametersResult where + messageName _ + = Data.Text.pack "traderouting_1.UpdateRiskParametersResult" + packedMessageDescriptor _ + = "\n\ + \\SUBUpdateRiskParametersResult" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _UpdateRiskParametersResult'_unknownFields + (\ x__ y__ + -> x__ {_UpdateRiskParametersResult'_unknownFields = y__}) + defMessage + = UpdateRiskParametersResult'_constructor + {_UpdateRiskParametersResult'_unknownFields = []} + parseMessage + = let + loop :: + UpdateRiskParametersResult + -> Data.ProtoLens.Encoding.Bytes.Parser UpdateRiskParametersResult + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "UpdateRiskParametersResult" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData UpdateRiskParametersResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_UpdateRiskParametersResult'_unknownFields x__) () +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\CANCMS/traderouting_1.proto\DC2\SOtraderouting_1\SUB\NAKcommon/shared_1.proto\SUB\DC4common/decimal.proto\SUB\DC2CMS/common_1.proto\SUB\DC1CMS/order_1.proto\"\183\STX\n\ + \\DC3TradeRoutingRequest\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\rR\STXid\DC2W\n\ + \\NAKaccount_scope_request\CAN\STX \SOH(\v2#.traderouting_1.AccountScopeRequestR\DC3accountScopeRequest\DC2Q\n\ + \\DC3order_scope_request\CAN\ETX \SOH(\v2!.traderouting_1.OrderScopeRequestR\DC1orderScopeRequest\DC2d\n\ + \\FSlookup_property_list_request\CAN\EOT \SOH(\v2#.common_1.LookupPropertyListRequestR\EMlookupPropertyListRequest\"\211#\n\ + \\DC3AccountScopeRequest\DC2T\n\ + \\DC4account_info_request\CAN\SOH \SOH(\v2\".traderouting_1.AccountInfoRequestR\DC2accountInfoRequest\DC2]\n\ + \\ETBbalance_records_request\CAN\STX \SOH(\v2%.traderouting_1.BalanceRecordsRequestR\NAKbalanceRecordsRequest\DC2W\n\ + \\NAKcreate_balance_record\CAN\ETX \SOH(\v2#.traderouting_1.CreateBalanceRecordR\DC3createBalanceRecord\DC2W\n\ + \\NAKupdate_balance_record\CAN\EOT \SOH(\v2#.traderouting_1.UpdateBalanceRecordR\DC3updateBalanceRecord\DC2s\n\ + \\USaccount_risk_parameters_request\CAN\ENQ \SOH(\v2,.traderouting_1.AccountRiskParametersRequestR\FSaccountRiskParametersRequest\DC2o\n\ + \\USobsolete_update_risk_parameters\CAN\ACK \SOH(\v2$.traderouting_1.UpdateRiskParametersR\FSobsoleteUpdateRiskParametersB\STX\CAN\SOH\DC2Z\n\ + \\SYNaccount_search_request\CAN\a \SOH(\v2$.traderouting_1.AccountSearchRequestR\DC4accountSearchRequest\DC2d\n\ + \\SUBaccount_route_list_request\CAN\b \SOH(\v2'.traderouting_1.AccountRouteListRequestR\ETBaccountRouteListRequest\DC2\137\SOH\n\ + \'account_user_authorization_list_request\CAN\t \SOH(\v23.traderouting_1.AccountUserAuthorizationListRequestR#accountUserAuthorizationListRequest\DC2`\n\ + \\CANaccount_settings_request\CAN\n\ + \ \SOH(\v2&.traderouting_1.AccountSettingsRequestR\SYNaccountSettingsRequest\DC2\143\SOH\n\ + \)account_available_exchange_groups_request\CAN\v \SOH(\v25.traderouting_1.AccountAvailableExchangeGroupsRequestR%accountAvailableExchangeGroupsRequest\DC2m\n\ + \\GSaccount_market_limits_request\CAN\f \SOH(\v2*.traderouting_1.AccountMarketLimitsRequestR\SUBaccountMarketLimitsRequest\DC2c\n\ + \\EMaccount_positions_request\CAN\r \SOH(\v2'.traderouting_1.AccountPositionsRequestR\ETBaccountPositionsRequest\DC2Z\n\ + \\SYNaccount_equity_request\CAN\SO \SOH(\v2$.traderouting_1.AccountEquityRequestR\DC4accountEquityRequest\DC2f\n\ + \\SUBaccount_collateral_request\CAN\SI \SOH(\v2(.traderouting_1.AccountCollateralRequestR\CANaccountCollateralRequest\DC2A\n\ + \\rclone_account\CAN\DLE \SOH(\v2\FS.traderouting_1.CloneAccountR\fcloneAccount\DC2D\n\ + \\SOupdate_account\CAN\DC1 \SOH(\v2\GS.traderouting_1.UpdateAccountR\rupdateAccount\DC2]\n\ + \\ETBupdate_account_settings\CAN\DC2 \SOH(\v2%.traderouting_1.UpdateAccountSettingsR\NAKupdateAccountSettings\DC2W\n\ + \\NAKaccount_group_request\CAN\DC3 \SOH(\v2#.traderouting_1.AccountGroupRequestR\DC3accountGroupRequest\DC2p\n\ + \\RSupdate_account_risk_parameters\CAN\DC4 \SOH(\v2+.traderouting_1.UpdateAccountRiskParametersR\ESCupdateAccountRiskParameters\DC2\128\SOH\n\ + \$account_available_route_list_request\CAN\NAK \SOH(\v20.traderouting_1.AccountAvailableRouteListRequestR accountAvailableRouteListRequest\DC2a\n\ + \\EMupdate_account_route_list\CAN\SYN \SOH(\v2&.traderouting_1.UpdateAccountRouteListR\SYNupdateAccountRouteList\DC2j\n\ + \\FSupdate_account_market_limits\CAN\ETB \SOH(\v2).traderouting_1.UpdateAccountMarketLimitsR\EMupdateAccountMarketLimits\DC2D\n\ + \\SOcreate_account\CAN\CAN \SOH(\v2\GS.traderouting_1.CreateAccountR\rcreateAccount\DC2r\n\ + \ obsolete_account_cluster_request\CAN\EM \SOH(\v2%.traderouting_1.AccountClusterRequestR\GSobsoleteAccountClusterRequestB\STX\CAN\SOH\DC2o\n\ + \\USobsolete_create_account_cluster\CAN\SUB \SOH(\v2$.traderouting_1.CreateAccountClusterR\FSobsoleteCreateAccountClusterB\STX\CAN\SOH\DC2o\n\ + \\USobsolete_update_account_cluster\CAN\ESC \SOH(\v2$.traderouting_1.UpdateAccountClusterR\FSobsoleteUpdateAccountClusterB\STX\CAN\SOH\DC2\149\SOH\n\ + \-obsolete_update_account_cluster_price_offsets\CAN\FS \SOH(\v20.traderouting_1.UpdateAccountClusterPriceOffsetsR(obsoleteUpdateAccountClusterPriceOffsetsB\STX\CAN\SOH\DC2G\n\ + \\SIrestore_account\CAN\GS \SOH(\v2\RS.traderouting_1.RestoreAccountR\SOrestoreAccount\DC2z\n\ + \\"account_type_override_list_request\CAN\RS \SOH(\v2..traderouting_1.AccountTypeOverrideListRequestR\RSaccountTypeOverrideListRequest\DC2w\n\ + \!update_account_type_override_list\CAN\US \SOH(\v2-.traderouting_1.UpdateAccountTypeOverrideListR\GSupdateAccountTypeOverrideList\DC2\134\SOH\n\ + \&update_account_user_authorization_list\CAN \SOH(\v22.traderouting_1.UpdateAccountUserAuthorizationListR\"updateAccountUserAuthorizationList\DC2D\n\ + \\SOremove_account\CAN! \SOH(\v2\GS.traderouting_1.RemoveAccountR\rremoveAccount\DC2\150\SOH\n\ + \,account_available_service_group_list_request\CAN\" \SOH(\v27.traderouting_1.AccountAvailableServiceGroupListRequestR'accountAvailableServiceGroupListRequest\DC2z\n\ + \\"account_service_group_list_request\CAN# \SOH(\v2..traderouting_1.AccountServiceGroupListRequestR\RSaccountServiceGroupListRequest\DC2w\n\ + \!update_account_service_group_list\CAN$ \SOH(\v2-.traderouting_1.UpdateAccountServiceGroupListR\GSupdateAccountServiceGroupList\DC2p\n\ + \\RSbillable_exchange_list_request\CAN% \SOH(\v2+.traderouting_1.BillableExchangeListRequestR\ESCbillableExchangeListRequest\DC2T\n\ + \\DC4create_account_group\CAN& \SOH(\v2\".traderouting_1.CreateAccountGroupR\DC2createAccountGroup\DC2T\n\ + \\DC4update_account_group\CAN' \SOH(\v2\".traderouting_1.UpdateAccountGroupR\DC2updateAccountGroup\DC2T\n\ + \\DC4remove_account_group\CAN( \SOH(\v2\".traderouting_1.RemoveAccountGroupR\DC2removeAccountGroup\DC2`\n\ + \\CANdelete_account_positions\CAN) \SOH(\v2&.traderouting_1.DeleteAccountPositionsR\SYNdeleteAccountPositions\DC2v\n\ + \ account_trading_features_request\CAN* \SOH(\v2-.traderouting_1.AccountTradingFeaturesRequestR\GSaccountTradingFeaturesRequest\DC2s\n\ + \\USupdate_account_trading_features\CAN+ \SOH(\v2,.traderouting_1.UpdateAccountTradingFeaturesR\FSupdateAccountTradingFeatures\"\228\n\ + \\n\ + \\DC1OrderScopeRequest\DC2W\n\ + \\NAKorder_details_request\CAN\SOH \SOH(\v2#.traderouting_1.OrderDetailsRequestR\DC3orderDetailsRequest\DC22\n\ + \\badd_fill\CAN\STX \SOH(\v2\ETB.traderouting_1.AddFillR\aaddFill\DC2W\n\ + \\NAKcreate_external_order\CAN\ETX \SOH(\v2#.traderouting_1.CreateExternalOrderR\DC3createExternalOrder\DC2T\n\ + \\DC4order_search_request\CAN\EOT \SOH(\v2\".traderouting_1.OrderSearchRequestR\DC2orderSearchRequest\DC2d\n\ + \\SUBrelated_order_tree_request\CAN\ENQ \SOH(\v2'.traderouting_1.RelatedOrderTreeRequestR\ETBrelatedOrderTreeRequest\DC2g\n\ + \\ESCcompound_order_tree_request\CAN\ACK \SOH(\v2(.traderouting_1.CompoundOrderTreeRequestR\CANcompoundOrderTreeRequest\DC2s\n\ + \\USsynthetic_strategy_tree_request\CAN\a \SOH(\v2,.traderouting_1.SyntheticStrategyTreeRequestR\FSsyntheticStrategyTreeRequest\DC2>\n\ + \\fcancel_order\CAN\b \SOH(\v2\ESC.traderouting_1.CancelOrderR\vcancelOrder\DC2a\n\ + \\EMreflect_as_canceled_order\CAN\t \SOH(\v2&.traderouting_1.ReflectAsCanceledOrderR\SYNreflectAsCanceledOrder\DC2d\n\ + \\SUBcancel_compound_order_tree\CAN\n\ + \ \SOH(\v2'.traderouting_1.CancelCompoundOrderTreeR\ETBcancelCompoundOrderTree\DC2n\n\ + \\RSconfirm_order_sent_to_exchange\CAN\v \SOH(\v2*.traderouting_1.ConfirmOrderSentToExchangeR\SUBconfirmOrderSentToExchange\DC2D\n\ + \\SOactivate_order\CAN\f \SOH(\v2\GS.traderouting_1.ActivateOrderR\ractivateOrder\DC2>\n\ + \\fcorrect_fill\CAN\r \SOH(\v2\ESC.traderouting_1.CorrectFillR\vcorrectFill\DC2;\n\ + \\vcancel_fill\CAN\SO \SOH(\v2\SUB.traderouting_1.CancelFillR\n\ + \cancelFill\DC2>\n\ + \\fignore_order\CAN\SI \SOH(\v2\ESC.traderouting_1.IgnoreOrderR\vignoreOrder\DC2S\n\ + \\SYNbatch_orders_operation\CAN\DLE \SOH(\v2\GS.order_1.BatchOrdersOperationR\DC4batchOrdersOperation\"\169\SOH\n\ + \\DC3OrderDetailsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\EM\n\ + \\border_id\CAN\STX \SOH(\tR\aorderId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2,\n\ + \\DC2order_requests_top\CAN\EOT \SOH(\rR\DLEorderRequestsTop\"\188\ETX\n\ + \\aAddFill\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\EM\n\ + \\border_id\CAN\STX \SOH(\tR\aorderId\DC2/\n\ + \\DC1obsolete_quantity\CAN\ETX \SOH(\rR\DLEobsoleteQuantityB\STX\CAN\SOH\DC2\DC4\n\ + \\ENQprice\CAN\EOT \SOH(\SOHR\ENQprice\DC2\"\n\ + \\rfill_utc_time\CAN\ENQ \SOH(\DC2R\vfillUtcTime\DC2#\n\ + \\ris_aggressive\CAN\ACK \SOH(\bR\fisAggressive\DC2#\n\ + \\rdisplay_price\CAN\a \SOH(\DC2R\fdisplayPrice\DC2&\n\ + \\SIopen_close_type\CAN\b \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN\t \SOH(\rR\SIspeculationType\DC2*\n\ + \\DC1trade_location_id\CAN\n\ + \ \SOH(\tR\SItradeLocationId\DC2(\n\ + \\bquantity\CAN\v \SOH(\v2\f.cqg.DecimalR\bquantity\DC2\EM\n\ + \\EOTsync\CAN\f \SOH(\b:\ENQfalseR\EOTsync\"\193\ENQ\n\ + \\DC3CreateExternalOrder\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\ETB\n\ + \\auser_id\CAN\STX \SOH(\tR\ACKuserId\DC2'\n\ + \\SIcontract_symbol\CAN\ETX \SOH(\tR\SOcontractSymbol\DC2\DC2\n\ + \\EOTside\CAN\EOT \SOH(\rR\EOTside\DC2\GS\n\ + \\n\ + \order_type\CAN\ENQ \SOH(\rR\torderType\DC2\US\n\ + \\vlimit_price\CAN\ACK \SOH(\SOHR\n\ + \limitPrice\DC2\GS\n\ + \\n\ + \stop_price\CAN\a \SOH(\SOHR\tstopPrice\DC28\n\ + \\SYNobsolete_fill_quantity\CAN\b \SOH(\rR\DC4obsoleteFillQuantityB\STX\CAN\SOH\DC2\GS\n\ + \\n\ + \fill_price\CAN\t \SOH(\SOHR\tfillPrice\DC2\"\n\ + \\rfill_utc_time\CAN\n\ + \ \SOH(\DC2R\vfillUtcTime\DC2.\n\ + \\DC3display_limit_price\CAN\v \SOH(\DC2R\DC1displayLimitPrice\DC2,\n\ + \\DC2display_stop_price\CAN\f \SOH(\DC2R\DLEdisplayStopPrice\DC2,\n\ + \\DC2display_fill_price\CAN\r \SOH(\DC2R\DLEdisplayFillPrice\DC2&\n\ + \\SIopen_close_type\CAN\SO \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN\SI \SOH(\rR\SIspeculationType\DC2,\n\ + \\DC2fill_is_aggressive\CAN\DLE \SOH(\bR\DLEfillIsAggressive\DC21\n\ + \\rfill_quantity\CAN\DC1 \SOH(\v2\f.cqg.DecimalR\ffillQuantity\DC2\EM\n\ + \\EOTsync\CAN\DC2 \SOH(\b:\ENQfalseR\EOTsync\"\228\ACK\n\ + \\DC2OrderSearchRequest\DC2'\n\ + \\robsolete_text\CAN\SOH \SOH(\tR\fobsoleteTextB\STX\CAN\SOH\DC2<\n\ + \\CANobsolete_search_criteria\CAN\STX \ETX(\rR\SYNobsoleteSearchCriteriaB\STX\CAN\SOH\DC2\DLE\n\ + \\ETXtop\CAN\ETX \SOH(\rR\ETXtop\DC2*\n\ + \\DC1trade_location_id\CAN\EOT \SOH(\tR\SItradeLocationId\DC2\SUB\n\ + \\barchived\CAN\ENQ \SOH(\bR\barchived\DC2=\n\ + \\SOsearch_options\CAN\ACK \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\a \SOH(\b:\ENQfalseR\fallMatchMode\"\160\EOT\n\ + \\SOSearchCriteria\DC2\f\n\ + \\bORDER_ID\DLE\SOH\DC2\DC3\n\ + \\SICLIENT_ORDER_ID\DLE\STX\DC2\DC1\n\ + \\rTICKET_NUMBER\DLE\ETX\DC2\f\n\ + \\bCONTRACT\DLE\EOT\DC2\SO\n\ + \\n\ + \ACCOUNT_ID\DLE\ENQ\DC2\DLE\n\ + \\fACCOUNT_NAME\DLE\ACK\DC2\DC4\n\ + \\DLEBROKERAGE_NUMBER\DLE\a\DC2\r\n\ + \\tUSER_NAME\DLE\b\DC2\SYN\n\ + \\DC2CUSTOMER_LAST_NAME\DLE\t\DC2\ETB\n\ + \\DC3CUSTOMER_FIRST_NAME\DLE\n\ + \\DC2\v\n\ + \\aUSER_ID\DLE\v\DC2\DC2\n\ + \\SOROUTE_ORDER_ID\DLE\f\DC2\EM\n\ + \\NAKROUTE_CLIENT_ORDER_ID\DLE\r\DC2\SO\n\ + \\n\ + \ORDER_GUID\DLE\SO\DC2\SYN\n\ + \\DC2FILL_CARE_ORDER_ID\DLE\SI\DC2\DC2\n\ + \\SOCHAIN_ORDER_ID\DLE\DLE\DC2\ETB\n\ + \\DC3SALES_SERIES_NUMBER\DLE\DC1\DC2\NAK\n\ + \\DC1SALES_SERIES_NAME\DLE\DC2\DC2\DC3\n\ + \\SISALES_SERIES_ID\DLE\DC3\DC2\DC1\n\ + \\rEXCHANGE_NAME\DLE\DC4\DC2\SO\n\ + \\n\ + \ROUTE_CODE\DLE\NAK\DC2\SO\n\ + \\n\ + \ROUTE_NAME\DLE\SYN\DC2\ESC\n\ + \\ETBPROFILE_SALES_SERIES_ID\DLE\ETB\DC2\SYN\n\ + \\DC2BATCH_REQUEST_GUID\DLE\CAN\DC2\EM\n\ + \\NAKCHAIN_ORDER_STATUS_ID\DLE\EM\DC2\DC2\n\ + \\SOORDER_STATE_ID\DLE\SUB\"\171\SOH\n\ + \\ETBRelatedOrderTreeRequest\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2*\n\ + \\DC1trade_location_id\CAN\STX \SOH(\tR\SItradeLocationId\DC2,\n\ + \\DC2order_requests_top\CAN\ETX \SOH(\rR\DLEorderRequestsTop\DC2\DLE\n\ + \\ETXtop\CAN\EOT \SOH(\rR\ETXtop\"\176\SOH\n\ + \\CANCompoundOrderTreeRequest\DC2(\n\ + \\DLEcompound_tree_id\CAN\SOH \SOH(\tR\SOcompoundTreeId\DC2*\n\ + \\DC1trade_location_id\CAN\STX \SOH(\tR\SItradeLocationId\DC2,\n\ + \\DC2order_requests_top\CAN\ETX \SOH(\rR\DLEorderRequestsTop\DC2\DLE\n\ + \\ETXtop\CAN\EOT \SOH(\rR\ETXtop\"y\n\ + \\FSSyntheticStrategyTreeRequest\DC2-\n\ + \\DC3root_chain_order_id\CAN\SOH \SOH(\tR\DLErootChainOrderId\DC2*\n\ + \\DC1trade_location_id\CAN\STX \SOH(\tR\SItradeLocationId\"\153\SOH\n\ + \\vCancelOrder\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\DC1R\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2\EM\n\ + \\EOTsync\CAN\EOT \SOH(\b:\ENQfalseR\EOTsync\"\164\SOH\n\ + \\SYNReflectAsCanceledOrder\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\DC1R\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2\EM\n\ + \\EOTsync\CAN\EOT \SOH(\b:\ENQfalseR\EOTsync\"\169\SOH\n\ + \\ETBCancelCompoundOrderTree\DC2(\n\ + \\DLEcompound_tree_id\CAN\SOH \SOH(\tR\SOcompoundTreeId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\DC1R\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2\EM\n\ + \\EOTsync\CAN\EOT \SOH(\b:\ENQfalseR\EOTsync\"\213\SOH\n\ + \\SUBConfirmOrderSentToExchange\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\tR\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2+\n\ + \\DC2new_route_order_id\CAN\EOT \SOH(\tR\SInewRouteOrderId\DC2\EM\n\ + \\EOTsync\CAN\ENQ \SOH(\b:\ENQfalseR\EOTsync\"\155\SOH\n\ + \\rActivateOrder\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\tR\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2\EM\n\ + \\EOTsync\CAN\EOT \SOH(\b:\ENQfalseR\EOTsync\"\173\STX\n\ + \\vCorrectFill\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\ESC\n\ + \\tfill_type\CAN\STX \SOH(\rR\bfillType\DC2\GS\n\ + \\n\ + \account_id\CAN\ETX \SOH(\tR\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\EOT \SOH(\tR\SItradeLocationId\DC2(\n\ + \\bquantity\CAN\ENQ \SOH(\v2\f.cqg.DecimalR\bquantity\DC2#\n\ + \\rdisplay_price\CAN\ACK \SOH(\DC2R\fdisplayPrice\DC2\EM\n\ + \\EOTsync\CAN\a \SOH(\b:\ENQfalseR\EOTsync\"<\n\ + \\bFillType\DC2\CAN\n\ + \\DC4FILL_TYPE_ORDER_FILL\DLE\SOH\DC2\SYN\n\ + \\DC2FILL_TYPE_LEG_FILL\DLE\STX\"\179\SOH\n\ + \\n\ + \CancelFill\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\ESC\n\ + \\tfill_type\CAN\STX \SOH(\rR\bfillType\DC2\GS\n\ + \\n\ + \account_id\CAN\ETX \SOH(\tR\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\EOT \SOH(\tR\SItradeLocationId\DC2\DC2\n\ + \\EOTbust\CAN\ENQ \SOH(\bR\EOTbust\DC2\EM\n\ + \\EOTsync\CAN\ACK \SOH(\b:\ENQfalseR\EOTsync\"\150\SOH\n\ + \\vIgnoreOrder\DC2$\n\ + \\SOchain_order_id\CAN\SOH \SOH(\tR\fchainOrderId\DC2\GS\n\ + \\n\ + \account_id\CAN\STX \SOH(\tR\taccountId\DC2*\n\ + \\DC1trade_location_id\CAN\ETX \SOH(\tR\SItradeLocationId\DC2\SYN\n\ + \\ACKaction\CAN\EOT \SOH(\bR\ACKaction\"m\n\ + \\DC2AccountInfoRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC28\n\ + \\CANbrokerage_account_number\CAN\STX \SOH(\tR\SYNbrokerageAccountNumber\"q\n\ + \\NAKBalanceRecordsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\SUB\n\ + \\bcurrency\CAN\STX \SOH(\tR\bcurrency\DC2\GS\n\ + \\n\ + \balance_id\CAN\ETX \SOH(\DC1R\tbalanceId\"\220\SOH\n\ + \\DC3CreateBalanceRecord\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\SUB\n\ + \\bcurrency\CAN\STX \SOH(\tR\bcurrency\DC2(\n\ + \\DLEend_cash_balance\CAN\ETX \SOH(\SOHR\SOendCashBalance\DC2\RS\n\ + \\n\ + \collateral\CAN\EOT \SOH(\SOHR\n\ + \collateral\DC2\"\n\ + \\tregulated\CAN\ENQ \SOH(\b:\EOTtrueR\tregulated\DC2\FS\n\ + \\n\ + \as_of_date\CAN\ACK \SOH(\DC2R\basOfDate\"~\n\ + \\DC3UpdateBalanceRecord\DC2\GS\n\ + \\n\ + \balance_id\CAN\SOH \STX(\DC1R\tbalanceId\DC2(\n\ + \\DLEend_cash_balance\CAN\STX \SOH(\SOHR\SOendCashBalance\DC2\RS\n\ + \\n\ + \collateral\CAN\ETX \SOH(\SOHR\n\ + \collateral\"\225\ACK\n\ + \\DC4AccountSearchRequest\DC2'\n\ + \\robsolete_text\CAN\SOH \SOH(\tR\fobsoleteTextB\STX\CAN\SOH\DC2<\n\ + \\CANobsolete_search_criteria\CAN\STX \ETX(\rR\SYNobsoleteSearchCriteriaB\STX\CAN\SOH\DC2\DLE\n\ + \\ETXtop\CAN\ETX \SOH(\rR\ETXtop\DC2.\n\ + \\SIinclude_removed\CAN\EOT \SOH(\b:\ENQfalseR\SOincludeRemoved\DC2=\n\ + \\SOsearch_options\CAN\ENQ \ETX(\v2\SYN.common_1.SearchOptionR\rsearchOptions\DC2+\n\ + \\SOall_match_mode\CAN\ACK \SOH(\b:\ENQfalseR\fallMatchMode\DC2^\n\ + \)include_accounts_from_mapped_sales_series\CAN\a \SOH(\b:\ENQfalseR$includeAccountsFromMappedSalesSeries\"'\n\ + \\DLEAccountGroupRole\DC2\n\ + \\n\ + \\ACKMASTER\DLE\STX\DC2\a\n\ + \\ETXSUB\DLE\ETX\"\170\ETX\n\ + \\SOSearchCriteria\DC2\SO\n\ + \\n\ + \ACCOUNT_ID\DLE\SOH\DC2\DLE\n\ + \\fACCOUNT_NAME\DLE\STX\DC2\DC4\n\ + \\DLEBROKERAGE_NUMBER\DLE\ETX\DC2\US\n\ + \\ESCPROFILE_SALES_SERIES_NUMBER\DLE\EOT\DC2\GS\n\ + \\EMPROFILE_SALES_SERIES_NAME\DLE\ENQ\DC2\DC3\n\ + \\SISALES_SERIES_ID\DLE\ACK\DC2\SI\n\ + \\vCUSTOMER_ID\DLE\a\DC2\DLE\n\ + \\fPROFILE_NAME\DLE\b\DC2\US\n\ + \\ESCOBSOLETE_ACCOUNT_CLUSTER_ID\DLE\t\DC2\ESC\n\ + \\ETBRISK_SERVER_INSTANCE_ID\DLE\n\ + \\DC2\DC4\n\ + \\DLEACCOUNT_GROUP_ID\DLE\v\DC2\SYN\n\ + \\DC2ACCOUNT_GROUP_ROLE\DLE\f\DC2\DLE\n\ + \\fBROKERAGE_ID\DLE\r\DC2\DC1\n\ + \\rACCOUNT_CLASS\DLE\SO\DC2\DC1\n\ + \\rIS_COLLECTION\DLE\SI\DC2\ETB\n\ + \\DC3IS_IN_ACCOUNT_GROUP\DLE\DLE\DC2\SO\n\ + \\n\ + \PROFILE_ID\DLE\DC1\DC2\ESC\n\ + \\ETBPROFILE_SALES_SERIES_ID\DLE\DC2\"8\n\ + \\ETBAccountRouteListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\"\181\SOH\n\ + \#AccountUserAuthorizationListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\ETB\n\ + \\auser_id\CAN\STX \SOH(\tR\ACKuserId\DC2\DLE\n\ + \\ETXtop\CAN\ETX \SOH(\rR\ETXtop\DC2D\n\ + \\RSinclude_implicit_authorization\CAN\EOT \SOH(\bR\FSincludeImplicitAuthorization\"7\n\ + \\SYNAccountSettingsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\"=\n\ + \\FSAccountRiskParametersRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\"\226\SOH\n\ + \\DC4UpdateRiskParameters\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\DC2)\n\ + \\DLEliquidation_only\CAN\STX \SOH(\bR\SIliquidationOnly\DC2#\n\ + \\rallow_futures\CAN\ETX \SOH(\bR\fallowFutures\DC2#\n\ + \\rallow_options\CAN\EOT \SOH(\rR\fallowOptions\DC26\n\ + \\ETBallowable_margin_credit\CAN\ENQ \SOH(\SOHR\NAKallowableMarginCredit\"F\n\ + \%AccountAvailableExchangeGroupsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\";\n\ + \\SUBAccountMarketLimitsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\"d\n\ + \\ETBAccountPositionsRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2*\n\ + \\DC1group_by_contract\CAN\STX \SOH(\bR\SIgroupByContract\"Q\n\ + \\DC4AccountEquityRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\DC2\SUB\n\ + \\bcurrency\CAN\STX \SOH(\tR\bcurrency\"9\n\ + \\CANAccountCollateralRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\"\128\STX\n\ + \\fCloneAccount\DC2*\n\ + \\DC1source_account_id\CAN\SOH \STX(\DC1R\SIsourceAccountId\DC2(\n\ + \\DLEnew_account_name\CAN\STX \STX(\tR\SOnewAccountName\DC2?\n\ + \\FSnew_account_brokerage_number\CAN\ETX \STX(\tR\EMnewAccountBrokerageNumber\DC2-\n\ + \\DC3new_account_user_id\CAN\EOT \SOH(\tR\DLEnewAccountUserId\DC2*\n\ + \\DC1new_account_class\CAN\ENQ \SOH(\rR\SInewAccountClass\"\155\SOH\n\ + \\rUpdateAccount\DC21\n\ + \\aaccount\CAN\SOH \SOH(\v2\ETB.traderouting_1.AccountR\aaccount\DC2W\n\ + \\EMobsolete_original_account\CAN\STX \SOH(\v2\ETB.traderouting_1.AccountR\ETBobsoleteOriginalAccountB\STX\CAN\SOH\"E\n\ + \\NAKAccountClusterRequest\DC2,\n\ + \\DC2account_cluster_id\CAN\SOH \SOH(\tR\DLEaccountClusterId\"t\n\ + \\DC4CreateAccountCluster\DC2\\\n\ + \\CANobsolete_account_cluster\CAN\SOH \SOH(\v2\RS.traderouting_1.AccountClusterR\SYNobsoleteAccountClusterB\STX\CAN\SOH\"\227\SOH\n\ + \\DC4UpdateAccountCluster\DC2\\\n\ + \\CANobsolete_account_cluster\CAN\SOH \SOH(\v2\RS.traderouting_1.AccountClusterR\SYNobsoleteAccountClusterB\STX\CAN\SOH\DC2m\n\ + \!obsolete_original_account_cluster\CAN\STX \SOH(\v2\RS.traderouting_1.AccountClusterR\RSobsoleteOriginalAccountClusterB\STX\CAN\SOH\"\248\SOH\n\ + \ UpdateAccountClusterPriceOffsets\DC2,\n\ + \\DC2account_cluster_id\CAN\SOH \SOH(\tR\DLEaccountClusterId\DC2O\n\ + \\SOoffsets_to_set\CAN\STX \ETX(\v2).traderouting_1.AccountClusterPriceOffsetR\foffsetsToSet\DC2U\n\ + \\DC1offsets_to_remove\CAN\ETX \ETX(\v2).traderouting_1.AccountClusterPriceOffsetR\SIoffsetsToRemove\"\183\SOH\n\ + \\NAKUpdateAccountSettings\DC2;\n\ + \\bsettings\CAN\SOH \SOH(\v2\US.traderouting_1.AccountSettingsR\bsettings\DC2a\n\ + \\SUBobsolete_original_settings\CAN\STX \SOH(\v2\US.traderouting_1.AccountSettingsR\CANobsoleteOriginalSettingsB\STX\CAN\SOH\"^\n\ + \\DC3AccountGroupRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2(\n\ + \\DLEaccount_group_id\CAN\STX \SOH(\tR\SOaccountGroupId\"\244\SOH\n\ + \\ESCUpdateAccountRiskParameters\DC2\GS\n\ + \\n\ + \account_id\CAN\ETX \SOH(\tR\taccountId\DC2G\n\ + \\SIrisk_parameters\CAN\SOH \SOH(\v2\RS.traderouting_1.RiskParametersR\SOriskParameters\DC2m\n\ + \!obsolete_original_risk_parameters\CAN\STX \SOH(\v2\RS.traderouting_1.RiskParametersR\RSobsoleteOriginalRiskParametersB\STX\CAN\SOH\"\178\SOH\n\ + \\SYNUpdateAccountRouteList\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2F\n\ + \\rroutes_to_set\CAN\STX \ETX(\v2\".traderouting_1.AccountRouteRecordR\vroutesToSet\DC21\n\ + \\NAKroute_codes_to_remove\CAN\ETX \ETX(\tR\DC2routeCodesToRemove\"\230\SOH\n\ + \\EMUpdateAccountMarketLimits\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2A\n\ + \\rmarket_limits\CAN\STX \SOH(\v2\FS.traderouting_1.MarketLimitsR\fmarketLimits\DC2g\n\ + \\USobsolete_original_market_limits\CAN\ETX \SOH(\v2\FS.traderouting_1.MarketLimitsR\FSobsoleteOriginalMarketLimitsB\STX\CAN\SOH\"A\n\ + \ AccountAvailableRouteListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\"B\n\ + \\rCreateAccount\DC21\n\ + \\aaccount\CAN\SOH \SOH(\v2\ETB.traderouting_1.AccountR\aaccount\"\197\ETX\n\ + \\DC2TradeRoutingResult\DC2\GS\n\ + \\n\ + \request_id\CAN\SOH \STX(\rR\trequestId\DC2)\n\ + \\DLEoperation_status\CAN\STX \STX(\rR\SIoperationStatus\DC23\n\ + \\rerror_message\CAN\ETX \SOH(\v2\SO.shared_1.TextR\ferrorMessage\DC2T\n\ + \\DC4account_scope_result\CAN\EOT \SOH(\v2\".traderouting_1.AccountScopeResultR\DC2accountScopeResult\DC2N\n\ + \\DC2order_scope_result\CAN\ENQ \SOH(\v2 .traderouting_1.OrderScopeResultR\DLEorderScopeResult\DC2a\n\ + \\ESClookup_property_list_result\CAN\ACK \SOH(\v2\".common_1.LookupPropertyListResultR\CANlookupPropertyListResult\DC2'\n\ + \\SItracking_number\CAN\a \SOH(\EOTR\SOtrackingNumber\"\206\"\n\ + \\DC2AccountScopeResult\DC2Q\n\ + \\DC3account_info_result\CAN\SOH \SOH(\v2!.traderouting_1.AccountInfoResultR\DC1accountInfoResult\DC2Z\n\ + \\SYNbalance_records_result\CAN\STX \SOH(\v2$.traderouting_1.BalanceRecordsResultR\DC4balanceRecordsResult\DC2j\n\ + \\FScreate_balance_record_result\CAN\ETX \SOH(\v2).traderouting_1.CreateBalanceRecordResultR\EMcreateBalanceRecordResult\DC2j\n\ + \\FSupdate_balance_record_result\CAN\EOT \SOH(\v2).traderouting_1.UpdateBalanceRecordResultR\EMupdateBalanceRecordResult\DC2p\n\ + \\RSaccount_risk_parameters_result\CAN\ENQ \SOH(\v2+.traderouting_1.AccountRiskParametersResultR\ESCaccountRiskParametersResult\DC2m\n\ + \\GSupdate_risk_parameters_result\CAN\ACK \SOH(\v2*.traderouting_1.UpdateRiskParametersResultR\SUBupdateRiskParametersResult\DC2W\n\ + \\NAKaccount_search_result\CAN\a \SOH(\v2#.traderouting_1.AccountSearchResultR\DC3accountSearchResult\DC2a\n\ + \\EMaccount_route_list_result\CAN\b \SOH(\v2&.traderouting_1.AccountRouteListResultR\SYNaccountRouteListResult\DC2\134\SOH\n\ + \&account_user_authorization_list_result\CAN\t \SOH(\v22.traderouting_1.AccountUserAuthorizationListResultR\"accountUserAuthorizationListResult\DC2]\n\ + \\ETBaccount_settings_result\CAN\n\ + \ \SOH(\v2%.traderouting_1.AccountSettingsResultR\NAKaccountSettingsResult\DC2p\n\ + \\RSaccount_exchange_groups_result\CAN\v \SOH(\v2+.traderouting_1.AccountExchangeGroupsResultR\ESCaccountExchangeGroupsResult\DC2j\n\ + \\FSaccount_market_limits_result\CAN\f \SOH(\v2).traderouting_1.AccountMarketLimitsResultR\EMaccountMarketLimitsResult\DC2`\n\ + \\CANaccount_positions_result\CAN\r \SOH(\v2&.traderouting_1.AccountPositionsResultR\SYNaccountPositionsResult\DC2W\n\ + \\NAKaccount_equity_result\CAN\SO \SOH(\v2#.traderouting_1.AccountEquityResultR\DC3accountEquityResult\DC2c\n\ + \\EMaccount_collateral_result\CAN\SI \SOH(\v2'.traderouting_1.AccountCollateralResultR\ETBaccountCollateralResult\DC2T\n\ + \\DC4clone_account_result\CAN\DLE \SOH(\v2\".traderouting_1.CloneAccountResultR\DC2cloneAccountResult\DC2W\n\ + \\NAKupdate_account_result\CAN\DC1 \SOH(\v2#.traderouting_1.UpdateAccountResultR\DC3updateAccountResult\DC2p\n\ + \\RSupdate_account_settings_result\CAN\DC2 \SOH(\v2+.traderouting_1.UpdateAccountSettingsResultR\ESCupdateAccountSettingsResult\DC2T\n\ + \\DC4account_group_result\CAN\DC3 \SOH(\v2\".traderouting_1.AccountGroupResultR\DC2accountGroupResult\DC2\131\SOH\n\ + \%update_account_risk_parameters_result\CAN\DC4 \SOH(\v21.traderouting_1.UpdateAccountRiskParametersResultR!updateAccountRiskParametersResult\DC2}\n\ + \#account_available_route_list_result\CAN\NAK \SOH(\v2/.traderouting_1.AccountAvailableRouteListResultR\USaccountAvailableRouteListResult\DC2t\n\ + \ update_account_route_list_result\CAN\SYN \SOH(\v2,.traderouting_1.UpdateAccountRouteListResultR\FSupdateAccountRouteListResult\DC2}\n\ + \#update_account_market_limits_result\CAN\ETB \SOH(\v2/.traderouting_1.UpdateAccountMarketLimitsResultR\USupdateAccountMarketLimitsResult\DC2W\n\ + \\NAKcreate_account_result\CAN\CAN \SOH(\v2#.traderouting_1.CreateAccountResultR\DC3createAccountResult\DC2o\n\ + \\USobsolete_account_cluster_result\CAN\EM \SOH(\v2$.traderouting_1.AccountClusterResultR\FSobsoleteAccountClusterResultB\STX\CAN\SOH\DC2\130\SOH\n\ + \&obsolete_create_account_cluster_result\CAN\SUB \SOH(\v2*.traderouting_1.CreateAccountClusterResultR\"obsoleteCreateAccountClusterResultB\STX\CAN\SOH\DC2\130\SOH\n\ + \&obsolete_update_account_cluster_result\CAN\ESC \SOH(\v2*.traderouting_1.UpdateAccountClusterResultR\"obsoleteUpdateAccountClusterResultB\STX\CAN\SOH\DC2\168\SOH\n\ + \4obsolete_update_account_cluster_price_offsets_result\CAN\FS \SOH(\v26.traderouting_1.UpdateAccountClusterPriceOffsetsResultR.obsoleteUpdateAccountClusterPriceOffsetsResultB\STX\CAN\SOH\DC2Z\n\ + \\SYNrestore_account_result\CAN\GS \SOH(\v2$.traderouting_1.RestoreAccountResultR\DC4restoreAccountResult\DC2w\n\ + \!account_type_override_list_result\CAN\RS \SOH(\v2-.traderouting_1.AccountTypeOverrideListResultR\GSaccountTypeOverrideListResult\DC2\138\SOH\n\ + \(update_account_type_override_list_result\CAN\US \SOH(\v23.traderouting_1.UpdateAccountTypeOverrideListResultR#updateAccountTypeOverrideListResult\DC2\153\SOH\n\ + \-update_account_user_authorization_list_result\CAN \SOH(\v28.traderouting_1.UpdateAccountUserAuthorizationListResultR(updateAccountUserAuthorizationListResult\DC2W\n\ + \\NAKremove_account_result\CAN! \SOH(\v2#.traderouting_1.RemoveAccountResultR\DC3removeAccountResult\DC2\147\SOH\n\ + \+account_available_service_group_list_result\CAN\" \SOH(\v26.traderouting_1.AccountAvailableServiceGroupListResultR&accountAvailableServiceGroupListResult\DC2w\n\ + \!account_service_group_list_result\CAN# \SOH(\v2-.traderouting_1.AccountServiceGroupListResultR\GSaccountServiceGroupListResult\DC2\138\SOH\n\ + \(update_account_service_group_list_result\CAN$ \SOH(\v23.traderouting_1.UpdateAccountServiceGroupListResultR#updateAccountServiceGroupListResult\DC2m\n\ + \\GSbillable_exchange_list_result\CAN% \SOH(\v2*.traderouting_1.BillableExchangeListResultR\SUBbillableExchangeListResult\DC2g\n\ + \\ESCcreate_account_group_result\CAN& \SOH(\v2(.traderouting_1.CreateAccountGroupResultR\CANcreateAccountGroupResult\DC2s\n\ + \\USaccount_trading_features_result\CAN' \SOH(\v2,.traderouting_1.AccountTradingFeaturesResultR\FSaccountTradingFeaturesResult\"\211\b\n\ + \\DLEOrderScopeResult\DC2T\n\ + \\DC4order_details_result\CAN\SOH \SOH(\v2\".traderouting_1.OrderDetailsResultR\DC2orderDetailsResult\DC2E\n\ + \\SIadd_fill_result\CAN\STX \SOH(\v2\GS.traderouting_1.AddFillResultR\raddFillResult\DC2j\n\ + \\FScreate_external_order_result\CAN\ETX \SOH(\v2).traderouting_1.CreateExternalOrderResultR\EMcreateExternalOrderResult\DC2Q\n\ + \\DC3order_search_result\CAN\EOT \SOH(\v2!.traderouting_1.OrderSearchResultR\DC1orderSearchResult\DC2a\n\ + \\EMrelated_order_tree_result\CAN\ENQ \SOH(\v2&.traderouting_1.RelatedOrderTreeResultR\SYNrelatedOrderTreeResult\DC2d\n\ + \\SUBcompound_order_tree_result\CAN\ACK \SOH(\v2'.traderouting_1.CompoundOrderTreeResultR\ETBcompoundOrderTreeResult\DC2p\n\ + \\RSsynthetic_strategy_tree_result\CAN\a \SOH(\v2+.traderouting_1.SyntheticStrategyTreeResultR\ESCsyntheticStrategyTreeResult\DC2Q\n\ + \\DC3cancel_order_result\CAN\b \SOH(\v2!.traderouting_1.CancelOrderResultR\DC1cancelOrderResult\DC2t\n\ + \ reflect_as_canceled_order_result\CAN\t \SOH(\v2,.traderouting_1.ReflectAsCanceledOrderResultR\FSreflectAsCanceledOrderResult\DC2w\n\ + \!cancel_compound_order_tree_result\CAN\n\ + \ \SOH(\v2-.traderouting_1.CancelCompoundOrderTreeResultR\GScancelCompoundOrderTreeResult\DC2f\n\ + \\GSbatch_orders_operation_result\CAN\v \SOH(\v2#.order_1.BatchOrdersOperationResultR\SUBbatchOrdersOperationResult\"x\n\ + \\DC2OrderDetailsResult\DC2;\n\ + \\vorder_chain\CAN\SOH \STX(\v2\SUB.traderouting_1.OrderChainR\n\ + \orderChain\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete\"\SI\n\ + \\rAddFillResult\"b\n\ + \\EMCreateExternalOrderResult\DC2\EM\n\ + \\border_id\CAN\ETX \SOH(\tR\aorderId\DC2*\n\ + \\DC1trade_location_id\CAN\EOT \SOH(\tR\SItradeLocationId\"\134\SOH\n\ + \\DC1OrderSearchResult\DC2J\n\ + \\forder_record\CAN\SOH \ETX(\v2'.traderouting_1.OrderSearchResultRecordR\vorderRecord\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete\"\130\SOH\n\ + \\SYNRelatedOrderTreeResult\DC2A\n\ + \\rrelated_order\CAN\SOH \SOH(\v2\FS.traderouting_1.RelatedOrderR\frelatedOrder\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete\"\134\SOH\n\ + \\ETBCompoundOrderTreeResult\DC2D\n\ + \\SOcompound_order\CAN\SOH \SOH(\v2\GS.traderouting_1.CompoundOrderR\rcompoundOrder\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete\"s\n\ + \\ESCSyntheticStrategyTreeResult\DC2/\n\ + \\EOTlegs\CAN\SOH \ETX(\v2\ESC.traderouting_1.StrategyLegR\EOTlegs\DC2#\n\ + \\rstrategy_name\CAN\STX \SOH(\tR\fstrategyName\"\DC3\n\ + \\DC1CancelOrderResult\"\RS\n\ + \\FSReflectAsCanceledOrderResult\"\US\n\ + \\GSCancelCompoundOrderTreeResult\"F\n\ + \\DC1AccountInfoResult\DC21\n\ + \\aaccount\CAN\SOH \STX(\v2\ETB.traderouting_1.AccountR\aaccount\"\\\n\ + \\DC4BalanceRecordsResult\DC2D\n\ + \\SObalance_record\CAN\SOH \ETX(\v2\GS.traderouting_1.BalanceRecordR\rbalanceRecord\"G\n\ + \\EMCreateBalanceRecordResult\DC2*\n\ + \\DC1balance_record_id\CAN\ETX \STX(\DC1R\SIbalanceRecordId\"\ESC\n\ + \\EMUpdateBalanceRecordResult\"\142\SOH\n\ + \\DC3AccountSearchResult\DC2P\n\ + \\SOaccount_record\CAN\SOH \ETX(\v2).traderouting_1.AccountSearchResultRecordR\raccountRecord\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete\"n\n\ + \\SYNAccountRouteListResult\DC2T\n\ + \\DC4account_route_record\CAN\SOH \ETX(\v2\".traderouting_1.AccountRouteRecordR\DC2accountRouteRecord\"\152\SOH\n\ + \\"AccountUserAuthorizationListResult\DC2K\n\ + \\DC1account_user_link\CAN\SOH \ETX(\v2\US.traderouting_1.AccountUserLinkR\SIaccountUserLink\DC2%\n\ + \\vis_complete\CAN\STX \SOH(\b:\EOTtrueR\n\ + \isComplete\"c\n\ + \\NAKAccountSettingsResult\DC2J\n\ + \\DLEaccount_settings\CAN\SOH \STX(\v2\US.traderouting_1.AccountSettingsR\SIaccountSettings\"u\n\ + \\ESCAccountRiskParametersResult\DC2V\n\ + \\ETBaccount_risk_parameters\CAN\SOH \SOH(\v2\RS.traderouting_1.RiskParametersR\NAKaccountRiskParameters\"\FS\n\ + \\SUBUpdateRiskParametersResult\"\172\SOH\n\ + \\ESCAccountExchangeGroupsResult\DC2D\n\ + \\SOexchange_group\CAN\SOH \ETX(\v2\GS.traderouting_1.ExchangeGroupR\rexchangeGroup\DC2G\n\ + \\SIinstrument_type\CAN\STX \ETX(\v2\RS.traderouting_1.InstrumentTypeR\SOinstrumentType\"m\n\ + \\EMAccountMarketLimitsResult\DC2P\n\ + \\NAKaccount_market_limits\CAN\SOH \STX(\v2\FS.traderouting_1.MarketLimitsR\DC3accountMarketLimits\"g\n\ + \\SYNAccountPositionsResult\DC2M\n\ + \\DC1contract_position\CAN\SOH \ETX(\v2 .traderouting_1.ContractPositionR\DLEcontractPosition\"E\n\ + \\DC3AccountEquityResult\DC2.\n\ + \\ACKequity\CAN\SOH \STX(\v2\SYN.traderouting_1.EquityR\ACKequity\"U\n\ + \\ETBAccountCollateralResult\DC2:\n\ + \\n\ + \collateral\CAN\SOH \STX(\v2\SUB.traderouting_1.CollateralR\n\ + \collateral\":\n\ + \\DC2CloneAccountResult\DC2$\n\ + \\SOnew_account_id\CAN\SOH \STX(\DC1R\fnewAccountId\"\NAK\n\ + \\DC3UpdateAccountResult\"\GS\n\ + \\ESCUpdateAccountSettingsResult\"U\n\ + \\DC2AccountGroupResult\DC2?\n\ + \\facount_group\CAN\SOH \SOH(\v2\FS.traderouting_1.AccountGroupR\vacountGroup\"#\n\ + \!UpdateAccountRiskParametersResult\"Y\n\ + \\USAccountAvailableRouteListResult\DC26\n\ + \\ACKroutes\CAN\SOH \ETX(\v2\RS.traderouting_1.AvailableRouteR\ACKroutes\"\RS\n\ + \\FSUpdateAccountRouteListResult\"!\n\ + \\USUpdateAccountMarketLimitsResult\"%\n\ + \\DC3CreateAccountResult\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\"\248\SOH\n\ + \\DC4AccountClusterResult\DC2\\\n\ + \\CANobsolete_account_cluster\CAN\SOH \SOH(\v2\RS.traderouting_1.AccountClusterR\SYNobsoleteAccountClusterB\STX\CAN\SOH\DC2\129\SOH\n\ + \&obsolete_account_cluster_price_offsets\CAN\STX \ETX(\v2).traderouting_1.AccountClusterPriceOffsetR\"obsoleteAccountClusterPriceOffsetsB\STX\CAN\SOH\",\n\ + \\SUBCreateAccountClusterResult\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\"\FS\n\ + \\SUBUpdateAccountClusterResult\"(\n\ + \&UpdateAccountClusterPriceOffsetsResult\"\175\SYN\n\ + \\n\ + \OrderChain\DC2$\n\ + \\SOchain_order_id\CAN\SOH \STX(\tR\fchainOrderId\DC2\EM\n\ + \\border_id\CAN\STX \STX(\tR\aorderId\DC21\n\ + \\NAKchain_orig_account_id\CAN\EOT \STX(\DC1R\DC2chainOrigAccountId\DC2,\n\ + \\DC2submitted_utc_time\CAN\ENQ \STX(\DC2R\DLEsubmittedUtcTime\DC2'\n\ + \\SIcontract_symbol\CAN\ACK \STX(\tR\SOcontractSymbol\DC2\DC2\n\ + \\EOTside\CAN\a \STX(\rR\EOTside\DC2'\n\ + \\robsolete_size\CAN\b \SOH(\rR\fobsoleteSizeB\STX\CAN\SOH\DC2\US\n\ + \\vlimit_price\CAN\t \SOH(\SOHR\n\ + \limitPrice\DC2\GS\n\ + \\n\ + \stop_price\CAN\n\ + \ \SOH(\SOHR\tstopPrice\DC2)\n\ + \\DLEexec_instruction\CAN\v \ETX(\rR\SIexecInstruction\DC2\SUB\n\ + \\bduration\CAN\f \STX(\rR\bduration\DC2$\n\ + \\SOgood_thru_date\CAN\r \SOH(\DC2R\fgoodThruDate\DC2+\n\ + \\DC2good_thru_utc_time\CAN\SO \SOH(\DC2R\SIgoodThruUtcTime\DC2\SYN\n\ + \\ACKstatus\CAN\SI \STX(\rR\ACKstatus\DC2\GS\n\ + \\n\ + \order_type\CAN\DLE \STX(\rR\torderType\DC2A\n\ + \\rorder_request\CAN\DC1 \ETX(\v2\FS.traderouting_1.OrderRequestR\forderRequest\DC28\n\ + \\n\ + \order_fill\CAN\DC2 \ETX(\v2\EM.traderouting_1.OrderFillR\torderFill\DC2#\n\ + \\rorder_classes\CAN\DC3 \ETX(\tR\forderClasses\DC2.\n\ + \\DC3display_limit_price\CAN\DC4 \SOH(\DC2R\DC1displayLimitPrice\DC2,\n\ + \\DC2display_stop_price\CAN\NAK \SOH(\DC2R\DLEdisplayStopPrice\DC24\n\ + \\SYNexecution_account_name\CAN\SYN \SOH(\tR\DC4executionAccountName\DC29\n\ + \\btrailing\CAN\ETB \SOH(\v2\GS.traderouting_1.OrderTrailingR\btrailing\DC20\n\ + \\ENQsizes\CAN\CAN \SOH(\v2\SUB.traderouting_1.OrderSizesR\ENQsizes\DC28\n\ + \\baccounts\CAN\EM \ETX(\v2\FS.traderouting_1.ChainAccountR\baccounts\DC2(\n\ + \\DLEcompound_tree_id\CAN\SUB \SOH(\tR\SOcompoundTreeId\DC2-\n\ + \\DC3root_chain_order_id\CAN\ESC \SOH(\tR\DLErootChainOrderId\DC2\CAN\n\ + \\achecked\CAN\FS \SOH(\bR\achecked\DC2-\n\ + \\DC2trading_expression\CAN\GS \SOH(\tR\DC1tradingExpression\DC24\n\ + \\EOTlegs\CAN\RS \ETX(\v2 .traderouting_1.OrderContractLegR\EOTlegs\DC21\n\ + \\DC4contract_description\CAN\US \SOH(\tR\DC3contractDescription\DC28\n\ + \\SIuser_attributes\CAN \ETX(\v2\SI.common_1.TupleR\SOuserAttributes\DC20\n\ + \\DC4client_algo_strategy\CAN! \SOH(\tR\DC2clientAlgoStrategy\DC2#\n\ + \\ralgo_strategy\CAN\" \SOH(\tR\falgoStrategy\DC20\n\ + \\ENQroute\CAN# \SOH(\v2\SUB.traderouting_1.OrderRouteR\ENQroute\DC2'\n\ + \\SIexpiration_time\CAN$ \SOH(\DC2R\SOexpirationTime\DC2&\n\ + \\SIopen_close_type\CAN% \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN& \SOH(\rR\SIspeculationType\DC2\SUB\n\ + \\barchived\CAN' \SOH(\bR\barchived\DC2/\n\ + \\DC4order_id_at_exchange\CAN( \SOH(\tR\DC1orderIdAtExchange\DC2F\n\ + \\GSobsolete_discretionary_offset\CAN) \SOH(\rR\ESCobsoleteDiscretionaryOffsetB\STX\CAN\SOH\DC2 \n\ + \\EOTsize\CAN* \SOH(\v2\f.cqg.DecimalR\EOTsize\DC2#\n\ + \\rextended_side\CAN+ \SOH(\rR\fextendedSide\DC2\ESC\n\ + \\tlocate_id\CAN, \SOH(\tR\blocateId\DC2C\n\ + \\NAKexchange_extra_values\CAN- \ETX(\v2\SI.common_1.TupleR\DC3exchangeExtraValues\DC2H\n\ + \!is_excluded_from_risk_calculation\CAN. \SOH(\bR\GSisExcludedFromRiskCalculation\"\EM\n\ + \\EOTSide\DC2\a\n\ + \\ETXBUY\DLE\SOH\DC2\b\n\ + \\EOTSELL\DLE\STX\":\n\ + \\tOrderType\DC2\a\n\ + \\ETXMKT\DLE\SOH\DC2\a\n\ + \\ETXLMT\DLE\STX\DC2\a\n\ + \\ETXSTP\DLE\ETX\DC2\a\n\ + \\ETXSTL\DLE\EOT\DC2\t\n\ + \\ENQCROSS\DLE\ENQ\"\143\STX\n\ + \\SIExecInstruction\DC2\a\n\ + \\ETXAON\DLE\SOH\DC2\v\n\ + \\aICEBERG\DLE\STX\DC2\ACK\n\ + \\STXQT\DLE\ETX\DC2\t\n\ + \\ENQTRAIL\DLE\EOT\DC2\n\ + \\n\ + \\ACKFUNARI\DLE\ENQ\DC2\a\n\ + \\ETXMIT\DLE\ACK\DC2\a\n\ + \\ETXMLM\DLE\a\DC2\a\n\ + \\ETXMTL\DLE\b\DC2\v\n\ + \\aAUCTION\DLE\t\DC2\f\n\ + \\bPOSTONLY\DLE\n\ + \\DC2\ETB\n\ + \\DC3OBSOLETE_DISCRETION\DLE\v\DC2\DLE\n\ + \\fAT_ANY_PRICE\DLE\f\DC2!\n\ + \\GSLIMIT_PREARRANGED_TRANSACTION\DLE\r\DC2\r\n\ + \\tNNE_CROSS\DLE\SO\DC2\v\n\ + \\aNNE_APA\DLE\SI\DC2\SO\n\ + \\n\ + \NND_CROSSO\DLE\DLE\DC2\SO\n\ + \\n\ + \NND_CROSSC\DLE\DC1\DC2\a\n\ + \\ETXICO\DLE\DC2\"R\n\ + \\bDuration\DC2\a\n\ + \\ETXDAY\DLE\SOH\DC2\a\n\ + \\ETXGTC\DLE\STX\DC2\a\n\ + \\ETXGTD\DLE\ETX\DC2\a\n\ + \\ETXGTT\DLE\EOT\DC2\a\n\ + \\ETXFAK\DLE\ENQ\DC2\a\n\ + \\ETXFOK\DLE\ACK\DC2\a\n\ + \\ETXATO\DLE\a\DC2\a\n\ + \\ETXATC\DLE\b\"\163\STX\n\ + \\ACKStatus\DC2\r\n\ + \\tUNDEFINED\DLE\NUL\DC2\SO\n\ + \\n\ + \IN_TRANSIT\DLE\SOH\DC2\f\n\ + \\bREJECTED\DLE\STX\DC2\v\n\ + \\aWORKING\DLE\ETX\DC2\v\n\ + \\aEXPIRED\DLE\EOT\DC2\r\n\ + \\tIN_CANCEL\DLE\ENQ\DC2\r\n\ + \\tIN_MODIFY\DLE\ACK\DC2\r\n\ + \\tCANCELLED\DLE\a\DC2\n\ + \\n\ + \\ACKFILLED\DLE\b\DC2\r\n\ + \\tSUSPENDED\DLE\t\DC2\DLE\n\ + \\fDISCONNECTED\DLE\n\ + \\DC2\r\n\ + \\tACTIVE_AT\DLE\v\DC2\DC4\n\ + \\DLEAPPROVE_REQUIRED\DLE\f\DC2\f\n\ + \\bAPPROVED\DLE\r\DC2\DC4\n\ + \\DLEAPPROVE_REJECTED\DLE\SO\DC2\v\n\ + \\aMATCHED\DLE\SI\DC2\DLE\n\ + \\fPART_MATCHED\DLE\DLE\DC2\DLE\n\ + \\fTRADE_BROKEN\DLE\DC1\"8\n\ + \\rOpenCloseType\DC2\b\n\ + \\EOTOPEN\DLE\SOH\DC2\t\n\ + \\ENQCLOSE\DLE\STX\DC2\DC2\n\ + \\SOCLOSE_PREVIOUS\DLE\ETX\"<\n\ + \\SISpeculationType\DC2\SI\n\ + \\vSPECULATION\DLE\SOH\DC2\t\n\ + \\ENQHEDGE\DLE\STX\DC2\r\n\ + \\tARBITRAGE\DLE\ETX\"\138\SOH\n\ + \\fChainAccount\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2!\n\ + \\faccount_name\CAN\STX \SOH(\tR\vaccountName\DC28\n\ + \\CANbrokerage_account_number\CAN\ETX \SOH(\tR\SYNbrokerageAccountNumber\"O\n\ + \\n\ + \OrderRoute\DC2\DC2\n\ + \\EOTcode\CAN\SOH \SOH(\tR\EOTcode\DC2\DC2\n\ + \\EOTname\CAN\STX \SOH(\tR\EOTname\DC2\EM\n\ + \\border_id\CAN\ETX \SOH(\tR\aorderId\"\244\SOH\n\ + \\DLEOrderContractLeg\DC2\SYN\n\ + \\ACKnumber\CAN\SOH \SOH(\rR\ACKnumber\DC2'\n\ + \\robsolete_size\CAN\STX \SOH(\rR\fobsoleteSizeB\STX\CAN\SOH\DC2\DC2\n\ + \\EOTside\CAN\ETX \SOH(\rR\EOTside\DC2'\n\ + \\SIcontract_symbol\CAN\EOT \SOH(\tR\SOcontractSymbol\DC2 \n\ + \\EOTsize\CAN\ENQ \SOH(\v2\f.cqg.DecimalR\EOTsize\DC2#\n\ + \\rextended_side\CAN\ACK \SOH(\rR\fextendedSide\DC2\ESC\n\ + \\tlocate_id\CAN\a \SOH(\tR\blocateId\"\194\STX\n\ + \\DC2AccountAndUserInfo\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\DC2\ESC\n\ + \\tuser_info\CAN\STX \STX(\tR\buserInfo\DC2%\n\ + \\SOreject_details\CAN\ETX \SOH(\tR\rrejectDetails\DC26\n\ + \\ETBreject_details_internal\CAN\EOT \SOH(\tR\NAKrejectDetailsInternal\DC2\ETB\n\ + \\auser_id\CAN\ENQ \SOH(\tR\ACKuserId\DC2\ESC\n\ + \\tuser_name\CAN\ACK \SOH(\tR\buserName\DC2!\n\ + \\faccount_name\CAN\a \SOH(\tR\vaccountName\DC28\n\ + \\CANbrokerage_account_number\CAN\b \SOH(\tR\SYNbrokerageAccountNumber\"\179\SI\n\ + \\fOrderRequest\DC2\EM\n\ + \\border_id\CAN\SOH \STX(\tR\aorderId\DC2,\n\ + \\DC2submitted_utc_time\CAN\STX \STX(\DC2R\DLEsubmittedUtcTime\DC2!\n\ + \\frequest_type\CAN\ETX \STX(\rR\vrequestType\DC2\GS\n\ + \\n\ + \order_type\CAN\EOT \SOH(\rR\torderType\DC2'\n\ + \\robsolete_size\CAN\ACK \SOH(\rR\fobsoleteSizeB\STX\CAN\SOH\DC2\US\n\ + \\vlimit_price\CAN\a \SOH(\SOHR\n\ + \limitPrice\DC2\GS\n\ + \\n\ + \stop_price\CAN\b \SOH(\SOHR\tstopPrice\DC2\SUB\n\ + \\bduration\CAN\t \SOH(\rR\bduration\DC2$\n\ + \\SOgood_thru_date\CAN\n\ + \ \SOH(\DC2R\fgoodThruDate\DC2+\n\ + \\DC2good_thru_utc_time\CAN\v \SOH(\DC2R\SIgoodThruUtcTime\DC2\DC4\n\ + \\ENQstate\CAN\f \STX(\rR\ENQstate\DC2\"\n\ + \\rlink_order_id\CAN\r \SOH(\tR\vlinkOrderId\DC2U\n\ + \\DC2transaction_status\CAN\SO \ETX(\v2&.traderouting_1.OrderTransactionStatusR\DC1transactionStatus\DC2U\n\ + \\NAKaccount_and_user_info\CAN\SI \ETX(\v2\".traderouting_1.AccountAndUserInfoR\DC2accountAndUserInfo\DC2.\n\ + \\DC3display_limit_price\CAN\DLE \SOH(\DC2R\DC1displayLimitPrice\DC2,\n\ + \\DC2display_stop_price\CAN\DC1 \SOH(\DC2R\DLEdisplayStopPrice\DC29\n\ + \\btrailing\CAN\DC3 \SOH(\v2\GS.traderouting_1.OrderTrailingR\btrailing\DC20\n\ + \\ENQsizes\CAN\DC4 \SOH(\v2\SUB.traderouting_1.OrderSizesR\ENQsizes\DC2#\n\ + \\rticket_number\CAN\NAK \SOH(\tR\fticketNumber\DC2\SUB\n\ + \\bcomments\CAN\SYN \SOH(\tR\bcomments\DC2#\n\ + \\rorder_classes\CAN\ETB \ETX(\tR\forderClasses\DC2*\n\ + \\DC1native_order_type\CAN\CAN \SOH(\rR\SInativeOrderType\DC2'\n\ + \\SIactivation_time\CAN\EM \SOH(\DC2R\SOactivationTime\DC2'\n\ + \\SIsuspension_time\CAN\SUB \SOH(\DC2R\SOsuspensionTime\DC2'\n\ + \\SIexpiration_time\CAN\ESC \SOH(\DC2R\SOexpirationTime\DC22\n\ + \\ACKroutes\CAN\FS \ETX(\v2\SUB.traderouting_1.OrderRouteR\ACKroutes\DC2C\n\ + \\RSclient_regulatory_algorithm_id\CAN\GS \SOH(\tR\ESCclientRegulatoryAlgorithmId\DC2I\n\ + \!effective_regulatory_algorithm_id\CAN\RS \SOH(\tR\RSeffectiveRegulatoryAlgorithmId\DC2S\n\ + \\DC3operational_details\CAN\" \SOH(\v2\".traderouting_1.OperationalDetailsR\DC2operationalDetails\DC2\"\n\ + \\finstructions\CAN# \SOH(\tR\finstructions\DC2?\n\ + \\DC3client_extra_values\CAN$ \ETX(\v2\SI.common_1.TupleR\DC1clientExtraValues\DC21\n\ + \\NAKroute_client_order_id\CAN% \SOH(\tR\DC2routeClientOrderId\DC2F\n\ + \\GSobsolete_discretionary_offset\CAN& \SOH(\rR\ESCobsoleteDiscretionaryOffsetB\STX\CAN\SOH\DC2)\n\ + \\DLEexec_instruction\CAN' \ETX(\rR\SIexecInstruction\DC2 \n\ + \\EOTsize\CAN( \SOH(\v2\f.cqg.DecimalR\EOTsize\DC22\n\ + \\NAKexecution_source_code\CAN) \SOH(\tR\DC3executionSourceCode\DC2#\n\ + \\rextended_side\CAN* \SOH(\rR\fextendedSide\DC2\ESC\n\ + \\tlocate_id\CAN+ \SOH(\tR\blocateId\"1\n\ + \\vRequestType\DC2\t\n\ + \\ENQPLACE\DLE\SOH\DC2\v\n\ + \\aREPLACE\DLE\STX\DC2\n\ + \\n\ + \\ACKCANCEL\DLE\ETX\"\144\SOH\n\ + \\ENQState\DC2\r\n\ + \\tACTIVE_AT\DLE\SOH\DC2\r\n\ + \\tSUSPENDED\DLE\STX\DC2\v\n\ + \\aPENDING\DLE\ETX\DC2\v\n\ + \\aWORKING\DLE\EOT\DC2\f\n\ + \\bREPLACED\DLE\ENQ\DC2\r\n\ + \\tCANCELLED\DLE\ACK\DC2\f\n\ + \\bREJECTED\DLE\a\DC2\n\ + \\n\ + \\ACKFILLED\DLE\b\DC2\v\n\ + \\aEXPIRED\DLE\t\DC2\v\n\ + \\aMATCHED\DLE\n\ + \\"\198\ETX\n\ + \\n\ + \OrderSizes\DC26\n\ + \\NAKobsolete_trigger_size\CAN\SOH \SOH(\rR\DC3obsoleteTriggerSizeB\STX\CAN\SOH\DC26\n\ + \\NAKobsolete_visible_size\CAN\STX \SOH(\rR\DC3obsoleteVisibleSizeB\STX\CAN\SOH\DC2=\n\ + \\EMobsolete_min_visible_size\CAN\ETX \SOH(\rR\SYNobsoleteMinVisibleSizeB\STX\CAN\SOH\DC2:\n\ + \\ETBobsolete_remaining_size\CAN\EOT \SOH(\rR\NAKobsoleteRemainingSizeB\STX\CAN\SOH\DC2/\n\ + \\ftrigger_size\CAN\ENQ \SOH(\v2\f.cqg.DecimalR\vtriggerSize\DC2/\n\ + \\fvisible_size\CAN\ACK \SOH(\v2\f.cqg.DecimalR\vvisibleSize\DC26\n\ + \\DLEmin_visible_size\CAN\a \SOH(\v2\f.cqg.DecimalR\SOminVisibleSize\DC23\n\ + \\SOremaining_size\CAN\b \SOH(\v2\f.cqg.DecimalR\rremainingSize\"\229\STX\n\ + \\rOrderTrailing\DC2\GS\n\ + \\n\ + \trail_type\CAN\SOH \SOH(\rR\ttrailType\DC2\SYN\n\ + \\ACKoffset\CAN\STX \SOH(\SOHR\ACKoffset\DC2\GS\n\ + \\n\ + \stop_price\CAN\ETX \SOH(\SOHR\tstopPrice\DC2\US\n\ + \\vlimit_price\CAN\EOT \SOH(\SOHR\n\ + \limitPrice\DC2%\n\ + \\SOdisplay_offset\CAN\ENQ \SOH(\DC2R\rdisplayOffset\DC2,\n\ + \\DC2display_stop_price\CAN\ACK \SOH(\DC2R\DLEdisplayStopPrice\DC2.\n\ + \\DC3display_limit_price\CAN\a \SOH(\DC2R\DC1displayLimitPrice\DC2\US\n\ + \\vupdate_time\CAN\b \SOH(\DC2R\n\ + \updateTime\"7\n\ + \\tTrailType\DC2\f\n\ + \\bBEST_BID\DLE\SOH\DC2\f\n\ + \\bBEST_ASK\DLE\STX\DC2\SO\n\ + \\n\ + \LAST_TRADE\DLE\ETX\"\205\EOT\n\ + \\DC2OperationalDetails\DC2&\n\ + \\SIclient_order_id\CAN\SOH \SOH(\tR\rclientOrderId\DC2\US\n\ + \\vclient_guid\CAN\STX \SOH(\tR\n\ + \clientGuid\DC2(\n\ + \\DLEclient_system_id\CAN\ETX \SOH(\tR\SOclientSystemId\DC2\ESC\n\ + \\tclient_ip\CAN\EOT \SOH(\tR\bclientIp\DC2%\n\ + \\SOclient_version\CAN\ENQ \SOH(\tR\rclientVersion\DC2*\n\ + \\DC1trade_location_id\CAN\ACK \SOH(\tR\SItradeLocationId\DC2\GS\n\ + \\n\ + \product_id\CAN\a \SOH(\tR\tproductId\DC2/\n\ + \\DC4client_app_type_name\CAN\b \SOH(\tR\DC1clientAppTypeName\DC2#\n\ + \\rplatform_name\CAN\t \SOH(\tR\fplatformName\DC2,\n\ + \\DC2private_label_name\CAN\n\ + \ \SOH(\tR\DLEprivateLabelName\DC2\US\n\ + \\voperator_id\CAN\v \SOH(\tR\n\ + \operatorId\DC2,\n\ + \\DC2sender_operator_id\CAN\f \SOH(\tR\DLEsenderOperatorId\DC2,\n\ + \\DC2sender_location_id\CAN\r \SOH(\tR\DLEsenderLocationId\DC24\n\ + \\SYNoriginator_location_id\CAN\SO \SOH(\tR\DC4originatorLocationId\"\145\a\n\ + \\SYNOrderTransactionStatus\DC2\SYN\n\ + \\ACKstatus\CAN\SOH \STX(\rR\ACKstatus\DC2\EM\n\ + \\btrans_id\CAN\STX \STX(\EOTR\atransId\DC2$\n\ + \\SOtrans_utc_time\CAN\ETX \STX(\DC2R\ftransUtcTime\DC2\US\n\ + \\vorder_state\CAN\EOT \STX(\rR\n\ + \orderState\DC2,\n\ + \\DC2order_chain_status\CAN\ENQ \STX(\rR\DLEorderChainStatus\DC2!\n\ + \\ftext_message\CAN\ACK \SOH(\tR\vtextMessage\DC2M\n\ + \!obsolete_new_discretionary_offset\CAN\a \SOH(\rR\RSobsoleteNewDiscretionaryOffsetB\STX\CAN\SOH\DC2O\n\ + \\"obsolete_prev_discretionary_offset\CAN\b \SOH(\rR\USobsoletePrevDiscretionaryOffsetB\STX\CAN\SOH\"\139\EOT\n\ + \\ACKStatus\DC2\r\n\ + \\tUNDEFINED\DLE\NUL\DC2\SO\n\ + \\n\ + \IN_TRANSIT\DLE\SOH\DC2\f\n\ + \\bREJECTED\DLE\STX\DC2\r\n\ + \\tACK_PLACE\DLE\ETX\DC2\v\n\ + \\aEXPIRED\DLE\EOT\DC2\r\n\ + \\tIN_CANCEL\DLE\ENQ\DC2\SO\n\ + \\n\ + \ACK_CANCEL\DLE\ACK\DC2\DC1\n\ + \\rREJECT_CANCEL\DLE\a\DC2\r\n\ + \\tIN_MODIFY\DLE\b\DC2\SO\n\ + \\n\ + \ACK_MODIFY\DLE\t\DC2\DC1\n\ + \\rREJECT_MODIFY\DLE\n\ + \\DC2\b\n\ + \\EOTFILL\DLE\v\DC2\v\n\ + \\aSUSPEND\DLE\f\DC2\DLE\n\ + \\fFILL_CORRECT\DLE\r\DC2\SI\n\ + \\vFILL_CANCEL\DLE\SO\DC2\r\n\ + \\tFILL_BUST\DLE\SI\DC2\f\n\ + \\bACTIVEAT\DLE\DLE\DC2\SO\n\ + \\n\ + \DISCONNECT\DLE\DC1\DC2\ETB\n\ + \\DC3SYNTHETIC_ACTIVATED\DLE\DC2\DC2\n\ + \\n\ + \\ACKUPDATE\DLE\DC3\DC2\DC4\n\ + \\DLESYNTHETIC_FAILED\DLE\DC4\DC2\SYN\n\ + \\DC2SYNTHETIC_OVERFILL\DLE\NAK\DC2\DC2\n\ + \\SOSYNTHETIC_HANG\DLE\SYN\DC2\r\n\ + \\tAPPROVING\DLE\ETB\DC2\NAK\n\ + \\DC1APPROVE_REQUESTED\DLE\CAN\DC2\CAN\n\ + \\DC4APPROVED_BY_EXCHANGE\DLE\EM\DC2\DC4\n\ + \\DLEREJECTED_BY_USER\DLE\SUB\DC2\v\n\ + \\aMATCHED\DLE\ESC\DC2\DC1\n\ + \\rTRADE_AMENDED\DLE\FS\DC2\DLE\n\ + \\fTRADE_BROKEN\DLE\GS\"\168\ENQ\n\ + \\tOrderFill\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\DC2R\STXid\DC2\ETB\n\ + \\aexec_id\CAN\STX \SOH(\tR\ACKexecId\DC2/\n\ + \\DC1obsolete_quantity\CAN\ETX \SOH(\rR\DLEobsoleteQuantityB\STX\CAN\SOH\DC2\DC4\n\ + \\ENQprice\CAN\EOT \SOH(\SOHR\ENQprice\DC2\"\n\ + \\rfill_utc_time\CAN\ENQ \SOH(\DC2R\vfillUtcTime\DC2#\n\ + \\ris_aggressive\CAN\ACK \SOH(\bR\fisAggressive\DC24\n\ + \\tleg_fills\CAN\a \ETX(\v2\ETB.traderouting_1.LegFillR\blegFills\DC2\EM\n\ + \\border_id\CAN\b \SOH(\tR\aorderId\DC2\US\n\ + \\vfill_status\CAN\t \SOH(\rR\n\ + \fillStatus\DC2:\n\ + \\SUBfill_care_order_request_id\CAN\n\ + \ \SOH(\tR\SYNfillCareOrderRequestId\DC2#\n\ + \\rdisplay_price\CAN\v \SOH(\DC2R\fdisplayPrice\DC2&\n\ + \\SIopen_close_type\CAN\f \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN\r \SOH(\rR\SIspeculationType\DC2\RS\n\ + \\n\ + \commission\CAN\SO \SOH(\SOHR\n\ + \commission\DC2/\n\ + \\DC3commission_currency\CAN\SI \SOH(\tR\DC2commissionCurrency\DC2(\n\ + \\bquantity\CAN\DLE \SOH(\v2\f.cqg.DecimalR\bquantity\"A\n\ + \\n\ + \FillStatus\DC2\t\n\ + \\ENQVALID\DLE\SOH\DC2\n\ + \\n\ + \\ACKBUSTED\DLE\STX\DC2\r\n\ + \\tCORRECTED\DLE\ETX\DC2\r\n\ + \\tCANCELLED\DLE\EOT\"\224\EOT\n\ + \\aLegFill\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\DC2R\STXid\DC2\ETB\n\ + \\aexec_id\CAN\STX \SOH(\tR\ACKexecId\DC2'\n\ + \\SIcontract_symbol\CAN\ETX \SOH(\tR\SOcontractSymbol\DC2/\n\ + \\DC1obsolete_quantity\CAN\EOT \SOH(\rR\DLEobsoleteQuantityB\STX\CAN\SOH\DC2\DC2\n\ + \\EOTside\CAN\ENQ \SOH(\rR\EOTside\DC2\DC4\n\ + \\ENQprice\CAN\ACK \SOH(\SOHR\ENQprice\DC2\"\n\ + \\rfill_utc_time\CAN\a \SOH(\DC2R\vfillUtcTime\DC2\US\n\ + \\vfill_status\CAN\b \SOH(\rR\n\ + \fillStatus\DC2#\n\ + \\rdisplay_price\CAN\t \SOH(\DC2R\fdisplayPrice\DC2&\n\ + \\SIopen_close_type\CAN\n\ + \ \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN\v \SOH(\rR\SIspeculationType\DC2#\n\ + \\ris_aggressive\CAN\f \SOH(\bR\fisAggressive\DC2(\n\ + \\bquantity\CAN\r \SOH(\v2\f.cqg.DecimalR\bquantity\DC2#\n\ + \\rextended_side\CAN\SO \SOH(\rR\fextendedSide\DC2\ESC\n\ + \\tlocate_id\CAN\SI \SOH(\tR\blocateId\DC2;\n\ + \\DC1fill_extra_values\CAN\DLE \ETX(\v2\SI.common_1.TupleR\SIfillExtraValues\DC2\GS\n\ + \\n\ + \leg_number\CAN\DC1 \SOH(\tR\tlegNumber\"\160\SOH\n\ + \\fRelatedOrder\DC2;\n\ + \\vorder_chain\CAN\SOH \SOH(\v2\SUB.traderouting_1.OrderChainR\n\ + \orderChain\DC28\n\ + \\bchildren\CAN\STX \ETX(\v2\FS.traderouting_1.RelatedOrderR\bchildren\DC2\EM\n\ + \\bleg_path\CAN\ETX \SOH(\tR\alegPath\"\254\ETX\n\ + \\rCompoundOrder\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\ESC\n\ + \\tnode_role\CAN\STX \SOH(\rR\bnodeRole\DC2\DC2\n\ + \\EOTtype\CAN\ETX \SOH(\rR\EOTtype\DC2\US\n\ + \\vclient_guid\CAN\ENQ \SOH(\tR\n\ + \clientGuid\DC2!\n\ + \\ftrigger_type\CAN\ACK \SOH(\rR\vtriggerType\DC2;\n\ + \\vorder_chain\CAN\a \SOH(\v2\SUB.traderouting_1.OrderChainR\n\ + \orderChain\DC29\n\ + \\bchildren\CAN\b \ETX(\v2\GS.traderouting_1.CompoundOrderR\bchildren\"i\n\ + \\NAKCompoundOrderNodeRole\DC2\b\n\ + \\EOTROOT\DLE\SOH\DC2\SI\n\ + \\vOPO_PRIMARY\DLE\STX\DC2\DC1\n\ + \\rOPO_SECONDARY\DLE\ETX\DC2\f\n\ + \\bOCO_ROLE\DLE\EOT\DC2\DC4\n\ + \\DLEINDEPENDENT_ROLE\DLE\ENQ\"A\n\ + \\DC1CompoundOrderType\DC2\a\n\ + \\ETXOCO\DLE\SOH\DC2\a\n\ + \\ETXOPO\DLE\STX\DC2\t\n\ + \\ENQORDER\DLE\ETX\DC2\SI\n\ + \\vINDEPENDENT\DLE\EOT\"B\n\ + \\CANCompoundOrderTriggerType\DC2\v\n\ + \\aWorking\DLE\SOH\DC2\n\ + \\n\ + \\ACKFilled\DLE\STX\DC2\r\n\ + \\tCancelled\DLE\ETX\"\145\EOT\n\ + \\vStrategyLeg\DC2\EM\n\ + \\bleg_path\CAN\SOH \SOH(\tR\alegPath\DC2'\n\ + \\SIcontract_symbol\CAN\STX \SOH(\tR\SOcontractSymbol\DC2:\n\ + \\ETBobsolete_quantity_ratio\CAN\ETX \SOH(\SOHR\NAKobsoleteQuantityRatioB\STX\CAN\SOH\DC2\US\n\ + \\vprice_ratio\CAN\EOT \SOH(\SOHR\n\ + \priceRatio\DC2\DC2\n\ + \\EOTmode\CAN\ENQ \SOH(\rR\EOTmode\DC26\n\ + \\aaccount\CAN\ACK \SOH(\v2\FS.traderouting_1.ChainAccountR\aaccount\DC20\n\ + \\vyield_model\CAN\a \ETX(\v2\SI.common_1.TupleR\n\ + \yieldModel\DC2/\n\ + \\EOTlegs\CAN\b \ETX(\v2\ESC.traderouting_1.StrategyLegR\EOTlegs\DC2&\n\ + \\SIopen_close_type\CAN\t \SOH(\rR\ropenCloseType\DC2)\n\ + \\DLEspeculation_type\CAN\n\ + \ \SOH(\rR\SIspeculationType\DC23\n\ + \\SOquantity_ratio\CAN\v \SOH(\v2\f.cqg.DecimalR\rquantityRatio\"*\n\ + \\fStrategyMode\DC2\a\n\ + \\ETXALL\DLE\SOH\DC2\b\n\ + \\EOTAGGR\DLE\STX\DC2\a\n\ + \\ETXMUL\DLE\ETX\"\174\b\n\ + \\aAccount\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\DC1R\STXid\DC2\DC2\n\ + \\EOTname\CAN\STX \SOH(\tR\EOTname\DC28\n\ + \\CANbrokerage_account_number\CAN\ETX \SOH(\tR\SYNbrokerageAccountNumber\DC2C\n\ + \\FSobsolete_sales_series_number\CAN\EOT \SOH(\tR\EMobsoleteSalesSeriesNumberB\STX\CAN\SOH\DC2?\n\ + \\SUBobsolete_sales_series_name\CAN\ENQ \SOH(\tR\ETBobsoleteSalesSeriesNameB\STX\CAN\SOH\DC2:\n\ + \\ETBobsolete_brokerage_name\CAN\ACK \SOH(\tR\NAKobsoleteBrokerageNameB\STX\CAN\SOH\DC2\DC4\n\ + \\ENQclass\CAN\b \SOH(\rR\ENQclass\DC2\US\n\ + \\vcustomer_id\CAN\t \SOH(\tR\n\ + \customerId\DC20\n\ + \\DC4risk_server_instance\CAN\n\ + \ \SOH(\tR\DC2riskServerInstance\DC2&\n\ + \\SIaccount_type_id\CAN\v \SOH(\tR\raccountTypeId\DC2&\n\ + \\SIsales_series_id\CAN\f \SOH(\tR\rsalesSeriesId\DC2!\n\ + \\fbrokerage_id\CAN\r \SOH(\tR\vbrokerageId\DC2\SUB\n\ + \\bcurrency\CAN\SO \SOH(\tR\bcurrency\DC2\ESC\n\ + \\tsub_class\CAN\SI \SOH(\rR\bsubClass\DC25\n\ + \\ETBrisk_server_instance_id\CAN\DLE \SOH(\tR\DC4riskServerInstanceId\DC2A\n\ + \\ESCobsolete_account_cluster_id\CAN\DC1 \SOH(\tR\CANobsoleteAccountClusterIdB\STX\CAN\SOH\DC2\CAN\n\ + \\aremoved\CAN\DC2 \SOH(\bR\aremoved\DC2\ESC\n\ + \\tis_master\CAN\DC3 \SOH(\bR\bisMaster\DC2.\n\ + \\DC3group_relation_type\CAN\DC4 \SOH(\rR\DC1groupRelationType\DC2#\n\ + \\ris_collection\CAN\NAK \SOH(\bR\fisCollection\DC2\GS\n\ + \\n\ + \profile_id\CAN\SYN \SOH(\tR\tprofileId\DC25\n\ + \\ETBprofile_sales_series_id\CAN\ETB \SOH(\tR\DC4profileSalesSeriesId\DC2&\n\ + \\SIis_in_migration\CAN\CAN \SOH(\bR\risInMigration\"/\n\ + \\ENQClass\DC2\v\n\ + \\aREGULAR\DLE\SOH\DC2\f\n\ + \\bTEMPLATE\DLE\STX\DC2\v\n\ + \\aOMNIBUS\DLE\ETX\"9\n\ + \\bSubClass\DC2\NAK\n\ + \\DC1SUB_CLASS_REGULAR\DLE\SOH\DC2\SYN\n\ + \\DC2SUB_CLASS_INTERNAL\DLE\STX\"\198\STX\n\ + \\rBalanceRecord\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\DC2*\n\ + \\DC1balance_record_id\CAN\STX \STX(\DC1R\SIbalanceRecordId\DC2\SUB\n\ + \\bcurrency\CAN\ETX \STX(\tR\bcurrency\DC2(\n\ + \\DLEend_cash_balance\CAN\EOT \SOH(\SOHR\SOendCashBalance\DC2\RS\n\ + \\n\ + \collateral\CAN\ENQ \SOH(\SOHR\n\ + \collateral\DC2\FS\n\ + \\n\ + \as_of_date\CAN\ACK \SOH(\DC2R\basOfDate\DC2\SYN\n\ + \\ACKorigin\CAN\a \SOH(\rR\ACKorigin\DC2\FS\n\ + \\tregulated\CAN\b \SOH(\bR\tregulated\"0\n\ + \\rBalanceOrigin\DC2\ACK\n\ + \\STXNA\DLE\SOH\DC2\t\n\ + \\ENQLOCAL\DLE\STX\DC2\f\n\ + \\bOVERSEAS\DLE\ETX\"\244\EOT\n\ + \\EMAccountSearchResultRecord\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \STX(\DC1R\taccountId\DC2\DC2\n\ + \\EOTname\CAN\STX \STX(\tR\EOTname\DC28\n\ + \\CANbrokerage_account_number\CAN\ETX \STX(\tR\SYNbrokerageAccountNumber\DC2.\n\ + \\DC3sales_series_number\CAN\EOT \STX(\tR\DC1salesSeriesNumber\DC2*\n\ + \\DC1sales_series_name\CAN\ENQ \STX(\tR\SIsalesSeriesName\DC2%\n\ + \\SObrokerage_name\CAN\ACK \STX(\tR\rbrokerageName\DC2\US\n\ + \\vcustomer_id\CAN\a \SOH(\tR\n\ + \customerId\DC2#\n\ + \\rcustomer_name\CAN\b \SOH(\tR\fcustomerName\DC2\CAN\n\ + \\aremoved\CAN\t \SOH(\bR\aremoved\DC2&\n\ + \\SIsales_series_id\CAN\n\ + \ \SOH(\tR\rsalesSeriesId\DC2!\n\ + \\fbrokerage_id\CAN\v \SOH(\tR\vbrokerageId\DC25\n\ + \\ETBrisk_server_instance_id\CAN\f \SOH(\tR\DC4riskServerInstanceId\DC2\EM\n\ + \\bgroup_id\CAN\r \SOH(\tR\agroupId\DC2\DC4\n\ + \\ENQclass\CAN\SO \SOH(\rR\ENQclass\DC2\GS\n\ + \\n\ + \profile_id\CAN\SI \SOH(\tR\tprofileId\DC25\n\ + \\ETBprofile_sales_series_id\CAN\DLE \SOH(\tR\DC4profileSalesSeriesId\"\150\ACK\n\ + \\DC2AccountRouteRecord\DC2%\n\ + \\SOcleared_fields\CAN\t \ETX(\rR\rclearedFields\DC2\GS\n\ + \\n\ + \route_code\CAN\SOH \SOH(\DC1R\trouteCode\DC22\n\ + \\DC3obsolete_route_name\CAN\STX \SOH(\tR\DC1obsoleteRouteNameB\STX\CAN\SOH\DC2\SUB\n\ + \\bpriority\CAN\ETX \SOH(\DC1R\bpriority\DC2,\n\ + \\DC2omnibus_account_id\CAN\EOT \SOH(\DC1R\DLEomnibusAccountId\DC2E\n\ + \\GSobsolete_omnibus_account_name\CAN\ENQ \SOH(\tR\SUBobsoleteOmnibusAccountNameB\STX\CAN\SOH\DC2E\n\ + \\n\ + \attributes\CAN\ACK \ETX(\v2%.traderouting_1.AccountRouteAttributeR\n\ + \attributes\DC2\SUB\n\ + \\tis_in_use\CAN\a \SOH(\bR\aisInUse\DC2=\n\ + \\ESCallow_synthetic_order_types\CAN\b \SOH(\bR\CANallowSyntheticOrderTypes\DC2G\n\ + \ enable_algo_strategies_whitelist\CAN\n\ + \ \SOH(\bR\GSenableAlgoStrategiesWhitelist\DC2:\n\ + \\EMalgo_strategies_whitelist\CAN\v \ETX(\tR\ETBalgoStrategiesWhitelist\DC2/\n\ + \\DC4cqg_algo_orders_only\CAN\f \SOH(\bR\DC1cqgAlgoOrdersOnly\DC2=\n\ + \\ESCforce_variable_latency_algo\CAN\r \SOH(\rR\CANforceVariableLatencyAlgo\"^\n\ + \\CANForceVariableLatencyAlgo\DC2\f\n\ + \\bDISABLED\DLE\NUL\DC2\ETB\n\ + \\DC3NON_CQG_ALGO_ORDERS\DLE\SOH\DC2\ESC\n\ + \\ETBALL_NON_SPREADER_ORDERS\DLE\STX\"Q\n\ + \\NAKAccountRouteAttribute\DC2\DC2\n\ + \\EOTName\CAN\SOH \STX(\tR\EOTName\DC2\DC4\n\ + \\ENQValue\CAN\STX \SOH(\tR\ENQValue\DC2\SO\n\ + \\STXid\CAN\ETX \SOH(\tR\STXid\"\225\ENQ\n\ + \\SIAccountUserLink\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2\ETB\n\ + \\auser_id\CAN\STX \SOH(\tR\ACKuserId\DC2 \n\ + \\fis_view_only\CAN\ETX \SOH(\bR\n\ + \isViewOnly\DC2\"\n\ + \\ris_force_care\CAN\EOT \SOH(\bR\visForceCare\DC2\ESC\n\ + \\tuser_name\CAN\ENQ \SOH(\tR\buserName\DC2!\n\ + \\faccount_name\CAN\ACK \SOH(\tR\vaccountName\DC28\n\ + \\CANbrokerage_account_number\CAN\a \SOH(\tR\SYNbrokerageAccountNumber\DC2%\n\ + \\SObrokerage_name\CAN\b \SOH(\tR\rbrokerageName\DC26\n\ + \\ETBallow_external_accounts\CAN\t \SOH(\bR\NAKallowExternalAccounts\DC25\n\ + \\SYNimplicit_authorization\CAN\n\ + \ \SOH(\bR\NAKimplicitAuthorization\DC27\n\ + \\CANexecution_source_code_id\CAN\v \SOH(\tR\NAKexecutionSourceCodeId\DC20\n\ + \\DC4account_brokerage_id\CAN\f \SOH(\tR\DC2accountBrokerageId\DC25\n\ + \\ETBaccount_sales_series_id\CAN\r \SOH(\tR\DC4accountSalesSeriesId\DC2 \n\ + \\fis_mifid_dea\CAN\SO \SOH(\bR\n\ + \isMifidDea\DC2R\n\ + \'transform_mifid_algo_cqg_to_client_algo\CAN\SI \SOH(\bR!transformMifidAlgoCqgToClientAlgo\DC2(\n\ + \\DLEis_primary_login\CAN\DLE \SOH(\bR\SOisPrimaryLogin\"\212\b\n\ + \\SIAccountSettings\DC2%\n\ + \\SOcleared_fields\CAN\DC2 \ETX(\rR\rclearedFields\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\DC1R\taccountId\DC2.\n\ + \\DC1obsolete_is_block\CAN\STX \SOH(\bR\SIobsoleteIsBlockB\STX\CAN\SOH\DC22\n\ + \\DC3obsolete_block_size\CAN\ETX \SOH(\DC1R\DC1obsoleteBlockSizeB\STX\CAN\SOH\DC2\ESC\n\ + \\tis_giveup\CAN\EOT \SOH(\bR\bisGiveup\DC2G\n\ + \\RSobsolete_giveup_brokerage_name\CAN\ENQ \SOH(\tR\ESCobsoleteGiveupBrokerageNameB\STX\CAN\SOH\DC2)\n\ + \\DLEstatement_option\CAN\ACK \SOH(\rR\SIstatementOption\DC2!\n\ + \\fzero_balance\CAN\a \SOH(\bR\vzeroBalance\DC2&\n\ + \\SOreconciliation\CAN\b \SOH(\bR\SOreconciliation\DC2.\n\ + \\DC3giveup_brokerage_id\CAN\t \SOH(\tR\DC1giveupBrokerageId\DC2*\n\ + \\DC1trading_time_from\CAN\n\ + \ \SOH(\tR\SItradingTimeFrom\DC2&\n\ + \\SItrading_time_to\CAN\v \SOH(\tR\rtradingTimeTo\DC2*\n\ + \\DC1trading_time_zone\CAN\f \SOH(\tR\SItradingTimeZone\DC2T\n\ + \'liquidation_orders_outside_trading_time\CAN\r \SOH(\bR#liquidationOrdersOutsideTradingTime\DC2\US\n\ + \\vis_instruct\CAN\SO \SOH(\bR\n\ + \isInstruct\DC2B\n\ + \\GSexternally_provided_execution\CAN\SI \SOH(\bR\ESCexternallyProvidedExecution\DC20\n\ + \\DC4modes_account_groups\CAN\DLE \ETX(\tR\DC2modesAccountGroups\DC2G\n\ + \!require_pre_trade_mid_market_mark\CAN\DC1 \SOH(\bR\FSrequirePreTradeMidMarketMark\DC2.\n\ + \\DC3allow_extended_side\CAN\DC3 \SOH(\bR\DC1allowExtendedSide\DC2\"\n\ + \\rallow_go_flat\CAN\DC4 \SOH(\bR\vallowGoFlat\DC2F\n\ + \ go_flat_default_speculation_type\CAN\NAK \SOH(\rR\FSgoFlatDefaultSpeculationType\"9\n\ + \\SIStatementOption\DC2\f\n\ + \\bGENERATE\DLE\SOH\DC2\r\n\ + \\tBROKERAGE\DLE\STX\DC2\t\n\ + \\ENQRESET\DLE\ETX\"\183\DC3\n\ + \\SORiskParameters\DC22\n\ + \\DC3obsolete_account_id\CAN\SOH \SOH(\DC1R\DC1obsoleteAccountIdB\STX\CAN\SOH\DC2)\n\ + \\DLEliquidation_only\CAN\STX \SOH(\bR\SIliquidationOnly\DC2#\n\ + \\rallow_futures\CAN\ETX \SOH(\bR\fallowFutures\DC2#\n\ + \\rallow_options\CAN\EOT \SOH(\rR\fallowOptions\DC27\n\ + \\CANenforce_trade_size_limit\CAN\ENQ \SOH(\bR\NAKenforceTradeSizeLimit\DC2=\n\ + \\EMobsolete_trade_size_limit\CAN\ACK \SOH(\DC1R\SYNobsoleteTradeSizeLimitB\STX\CAN\SOH\DC2;\n\ + \\SUBenforce_trade_margin_limit\CAN\a \SOH(\bR\ETBenforceTradeMarginLimit\DC2,\n\ + \\DC2trade_margin_limit\CAN\b \SOH(\SOHR\DLEtradeMarginLimit\DC2D\n\ + \\USenforce_trade_price_limit_ticks\CAN\t \SOH(\bR\ESCenforceTradePriceLimitTicks\DC2V\n\ + \\ETBtrade_price_limit_ticks\CAN\n\ + \ \SOH(\v2\US.traderouting_1.TradePriceLimitR\DC4tradePriceLimitTicks\DC2G\n\ + \ enforce_commodity_position_limit\CAN\v \SOH(\bR\GSenforceCommodityPositionLimit\DC2i\n\ + \!obsolete_commodity_position_limit\CAN\f \SOH(\v2\SUB.traderouting_1.LimitValueR\RSobsoleteCommodityPositionLimitB\STX\CAN\SOH\DC2E\n\ + \\USenforce_contract_position_limit\CAN\r \SOH(\bR\FSenforceContractPositionLimit\DC2g\n\ + \ obsolete_contract_position_limit\CAN\SO \SOH(\v2\SUB.traderouting_1.LimitValueR\GSobsoleteContractPositionLimitB\STX\CAN\SOH\DC2M\n\ + \#enforce_margin_subsystem_parameters\CAN\SI \SOH(\bR enforceMarginSubsystemParameters\DC2i\n\ + \\ESCpurchasing_power_parameters\CAN\DLE \SOH(\v2).traderouting_1.PurchasingPowerParametersR\EMpurchasingPowerParameters\DC27\n\ + \\CANenforce_daily_loss_limit\CAN\DC1 \SOH(\bR\NAKenforceDailyLossLimit\DC2C\n\ + \\DLEdaily_loss_limit\CAN\DC2 \SOH(\v2\EM.traderouting_1.LossLimitR\SOdailyLossLimit\DC2B\n\ + \\RSenforce_delta_daily_loss_limit\CAN\DC3 \SOH(\bR\SUBenforceDeltaDailyLossLimit\DC2N\n\ + \\SYNdelta_daily_loss_limit\CAN\DC4 \SOH(\v2\EM.traderouting_1.LossLimitR\DC3deltaDailyLossLimit\DC2,\n\ + \\DC2maximum_order_rate\CAN\NAK \SOH(\DC1R\DLEmaximumOrderRate\DC2;\n\ + \\SUBreject_risky_market_orders\CAN\SYN \SOH(\bR\ETBrejectRiskyMarketOrders\DC2H\n\ + \!enforce_trade_price_limit_percent\CAN\ETB \SOH(\bR\GSenforceTradePriceLimitPercent\DC2a\n\ + \\EMtrade_price_limit_percent\CAN\CAN \SOH(\v2&.traderouting_1.TradePriceLimitPercentR\SYNtradePriceLimitPercent\DC26\n\ + \\DLEtrade_size_limit\CAN\EM \SOH(\v2\f.cqg.DecimalR\SOtradeSizeLimit\DC2[\n\ + \\CANcommodity_position_limit\CAN\SUB \SOH(\v2!.traderouting_1.LimitValueDecimalR\SYNcommodityPositionLimit\DC2Y\n\ + \\ETBcontract_position_limit\CAN\ESC \SOH(\v2!.traderouting_1.LimitValueDecimalR\NAKcontractPositionLimit\DC2Q\n\ + \\ETBlast_trading_date_limit\CAN\FS \SOH(\v2\SUB.traderouting_1.LimitValueR\DC4lastTradingDateLimit\DC2_\n\ + \\ESCtrade_size_limit_with_modes\CAN\GS \SOH(\v2!.traderouting_1.LimitValueDecimalR\ETBtradeSizeLimitWithModes\DC2S\n\ + \'enforce_total_gross_open_position_limit\CAN\RS \SOH(\bR\"enforceTotalGrossOpenPositionLimit\DC2g\n\ + \\UStotal_gross_open_position_limit\CAN\US \SOH(\v2!.traderouting_1.LimitValueDecimalR\ESCtotalGrossOpenPositionLimit\DC2h\n\ + \2long_option_premium_check_against_purchasing_power\CAN \SOH(\bR,longOptionPremiumCheckAgainstPurchasingPower\DC2;\n\ + \\SUBuse_intraday_currency_rate\CAN! \SOH(\bR\ETBuseIntradayCurrencyRate\"*\n\ + \\SOOptionsTrading\DC2\ACK\n\ + \\STXNO\DLE\SOH\DC2\a\n\ + \\ETXBUY\DLE\STX\DC2\a\n\ + \\ETXALL\DLE\ETX\"\157\STX\n\ + \\fAccountGroup\DC2\EM\n\ + \\bgroup_id\CAN\SOH \SOH(\tR\agroupId\DC2*\n\ + \\DC1master_account_id\CAN\STX \SOH(\tR\SImasterAccountId\DC2#\n\ + \\rrelation_type\CAN\ETX \SOH(\rR\frelationType\DC2=\n\ + \\fsub_accounts\CAN\EOT \ETX(\v2\SUB.traderouting_1.SubAccountR\vsubAccounts\"b\n\ + \\fRelationType\DC2\US\n\ + \\ESCMARGIN_INDEPENDENTLY_BORROW\DLE\SOH\DC2\FS\n\ + \\CANMARGIN_INDEPENDENTLY_SUM\DLE\STX\DC2\DC3\n\ + \\SIMARGIN_TOGETHER\DLE\ETX\"\196\SOH\n\ + \\n\ + \SubAccount\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2!\n\ + \\faccount_name\CAN\STX \SOH(\tR\vaccountName\DC28\n\ + \\CANbrokerage_account_number\CAN\ETX \SOH(\tR\SYNbrokerageAccountNumber\DC2:\n\ + \\EMpurchasing_power_fraction\CAN\EOT \SOH(\SOHR\ETBpurchasingPowerFraction\"\130\SOH\n\ + \\SITradePriceLimit\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC2)\n\ + \\SOobsolete_ticks\CAN\STX \SOH(\DC1R\robsoleteTicksB\STX\CAN\SOH\DC20\n\ + \\ENQvalue\CAN\ETX \SOH(\v2\SUB.traderouting_1.LimitValueR\ENQvalue\"d\n\ + \\SYNTradePriceLimitPercent\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC26\n\ + \\ENQvalue\CAN\STX \SOH(\v2 .traderouting_1.LimitValueDoubleR\ENQvalue\"\177\SOH\n\ + \\n\ + \LimitValue\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC2\DC4\n\ + \\ENQvalue\CAN\STX \SOH(\DC1R\ENQvalue\DC2_\n\ + \\EMobsolete_expiration_limit\CAN\ETX \ETX(\v2\US.traderouting_1.ExpirationLimitR\ETBobsoleteExpirationLimitB\STX\CAN\SOH\DC2\CAN\n\ + \\aenforce\CAN\EOT \SOH(\bR\aenforce\"V\n\ + \\DLELimitValueDouble\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC2\DC4\n\ + \\ENQvalue\CAN\STX \SOH(\SOHR\ENQvalue\DC2\CAN\n\ + \\aenforce\CAN\ETX \SOH(\bR\aenforce\"\132\STX\n\ + \\DC1LimitValueDecimal\DC2%\n\ + \\SOcleared_fields\CAN\ENQ \ETX(\rR\rclearedFields\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC2\"\n\ + \\ENQvalue\CAN\STX \SOH(\v2\f.cqg.DecimalR\ENQvalue\DC2Q\n\ + \\DLEexpiration_limit\CAN\ETX \ETX(\v2&.traderouting_1.ExpirationLimitDecimalR\SIexpirationLimit\DC2\CAN\n\ + \\aenforce\CAN\EOT \SOH(\bR\aenforce\DC2#\n\ + \\rlogin_enforce\CAN\ACK \SOH(\bR\floginEnforce\"W\n\ + \\DC1LimitValueBoolean\DC2\DC2\n\ + \\EOTmode\CAN\SOH \SOH(\rR\EOTmode\DC2\DC4\n\ + \\ENQvalue\CAN\STX \SOH(\bR\ENQvalue\DC2\CAN\n\ + \\aenforce\CAN\ETX \SOH(\bR\aenforce\"]\n\ + \\SIExpirationLimit\DC24\n\ + \\SYNdays_before_expiration\CAN\SOH \SOH(\rR\DC4daysBeforeExpiration\DC2\DC4\n\ + \\ENQvalue\CAN\STX \SOH(\DC1R\ENQvalue\"r\n\ + \\SYNExpirationLimitDecimal\DC24\n\ + \\SYNdays_before_expiration\CAN\SOH \SOH(\rR\DC4daysBeforeExpiration\DC2\"\n\ + \\ENQvalue\CAN\STX \SOH(\v2\f.cqg.DecimalR\ENQvalue\"\253\b\n\ + \\EMPurchasingPowerParameters\DC2;\n\ + \\SUBms_allowable_margin_credit\CAN\SOH \SOH(\SOHR\ETBmsAllowableMarginCredit\DC2,\n\ + \\DC2ms_cross_margining\CAN\STX \SOH(\bR\DLEmsCrossMargining\DC2)\n\ + \\DC1ms_include_ote_pp\CAN\ETX \SOH(\rR\SOmsIncludeOtePp\DC2)\n\ + \\DC1ms_include_nov_pp\CAN\EOT \SOH(\rR\SOmsIncludeNovPp\DC2$\n\ + \\SOinclude_upl_ll\CAN\ENQ \SOH(\rR\fincludeUplLl\DC2$\n\ + \\SOinclude_ote_ll\CAN\ACK \SOH(\rR\fincludeOteLl\DC24\n\ + \\SYNcheck_negative_balance\CAN\a \SOH(\bR\DC4checkNegativeBalance\DC2&\n\ + \\SIuse_theo_prices\CAN\b \SOH(\bR\ruseTheoPrices\DC2\GS\n\ + \\n\ + \theo_ticks\CAN\t \SOH(\DC1R\ttheoTicks\DC2\RS\n\ + \\vuse_bba_ote\CAN\n\ + \ \SOH(\bR\tuseBbaOte\DC2%\n\ + \\SIuse_bba_nov_upl\CAN\v \SOH(\bR\fuseBbaNovUpl\DC29\n\ + \\EMadjust_price_by_netchange\CAN\f \SOH(\bR\SYNadjustPriceByNetchange\DC2;\n\ + \\SUBuse_brokerage_margins_only\CAN\r \SOH(\bR\ETBuseBrokerageMarginsOnly\DC2@\n\ + \\SUBobsolete_margin_multiplier\CAN\SO \SOH(\SOHR\CANobsoleteMarginMultiplierB\STX\CAN\SOH\DC2W\n\ + \)ms_use_instrument_group_margin_multiplier\CAN\SI \SOH(\bR$msUseInstrumentGroupMarginMultiplier\DC2P\n\ + \%ms_instrument_group_margin_multiplier\CAN\DLE \SOH(\SOHR!msInstrumentGroupMarginMultiplier\DC2M\n\ + \\DC1margin_multiplier\CAN\DC1 \SOH(\v2 .traderouting_1.LimitValueDoubleR\DLEmarginMultiplier\DC28\n\ + \\CANalways_allow_liquidation\CAN\DC2 \SOH(\bR\SYNalwaysAllowLiquidation\DC2?\n\ + \\FSenforce_max_purchasing_power\CAN\DC3 \SOH(\bR\EMenforceMaxPurchasingPower\DC20\n\ + \\DC4max_purchasing_power\CAN\DC4 \SOH(\SOHR\DC2maxPurchasingPower\".\n\ + \\rIncludeOption\DC2\a\n\ + \\ETXYES\DLE\SOH\DC2\f\n\ + \\bNEGATIVE\DLE\STX\DC2\ACK\n\ + \\STXNO\DLE\ETX\"\183\SOH\n\ + \\tLossLimit\DC2\DC2\n\ + \\EOTtype\CAN\SOH \SOH(\rR\EOTtype\DC2\CAN\n\ + \\apercent\CAN\STX \SOH(\SOHR\apercent\DC2\SYN\n\ + \\ACKamount\CAN\ETX \SOH(\SOHR\ACKamount\"d\n\ + \\EOTType\DC2\v\n\ + \\aPERCENT\DLE\SOH\DC2\n\ + \\n\ + \\ACKAMOUNT\DLE\STX\DC2\SYN\n\ + \\DC2MIN_PERCENT_AMOUNT\DLE\ETX\DC2\SYN\n\ + \\DC2MAX_PERCENT_AMOUNT\DLE\EOT\DC2\DC3\n\ + \\SIAMOUNT_NO_LIMIT\DLE\ENQ\"\149\SOH\n\ + \\rExchangeGroup\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\DC1R\STXid\DC2\"\n\ + \\EOTname\CAN\STX \STX(\v2\SO.shared_1.TextR\EOTname\DC2P\n\ + \\DC2fungible_commodity\CAN\ETX \ETX(\v2!.traderouting_1.FungibleCommodityR\DC1fungibleCommodity\"\193\STX\n\ + \\DC1FungibleCommodity\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\DC1R\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname\DC2P\n\ + \\DC2tradable_commodity\CAN\ETX \ETX(\v2!.traderouting_1.TradableCommodityR\DC1tradableCommodity\DC2\DC3\n\ + \\ENQis_us\CAN\EOT \SOH(\bR\EOTisUs\DC2,\n\ + \\DC2instrument_type_id\CAN\ENQ \ETX(\DC1R\DLEinstrumentTypeId\DC2&\n\ + \\SImargin_group_id\CAN\ACK \SOH(\tR\rmarginGroupId\DC2\SYN\n\ + \\ACKprefix\CAN\a \SOH(\tR\ACKprefix\DC2#\n\ + \\rextended_code\CAN\b \SOH(\tR\fextendedCode\";\n\ + \\DC1TradableCommodity\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\tR\STXid\DC2\SYN\n\ + \\ACKsymbol\CAN\STX \STX(\tR\ACKsymbol\"\218\ETX\n\ + \\SOInstrumentType\DC2\SO\n\ + \\STXid\CAN\SOH \STX(\DC1R\STXid\DC2\"\n\ + \\EOTname\CAN\STX \STX(\v2\SO.shared_1.TextR\EOTname\DC2%\n\ + \\SOallowed_limits\CAN\ETX \ETX(\rR\rallowedLimits\DC2)\n\ + \\DLEinstrument_group\CAN\EOT \SOH(\rR\SIinstrumentGroup\"\176\SOH\n\ + \\SIMarketLimitType\DC2\GS\n\ + \\EMINSTRUMENT_POSITION_LIMIT\DLE\SOH\DC2\ESC\n\ + \\ETBCONTRACT_POSITION_LIMIT\DLE\STX\DC2\DC4\n\ + \\DLETRADE_SIZE_LIMIT\DLE\ETX\DC2\NAK\n\ + \\DC1TRADE_PRICE_LIMIT\DLE\EOT\DC2\ESC\n\ + \\ETBLAST_TRADING_DATE_LIMIT\DLE\ENQ\DC2\ETB\n\ + \\DC3LONG_POSITIONS_ONLY\DLE\ACK\"\142\SOH\n\ + \\DC3InstrumentGroupType\DC2\v\n\ + \\aFUTURES\DLE\SOH\DC2\v\n\ + \\aOPTIONS\DLE\STX\DC2\SO\n\ + \\n\ + \STRATEGIES\DLE\ETX\DC2\v\n\ + \\aINDICES\DLE\EOT\DC2\DLE\n\ + \\fFIXED_INCOME\DLE\ENQ\DC2\r\n\ + \\tCASH_SPOT\DLE\ACK\DC2\DC1\n\ + \\rDAILY_FUTURES\DLE\a\DC2\f\n\ + \\bEQUITIES\DLE\b\"\132\ETX\n\ + \\fMarketLimits\DC2%\n\ + \\SOcleared_fields\CAN\ENQ \ETX(\rR\rclearedFields\DC2N\n\ + \\DC1all_market_limits\CAN\SOH \SOH(\v2\".traderouting_1.MarketLimitsRecordR\SIallMarketLimits\DC2L\n\ + \\DLEus_market_limits\CAN\STX \SOH(\v2\".traderouting_1.MarketLimitsRecordR\SOusMarketLimits\DC2S\n\ + \\DC4non_us_market_limits\CAN\ETX \SOH(\v2\".traderouting_1.MarketLimitsRecordR\DC1nonUsMarketLimits\DC2Z\n\ + \\SYNexchange_market_limits\CAN\EOT \ETX(\v2$.traderouting_1.ExchangeMarketLimitsR\DC4exchangeMarketLimits\"\255\STX\n\ + \\DC2MarketLimitsRecord\DC2%\n\ + \\SOcleared_fields\CAN\EOT \ETX(\rR\rclearedFields\DC2N\n\ + \\DLEallowed_to_trade\CAN\SOH \SOH(\v2$.traderouting_1.EntityAllowedToTradeR\SOallowedToTrade\DC2@\n\ + \\SUBobsolete_margin_multiplier\CAN\STX \SOH(\SOHR\CANobsoleteMarginMultiplierB\STX\CAN\SOH\DC2a\n\ + \\EMposition_and_trade_limits\CAN\ETX \SOH(\v2&.traderouting_1.PositionAndTradeLimitsR\SYNpositionAndTradeLimits\DC2M\n\ + \\DC1margin_multiplier\CAN\ENQ \SOH(\v2 .traderouting_1.LimitValueDoubleR\DLEmarginMultiplier\"\236\r\n\ + \\SYNPositionAndTradeLimits\DC2%\n\ + \\SOcleared_fields\CAN\f \ETX(\rR\rclearedFields\DC2i\n\ + \!obsolete_commodity_position_limit\CAN\SOH \SOH(\v2\SUB.traderouting_1.LimitValueR\RSobsoleteCommodityPositionLimitB\STX\CAN\SOH\DC2k\n\ + \\"obsolete_instrument_position_limit\CAN\STX \SOH(\v2\SUB.traderouting_1.LimitValueR\USobsoleteInstrumentPositionLimitB\STX\CAN\SOH\DC2g\n\ + \ obsolete_contract_position_limit\CAN\ETX \SOH(\v2\SUB.traderouting_1.LimitValueR\GSobsoleteContractPositionLimitB\STX\CAN\SOH\DC2Y\n\ + \\EMobsolete_trade_size_limit\CAN\EOT \SOH(\v2\SUB.traderouting_1.LimitValueR\SYNobsoleteTradeSizeLimitB\STX\CAN\SOH\DC2Q\n\ + \\ETBtrade_price_limit_ticks\CAN\ENQ \SOH(\v2\SUB.traderouting_1.LimitValueR\DC4tradePriceLimitTicks\DC2[\n\ + \\EMtrade_price_limit_percent\CAN\ACK \SOH(\v2 .traderouting_1.LimitValueDoubleR\SYNtradePriceLimitPercent\DC2q\n\ + \\"trade_price_limit_ticks_continuous\CAN\a \SOH(\v2%.traderouting_1.TradePriceLimitsTicksR\RStradePriceLimitTicksContinuous\DC2x\n\ + \&trade_price_limit_ticks_non_continuous\CAN\b \SOH(\v2%.traderouting_1.TradePriceLimitsTicksR!tradePriceLimitTicksNonContinuous\DC2w\n\ + \$trade_price_limit_percent_continuous\CAN\t \SOH(\v2'.traderouting_1.TradePriceLimitsPercentR tradePriceLimitPercentContinuous\DC2~\n\ + \(trade_price_limit_percent_non_continuous\CAN\n\ + \ \SOH(\v2'.traderouting_1.TradePriceLimitsPercentR#tradePriceLimitPercentNonContinuous\DC2Q\n\ + \\ETBlast_trading_date_limit\CAN\v \SOH(\v2\SUB.traderouting_1.LimitValueR\DC4lastTradingDateLimit\DC2[\n\ + \\CANcommodity_position_limit\CAN\r \SOH(\v2!.traderouting_1.LimitValueDecimalR\SYNcommodityPositionLimit\DC2]\n\ + \\EMinstrument_position_limit\CAN\SO \SOH(\v2!.traderouting_1.LimitValueDecimalR\ETBinstrumentPositionLimit\DC2Y\n\ + \\ETBcontract_position_limit\CAN\SI \SOH(\v2!.traderouting_1.LimitValueDecimalR\NAKcontractPositionLimit\DC2K\n\ + \\DLEtrade_size_limit\CAN\DLE \SOH(\v2!.traderouting_1.LimitValueDecimalR\SOtradeSizeLimit\DC2Q\n\ + \\DC3long_positions_only\CAN\DC1 \SOH(\v2!.traderouting_1.LimitValueBooleanR\DC1longPositionsOnly\DC2o\n\ + \#commodity_gross_open_position_limit\CAN\DC2 \SOH(\v2!.traderouting_1.LimitValueDecimalR\UScommodityGrossOpenPositionLimit\"\232\SOH\n\ + \\NAKTradePriceLimitsTicks\DC23\n\ + \\abid_ask\CAN\SOH \SOH(\v2\SUB.traderouting_1.LimitValueR\ACKbidAsk\DC2.\n\ + \\EOTlast\CAN\STX \SOH(\v2\SUB.traderouting_1.LimitValueR\EOTlast\DC2.\n\ + \\EOTopen\CAN\ETX \SOH(\v2\SUB.traderouting_1.LimitValueR\EOTopen\DC2:\n\ + \\n\ + \settlement\CAN\EOT \SOH(\v2\SUB.traderouting_1.LimitValueR\n\ + \settlement\"\130\STX\n\ + \\ETBTradePriceLimitsPercent\DC29\n\ + \\abid_ask\CAN\SOH \SOH(\v2 .traderouting_1.LimitValueDoubleR\ACKbidAsk\DC24\n\ + \\EOTlast\CAN\STX \SOH(\v2 .traderouting_1.LimitValueDoubleR\EOTlast\DC24\n\ + \\EOTopen\CAN\ETX \SOH(\v2 .traderouting_1.LimitValueDoubleR\EOTopen\DC2@\n\ + \\n\ + \settlement\CAN\EOT \SOH(\v2 .traderouting_1.LimitValueDoubleR\n\ + \settlement\"\160\STX\n\ + \\DC4ExchangeMarketLimits\DC2%\n\ + \\SOcleared_fields\CAN\EOT \ETX(\rR\rclearedFields\DC2*\n\ + \\DC1exchange_group_id\CAN\SOH \STX(\DC1R\SIexchangeGroupId\DC2V\n\ + \\NAKdefault_market_limits\CAN\STX \SOH(\v2\".traderouting_1.MarketLimitsRecordR\DC3defaultMarketLimits\DC2]\n\ + \\ETBcommodity_market_limits\CAN\ETX \ETX(\v2%.traderouting_1.CommodityMarketLimitsR\NAKcommodityMarketLimits\"\182\EOT\n\ + \\NAKCommodityMarketLimits\DC2%\n\ + \\SOcleared_fields\CAN\ACK \ETX(\rR\rclearedFields\DC22\n\ + \\NAKfungible_commodity_id\CAN\SOH \STX(\DC1R\DC3fungibleCommodityId\DC2G\n\ + \\RSobsolete_tradable_commodity_id\CAN\STX \ETX(\tR\ESCobsoleteTradableCommodityIdB\STX\CAN\SOH\DC2a\n\ + \\EMposition_and_trade_limits\CAN\ETX \SOH(\v2&.traderouting_1.PositionAndTradeLimitsR\SYNpositionAndTradeLimits\DC2`\n\ + \\CANinstrument_market_limits\CAN\EOT \ETX(\v2&.traderouting_1.InstrumentMarketLimitsR\SYNinstrumentMarketLimits\DC2e\n\ + \\FSallowed_to_trade_commodities\CAN\ENQ \ETX(\v2$.traderouting_1.EntityAllowedToTradeR\EMallowedToTradeCommodities\DC2M\n\ + \\DC1margin_multiplier\CAN\a \SOH(\v2 .traderouting_1.LimitValueDoubleR\DLEmarginMultiplier\"\154\ETX\n\ + \\SYNInstrumentMarketLimits\DC2%\n\ + \\SOcleared_fields\CAN\ENQ \ETX(\rR\rclearedFields\DC2,\n\ + \\DC2instrument_type_id\CAN\SOH \STX(\DC1R\DLEinstrumentTypeId\DC2a\n\ + \\EMposition_and_trade_limits\CAN\STX \SOH(\v2&.traderouting_1.PositionAndTradeLimitsR\SYNpositionAndTradeLimits\DC2e\n\ + \\FSallowed_to_trade_commodities\CAN\ETX \ETX(\v2$.traderouting_1.EntityAllowedToTradeR\EMallowedToTradeCommodities\DC2a\n\ + \\SUBallowed_to_trade_contracts\CAN\EOT \ETX(\v2$.traderouting_1.EntityAllowedToTradeR\ETBallowedToTradeContracts\"\145\SOH\n\ + \\DC4EntityAllowedToTrade\DC2%\n\ + \\SOcleared_fields\CAN\EOT \ETX(\rR\rclearedFields\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2(\n\ + \\DLEallowed_to_trade\CAN\STX \SOH(\bR\SOallowedToTrade\DC2\CAN\n\ + \\aenforce\CAN\ETX \SOH(\bR\aenforce\"\195\SOH\n\ + \\DLEContractPosition\DC2\SYN\n\ + \\ACKsymbol\CAN\SOH \STX(\tR\ACKsymbol\DC23\n\ + \\SYNis_short_open_position\CAN\STX \STX(\bR\DC3isShortOpenPosition\DC2A\n\ + \\ropen_position\CAN\ETX \ETX(\v2\FS.traderouting_1.OpenPositionR\fopenPosition\DC2\US\n\ + \\vcontract_id\CAN\EOT \SOH(\tR\n\ + \contractId\"\159\EOT\n\ + \\fOpenPosition\DC2%\n\ + \\fobsolete_qty\CAN\STX \SOH(\rR\vobsoleteQtyB\STX\CAN\SOH\DC2\DC4\n\ + \\ENQprice\CAN\ETX \STX(\SOHR\ENQprice\DC2\GS\n\ + \\n\ + \trade_date\CAN\EOT \STX(\DC2R\ttradeDate\DC2%\n\ + \\SOstatement_date\CAN\ENQ \STX(\DC2R\rstatementDate\DC2$\n\ + \\SOtrade_utc_time\CAN\ACK \SOH(\DC2R\ftradeUtcTime\DC2\US\n\ + \\vposition_id\CAN\a \SOH(\tR\n\ + \positionId\DC2\SYN\n\ + \\ACKstatus\CAN\b \SOH(\rR\ACKstatus\DC2\RS\n\ + \\ETXqty\CAN\t \SOH(\v2\f.cqg.DecimalR\ETXqty\DC28\n\ + \\SYNobsolete_currency_code\CAN\n\ + \ \SOH(\tR\DC4obsoleteCurrencyCodeB\STX\CAN\SOH\DC2)\n\ + \\DLEspeculation_type\CAN\v \SOH(\rR\SIspeculationType\DC2$\n\ + \\SOorder_chain_id\CAN\f \SOH(\tR\forderChainId\DC2#\n\ + \\rdisplay_price\CAN\r \SOH(\DC2R\fdisplayPrice\DC2*\n\ + \\DC1currency_iso_code\CAN\SO \SOH(\tR\SIcurrencyIsoCode\"1\n\ + \\SOPositionStatus\DC2\f\n\ + \\bPOSITION\DLE\SOH\DC2\DC1\n\ + \\rWORKING_ORDER\DLE\STX\"\214\STX\n\ + \\ACKEquity\DC2\SUB\n\ + \\bcurrency\CAN\SOH \STX(\tR\bcurrency\DC2\RS\n\ + \\n\ + \securities\CAN\STX \STX(\SOHR\n\ + \securities\DC2\CAN\n\ + \\abalance\CAN\ETX \STX(\SOHR\abalance\DC2\DLE\n\ + \\ETXote\CAN\EOT \STX(\SOHR\ETXote\DC2!\n\ + \\ftotal_equity\CAN\ENQ \STX(\SOHR\vtotalEquity\DC2\DLE\n\ + \\ETXmvo\CAN\ACK \STX(\SOHR\ETXmvo\DC2\US\n\ + \\vtotal_value\CAN\a \STX(\SOHR\n\ + \totalValue\DC2\US\n\ + \\vcash_excess\CAN\b \SOH(\SOHR\n\ + \cashExcess\DC2%\n\ + \\SOinitial_margin\CAN\t \SOH(\SOHR\rinitialMargin\DC2!\n\ + \\fmaint_margin\CAN\n\ + \ \SOH(\SOHR\vmaintMargin\DC2#\n\ + \\rposted_margin\CAN\v \SOH(\SOHR\fpostedMargin\"v\n\ + \\n\ + \Collateral\DC2\SUB\n\ + \\bcurrency\CAN\EOT \STX(\tR\bcurrency\DC2!\n\ + \\ftotal_margin\CAN\ENQ \STX(\SOHR\vtotalMargin\DC2)\n\ + \\DLEpurchasing_power\CAN\ACK \STX(\SOHR\SIpurchasingPower\"\187\t\n\ + \\ETBOrderSearchResultRecord\DC28\n\ + \\CANbrokerage_account_number\CAN\SOH \STX(\tR\SYNbrokerageAccountNumber\DC2\EM\n\ + \\border_id\CAN\STX \STX(\tR\aorderId\DC2#\n\ + \\rticket_number\CAN\ETX \SOH(\tR\fticketNumber\DC2\DC2\n\ + \\EOTside\CAN\EOT \STX(\rR\EOTside\DC2\DC2\n\ + \\EOTtype\CAN\ENQ \STX(\rR\EOTtype\DC2\US\n\ + \\vlimit_price\CAN\ACK \SOH(\SOHR\n\ + \limitPrice\DC2\GS\n\ + \\n\ + \stop_price\CAN\a \SOH(\SOHR\tstopPrice\DC2#\n\ + \\rcontract_name\CAN\b \STX(\tR\fcontractName\DC2,\n\ + \\DC2submitted_utc_time\CAN\t \STX(\DC2R\DLEsubmittedUtcTime\DC2\SYN\n\ + \\ACKstatus\CAN\n\ + \ \STX(\rR\ACKstatus\DC2\ESC\n\ + \\tuser_name\CAN\v \SOH(\tR\buserName\DC2,\n\ + \\DC2customer_last_name\CAN\f \SOH(\tR\DLEcustomerLastName\DC2%\n\ + \\SObrokerage_name\CAN\r \STX(\tR\rbrokerageName\DC2\GS\n\ + \\n\ + \route_name\CAN\SO \STX(\tR\trouteName\DC2\GS\n\ + \\n\ + \account_id\CAN\SI \STX(\DC1R\taccountId\DC2!\n\ + \\faccount_name\CAN\DLE \STX(\tR\vaccountName\DC2*\n\ + \\DC1native_route_name\CAN\DC1 \SOH(\tR\SInativeRouteName\DC21\n\ + \\NAKroute_client_order_id\CAN\DC2 \STX(\tR\DC2routeClientOrderId\DC2#\n\ + \\rexchange_name\CAN\DC3 \STX(\tR\fexchangeName\DC2$\n\ + \\SOchain_order_id\CAN\DC4 \SOH(\tR\fchainOrderId\DC2.\n\ + \\DC3display_limit_price\CAN\NAK \SOH(\DC2R\DC1displayLimitPrice\DC2,\n\ + \\DC2display_stop_price\CAN\SYN \SOH(\DC2R\DLEdisplayStopPrice\DC2'\n\ + \\robsolete_size\CAN\ETB \SOH(\rR\fobsoleteSizeB\STX\CAN\SOH\DC2.\n\ + \\DC3sales_series_number\CAN\CAN \SOH(\tR\DC1salesSeriesNumber\DC2*\n\ + \\DC1sales_series_name\CAN\EM \SOH(\tR\SIsalesSeriesName\DC2&\n\ + \\SIsales_series_id\CAN\SUB \SOH(\tR\rsalesSeriesId\DC2 \n\ + \\EOTsize\CAN\ESC \SOH(\v2\f.cqg.DecimalR\EOTsize\DC25\n\ + \\ETBprofile_sales_series_id\CAN\FS \SOH(\tR\DC4profileSalesSeriesId\DC2#\n\ + \\rextended_side\CAN\GS \SOH(\rR\fextendedSide\DC2,\n\ + \\DC2batch_request_guid\CAN\RS \SOH(\tR\DLEbatchRequestGuid\DC2\US\n\ + \\vorder_state\CAN\US \SOH(\rR\n\ + \orderState\"v\n\ + \\SOAccountCluster\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2!\n\ + \\fbrokerage_id\CAN\STX \SOH(\tR\vbrokerageId\DC2\DC2\n\ + \\EOTname\CAN\ETX \SOH(\tR\EOTname\DC2\GS\n\ + \\n\ + \is_removed\CAN\EOT \SOH(\bR\tisRemoved\"\228\STX\n\ + \\EMAccountClusterPriceOffset\DC2%\n\ + \\SOcleared_fields\CAN\a \ETX(\rR\rclearedFields\DC2!\n\ + \\fcommodity_id\CAN\SOH \SOH(\tR\vcommodityId\DC2,\n\ + \\DC2instrument_type_id\CAN\STX \SOH(\DC1R\DLEinstrumentTypeId\DC2,\n\ + \\DC2price_offset_ticks\CAN\ETX \SOH(\DC1R\DLEpriceOffsetTicks\DC2,\n\ + \\DC2hedge_offset_ticks\CAN\EOT \SOH(\DC1R\DLEhedgeOffsetTicks\DC24\n\ + \\SYNhedge_exec_instruction\CAN\ENQ \ETX(\rR\DC4hedgeExecInstruction\DC2=\n\ + \\ESCiceberg_visible_qty_percent\CAN\ACK \SOH(\rR\CANicebergVisibleQtyPercent\"\190\STX\n\ + \\SOAvailableRoute\DC2M\n\ + \\DC1route_information\CAN\SOH \SOH(\v2 .traderouting_1.RouteInformationR\DLErouteInformation\DC2\SUB\n\ + \\bpriority\CAN\STX \SOH(\rR\bpriority\DC20\n\ + \\DC4omnibus_support_type\CAN\ETX \SOH(\rR\DC2omnibusSupportType\DC2N\n\ + \\DLEomnibus_accounts\CAN\EOT \ETX(\v2#.traderouting_1.RouteOmnibusAccountR\SIomnibusAccounts\"?\n\ + \\DC2OmnibusSupportType\DC2\SO\n\ + \\n\ + \PROHIBITED\DLE\SOH\DC2\v\n\ + \\aALLOWED\DLE\STX\DC2\f\n\ + \\bREQUIRED\DLE\ETX\"\228\SOH\n\ + \\DC3RouteOmnibusAccount\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2!\n\ + \\faccount_name\CAN\STX \SOH(\tR\vaccountName\DC28\n\ + \\CANbrokerage_account_number\CAN\ETX \SOH(\tR\SYNbrokerageAccountNumber\DC2\SUB\n\ + \\bpriority\CAN\EOT \SOH(\rR\bpriority\DC25\n\ + \\ETBrisk_server_instance_id\CAN\ENQ \SOH(\tR\DC4riskServerInstanceId\"\160\EOT\n\ + \\DLERouteInformation\DC2\GS\n\ + \\n\ + \route_code\CAN\SOH \SOH(\tR\trouteCode\DC2\GS\n\ + \\n\ + \route_name\CAN\STX \SOH(\tR\trouteName\DC21\n\ + \\DC4synthetic_strategies\CAN\ETX \SOH(\bR\DC3syntheticStrategies\DC2E\n\ + \\n\ + \attributes\CAN\EOT \ETX(\v2%.traderouting_1.AccountRouteAttributeR\n\ + \attributes\DC2Q\n\ + \#obsolete_has_overlapped_instruments\CAN\ENQ \SOH(\bR obsoleteHasOverlappedInstrumentsB\STX\CAN\SOH\DC25\n\ + \\SYNauthorization_required\CAN\ACK \SOH(\bR\NAKauthorizationRequired\DC2=\n\ + \\ESCallow_synthetic_order_types\CAN\a \SOH(\bR\CANallowSyntheticOrderTypes\DC2U\n\ + \\NAKroute_algo_strategies\CAN\b \ETX(\v2!.traderouting_1.RouteAlgoStrategyR\DC3routeAlgoStrategies\DC24\n\ + \\SYNprimary_login_required\CAN\t \SOH(\bR\DC4primaryLoginRequired\"a\n\ + \\DC1RouteAlgoStrategy\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\"\n\ + \\EOTname\CAN\STX \SOH(\v2\SO.shared_1.TextR\EOTname\DC2\CAN\n\ + \\aremoved\CAN\ETX \SOH(\bR\aremoved\"/\n\ + \\SORestoreAccount\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\"?\n\ + \\RSAccountTypeOverrideListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\"\206\SOH\n\ + \\GSUpdateAccountTypeOverrideList\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2M\n\ + \\DLEoverrides_to_set\CAN\STX \ETX(\v2#.traderouting_1.AccountTypeOverrideR\SOoverridesToSet\DC2?\n\ + \\DC3overrides_to_remove\CAN\ETX \ETX(\v2\SI.common_1.TupleR\DC1overridesToRemove\"\SYN\n\ + \\DC4RestoreAccountResult\"b\n\ + \\GSAccountTypeOverrideListResult\DC2A\n\ + \\toverrides\CAN\SOH \ETX(\v2#.traderouting_1.AccountTypeOverrideR\toverrides\"\135\SOH\n\ + \\DC3AccountTypeOverride\DC2\US\n\ + \\vexchange_id\CAN\STX \SOH(\tR\n\ + \exchangeId\DC2\EM\n\ + \\blogin_id\CAN\ETX \SOH(\tR\aloginId\DC2\ETB\n\ + \\atype_id\CAN\EOT \SOH(\tR\ACKtypeId\DC2\ESC\n\ + \\torigin_id\CAN\ENQ \SOH(\tR\boriginId\"%\n\ + \#UpdateAccountTypeOverrideListResult\"\160\SOH\n\ + \\"UpdateAccountUserAuthorizationList\DC2A\n\ + \\flinks_to_set\CAN\SOH \ETX(\v2\US.traderouting_1.AccountUserLinkR\n\ + \linksToSet\DC27\n\ + \\SIlinks_to_remove\CAN\STX \ETX(\v2\SI.common_1.TupleR\rlinksToRemove\"*\n\ + \(UpdateAccountUserAuthorizationListResult\".\n\ + \\rRemoveAccount\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\"\NAK\n\ + \\DC3RemoveAccountResult\"H\n\ + \'AccountAvailableServiceGroupListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\"?\n\ + \\RSAccountServiceGroupListRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\"\180\SOH\n\ + \\GSUpdateAccountServiceGroupList\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC26\n\ + \\CANservice_group_ids_to_set\CAN\STX \ETX(\tR\DC4serviceGroupIdsToSet\DC2<\n\ + \\ESCservice_group_ids_to_remove\CAN\ETX \ETX(\tR\ETBserviceGroupIdsToRemove\"m\n\ + \&AccountAvailableServiceGroupListResult\DC2C\n\ + \\SOservice_groups\CAN\SOH \ETX(\v2\FS.traderouting_1.ServiceGroupR\rserviceGroups\"L\n\ + \\fServiceGroup\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\DC2\n\ + \\EOTname\CAN\STX \SOH(\tR\EOTname\DC2\CAN\n\ + \\aremoved\CAN\ETX \SOH(\bR\aremoved\"K\n\ + \\GSAccountServiceGroupListResult\DC2*\n\ + \\DC1service_group_ids\CAN\SOH \ETX(\tR\SIserviceGroupIds\"%\n\ + \#UpdateAccountServiceGroupListResult\"\GS\n\ + \\ESCBillableExchangeListRequest\"m\n\ + \\SUBBillableExchangeListResult\DC2O\n\ + \\DC2billable_exchanges\CAN\SOH \ETX(\v2 .traderouting_1.BillableExchangeR\DC1billableExchanges\"\215\SOH\n\ + \\DLEBillableExchange\DC2\SYN\n\ + \\ACKnumber\CAN\SOH \SOH(\tR\ACKnumber\DC2\DC2\n\ + \\EOTname\CAN\STX \SOH(\tR\EOTname\DC2 \n\ + \\vdescription\CAN\ETX \SOH(\tR\vdescription\DC2I\n\ + \!service_group_authorization_level\CAN\EOT \SOH(\rR\RSserviceGroupAuthorizationLevel\DC2*\n\ + \\DC1service_group_ids\CAN\ENQ \ETX(\tR\SIserviceGroupIds\"^\n\ + \\DC2CreateAccountGroup\DC2H\n\ + \\DC1new_account_group\CAN\SOH \SOH(\v2\FS.traderouting_1.AccountGroupR\SInewAccountGroup\"K\n\ + \\CANCreateAccountGroupResult\DC2/\n\ + \\DC4new_account_group_id\CAN\SOH \SOH(\tR\DC1newAccountGroupId\"\220\SOH\n\ + \\DC2UpdateAccountGroup\DC2A\n\ + \\raccount_group\CAN\SOH \SOH(\v2\FS.traderouting_1.AccountGroupR\faccountGroup\DC2I\n\ + \\DC3sub_accounts_to_set\CAN\STX \ETX(\v2\SUB.traderouting_1.SubAccountR\DLEsubAccountsToSet\DC28\n\ + \\EMsub_account_ids_to_remove\CAN\ETX \ETX(\tR\NAKsubAccountIdsToRemove\">\n\ + \\DC2RemoveAccountGroup\DC2(\n\ + \\DLEaccount_group_id\CAN\SOH \SOH(\tR\SOaccountGroupId\"Z\n\ + \\SYNDeleteAccountPositions\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2!\n\ + \\fposition_ids\CAN\STX \ETX(\tR\vpositionIds\">\n\ + \\GSAccountTradingFeaturesRequest\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\"\155\SOH\n\ + \\FSAccountTradingFeaturesResult\DC2{\n\ + \\"account_trading_interface_elements\CAN\SOH \ETX(\v2..traderouting_1.AccountTradingInterfaceElementR\USaccountTradingInterfaceElements\"\140\STX\n\ + \\FSUpdateAccountTradingFeatures\DC2\GS\n\ + \\n\ + \account_id\CAN\SOH \SOH(\tR\taccountId\DC2x\n\ + \!trading_interface_elements_to_set\CAN\STX \ETX(\v2..traderouting_1.AccountTradingInterfaceElementR\GStradingInterfaceElementsToSet\DC2S\n\ + \'trading_interface_element_ids_to_remove\CAN\ETX \ETX(\tR\"tradingInterfaceElementIdsToRemove\"J\n\ + \\RSAccountTradingInterfaceElement\DC2\SO\n\ + \\STXid\CAN\SOH \SOH(\tR\STXid\DC2\CAN\n\ + \\aenabled\CAN\STX \SOH(\bR\aenabled*\250\SOH\n\ + \\RSTradeRoutingLookupPropertyType\DC2\DLE\n\ + \\fACCOUNT_TYPE\DLEe\DC2\ETB\n\ + \\DC3MODES_ACCOUNT_GROUP\DLEf\DC2\r\n\ + \\tTIME_ZONE\DLEg\DC2\CAN\n\ + \\DC4RISK_SERVER_INSTANCE\DLEh\DC2\DC2\n\ + \\SOTRADE_LOCATION\DLEi\DC2\SI\n\ + \\vORDER_CLASS\DLEj\DC2\DC2\n\ + \\SOACCOUNT_ORIGIN\DLEk\DC2\EM\n\ + \\NAKEXECUTION_SOURCE_CODE\DLEl\DC2\ETB\n\ + \\DC3CQG_MIFID_ALGORITHM\DLEm\DC2\ETB\n\ + \\DC3FLEXIBLE_IDENTIFIER\DLEn*Z\n\ + \\SOPriceLimitMode\DC2\DC2\n\ + \\SOAGGRESSIVE_LMT\DLE\SOH\DC2\SYN\n\ + \\DC2AGGRESSIVE_LMT_STP\DLE\STX\DC2\v\n\ + \\aALL_LMT\DLE\ETX\DC2\SI\n\ + \\vALL_LMT_STP\DLE\EOT*4\n\ + \\tLimitMode\DC2\v\n\ + \\aDEFAULT\DLE\SOH\DC2\r\n\ + \\tUNLIMITED\DLE\STX\DC2\v\n\ + \\aLIMITED\DLE\ETX*N\n\ + \\RSServiceGroupAuthorizationLevel\DC2\b\n\ + \\EOTNONE\DLE\NUL\DC2\DLE\n\ + \\fONE_REQUIRED\DLE\SOH\DC2\DLE\n\ + \\fANY_REQUIRED\DLE\STX*\128\SOH\n\ + \\fExtendedSide\DC2\NAK\n\ + \\DC1EXTENDED_SIDE_BUY\DLE\SOH\DC2\SYN\n\ + \\DC2EXTENDED_SIDE_SELL\DLE\STX\DC2\FS\n\ + \\CANEXTENDED_SIDE_SELL_SHORT\DLE\ENQ\DC2#\n\ + \\USEXTENDED_SIDE_SELL_SHORT_EXEMPT\DLE\ACKJ\191\193\n\ + \\n\ + \\a\DC2\ENQ\a\NUL\232$\SOH\n\ + \\148\STX\n\ + \\SOH\f\DC2\ETX\a\NUL\DC22\137\STX CQG Messages that are related to CQG trade routing system (CQG Gateway)\n\ + \\n\ + \ Protocol time attributes are 64-bit signed integers (sint64) that contain offset in milliseconds from 01.01.1970 (i.e. unix timestamp).\n\ + \\n\ + \ Last changes were made on 01 Feb 2024\n\ + \ Version 1.83\n\ + \\n\ + \\t\n\ + \\STX\ETX\NUL\DC2\ETX\t\NUL\US\n\ + \\t\n\ + \\STX\ETX\SOH\DC2\ETX\n\ + \\NUL\RS\n\ + \\t\n\ + \\STX\ETX\STX\DC2\ETX\v\NUL\FS\n\ + \\t\n\ + \\STX\ETX\ETX\DC2\ETX\f\NUL\ESC\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\SO\NUL\ETB\n\ + \\151\SOH\n\ + \\STX\EOT\NUL\DC2\EOT\NAK\NUL#\SOH\SUBI Request related to trade routing.\n\ + \ Only one optional field is expected.\n\ + \2@//------------------------------------------\n\ + \// Client Messages\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\NAK\b\ESC\n\ + \\US\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX\CAN\EOT\ESC\SUB\DC2 ID of a request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX\CAN\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\CAN\r\DC3\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\CAN\DC4\SYN\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\CAN\EM\SUB\n\ + \9\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX\ESC\EOT;\SUB, Request related to trade routing accounts.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX\ESC\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX\ESC\r \n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\ESC!6\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\ESC9:\n\ + \7\n\ + \\EOT\EOT\NUL\STX\STX\DC2\ETX\RS\EOT7\SUB* Request related to trade routing orders.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\EOT\DC2\ETX\RS\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ACK\DC2\ETX\RS\r\RS\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX\RS\US2\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX\RS56\n\ + \\148\SOH\n\ + \\EOT\EOT\NUL\STX\ETX\DC2\ETX\"\EOTQ\SUB\134\SOH Get a list of related to trade routing lookup properties.\n\ + \ Lookup property types are defined in TradeRoutingLookupPropertyType enum.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\EOT\DC2\ETX\"\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ACK\DC2\ETX\"\r/\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX\"0L\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX\"OP\n\ + \_\n\ + \\STX\EOT\SOH\DC2\ENQ'\NUL\176\SOH\SOH\SUBR Request related to trade routing accounts.\n\ + \ Only one optional field is expected.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX'\b\ESC\n\ + \0\n\ + \\EOT\EOT\SOH\STX\NUL\DC2\ETX*\EOT9\SUB# Get information about an account.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\EOT\DC2\ETX*\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ACK\DC2\ETX*\r\US\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX* 4\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX*78\n\ + \2\n\ + \\EOT\EOT\SOH\STX\SOH\DC2\ETX-\EOT?\SUB% Get balance records for an account.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\EOT\DC2\ETX-\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ACK\DC2\ETX-\r\"\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX-#:\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX-=>\n\ + \)\n\ + \\EOT\EOT\SOH\STX\STX\DC2\ETX0\EOT;\SUB\FS Create new balance record.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\EOT\DC2\ETX0\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ACK\DC2\ETX0\r \n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETX0!6\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETX09:\n\ + \.\n\ + \\EOT\EOT\SOH\STX\ETX\DC2\ETX3\EOT;\SUB! Update existing balance record.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\EOT\DC2\ETX3\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ACK\DC2\ETX3\r \n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETX3!6\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETX39:\n\ + \+\n\ + \\EOT\EOT\SOH\STX\EOT\DC2\ETX6\EOTN\SUB\RS Get account risk parameters.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\EOT\DC2\ETX6\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ACK\DC2\ETX6\r)\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\SOH\DC2\ETX6*I\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EOT\ETX\DC2\ETX6LM\n\ + \e\n\ + \\EOT\EOT\SOH\STX\ENQ\DC2\ETX:\EOTZ\SUBX Update account's risk parameters.\n\ + \ [obsolete] Use UpdateAccountRiskParameters instead.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\EOT\DC2\ETX:\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\ACK\DC2\ETX:\r!\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\SOH\DC2\ETX:\"A\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\ETX\DC2\ETX:DE\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ENQ\b\DC2\ETX:FY\n\ + \\r\n\ + \\ACK\EOT\SOH\STX\ENQ\b\ETX\DC2\ETX:GX\n\ + \*\n\ + \\EOT\EOT\SOH\STX\ACK\DC2\ETX=\EOT=\SUB\GS Search account information.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\EOT\DC2\ETX=\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\ACK\DC2\ETX=\r!\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\SOH\DC2\ETX=\"8\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ACK\ETX\DC2\ETX=;<\n\ + \,\n\ + \\EOT\EOT\SOH\STX\a\DC2\ETX@\EOTD\SUB\US Get enabled account's routes.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\EOT\DC2\ETX@\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\ACK\DC2\ETX@\r$\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\SOH\DC2\ETX@%?\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\a\ETX\DC2\ETX@BC\n\ + \6\n\ + \\EOT\EOT\SOH\STX\b\DC2\ETXC\EOT]\SUB) Get account to user authorization list.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\EOT\DC2\ETXC\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\ACK\DC2\ETXC\r0\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\SOH\DC2\ETXC1X\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\b\ETX\DC2\ETXC[\\\n\ + \$\n\ + \\EOT\EOT\SOH\STX\t\DC2\ETXF\EOTB\SUB\ETB Get account settings.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\EOT\DC2\ETXF\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\ACK\DC2\ETXF\r#\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\SOH\DC2\ETXF$<\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\t\ETX\DC2\ETXF?A\n\ + \\229\SOH\n\ + \\EOT\EOT\SOH\STX\n\ + \\DC2\ETXJ\EOTb\SUB\215\SOH Get list of exchange groups and commodities that are potentially available for the account.\n\ + \ List of enabled exchange groups and commodities along with other settings is requested by account_market_limits_request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\n\ + \\EOT\DC2\ETXJ\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\n\ + \\ACK\DC2\ETXJ\r2\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\n\ + \\SOH\DC2\ETXJ3\\\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\n\ + \\ETX\DC2\ETXJ_a\n\ + \\149\SOH\n\ + \\EOT\EOT\SOH\STX\v\DC2\ETXN\EOTK\SUB\135\SOH Get account market limits.\n\ + \ Account risk parameters with limits enforcement settings is requested by account_risk_parameters_request.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\v\EOT\DC2\ETXN\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\v\ACK\DC2\ETXN\r'\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\v\SOH\DC2\ETXN(E\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\v\ETX\DC2\ETXNHJ\n\ + \\159\STX\n\ + \\EOT\EOT\SOH\STX\f\DC2\ETXT\EOTD\SUB\145\STX Gets account positions data without trades matching.\n\ + \ It includes 'start of day' positions (statement already run).\n\ + \ And current day fills (orders filled during current trading period and statement hasn't been run yet).\n\ + \ Currency fills are included in current day fills. \n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\f\EOT\DC2\ETXT\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\f\ACK\DC2\ETXT\r$\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\f\SOH\DC2\ETXT%>\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\f\ETX\DC2\ETXTAC\n\ + \F\n\ + \\EOT\EOT\SOH\STX\r\DC2\ETXW\EOT>\SUB9 Get account equity based on most recent statement data.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\r\EOT\DC2\ETXW\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\r\ACK\DC2\ETXW\r!\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\r\SOH\DC2\ETXW\"8\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\r\ETX\DC2\ETXW;=\n\ + \?\n\ + \\EOT\EOT\SOH\STX\SO\DC2\ETXZ\EOTF\SUB2 Get current account collateral (margin details).\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SO\EOT\DC2\ETXZ\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SO\ACK\DC2\ETXZ\r%\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SO\SOH\DC2\ETXZ&@\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SO\ETX\DC2\ETXZCE\n\ + \P\n\ + \\EOT\EOT\SOH\STX\SI\DC2\ETX]\EOT-\SUBC Create new account and clone configuration from the existing one.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SI\EOT\DC2\ETX]\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SI\ACK\DC2\ETX]\r\EM\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SI\SOH\DC2\ETX]\SUB'\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SI\ETX\DC2\ETX]*,\n\ + \5\n\ + \\EOT\EOT\SOH\STX\DLE\DC2\ETX`\EOT/\SUB( Update general information of account.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DLE\EOT\DC2\ETX`\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DLE\ACK\DC2\ETX`\r\SUB\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DLE\SOH\DC2\ETX`\ESC)\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DLE\ETX\DC2\ETX`,.\n\ + \0\n\ + \\EOT\EOT\SOH\STX\DC1\DC2\ETXc\EOT@\SUB# Update specific account settings.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC1\EOT\DC2\ETXc\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC1\ACK\DC2\ETXc\r\"\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC1\SOH\DC2\ETXc#:\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC1\ETX\DC2\ETXc=?\n\ + \-\n\ + \\EOT\EOT\SOH\STX\DC2\DC2\ETXf\EOT<\SUB Get account group information.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC2\EOT\DC2\ETXf\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC2\ACK\DC2\ETXf\r \n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC2\SOH\DC2\ETXf!6\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC2\ETX\DC2\ETXf9;\n\ + \.\n\ + \\EOT\EOT\SOH\STX\DC3\DC2\ETXi\EOTM\SUB! Update account risk parameters.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC3\EOT\DC2\ETXi\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC3\ACK\DC2\ETXi\r(\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC3\SOH\DC2\ETXi)G\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC3\ETX\DC2\ETXiJL\n\ + \?\n\ + \\EOT\EOT\SOH\STX\DC4\DC2\ETXl\EOTX\SUB2 Request of all routes available for the account.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC4\EOT\DC2\ETXl\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC4\ACK\DC2\ETXl\r-\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC4\SOH\DC2\ETXl.R\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\DC4\ETX\DC2\ETXlUW\n\ + \*\n\ + \\EOT\EOT\SOH\STX\NAK\DC2\ETXo\EOTC\SUB\GS Update account routes list.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NAK\EOT\DC2\ETXo\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NAK\ACK\DC2\ETXo\r#\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NAK\SOH\DC2\ETXo$=\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\NAK\ETX\DC2\ETXo@B\n\ + \,\n\ + \\EOT\EOT\SOH\STX\SYN\DC2\ETXr\EOTI\SUB\US Update account market limits.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SYN\EOT\DC2\ETXr\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SYN\ACK\DC2\ETXr\r&\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SYN\SOH\DC2\ETXr'C\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SYN\ETX\DC2\ETXrFH\n\ + \\RS\n\ + \\EOT\EOT\SOH\STX\ETB\DC2\ETXu\EOT/\SUB\DC1 Create account.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETB\EOT\DC2\ETXu\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETB\ACK\DC2\ETXu\r\SUB\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETB\SOH\DC2\ETXu\ESC)\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\ETB\ETX\DC2\ETXu,.\n\ + \@\n\ + \\EOT\EOT\SOH\STX\CAN\DC2\ETXx\EOT]\SUB3 [obsolete] This operation is no longer supported.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\CAN\EOT\DC2\ETXx\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\CAN\ACK\DC2\ETXx\r\"\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\CAN\SOH\DC2\ETXx#C\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\CAN\ETX\DC2\ETXxFH\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\CAN\b\DC2\ETXxI\\\n\ + \\r\n\ + \\ACK\EOT\SOH\STX\CAN\b\ETX\DC2\ETXxJ[\n\ + \@\n\ + \\EOT\EOT\SOH\STX\EM\DC2\ETX{\EOT[\SUB3 [obsolete] This operation is no longer supported.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EM\EOT\DC2\ETX{\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EM\ACK\DC2\ETX{\r!\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EM\SOH\DC2\ETX{\"A\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EM\ETX\DC2\ETX{DF\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\EM\b\DC2\ETX{GZ\n\ + \\r\n\ + \\ACK\EOT\SOH\STX\EM\b\ETX\DC2\ETX{HY\n\ + \@\n\ + \\EOT\EOT\SOH\STX\SUB\DC2\ETX~\EOT[\SUB3 [obsolete] This operation is no longer supported.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SUB\EOT\DC2\ETX~\EOT\f\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SUB\ACK\DC2\ETX~\r!\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SUB\SOH\DC2\ETX~\"A\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SUB\ETX\DC2\ETX~DF\n\ + \\f\n\ + \\ENQ\EOT\SOH\STX\SUB\b\DC2\ETX~GZ\n\ + \\r\n\ + \\ACK\EOT\SOH\STX\SUB\b\ETX\DC2\ETX~HY\n\ + \A\n\ + \\EOT\EOT\SOH\STX\ESC\DC2\EOT\129\SOH\EOTu\SUB3 [obsolete] This operation is no longer supported.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\ESC\EOT\DC2\EOT\129\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\ESC\ACK\DC2\EOT\129\SOH\r-\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\ESC\SOH\DC2\EOT\129\SOH.[\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\ESC\ETX\DC2\EOT\129\SOH^`\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\ESC\b\DC2\EOT\129\SOHat\n\ + \\SO\n\ + \\ACK\EOT\SOH\STX\ESC\b\ETX\DC2\EOT\129\SOHbs\n\ + \ \n\ + \\EOT\EOT\SOH\STX\FS\DC2\EOT\132\SOH\EOT1\SUB\DC2 Restore account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\FS\EOT\DC2\EOT\132\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\FS\ACK\DC2\EOT\132\SOH\r\ESC\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\FS\SOH\DC2\EOT\132\SOH\FS+\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\FS\ETX\DC2\EOT\132\SOH.0\n\ + \9\n\ + \\EOT\EOT\SOH\STX\GS\DC2\EOT\135\SOH\EOTT\SUB+ Account type overrides per exchange list.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\GS\EOT\DC2\EOT\135\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\GS\ACK\DC2\EOT\135\SOH\r+\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\GS\SOH\DC2\EOT\135\SOH,N\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\GS\ETX\DC2\EOT\135\SOHQS\n\ + \3\n\ + \\EOT\EOT\SOH\STX\RS\DC2\EOT\138\SOH\EOTR\SUB% Update account type overrides list.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\RS\EOT\DC2\EOT\138\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\RS\ACK\DC2\EOT\138\SOH\r*\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\RS\SOH\DC2\EOT\138\SOH+L\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\RS\ETX\DC2\EOT\138\SOHOQ\n\ + \:\n\ + \\EOT\EOT\SOH\STX\US\DC2\EOT\141\SOH\EOT\\\SUB, Update account to user authorization list.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\US\EOT\DC2\EOT\141\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\US\ACK\DC2\EOT\141\SOH\r/\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\US\SOH\DC2\EOT\141\SOH0V\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\US\ETX\DC2\EOT\141\SOHY[\n\ + \\US\n\ + \\EOT\EOT\SOH\STX \DC2\EOT\144\SOH\EOT/\SUB\DC1 Remove account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX \EOT\DC2\EOT\144\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX \ACK\DC2\EOT\144\SOH\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX \SOH\DC2\EOT\144\SOH\ESC)\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX \ETX\DC2\EOT\144\SOH,.\n\ + \]\n\ + \\EOT\EOT\SOH\STX!\DC2\EOT\147\SOH\EOTg\SUBO Gets available to account list of Service Groups according to enabled routes.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX!\EOT\DC2\EOT\147\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX!\ACK\DC2\EOT\147\SOH\r4\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX!\SOH\DC2\EOT\147\SOH5a\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX!\ETX\DC2\EOT\147\SOHdf\n\ + \6\n\ + \\EOT\EOT\SOH\STX\"\DC2\EOT\150\SOH\EOTT\SUB( Gets account's enabled Service Groups.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\"\EOT\DC2\EOT\150\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\"\ACK\DC2\EOT\150\SOH\r+\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\"\SOH\DC2\EOT\150\SOH,N\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX\"\ETX\DC2\EOT\150\SOHQS\n\ + \A\n\ + \\EOT\EOT\SOH\STX#\DC2\EOT\153\SOH\EOTR\SUB3 Updates list of account's enabled Service Groups.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX#\EOT\DC2\EOT\153\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX#\ACK\DC2\EOT\153\SOH\r*\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX#\SOH\DC2\EOT\153\SOH+L\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX#\ETX\DC2\EOT\153\SOHOQ\n\ + \M\n\ + \\EOT\EOT\SOH\STX$\DC2\EOT\156\SOH\EOTM\SUB? Gets billable exchanges available to the current admin login.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX$\EOT\DC2\EOT\156\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX$\ACK\DC2\EOT\156\SOH\r(\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX$\SOH\DC2\EOT\156\SOH)G\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX$\ETX\DC2\EOT\156\SOHJL\n\ + \G\n\ + \\EOT\EOT\SOH\STX%\DC2\EOT\159\SOH\EOT:\SUB9 Creates new account group with master and sub accounts.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX%\EOT\DC2\EOT\159\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX%\ACK\DC2\EOT\159\SOH\r\US\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX%\SOH\DC2\EOT\159\SOH 4\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX%\ETX\DC2\EOT\159\SOH79\n\ + \/\n\ + \\EOT\EOT\SOH\STX&\DC2\EOT\162\SOH\EOT:\SUB! Updates existing account group.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX&\EOT\DC2\EOT\162\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX&\ACK\DC2\EOT\162\SOH\r\US\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX&\SOH\DC2\EOT\162\SOH 4\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX&\ETX\DC2\EOT\162\SOH79\n\ + \/\n\ + \\EOT\EOT\SOH\STX'\DC2\EOT\165\SOH\EOT:\SUB! Removes existing account group.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX'\EOT\DC2\EOT\165\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX'\ACK\DC2\EOT\165\SOH\r\US\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX'\SOH\DC2\EOT\165\SOH 4\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX'\ETX\DC2\EOT\165\SOH79\n\ + \\189\SOH\n\ + \\EOT\EOT\SOH\STX(\DC2\EOT\169\SOH\EOTB\SUB\174\SOH Deletes specific positions data or all positions data on specific account.\n\ + \ It only deletes data of statement positions, does not do real positions liquidation on exchange.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX(\EOT\DC2\EOT\169\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX(\ACK\DC2\EOT\169\SOH\r#\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX(\SOH\DC2\EOT\169\SOH$<\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX(\ETX\DC2\EOT\169\SOH?A\n\ + \:\n\ + \\EOT\EOT\SOH\STX)\DC2\EOT\172\SOH\EOTQ\SUB, Requests trading features for the account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX)\EOT\DC2\EOT\172\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX)\ACK\DC2\EOT\172\SOH\r*\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX)\SOH\DC2\EOT\172\SOH+K\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX)\ETX\DC2\EOT\172\SOHNP\n\ + \3\n\ + \\EOT\EOT\SOH\STX*\DC2\EOT\175\SOH\EOTO\SUB% Updates account's trading features.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX*\EOT\DC2\EOT\175\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX*\ACK\DC2\EOT\175\SOH\r)\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX*\SOH\DC2\EOT\175\SOH*I\n\ + \\r\n\ + \\ENQ\EOT\SOH\STX*\ETX\DC2\EOT\175\SOHLN\n\ + \^\n\ + \\STX\EOT\STX\DC2\ACK\180\SOH\NUL\225\SOH\SOH\SUBP Request related to trade routing orders.\n\ + \ Only one optional field is expected.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\STX\SOH\DC2\EOT\180\SOH\b\EM\n\ + \\"\n\ + \\EOT\EOT\STX\STX\NUL\DC2\EOT\183\SOH\EOT;\SUB\DC4 Get order details.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\NUL\EOT\DC2\EOT\183\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\NUL\ACK\DC2\EOT\183\SOH\r \n\ + \\r\n\ + \\ENQ\EOT\STX\STX\NUL\SOH\DC2\EOT\183\SOH!6\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\NUL\ETX\DC2\EOT\183\SOH9:\n\ + \/\n\ + \\EOT\EOT\STX\STX\SOH\DC2\EOT\186\SOH\EOT\"\SUB! Add fill to the existing order.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SOH\EOT\DC2\EOT\186\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SOH\ACK\DC2\EOT\186\SOH\r\DC4\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SOH\SOH\DC2\EOT\186\SOH\NAK\GS\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SOH\ETX\DC2\EOT\186\SOH !\n\ + \*\n\ + \\EOT\EOT\STX\STX\STX\DC2\EOT\189\SOH\EOT;\SUB\FS Create new external order.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\EOT\DC2\EOT\189\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\ACK\DC2\EOT\189\SOH\r \n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\SOH\DC2\EOT\189\SOH!6\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\STX\ETX\DC2\EOT\189\SOH9:\n\ + \2\n\ + \\EOT\EOT\STX\STX\ETX\DC2\EOT\192\SOH\EOT9\SUB$ Search order requests information.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\EOT\DC2\EOT\192\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\ACK\DC2\EOT\192\SOH\r\US\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\SOH\DC2\EOT\192\SOH 4\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ETX\ETX\DC2\EOT\192\SOH78\n\ + \c\n\ + \\EOT\EOT\STX\STX\EOT\DC2\EOT\195\SOH\EOTD\SUBU Requests tree with related order chains for synthetic or synthetic strategy orders.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\EOT\DC2\EOT\195\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\ACK\DC2\EOT\195\SOH\r$\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\SOH\DC2\EOT\195\SOH%?\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\EOT\ETX\DC2\EOT\195\SOHBC\n\ + \%\n\ + \\EOT\EOT\STX\STX\ENQ\DC2\EOT\198\SOH\EOTF\SUB\ETB Compound orders tree.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ENQ\EOT\DC2\EOT\198\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ENQ\ACK\DC2\EOT\198\SOH\r%\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ENQ\SOH\DC2\EOT\198\SOH&A\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ENQ\ETX\DC2\EOT\198\SOHDE\n\ + \C\n\ + \\EOT\EOT\STX\STX\ACK\DC2\EOT\201\SOH\EOTN\SUB5 Order strategy tree, describing synthetic strategy.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ACK\EOT\DC2\EOT\201\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ACK\ACK\DC2\EOT\201\SOH\r)\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ACK\SOH\DC2\EOT\201\SOH*I\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\ACK\ETX\DC2\EOT\201\SOHLM\n\ + \'\n\ + \\EOT\EOT\STX\STX\a\DC2\EOT\204\SOH\EOT*\SUB\EM Cancel order operation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\a\EOT\DC2\EOT\204\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\a\ACK\DC2\EOT\204\SOH\r\CAN\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\a\SOH\DC2\EOT\204\SOH\EM%\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\a\ETX\DC2\EOT\204\SOH()\n\ + \Z\n\ + \\EOT\EOT\STX\STX\b\DC2\EOT\207\SOH\EOTB\SUBL Reflect order as canceled without sending real cancel request to exchange.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\b\EOT\DC2\EOT\207\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\b\ACK\DC2\EOT\207\SOH\r#\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\b\SOH\DC2\EOT\207\SOH$=\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\b\ETX\DC2\EOT\207\SOH@A\n\ + \5\n\ + \\EOT\EOT\STX\STX\t\DC2\EOT\210\SOH\EOTE\SUB' Cancel whole tree of compound orders.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\t\EOT\DC2\EOT\210\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\t\ACK\DC2\EOT\210\SOH\r$\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\t\SOH\DC2\EOT\210\SOH%?\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\t\ETX\DC2\EOT\210\SOHBD\n\ + \\f\n\ + \\EOT\EOT\STX\STX\n\ + \\DC2\EOT\212\SOH\EOTL\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\n\ + \\EOT\DC2\EOT\212\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\n\ + \\ACK\DC2\EOT\212\SOH\r'\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\n\ + \\SOH\DC2\EOT\212\SOH(F\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\n\ + \\ETX\DC2\EOT\212\SOHIK\n\ + \\f\n\ + \\EOT\EOT\STX\STX\v\DC2\EOT\214\SOH\EOT/\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\v\EOT\DC2\EOT\214\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\v\ACK\DC2\EOT\214\SOH\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\v\SOH\DC2\EOT\214\SOH\ESC)\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\v\ETX\DC2\EOT\214\SOH,.\n\ + \\f\n\ + \\EOT\EOT\STX\STX\f\DC2\EOT\216\SOH\EOT+\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\f\EOT\DC2\EOT\216\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\f\ACK\DC2\EOT\216\SOH\r\CAN\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\f\SOH\DC2\EOT\216\SOH\EM%\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\f\ETX\DC2\EOT\216\SOH(*\n\ + \\f\n\ + \\EOT\EOT\STX\STX\r\DC2\EOT\218\SOH\EOT)\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\r\EOT\DC2\EOT\218\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\r\ACK\DC2\EOT\218\SOH\r\ETB\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\r\SOH\DC2\EOT\218\SOH\CAN#\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\r\ETX\DC2\EOT\218\SOH&(\n\ + \J\n\ + \\EOT\EOT\STX\STX\SO\DC2\EOT\221\SOH\EOT+\SUB< Exclude order from (or include order to) risk calculation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SO\EOT\DC2\EOT\221\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SO\ACK\DC2\EOT\221\SOH\r\CAN\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SO\SOH\DC2\EOT\221\SOH\EM%\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SO\ETX\DC2\EOT\221\SOH(*\n\ + \A\n\ + \\EOT\EOT\STX\STX\SI\DC2\EOT\224\SOH\EOTF\SUB3 Cancels all orders satisfying the given criteria.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SI\EOT\DC2\EOT\224\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SI\ACK\DC2\EOT\224\SOH\r)\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SI\SOH\DC2\EOT\224\SOH*@\n\ + \\r\n\ + \\ENQ\EOT\STX\STX\SI\ETX\DC2\EOT\224\SOHCE\n\ + \\231\SOH\n\ + \\STX\EOT\ETX\DC2\ACK\231\SOH\NUL\245\SOH\SOH\SUB\216\SOH Order details request message.\n\ + \ Get information about an order chain.\n\ + \ By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records.\n\ + \ Set parameter order_requests_top to a larger number to receive more.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ETX\SOH\DC2\EOT\231\SOH\b\ESC\n\ + \i\n\ + \\EOT\EOT\ETX\STX\NUL\DC2\EOT\235\SOH\EOT#\SUB[ ID of the account that was used to place the order.\n\ + \ Has priority over trade_location_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\EOT\DC2\EOT\235\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\EOT\235\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\EOT\235\SOH\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\EOT\235\SOH!\"\n\ + \X\n\ + \\EOT\EOT\ETX\STX\SOH\DC2\EOT\238\SOH\EOT!\SUBJ [required] Server order identifier (one of order ID within order chain).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SOH\EOT\DC2\EOT\238\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SOH\ENQ\DC2\EOT\238\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\EOT\238\SOH\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\EOT\238\SOH\US \n\ + \*\n\ + \\EOT\EOT\ETX\STX\STX\DC2\EOT\241\SOH\EOT*\SUB\FS Trade location identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\STX\EOT\DC2\EOT\241\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\STX\ENQ\DC2\EOT\241\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\STX\SOH\DC2\EOT\241\SOH\DC4%\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\STX\ETX\DC2\EOT\241\SOH()\n\ + \n\n\ + \\EOT\EOT\ETX\STX\ETX\DC2\EOT\244\SOH\EOT+\SUB` Optionally restrict order requests in the chain by returning 'top' ones of the last submitted.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ETX\EOT\DC2\EOT\244\SOH\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ETX\ENQ\DC2\EOT\244\SOH\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ETX\SOH\DC2\EOT\244\SOH\DC4&\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\ETX\ETX\DC2\EOT\244\SOH)*\n\ + \\251\SOH\n\ + \\STX\EOT\EOT\DC2\ACK\252\SOH\NUL\167\STX\SOH\SUB\236\SOH Add fill message.\n\ + \ Fills may only be added to single leg (outright) orders.\n\ + \ Server automatically creates an order and matching leg fill.\n\ + \ Either account_id or trade_location_id is required.\n\ + \ Either price or display_price is required.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\EOT\SOH\DC2\EOT\252\SOH\b\SI\n\ + \w\n\ + \\EOT\EOT\EOT\STX\NUL\DC2\EOT\128\STX\EOT#\SUBi Identifier of a trade routing account that is used to add a fill.\n\ + \ Has priority over trade_location_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\EOT\DC2\EOT\128\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\EOT\128\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\EOT\128\STX\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\EOT\128\STX!\"\n\ + \W\n\ + \\EOT\EOT\EOT\STX\SOH\DC2\EOT\131\STX\EOT!\SUBI [required] Order identifier assigned by server after last modification.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\EOT\DC2\EOT\131\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\ENQ\DC2\EOT\131\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\EOT\131\STX\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\EOT\131\STX\US \n\ + \6\n\ + \\EOT\EOT\EOT\STX\STX\DC2\EOT\134\STX\EOT>\SUB( [obsolete] Use quantity field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\STX\EOT\DC2\EOT\134\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\STX\ENQ\DC2\EOT\134\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\STX\SOH\DC2\EOT\134\STX\DC4%\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\STX\ETX\DC2\EOT\134\STX()\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\STX\b\DC2\EOT\134\STX*=\n\ + \\SO\n\ + \\ACK\EOT\EOT\STX\STX\b\ETX\DC2\EOT\134\STX+<\n\ + \u\n\ + \\EOT\EOT\EOT\STX\ETX\DC2\EOT\139\STX\EOT\RS\SUBg Price at which the lots were bought or sold.\n\ + \ Correct price format.\n\ + \ Has priority over display_price.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ETX\EOT\DC2\EOT\139\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ETX\ENQ\DC2\EOT\139\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ETX\SOH\DC2\EOT\139\STX\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ETX\ETX\DC2\EOT\139\STX\FS\GS\n\ + \N\n\ + \\EOT\EOT\EOT\STX\EOT\DC2\EOT\142\STX\EOT&\SUB@ UTC time of the fill (offset in milliseconds from 01.01.1970).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\EOT\EOT\DC2\EOT\142\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\EOT\ENQ\DC2\EOT\142\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\EOT\SOH\DC2\EOT\142\STX\DC4!\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\EOT\ETX\DC2\EOT\142\STX$%\n\ + \g\n\ + \\EOT\EOT\EOT\STX\ENQ\DC2\EOT\145\STX\EOT$\SUBY Flag that trade was aggressive (Fixed Income specific order modifier; true by default).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ENQ\EOT\DC2\EOT\145\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ENQ\ENQ\DC2\EOT\145\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ENQ\SOH\DC2\EOT\145\STX\DC2\US\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ENQ\ETX\DC2\EOT\145\STX\"#\n\ + \o\n\ + \\EOT\EOT\EOT\STX\ACK\DC2\EOT\149\STX\EOT&\SUBa Price of the single fill to apply to the order.\n\ + \ Display price format for the order's contract.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ACK\EOT\DC2\EOT\149\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ACK\ENQ\DC2\EOT\149\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ACK\SOH\DC2\EOT\149\STX\DC4!\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\ACK\ETX\DC2\EOT\149\STX$%\n\ + \n\n\ + \\EOT\EOT\EOT\STX\a\DC2\EOT\153\STX\EOT(\SUB` Order fill open/close type.\n\ + \ This field is associated with OrderChain.OpenCloseType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\a\EOT\DC2\EOT\153\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\a\ENQ\DC2\EOT\153\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\a\SOH\DC2\EOT\153\STX\DC4#\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\a\ETX\DC2\EOT\153\STX&'\n\ + \q\n\ + \\EOT\EOT\EOT\STX\b\DC2\EOT\157\STX\EOT)\SUBc Order fill speculation type.\n\ + \ This field is associated with OrderChain.SpeculationType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\b\EOT\DC2\EOT\157\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\b\ENQ\DC2\EOT\157\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\b\SOH\DC2\EOT\157\STX\DC4$\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\b\ETX\DC2\EOT\157\STX'(\n\ + \\US\n\ + \\EOT\EOT\EOT\STX\t\DC2\EOT\160\STX\EOT+\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\t\EOT\DC2\EOT\160\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\t\ENQ\DC2\EOT\160\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\t\SOH\DC2\EOT\160\STX\DC4%\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\t\ETX\DC2\EOT\160\STX(*\n\ + \S\n\ + \\EOT\EOT\EOT\STX\n\ + \\DC2\EOT\163\STX\EOT'\SUBE [required] Quantity of bought or sold lots depending on order side.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\n\ + \\EOT\DC2\EOT\163\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\n\ + \\ACK\DC2\EOT\163\STX\r\CAN\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\n\ + \\SOH\DC2\EOT\163\STX\EM!\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\n\ + \\ETX\DC2\EOT\163\STX$&\n\ + \@\n\ + \\EOT\EOT\EOT\STX\v\DC2\EOT\166\STX\EOT.\SUB2 Flag for wait replication from local to central.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\v\EOT\DC2\EOT\166\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\v\ENQ\DC2\EOT\166\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\v\SOH\DC2\EOT\166\STX\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\v\ETX\DC2\EOT\166\STX\EM\ESC\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\v\b\DC2\EOT\166\STX\FS-\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\v\a\DC2\EOT\166\STX',\n\ + \\139\ETX\n\ + \\STX\EOT\ENQ\DC2\ACK\175\STX\NUL\243\STX\SOH\SUB\252\STX Create external order and fill message.\n\ + \ Only single leg (outright) orders are supported.\n\ + \ Server automatically creates an order and matching leg fill.\n\ + \ Either fill_price or display_fill_price is required.\n\ + \ Either limit_price or display_limit_price is required for limit and stop-limit orders.\n\ + \ Either stop_price or display_stop_price is required for stop and stop-limit orders.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ENQ\SOH\DC2\EOT\175\STX\b\ESC\n\ + \&\n\ + \\EOT\EOT\ENQ\STX\NUL\DC2\EOT\178\STX\EOT#\SUB\CAN [required] Account ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\EOT\DC2\EOT\178\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\ENQ\DC2\EOT\178\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\EOT\178\STX\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\EOT\178\STX!\"\n\ + \#\n\ + \\EOT\EOT\ENQ\STX\SOH\DC2\EOT\181\STX\EOT \SUB\NAK [required] User ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\EOT\DC2\EOT\181\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\ENQ\DC2\EOT\181\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\SOH\DC2\EOT\181\STX\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SOH\ETX\DC2\EOT\181\STX\RS\US\n\ + \0\n\ + \\EOT\EOT\ENQ\STX\STX\DC2\EOT\184\STX\EOT(\SUB\" [required] Full contract symbol.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\EOT\DC2\EOT\184\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\ENQ\DC2\EOT\184\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\SOH\DC2\EOT\184\STX\DC4#\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\STX\ETX\DC2\EOT\184\STX&'\n\ + \`\n\ + \\EOT\EOT\ENQ\STX\ETX\DC2\EOT\188\STX\EOT\GS\SUBR Order side.\n\ + \ [required] This field is associated with OrderChain.Side enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\EOT\DC2\EOT\188\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\ENQ\DC2\EOT\188\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\SOH\DC2\EOT\188\STX\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ETX\ETX\DC2\EOT\188\STX\ESC\FS\n\ + \e\n\ + \\EOT\EOT\ENQ\STX\EOT\DC2\EOT\192\STX\EOT#\SUBW Order type.\n\ + \ [required] This field is associated with OrderChain.OrderType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\EOT\DC2\EOT\192\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\ENQ\DC2\EOT\192\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\SOH\DC2\EOT\192\STX\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\EOT\ETX\DC2\EOT\192\STX!\"\n\ + \h\n\ + \\EOT\EOT\ENQ\STX\ENQ\DC2\EOT\197\STX\EOT$\SUBZ Limit price of the order.\n\ + \ Correct price format.\n\ + \ Has priority over display_limit_price.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ENQ\EOT\DC2\EOT\197\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ENQ\ENQ\DC2\EOT\197\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ENQ\SOH\DC2\EOT\197\STX\DC4\US\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ENQ\ETX\DC2\EOT\197\STX\"#\n\ + \f\n\ + \\EOT\EOT\ENQ\STX\ACK\DC2\EOT\202\STX\EOT#\SUBX Stop price of the order.\n\ + \ Correct price format.\n\ + \ Has priority over display_stop_price.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ACK\EOT\DC2\EOT\202\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ACK\ENQ\DC2\EOT\202\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ACK\SOH\DC2\EOT\202\STX\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\ACK\ETX\DC2\EOT\202\STX!\"\n\ + \;\n\ + \\EOT\EOT\ENQ\STX\a\DC2\EOT\205\STX\EOTC\SUB- [obsolete] Use fill_quantity field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\a\EOT\DC2\EOT\205\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\a\ENQ\DC2\EOT\205\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\a\SOH\DC2\EOT\205\STX\DC4*\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\a\ETX\DC2\EOT\205\STX-.\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\a\b\DC2\EOT\205\STX/B\n\ + \\SO\n\ + \\ACK\EOT\ENQ\STX\a\b\ETX\DC2\EOT\205\STX0A\n\ + \\155\SOH\n\ + \\EOT\EOT\ENQ\STX\b\DC2\EOT\210\STX\EOT#\SUB\140\SOH Price of the single fill to apply to the order.\n\ + \ CQG correct price format for the order's contract.\n\ + \ Has priority over display_fill_price.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\b\EOT\DC2\EOT\210\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\b\ENQ\DC2\EOT\210\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\b\SOH\DC2\EOT\210\STX\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\b\ETX\DC2\EOT\210\STX!\"\n\ + \%\n\ + \\EOT\EOT\ENQ\STX\t\DC2\EOT\213\STX\EOT'\SUB\ETB UTC time of the fill.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\t\EOT\DC2\EOT\213\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\t\ENQ\DC2\EOT\213\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\t\SOH\DC2\EOT\213\STX\DC4!\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\t\ETX\DC2\EOT\213\STX$&\n\ + \k\n\ + \\EOT\EOT\ENQ\STX\n\ + \\DC2\EOT\217\STX\EOT-\SUB] Limit price of the order (required for limit and stop-limit orders).\n\ + \ Display price format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\n\ + \\EOT\DC2\EOT\217\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\n\ + \\ENQ\DC2\EOT\217\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\n\ + \\SOH\DC2\EOT\217\STX\DC4'\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\n\ + \\ETX\DC2\EOT\217\STX*,\n\ + \i\n\ + \\EOT\EOT\ENQ\STX\v\DC2\EOT\221\STX\EOT,\SUB[ Stop price of the order (required for stop and stop-limit orders).\n\ + \ Display price format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\v\EOT\DC2\EOT\221\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\v\ENQ\DC2\EOT\221\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\v\SOH\DC2\EOT\221\STX\DC4&\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\v\ETX\DC2\EOT\221\STX)+\n\ + \o\n\ + \\EOT\EOT\ENQ\STX\f\DC2\EOT\225\STX\EOT,\SUBa Price of the single fill to apply to the order.\n\ + \ Display price format for the order's contract.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\f\EOT\DC2\EOT\225\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\f\ENQ\DC2\EOT\225\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\f\SOH\DC2\EOT\225\STX\DC4&\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\f\ETX\DC2\EOT\225\STX)+\n\ + \i\n\ + \\EOT\EOT\ENQ\STX\r\DC2\EOT\229\STX\EOT)\SUB[ Order open/close type.\n\ + \ This field is associated with OrderChain.OpenCloseType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\r\EOT\DC2\EOT\229\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\r\ENQ\DC2\EOT\229\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\r\SOH\DC2\EOT\229\STX\DC4#\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\r\ETX\DC2\EOT\229\STX&(\n\ + \l\n\ + \\EOT\EOT\ENQ\STX\SO\DC2\EOT\233\STX\EOT*\SUB^ Order speculation type.\n\ + \ This field is associated with OrderChain.SpeculationType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SO\EOT\DC2\EOT\233\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SO\ENQ\DC2\EOT\233\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SO\SOH\DC2\EOT\233\STX\DC4$\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SO\ETX\DC2\EOT\233\STX')\n\ + \A\n\ + \\EOT\EOT\ENQ\STX\SI\DC2\EOT\236\STX\EOT*\SUB3 Flag that trade was aggressive (null by default).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SI\EOT\DC2\EOT\236\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SI\ENQ\DC2\EOT\236\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SI\SOH\DC2\EOT\236\STX\DC2$\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\SI\ETX\DC2\EOT\236\STX')\n\ + \M\n\ + \\EOT\EOT\ENQ\STX\DLE\DC2\EOT\239\STX\EOT,\SUB? [required] Quantity of the single fill to apply to the order.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\DLE\EOT\DC2\EOT\239\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\DLE\ACK\DC2\EOT\239\STX\r\CAN\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\DLE\SOH\DC2\EOT\239\STX\EM&\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\DLE\ETX\DC2\EOT\239\STX)+\n\ + \@\n\ + \\EOT\EOT\ENQ\STX\DC1\DC2\EOT\242\STX\EOT.\SUB2 Flag for wait replication from local to central.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\DC1\EOT\DC2\EOT\242\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\DC1\ENQ\DC2\EOT\242\STX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\DC1\SOH\DC2\EOT\242\STX\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\DC1\ETX\DC2\EOT\242\STX\EM\ESC\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\DC1\b\DC2\EOT\242\STX\FS-\n\ + \\r\n\ + \\ENQ\EOT\ENQ\STX\DC1\a\DC2\EOT\242\STX',\n\ + \\231\SOH\n\ + \\STX\EOT\ACK\DC2\ACK\249\STX\NUL\234\ETX\SOH\SUB\216\SOH Order search request message.\n\ + \ Server returns a list of found order request records.\n\ + \ By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records.\n\ + \ Set parameter top to a larger number to receive more.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ACK\SOH\DC2\EOT\249\STX\b\SUB\n\ + \*\n\ + \\EOT\EOT\ACK\STX\NUL\DC2\EOT\252\STX\EOT:\SUB\FS [obsolete] Text to search.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\EOT\DC2\EOT\252\STX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\EOT\252\STX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\EOT\252\STX\DC4!\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\EOT\252\STX$%\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\b\DC2\EOT\252\STX&9\n\ + \\SO\n\ + \\ACK\EOT\ACK\STX\NUL\b\ETX\DC2\EOT\252\STX'8\n\ + \:\n\ + \\EOT\EOT\ACK\EOT\NUL\DC2\ACK\255\STX\EOT\212\ETX\ENQ\SUB* List of possible search refine criteria.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\EOT\NUL\SOH\DC2\EOT\255\STX\t\ETB\n\ + \-\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\NUL\DC2\EOT\130\ETX\b\NAK\SUB\GS Search by order request id.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\NUL\SOH\DC2\EOT\130\ETX\b\DLE\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\NUL\STX\DC2\EOT\130\ETX\DC3\DC4\n\ + \,\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\SOH\DC2\EOT\133\ETX\b\FS\SUB\FS Search by client order ID.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\SOH\SOH\DC2\EOT\133\ETX\b\ETB\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\SOH\STX\DC2\EOT\133\ETX\SUB\ESC\n\ + \a\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\STX\DC2\EOT\137\ETX\b\SUB\SUBQ Search by order ticket number\n\ + \ (order identifier assigned by execution system).\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\STX\SOH\DC2\EOT\137\ETX\b\NAK\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\STX\STX\DC2\EOT\137\ETX\CAN\EM\n\ + \+\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\ETX\DC2\EOT\140\ETX\b\NAK\SUB\ESC Search by order contract.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\ETX\SOH\DC2\EOT\140\ETX\b\DLE\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\ETX\STX\DC2\EOT\140\ETX\DC3\DC4\n\ + \'\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\EOT\DC2\EOT\143\ETX\b\ETB\SUB\ETB Search by account id.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\EOT\SOH\DC2\EOT\143\ETX\b\DC2\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\EOT\STX\DC2\EOT\143\ETX\NAK\SYN\n\ + \)\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\ENQ\DC2\EOT\146\ETX\b\EM\SUB\EM Search by account name.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\ENQ\SOH\DC2\EOT\146\ETX\b\DC4\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\ENQ\STX\DC2\EOT\146\ETX\ETB\CAN\n\ + \5\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\ACK\DC2\EOT\149\ETX\b\GS\SUB% Search by brokerage account number.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\ACK\SOH\DC2\EOT\149\ETX\b\CAN\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\ACK\STX\DC2\EOT\149\ETX\ESC\FS\n\ + \&\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\a\DC2\EOT\152\ETX\b\SYN\SUB\SYN Search by user name.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\a\SOH\DC2\EOT\152\ETX\b\DC1\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\a\STX\DC2\EOT\152\ETX\DC4\NAK\n\ + \/\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\b\DC2\EOT\155\ETX\b\US\SUB\US Search by customer last name.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\b\SOH\DC2\EOT\155\ETX\b\SUB\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\b\STX\DC2\EOT\155\ETX\GS\RS\n\ + \0\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\t\DC2\EOT\158\ETX\b!\SUB Search by customer first name.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\t\SOH\DC2\EOT\158\ETX\b\ESC\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\t\STX\DC2\EOT\158\ETX\RS \n\ + \$\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\n\ + \\DC2\EOT\161\ETX\b\NAK\SUB\DC4 Search by user id.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\n\ + \\SOH\DC2\EOT\161\ETX\b\SI\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\n\ + \\STX\DC2\EOT\161\ETX\DC2\DC4\n\ + \V\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\v\DC2\EOT\165\ETX\b\FS\SUBF Search by route order id\n\ + \ (numeric id assigned withing order route).\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\v\SOH\DC2\EOT\165\ETX\b\SYN\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\v\STX\DC2\EOT\165\ETX\EM\ESC\n\ + \v\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\f\DC2\EOT\169\ETX\b#\SUBf Search by route client order id\n\ + \ (route order id transformed to meet execution system format rules).\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\f\SOH\DC2\EOT\169\ETX\b\GS\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\f\STX\DC2\EOT\169\ETX \"\n\ + \'\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\r\DC2\EOT\172\ETX\b\CAN\SUB\ETB Search by order GUID.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\r\SOH\DC2\EOT\172\ETX\b\DC2\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\r\STX\DC2\EOT\172\ETX\NAK\ETB\n\ + \%\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\SO\DC2\EOT\175\ETX\b \SUB\NAK Fill care order id.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\SO\SOH\DC2\EOT\175\ETX\b\SUB\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\SO\STX\DC2\EOT\175\ETX\GS\US\n\ + \!\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\SI\DC2\EOT\178\ETX\b\FS\SUB\DC1 Chain order id.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\SI\SOH\DC2\EOT\178\ETX\b\SYN\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\SI\STX\DC2\EOT\178\ETX\EM\ESC\n\ + \0\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\DLE\DC2\EOT\181\ETX\b!\SUB Search by sales series number.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\DLE\SOH\DC2\EOT\181\ETX\b\ESC\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\DLE\STX\DC2\EOT\181\ETX\RS \n\ + \.\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\DC1\DC2\EOT\184\ETX\b\US\SUB\RS Search by sales series name.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\DC1\SOH\DC2\EOT\184\ETX\b\EM\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\DC1\STX\DC2\EOT\184\ETX\FS\RS\n\ + \R\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\DC2\DC2\EOT\188\ETX\b\GS\SUBB Search by sales series ID.\n\ + \ Use PROFILE_SALES_SERIES_ID instead.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\DC2\SOH\DC2\EOT\188\ETX\b\ETB\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\DC2\STX\DC2\EOT\188\ETX\SUB\FS\n\ + \*\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\DC3\DC2\EOT\191\ETX\b\ESC\SUB\SUB Search by exchange name.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\DC3\SOH\DC2\EOT\191\ETX\b\NAK\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\DC3\STX\DC2\EOT\191\ETX\CAN\SUB\n\ + \'\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\DC4\DC2\EOT\194\ETX\b\CAN\SUB\ETB Search by route code.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\DC4\SOH\DC2\EOT\194\ETX\b\DC2\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\DC4\STX\DC2\EOT\194\ETX\NAK\ETB\n\ + \'\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\NAK\DC2\EOT\197\ETX\b\CAN\SUB\ETB Search by route name.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\NAK\SOH\DC2\EOT\197\ETX\b\DC2\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\NAK\STX\DC2\EOT\197\ETX\NAK\ETB\n\ + \4\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\SYN\DC2\EOT\200\ETX\b%\SUB$ Search by profile sales series ID.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\SYN\SOH\DC2\EOT\200\ETX\b\US\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\SYN\STX\DC2\EOT\200\ETX\"$\n\ + \/\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\ETB\DC2\EOT\203\ETX\b \SUB\US Search by batch request GUID.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\ETB\SOH\DC2\EOT\203\ETX\b\SUB\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\ETB\STX\DC2\EOT\203\ETX\GS\US\n\ + \e\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\CAN\DC2\EOT\207\ETX\b#\SUBU Order Chain status.\n\ + \ This criterion is associated with OrderChain.Status enum type.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\CAN\SOH\DC2\EOT\207\ETX\b\GS\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\CAN\STX\DC2\EOT\207\ETX \"\n\ + \g\n\ + \\ACK\EOT\ACK\EOT\NUL\STX\EM\DC2\EOT\211\ETX\b\FS\SUBW Order request state.\n\ + \ This criterion is associated with OrderRequest.State enum type.\n\ + \\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\EM\SOH\DC2\EOT\211\ETX\b\SYN\n\ + \\SI\n\ + \\a\EOT\ACK\EOT\NUL\STX\EM\STX\DC2\EOT\211\ETX\EM\ESC\n\ + \\158\SOH\n\ + \\EOT\EOT\ACK\STX\SOH\DC2\EOT\217\ETX\EOTE\SUB\143\SOH [obsolete] List of search options.\n\ + \ This field is associated with SearchCriteria enum type.\n\ + \ Empty list means search by any possible options.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\EOT\DC2\EOT\217\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\ENQ\DC2\EOT\217\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\SOH\DC2\EOT\217\ETX\DC4,\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\ETX\DC2\EOT\217\ETX/0\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\SOH\b\DC2\EOT\217\ETX1D\n\ + \\SO\n\ + \\ACK\EOT\ACK\STX\SOH\b\ETX\DC2\EOT\217\ETX2C\n\ + \Y\n\ + \\EOT\EOT\ACK\STX\STX\DC2\EOT\220\ETX\EOT\FS\SUBK optionally restrict matched results by returning the first 'top' records.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\STX\EOT\DC2\EOT\220\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\STX\ENQ\DC2\EOT\220\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\STX\SOH\DC2\EOT\220\ETX\DC4\ETB\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\STX\ETX\DC2\EOT\220\ETX\SUB\ESC\n\ + \\US\n\ + \\EOT\EOT\ACK\STX\ETX\DC2\EOT\223\ETX\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ETX\EOT\DC2\EOT\223\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ETX\ENQ\DC2\EOT\223\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ETX\SOH\DC2\EOT\223\ETX\DC4%\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ETX\ETX\DC2\EOT\223\ETX()\n\ + \%\n\ + \\EOT\EOT\ACK\STX\EOT\DC2\EOT\226\ETX\EOT\US\SUB\ETB Archived orders only.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\EOT\EOT\DC2\EOT\226\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\EOT\ENQ\DC2\EOT\226\ETX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\EOT\SOH\DC2\EOT\226\ETX\DC2\SUB\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\EOT\ETX\DC2\EOT\226\ETX\GS\RS\n\ + \h\n\ + \\EOT\EOT\ACK\STX\ENQ\DC2\EOT\229\ETX\EOT6\SUBZ List of search options. Each option has its own search text, criteria and matching rule.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ENQ\EOT\DC2\EOT\229\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ENQ\ACK\DC2\EOT\229\ETX\r\"\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ENQ\SOH\DC2\EOT\229\ETX#1\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ENQ\ETX\DC2\EOT\229\ETX45\n\ + \h\n\ + \\EOT\EOT\ACK\STX\ACK\DC2\EOT\233\ETX\EOT7\SUBZ Indicates, whether all criteria must match at once.\n\ + \ By default any criteria must match.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ACK\EOT\DC2\EOT\233\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ACK\ENQ\DC2\EOT\233\ETX\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ACK\SOH\DC2\EOT\233\ETX\DC2 \n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ACK\ETX\DC2\EOT\233\ETX#$\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ACK\b\DC2\EOT\233\ETX%6\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\ACK\a\DC2\EOT\233\ETX05\n\ + \\245\SOH\n\ + \\STX\EOT\a\DC2\ACK\239\ETX\NUL\252\ETX\SOH\SUB\230\SOH Requests tree with related order chains for synthetic or synthetic strategy orders.\n\ + \ By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records.\n\ + \ Set parameter order_requests_top to a larger number to receive more.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\a\SOH\DC2\EOT\239\ETX\b\US\n\ + \C\n\ + \\EOT\EOT\a\STX\NUL\DC2\EOT\242\ETX\EOT'\SUB5 [required] Identifier of any order chain in a tree.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\EOT\DC2\EOT\242\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\ENQ\DC2\EOT\242\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\SOH\DC2\EOT\242\ETX\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\ETX\DC2\EOT\242\ETX%&\n\ + \\US\n\ + \\EOT\EOT\a\STX\SOH\DC2\EOT\245\ETX\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\EOT\DC2\EOT\245\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\ENQ\DC2\EOT\245\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\SOH\DC2\EOT\245\ETX\DC4%\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\ETX\DC2\EOT\245\ETX()\n\ + \o\n\ + \\EOT\EOT\a\STX\STX\DC2\EOT\248\ETX\EOT+\SUBa Optionally restrict order requests in the chains by returning 'top' ones of the last submitted.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\EOT\DC2\EOT\248\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\ENQ\DC2\EOT\248\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\SOH\DC2\EOT\248\ETX\DC4&\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\ETX\DC2\EOT\248\ETX)*\n\ + \n\n\ + \\EOT\EOT\a\STX\ETX\DC2\EOT\251\ETX\EOT\FS\SUB` Optionally restrict matched results by returning the first 'top' records (sorted by leg path).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ETX\EOT\DC2\EOT\251\ETX\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ETX\ENQ\DC2\EOT\251\ETX\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ETX\SOH\DC2\EOT\251\ETX\DC4\ETB\n\ + \\r\n\ + \\ENQ\EOT\a\STX\ETX\ETX\DC2\EOT\251\ETX\SUB\ESC\n\ + \\187\SOH\n\ + \\STX\EOT\b\DC2\ACK\129\EOT\NUL\142\EOT\SOH\SUB\172\SOH Compound orders tree.\n\ + \ By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records.\n\ + \ Set parameter order_requests_top/top to a larger number to receive more.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\b\SOH\DC2\EOT\129\EOT\b \n\ + \7\n\ + \\EOT\EOT\b\STX\NUL\DC2\EOT\132\EOT\EOT)\SUB) [required] Identifier of compound tree.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\EOT\DC2\EOT\132\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\ENQ\DC2\EOT\132\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\SOH\DC2\EOT\132\EOT\DC4$\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\ETX\DC2\EOT\132\EOT'(\n\ + \\US\n\ + \\EOT\EOT\b\STX\SOH\DC2\EOT\135\EOT\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\EOT\DC2\EOT\135\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\ENQ\DC2\EOT\135\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\SOH\DC2\EOT\135\EOT\DC4%\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\ETX\DC2\EOT\135\EOT()\n\ + \o\n\ + \\EOT\EOT\b\STX\STX\DC2\EOT\138\EOT\EOT+\SUBa Optionally restrict order requests in the chains by returning 'top' ones of the last submitted.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\EOT\DC2\EOT\138\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\ENQ\DC2\EOT\138\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\SOH\DC2\EOT\138\EOT\DC4&\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\ETX\DC2\EOT\138\EOT)*\n\ + \Y\n\ + \\EOT\EOT\b\STX\ETX\DC2\EOT\141\EOT\EOT\FS\SUBK optionally restrict matched results by returning the first 'top' records.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\EOT\DC2\EOT\141\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\ENQ\DC2\EOT\141\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\SOH\DC2\EOT\141\EOT\DC4\ETB\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\ETX\DC2\EOT\141\EOT\SUB\ESC\n\ + \C\n\ + \\STX\EOT\t\DC2\ACK\145\EOT\NUL\152\EOT\SOH\SUB5 Order strategy tree, describing synthetic strategy.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\t\SOH\DC2\EOT\145\EOT\b$\n\ + \M\n\ + \\EOT\EOT\t\STX\NUL\DC2\EOT\148\EOT\EOT,\SUB? [required] Identifier of root synthetic strategy order chain.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\EOT\DC2\EOT\148\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\ENQ\DC2\EOT\148\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\SOH\DC2\EOT\148\EOT\DC4'\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\ETX\DC2\EOT\148\EOT*+\n\ + \\US\n\ + \\EOT\EOT\t\STX\SOH\DC2\EOT\151\EOT\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\EOT\DC2\EOT\151\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\ENQ\DC2\EOT\151\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\SOH\DC2\EOT\151\EOT\DC4%\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\ETX\DC2\EOT\151\EOT()\n\ + \\\\n\ + \\STX\EOT\n\ + \\DC2\ACK\156\EOT\NUL\170\EOT\SOH\SUBN Cancel order operation.\n\ + \ Either account_id or trade_location_id is required.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\n\ + \\SOH\DC2\EOT\156\EOT\b\DC3\n\ + \2\n\ + \\EOT\EOT\n\ + \\STX\NUL\DC2\EOT\159\EOT\EOT'\SUB$ [required] Chain order identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\EOT\DC2\EOT\159\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\ENQ\DC2\EOT\159\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\SOH\DC2\EOT\159\EOT\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\ETX\DC2\EOT\159\EOT%&\n\ + \i\n\ + \\EOT\EOT\n\ + \\STX\SOH\DC2\EOT\163\EOT\EOT#\SUB[ ID of the account that was used to place the order.\n\ + \ Has priority over trade_location_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\EOT\DC2\EOT\163\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\ENQ\DC2\EOT\163\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\SOH\DC2\EOT\163\EOT\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\ETX\DC2\EOT\163\EOT!\"\n\ + \\US\n\ + \\EOT\EOT\n\ + \\STX\STX\DC2\EOT\166\EOT\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\STX\EOT\DC2\EOT\166\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\STX\ENQ\DC2\EOT\166\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\STX\SOH\DC2\EOT\166\EOT\DC4%\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\STX\ETX\DC2\EOT\166\EOT()\n\ + \@\n\ + \\EOT\EOT\n\ + \\STX\ETX\DC2\EOT\169\EOT\EOT-\SUB2 Flag for wait replication from local to central.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\ETX\EOT\DC2\EOT\169\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\ETX\ENQ\DC2\EOT\169\EOT\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\ETX\SOH\DC2\EOT\169\EOT\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\ETX\ETX\DC2\EOT\169\EOT\EM\SUB\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\ETX\b\DC2\EOT\169\EOT\ESC,\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\ETX\a\DC2\EOT\169\EOT&+\n\ + \\144\SOH\n\ + \\STX\EOT\v\DC2\ACK\174\EOT\NUL\188\EOT\SOH\SUB\129\SOH Reflect order as canceled without sending real cancel request to exchange.\n\ + \ Either account_id or trade_location_id is required.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\v\SOH\DC2\EOT\174\EOT\b\RS\n\ + \2\n\ + \\EOT\EOT\v\STX\NUL\DC2\EOT\177\EOT\EOT'\SUB$ [required] Chain order identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\EOT\DC2\EOT\177\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\ENQ\DC2\EOT\177\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\SOH\DC2\EOT\177\EOT\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\ETX\DC2\EOT\177\EOT%&\n\ + \i\n\ + \\EOT\EOT\v\STX\SOH\DC2\EOT\181\EOT\EOT#\SUB[ ID of the account that was used to place the order.\n\ + \ Has priority over trade_location_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\EOT\DC2\EOT\181\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\ENQ\DC2\EOT\181\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\SOH\DC2\EOT\181\EOT\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\ETX\DC2\EOT\181\EOT!\"\n\ + \\US\n\ + \\EOT\EOT\v\STX\STX\DC2\EOT\184\EOT\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\EOT\DC2\EOT\184\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\ENQ\DC2\EOT\184\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\SOH\DC2\EOT\184\EOT\DC4%\n\ + \\r\n\ + \\ENQ\EOT\v\STX\STX\ETX\DC2\EOT\184\EOT()\n\ + \@\n\ + \\EOT\EOT\v\STX\ETX\DC2\EOT\187\EOT\EOT-\SUB2 Flag for wait replication from local to central.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\EOT\DC2\EOT\187\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\ENQ\DC2\EOT\187\EOT\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\SOH\DC2\EOT\187\EOT\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\ETX\DC2\EOT\187\EOT\EM\SUB\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\b\DC2\EOT\187\EOT\ESC,\n\ + \\r\n\ + \\ENQ\EOT\v\STX\ETX\a\DC2\EOT\187\EOT&+\n\ + \j\n\ + \\STX\EOT\f\DC2\ACK\192\EOT\NUL\206\EOT\SOH\SUB\\ Cancel whole tree of compound orders.\n\ + \ Either account_id or trade_location_id is required.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\f\SOH\DC2\EOT\192\EOT\b\US\n\ + \4\n\ + \\EOT\EOT\f\STX\NUL\DC2\EOT\195\EOT\EOT)\SUB& [required] Compound tree identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\EOT\DC2\EOT\195\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\ENQ\DC2\EOT\195\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\SOH\DC2\EOT\195\EOT\DC4$\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\ETX\DC2\EOT\195\EOT'(\n\ + \h\n\ + \\EOT\EOT\f\STX\SOH\DC2\EOT\199\EOT\EOT#\SUBZ ID of the account that was used to place the tree.\n\ + \ Has priority over trade_location_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\f\STX\SOH\EOT\DC2\EOT\199\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\f\STX\SOH\ENQ\DC2\EOT\199\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\f\STX\SOH\SOH\DC2\EOT\199\EOT\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\f\STX\SOH\ETX\DC2\EOT\199\EOT!\"\n\ + \\US\n\ + \\EOT\EOT\f\STX\STX\DC2\EOT\202\EOT\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\f\STX\STX\EOT\DC2\EOT\202\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\f\STX\STX\ENQ\DC2\EOT\202\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\f\STX\STX\SOH\DC2\EOT\202\EOT\DC4%\n\ + \\r\n\ + \\ENQ\EOT\f\STX\STX\ETX\DC2\EOT\202\EOT()\n\ + \@\n\ + \\EOT\EOT\f\STX\ETX\DC2\EOT\205\EOT\EOT-\SUB2 Flag for wait replication from local to central.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\f\STX\ETX\EOT\DC2\EOT\205\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\f\STX\ETX\ENQ\DC2\EOT\205\EOT\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\f\STX\ETX\SOH\DC2\EOT\205\EOT\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\f\STX\ETX\ETX\DC2\EOT\205\EOT\EM\SUB\n\ + \\r\n\ + \\ENQ\EOT\f\STX\ETX\b\DC2\EOT\205\EOT\ESC,\n\ + \\r\n\ + \\ENQ\EOT\f\STX\ETX\a\DC2\EOT\205\EOT&+\n\ + \C\n\ + \\STX\EOT\r\DC2\ACK\209\EOT\NUL\226\EOT\SOH\SUB5 Either account_id or trade_location_id is required.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\r\SOH\DC2\EOT\209\EOT\b\"\n\ + \2\n\ + \\EOT\EOT\r\STX\NUL\DC2\EOT\212\EOT\EOT'\SUB$ [required] Chain order identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\EOT\DC2\EOT\212\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\ENQ\DC2\EOT\212\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\SOH\DC2\EOT\212\EOT\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\r\STX\NUL\ETX\DC2\EOT\212\EOT%&\n\ + \i\n\ + \\EOT\EOT\r\STX\SOH\DC2\EOT\216\EOT\EOT#\SUB[ ID of the account that was used to place the order.\n\ + \ Has priority over trade_location_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\EOT\DC2\EOT\216\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\ENQ\DC2\EOT\216\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\SOH\DC2\EOT\216\EOT\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\r\STX\SOH\ETX\DC2\EOT\216\EOT!\"\n\ + \\US\n\ + \\EOT\EOT\r\STX\STX\DC2\EOT\219\EOT\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\r\STX\STX\EOT\DC2\EOT\219\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\r\STX\STX\ENQ\DC2\EOT\219\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\r\STX\STX\SOH\DC2\EOT\219\EOT\DC4%\n\ + \\r\n\ + \\ENQ\EOT\r\STX\STX\ETX\DC2\EOT\219\EOT()\n\ + \.\n\ + \\EOT\EOT\r\STX\ETX\DC2\EOT\222\EOT\EOT+\SUB [required] New route order id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\r\STX\ETX\EOT\DC2\EOT\222\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\r\STX\ETX\ENQ\DC2\EOT\222\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\r\STX\ETX\SOH\DC2\EOT\222\EOT\DC4&\n\ + \\r\n\ + \\ENQ\EOT\r\STX\ETX\ETX\DC2\EOT\222\EOT)*\n\ + \@\n\ + \\EOT\EOT\r\STX\EOT\DC2\EOT\225\EOT\EOT-\SUB2 Flag for wait replication from local to central.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\r\STX\EOT\EOT\DC2\EOT\225\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\r\STX\EOT\ENQ\DC2\EOT\225\EOT\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\r\STX\EOT\SOH\DC2\EOT\225\EOT\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\r\STX\EOT\ETX\DC2\EOT\225\EOT\EM\SUB\n\ + \\r\n\ + \\ENQ\EOT\r\STX\EOT\b\DC2\EOT\225\EOT\ESC,\n\ + \\r\n\ + \\ENQ\EOT\r\STX\EOT\a\DC2\EOT\225\EOT&+\n\ + \C\n\ + \\STX\EOT\SO\DC2\ACK\229\EOT\NUL\243\EOT\SOH\SUB5 Either account_id or trade_location_id is required.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SO\SOH\DC2\EOT\229\EOT\b\NAK\n\ + \2\n\ + \\EOT\EOT\SO\STX\NUL\DC2\EOT\232\EOT\EOT'\SUB$ [required] Chain order identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\EOT\DC2\EOT\232\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\ENQ\DC2\EOT\232\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\SOH\DC2\EOT\232\EOT\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\ETX\DC2\EOT\232\EOT%&\n\ + \i\n\ + \\EOT\EOT\SO\STX\SOH\DC2\EOT\236\EOT\EOT#\SUB[ ID of the account that was used to place the order.\n\ + \ Has priority over trade_location_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\EOT\DC2\EOT\236\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\ENQ\DC2\EOT\236\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\SOH\DC2\EOT\236\EOT\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\SOH\ETX\DC2\EOT\236\EOT!\"\n\ + \\US\n\ + \\EOT\EOT\SO\STX\STX\DC2\EOT\239\EOT\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\STX\EOT\DC2\EOT\239\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\STX\ENQ\DC2\EOT\239\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\STX\SOH\DC2\EOT\239\EOT\DC4%\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\STX\ETX\DC2\EOT\239\EOT()\n\ + \@\n\ + \\EOT\EOT\SO\STX\ETX\DC2\EOT\242\EOT\EOT-\SUB2 Flag for wait replication from local to central.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\ETX\EOT\DC2\EOT\242\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\ETX\ENQ\DC2\EOT\242\EOT\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\ETX\SOH\DC2\EOT\242\EOT\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\ETX\ETX\DC2\EOT\242\EOT\EM\SUB\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\ETX\b\DC2\EOT\242\EOT\ESC,\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\ETX\a\DC2\EOT\242\EOT&+\n\ + \C\n\ + \\STX\EOT\SI\DC2\ACK\246\EOT\NUL\149\ENQ\SOH\SUB5 Either account_id or trade_location_id is required.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SI\SOH\DC2\EOT\246\EOT\b\DC3\n\ + \\SO\n\ + \\EOT\EOT\SI\EOT\NUL\DC2\ACK\248\EOT\EOT\252\EOT\ENQ\n\ + \\r\n\ + \\ENQ\EOT\SI\EOT\NUL\SOH\DC2\EOT\248\EOT\t\DC1\n\ + \\SO\n\ + \\ACK\EOT\SI\EOT\NUL\STX\NUL\DC2\EOT\250\EOT\b!\n\ + \\SI\n\ + \\a\EOT\SI\EOT\NUL\STX\NUL\SOH\DC2\EOT\250\EOT\b\FS\n\ + \\SI\n\ + \\a\EOT\SI\EOT\NUL\STX\NUL\STX\DC2\EOT\250\EOT\US \n\ + \\SO\n\ + \\ACK\EOT\SI\EOT\NUL\STX\SOH\DC2\EOT\251\EOT\b\US\n\ + \\SI\n\ + \\a\EOT\SI\EOT\NUL\STX\SOH\SOH\DC2\EOT\251\EOT\b\SUB\n\ + \\SI\n\ + \\a\EOT\SI\EOT\NUL\STX\SOH\STX\DC2\EOT\251\EOT\GS\RS\n\ + \O\n\ + \\EOT\EOT\SI\STX\NUL\DC2\EOT\255\EOT\EOT\ESC\SUBA [required] Trade routing order fill/leg fill unique identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\EOT\DC2\EOT\255\EOT\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\ENQ\DC2\EOT\255\EOT\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\SOH\DC2\EOT\255\EOT\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\NUL\ETX\DC2\EOT\255\EOT\EM\SUB\n\ + \j\n\ + \\EOT\EOT\SI\STX\SOH\DC2\EOT\131\ENQ\EOT\"\SUB\\ Associated with CorrectFill.FillType enum.\n\ + \ If ommited, FILL_TYPE_ORDER_FILL type is used.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\EOT\DC2\EOT\131\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\ENQ\DC2\EOT\131\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\SOH\DC2\EOT\131\ENQ\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\SOH\ETX\DC2\EOT\131\ENQ !\n\ + \i\n\ + \\EOT\EOT\SI\STX\STX\DC2\EOT\135\ENQ\EOT#\SUB[ ID of the account that was used to place the order.\n\ + \ Has priority over trade_location_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\STX\EOT\DC2\EOT\135\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\STX\ENQ\DC2\EOT\135\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\STX\SOH\DC2\EOT\135\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\STX\ETX\DC2\EOT\135\ENQ!\"\n\ + \*\n\ + \\EOT\EOT\SI\STX\ETX\DC2\EOT\138\ENQ\EOT*\SUB\FS Trade location identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ETX\EOT\DC2\EOT\138\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ETX\ENQ\DC2\EOT\138\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ETX\SOH\DC2\EOT\138\ENQ\DC4%\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ETX\ETX\DC2\EOT\138\ENQ()\n\ + \S\n\ + \\EOT\EOT\SI\STX\EOT\DC2\EOT\141\ENQ\EOT&\SUBE [required] Quantity of bought or sold lots depending on order side.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\EOT\EOT\DC2\EOT\141\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\EOT\ACK\DC2\EOT\141\ENQ\r\CAN\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\EOT\SOH\DC2\EOT\141\ENQ\EM!\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\EOT\ETX\DC2\EOT\141\ENQ$%\n\ + \z\n\ + \\EOT\EOT\SI\STX\ENQ\DC2\EOT\145\ENQ\EOT&\SUBl [required] Price of the single fill to apply to the order.\n\ + \ Display price format for the order's contract.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ENQ\EOT\DC2\EOT\145\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ENQ\ENQ\DC2\EOT\145\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ENQ\SOH\DC2\EOT\145\ENQ\DC4!\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ENQ\ETX\DC2\EOT\145\ENQ$%\n\ + \@\n\ + \\EOT\EOT\SI\STX\ACK\DC2\EOT\148\ENQ\EOT-\SUB2 Flag for wait replication from local to central.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ACK\EOT\DC2\EOT\148\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ACK\ENQ\DC2\EOT\148\ENQ\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ACK\SOH\DC2\EOT\148\ENQ\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ACK\ETX\DC2\EOT\148\ENQ\EM\SUB\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ACK\b\DC2\EOT\148\ENQ\ESC,\n\ + \\r\n\ + \\ENQ\EOT\SI\STX\ACK\a\DC2\EOT\148\ENQ&+\n\ + \C\n\ + \\STX\EOT\DLE\DC2\ACK\152\ENQ\NUL\175\ENQ\SOH\SUB5 Either account_id or trade_location_id is required.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DLE\SOH\DC2\EOT\152\ENQ\b\DC2\n\ + \O\n\ + \\EOT\EOT\DLE\STX\NUL\DC2\EOT\155\ENQ\EOT\ESC\SUBA [required] Trade routing order fill/leg fill unique identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\EOT\DC2\EOT\155\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\ENQ\DC2\EOT\155\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\SOH\DC2\EOT\155\ENQ\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\ETX\DC2\EOT\155\ENQ\EM\SUB\n\ + \j\n\ + \\EOT\EOT\DLE\STX\SOH\DC2\EOT\159\ENQ\EOT\"\SUB\\ Associated with CorrectFill.FillType enum.\n\ + \ If ommited, FILL_TYPE_ORDER_FILL type is used.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\EOT\DC2\EOT\159\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\ENQ\DC2\EOT\159\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\SOH\DC2\EOT\159\ENQ\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\ETX\DC2\EOT\159\ENQ !\n\ + \i\n\ + \\EOT\EOT\DLE\STX\STX\DC2\EOT\163\ENQ\EOT#\SUB[ ID of the account that was used to place the order.\n\ + \ Has priority over trade_location_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\EOT\DC2\EOT\163\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\ENQ\DC2\EOT\163\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\SOH\DC2\EOT\163\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\ETX\DC2\EOT\163\ENQ!\"\n\ + \\US\n\ + \\EOT\EOT\DLE\STX\ETX\DC2\EOT\166\ENQ\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ETX\EOT\DC2\EOT\166\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ETX\ENQ\DC2\EOT\166\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ETX\SOH\DC2\EOT\166\ENQ\DC4%\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ETX\ETX\DC2\EOT\166\ENQ()\n\ + \\169\STX\n\ + \\EOT\EOT\DLE\STX\EOT\DC2\EOT\171\ENQ\EOT\ESC\SUB\154\STX Busting a fill means that the quantity remaining on the order will not be adjusted.\n\ + \ For example, on an order for 5 with 2 fills busting the fills keeps the quantity remaining at 3 instead of restoring it to 5.\n\ + \ In case of fill_type = FILL_TYPE_FILL_LEG, bust mode is always used.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\EOT\EOT\DC2\EOT\171\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\EOT\ENQ\DC2\EOT\171\ENQ\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\EOT\SOH\DC2\EOT\171\ENQ\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\EOT\ETX\DC2\EOT\171\ENQ\EM\SUB\n\ + \@\n\ + \\EOT\EOT\DLE\STX\ENQ\DC2\EOT\174\ENQ\EOT-\SUB2 Flag for wait replication from local to central.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ENQ\EOT\DC2\EOT\174\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ENQ\ENQ\DC2\EOT\174\ENQ\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ENQ\SOH\DC2\EOT\174\ENQ\DC2\SYN\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ENQ\ETX\DC2\EOT\174\ENQ\EM\SUB\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ENQ\b\DC2\EOT\174\ENQ\ESC,\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\ENQ\a\DC2\EOT\174\ENQ&+\n\ + \J\n\ + \\STX\EOT\DC1\DC2\ACK\178\ENQ\NUL\192\ENQ\SOH\SUB< Exclude order from (or include order to) risk calculation.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC1\SOH\DC2\EOT\178\ENQ\b\DC3\n\ + \2\n\ + \\EOT\EOT\DC1\STX\NUL\DC2\EOT\181\ENQ\EOT'\SUB$ [required] Chain order identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\EOT\DC2\EOT\181\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\ENQ\DC2\EOT\181\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\SOH\DC2\EOT\181\ENQ\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\NUL\ETX\DC2\EOT\181\ENQ%&\n\ + \i\n\ + \\EOT\EOT\DC1\STX\SOH\DC2\EOT\185\ENQ\EOT#\SUB[ ID of the account that was used to place the order.\n\ + \ Has priority over trade_location_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\SOH\EOT\DC2\EOT\185\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\SOH\ENQ\DC2\EOT\185\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\SOH\SOH\DC2\EOT\185\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\SOH\ETX\DC2\EOT\185\ENQ!\"\n\ + \\US\n\ + \\EOT\EOT\DC1\STX\STX\DC2\EOT\188\ENQ\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\STX\EOT\DC2\EOT\188\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\STX\ENQ\DC2\EOT\188\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\STX\SOH\DC2\EOT\188\ENQ\DC4%\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\STX\ETX\DC2\EOT\188\ENQ()\n\ + \L\n\ + \\EOT\EOT\DC1\STX\ETX\DC2\EOT\191\ENQ\EOT\GS\SUB> [required] true = ignore order, false = stop ignoring order.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\ETX\EOT\DC2\EOT\191\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\ETX\ENQ\DC2\EOT\191\ENQ\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\ETX\SOH\DC2\EOT\191\ENQ\DC2\CAN\n\ + \\r\n\ + \\ENQ\EOT\DC1\STX\ETX\ETX\DC2\EOT\191\ENQ\ESC\FS\n\ + \\196\SOH\n\ + \\STX\EOT\DC2\DC2\ACK\197\ENQ\NUL\205\ENQ\SOH\SUB\181\SOH Account information request message.\n\ + \ Server returns matching account if exactly one account matches supplied criteria.\n\ + \ Either account_id or brokerage_account_number is required.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC2\SOH\DC2\EOT\197\ENQ\b\SUB\n\ + \^\n\ + \\EOT\EOT\DC2\STX\NUL\DC2\EOT\201\ENQ\EOT#\SUBP Trade routing account identifier.\n\ + \ Has priority over brokerage_account_number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\EOT\DC2\EOT\201\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\ENQ\DC2\EOT\201\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\SOH\DC2\EOT\201\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\NUL\ETX\DC2\EOT\201\ENQ!\"\n\ + \)\n\ + \\EOT\EOT\DC2\STX\SOH\DC2\EOT\204\ENQ\EOT1\SUB\ESC Brokerage account number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\EOT\DC2\EOT\204\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\ENQ\DC2\EOT\204\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\SOH\DC2\EOT\204\ENQ\DC4,\n\ + \\r\n\ + \\ENQ\EOT\DC2\STX\SOH\ETX\DC2\EOT\204\ENQ/0\n\ + \p\n\ + \\STX\EOT\DC3\DC2\ACK\209\ENQ\NUL\224\ENQ\SOH\SUBb Balance records request message.\n\ + \ Server returns balance records that matches supplied criteria.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC3\SOH\DC2\EOT\209\ENQ\b\GS\n\ + \g\n\ + \\EOT\EOT\DC3\STX\NUL\DC2\EOT\213\ENQ\EOT#\SUBY [required] Gateway account identifier.\n\ + \ If supplied, balance_id should not be supplied.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\EOT\DC2\EOT\213\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\ENQ\DC2\EOT\213\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\SOH\DC2\EOT\213\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\NUL\ETX\DC2\EOT\213\ENQ!\"\n\ + \\174\SOH\n\ + \\EOT\EOT\DC3\STX\SOH\DC2\EOT\218\ENQ\EOT!\SUB\159\SOH Currency code (real currency code is ISO 4217 based.\n\ + \ If supplied, only balance records of this currency are returned.\n\ + \ Can be supplied only with account_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\EOT\DC2\EOT\218\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\ENQ\DC2\EOT\218\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\SOH\DC2\EOT\218\ENQ\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\SOH\ETX\DC2\EOT\218\ENQ\US \n\ + \\176\SOH\n\ + \\EOT\EOT\DC3\STX\STX\DC2\EOT\223\ENQ\EOT#\SUB\161\SOH Trade routing balance identifier.\n\ + \ If supplied, only the balance record with this ID is returned.\n\ + \ If supplied, account_id and currency should not be supplied.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\EOT\DC2\EOT\223\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\ENQ\DC2\EOT\223\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\SOH\DC2\EOT\223\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\DC3\STX\STX\ETX\DC2\EOT\223\ENQ!\"\n\ + \c\n\ + \\STX\EOT\DC4\DC2\ACK\228\ENQ\NUL\248\ENQ\SOH\SUBU Create balance record message.\n\ + \ Add a new balance record for the specified account.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DC4\SOH\DC2\EOT\228\ENQ\b\ESC\n\ + \<\n\ + \\EOT\EOT\DC4\STX\NUL\DC2\EOT\231\ENQ\EOT#\SUB. [required] Trade routing account identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\EOT\DC2\EOT\231\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\ENQ\DC2\EOT\231\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\SOH\DC2\EOT\231\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\NUL\ETX\DC2\EOT\231\ENQ!\"\n\ + \O\n\ + \\EOT\EOT\DC4\STX\SOH\DC2\EOT\234\ENQ\EOT!\SUBA [required] Currency code (real currency code is ISO 4217 based.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\EOT\DC2\EOT\234\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\ENQ\DC2\EOT\234\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\SOH\DC2\EOT\234\ENQ\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\SOH\ETX\DC2\EOT\234\ENQ\US \n\ + \,\n\ + \\EOT\EOT\DC4\STX\STX\DC2\EOT\237\ENQ\EOT)\SUB\RS [required] End cash balance.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\STX\EOT\DC2\EOT\237\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\STX\ENQ\DC2\EOT\237\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\STX\SOH\DC2\EOT\237\ENQ\DC4$\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\STX\ETX\DC2\EOT\237\ENQ'(\n\ + \)\n\ + \\EOT\EOT\DC4\STX\ETX\DC2\EOT\240\ENQ\EOT#\SUB\ESC Cash value of collateral.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ETX\EOT\DC2\EOT\240\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ETX\ENQ\DC2\EOT\240\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ETX\SOH\DC2\EOT\240\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ETX\ETX\DC2\EOT\240\ENQ!\"\n\ + \\SUB\n\ + \\EOT\EOT\DC4\STX\EOT\DC2\EOT\243\ENQ\EOT1\SUB\f Regulated.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\EOT\EOT\DC2\EOT\243\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\EOT\ENQ\DC2\EOT\243\ENQ\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\EOT\SOH\DC2\EOT\243\ENQ\DC2\ESC\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\EOT\ETX\DC2\EOT\243\ENQ\RS\US\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\EOT\b\DC2\EOT\243\ENQ 0\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\EOT\a\DC2\EOT\243\ENQ+/\n\ + \\140\SOH\n\ + \\EOT\EOT\DC4\STX\ENQ\DC2\EOT\247\ENQ\EOT#\SUB~ Statement date, could be present or future (UTC).\n\ + \ Datetime format is used but only date part is used, time part is ignored.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ENQ\EOT\DC2\EOT\247\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ENQ\ENQ\DC2\EOT\247\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ENQ\SOH\DC2\EOT\247\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\DC4\STX\ENQ\ETX\DC2\EOT\247\ENQ!\"\n\ + \.\n\ + \\STX\EOT\NAK\DC2\ACK\251\ENQ\NUL\134\ACK\SOH\SUB Update balance record message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\NAK\SOH\DC2\EOT\251\ENQ\b\ESC\n\ + \C\n\ + \\EOT\EOT\NAK\STX\NUL\DC2\EOT\254\ENQ\EOT#\SUB5 [required] Trade routing balance record identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\EOT\DC2\EOT\254\ENQ\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\ENQ\DC2\EOT\254\ENQ\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\SOH\DC2\EOT\254\ENQ\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\NUL\ETX\DC2\EOT\254\ENQ!\"\n\ + \!\n\ + \\EOT\EOT\NAK\STX\SOH\DC2\EOT\129\ACK\EOT)\SUB\DC3 End cash balance.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\EOT\DC2\EOT\129\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\ENQ\DC2\EOT\129\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\SOH\DC2\EOT\129\ACK\DC4$\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\SOH\ETX\DC2\EOT\129\ACK'(\n\ + \i\n\ + \\EOT\EOT\NAK\STX\STX\DC2\EOT\133\ACK\EOT#\SUB[ Cash value of collateral.\n\ + \ If not supplied, any existing collateral value is not changed.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\STX\EOT\DC2\EOT\133\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\STX\ENQ\DC2\EOT\133\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\STX\SOH\DC2\EOT\133\ACK\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\NAK\STX\STX\ETX\DC2\EOT\133\ACK!\"\n\ + \\172\SOH\n\ + \\STX\EOT\SYN\DC2\ACK\139\ACK\NUL\235\ACK\SOH\SUB\157\SOH Account search request message.\n\ + \ Server returns a list of found account records.\n\ + \ By default result contains at most DEFAULT_RESULT_RECORDS_NUMBER records.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SYN\SOH\DC2\EOT\139\ACK\b\FS\n\ + \*\n\ + \\EOT\EOT\SYN\STX\NUL\DC2\EOT\142\ACK\EOT:\SUB\FS [obsolete] Text to search.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\EOT\DC2\EOT\142\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\ENQ\DC2\EOT\142\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\SOH\DC2\EOT\142\ACK\DC4!\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\ETX\DC2\EOT\142\ACK$%\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\NUL\b\DC2\EOT\142\ACK&9\n\ + \\SO\n\ + \\ACK\EOT\SYN\STX\NUL\b\ETX\DC2\EOT\142\ACK'8\n\ + \\SO\n\ + \\EOT\EOT\SYN\EOT\NUL\DC2\ACK\144\ACK\EOT\148\ACK\ENQ\n\ + \\r\n\ + \\ENQ\EOT\SYN\EOT\NUL\SOH\DC2\EOT\144\ACK\t\EM\n\ + \\SO\n\ + \\ACK\EOT\SYN\EOT\NUL\STX\NUL\DC2\EOT\146\ACK\b\DC3\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\NUL\STX\NUL\SOH\DC2\EOT\146\ACK\b\SO\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\NUL\STX\NUL\STX\DC2\EOT\146\ACK\DC1\DC2\n\ + \\SO\n\ + \\ACK\EOT\SYN\EOT\NUL\STX\SOH\DC2\EOT\147\ACK\b\DLE\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\NUL\STX\SOH\SOH\DC2\EOT\147\ACK\b\v\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\NUL\STX\SOH\STX\DC2\EOT\147\ACK\SO\SI\n\ + \:\n\ + \\EOT\EOT\SYN\EOT\SOH\DC2\ACK\151\ACK\EOT\211\ACK\ENQ\SUB* List of possible search refine criteria.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\EOT\SOH\SOH\DC2\EOT\151\ACK\t\ETB\n\ + \'\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\NUL\DC2\EOT\154\ACK\b\ETB\SUB\ETB Search by account id.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\NUL\SOH\DC2\EOT\154\ACK\b\DC2\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\NUL\STX\DC2\EOT\154\ACK\NAK\SYN\n\ + \)\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\SOH\DC2\EOT\157\ACK\b\EM\SUB\EM Search by account name.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\SOH\SOH\DC2\EOT\157\ACK\b\DC4\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\SOH\STX\DC2\EOT\157\ACK\ETB\CAN\n\ + \5\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\STX\DC2\EOT\160\ACK\b\GS\SUB% Search by brokerage account number.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\STX\SOH\DC2\EOT\160\ACK\b\CAN\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\STX\STX\DC2\EOT\160\ACK\ESC\FS\n\ + \8\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\ETX\DC2\EOT\163\ACK\b(\SUB( Search by profile sales series number.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\ETX\SOH\DC2\EOT\163\ACK\b#\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\ETX\STX\DC2\EOT\163\ACK&'\n\ + \6\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\EOT\DC2\EOT\166\ACK\b&\SUB& Search by profile sales series name.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\EOT\SOH\DC2\EOT\166\ACK\b!\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\EOT\STX\DC2\EOT\166\ACK$%\n\ + \R\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\ENQ\DC2\EOT\170\ACK\b\FS\SUBB Search by sales series ID.\n\ + \ Use PROFILE_SALES_SERIES_ID instead.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\ENQ\SOH\DC2\EOT\170\ACK\b\ETB\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\ENQ\STX\DC2\EOT\170\ACK\SUB\ESC\n\ + \A\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\ACK\DC2\EOT\174\ACK\b\CAN\SUB1 Search by customer ID.\n\ + \ Use PROFILE_ID instead.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\ACK\SOH\DC2\EOT\174\ACK\b\DC3\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\ACK\STX\DC2\EOT\174\ACK\SYN\ETB\n\ + \)\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\a\DC2\EOT\177\ACK\b\EM\SUB\EM Search by profile name.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\a\SOH\DC2\EOT\177\ACK\b\DC4\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\a\STX\DC2\EOT\177\ACK\ETB\CAN\n\ + \^\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\b\DC2\EOT\181\ACK\b(\SUBN [obsolete] Search by account cluster.\n\ + \ This criteria is no longer supported.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\b\SOH\DC2\EOT\181\ACK\b#\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\b\STX\DC2\EOT\181\ACK&'\n\ + \u\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\t\DC2\EOT\184\ACK\b%\SUBe LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\t\SOH\DC2\EOT\184\ACK\b\US\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\t\STX\DC2\EOT\184\ACK\"$\n\ + \\SO\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\n\ + \\DC2\EOT\186\ACK\b\RS\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\n\ + \\SOH\DC2\EOT\186\ACK\b\CAN\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\n\ + \\STX\DC2\EOT\186\ACK\ESC\GS\n\ + \\198\SOH\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\v\DC2\EOT\190\ACK\b \SUB\181\SOH This field is associated with AccountSearchRequest.AccountGroupRole enum type.\n\ + \ LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\v\SOH\DC2\EOT\190\ACK\b\SUB\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\v\STX\DC2\EOT\190\ACK\GS\US\n\ + \\SO\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\f\DC2\EOT\192\ACK\b\SUB\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\f\SOH\DC2\EOT\192\ACK\b\DC4\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\f\STX\DC2\EOT\192\ACK\ETB\EM\n\ + \\174\SOH\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\r\DC2\EOT\196\ACK\b\ESC\SUB\157\SOH This field is associated with Account.Class enum type.\n\ + \ LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\r\SOH\DC2\EOT\196\ACK\b\NAK\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\r\STX\DC2\EOT\196\ACK\CAN\SUB\n\ + \\149\SOH\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\SO\DC2\EOT\200\ACK\b\ESC\SUB\132\SOH Can be 0 (false) or 1 (true).\n\ + \ LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\SO\SOH\DC2\EOT\200\ACK\b\NAK\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\SO\STX\DC2\EOT\200\ACK\CAN\SUB\n\ + \\149\SOH\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\SI\DC2\EOT\204\ACK\b!\SUB\132\SOH Can be 0 (false) or 1 (true).\n\ + \ LIMITED USE: Only explicitly, one per search option with EXACT_EQUALITY rule and in all match mode.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\SI\SOH\DC2\EOT\204\ACK\b\ESC\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\SI\STX\DC2\EOT\204\ACK\RS \n\ + \8\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\DLE\DC2\EOT\207\ACK\b\CAN\SUB( Search by profile (customer/admin) ID.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\DLE\SOH\DC2\EOT\207\ACK\b\DC2\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\DLE\STX\DC2\EOT\207\ACK\NAK\ETB\n\ + \4\n\ + \\ACK\EOT\SYN\EOT\SOH\STX\DC1\DC2\EOT\210\ACK\b%\SUB$ Search by profile sales series ID.\n\ + \\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\DC1\SOH\DC2\EOT\210\ACK\b\US\n\ + \\SI\n\ + \\a\EOT\SYN\EOT\SOH\STX\DC1\STX\DC2\EOT\210\ACK\"$\n\ + \\158\SOH\n\ + \\EOT\EOT\SYN\STX\SOH\DC2\EOT\216\ACK\EOTE\SUB\143\SOH [obsolete] List of search options.\n\ + \ This field is associated with SearchCriteria enum type.\n\ + \ Empty list means search by any possible options.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\EOT\DC2\EOT\216\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\ENQ\DC2\EOT\216\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\SOH\DC2\EOT\216\ACK\DC4,\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\ETX\DC2\EOT\216\ACK/0\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\SOH\b\DC2\EOT\216\ACK1D\n\ + \\SO\n\ + \\ACK\EOT\SYN\STX\SOH\b\ETX\DC2\EOT\216\ACK2C\n\ + \Y\n\ + \\EOT\EOT\SYN\STX\STX\DC2\EOT\219\ACK\EOT\FS\SUBK Optionally restrict matched results by returning the first 'top' records.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\EOT\DC2\EOT\219\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\ENQ\DC2\EOT\219\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\SOH\DC2\EOT\219\ACK\DC4\ETB\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\STX\ETX\DC2\EOT\219\ACK\SUB\ESC\n\ + \\158\SOH\n\ + \\EOT\EOT\SYN\STX\ETX\DC2\EOT\223\ACK\EOT8\SUB\143\SOH Determines whether removed entities are included in search result.\n\ + \ For clients that use protocol version under 1.19 it is 'true' by default.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\EOT\DC2\EOT\223\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\ENQ\DC2\EOT\223\ACK\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\SOH\DC2\EOT\223\ACK\DC2!\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\ETX\DC2\EOT\223\ACK$%\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\b\DC2\EOT\223\ACK&7\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ETX\a\DC2\EOT\223\ACK16\n\ + \h\n\ + \\EOT\EOT\SYN\STX\EOT\DC2\EOT\226\ACK\EOT6\SUBZ List of search options. Each option has its own search text, criteria and matching rule.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\EOT\DC2\EOT\226\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\ACK\DC2\EOT\226\ACK\r\"\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\SOH\DC2\EOT\226\ACK#1\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\EOT\ETX\DC2\EOT\226\ACK45\n\ + \h\n\ + \\EOT\EOT\SYN\STX\ENQ\DC2\EOT\230\ACK\EOT7\SUBZ Indicates, whether all criteria must match at once.\n\ + \ By default any criteria must match.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ENQ\EOT\DC2\EOT\230\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ENQ\ENQ\DC2\EOT\230\ACK\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ENQ\SOH\DC2\EOT\230\ACK\DC2 \n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ENQ\ETX\DC2\EOT\230\ACK#$\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ENQ\b\DC2\EOT\230\ACK%6\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ENQ\a\DC2\EOT\230\ACK05\n\ + \\188\SOH\n\ + \\EOT\EOT\SYN\STX\ACK\DC2\EOT\234\ACK\EOTR\SUB\173\SOH Determines whether accounts from mapped sales series profiles are included in search result.\n\ + \ Available only for Brokerage scope admin logins with appropriate permissions.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ACK\EOT\DC2\EOT\234\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ACK\ENQ\DC2\EOT\234\ACK\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ACK\SOH\DC2\EOT\234\ACK\DC2;\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ACK\ETX\DC2\EOT\234\ACK>?\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ACK\b\DC2\EOT\234\ACK@Q\n\ + \\r\n\ + \\ENQ\EOT\SYN\STX\ACK\a\DC2\EOT\234\ACKKP\n\ + \;\n\ + \\STX\EOT\ETB\DC2\ACK\238\ACK\NUL\242\ACK\SOH\SUB- Get list of routes enabled for the account.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ETB\SOH\DC2\EOT\238\ACK\b\US\n\ + \1\n\ + \\EOT\EOT\ETB\STX\NUL\DC2\EOT\241\ACK\EOT#\SUB# Account ID to get list of routes.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\EOT\DC2\EOT\241\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\ENQ\DC2\EOT\241\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\SOH\DC2\EOT\241\ACK\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\ETB\STX\NUL\ETX\DC2\EOT\241\ACK!\"\n\ + \\207\SOH\n\ + \\STX\EOT\CAN\DC2\ACK\247\ACK\NUL\132\a\SOH\SUB\192\SOH Account to user authorization list request message.\n\ + \ Either account_id (to request a list of users for an account)\n\ + \ or user_id (to request a list or accounts for a user) or both is required.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\CAN\SOH\DC2\EOT\247\ACK\b+\n\ + \\ESC\n\ + \\EOT\EOT\CAN\STX\NUL\DC2\EOT\250\ACK\EOT#\SUB\r Account ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\EOT\DC2\EOT\250\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\ENQ\DC2\EOT\250\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\SOH\DC2\EOT\250\ACK\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\NUL\ETX\DC2\EOT\250\ACK!\"\n\ + \\CAN\n\ + \\EOT\EOT\CAN\STX\SOH\DC2\EOT\253\ACK\EOT \SUB\n\ + \ User ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\EOT\DC2\EOT\253\ACK\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\ENQ\DC2\EOT\253\ACK\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\SOH\DC2\EOT\253\ACK\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\SOH\ETX\DC2\EOT\253\ACK\RS\US\n\ + \Q\n\ + \\EOT\EOT\CAN\STX\STX\DC2\EOT\128\a\EOT\FS\SUBC optionally restrict results by returning the first 'top' records.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\STX\EOT\DC2\EOT\128\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\STX\ENQ\DC2\EOT\128\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\STX\SOH\DC2\EOT\128\a\DC4\ETB\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\STX\ETX\DC2\EOT\128\a\SUB\ESC\n\ + \f\n\ + \\EOT\EOT\CAN\STX\ETX\DC2\EOT\131\a\EOT5\SUBX Includes also implicit authorization (via brokerage or sales series direct authority).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ETX\EOT\DC2\EOT\131\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ETX\ENQ\DC2\EOT\131\a\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ETX\SOH\DC2\EOT\131\a\DC20\n\ + \\r\n\ + \\ENQ\EOT\CAN\STX\ETX\ETX\DC2\EOT\131\a34\n\ + \1\n\ + \\STX\EOT\EM\DC2\ACK\135\a\NUL\139\a\SOH\SUB# Account settings request message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\EM\SOH\DC2\EOT\135\a\b\RS\n\ + \3\n\ + \\EOT\EOT\EM\STX\NUL\DC2\EOT\138\a\EOT#\SUB% Account ID to get account settings.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\NUL\EOT\DC2\EOT\138\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\NUL\ENQ\DC2\EOT\138\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\NUL\SOH\DC2\EOT\138\a\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\EM\STX\NUL\ETX\DC2\EOT\138\a!\"\n\ + \8\n\ + \\STX\EOT\SUB\DC2\ACK\142\a\NUL\146\a\SOH\SUB* Account risk parameters request message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SUB\SOH\DC2\EOT\142\a\b$\n\ + \2\n\ + \\EOT\EOT\SUB\STX\NUL\DC2\EOT\145\a\EOT#\SUB$ Account ID to get risk parameters.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\NUL\EOT\DC2\EOT\145\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\NUL\ENQ\DC2\EOT\145\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\NUL\SOH\DC2\EOT\145\a\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\SUB\STX\NUL\ETX\DC2\EOT\145\a!\"\n\ + \l\n\ + \\STX\EOT\ESC\DC2\ACK\150\a\NUL\168\a\SOH\SUB^ Update account risk parameters message.\n\ + \ [obsolete] Use UpdateAccountRiskParameters instead.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ESC\SOH\DC2\EOT\150\a\b\FS\n\ + \1\n\ + \\EOT\EOT\ESC\STX\NUL\DC2\EOT\153\a\EOT#\SUB# Trade routing account identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\EOT\DC2\EOT\153\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\ENQ\DC2\EOT\153\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\SOH\DC2\EOT\153\a\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\NUL\ETX\DC2\EOT\153\a!\"\n\ + \2\n\ + \\EOT\EOT\ESC\STX\SOH\DC2\EOT\156\a\EOT'\SUB$ Allow positions to be closed only.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\SOH\EOT\DC2\EOT\156\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\SOH\ENQ\DC2\EOT\156\a\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\SOH\SOH\DC2\EOT\156\a\DC2\"\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\SOH\ETX\DC2\EOT\156\a%&\n\ + \&\n\ + \\EOT\EOT\ESC\STX\STX\DC2\EOT\159\a\EOT$\SUB\CAN Allow futures trading.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\STX\EOT\DC2\EOT\159\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\STX\ENQ\DC2\EOT\159\a\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\STX\SOH\DC2\EOT\159\a\DC2\US\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\STX\ETX\DC2\EOT\159\a\"#\n\ + \o\n\ + \\EOT\EOT\ESC\STX\ETX\DC2\EOT\163\a\EOT&\SUBa Allow options trading.\n\ + \ The value is associated with AccountRiskParameters.OptionsTrading enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\ETX\EOT\DC2\EOT\163\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\ETX\ENQ\DC2\EOT\163\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\ETX\SOH\DC2\EOT\163\a\DC4!\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\ETX\ETX\DC2\EOT\163\a$%\n\ + \\140\SOH\n\ + \\EOT\EOT\ESC\STX\EOT\DC2\EOT\167\a\EOT0\SUB~ Additional credit available to satisfy margin requirements.\n\ + \ Can be set only if Margin Subsystem is enabled for the account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\EOT\EOT\DC2\EOT\167\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\EOT\ENQ\DC2\EOT\167\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\EOT\SOH\DC2\EOT\167\a\DC4+\n\ + \\r\n\ + \\ENQ\EOT\ESC\STX\EOT\ETX\DC2\EOT\167\a./\n\ + \^\n\ + \\STX\EOT\FS\DC2\ACK\171\a\NUL\175\a\SOH\SUBP Account potentially available exchange groups and commodities request message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\FS\SOH\DC2\EOT\171\a\b-\n\ + \2\n\ + \\EOT\EOT\FS\STX\NUL\DC2\EOT\174\a\EOT#\SUB$ Account ID to get exchange groups.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\EOT\DC2\EOT\174\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\ENQ\DC2\EOT\174\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\SOH\DC2\EOT\174\a\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\FS\STX\NUL\ETX\DC2\EOT\174\a!\"\n\ + \6\n\ + \\STX\EOT\GS\DC2\ACK\178\a\NUL\182\a\SOH\SUB( Account market limits request message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\GS\SOH\DC2\EOT\178\a\b\"\n\ + \)\n\ + \\EOT\EOT\GS\STX\NUL\DC2\EOT\181\a\EOT#\SUB\ESC Account ID to get limits.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\EOT\DC2\EOT\181\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\ENQ\DC2\EOT\181\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\SOH\DC2\EOT\181\a\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\GS\STX\NUL\ETX\DC2\EOT\181\a!\"\n\ + \2\n\ + \\STX\EOT\RS\DC2\ACK\185\a\NUL\193\a\SOH\SUB$ Account positions request message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\RS\SOH\DC2\EOT\185\a\b\US\n\ + \7\n\ + \\EOT\EOT\RS\STX\NUL\DC2\EOT\188\a\EOT#\SUB) [required] Account ID to get positions.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\NUL\EOT\DC2\EOT\188\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\NUL\ENQ\DC2\EOT\188\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\NUL\SOH\DC2\EOT\188\a\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\NUL\ETX\DC2\EOT\188\a!\"\n\ + \o\n\ + \\EOT\EOT\RS\STX\SOH\DC2\EOT\192\a\EOT(\SUBa Group positions by contract or fungible contract.\n\ + \ By default grouping is by fungible contract.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\SOH\EOT\DC2\EOT\192\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\SOH\ENQ\DC2\EOT\192\a\r\DC1\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\SOH\SOH\DC2\EOT\192\a\DC2#\n\ + \\r\n\ + \\ENQ\EOT\RS\STX\SOH\ETX\DC2\EOT\192\a&'\n\ + \/\n\ + \\STX\EOT\US\DC2\ACK\196\a\NUL\204\a\SOH\SUB! Account equity request message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\US\SOH\DC2\EOT\196\a\b\FS\n\ + \\ESC\n\ + \\EOT\EOT\US\STX\NUL\DC2\EOT\199\a\EOT#\SUB\r Account ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\EOT\DC2\EOT\199\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\ENQ\DC2\EOT\199\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\SOH\DC2\EOT\199\a\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\US\STX\NUL\ETX\DC2\EOT\199\a!\"\n\ + \x\n\ + \\EOT\EOT\US\STX\SOH\DC2\EOT\203\a\EOT!\SUBj Currency code of requested equity values (ISO 4217 based).\n\ + \ Defaults to account\226\128\153s currency if omitted.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\US\STX\SOH\EOT\DC2\EOT\203\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\US\STX\SOH\ENQ\DC2\EOT\203\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\US\STX\SOH\SOH\DC2\EOT\203\a\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\US\STX\SOH\ETX\DC2\EOT\203\a\US \n\ + \3\n\ + \\STX\EOT \DC2\ACK\207\a\NUL\211\a\SOH\SUB% Account collateral request message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT \SOH\DC2\EOT\207\a\b \n\ + \\ESC\n\ + \\EOT\EOT \STX\NUL\DC2\EOT\210\a\EOT#\SUB\r Account ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\EOT\DC2\EOT\210\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\ENQ\DC2\EOT\210\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\SOH\DC2\EOT\210\a\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT \STX\NUL\ETX\DC2\EOT\210\a!\"\n\ + \\158\STX\n\ + \\STX\EOT!\DC2\ACK\221\a\NUL\239\a\SOH\SUB\143\STX Clone account message.\n\ + \ Information that is cloned:\n\ + \ - account customer (if new_account_user_id is not provided);\n\ + \ - account settings;\n\ + \ - account routing options;\n\ + \ - account risk parameters;\n\ + \ - account market limits and allowable markets;\n\ + \ - list of authorized traders.\n\ + \\n\ + \\v\n\ + \\ETX\EOT!\SOH\DC2\EOT\221\a\b\DC4\n\ + \;\n\ + \\EOT\EOT!\STX\NUL\DC2\EOT\224\a\EOT*\SUB- Account which configuration will be copied.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\EOT\DC2\EOT\224\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\ENQ\DC2\EOT\224\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\SOH\DC2\EOT\224\a\DC4%\n\ + \\r\n\ + \\ENQ\EOT!\STX\NUL\ETX\DC2\EOT\224\a()\n\ + \:\n\ + \\EOT\EOT!\STX\SOH\DC2\EOT\227\a\EOT)\SUB, Name of the new account (max length = 64).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\EOT\DC2\EOT\227\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\ENQ\DC2\EOT\227\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\SOH\DC2\EOT\227\a\DC4$\n\ + \\r\n\ + \\ENQ\EOT!\STX\SOH\ETX\DC2\EOT\227\a'(\n\ + \G\n\ + \\EOT\EOT!\STX\STX\DC2\EOT\230\a\EOT5\SUB9 Brokerage number of the new account (max length = 256).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT!\STX\STX\EOT\DC2\EOT\230\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT!\STX\STX\ENQ\DC2\EOT\230\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT!\STX\STX\SOH\DC2\EOT\230\a\DC40\n\ + \\r\n\ + \\ENQ\EOT!\STX\STX\ETX\DC2\EOT\230\a34\n\ + \\197\SOH\n\ + \\EOT\EOT!\STX\ETX\DC2\EOT\235\a\EOT,\SUB\182\SOH ID of a user (trader) which customer is used for the new account.\n\ + \ This user will be authorized on the new account.\n\ + \ If not specified then the source account customer will be used.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\EOT\DC2\EOT\235\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\ENQ\DC2\EOT\235\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\SOH\DC2\EOT\235\a\DC4'\n\ + \\r\n\ + \\ENQ\EOT!\STX\ETX\ETX\DC2\EOT\235\a*+\n\ + \A\n\ + \\EOT\EOT!\STX\EOT\DC2\EOT\238\a\EOT*\SUB3 This field is associated with Account.Class enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT!\STX\EOT\EOT\DC2\EOT\238\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT!\STX\EOT\ENQ\DC2\EOT\238\a\r\DC3\n\ + \\r\n\ + \\ENQ\EOT!\STX\EOT\SOH\DC2\EOT\238\a\DC4%\n\ + \\r\n\ + \\ENQ\EOT!\STX\EOT\ETX\DC2\EOT\238\a()\n\ + \7\n\ + \\STX\EOT\"\DC2\ACK\242\a\NUL\251\a\SOH\SUB) Updates general information of account.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\"\SOH\DC2\EOT\242\a\b\NAK\n\ + \\191\SOH\n\ + \\EOT\EOT\"\STX\NUL\DC2\EOT\247\a\EOT!\SUB\176\SOH [required] Account information to update.\n\ + \ Only fields for update must be provided.\n\ + \ Fields that cannot be changed with this update message (see fields comments) are ignored.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\NUL\EOT\DC2\EOT\247\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\NUL\ACK\DC2\EOT\247\a\r\DC4\n\ + \\r\n\ + \\ENQ\EOT\"\STX\NUL\SOH\DC2\EOT\247\a\NAK\FS\n\ + \\r\n\ + \\ENQ\EOT\"\STX\NUL\ETX\DC2\EOT\247\a\US \n\ + \:\n\ + \\EOT\EOT\"\STX\SOH\DC2\EOT\250\a\EOTG\SUB, [obsolete] Use only account field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\EOT\DC2\EOT\250\a\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\ACK\DC2\EOT\250\a\r\DC4\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\SOH\DC2\EOT\250\a\NAK.\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\ETX\DC2\EOT\250\a12\n\ + \\r\n\ + \\ENQ\EOT\"\STX\SOH\b\DC2\EOT\250\a3F\n\ + \\SO\n\ + \\ACK\EOT\"\STX\SOH\b\ETX\DC2\EOT\250\a4E\n\ + \F\n\ + \\STX\EOT#\DC2\ACK\254\a\NUL\130\b\SOH\SUB8 [obsolete] Requests account cluster by its identifier.\n\ + \\n\ + \\v\n\ + \\ETX\EOT#\SOH\DC2\EOT\254\a\b\GS\n\ + \.\n\ + \\EOT\EOT#\STX\NUL\DC2\EOT\129\b\EOT+\SUB [required] Account cluster id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT#\STX\NUL\EOT\DC2\EOT\129\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT#\STX\NUL\ENQ\DC2\EOT\129\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT#\STX\NUL\SOH\DC2\EOT\129\b\DC4&\n\ + \\r\n\ + \\ENQ\EOT#\STX\NUL\ETX\DC2\EOT\129\b)*\n\ + \3\n\ + \\STX\EOT$\DC2\ACK\133\b\NUL\137\b\SOH\SUB% [obsolete] Creates account cluster.\n\ + \\n\ + \\v\n\ + \\ETX\EOT$\SOH\DC2\EOT\133\b\b\FS\n\ + \5\n\ + \\EOT\EOT$\STX\NUL\DC2\EOT\136\b\EOTM\SUB' [required] Account cluster to create.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\EOT\DC2\EOT\136\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\ACK\DC2\EOT\136\b\r\ESC\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\SOH\DC2\EOT\136\b\FS4\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\ETX\DC2\EOT\136\b78\n\ + \\r\n\ + \\ENQ\EOT$\STX\NUL\b\DC2\EOT\136\b9L\n\ + \\SO\n\ + \\ACK\EOT$\STX\NUL\b\ETX\DC2\EOT\136\b:K\n\ + \3\n\ + \\STX\EOT%\DC2\ACK\140\b\NUL\149\b\SOH\SUB% [obsolete] Updates account cluster.\n\ + \\n\ + \\v\n\ + \\ETX\EOT%\SOH\DC2\EOT\140\b\b\FS\n\ + \5\n\ + \\EOT\EOT%\STX\NUL\DC2\EOT\143\b\EOTM\SUB' [required] Account cluster to update.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\EOT\DC2\EOT\143\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\ACK\DC2\EOT\143\b\r\ESC\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\SOH\DC2\EOT\143\b\FS4\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\ETX\DC2\EOT\143\b78\n\ + \\r\n\ + \\ENQ\EOT%\STX\NUL\b\DC2\EOT\143\b9L\n\ + \\SO\n\ + \\ACK\EOT%\STX\NUL\b\ETX\DC2\EOT\143\b:K\n\ + \\225\SOH\n\ + \\EOT\EOT%\STX\SOH\DC2\EOT\148\b\EOTV\SUB\210\SOH Original account cluster information.\n\ + \ When provided, only fields that are different from the original account cluster are changed;\n\ + \ otherwise account cluster is applied as provided in account cluster fields.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT%\STX\SOH\EOT\DC2\EOT\148\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT%\STX\SOH\ACK\DC2\EOT\148\b\r\ESC\n\ + \\r\n\ + \\ENQ\EOT%\STX\SOH\SOH\DC2\EOT\148\b\FS=\n\ + \\r\n\ + \\ENQ\EOT%\STX\SOH\ETX\DC2\EOT\148\b@A\n\ + \\r\n\ + \\ENQ\EOT%\STX\SOH\b\DC2\EOT\148\bBU\n\ + \\SO\n\ + \\ACK\EOT%\STX\SOH\b\ETX\DC2\EOT\148\bCT\n\ + \A\n\ + \\STX\EOT&\DC2\ACK\152\b\NUL\163\b\SOH\SUB3 [obsolete] Updates account cluster price offsets.\n\ + \\n\ + \\v\n\ + \\ETX\EOT&\SOH\DC2\EOT\152\b\b(\n\ + \.\n\ + \\EOT\EOT&\STX\NUL\DC2\EOT\155\b\EOT+\SUB [required] Account cluster id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT&\STX\NUL\EOT\DC2\EOT\155\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT&\STX\NUL\ENQ\DC2\EOT\155\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT&\STX\NUL\SOH\DC2\EOT\155\b\DC4&\n\ + \\r\n\ + \\ENQ\EOT&\STX\NUL\ETX\DC2\EOT\155\b)*\n\ + \|\n\ + \\EOT\EOT&\STX\SOH\DC2\EOT\159\b\EOT:\SUBn Price offsets to create or update.\n\ + \ Price offsets will be created if they do not exist or updated otherwise.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT&\STX\SOH\EOT\DC2\EOT\159\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT&\STX\SOH\ACK\DC2\EOT\159\b\r&\n\ + \\r\n\ + \\ENQ\EOT&\STX\SOH\SOH\DC2\EOT\159\b'5\n\ + \\r\n\ + \\ENQ\EOT&\STX\SOH\ETX\DC2\EOT\159\b89\n\ + \(\n\ + \\EOT\EOT&\STX\STX\DC2\EOT\162\b\EOT=\SUB\SUB Price offsets to remove.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT&\STX\STX\EOT\DC2\EOT\162\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT&\STX\STX\ACK\DC2\EOT\162\b\r&\n\ + \\r\n\ + \\ENQ\EOT&\STX\STX\SOH\DC2\EOT\162\b'8\n\ + \\r\n\ + \\ENQ\EOT&\STX\STX\ETX\DC2\EOT\162\b;<\n\ + \\f\n\ + \\STX\EOT'\DC2\ACK\165\b\NUL\173\b\SOH\n\ + \\v\n\ + \\ETX\EOT'\SOH\DC2\EOT\165\b\b\GS\n\ + \U\n\ + \\EOT\EOT'\STX\NUL\DC2\EOT\169\b\EOT*\SUBG Account settings to update.\n\ + \ Only fields for update must be provided.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\EOT\DC2\EOT\169\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\ACK\DC2\EOT\169\b\r\FS\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\SOH\DC2\EOT\169\b\GS%\n\ + \\r\n\ + \\ENQ\EOT'\STX\NUL\ETX\DC2\EOT\169\b()\n\ + \;\n\ + \\EOT\EOT'\STX\SOH\DC2\EOT\172\b\EOTP\SUB- [obsolete] Use only settings field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\EOT\DC2\EOT\172\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\ACK\DC2\EOT\172\b\r\FS\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\SOH\DC2\EOT\172\b\GS7\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\ETX\DC2\EOT\172\b:;\n\ + \\r\n\ + \\ENQ\EOT'\STX\SOH\b\DC2\EOT\172\b\n\ + \\EOT\EOT+\STX\NUL\DC2\EOT\222\b\EOT#\SUB0 [required] account id to update market limits.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT+\STX\NUL\EOT\DC2\EOT\222\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT+\STX\NUL\ENQ\DC2\EOT\222\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT+\STX\NUL\SOH\DC2\EOT\222\b\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT+\STX\NUL\ETX\DC2\EOT\222\b!\"\n\ + \]\n\ + \\EOT\EOT+\STX\SOH\DC2\EOT\226\b\EOT,\SUBO [required] market limits to update.\n\ + \ Only fields for update must be provided.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT+\STX\SOH\EOT\DC2\EOT\226\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT+\STX\SOH\ACK\DC2\EOT\226\b\r\EM\n\ + \\r\n\ + \\ENQ\EOT+\STX\SOH\SOH\DC2\EOT\226\b\SUB'\n\ + \\r\n\ + \\ENQ\EOT+\STX\SOH\ETX\DC2\EOT\226\b*+\n\ + \@\n\ + \\EOT\EOT+\STX\STX\DC2\EOT\229\b\EOTR\SUB2 [obsolete] Use only market_limits field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT+\STX\STX\EOT\DC2\EOT\229\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT+\STX\STX\ACK\DC2\EOT\229\b\r\EM\n\ + \\r\n\ + \\ENQ\EOT+\STX\STX\SOH\DC2\EOT\229\b\SUB9\n\ + \\r\n\ + \\ENQ\EOT+\STX\STX\ETX\DC2\EOT\229\b<=\n\ + \\r\n\ + \\ENQ\EOT+\STX\STX\b\DC2\EOT\229\b>Q\n\ + \\SO\n\ + \\ACK\EOT+\STX\STX\b\ETX\DC2\EOT\229\b?P\n\ + \@\n\ + \\STX\EOT,\DC2\ACK\233\b\NUL\237\b\SOH\SUB2 Request of all routes available for the account.\n\ + \\n\ + \\v\n\ + \\ETX\EOT,\SOH\DC2\EOT\233\b\b(\n\ + \.\n\ + \\EOT\EOT,\STX\NUL\DC2\EOT\236\b\EOT#\SUB [required] Account identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT,\STX\NUL\EOT\DC2\EOT\236\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT,\STX\NUL\ENQ\DC2\EOT\236\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT,\STX\NUL\SOH\DC2\EOT\236\b\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT,\STX\NUL\ETX\DC2\EOT\236\b!\"\n\ + \)\n\ + \\STX\EOT-\DC2\ACK\240\b\NUL\244\b\SOH\SUB\ESC Creates a new GW Account.\n\ + \\n\ + \\v\n\ + \\ETX\EOT-\SOH\DC2\EOT\240\b\b\NAK\n\ + \-\n\ + \\EOT\EOT-\STX\NUL\DC2\EOT\243\b\EOT!\SUB\US [required] Account to create.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT-\STX\NUL\EOT\DC2\EOT\243\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT-\STX\NUL\ACK\DC2\EOT\243\b\r\DC4\n\ + \\r\n\ + \\ENQ\EOT-\STX\NUL\SOH\DC2\EOT\243\b\NAK\FS\n\ + \\r\n\ + \\ENQ\EOT-\STX\NUL\ETX\DC2\EOT\243\b\US \n\ + \p\n\ + \\STX\EOT.\DC2\ACK\250\b\NUL\146\t\SOH\SUB Result of TradeRoutingRequest.\n\ + \2@//------------------------------------------\n\ + \// Server Messages\n\ + \\n\ + \\v\n\ + \\ETX\EOT.\SOH\DC2\EOT\250\b\b\SUB\n\ + \.\n\ + \\EOT\EOT.\STX\NUL\DC2\EOT\253\b\EOT#\SUB ID of a corresponding request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\NUL\EOT\DC2\EOT\253\b\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\NUL\ENQ\DC2\EOT\253\b\r\DC3\n\ + \\r\n\ + \\ENQ\EOT.\STX\NUL\SOH\DC2\EOT\253\b\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT.\STX\NUL\ETX\DC2\EOT\253\b!\"\n\ + \V\n\ + \\EOT\EOT.\STX\SOH\DC2\EOT\129\t\EOT)\SUBH Operation status.\n\ + \ This field is associated with OperationStatus enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\SOH\EOT\DC2\EOT\129\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\SOH\ENQ\DC2\EOT\129\t\r\DC3\n\ + \\r\n\ + \\ENQ\EOT.\STX\SOH\SOH\DC2\EOT\129\t\DC4$\n\ + \\r\n\ + \\ENQ\EOT.\STX\SOH\ETX\DC2\EOT\129\t'(\n\ + \2\n\ + \\EOT\EOT.\STX\STX\DC2\EOT\132\t\EOT-\SUB$ Error details if operation failed.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\STX\EOT\DC2\EOT\132\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\STX\ACK\DC2\EOT\132\t\r\SUB\n\ + \\r\n\ + \\ENQ\EOT.\STX\STX\SOH\DC2\EOT\132\t\ESC(\n\ + \\r\n\ + \\ENQ\EOT.\STX\STX\ETX\DC2\EOT\132\t+,\n\ + \3\n\ + \\EOT\EOT.\STX\ETX\DC2\EOT\135\t\EOT9\SUB% Result of accounts related request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\ETX\EOT\DC2\EOT\135\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\ETX\ACK\DC2\EOT\135\t\r\US\n\ + \\r\n\ + \\ENQ\EOT.\STX\ETX\SOH\DC2\EOT\135\t 4\n\ + \\r\n\ + \\ENQ\EOT.\STX\ETX\ETX\DC2\EOT\135\t78\n\ + \1\n\ + \\EOT\EOT.\STX\EOT\DC2\EOT\138\t\EOT5\SUB# Result of orders related request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\EOT\EOT\DC2\EOT\138\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\EOT\ACK\DC2\EOT\138\t\r\GS\n\ + \\r\n\ + \\ENQ\EOT.\STX\EOT\SOH\DC2\EOT\138\t\RS0\n\ + \\r\n\ + \\ENQ\EOT.\STX\EOT\ETX\DC2\EOT\138\t34\n\ + \7\n\ + \\EOT\EOT.\STX\ENQ\DC2\EOT\141\t\EOTO\SUB) Result of lookup_property_list_request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\ENQ\EOT\DC2\EOT\141\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\ENQ\ACK\DC2\EOT\141\t\r.\n\ + \\r\n\ + \\ENQ\EOT.\STX\ENQ\SOH\DC2\EOT\141\t/J\n\ + \\r\n\ + \\ENQ\EOT.\STX\ENQ\ETX\DC2\EOT\141\tMN\n\ + \g\n\ + \\EOT\EOT.\STX\ACK\DC2\EOT\145\t\EOT(\SUBY Request tracking number generated by CMS API\n\ + \ Used by client to cancel deferred request\n\ + \\n\ + \\r\n\ + \\ENQ\EOT.\STX\ACK\EOT\DC2\EOT\145\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT.\STX\ACK\ENQ\DC2\EOT\145\t\r\DC3\n\ + \\r\n\ + \\ENQ\EOT.\STX\ACK\SOH\DC2\EOT\145\t\DC4#\n\ + \\r\n\ + \\ENQ\EOT.\STX\ACK\ETX\DC2\EOT\145\t&'\n\ + \3\n\ + \\STX\EOT/\DC2\ACK\149\t\NUL\139\n\ + \\SOH\SUB% Result of accounts related request.\n\ + \\n\ + \\v\n\ + \\ETX\EOT/\SOH\DC2\EOT\149\t\b\SUB\n\ + \6\n\ + \\EOT\EOT/\STX\NUL\DC2\EOT\152\t\EOT7\SUB( Result of account information request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\NUL\EOT\DC2\EOT\152\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\NUL\ACK\DC2\EOT\152\t\r\RS\n\ + \\r\n\ + \\ENQ\EOT/\STX\NUL\SOH\DC2\EOT\152\t\US2\n\ + \\r\n\ + \\ENQ\EOT/\STX\NUL\ETX\DC2\EOT\152\t56\n\ + \2\n\ + \\EOT\EOT/\STX\SOH\DC2\EOT\155\t\EOT=\SUB$ Result of balance records request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\SOH\EOT\DC2\EOT\155\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\SOH\ACK\DC2\EOT\155\t\r!\n\ + \\r\n\ + \\ENQ\EOT/\STX\SOH\SOH\DC2\EOT\155\t\"8\n\ + \\r\n\ + \\ENQ\EOT/\STX\SOH\ETX\DC2\EOT\155\t;<\n\ + \2\n\ + \\EOT\EOT/\STX\STX\DC2\EOT\158\t\EOTH\SUB$ Result of balance record creation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\STX\EOT\DC2\EOT\158\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\STX\ACK\DC2\EOT\158\t\r&\n\ + \\r\n\ + \\ENQ\EOT/\STX\STX\SOH\DC2\EOT\158\t'C\n\ + \\r\n\ + \\ENQ\EOT/\STX\STX\ETX\DC2\EOT\158\tFG\n\ + \0\n\ + \\EOT\EOT/\STX\ETX\DC2\EOT\161\t\EOTH\SUB\" Result of balance record update.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\ETX\EOT\DC2\EOT\161\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\ETX\ACK\DC2\EOT\161\t\r&\n\ + \\r\n\ + \\ENQ\EOT/\STX\ETX\SOH\DC2\EOT\161\t'C\n\ + \\r\n\ + \\ENQ\EOT/\STX\ETX\ETX\DC2\EOT\161\tFG\n\ + \:\n\ + \\EOT\EOT/\STX\EOT\DC2\EOT\164\t\EOTL\SUB, Result of account risk parameters request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\EOT\EOT\DC2\EOT\164\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\EOT\ACK\DC2\EOT\164\t\r(\n\ + \\r\n\ + \\ENQ\EOT/\STX\EOT\SOH\DC2\EOT\164\t)G\n\ + \\r\n\ + \\ENQ\EOT/\STX\EOT\ETX\DC2\EOT\164\tJK\n\ + \;\n\ + \\EOT\EOT/\STX\ENQ\DC2\EOT\167\t\EOTJ\SUB- Result of account's risk parameters update.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\ENQ\EOT\DC2\EOT\167\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\ENQ\ACK\DC2\EOT\167\t\r'\n\ + \\r\n\ + \\ENQ\EOT/\STX\ENQ\SOH\DC2\EOT\167\t(E\n\ + \\r\n\ + \\ENQ\EOT/\STX\ENQ\ETX\DC2\EOT\167\tHI\n\ + \1\n\ + \\EOT\EOT/\STX\ACK\DC2\EOT\170\t\EOT;\SUB# Result of account search request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\ACK\EOT\DC2\EOT\170\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\ACK\ACK\DC2\EOT\170\t\r \n\ + \\r\n\ + \\ENQ\EOT/\STX\ACK\SOH\DC2\EOT\170\t!6\n\ + \\r\n\ + \\ENQ\EOT/\STX\ACK\ETX\DC2\EOT\170\t9:\n\ + \6\n\ + \\EOT\EOT/\STX\a\DC2\EOT\173\t\EOTB\SUB( Result of account routes list request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\a\EOT\DC2\EOT\173\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\a\ACK\DC2\EOT\173\t\r#\n\ + \\r\n\ + \\ENQ\EOT/\STX\a\SOH\DC2\EOT\173\t$=\n\ + \\r\n\ + \\ENQ\EOT/\STX\a\ETX\DC2\EOT\173\t@A\n\ + \E\n\ + \\EOT\EOT/\STX\b\DC2\EOT\176\t\EOT[\SUB7 Result of account to user authorization list request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\b\EOT\DC2\EOT\176\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\b\ACK\DC2\EOT\176\t\r/\n\ + \\r\n\ + \\ENQ\EOT/\STX\b\SOH\DC2\EOT\176\t0V\n\ + \\r\n\ + \\ENQ\EOT/\STX\b\ETX\DC2\EOT\176\tYZ\n\ + \3\n\ + \\EOT\EOT/\STX\t\DC2\EOT\179\t\EOT@\SUB% Result of account settings request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\t\EOT\DC2\EOT\179\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\t\ACK\DC2\EOT\179\t\r\"\n\ + \\r\n\ + \\ENQ\EOT/\STX\t\SOH\DC2\EOT\179\t#:\n\ + \\r\n\ + \\ENQ\EOT/\STX\t\ETX\DC2\EOT\179\t=?\n\ + \@\n\ + \\EOT\EOT/\STX\n\ + \\DC2\EOT\182\t\EOTM\SUB2 Result of AccountAvailableExchangeGroupsRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\n\ + \\EOT\DC2\EOT\182\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\n\ + \\ACK\DC2\EOT\182\t\r(\n\ + \\r\n\ + \\ENQ\EOT/\STX\n\ + \\SOH\DC2\EOT\182\t)G\n\ + \\r\n\ + \\ENQ\EOT/\STX\n\ + \\ETX\DC2\EOT\182\tJL\n\ + \8\n\ + \\EOT\EOT/\STX\v\DC2\EOT\185\t\EOTI\SUB* Result of account market limits request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\v\EOT\DC2\EOT\185\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\v\ACK\DC2\EOT\185\t\r&\n\ + \\r\n\ + \\ENQ\EOT/\STX\v\SOH\DC2\EOT\185\t'C\n\ + \\r\n\ + \\ENQ\EOT/\STX\v\ETX\DC2\EOT\185\tFH\n\ + \,\n\ + \\EOT\EOT/\STX\f\DC2\EOT\188\t\EOTB\SUB\RS Result of positions request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\f\EOT\DC2\EOT\188\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\f\ACK\DC2\EOT\188\t\r#\n\ + \\r\n\ + \\ENQ\EOT/\STX\f\SOH\DC2\EOT\188\t$<\n\ + \\r\n\ + \\ENQ\EOT/\STX\f\ETX\DC2\EOT\188\t?A\n\ + \)\n\ + \\EOT\EOT/\STX\r\DC2\EOT\191\t\EOT<\SUB\ESC Result of equity request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\r\EOT\DC2\EOT\191\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\r\ACK\DC2\EOT\191\t\r \n\ + \\r\n\ + \\ENQ\EOT/\STX\r\SOH\DC2\EOT\191\t!6\n\ + \\r\n\ + \\ENQ\EOT/\STX\r\ETX\DC2\EOT\191\t9;\n\ + \-\n\ + \\EOT\EOT/\STX\SO\DC2\EOT\194\t\EOTD\SUB\US Result of collateral request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\SO\EOT\DC2\EOT\194\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\SO\ACK\DC2\EOT\194\t\r$\n\ + \\r\n\ + \\ENQ\EOT/\STX\SO\SOH\DC2\EOT\194\t%>\n\ + \\r\n\ + \\ENQ\EOT/\STX\SO\ETX\DC2\EOT\194\tAC\n\ + \0\n\ + \\EOT\EOT/\STX\SI\DC2\EOT\197\t\EOT:\SUB\" Result of clone account request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\SI\EOT\DC2\EOT\197\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\SI\ACK\DC2\EOT\197\t\r\US\n\ + \\r\n\ + \\ENQ\EOT/\STX\SI\SOH\DC2\EOT\197\t 4\n\ + \\r\n\ + \\ENQ\EOT/\STX\SI\ETX\DC2\EOT\197\t79\n\ + \(\n\ + \\EOT\EOT/\STX\DLE\DC2\EOT\200\t\EOT<\SUB\SUB Result of UpdateAccount.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\DLE\EOT\DC2\EOT\200\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\DLE\ACK\DC2\EOT\200\t\r \n\ + \\r\n\ + \\ENQ\EOT/\STX\DLE\SOH\DC2\EOT\200\t!6\n\ + \\r\n\ + \\ENQ\EOT/\STX\DLE\ETX\DC2\EOT\200\t9;\n\ + \0\n\ + \\EOT\EOT/\STX\DC1\DC2\EOT\203\t\EOTM\SUB\" Result of UpdateAccountSettings.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC1\EOT\DC2\EOT\203\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC1\ACK\DC2\EOT\203\t\r(\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC1\SOH\DC2\EOT\203\t)G\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC1\ETX\DC2\EOT\203\tJL\n\ + \.\n\ + \\EOT\EOT/\STX\DC2\DC2\EOT\206\t\EOT:\SUB Result of AccountGroupRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC2\EOT\DC2\EOT\206\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC2\ACK\DC2\EOT\206\t\r\US\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC2\SOH\DC2\EOT\206\t 4\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC2\ETX\DC2\EOT\206\t79\n\ + \6\n\ + \\EOT\EOT/\STX\DC3\DC2\EOT\209\t\EOTZ\SUB( Result of UpdateAccountRiskParameters.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC3\EOT\DC2\EOT\209\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC3\ACK\DC2\EOT\209\t\r.\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC3\SOH\DC2\EOT\209\t/T\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC3\ETX\DC2\EOT\209\tWY\n\ + \;\n\ + \\EOT\EOT/\STX\DC4\DC2\EOT\212\t\EOTV\SUB- Result of AccountAvailableRouteListRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC4\EOT\DC2\EOT\212\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC4\ACK\DC2\EOT\212\t\r,\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC4\SOH\DC2\EOT\212\t-P\n\ + \\r\n\ + \\ENQ\EOT/\STX\DC4\ETX\DC2\EOT\212\tSU\n\ + \1\n\ + \\EOT\EOT/\STX\NAK\DC2\EOT\215\t\EOTP\SUB# Result of UpdateAccountRouteList.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\NAK\EOT\DC2\EOT\215\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\NAK\ACK\DC2\EOT\215\t\r)\n\ + \\r\n\ + \\ENQ\EOT/\STX\NAK\SOH\DC2\EOT\215\t*J\n\ + \\r\n\ + \\ENQ\EOT/\STX\NAK\ETX\DC2\EOT\215\tMO\n\ + \4\n\ + \\EOT\EOT/\STX\SYN\DC2\EOT\218\t\EOTV\SUB& Result of UpdateAccountMarketLimits.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\SYN\EOT\DC2\EOT\218\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\SYN\ACK\DC2\EOT\218\t\r,\n\ + \\r\n\ + \\ENQ\EOT/\STX\SYN\SOH\DC2\EOT\218\t-P\n\ + \\r\n\ + \\ENQ\EOT/\STX\SYN\ETX\DC2\EOT\218\tSU\n\ + \(\n\ + \\EOT\EOT/\STX\ETB\DC2\EOT\221\t\EOT<\SUB\SUB Result of CreateAccount.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\ETB\EOT\DC2\EOT\221\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\ETB\ACK\DC2\EOT\221\t\r \n\ + \\r\n\ + \\ENQ\EOT/\STX\ETB\SOH\DC2\EOT\221\t!6\n\ + \\r\n\ + \\ENQ\EOT/\STX\ETB\ETX\DC2\EOT\221\t9;\n\ + \A\n\ + \\EOT\EOT/\STX\CAN\DC2\EOT\224\t\EOT[\SUB3 [obsolete] This operation is no longer supported.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\CAN\EOT\DC2\EOT\224\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\CAN\ACK\DC2\EOT\224\t\r!\n\ + \\r\n\ + \\ENQ\EOT/\STX\CAN\SOH\DC2\EOT\224\t\"A\n\ + \\r\n\ + \\ENQ\EOT/\STX\CAN\ETX\DC2\EOT\224\tDF\n\ + \\r\n\ + \\ENQ\EOT/\STX\CAN\b\DC2\EOT\224\tGZ\n\ + \\SO\n\ + \\ACK\EOT/\STX\CAN\b\ETX\DC2\EOT\224\tHY\n\ + \A\n\ + \\EOT\EOT/\STX\EM\DC2\EOT\227\t\EOTh\SUB3 [obsolete] This operation is no longer supported.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\EM\EOT\DC2\EOT\227\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\EM\ACK\DC2\EOT\227\t\r'\n\ + \\r\n\ + \\ENQ\EOT/\STX\EM\SOH\DC2\EOT\227\t(N\n\ + \\r\n\ + \\ENQ\EOT/\STX\EM\ETX\DC2\EOT\227\tQS\n\ + \\r\n\ + \\ENQ\EOT/\STX\EM\b\DC2\EOT\227\tTg\n\ + \\SO\n\ + \\ACK\EOT/\STX\EM\b\ETX\DC2\EOT\227\tUf\n\ + \A\n\ + \\EOT\EOT/\STX\SUB\DC2\EOT\230\t\EOTh\SUB3 [obsolete] This operation is no longer supported.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\SUB\EOT\DC2\EOT\230\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\SUB\ACK\DC2\EOT\230\t\r'\n\ + \\r\n\ + \\ENQ\EOT/\STX\SUB\SOH\DC2\EOT\230\t(N\n\ + \\r\n\ + \\ENQ\EOT/\STX\SUB\ETX\DC2\EOT\230\tQS\n\ + \\r\n\ + \\ENQ\EOT/\STX\SUB\b\DC2\EOT\230\tTg\n\ + \\SO\n\ + \\ACK\EOT/\STX\SUB\b\ETX\DC2\EOT\230\tUf\n\ + \B\n\ + \\EOT\EOT/\STX\ESC\DC2\ENQ\233\t\EOT\130\SOH\SUB3 [obsolete] This operation is no longer supported.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\ESC\EOT\DC2\EOT\233\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\ESC\ACK\DC2\EOT\233\t\r3\n\ + \\r\n\ + \\ENQ\EOT/\STX\ESC\SOH\DC2\EOT\233\t4h\n\ + \\r\n\ + \\ENQ\EOT/\STX\ESC\ETX\DC2\EOT\233\tkm\n\ + \\SO\n\ + \\ENQ\EOT/\STX\ESC\b\DC2\ENQ\233\tn\129\SOH\n\ + \\SI\n\ + \\ACK\EOT/\STX\ESC\b\ETX\DC2\ENQ\233\to\128\SOH\n\ + \)\n\ + \\EOT\EOT/\STX\FS\DC2\EOT\236\t\EOT>\SUB\ESC Result of RestoreAccount.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\FS\EOT\DC2\EOT\236\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\FS\ACK\DC2\EOT\236\t\r!\n\ + \\r\n\ + \\ENQ\EOT/\STX\FS\SOH\DC2\EOT\236\t\"8\n\ + \\r\n\ + \\ENQ\EOT/\STX\FS\ETX\DC2\EOT\236\t;=\n\ + \9\n\ + \\EOT\EOT/\STX\GS\DC2\EOT\239\t\EOTR\SUB+ Result of AccountTypeOverrideListRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\GS\EOT\DC2\EOT\239\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\GS\ACK\DC2\EOT\239\t\r*\n\ + \\r\n\ + \\ENQ\EOT/\STX\GS\SOH\DC2\EOT\239\t+L\n\ + \\r\n\ + \\ENQ\EOT/\STX\GS\ETX\DC2\EOT\239\tOQ\n\ + \8\n\ + \\EOT\EOT/\STX\RS\DC2\EOT\242\t\EOT_\SUB* Result of UpdateAccountTypeOverrideList.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\RS\EOT\DC2\EOT\242\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\RS\ACK\DC2\EOT\242\t\r0\n\ + \\r\n\ + \\ENQ\EOT/\STX\RS\SOH\DC2\EOT\242\t1Y\n\ + \\r\n\ + \\ENQ\EOT/\STX\RS\ETX\DC2\EOT\242\t\\^\n\ + \=\n\ + \\EOT\EOT/\STX\US\DC2\EOT\245\t\EOTi\SUB/ Result of UpdateAccountUserAuthorizationList.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\US\EOT\DC2\EOT\245\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\US\ACK\DC2\EOT\245\t\r5\n\ + \\r\n\ + \\ENQ\EOT/\STX\US\SOH\DC2\EOT\245\t6c\n\ + \\r\n\ + \\ENQ\EOT/\STX\US\ETX\DC2\EOT\245\tfh\n\ + \(\n\ + \\EOT\EOT/\STX \DC2\EOT\248\t\EOT<\SUB\SUB Result of RemoveAccount.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX \EOT\DC2\EOT\248\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX \ACK\DC2\EOT\248\t\r \n\ + \\r\n\ + \\ENQ\EOT/\STX \SOH\DC2\EOT\248\t!6\n\ + \\r\n\ + \\ENQ\EOT/\STX \ETX\DC2\EOT\248\t9;\n\ + \B\n\ + \\EOT\EOT/\STX!\DC2\EOT\251\t\EOTe\SUB4 Result of AccountAvailableServiceGroupListRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX!\EOT\DC2\EOT\251\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX!\ACK\DC2\EOT\251\t\r3\n\ + \\r\n\ + \\ENQ\EOT/\STX!\SOH\DC2\EOT\251\t4_\n\ + \\r\n\ + \\ENQ\EOT/\STX!\ETX\DC2\EOT\251\tbd\n\ + \9\n\ + \\EOT\EOT/\STX\"\DC2\EOT\254\t\EOTR\SUB+ Result of AccountServiceGroupListRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX\"\EOT\DC2\EOT\254\t\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX\"\ACK\DC2\EOT\254\t\r*\n\ + \\r\n\ + \\ENQ\EOT/\STX\"\SOH\DC2\EOT\254\t+L\n\ + \\r\n\ + \\ENQ\EOT/\STX\"\ETX\DC2\EOT\254\tOQ\n\ + \8\n\ + \\EOT\EOT/\STX#\DC2\EOT\129\n\ + \\EOT_\SUB* Result of UpdateAccountServiceGroupList.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX#\EOT\DC2\EOT\129\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX#\ACK\DC2\EOT\129\n\ + \\r0\n\ + \\r\n\ + \\ENQ\EOT/\STX#\SOH\DC2\EOT\129\n\ + \1Y\n\ + \\r\n\ + \\ENQ\EOT/\STX#\ETX\DC2\EOT\129\n\ + \\\^\n\ + \6\n\ + \\EOT\EOT/\STX$\DC2\EOT\132\n\ + \\EOTK\SUB( Result of BillableExchangeListRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX$\EOT\DC2\EOT\132\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX$\ACK\DC2\EOT\132\n\ + \\r'\n\ + \\r\n\ + \\ENQ\EOT/\STX$\SOH\DC2\EOT\132\n\ + \(E\n\ + \\r\n\ + \\ENQ\EOT/\STX$\ETX\DC2\EOT\132\n\ + \HJ\n\ + \-\n\ + \\EOT\EOT/\STX%\DC2\EOT\135\n\ + \\EOTG\SUB\US Result of CreateAccountGroup.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX%\EOT\DC2\EOT\135\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX%\ACK\DC2\EOT\135\n\ + \\r%\n\ + \\r\n\ + \\ENQ\EOT/\STX%\SOH\DC2\EOT\135\n\ + \&A\n\ + \\r\n\ + \\ENQ\EOT/\STX%\ETX\DC2\EOT\135\n\ + \DF\n\ + \8\n\ + \\EOT\EOT/\STX&\DC2\EOT\138\n\ + \\EOTO\SUB* Result of AccountTradingFeaturesRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT/\STX&\EOT\DC2\EOT\138\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT/\STX&\ACK\DC2\EOT\138\n\ + \\r)\n\ + \\r\n\ + \\ENQ\EOT/\STX&\SOH\DC2\EOT\138\n\ + \*I\n\ + \\r\n\ + \\ENQ\EOT/\STX&\ETX\DC2\EOT\138\n\ + \LN\n\ + \1\n\ + \\STX\EOT0\DC2\ACK\142\n\ + \\NUL\176\n\ + \\SOH\SUB# Result of orders related request.\n\ + \\n\ + \\v\n\ + \\ETX\EOT0\SOH\DC2\EOT\142\n\ + \\b\CAN\n\ + \0\n\ + \\EOT\EOT0\STX\NUL\DC2\EOT\145\n\ + \\EOT9\SUB\" Result of order details request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\NUL\EOT\DC2\EOT\145\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\NUL\ACK\DC2\EOT\145\n\ + \\r\US\n\ + \\r\n\ + \\ENQ\EOT0\STX\NUL\SOH\DC2\EOT\145\n\ + \ 4\n\ + \\r\n\ + \\ENQ\EOT0\STX\NUL\ETX\DC2\EOT\145\n\ + \78\n\ + \&\n\ + \\EOT\EOT0\STX\SOH\DC2\EOT\148\n\ + \\EOT/\SUB\CAN Result of fill adding.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\SOH\EOT\DC2\EOT\148\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\SOH\ACK\DC2\EOT\148\n\ + \\r\SUB\n\ + \\r\n\ + \\ENQ\EOT0\STX\SOH\SOH\DC2\EOT\148\n\ + \\ESC*\n\ + \\r\n\ + \\ENQ\EOT0\STX\SOH\ETX\DC2\EOT\148\n\ + \-.\n\ + \2\n\ + \\EOT\EOT0\STX\STX\DC2\EOT\151\n\ + \\EOTH\SUB$ Result of external order creation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\STX\EOT\DC2\EOT\151\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\STX\ACK\DC2\EOT\151\n\ + \\r&\n\ + \\r\n\ + \\ENQ\EOT0\STX\STX\SOH\DC2\EOT\151\n\ + \'C\n\ + \\r\n\ + \\ENQ\EOT0\STX\STX\ETX\DC2\EOT\151\n\ + \FG\n\ + \/\n\ + \\EOT\EOT0\STX\ETX\DC2\EOT\154\n\ + \\EOT7\SUB! Result of order search request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\ETX\EOT\DC2\EOT\154\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\ETX\ACK\DC2\EOT\154\n\ + \\r\RS\n\ + \\r\n\ + \\ENQ\EOT0\STX\ETX\SOH\DC2\EOT\154\n\ + \\US2\n\ + \\r\n\ + \\ENQ\EOT0\STX\ETX\ETX\DC2\EOT\154\n\ + \56\n\ + \2\n\ + \\EOT\EOT0\STX\EOT\DC2\EOT\157\n\ + \\EOTB\SUB$ Result of RelatedOrderTreeRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\EOT\EOT\DC2\EOT\157\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\EOT\ACK\DC2\EOT\157\n\ + \\r#\n\ + \\r\n\ + \\ENQ\EOT0\STX\EOT\SOH\DC2\EOT\157\n\ + \$=\n\ + \\r\n\ + \\ENQ\EOT0\STX\EOT\ETX\DC2\EOT\157\n\ + \@A\n\ + \3\n\ + \\EOT\EOT0\STX\ENQ\DC2\EOT\160\n\ + \\EOTD\SUB% Result of CompoundOrderTreeRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\ENQ\EOT\DC2\EOT\160\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\ENQ\ACK\DC2\EOT\160\n\ + \\r$\n\ + \\r\n\ + \\ENQ\EOT0\STX\ENQ\SOH\DC2\EOT\160\n\ + \%?\n\ + \\r\n\ + \\ENQ\EOT0\STX\ENQ\ETX\DC2\EOT\160\n\ + \BC\n\ + \7\n\ + \\EOT\EOT0\STX\ACK\DC2\EOT\163\n\ + \\EOTL\SUB) Result of SyntheticStrategyTreeRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\ACK\EOT\DC2\EOT\163\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\ACK\ACK\DC2\EOT\163\n\ + \\r(\n\ + \\r\n\ + \\ENQ\EOT0\STX\ACK\SOH\DC2\EOT\163\n\ + \)G\n\ + \\r\n\ + \\ENQ\EOT0\STX\ACK\ETX\DC2\EOT\163\n\ + \JK\n\ + \&\n\ + \\EOT\EOT0\STX\a\DC2\EOT\166\n\ + \\EOT7\SUB\CAN Result of CancelOrder.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\a\EOT\DC2\EOT\166\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\a\ACK\DC2\EOT\166\n\ + \\r\RS\n\ + \\r\n\ + \\ENQ\EOT0\STX\a\SOH\DC2\EOT\166\n\ + \\US2\n\ + \\r\n\ + \\ENQ\EOT0\STX\a\ETX\DC2\EOT\166\n\ + \56\n\ + \1\n\ + \\EOT\EOT0\STX\b\DC2\EOT\169\n\ + \\EOTO\SUB# Result of ReflectAsCanceledOrder.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\b\EOT\DC2\EOT\169\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\b\ACK\DC2\EOT\169\n\ + \\r)\n\ + \\r\n\ + \\ENQ\EOT0\STX\b\SOH\DC2\EOT\169\n\ + \*J\n\ + \\r\n\ + \\ENQ\EOT0\STX\b\ETX\DC2\EOT\169\n\ + \MN\n\ + \9\n\ + \\EOT\EOT0\STX\t\DC2\EOT\172\n\ + \\EOTR\SUB+ Result of CancelCompoundOrderTreeRequest.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\t\EOT\DC2\EOT\172\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\t\ACK\DC2\EOT\172\n\ + \\r*\n\ + \\r\n\ + \\ENQ\EOT0\STX\t\SOH\DC2\EOT\172\n\ + \+L\n\ + \\r\n\ + \\ENQ\EOT0\STX\t\ETX\DC2\EOT\172\n\ + \OQ\n\ + \;\n\ + \\EOT\EOT0\STX\n\ + \\DC2\EOT\175\n\ + \\EOTS\SUB- Result of a BatchOrdersOperation operation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT0\STX\n\ + \\EOT\DC2\EOT\175\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT0\STX\n\ + \\ACK\DC2\EOT\175\n\ + \\r/\n\ + \\r\n\ + \\ENQ\EOT0\STX\n\ + \\SOH\DC2\EOT\175\n\ + \0M\n\ + \\r\n\ + \\ENQ\EOT0\STX\n\ + \\ETX\DC2\EOT\175\n\ + \PR\n\ + \5\n\ + \\STX\EOT1\DC2\ACK\179\n\ + \\NUL\186\n\ + \\SOH\SUB' Order details request result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT1\SOH\DC2\EOT\179\n\ + \\b\SUB\n\ + \*\n\ + \\EOT\EOT1\STX\NUL\DC2\EOT\182\n\ + \\EOT(\SUB\FS Trade routing order chain.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT1\STX\NUL\EOT\DC2\EOT\182\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT1\STX\NUL\ACK\DC2\EOT\182\n\ + \\r\ETB\n\ + \\r\n\ + \\ENQ\EOT1\STX\NUL\SOH\DC2\EOT\182\n\ + \\CAN#\n\ + \\r\n\ + \\ENQ\EOT1\STX\NUL\ETX\DC2\EOT\182\n\ + \&'\n\ + \U\n\ + \\EOT\EOT1\STX\SOH\DC2\EOT\185\n\ + \\EOT3\SUBG This flag is set to true if all order requests in the chain are sent.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT1\STX\SOH\EOT\DC2\EOT\185\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT1\STX\SOH\ENQ\DC2\EOT\185\n\ + \\r\DC1\n\ + \\r\n\ + \\ENQ\EOT1\STX\SOH\SOH\DC2\EOT\185\n\ + \\DC2\GS\n\ + \\r\n\ + \\ENQ\EOT1\STX\SOH\ETX\DC2\EOT\185\n\ + \ !\n\ + \\r\n\ + \\ENQ\EOT1\STX\SOH\b\DC2\EOT\185\n\ + \\"2\n\ + \\r\n\ + \\ENQ\EOT1\STX\SOH\a\DC2\EOT\185\n\ + \-1\n\ + \(\n\ + \\STX\EOT2\DC2\ACK\189\n\ + \\NUL\191\n\ + \\SOH\SUB\SUB Add fill result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT2\SOH\DC2\EOT\189\n\ + \\b\NAK\n\ + \,\n\ + \\STX\EOT3\DC2\ACK\194\n\ + \\NUL\201\n\ + \\SOH\SUB\RS Create order result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT3\SOH\DC2\EOT\194\n\ + \\b!\n\ + \0\n\ + \\EOT\EOT3\STX\NUL\DC2\EOT\197\n\ + \\EOT!\SUB\" Chain order ID of created order.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT3\STX\NUL\EOT\DC2\EOT\197\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT3\STX\NUL\ENQ\DC2\EOT\197\n\ + \\r\DC3\n\ + \\r\n\ + \\ENQ\EOT3\STX\NUL\SOH\DC2\EOT\197\n\ + \\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT3\STX\NUL\ETX\DC2\EOT\197\n\ + \\US \n\ + \6\n\ + \\EOT\EOT3\STX\SOH\DC2\EOT\200\n\ + \\EOT*\SUB( Trade location of newly created order.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT3\STX\SOH\EOT\DC2\EOT\200\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT3\STX\SOH\ENQ\DC2\EOT\200\n\ + \\r\DC3\n\ + \\r\n\ + \\ENQ\EOT3\STX\SOH\SOH\DC2\EOT\200\n\ + \\DC4%\n\ + \\r\n\ + \\ENQ\EOT3\STX\SOH\ETX\DC2\EOT\200\n\ + \()\n\ + \-\n\ + \\STX\EOT4\DC2\ACK\204\n\ + \\NUL\212\n\ + \\SOH\SUB\US Order search request message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT4\SOH\DC2\EOT\204\n\ + \\b\EM\n\ + \%\n\ + \\EOT\EOT4\STX\NUL\DC2\EOT\207\n\ + \\EOT6\SUB\ETB List of found orders.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT4\STX\NUL\EOT\DC2\EOT\207\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT4\STX\NUL\ACK\DC2\EOT\207\n\ + \\r$\n\ + \\r\n\ + \\ENQ\EOT4\STX\NUL\SOH\DC2\EOT\207\n\ + \%1\n\ + \\r\n\ + \\ENQ\EOT4\STX\NUL\ETX\DC2\EOT\207\n\ + \45\n\ + \y\n\ + \\EOT\EOT4\STX\SOH\DC2\EOT\211\n\ + \\EOT3\SUBk This flag is set to true if all search results are sent\n\ + \ and nothing was filtered out by 'top' parameter.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT4\STX\SOH\EOT\DC2\EOT\211\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT4\STX\SOH\ENQ\DC2\EOT\211\n\ + \\r\DC1\n\ + \\r\n\ + \\ENQ\EOT4\STX\SOH\SOH\DC2\EOT\211\n\ + \\DC2\GS\n\ + \\r\n\ + \\ENQ\EOT4\STX\SOH\ETX\DC2\EOT\211\n\ + \ !\n\ + \\r\n\ + \\ENQ\EOT4\STX\SOH\b\DC2\EOT\211\n\ + \\"2\n\ + \\r\n\ + \\ENQ\EOT4\STX\SOH\a\DC2\EOT\211\n\ + \-1\n\ + \2\n\ + \\STX\EOT5\DC2\ACK\215\n\ + \\NUL\222\n\ + \\SOH\SUB$ Result of RelatedOrderTreeRequest.\n\ + \\n\ + \\v\n\ + \\ETX\EOT5\SOH\DC2\EOT\215\n\ + \\b\RS\n\ + \)\n\ + \\EOT\EOT5\STX\NUL\DC2\EOT\218\n\ + \\EOT,\SUB\ESC Root order with children.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT5\STX\NUL\EOT\DC2\EOT\218\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT5\STX\NUL\ACK\DC2\EOT\218\n\ + \\r\EM\n\ + \\r\n\ + \\ENQ\EOT5\STX\NUL\SOH\DC2\EOT\218\n\ + \\SUB'\n\ + \\r\n\ + \\ENQ\EOT5\STX\NUL\ETX\DC2\EOT\218\n\ + \*+\n\ + \L\n\ + \\EOT\EOT5\STX\SOH\DC2\EOT\221\n\ + \\EOT3\SUB> This flag is set to true if all orders in the tree are sent.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\EOT\DC2\EOT\221\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\ENQ\DC2\EOT\221\n\ + \\r\DC1\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\SOH\DC2\EOT\221\n\ + \\DC2\GS\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\ETX\DC2\EOT\221\n\ + \ !\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\b\DC2\EOT\221\n\ + \\"2\n\ + \\r\n\ + \\ENQ\EOT5\STX\SOH\a\DC2\EOT\221\n\ + \-1\n\ + \3\n\ + \\STX\EOT6\DC2\ACK\225\n\ + \\NUL\232\n\ + \\SOH\SUB% Result of CompoundOrderTreeRequest.\n\ + \\n\ + \\v\n\ + \\ETX\EOT6\SOH\DC2\EOT\225\n\ + \\b\US\n\ + \2\n\ + \\EOT\EOT6\STX\NUL\DC2\EOT\228\n\ + \\EOT.\SUB$ Root compound order with children.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT6\STX\NUL\EOT\DC2\EOT\228\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT6\STX\NUL\ACK\DC2\EOT\228\n\ + \\r\SUB\n\ + \\r\n\ + \\ENQ\EOT6\STX\NUL\SOH\DC2\EOT\228\n\ + \\ESC)\n\ + \\r\n\ + \\ENQ\EOT6\STX\NUL\ETX\DC2\EOT\228\n\ + \,-\n\ + \L\n\ + \\EOT\EOT6\STX\SOH\DC2\EOT\231\n\ + \\EOT3\SUB> This flag is set to true if all orders in the tree are sent.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\EOT\DC2\EOT\231\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\ENQ\DC2\EOT\231\n\ + \\r\DC1\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\SOH\DC2\EOT\231\n\ + \\DC2\GS\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\ETX\DC2\EOT\231\n\ + \ !\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\b\DC2\EOT\231\n\ + \\"2\n\ + \\r\n\ + \\ENQ\EOT6\STX\SOH\a\DC2\EOT\231\n\ + \-1\n\ + \7\n\ + \\STX\EOT7\DC2\ACK\235\n\ + \\NUL\242\n\ + \\SOH\SUB) Result of SyntheticStrategyTreeRequest.\n\ + \\n\ + \\v\n\ + \\ETX\EOT7\SOH\DC2\EOT\235\n\ + \\b#\n\ + \0\n\ + \\EOT\EOT7\STX\NUL\DC2\EOT\238\n\ + \\EOT\"\SUB\" First level strategy order legs.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT7\STX\NUL\EOT\DC2\EOT\238\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT7\STX\NUL\ACK\DC2\EOT\238\n\ + \\r\CAN\n\ + \\r\n\ + \\ENQ\EOT7\STX\NUL\SOH\DC2\EOT\238\n\ + \\EM\GS\n\ + \\r\n\ + \\ENQ\EOT7\STX\NUL\ETX\DC2\EOT\238\n\ + \ !\n\ + \'\n\ + \\EOT\EOT7\STX\SOH\DC2\EOT\241\n\ + \\EOT&\SUB\EM Strategy contract name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT7\STX\SOH\EOT\DC2\EOT\241\n\ + \\EOT\f\n\ + \\r\n\ + \\ENQ\EOT7\STX\SOH\ENQ\DC2\EOT\241\n\ + \\r\DC3\n\ + \\r\n\ + \\ENQ\EOT7\STX\SOH\SOH\DC2\EOT\241\n\ + \\DC4!\n\ + \\r\n\ + \\ENQ\EOT7\STX\SOH\ETX\DC2\EOT\241\n\ + \$%\n\ + \&\n\ + \\STX\EOT8\DC2\ACK\245\n\ + \\NUL\247\n\ + \\SOH\SUB\CAN Result of CancelOrder.\n\ + \\n\ + \\v\n\ + \\ETX\EOT8\SOH\DC2\EOT\245\n\ + \\b\EM\n\ + \0\n\ + \\STX\EOT9\DC2\ACK\250\n\ + \\NUL\252\n\ + \\SOH\SUB\" Result of ReflectAsCanceledOrder\n\ + \\n\ + \\v\n\ + \\ETX\EOT9\SOH\DC2\EOT\250\n\ + \\b$\n\ + \9\n\ + \\STX\EOT:\DC2\ACK\255\n\ + \\NUL\129\v\SOH\SUB+ Result of CancelCompoundOrderTreeRequest.\n\ + \\n\ + \\v\n\ + \\ETX\EOT:\SOH\DC2\EOT\255\n\ + \\b%\n\ + \;\n\ + \\STX\EOT;\DC2\ACK\132\v\NUL\136\v\SOH\SUB- Account information request result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT;\SOH\DC2\EOT\132\v\b\EM\n\ + \&\n\ + \\EOT\EOT;\STX\NUL\DC2\EOT\135\v\EOT!\SUB\CAN Trade routing account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT;\STX\NUL\EOT\DC2\EOT\135\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOT;\STX\NUL\ACK\DC2\EOT\135\v\r\DC4\n\ + \\r\n\ + \\ENQ\EOT;\STX\NUL\SOH\DC2\EOT\135\v\NAK\FS\n\ + \\r\n\ + \\ENQ\EOT;\STX\NUL\ETX\DC2\EOT\135\v\US \n\ + \7\n\ + \\STX\EOT<\DC2\ACK\139\v\NUL\143\v\SOH\SUB) Balance records request result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT<\SOH\DC2\EOT\139\v\b\FS\n\ + \ \n\ + \\EOT\EOT<\STX\NUL\DC2\EOT\142\v\EOT.\SUB\DC2 Balance records.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT<\STX\NUL\EOT\DC2\EOT\142\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOT<\STX\NUL\ACK\DC2\EOT\142\v\r\SUB\n\ + \\r\n\ + \\ENQ\EOT<\STX\NUL\SOH\DC2\EOT\142\v\ESC)\n\ + \\r\n\ + \\ENQ\EOT<\STX\NUL\ETX\DC2\EOT\142\v,-\n\ + \5\n\ + \\STX\EOT=\DC2\ACK\146\v\NUL\150\v\SOH\SUB' Create balance record result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT=\SOH\DC2\EOT\146\v\b!\n\ + \2\n\ + \\EOT\EOT=\STX\NUL\DC2\EOT\149\v\EOT*\SUB$ Created account balance record id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT=\STX\NUL\EOT\DC2\EOT\149\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOT=\STX\NUL\ENQ\DC2\EOT\149\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOT=\STX\NUL\SOH\DC2\EOT\149\v\DC4%\n\ + \\r\n\ + \\ENQ\EOT=\STX\NUL\ETX\DC2\EOT\149\v()\n\ + \5\n\ + \\STX\EOT>\DC2\ACK\153\v\NUL\155\v\SOH\SUB' Update balance record result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT>\SOH\DC2\EOT\153\v\b!\n\ + \.\n\ + \\STX\EOT?\DC2\ACK\158\v\NUL\166\v\SOH\SUB Account search result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT?\SOH\DC2\EOT\158\v\b\ESC\n\ + \'\n\ + \\EOT\EOT?\STX\NUL\DC2\EOT\161\v\EOT:\SUB\EM List of found accounts.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\EOT\DC2\EOT\161\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\ACK\DC2\EOT\161\v\r&\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\SOH\DC2\EOT\161\v'5\n\ + \\r\n\ + \\ENQ\EOT?\STX\NUL\ETX\DC2\EOT\161\v89\n\ + \r\n\ + \\EOT\EOT?\STX\SOH\DC2\EOT\165\v\EOT3\SUBd This flag is set to true if all results are sent\n\ + \ and nothing was filtered out by 'top' parameter.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT?\STX\SOH\EOT\DC2\EOT\165\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOT?\STX\SOH\ENQ\DC2\EOT\165\v\r\DC1\n\ + \\r\n\ + \\ENQ\EOT?\STX\SOH\SOH\DC2\EOT\165\v\DC2\GS\n\ + \\r\n\ + \\ENQ\EOT?\STX\SOH\ETX\DC2\EOT\165\v !\n\ + \\r\n\ + \\ENQ\EOT?\STX\SOH\b\DC2\EOT\165\v\"2\n\ + \\r\n\ + \\ENQ\EOT?\STX\SOH\a\DC2\EOT\165\v-1\n\ + \.\n\ + \\STX\EOT@\DC2\ACK\169\v\NUL\173\v\SOH\SUB Account routes result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOT@\SOH\DC2\EOT\169\v\b\RS\n\ + \/\n\ + \\EOT\EOT@\STX\NUL\DC2\EOT\172\v\EOT9\SUB! List of enabled account routes.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT@\STX\NUL\EOT\DC2\EOT\172\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOT@\STX\NUL\ACK\DC2\EOT\172\v\r\US\n\ + \\r\n\ + \\ENQ\EOT@\STX\NUL\SOH\DC2\EOT\172\v 4\n\ + \\r\n\ + \\ENQ\EOT@\STX\NUL\ETX\DC2\EOT\172\v78\n\ + \B\n\ + \\STX\EOTA\DC2\ACK\176\v\NUL\184\v\SOH\SUB4 Account to user authorization list result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOTA\SOH\DC2\EOT\176\v\b*\n\ + \<\n\ + \\EOT\EOTA\STX\NUL\DC2\EOT\179\v\EOT3\SUB. list of account to user authorization links.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\NUL\EOT\DC2\EOT\179\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTA\STX\NUL\ACK\DC2\EOT\179\v\r\FS\n\ + \\r\n\ + \\ENQ\EOTA\STX\NUL\SOH\DC2\EOT\179\v\GS.\n\ + \\r\n\ + \\ENQ\EOTA\STX\NUL\ETX\DC2\EOT\179\v12\n\ + \r\n\ + \\EOT\EOTA\STX\SOH\DC2\EOT\183\v\EOT3\SUBd This flag is set to true if all results are sent\n\ + \ and nothing was filtered out by 'top' parameter.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTA\STX\SOH\EOT\DC2\EOT\183\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTA\STX\SOH\ENQ\DC2\EOT\183\v\r\DC1\n\ + \\r\n\ + \\ENQ\EOTA\STX\SOH\SOH\DC2\EOT\183\v\DC2\GS\n\ + \\r\n\ + \\ENQ\EOTA\STX\SOH\ETX\DC2\EOT\183\v !\n\ + \\r\n\ + \\ENQ\EOTA\STX\SOH\b\DC2\EOT\183\v\"2\n\ + \\r\n\ + \\ENQ\EOTA\STX\SOH\a\DC2\EOT\183\v-1\n\ + \0\n\ + \\STX\EOTB\DC2\ACK\187\v\NUL\191\v\SOH\SUB\" Account settings result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOTB\SOH\DC2\EOT\187\v\b\GS\n\ + \!\n\ + \\EOT\EOTB\STX\NUL\DC2\EOT\190\v\EOT2\SUB\DC3 Account settings.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTB\STX\NUL\EOT\DC2\EOT\190\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTB\STX\NUL\ACK\DC2\EOT\190\v\r\FS\n\ + \\r\n\ + \\ENQ\EOTB\STX\NUL\SOH\DC2\EOT\190\v\GS-\n\ + \\r\n\ + \\ENQ\EOTB\STX\NUL\ETX\DC2\EOT\190\v01\n\ + \7\n\ + \\STX\EOTC\DC2\ACK\194\v\NUL\198\v\SOH\SUB) Account risk parameters result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOTC\SOH\DC2\EOT\194\v\b#\n\ + \(\n\ + \\EOT\EOTC\STX\NUL\DC2\EOT\197\v\EOT8\SUB\SUB Account risk parameters.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTC\STX\NUL\EOT\DC2\EOT\197\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTC\STX\NUL\ACK\DC2\EOT\197\v\r\ESC\n\ + \\r\n\ + \\ENQ\EOTC\STX\NUL\SOH\DC2\EOT\197\v\FS3\n\ + \\r\n\ + \\ENQ\EOTC\STX\NUL\ETX\DC2\EOT\197\v67\n\ + \@\n\ + \\STX\EOTD\DC2\ACK\201\v\NUL\203\v\SOH\SUB2 Update account's risk parameters result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOTD\SOH\DC2\EOT\201\v\b\"\n\ + \7\n\ + \\STX\EOTE\DC2\ACK\206\v\NUL\213\v\SOH\SUB) Account exchange groups result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOTE\SOH\DC2\EOT\206\v\b#\n\ + \B\n\ + \\EOT\EOTE\STX\NUL\DC2\EOT\209\v\EOT.\SUB4 List of exchange groups available for the account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTE\STX\NUL\EOT\DC2\EOT\209\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTE\STX\NUL\ACK\DC2\EOT\209\v\r\SUB\n\ + \\r\n\ + \\ENQ\EOTE\STX\NUL\SOH\DC2\EOT\209\v\ESC)\n\ + \\r\n\ + \\ENQ\EOTE\STX\NUL\ETX\DC2\EOT\209\v,-\n\ + \g\n\ + \\EOT\EOTE\STX\SOH\DC2\EOT\212\v\EOT0\SUBY Dictionary of instrument types that are used in the exchange group's commodities above.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTE\STX\SOH\EOT\DC2\EOT\212\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTE\STX\SOH\ACK\DC2\EOT\212\v\r\ESC\n\ + \\r\n\ + \\ENQ\EOTE\STX\SOH\SOH\DC2\EOT\212\v\FS+\n\ + \\r\n\ + \\ENQ\EOTE\STX\SOH\ETX\DC2\EOT\212\v./\n\ + \\247\STX\n\ + \\STX\EOTF\DC2\ACK\216\v\NUL\224\v\SOH\SUB' Account market limits result message.\n\ + \\"\191\STX Account market limits.\n\ + \ Should be used together with the account_exchange_groups_result: \n\ + \ - send account_available_exchange_groups_request to retrieve currently available markets.\n\ + \ - ignore all the fields in account_market_limits_result which do not belong to available markets in account_exchange_groups_result.\n\ + \\n\ + \\v\n\ + \\ETX\EOTF\SOH\DC2\EOT\216\v\b!\n\ + \\f\n\ + \\EOT\EOTF\STX\NUL\DC2\EOT\223\v\EOT4\n\ + \\r\n\ + \\ENQ\EOTF\STX\NUL\EOT\DC2\EOT\223\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTF\STX\NUL\ACK\DC2\EOT\223\v\r\EM\n\ + \\r\n\ + \\ENQ\EOTF\STX\NUL\SOH\DC2\EOT\223\v\SUB/\n\ + \\r\n\ + \\ENQ\EOTF\STX\NUL\ETX\DC2\EOT\223\v23\n\ + \1\n\ + \\STX\EOTG\DC2\ACK\227\v\NUL\233\v\SOH\SUB# Account positions result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOTG\SOH\DC2\EOT\227\v\b\RS\n\ + \\156\SOH\n\ + \\EOT\EOTG\STX\NUL\DC2\EOT\232\v\EOT4\SUB\141\SOH Account per contract positions.\n\ + \ If some contract has both long and short positions then there are two separate records for\n\ + \ this contract.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTG\STX\NUL\EOT\DC2\EOT\232\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTG\STX\NUL\ACK\DC2\EOT\232\v\r\GS\n\ + \\r\n\ + \\ENQ\EOTG\STX\NUL\SOH\DC2\EOT\232\v\RS/\n\ + \\r\n\ + \\ENQ\EOTG\STX\NUL\ETX\DC2\EOT\232\v23\n\ + \.\n\ + \\STX\EOTH\DC2\ACK\236\v\NUL\240\v\SOH\SUB Account equity result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOTH\SOH\DC2\EOT\236\v\b\ESC\n\ + \\US\n\ + \\EOT\EOTH\STX\NUL\DC2\EOT\239\v\EOT\US\SUB\DC1 Account equity.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTH\STX\NUL\EOT\DC2\EOT\239\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTH\STX\NUL\ACK\DC2\EOT\239\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTH\STX\NUL\SOH\DC2\EOT\239\v\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOTH\STX\NUL\ETX\DC2\EOT\239\v\GS\RS\n\ + \2\n\ + \\STX\EOTI\DC2\ACK\243\v\NUL\247\v\SOH\SUB$ Account collateral result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOTI\SOH\DC2\EOT\243\v\b\US\n\ + \#\n\ + \\EOT\EOTI\STX\NUL\DC2\EOT\246\v\EOT'\SUB\NAK Account collateral.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTI\STX\NUL\EOT\DC2\EOT\246\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTI\STX\NUL\ACK\DC2\EOT\246\v\r\ETB\n\ + \\r\n\ + \\ENQ\EOTI\STX\NUL\SOH\DC2\EOT\246\v\CAN\"\n\ + \\r\n\ + \\ENQ\EOTI\STX\NUL\ETX\DC2\EOT\246\v%&\n\ + \-\n\ + \\STX\EOTJ\DC2\ACK\250\v\NUL\254\v\SOH\SUB\US Clone account result message.\n\ + \\n\ + \\v\n\ + \\ETX\EOTJ\SOH\DC2\EOT\250\v\b\SUB\n\ + \0\n\ + \\EOT\EOTJ\STX\NUL\DC2\EOT\253\v\EOT'\SUB\" ID of the newly created account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTJ\STX\NUL\EOT\DC2\EOT\253\v\EOT\f\n\ + \\r\n\ + \\ENQ\EOTJ\STX\NUL\ENQ\DC2\EOT\253\v\r\DC3\n\ + \\r\n\ + \\ENQ\EOTJ\STX\NUL\SOH\DC2\EOT\253\v\DC4\"\n\ + \\r\n\ + \\ENQ\EOTJ\STX\NUL\ETX\DC2\EOT\253\v%&\n\ + \~\n\ + \\STX\EOTK\DC2\ACK\129\f\NUL\132\f\SOH\SUB/ Result of account general information update.\n\ + \\"? If message is received then account was updated successfully.\n\ + \\n\ + \\v\n\ + \\ETX\EOTK\SOH\DC2\EOT\129\f\b\ESC\n\ + \u\n\ + \\STX\EOTL\DC2\ACK\135\f\NUL\138\f\SOH\SUB$ Result of account settings update.\n\ + \\"A If message is received then settings were updated successfully.\n\ + \\n\ + \\v\n\ + \\ETX\EOTL\SOH\DC2\EOT\135\f\b#\n\ + \.\n\ + \\STX\EOTM\DC2\ACK\141\f\NUL\145\f\SOH\SUB Result of AccountGroupRequest.\n\ + \\n\ + \\v\n\ + \\ETX\EOTM\SOH\DC2\EOT\141\f\b\SUB\n\ + \K\n\ + \\EOT\EOTM\STX\NUL\DC2\EOT\144\f\EOT+\SUB= If provided account is not related to any group then empty.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTM\STX\NUL\EOT\DC2\EOT\144\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTM\STX\NUL\ACK\DC2\EOT\144\f\r\EM\n\ + \\r\n\ + \\ENQ\EOTM\STX\NUL\SOH\DC2\EOT\144\f\SUB&\n\ + \\r\n\ + \\ENQ\EOTM\STX\NUL\ETX\DC2\EOT\144\f)*\n\ + \{\n\ + \\STX\EOTN\DC2\ACK\148\f\NUL\151\f\SOH\SUB( Result of UpdateAccountRiskParameters.\n\ + \\"C If message is received then parameters were updated successfully.\n\ + \\n\ + \\v\n\ + \\ETX\EOTN\SOH\DC2\EOT\148\f\b)\n\ + \;\n\ + \\STX\EOTO\DC2\ACK\154\f\NUL\158\f\SOH\SUB- Result of AccountAvailableRouteListRequest.\n\ + \\n\ + \\v\n\ + \\ETX\EOTO\SOH\DC2\EOT\154\f\b'\n\ + \)\n\ + \\EOT\EOTO\STX\NUL\DC2\EOT\157\f\EOT'\SUB\ESC List of available routes.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTO\STX\NUL\EOT\DC2\EOT\157\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTO\STX\NUL\ACK\DC2\EOT\157\f\r\ESC\n\ + \\r\n\ + \\ENQ\EOTO\STX\NUL\SOH\DC2\EOT\157\f\FS\"\n\ + \\r\n\ + \\ENQ\EOTO\STX\NUL\ETX\DC2\EOT\157\f%&\n\ + \r\n\ + \\STX\EOTP\DC2\ACK\161\f\NUL\164\f\SOH\SUB# Result of UpdateAccountRouteList.\n\ + \\"? If message is received then routes were updated successfully.\n\ + \\n\ + \\v\n\ + \\ETX\EOTP\SOH\DC2\EOT\161\f\b$\n\ + \u\n\ + \\STX\EOTQ\DC2\ACK\167\f\NUL\170\f\SOH\SUB& Result of UpdateAccountMarketLimits.\n\ + \\"? If message is received then limits were updated successfully.\n\ + \\n\ + \\v\n\ + \\ETX\EOTQ\SOH\DC2\EOT\167\f\b'\n\ + \(\n\ + \\STX\EOTR\DC2\ACK\173\f\NUL\177\f\SOH\SUB\SUB Result of CreateAccount.\n\ + \\n\ + \\v\n\ + \\ETX\EOTR\SOH\DC2\EOT\173\f\b\ESC\n\ + \:\n\ + \\EOT\EOTR\STX\NUL\DC2\EOT\176\f\EOT\ESC\SUB, Id of newly created account, if succeeded.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTR\STX\NUL\EOT\DC2\EOT\176\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTR\STX\NUL\ENQ\DC2\EOT\176\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTR\STX\NUL\SOH\DC2\EOT\176\f\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOTR\STX\NUL\ETX\DC2\EOT\176\f\EM\SUB\n\ + \=\n\ + \\STX\EOTS\DC2\ACK\180\f\NUL\187\f\SOH\SUB/ [obsolete] Result of account cluster request.\n\ + \\n\ + \\v\n\ + \\ETX\EOTS\SOH\DC2\EOT\180\f\b\FS\n\ + \ \n\ + \\EOT\EOTS\STX\NUL\DC2\EOT\183\f\EOTM\SUB\DC2 Account cluster.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTS\STX\NUL\EOT\DC2\EOT\183\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTS\STX\NUL\ACK\DC2\EOT\183\f\r\ESC\n\ + \\r\n\ + \\ENQ\EOTS\STX\NUL\SOH\DC2\EOT\183\f\FS4\n\ + \\r\n\ + \\ENQ\EOTS\STX\NUL\ETX\DC2\EOT\183\f78\n\ + \\r\n\ + \\ENQ\EOTS\STX\NUL\b\DC2\EOT\183\f9L\n\ + \\SO\n\ + \\ACK\EOTS\STX\NUL\b\ETX\DC2\EOT\183\f:K\n\ + \.\n\ + \\EOT\EOTS\STX\SOH\DC2\EOT\186\f\EOTf\SUB Account cluster price offsets.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTS\STX\SOH\EOT\DC2\EOT\186\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTS\STX\SOH\ACK\DC2\EOT\186\f\r&\n\ + \\r\n\ + \\ENQ\EOTS\STX\SOH\SOH\DC2\EOT\186\f'M\n\ + \\r\n\ + \\ENQ\EOTS\STX\SOH\ETX\DC2\EOT\186\fPQ\n\ + \\r\n\ + \\ENQ\EOTS\STX\SOH\b\DC2\EOT\186\fRe\n\ + \\SO\n\ + \\ACK\EOTS\STX\SOH\b\ETX\DC2\EOT\186\fSd\n\ + \>\n\ + \\STX\EOTT\DC2\ACK\190\f\NUL\194\f\SOH\SUB0 [obsolete] Result of account cluster creation.\n\ + \\n\ + \\v\n\ + \\ETX\EOTT\SOH\DC2\EOT\190\f\b\"\n\ + \A\n\ + \\EOT\EOTT\STX\NUL\DC2\EOT\193\f\EOT\ESC\SUB3 Id of newly created account cluster if succeeded.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTT\STX\NUL\EOT\DC2\EOT\193\f\EOT\f\n\ + \\r\n\ + \\ENQ\EOTT\STX\NUL\ENQ\DC2\EOT\193\f\r\DC3\n\ + \\r\n\ + \\ENQ\EOTT\STX\NUL\SOH\DC2\EOT\193\f\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOTT\STX\NUL\ETX\DC2\EOT\193\f\EM\SUB\n\ + \q\n\ + \\STX\EOTU\DC2\ACK\197\f\NUL\200\f\SOH\SUB. [obsolete] Result of account cluster update.\n\ + \\"3 If message is received then update is successful.\n\ + \\n\ + \\v\n\ + \\ETX\EOTU\SOH\DC2\EOT\197\f\b\"\n\ + \\DEL\n\ + \\STX\EOTV\DC2\ACK\203\f\NUL\206\f\SOH\SUB< [obsolete] Result of account cluster price offsets update.\n\ + \\"3 If message is received then update is successful.\n\ + \\n\ + \\v\n\ + \\ETX\EOTV\SOH\DC2\EOT\203\f\b.\n\ + \\168\SOH\n\ + \\STX\EOTW\DC2\ACK\213\f\NUL\189\SI\SOH\SUBX Trade routing order chain.\n\ + \ Order chain attributes reflect current order chain status.\n\ + \2@//------------------------------------------\n\ + \// Common Messages\n\ + \\n\ + \\v\n\ + \\ETX\EOTW\SOH\DC2\EOT\213\f\b\DC2\n\ + \\"\n\ + \\EOT\EOTW\EOT\NUL\DC2\ACK\216\f\EOT\223\f\ENQ\SUB\DC2 Order side enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\EOT\NUL\SOH\DC2\EOT\216\f\t\r\n\ + \7\n\ + \\ACK\EOTW\EOT\NUL\STX\NUL\DC2\EOT\219\f\b\DLE\SUB' Describes purchasing side of a trade.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\NUL\STX\NUL\SOH\DC2\EOT\219\f\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\NUL\STX\NUL\STX\DC2\EOT\219\f\SO\SI\n\ + \4\n\ + \\ACK\EOTW\EOT\NUL\STX\SOH\DC2\EOT\222\f\b\DC1\SUB$ Describes selling side of a trade.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\NUL\STX\SOH\SOH\DC2\EOT\222\f\b\f\n\ + \\SI\n\ + \\a\EOTW\EOT\NUL\STX\SOH\STX\DC2\EOT\222\f\SI\DLE\n\ + \\"\n\ + \\EOT\EOTW\EOT\SOH\DC2\ACK\226\f\EOT\244\f\ENQ\SUB\DC2 Order type enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\EOT\SOH\SOH\DC2\EOT\226\f\t\DC2\n\ + \Q\n\ + \\ACK\EOTW\EOT\SOH\STX\NUL\DC2\EOT\229\f\b\DLE\SUBA Market order, buy or sell at the best available opposite price.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\SOH\STX\NUL\SOH\DC2\EOT\229\f\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\SOH\STX\NUL\STX\DC2\EOT\229\f\SO\SI\n\ + \j\n\ + \\ACK\EOTW\EOT\SOH\STX\SOH\DC2\EOT\232\f\b\DLE\SUBZ Limit order, buy or sell at price that is the same or better than specified limit price.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\SOH\STX\SOH\SOH\DC2\EOT\232\f\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\SOH\STX\SOH\STX\DC2\EOT\232\f\SO\SI\n\ + \\138\SOH\n\ + \\ACK\EOTW\EOT\SOH\STX\STX\DC2\EOT\236\f\b\DLE\SUBz Stop order, order becomes a market order when market reaches order's stop price.\n\ + \ (which is on opposite side of market).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\SOH\STX\STX\SOH\DC2\EOT\236\f\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\SOH\STX\STX\STX\DC2\EOT\236\f\SO\SI\n\ + \g\n\ + \\ACK\EOTW\EOT\SOH\STX\ETX\DC2\EOT\239\f\b\DLE\SUBW Stop-limit order, order becomes a limit order when market reaches order's stop price.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\SOH\STX\ETX\SOH\DC2\EOT\239\f\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\SOH\STX\ETX\STX\DC2\EOT\239\f\SO\SI\n\ + \\199\SOH\n\ + \\ACK\EOTW\EOT\SOH\STX\EOT\DC2\EOT\243\f\b\DC2\SUB\182\SOH Cross order, prearranged trades with either a counterparty within the trading firm itself\n\ + \ or with a specified counterparty outside the firm. These orders are executed on exchange.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\SOH\STX\EOT\SOH\DC2\EOT\243\f\b\r\n\ + \\SI\n\ + \\a\EOTW\EOT\SOH\STX\EOT\STX\DC2\EOT\243\f\DLE\DC1\n\ + \.\n\ + \\EOT\EOTW\EOT\STX\DC2\ACK\247\f\EOT\177\r\ENQ\SUB\RS Order execution instruction.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\EOT\STX\SOH\DC2\EOT\247\f\t\CAN\n\ + \;\n\ + \\ACK\EOTW\EOT\STX\STX\NUL\DC2\EOT\250\f\b\DLE\SUB+ All or None (fill order only completely).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\NUL\SOH\DC2\EOT\250\f\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\NUL\STX\DC2\EOT\250\f\SO\SI\n\ + \9\n\ + \\ACK\EOTW\EOT\STX\STX\SOH\DC2\EOT\253\f\b\DC4\SUB) Iceberg (show only part of order size).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\SOH\SOH\DC2\EOT\253\f\b\SI\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\SOH\STX\DC2\EOT\253\f\DC2\DC3\n\ + \m\n\ + \\ACK\EOTW\EOT\STX\STX\STX\DC2\EOT\128\r\b\SI\SUB] Quantity triggered (aka DOM Triggered, honor additional quantity threshold for triggering).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\STX\SOH\DC2\EOT\128\r\b\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\STX\STX\DC2\EOT\128\r\r\SO\n\ + \k\n\ + \\ACK\EOTW\EOT\STX\STX\ETX\DC2\EOT\131\r\b\DC2\SUB[ Trailing order (price of the order is following market one direction by specific offset).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\ETX\SOH\DC2\EOT\131\r\b\r\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\ETX\STX\DC2\EOT\131\r\DLE\DC1\n\ + \A\n\ + \\ACK\EOTW\EOT\STX\STX\EOT\DC2\EOT\134\r\b\DC3\SUB1 Funari (Limit order becomes a Market on Close).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\EOT\SOH\DC2\EOT\134\r\b\SO\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\EOT\STX\DC2\EOT\134\r\DC1\DC2\n\ + \k\n\ + \\ACK\EOTW\EOT\STX\STX\ENQ\DC2\EOT\137\r\b\DLE\SUB[ Market if Touched (Limit order becomes a Market when market reaches order's limit price).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\ENQ\SOH\DC2\EOT\137\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\ENQ\STX\DC2\EOT\137\r\SO\SI\n\ + \\197\SOH\n\ + \\ACK\EOTW\EOT\STX\STX\ACK\DC2\EOT\141\r\b\DLE\SUB\180\SOH Market Limit Market is a limit order that is used to place a buy order above the best offer\n\ + \ to fill by the best offer or a sell order below the best bid to fill by the best bid.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\ACK\SOH\DC2\EOT\141\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\ACK\STX\DC2\EOT\141\r\SO\SI\n\ + \{\n\ + \\ACK\EOTW\EOT\STX\STX\a\DC2\EOT\145\r\b\DLE\SUBk Market with Leftover as Limit\n\ + \ (market order then unexecuted quantity becomes limit order at last price).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\a\SOH\DC2\EOT\145\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\a\STX\DC2\EOT\145\r\SO\SI\n\ + \\192\SOH\n\ + \\ACK\EOTW\EOT\STX\STX\b\DC2\EOT\149\r\b\DC4\SUB\175\SOH An auction order is an order to buy or sell in the market at the Calculated Opening Price (COP)\n\ + \ (Unmatched auction orders are converted to limit orders on the market open).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\b\SOH\DC2\EOT\149\r\b\SI\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\b\STX\DC2\EOT\149\r\DC2\DC3\n\ + \M\n\ + \\ACK\EOTW\EOT\STX\STX\t\DC2\EOT\152\r\b\SYN\SUB= Post Only Orders are only accepted as passive limit orders.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\t\SOH\DC2\EOT\152\r\b\DLE\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\t\STX\DC2\EOT\152\r\DC3\NAK\n\ + \N\n\ + \\ACK\EOTW\EOT\STX\STX\n\ + \\DC2\EOT\155\r\b!\SUB>[obsolete] This execution instruction is no longer supported.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\n\ + \\SOH\DC2\EOT\155\r\b\ESC\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\n\ + \\STX\DC2\EOT\155\r\RS \n\ + \A\n\ + \\ACK\EOTW\EOT\STX\STX\v\DC2\EOT\158\r\b\SUB\SUB1 At Any Price Orders are US-Style Market Orders.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\v\SOH\DC2\EOT\158\r\b\DC4\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\v\STX\DC2\EOT\158\r\ETB\EM\n\ + \*\n\ + \\ACK\EOTW\EOT\STX\STX\f\DC2\EOT\161\r\b+\SUB\SUB Prearranged Limit Order.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\f\SOH\DC2\EOT\161\r\b%\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\f\STX\DC2\EOT\161\r(*\n\ + \E\n\ + \\ACK\EOTW\EOT\STX\STX\r\DC2\EOT\164\r\b\ETB\SUB5 Nasdaq Nordic Equities On-Exchange Trade Reporting.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\r\SOH\DC2\EOT\164\r\b\DC1\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\r\STX\DC2\EOT\164\r\DC4\SYN\n\ + \L\n\ + \\ACK\EOTW\EOT\STX\STX\SO\DC2\EOT\167\r\b\NAK\SUB< Nasdaq Nordic Equities Off-Exchange (APA) Trade Reporting.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\SO\SOH\DC2\EOT\167\r\b\SI\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\SO\STX\DC2\EOT\167\r\DC2\DC4\n\ + \Q\n\ + \\ACK\EOTW\EOT\STX\STX\SI\DC2\EOT\170\r\b\CAN\SUBA Nasdaq Nordic Derivatives On-Exchange Outright Trade Reporting.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\SI\SOH\DC2\EOT\170\r\b\DC2\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\SI\STX\DC2\EOT\170\r\NAK\ETB\n\ + \T\n\ + \\ACK\EOTW\EOT\STX\STX\DLE\DC2\EOT\173\r\b\CAN\SUBD Nasdaq Nordic Derivatives On-Exchange Combination Trade Reporting.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\DLE\SOH\DC2\EOT\173\r\b\DC2\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\DLE\STX\DC2\EOT\173\r\NAK\ETB\n\ + \\145\SOH\n\ + \\ACK\EOTW\EOT\STX\STX\DC1\DC2\EOT\176\r\b\DC1\SUB\128\SOH Internal Cross Only (This order type is used by OTC to pull up to order size quantity from the exchange on the opposite side).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\DC1\SOH\DC2\EOT\176\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\STX\STX\DC1\STX\DC2\EOT\176\r\SO\DLE\n\ + \!\n\ + \\EOT\EOTW\EOT\ETX\DC2\ACK\180\r\EOT\206\r\ENQ\SUB\DC1 Order duration.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\EOT\ETX\SOH\DC2\EOT\180\r\t\DC1\n\ + \S\n\ + \\ACK\EOTW\EOT\ETX\STX\NUL\DC2\EOT\183\r\b\DLE\SUBC Day order. Order is working through the current trading day only.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\NUL\SOH\DC2\EOT\183\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\NUL\STX\DC2\EOT\183\r\SO\SI\n\ + \~\n\ + \\ACK\EOTW\EOT\ETX\STX\SOH\DC2\EOT\186\r\b\DLE\SUBn Good Til Canceled. Order is working until canceled or until the contract is no longer available for trading.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\SOH\SOH\DC2\EOT\186\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\SOH\STX\DC2\EOT\186\r\SO\SI\n\ + \\155\SOH\n\ + \\ACK\EOTW\EOT\ETX\STX\STX\DC2\EOT\190\r\b\DLE\SUB\138\SOH Good Til Date. Order is working until the end of the nearest trading day for the contract on\n\ + \ or before the date specified in the order.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\STX\SOH\DC2\EOT\190\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\STX\STX\DC2\EOT\190\r\SO\SI\n\ + \K\n\ + \\ACK\EOTW\EOT\ETX\STX\ETX\DC2\EOT\193\r\b\DLE\SUB; Good Til Time. Order is working until the specified time.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\ETX\SOH\DC2\EOT\193\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\ETX\STX\DC2\EOT\193\r\SO\SI\n\ + \Z\n\ + \\ACK\EOTW\EOT\ETX\STX\EOT\DC2\EOT\196\r\b\DLE\SUBJ Fill and Kill. Immediately fill as many as possible and cancel the rest.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\EOT\SOH\DC2\EOT\196\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\EOT\STX\DC2\EOT\196\r\SO\SI\n\ + \Q\n\ + \\ACK\EOTW\EOT\ETX\STX\ENQ\DC2\EOT\199\r\b\DLE\SUBA Fill Or Kill. Immediately fill this order completely or cancel.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\ENQ\SOH\DC2\EOT\199\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\ENQ\STX\DC2\EOT\199\r\SO\SI\n\ + \T\n\ + \\ACK\EOTW\EOT\ETX\STX\ACK\DC2\EOT\202\r\b\DLE\SUBD At The Open. Buy or sell at the very beginning of the trading day.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\ACK\SOH\DC2\EOT\202\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\ACK\STX\DC2\EOT\202\r\SO\SI\n\ + \t\n\ + \\ACK\EOTW\EOT\ETX\STX\a\DC2\EOT\205\r\b\DLE\SUBd At The Close. Buy or sell at the close of the market, or as near to the closing price as possible.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\a\SOH\DC2\EOT\205\r\b\v\n\ + \\SI\n\ + \\a\EOTW\EOT\ETX\STX\a\STX\DC2\EOT\205\r\SO\SI\n\ + \-\n\ + \\EOT\EOTW\EOT\EOT\DC2\ACK\209\r\EOT\138\SO\ENQ\SUB\GS Current order chain status.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\EOT\EOT\SOH\DC2\EOT\209\r\t\SI\n\ + \H\n\ + \\ACK\EOTW\EOT\EOT\STX\NUL\DC2\EOT\212\r\b\SYN\SUB8 This status is used for internal Gateway transactions.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\NUL\SOH\DC2\EOT\212\r\b\DC1\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\NUL\STX\DC2\EOT\212\r\DC4\NAK\n\ + \=\n\ + \\ACK\EOTW\EOT\EOT\STX\SOH\DC2\EOT\215\r\b\ETB\SUB- Original order is sent to execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\SOH\SOH\DC2\EOT\215\r\b\DC2\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\SOH\STX\DC2\EOT\215\r\NAK\SYN\n\ + \$\n\ + \\ACK\EOTW\EOT\EOT\STX\STX\DC2\EOT\218\r\b\NAK\SUB\DC4 Order is rejected.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\STX\SOH\DC2\EOT\218\r\b\DLE\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\STX\STX\DC2\EOT\218\r\DC3\DC4\n\ + \R\n\ + \\ACK\EOTW\EOT\EOT\STX\ETX\DC2\EOT\221\r\b\DC4\SUBB Order is acknowledged by execution and perhaps partially filled.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\ETX\SOH\DC2\EOT\221\r\b\SI\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\ETX\STX\DC2\EOT\221\r\DC2\DC3\n\ + \#\n\ + \\ACK\EOTW\EOT\EOT\STX\EOT\DC2\EOT\224\r\b\DC4\SUB\DC3 Order is expired.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\EOT\SOH\DC2\EOT\224\r\b\SI\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\EOT\STX\DC2\EOT\224\r\DC2\DC3\n\ + \=\n\ + \\ACK\EOTW\EOT\EOT\STX\ENQ\DC2\EOT\227\r\b\SYN\SUB- Cancel request is sent to execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\ENQ\SOH\DC2\EOT\227\r\b\DC1\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\ENQ\STX\DC2\EOT\227\r\DC4\NAK\n\ + \=\n\ + \\ACK\EOTW\EOT\EOT\STX\ACK\DC2\EOT\230\r\b\SYN\SUB- Modify request is sent to execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\ACK\SOH\DC2\EOT\230\r\b\DC1\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\ACK\STX\DC2\EOT\230\r\DC4\NAK\n\ + \$\n\ + \\ACK\EOTW\EOT\EOT\STX\a\DC2\EOT\233\r\b\SYN\SUB\DC4 Order is canceled.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\a\SOH\DC2\EOT\233\r\b\DC1\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\a\STX\DC2\EOT\233\r\DC4\NAK\n\ + \A\n\ + \\ACK\EOTW\EOT\EOT\STX\b\DC2\EOT\236\r\b\DC3\SUB1 Order is completely filled by execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\b\SOH\DC2\EOT\236\r\b\SO\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\b\STX\DC2\EOT\236\r\DC1\DC2\n\ + \B\n\ + \\ACK\EOTW\EOT\EOT\STX\t\DC2\EOT\239\r\b\SYN\SUB2 Order is waiting submission to execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\t\SOH\DC2\EOT\239\r\b\DC1\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\t\STX\DC2\EOT\239\r\DC4\NAK\n\ + \I\n\ + \\ACK\EOTW\EOT\EOT\STX\n\ + \\DC2\EOT\242\r\b\SUB\SUB9 Order may be canceled because a disconnection occurred.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\n\ + \\SOH\DC2\EOT\242\r\b\DC4\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\n\ + \\STX\DC2\EOT\242\r\ETB\EM\n\ + \t\n\ + \\ACK\EOTW\EOT\EOT\STX\v\DC2\EOT\245\r\b\ETB\SUBd Order will be placed at a specified time (waiting for execution system to start accepting orders).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\v\SOH\DC2\EOT\245\r\b\DC1\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\v\STX\DC2\EOT\245\r\DC4\SYN\n\ + \h\n\ + \\ACK\EOTW\EOT\EOT\STX\f\DC2\EOT\248\r\b\RS\SUBX Cross order sent to exchange and waiting approval from exchange and/or counterparties.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\f\SOH\DC2\EOT\248\r\b\CAN\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\f\STX\DC2\EOT\248\r\ESC\GS\n\ + \I\n\ + \\ACK\EOTW\EOT\EOT\STX\r\DC2\EOT\251\r\b\SYN\SUB9 Cross order is approved by exchange and counterparties.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\r\SOH\DC2\EOT\251\r\b\DLE\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\r\STX\DC2\EOT\251\r\DC3\NAK\n\ + \B\n\ + \\ACK\EOTW\EOT\EOT\STX\SO\DC2\EOT\254\r\b\RS\SUB2Cross order is rejected by one of counterparties.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\SO\SOH\DC2\EOT\254\r\b\CAN\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\SO\STX\DC2\EOT\254\r\ESC\GS\n\ + \f\n\ + \\ACK\EOTW\EOT\EOT\STX\SI\DC2\EOT\129\SO\b\NAK\SUBVCross order is completely executed on exchange. It is the final state of cross order.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\SI\SOH\DC2\EOT\129\SO\b\SI\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\SI\STX\DC2\EOT\129\SO\DC2\DC4\n\ + \\134\SOH\n\ + \\ACK\EOTW\EOT\EOT\STX\DLE\DC2\EOT\133\SO\b\SUB\SUBvCross order/leg is executed on exchange,\n\ + \this is transit state until all transactions for trades/breaks are received.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\DLE\SOH\DC2\EOT\133\SO\b\DC4\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\DLE\STX\DC2\EOT\133\SO\ETB\EM\n\ + \u\n\ + \\ACK\EOTW\EOT\EOT\STX\DC1\DC2\EOT\137\SO\b\SUB\SUBeCross order was executed on exchange, but now \n\ + \all its trades/legs have been broken by the exchange.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\DC1\SOH\DC2\EOT\137\SO\b\DC4\n\ + \\SI\n\ + \\a\EOTW\EOT\EOT\STX\DC1\STX\DC2\EOT\137\SO\ETB\EM\n\ + \5\n\ + \\EOT\EOTW\EOT\ENQ\DC2\ACK\141\SO\EOT\151\SO\ENQ\SUB% Order or fill open/close type enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\EOT\ENQ\SOH\DC2\EOT\141\SO\t\SYN\n\ + \3\n\ + \\ACK\EOTW\EOT\ENQ\STX\NUL\DC2\EOT\144\SO\b\DC1\SUB# Opening new current day position.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ENQ\STX\NUL\SOH\DC2\EOT\144\SO\b\f\n\ + \\SI\n\ + \\a\EOTW\EOT\ENQ\STX\NUL\STX\DC2\EOT\144\SO\SI\DLE\n\ + \O\n\ + \\ACK\EOTW\EOT\ENQ\STX\SOH\DC2\EOT\147\SO\b\DC2\SUB? Closing (current day only if instrument uses explicit close).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ENQ\STX\SOH\SOH\DC2\EOT\147\SO\b\r\n\ + \\SI\n\ + \\a\EOTW\EOT\ENQ\STX\SOH\STX\DC2\EOT\147\SO\DLE\DC1\n\ + \K\n\ + \\ACK\EOTW\EOT\ENQ\STX\STX\DC2\EOT\150\SO\b\ESC\SUB; Closing previous day (if instrument uses explicit close).\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ENQ\STX\STX\SOH\DC2\EOT\150\SO\b\SYN\n\ + \\SI\n\ + \\a\EOTW\EOT\ENQ\STX\STX\STX\DC2\EOT\150\SO\EM\SUB\n\ + \6\n\ + \\EOT\EOTW\EOT\ACK\DC2\ACK\154\SO\EOT\164\SO\ENQ\SUB& Order or fill speculation type enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\EOT\ACK\SOH\DC2\EOT\154\SO\t\CAN\n\ + \\RS\n\ + \\ACK\EOTW\EOT\ACK\STX\NUL\DC2\EOT\157\SO\b\CAN\SUB\SO Speculation.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ACK\STX\NUL\SOH\DC2\EOT\157\SO\b\DC3\n\ + \\SI\n\ + \\a\EOTW\EOT\ACK\STX\NUL\STX\DC2\EOT\157\SO\SYN\ETB\n\ + \\CAN\n\ + \\ACK\EOTW\EOT\ACK\STX\SOH\DC2\EOT\160\SO\b\DC2\SUB\b Hedge.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ACK\STX\SOH\SOH\DC2\EOT\160\SO\b\r\n\ + \\SI\n\ + \\a\EOTW\EOT\ACK\STX\SOH\STX\DC2\EOT\160\SO\DLE\DC1\n\ + \\FS\n\ + \\ACK\EOTW\EOT\ACK\STX\STX\DC2\EOT\163\SO\b\SYN\SUB\f Arbitrage.\n\ + \\n\ + \\SI\n\ + \\a\EOTW\EOT\ACK\STX\STX\SOH\DC2\EOT\163\SO\b\DC1\n\ + \\SI\n\ + \\a\EOTW\EOT\ACK\STX\STX\STX\DC2\EOT\163\SO\DC4\NAK\n\ + \m\n\ + \\EOT\EOTW\STX\NUL\DC2\EOT\167\SO\EOT'\SUB_ Identifier of an order chain (it is equal to the order_id of the first request in the chain).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\NUL\EOT\DC2\EOT\167\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\NUL\ENQ\DC2\EOT\167\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\NUL\SOH\DC2\EOT\167\SO\DC4\"\n\ + \\r\n\ + \\ENQ\EOTW\STX\NUL\ETX\DC2\EOT\167\SO%&\n\ + \\160\SOH\n\ + \\EOT\EOTW\STX\SOH\DC2\EOT\171\SO\EOT!\SUB\145\SOH Order identifier of the last not rejected order request (except rejected initial place request)\n\ + \ which defines the current status of the chain.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\SOH\EOT\DC2\EOT\171\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\SOH\ENQ\DC2\EOT\171\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\SOH\SOH\DC2\EOT\171\SO\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTW\STX\SOH\ETX\DC2\EOT\171\SO\US \n\ + \=\n\ + \\EOT\EOTW\STX\STX\DC2\EOT\174\SO\EOT.\SUB/ Account ID that was used to create the chain.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\STX\EOT\DC2\EOT\174\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\STX\ENQ\DC2\EOT\174\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\STX\SOH\DC2\EOT\174\SO\DC4)\n\ + \\r\n\ + \\ENQ\EOTW\STX\STX\ETX\DC2\EOT\174\SO,-\n\ + \H\n\ + \\EOT\EOTW\STX\ETX\DC2\EOT\177\SO\EOT+\SUB: Time when order was submitted to execution system (UTC).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\ETX\EOT\DC2\EOT\177\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\ETX\ENQ\DC2\EOT\177\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\ETX\SOH\DC2\EOT\177\SO\DC4&\n\ + \\r\n\ + \\ENQ\EOTW\STX\ETX\ETX\DC2\EOT\177\SO)*\n\ + \%\n\ + \\EOT\EOTW\STX\EOT\DC2\EOT\180\SO\EOT(\SUB\ETB Full contract symbol.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\EOT\EOT\DC2\EOT\180\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\EOT\ENQ\DC2\EOT\180\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\EOT\SOH\DC2\EOT\180\SO\DC4#\n\ + \\r\n\ + \\ENQ\EOTW\STX\EOT\ETX\DC2\EOT\180\SO&'\n\ + \U\n\ + \\EOT\EOTW\STX\ENQ\DC2\EOT\184\SO\EOT\GS\SUBG Order side.\n\ + \ This field is associated with OrderChain.Side enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\ENQ\EOT\DC2\EOT\184\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\ENQ\ENQ\DC2\EOT\184\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\ENQ\SOH\DC2\EOT\184\SO\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTW\STX\ENQ\ETX\DC2\EOT\184\SO\ESC\FS\n\ + \2\n\ + \\EOT\EOTW\STX\ACK\DC2\EOT\187\SO\EOT:\SUB$ [obsolete] Use size field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\ACK\EOT\DC2\EOT\187\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\ACK\ENQ\DC2\EOT\187\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\ACK\SOH\DC2\EOT\187\SO\DC4!\n\ + \\r\n\ + \\ENQ\EOTW\STX\ACK\ETX\DC2\EOT\187\SO$%\n\ + \\r\n\ + \\ENQ\EOTW\STX\ACK\b\DC2\EOT\187\SO&9\n\ + \\SO\n\ + \\ACK\EOTW\STX\ACK\b\ETX\DC2\EOT\187\SO'8\n\ + \9\n\ + \\EOT\EOTW\STX\a\DC2\EOT\191\SO\EOT$\SUB+ Order limit price.\n\ + \ Correct price format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\a\EOT\DC2\EOT\191\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\a\ENQ\DC2\EOT\191\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\a\SOH\DC2\EOT\191\SO\DC4\US\n\ + \\r\n\ + \\ENQ\EOTW\STX\a\ETX\DC2\EOT\191\SO\"#\n\ + \8\n\ + \\EOT\EOTW\STX\b\DC2\EOT\195\SO\EOT$\SUB* Order stop price.\n\ + \ Correct price format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\b\EOT\DC2\EOT\195\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\b\ENQ\DC2\EOT\195\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\b\SOH\DC2\EOT\195\SO\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTW\STX\b\ETX\DC2\EOT\195\SO!#\n\ + \t\n\ + \\EOT\EOTW\STX\t\DC2\EOT\199\SO\EOT*\SUBf List of execution instructions.\n\ + \ This field is associated with OrderChain.ExecInstruction enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\t\EOT\DC2\EOT\199\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\t\ENQ\DC2\EOT\199\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\t\SOH\DC2\EOT\199\SO\DC4$\n\ + \\r\n\ + \\ENQ\EOTW\STX\t\ETX\DC2\EOT\199\SO')\n\ + \]\n\ + \\EOT\EOTW\STX\n\ + \\DC2\EOT\203\SO\EOT\"\SUBO Order duration.\n\ + \ This field is associated with OrderChain.Duration enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\n\ + \\EOT\DC2\EOT\203\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\n\ + \\ENQ\DC2\EOT\203\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\n\ + \\SOH\DC2\EOT\203\SO\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTW\STX\n\ + \\ETX\DC2\EOT\203\SO\US!\n\ + \n\n\ + \\EOT\EOTW\STX\v\DC2\EOT\206\SO\EOT(\SUB` Date for GTD (local to exchange, date only value in time format) when the order should expire.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\v\EOT\DC2\EOT\206\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\v\ENQ\DC2\EOT\206\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\v\SOH\DC2\EOT\206\SO\DC4\"\n\ + \\r\n\ + \\ENQ\EOTW\STX\v\ETX\DC2\EOT\206\SO%'\n\ + \O\n\ + \\EOT\EOTW\STX\f\DC2\EOT\209\SO\EOT,\SUBA Date and time for GTT order (UTC) when the order should expire.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\f\EOT\DC2\EOT\209\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\f\ENQ\DC2\EOT\209\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\f\SOH\DC2\EOT\209\SO\DC4&\n\ + \\r\n\ + \\ENQ\EOTW\STX\f\ETX\DC2\EOT\209\SO)+\n\ + \Y\n\ + \\EOT\EOTW\STX\r\DC2\EOT\213\SO\EOT \SUBK Order status.\n\ + \ This field is associated with OrderChain.Status enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\r\EOT\DC2\EOT\213\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\r\ENQ\DC2\EOT\213\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\r\SOH\DC2\EOT\213\SO\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOTW\STX\r\ETX\DC2\EOT\213\SO\GS\US\n\ + \Z\n\ + \\EOT\EOTW\STX\SO\DC2\EOT\217\SO\EOT$\SUBL Order type.\n\ + \ This field is associated with OrderChain.OrderType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\SO\EOT\DC2\EOT\217\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\SO\ENQ\DC2\EOT\217\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\SO\SOH\DC2\EOT\217\SO\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTW\STX\SO\ETX\DC2\EOT\217\SO!#\n\ + \4\n\ + \\EOT\EOTW\STX\SI\DC2\EOT\220\SO\EOT-\SUB& List of order requests in the chain.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\SI\EOT\DC2\EOT\220\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\SI\ACK\DC2\EOT\220\SO\r\EM\n\ + \\r\n\ + \\ENQ\EOTW\STX\SI\SOH\DC2\EOT\220\SO\SUB'\n\ + \\r\n\ + \\ENQ\EOTW\STX\SI\ETX\DC2\EOT\220\SO*,\n\ + \\FS\n\ + \\EOT\EOTW\STX\DLE\DC2\EOT\223\SO\EOT'\SUB\SO Order fills.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\DLE\EOT\DC2\EOT\223\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\DLE\ACK\DC2\EOT\223\SO\r\SYN\n\ + \\r\n\ + \\ENQ\EOTW\STX\DLE\SOH\DC2\EOT\223\SO\ETB!\n\ + \\r\n\ + \\ENQ\EOTW\STX\DLE\ETX\DC2\EOT\223\SO$&\n\ + \W\n\ + \\EOT\EOTW\STX\DC1\DC2\EOT\226\SO\EOT'\SUBI The values are associated with a lookup property with ORDER_CLASS type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC1\EOT\DC2\EOT\226\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC1\ENQ\DC2\EOT\226\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC1\SOH\DC2\EOT\226\SO\DC4!\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC1\ETX\DC2\EOT\226\SO$&\n\ + \9\n\ + \\EOT\EOTW\STX\DC2\DC2\EOT\230\SO\EOT-\SUB+ Order limit price.\n\ + \ Display price format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC2\EOT\DC2\EOT\230\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC2\ENQ\DC2\EOT\230\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC2\SOH\DC2\EOT\230\SO\DC4'\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC2\ETX\DC2\EOT\230\SO*,\n\ + \8\n\ + \\EOT\EOTW\STX\DC3\DC2\EOT\234\SO\EOT,\SUB* Order stop price.\n\ + \ Display price format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC3\EOT\DC2\EOT\234\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC3\ENQ\DC2\EOT\234\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC3\SOH\DC2\EOT\234\SO\DC4&\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC3\ETX\DC2\EOT\234\SO)+\n\ + \2\n\ + \\EOT\EOTW\STX\DC4\DC2\EOT\237\SO\EOT0\SUB$ Account name provided to exchange.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC4\EOT\DC2\EOT\237\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC4\ENQ\DC2\EOT\237\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC4\SOH\DC2\EOT\237\SO\DC4*\n\ + \\r\n\ + \\ENQ\EOTW\STX\DC4\ETX\DC2\EOT\237\SO-/\n\ + \.\n\ + \\EOT\EOTW\STX\NAK\DC2\EOT\240\SO\EOT)\SUB Trailing specific information.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\NAK\EOT\DC2\EOT\240\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\NAK\ACK\DC2\EOT\240\SO\r\SUB\n\ + \\r\n\ + \\ENQ\EOTW\STX\NAK\SOH\DC2\EOT\240\SO\ESC#\n\ + \\r\n\ + \\ENQ\EOTW\STX\NAK\ETX\DC2\EOT\240\SO&(\n\ + \%\n\ + \\EOT\EOTW\STX\SYN\DC2\EOT\243\SO\EOT#\SUB\ETB Specific order sizes.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\SYN\EOT\DC2\EOT\243\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\SYN\ACK\DC2\EOT\243\SO\r\ETB\n\ + \\r\n\ + \\ENQ\EOTW\STX\SYN\SOH\DC2\EOT\243\SO\CAN\GS\n\ + \\r\n\ + \\ENQ\EOTW\STX\SYN\ETX\DC2\EOT\243\SO \"\n\ + \7\n\ + \\EOT\EOTW\STX\ETB\DC2\EOT\246\SO\EOT(\SUB) Full list of accounts towards exchange.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\ETB\EOT\DC2\EOT\246\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\ETB\ACK\DC2\EOT\246\SO\r\EM\n\ + \\r\n\ + \\ENQ\EOTW\STX\ETB\SOH\DC2\EOT\246\SO\SUB\"\n\ + \\r\n\ + \\ENQ\EOTW\STX\ETB\ETX\DC2\EOT\246\SO%'\n\ + \;\n\ + \\EOT\EOTW\STX\CAN\DC2\EOT\249\SO\EOT*\SUB- Associated compound orders tree identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\CAN\EOT\DC2\EOT\249\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\CAN\ENQ\DC2\EOT\249\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\CAN\SOH\DC2\EOT\249\SO\DC4$\n\ + \\r\n\ + \\ENQ\EOTW\STX\CAN\ETX\DC2\EOT\249\SO')\n\ + \+\n\ + \\EOT\EOTW\STX\EM\DC2\EOT\252\SO\EOT-\SUB\GS In case of some synthetics.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\EM\EOT\DC2\EOT\252\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\EM\ENQ\DC2\EOT\252\SO\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\EM\SOH\DC2\EOT\252\SO\DC4'\n\ + \\r\n\ + \\ENQ\EOTW\STX\EM\ETX\DC2\EOT\252\SO*,\n\ + \4\n\ + \\EOT\EOTW\STX\SUB\DC2\EOT\255\SO\EOT\US\SUB& Order can be checked for any reason.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\SUB\EOT\DC2\EOT\255\SO\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\SUB\ENQ\DC2\EOT\255\SO\r\DC1\n\ + \\r\n\ + \\ENQ\EOTW\STX\SUB\SOH\DC2\EOT\255\SO\DC2\EM\n\ + \\r\n\ + \\ENQ\EOTW\STX\SUB\ETX\DC2\EOT\255\SO\FS\RS\n\ + \,\n\ + \\EOT\EOTW\STX\ESC\DC2\EOT\130\SI\EOT,\SUB\RS Strategy trading expression.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\ESC\EOT\DC2\EOT\130\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\ESC\ENQ\DC2\EOT\130\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\ESC\SOH\DC2\EOT\130\SI\DC4&\n\ + \\r\n\ + \\ENQ\EOTW\STX\ESC\ETX\DC2\EOT\130\SI)+\n\ + \%\n\ + \\EOT\EOTW\STX\FS\DC2\EOT\133\SI\EOT(\SUB\ETB Order's contract legs\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\FS\EOT\DC2\EOT\133\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\FS\ACK\DC2\EOT\133\SI\r\GS\n\ + \\r\n\ + \\ENQ\EOTW\STX\FS\SOH\DC2\EOT\133\SI\RS\"\n\ + \\r\n\ + \\ENQ\EOTW\STX\FS\ETX\DC2\EOT\133\SI%'\n\ + \H\n\ + \\EOT\EOTW\STX\GS\DC2\EOT\137\SI\EOT.\SUB: Full contract description.\n\ + \ Formula in case of strategy.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\GS\EOT\DC2\EOT\137\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\GS\ENQ\DC2\EOT\137\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\GS\SOH\DC2\EOT\137\SI\DC4(\n\ + \\r\n\ + \\ENQ\EOTW\STX\GS\ETX\DC2\EOT\137\SI+-\n\ + \R\n\ + \\EOT\EOTW\STX\RS\DC2\EOT\141\SI\EOT1\SUBD Additional user defined attributes.\n\ + \ First - name, second - value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\RS\EOT\DC2\EOT\141\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\RS\ACK\DC2\EOT\141\SI\r\ESC\n\ + \\r\n\ + \\ENQ\EOTW\STX\RS\SOH\DC2\EOT\141\SI\FS+\n\ + \\r\n\ + \\ENQ\EOTW\STX\RS\ETX\DC2\EOT\141\SI.0\n\ + \5\n\ + \\EOT\EOTW\STX\US\DC2\EOT\144\SI\EOT.\SUB' Client-side determined algo strategy.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\US\EOT\DC2\EOT\144\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\US\ENQ\DC2\EOT\144\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\US\SOH\DC2\EOT\144\SI\DC4(\n\ + \\r\n\ + \\ENQ\EOTW\STX\US\ETX\DC2\EOT\144\SI+-\n\ + \+\n\ + \\EOT\EOTW\STX \DC2\EOT\147\SI\EOT'\SUB\GS Gateway-side algo strategy.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX \EOT\DC2\EOT\147\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX \ENQ\DC2\EOT\147\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX \SOH\DC2\EOT\147\SI\DC4!\n\ + \\r\n\ + \\ENQ\EOTW\STX \ETX\DC2\EOT\147\SI$&\n\ + \#\n\ + \\EOT\EOTW\STX!\DC2\EOT\150\SI\EOT#\SUB\NAK Actual order route.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX!\EOT\DC2\EOT\150\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX!\ACK\DC2\EOT\150\SI\r\ETB\n\ + \\r\n\ + \\ENQ\EOTW\STX!\SOH\DC2\EOT\150\SI\CAN\GS\n\ + \\r\n\ + \\ENQ\EOTW\STX!\ETX\DC2\EOT\150\SI \"\n\ + \,\n\ + \\EOT\EOTW\STX\"\DC2\EOT\153\SI\EOT)\SUB\RS Order chain expiration time.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX\"\EOT\DC2\EOT\153\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX\"\ENQ\DC2\EOT\153\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX\"\SOH\DC2\EOT\153\SI\DC4#\n\ + \\r\n\ + \\ENQ\EOTW\STX\"\ETX\DC2\EOT\153\SI&(\n\ + \i\n\ + \\EOT\EOTW\STX#\DC2\EOT\157\SI\EOT)\SUB[ Order open/close type.\n\ + \ This field is associated with OrderChain.OpenCloseType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX#\EOT\DC2\EOT\157\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX#\ENQ\DC2\EOT\157\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX#\SOH\DC2\EOT\157\SI\DC4#\n\ + \\r\n\ + \\ENQ\EOTW\STX#\ETX\DC2\EOT\157\SI&(\n\ + \l\n\ + \\EOT\EOTW\STX$\DC2\EOT\161\SI\EOT*\SUB^ Order speculation type.\n\ + \ This field is associated with OrderChain.SpeculationType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX$\EOT\DC2\EOT\161\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX$\ENQ\DC2\EOT\161\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX$\SOH\DC2\EOT\161\SI\DC4$\n\ + \\r\n\ + \\ENQ\EOTW\STX$\ETX\DC2\EOT\161\SI')\n\ + \\US\n\ + \\EOT\EOTW\STX%\DC2\EOT\164\SI\EOT \SUB\DC1 Archived order.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX%\EOT\DC2\EOT\164\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX%\ENQ\DC2\EOT\164\SI\r\DC1\n\ + \\r\n\ + \\ENQ\EOTW\STX%\SOH\DC2\EOT\164\SI\DC2\SUB\n\ + \\r\n\ + \\ENQ\EOTW\STX%\ETX\DC2\EOT\164\SI\GS\US\n\ + \2\n\ + \\EOT\EOTW\STX&\DC2\EOT\167\SI\EOT.\SUB$ Current order request at exchange.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX&\EOT\DC2\EOT\167\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX&\ENQ\DC2\EOT\167\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX&\SOH\DC2\EOT\167\SI\DC4(\n\ + \\r\n\ + \\ENQ\EOTW\STX&\ETX\DC2\EOT\167\SI+-\n\ + \@\n\ + \\EOT\EOTW\STX'\DC2\EOT\170\SI\EOTK\SUB2 [obsolete] This operation is no longer supported\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX'\EOT\DC2\EOT\170\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX'\ENQ\DC2\EOT\170\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX'\SOH\DC2\EOT\170\SI\DC41\n\ + \\r\n\ + \\ENQ\EOTW\STX'\ETX\DC2\EOT\170\SI46\n\ + \\r\n\ + \\ENQ\EOTW\STX'\b\DC2\EOT\170\SI7J\n\ + \\SO\n\ + \\ACK\EOTW\STX'\b\ETX\DC2\EOT\170\SI8I\n\ + \1\n\ + \\EOT\EOTW\STX(\DC2\EOT\173\SI\EOT#\SUB# Total positive size of the order.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX(\EOT\DC2\EOT\173\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX(\ACK\DC2\EOT\173\SI\r\CAN\n\ + \\r\n\ + \\ENQ\EOTW\STX(\SOH\DC2\EOT\173\SI\EM\GS\n\ + \\r\n\ + \\ENQ\EOTW\STX(\ETX\DC2\EOT\173\SI \"\n\ + \[\n\ + \\EOT\EOTW\STX)\DC2\EOT\177\SI\EOT'\SUBM Order extended side.\n\ + \ This field is associated with ExtendedSide enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX)\EOT\DC2\EOT\177\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX)\ENQ\DC2\EOT\177\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX)\SOH\DC2\EOT\177\SI\DC4!\n\ + \\r\n\ + \\ENQ\EOTW\STX)\ETX\DC2\EOT\177\SI$&\n\ + \b\n\ + \\EOT\EOTW\STX*\DC2\EOT\181\SI\EOT#\SUBT Identifies a brokerage that lended an equity being sold short.\n\ + \ (max length = 64).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX*\EOT\DC2\EOT\181\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX*\ENQ\DC2\EOT\181\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTW\STX*\SOH\DC2\EOT\181\SI\DC4\GS\n\ + \\r\n\ + \\ENQ\EOTW\STX*\ETX\DC2\EOT\181\SI \"\n\ + \E\n\ + \\EOT\EOTW\STX+\DC2\EOT\185\SI\EOT7\SUB7 Exchange extra values.\n\ + \ First - name, second - value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX+\EOT\DC2\EOT\185\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX+\ACK\DC2\EOT\185\SI\r\ESC\n\ + \\r\n\ + \\ENQ\EOTW\STX+\SOH\DC2\EOT\185\SI\FS1\n\ + \\r\n\ + \\ENQ\EOTW\STX+\ETX\DC2\EOT\185\SI46\n\ + \<\n\ + \\EOT\EOTW\STX,\DC2\EOT\188\SI\EOT9\SUB. Flag for ignore order chain risk calculation\n\ + \\n\ + \\r\n\ + \\ENQ\EOTW\STX,\EOT\DC2\EOT\188\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTW\STX,\ENQ\DC2\EOT\188\SI\r\DC1\n\ + \\r\n\ + \\ENQ\EOTW\STX,\SOH\DC2\EOT\188\SI\DC23\n\ + \\r\n\ + \\ENQ\EOTW\STX,\ETX\DC2\EOT\188\SI68\n\ + \<\n\ + \\STX\EOTX\DC2\ACK\192\SI\NUL\202\SI\SOH\SUB. Represents account in the chain of accounts.\n\ + \\n\ + \\v\n\ + \\ETX\EOTX\SOH\DC2\EOT\192\SI\b\DC4\n\ + \#\n\ + \\EOT\EOTX\STX\NUL\DC2\EOT\195\SI\EOT#\SUB\NAK Account identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTX\STX\NUL\EOT\DC2\EOT\195\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTX\STX\NUL\ENQ\DC2\EOT\195\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTX\STX\NUL\SOH\DC2\EOT\195\SI\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTX\STX\NUL\ETX\DC2\EOT\195\SI!\"\n\ + \\GS\n\ + \\EOT\EOTX\STX\SOH\DC2\EOT\198\SI\EOT%\SUB\SI Account name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTX\STX\SOH\EOT\DC2\EOT\198\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTX\STX\SOH\ENQ\DC2\EOT\198\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTX\STX\SOH\SOH\DC2\EOT\198\SI\DC4 \n\ + \\r\n\ + \\ENQ\EOTX\STX\SOH\ETX\DC2\EOT\198\SI#$\n\ + \)\n\ + \\EOT\EOTX\STX\STX\DC2\EOT\201\SI\EOT1\SUB\ESC Brokerage account number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTX\STX\STX\EOT\DC2\EOT\201\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTX\STX\STX\ENQ\DC2\EOT\201\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTX\STX\STX\SOH\DC2\EOT\201\SI\DC4,\n\ + \\r\n\ + \\ENQ\EOTX\STX\STX\ETX\DC2\EOT\201\SI/0\n\ + \A\n\ + \\STX\EOTY\DC2\ACK\205\SI\NUL\215\SI\SOH\SUB3 Represents route through which order is executed.\n\ + \\n\ + \\v\n\ + \\ETX\EOTY\SOH\DC2\EOT\205\SI\b\DC2\n\ + \\"\n\ + \\EOT\EOTY\STX\NUL\DC2\EOT\208\SI\EOT\GS\SUB\DC4 Route unique code.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTY\STX\NUL\EOT\DC2\EOT\208\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTY\STX\NUL\ENQ\DC2\EOT\208\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTY\STX\NUL\SOH\DC2\EOT\208\SI\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTY\STX\NUL\ETX\DC2\EOT\208\SI\ESC\FS\n\ + \\ESC\n\ + \\EOT\EOTY\STX\SOH\DC2\EOT\211\SI\EOT\GS\SUB\r Route name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTY\STX\SOH\EOT\DC2\EOT\211\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTY\STX\SOH\ENQ\DC2\EOT\211\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTY\STX\SOH\SOH\DC2\EOT\211\SI\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTY\STX\SOH\ETX\DC2\EOT\211\SI\ESC\FS\n\ + \\US\n\ + \\EOT\EOTY\STX\STX\DC2\EOT\214\SI\EOT!\SUB\DC1 Route order id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTY\STX\STX\EOT\DC2\EOT\214\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTY\STX\STX\ENQ\DC2\EOT\214\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTY\STX\STX\SOH\DC2\EOT\214\SI\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTY\STX\STX\ETX\DC2\EOT\214\SI\US \n\ + \0\n\ + \\STX\EOTZ\DC2\ACK\218\SI\NUL\243\SI\SOH\SUB\" Represents order's contract leg.\n\ + \\n\ + \\v\n\ + \\ETX\EOTZ\SOH\DC2\EOT\218\SI\b\CAN\n\ + \\ESC\n\ + \\EOT\EOTZ\STX\NUL\DC2\EOT\221\SI\EOT\US\SUB\r Leg number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTZ\STX\NUL\EOT\DC2\EOT\221\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTZ\STX\NUL\ENQ\DC2\EOT\221\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTZ\STX\NUL\SOH\DC2\EOT\221\SI\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOTZ\STX\NUL\ETX\DC2\EOT\221\SI\GS\RS\n\ + \2\n\ + \\EOT\EOTZ\STX\SOH\DC2\EOT\224\SI\EOT:\SUB$ [obsolete] Use size field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTZ\STX\SOH\EOT\DC2\EOT\224\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTZ\STX\SOH\ENQ\DC2\EOT\224\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTZ\STX\SOH\SOH\DC2\EOT\224\SI\DC4!\n\ + \\r\n\ + \\ENQ\EOTZ\STX\SOH\ETX\DC2\EOT\224\SI$%\n\ + \\r\n\ + \\ENQ\EOTZ\STX\SOH\b\DC2\EOT\224\SI&9\n\ + \\SO\n\ + \\ACK\EOTZ\STX\SOH\b\ETX\DC2\EOT\224\SI'8\n\ + \U\n\ + \\EOT\EOTZ\STX\STX\DC2\EOT\228\SI\EOT\GS\SUBG Order side.\n\ + \ This field is associated with OrderChain.Side enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTZ\STX\STX\EOT\DC2\EOT\228\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTZ\STX\STX\ENQ\DC2\EOT\228\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTZ\STX\STX\SOH\DC2\EOT\228\SI\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTZ\STX\STX\ETX\DC2\EOT\228\SI\ESC\FS\n\ + \%\n\ + \\EOT\EOTZ\STX\ETX\DC2\EOT\231\SI\EOT(\SUB\ETB Full contract symbol.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ETX\EOT\DC2\EOT\231\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ETX\ENQ\DC2\EOT\231\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ETX\SOH\DC2\EOT\231\SI\DC4#\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ETX\ETX\DC2\EOT\231\SI&'\n\ + \/\n\ + \\EOT\EOTZ\STX\EOT\DC2\EOT\234\SI\EOT\"\SUB! Total positive size of the leg.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTZ\STX\EOT\EOT\DC2\EOT\234\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTZ\STX\EOT\ACK\DC2\EOT\234\SI\r\CAN\n\ + \\r\n\ + \\ENQ\EOTZ\STX\EOT\SOH\DC2\EOT\234\SI\EM\GS\n\ + \\r\n\ + \\ENQ\EOTZ\STX\EOT\ETX\DC2\EOT\234\SI !\n\ + \[\n\ + \\EOT\EOTZ\STX\ENQ\DC2\EOT\238\SI\EOT&\SUBM Order extended side.\n\ + \ This field is associated with ExtendedSide enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ENQ\EOT\DC2\EOT\238\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ENQ\ENQ\DC2\EOT\238\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ENQ\SOH\DC2\EOT\238\SI\DC4!\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ENQ\ETX\DC2\EOT\238\SI$%\n\ + \a\n\ + \\EOT\EOTZ\STX\ACK\DC2\EOT\242\SI\EOT\"\SUBS Identifies a brokerage that lended an equity being sold short.\n\ + \ (max length = 64)\n\ + \\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ACK\EOT\DC2\EOT\242\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ACK\ENQ\DC2\EOT\242\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ACK\SOH\DC2\EOT\242\SI\DC4\GS\n\ + \\r\n\ + \\ENQ\EOTZ\STX\ACK\ETX\DC2\EOT\242\SI !\n\ + \N\n\ + \\STX\EOT[\DC2\ACK\246\SI\NUL\144\DLE\SOH\SUB@ Account and user information associated with an order request.\n\ + \\n\ + \\v\n\ + \\ETX\EOT[\SOH\DC2\EOT\246\SI\b\SUB\n\ + \1\n\ + \\EOT\EOT[\STX\NUL\DC2\EOT\249\SI\EOT#\SUB# Trade routing account identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT[\STX\NUL\EOT\DC2\EOT\249\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOT[\STX\NUL\ENQ\DC2\EOT\249\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOT[\STX\NUL\SOH\DC2\EOT\249\SI\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT[\STX\NUL\ETX\DC2\EOT\249\SI!\"\n\ + \\181\SOH\n\ + \\EOT\EOT[\STX\SOH\DC2\EOT\253\SI\EOT\"\SUB\166\SOH Associated user information. Contains either user_name that initiated the order request on\n\ + \ this account or Brokerage name of the next omnibus account in the chain.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT[\STX\SOH\EOT\DC2\EOT\253\SI\EOT\f\n\ + \\r\n\ + \\ENQ\EOT[\STX\SOH\ENQ\DC2\EOT\253\SI\r\DC3\n\ + \\r\n\ + \\ENQ\EOT[\STX\SOH\SOH\DC2\EOT\253\SI\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT[\STX\SOH\ETX\DC2\EOT\253\SI !\n\ + \:\n\ + \\EOT\EOT[\STX\STX\DC2\EOT\128\DLE\EOT'\SUB, Reject details for rejected order request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT[\STX\STX\EOT\DC2\EOT\128\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT[\STX\STX\ENQ\DC2\EOT\128\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT[\STX\STX\SOH\DC2\EOT\128\DLE\DC4\"\n\ + \\r\n\ + \\ENQ\EOT[\STX\STX\ETX\DC2\EOT\128\DLE%&\n\ + \N\n\ + \\EOT\EOT[\STX\ETX\DC2\EOT\131\DLE\EOT0\SUB@ Additional internal reject details for rejected order request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT[\STX\ETX\EOT\DC2\EOT\131\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT[\STX\ETX\ENQ\DC2\EOT\131\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT[\STX\ETX\SOH\DC2\EOT\131\DLE\DC4+\n\ + \\r\n\ + \\ENQ\EOT[\STX\ETX\ETX\DC2\EOT\131\DLE./\n\ + \2\n\ + \\EOT\EOT[\STX\EOT\DC2\EOT\134\DLE\EOT \SUB$ ID of a user who placed the order.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT[\STX\EOT\EOT\DC2\EOT\134\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT[\STX\EOT\ENQ\DC2\EOT\134\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT[\STX\EOT\SOH\DC2\EOT\134\DLE\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOT[\STX\EOT\ETX\DC2\EOT\134\DLE\RS\US\n\ + \\SUB\n\ + \\EOT\EOT[\STX\ENQ\DC2\EOT\137\DLE\EOT\"\SUB\f User name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT[\STX\ENQ\EOT\DC2\EOT\137\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT[\STX\ENQ\ENQ\DC2\EOT\137\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT[\STX\ENQ\SOH\DC2\EOT\137\DLE\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT[\STX\ENQ\ETX\DC2\EOT\137\DLE !\n\ + \\GS\n\ + \\EOT\EOT[\STX\ACK\DC2\EOT\140\DLE\EOT%\SUB\SI Account name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT[\STX\ACK\EOT\DC2\EOT\140\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT[\STX\ACK\ENQ\DC2\EOT\140\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT[\STX\ACK\SOH\DC2\EOT\140\DLE\DC4 \n\ + \\r\n\ + \\ENQ\EOT[\STX\ACK\ETX\DC2\EOT\140\DLE#$\n\ + \)\n\ + \\EOT\EOT[\STX\a\DC2\EOT\143\DLE\EOT1\SUB\ESC Brokerage account number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT[\STX\a\EOT\DC2\EOT\143\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT[\STX\a\ENQ\DC2\EOT\143\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT[\STX\a\SOH\DC2\EOT\143\DLE\DC4,\n\ + \\r\n\ + \\ENQ\EOT[\STX\a\ETX\DC2\EOT\143\DLE/0\n\ + \\159\SOH\n\ + \\STX\EOT\\\DC2\ACK\148\DLE\NUL\195\DC1\SOH\SUB\144\SOH Trade routing order request.\n\ + \ Attributes of the order request (place, replace or cancel) allow to track order changes during the its lifetime.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\\\SOH\DC2\EOT\148\DLE\b\DC4\n\ + \7\n\ + \\EOT\EOT\\\EOT\NUL\DC2\ACK\151\DLE\EOT\161\DLE\ENQ\SUB' Type of order request in order chain.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\EOT\NUL\SOH\DC2\EOT\151\DLE\t\DC4\n\ + \*\n\ + \\ACK\EOT\\\EOT\NUL\STX\NUL\DC2\EOT\154\DLE\b\DC2\SUB\SUB New order place request.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\NUL\STX\NUL\SOH\DC2\EOT\154\DLE\b\r\n\ + \\SI\n\ + \\a\EOT\\\EOT\NUL\STX\NUL\STX\DC2\EOT\154\DLE\DLE\DC1\n\ + \(\n\ + \\ACK\EOT\\\EOT\NUL\STX\SOH\DC2\EOT\157\DLE\b\DC4\SUB\CAN Replace order request.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\NUL\STX\SOH\SOH\DC2\EOT\157\DLE\b\SI\n\ + \\SI\n\ + \\a\EOT\\\EOT\NUL\STX\SOH\STX\DC2\EOT\157\DLE\DC2\DC3\n\ + \'\n\ + \\ACK\EOT\\\EOT\NUL\STX\STX\DC2\EOT\160\DLE\b\DC3\SUB\ETB Cancel order request.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\NUL\STX\STX\SOH\DC2\EOT\160\DLE\b\SO\n\ + \\SI\n\ + \\a\EOT\\\EOT\NUL\STX\STX\STX\DC2\EOT\160\DLE\DC1\DC2\n\ + \)\n\ + \\EOT\EOT\\\EOT\SOH\DC2\ACK\164\DLE\EOT\195\DLE\ENQ\SUB\EM State of order request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\EOT\SOH\SOH\DC2\EOT\164\DLE\t\SO\n\ + \Q\n\ + \\ACK\EOT\\\EOT\SOH\STX\NUL\DC2\EOT\167\DLE\b\SYN\SUBA Order is waiting for trading session start time for activation.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\NUL\SOH\DC2\EOT\167\DLE\b\DC1\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\NUL\STX\DC2\EOT\167\DLE\DC4\NAK\n\ + \-\n\ + \\ACK\EOT\\\EOT\SOH\STX\SOH\DC2\EOT\170\DLE\b\SYN\SUB\GS Order request is suspended.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\SOH\SOH\DC2\EOT\170\DLE\b\DC1\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\SOH\STX\DC2\EOT\170\DLE\DC4\NAK\n\ + \a\n\ + \\ACK\EOT\\\EOT\SOH\STX\STX\DC2\EOT\173\DLE\b\DC4\SUBQ Order request is sent to an execution system and is waiting for acknowledgment.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\STX\SOH\DC2\EOT\173\DLE\b\SI\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\STX\STX\DC2\EOT\173\DLE\DC2\DC3\n\ + \B\n\ + \\ACK\EOT\\\EOT\SOH\STX\ETX\DC2\EOT\176\DLE\b\DC4\SUB2 Order request is working at an execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\ETX\SOH\DC2\EOT\176\DLE\b\SI\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\ETX\STX\DC2\EOT\176\DLE\DC2\DC3\n\ + \;\n\ + \\ACK\EOT\\\EOT\SOH\STX\EOT\DC2\EOT\179\DLE\b\NAK\SUB+ Order request is replaced with a new one.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\EOT\SOH\DC2\EOT\179\DLE\b\DLE\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\EOT\STX\DC2\EOT\179\DLE\DC3\DC4\n\ + \-\n\ + \\ACK\EOT\\\EOT\SOH\STX\ENQ\DC2\EOT\182\DLE\b\SYN\SUB\GS Order request is cancelled.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\ENQ\SOH\DC2\EOT\182\DLE\b\DC1\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\ENQ\STX\DC2\EOT\182\DLE\DC4\NAK\n\ + \,\n\ + \\ACK\EOT\\\EOT\SOH\STX\ACK\DC2\EOT\185\DLE\b\NAK\SUB\FS Order request is rejected.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\ACK\SOH\DC2\EOT\185\DLE\b\DLE\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\ACK\STX\DC2\EOT\185\DLE\DC3\DC4\n\ + \*\n\ + \\ACK\EOT\\\EOT\SOH\STX\a\DC2\EOT\188\DLE\b\DC3\SUB\SUB Order request is filled.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\a\SOH\DC2\EOT\188\DLE\b\SO\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\a\STX\DC2\EOT\188\DLE\DC1\DC2\n\ + \+\n\ + \\ACK\EOT\\\EOT\SOH\STX\b\DC2\EOT\191\DLE\b\DC4\SUB\ESC Order request is expired.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\b\SOH\DC2\EOT\191\DLE\b\SI\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\b\STX\DC2\EOT\191\DLE\DC2\DC3\n\ + \+\n\ + \\ACK\EOT\\\EOT\SOH\STX\t\DC2\EOT\194\DLE\b\NAK\SUB\ESC Order request is matched.\n\ + \\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\t\SOH\DC2\EOT\194\DLE\b\SI\n\ + \\SI\n\ + \\a\EOT\\\EOT\SOH\STX\t\STX\DC2\EOT\194\DLE\DC2\DC4\n\ + \<\n\ + \\EOT\EOT\\\STX\NUL\DC2\EOT\198\DLE\EOT!\SUB. Order request identifier assigned by server.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\NUL\EOT\DC2\EOT\198\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\NUL\ENQ\DC2\EOT\198\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\NUL\SOH\DC2\EOT\198\DLE\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\\\STX\NUL\ETX\DC2\EOT\198\DLE\US \n\ + \P\n\ + \\EOT\EOT\\\STX\SOH\DC2\EOT\201\DLE\EOT+\SUBB Time when order request was submitted to execution system (UTC).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SOH\EOT\DC2\EOT\201\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SOH\ENQ\DC2\EOT\201\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SOH\SOH\DC2\EOT\201\DLE\DC4&\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SOH\ETX\DC2\EOT\201\DLE)*\n\ + \g\n\ + \\EOT\EOT\\\STX\STX\DC2\EOT\205\DLE\EOT%\SUBY Type of the request.\n\ + \ This field is associated with OrderRequest.RequestType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\STX\EOT\DC2\EOT\205\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\STX\ENQ\DC2\EOT\205\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\STX\SOH\DC2\EOT\205\DLE\DC4 \n\ + \\r\n\ + \\ENQ\EOT\\\STX\STX\ETX\DC2\EOT\205\DLE#$\n\ + \Z\n\ + \\EOT\EOT\\\STX\ETX\DC2\EOT\209\DLE\EOT#\SUBL Order type.\n\ + \ This field is associated with OrderChain.OrderType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ETX\EOT\DC2\EOT\209\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ETX\ENQ\DC2\EOT\209\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ETX\SOH\DC2\EOT\209\DLE\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ETX\ETX\DC2\EOT\209\DLE!\"\n\ + \2\n\ + \\EOT\EOT\\\STX\EOT\DC2\EOT\212\DLE\EOT:\SUB$ [obsolete] Use size field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\EOT\EOT\DC2\EOT\212\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\EOT\ENQ\DC2\EOT\212\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\EOT\SOH\DC2\EOT\212\DLE\DC4!\n\ + \\r\n\ + \\ENQ\EOT\\\STX\EOT\ETX\DC2\EOT\212\DLE$%\n\ + \\r\n\ + \\ENQ\EOT\\\STX\EOT\b\DC2\EOT\212\DLE&9\n\ + \\SO\n\ + \\ACK\EOT\\\STX\EOT\b\ETX\DC2\EOT\212\DLE'8\n\ + \9\n\ + \\EOT\EOT\\\STX\ENQ\DC2\EOT\216\DLE\EOT$\SUB+ Order limit price.\n\ + \ Correct price format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ENQ\EOT\DC2\EOT\216\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ENQ\ENQ\DC2\EOT\216\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ENQ\SOH\DC2\EOT\216\DLE\DC4\US\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ENQ\ETX\DC2\EOT\216\DLE\"#\n\ + \8\n\ + \\EOT\EOT\\\STX\ACK\DC2\EOT\220\DLE\EOT#\SUB* Order stop price.\n\ + \ Correct price format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ACK\EOT\DC2\EOT\220\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ACK\ENQ\DC2\EOT\220\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ACK\SOH\DC2\EOT\220\DLE\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ACK\ETX\DC2\EOT\220\DLE!\"\n\ + \]\n\ + \\EOT\EOT\\\STX\a\DC2\EOT\224\DLE\EOT!\SUBO Order duration.\n\ + \ This field is associated with OrderChain.Duration enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\a\EOT\DC2\EOT\224\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\a\ENQ\DC2\EOT\224\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\a\SOH\DC2\EOT\224\DLE\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\\\STX\a\ETX\DC2\EOT\224\DLE\US \n\ + \n\n\ + \\EOT\EOT\\\STX\b\DC2\EOT\227\DLE\EOT(\SUB` Date for GTD (local to exchange, date only value in time format) when the order should expire.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\b\EOT\DC2\EOT\227\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\b\ENQ\DC2\EOT\227\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\b\SOH\DC2\EOT\227\DLE\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\\\STX\b\ETX\DC2\EOT\227\DLE%'\n\ + \O\n\ + \\EOT\EOT\\\STX\t\DC2\EOT\230\DLE\EOT,\SUBA Date and time for GTT order (UTC) when the order should expire.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\t\EOT\DC2\EOT\230\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\t\ENQ\DC2\EOT\230\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\t\SOH\DC2\EOT\230\DLE\DC4&\n\ + \\r\n\ + \\ENQ\EOT\\\STX\t\ETX\DC2\EOT\230\DLE)+\n\ + \i\n\ + \\EOT\EOT\\\STX\n\ + \\DC2\EOT\234\DLE\EOT\US\SUB[ Current order request state.\n\ + \ This field is associated with OrderRequest.State enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\n\ + \\EOT\DC2\EOT\234\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\n\ + \\ENQ\DC2\EOT\234\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\n\ + \\SOH\DC2\EOT\234\DLE\DC4\EM\n\ + \\r\n\ + \\ENQ\EOT\\\STX\n\ + \\ETX\DC2\EOT\234\DLE\FS\RS\n\ + \l\n\ + \\EOT\EOT\\\STX\v\DC2\EOT\237\DLE\EOT'\SUB^ ID of order request that this request was applied to (for cancel and replace requests only).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\v\EOT\DC2\EOT\237\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\v\ENQ\DC2\EOT\237\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\v\SOH\DC2\EOT\237\DLE\DC4!\n\ + \\r\n\ + \\ENQ\EOT\\\STX\v\ETX\DC2\EOT\237\DLE$&\n\ + \R\n\ + \\EOT\EOT\\\STX\f\DC2\EOT\241\DLE\EOT<\SUBD List of [last] transactions.\n\ + \ All available transactions are sent.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\f\EOT\DC2\EOT\241\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\f\ACK\DC2\EOT\241\DLE\r#\n\ + \\r\n\ + \\ENQ\EOT\\\STX\f\SOH\DC2\EOT\241\DLE$6\n\ + \\r\n\ + \\ENQ\EOT\\\STX\f\ETX\DC2\EOT\241\DLE9;\n\ + \X\n\ + \\EOT\EOT\\\STX\r\DC2\EOT\244\DLE\EOT;\SUBJ List of accounts associated with an order request with user information.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\r\EOT\DC2\EOT\244\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\r\ACK\DC2\EOT\244\DLE\r\US\n\ + \\r\n\ + \\ENQ\EOT\\\STX\r\SOH\DC2\EOT\244\DLE 5\n\ + \\r\n\ + \\ENQ\EOT\\\STX\r\ETX\DC2\EOT\244\DLE8:\n\ + \9\n\ + \\EOT\EOT\\\STX\SO\DC2\EOT\248\DLE\EOT-\SUB+ Order limit price.\n\ + \ Display price format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SO\EOT\DC2\EOT\248\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SO\ENQ\DC2\EOT\248\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SO\SOH\DC2\EOT\248\DLE\DC4'\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SO\ETX\DC2\EOT\248\DLE*,\n\ + \8\n\ + \\EOT\EOT\\\STX\SI\DC2\EOT\252\DLE\EOT,\SUB* Order stop price.\n\ + \ Display price format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SI\EOT\DC2\EOT\252\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SI\ENQ\DC2\EOT\252\DLE\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SI\SOH\DC2\EOT\252\DLE\DC4&\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SI\ETX\DC2\EOT\252\DLE)+\n\ + \.\n\ + \\EOT\EOT\\\STX\DLE\DC2\EOT\255\DLE\EOT)\SUB Trailing specific information.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DLE\EOT\DC2\EOT\255\DLE\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DLE\ACK\DC2\EOT\255\DLE\r\SUB\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DLE\SOH\DC2\EOT\255\DLE\ESC#\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DLE\ETX\DC2\EOT\255\DLE&(\n\ + \%\n\ + \\EOT\EOT\\\STX\DC1\DC2\EOT\130\DC1\EOT#\SUB\ETB Specific order sizes.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC1\EOT\DC2\EOT\130\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC1\ACK\DC2\EOT\130\DC1\r\ETB\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC1\SOH\DC2\EOT\130\DC1\CAN\GS\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC1\ETX\DC2\EOT\130\DC1 \"\n\ + \\RS\n\ + \\EOT\EOT\\\STX\DC2\DC2\EOT\133\DC1\EOT'\SUB\DLE Ticket number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC2\EOT\DC2\EOT\133\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC2\ENQ\DC2\EOT\133\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC2\SOH\DC2\EOT\133\DC1\DC4!\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC2\ETX\DC2\EOT\133\DC1$&\n\ + \!\n\ + \\EOT\EOT\\\STX\DC3\DC2\EOT\136\DC1\EOT\"\SUB\DC3 Request comments.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC3\EOT\DC2\EOT\136\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC3\ENQ\DC2\EOT\136\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC3\SOH\DC2\EOT\136\DC1\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC3\ETX\DC2\EOT\136\DC1\US!\n\ + \W\n\ + \\EOT\EOT\\\STX\DC4\DC2\EOT\139\DC1\EOT'\SUBI The values are associated with a lookup property with ORDER_CLASS type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC4\EOT\DC2\EOT\139\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC4\ENQ\DC2\EOT\139\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC4\SOH\DC2\EOT\139\DC1\DC4!\n\ + \\r\n\ + \\ENQ\EOT\\\STX\DC4\ETX\DC2\EOT\139\DC1$&\n\ + \\"\n\ + \\EOT\EOT\\\STX\NAK\DC2\EOT\142\DC1\EOT+\SUB\DC4 Native order type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\NAK\EOT\DC2\EOT\142\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\NAK\ENQ\DC2\EOT\142\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\NAK\SOH\DC2\EOT\142\DC1\DC4%\n\ + \\r\n\ + \\ENQ\EOT\\\STX\NAK\ETX\DC2\EOT\142\DC1(*\n\ + \ \n\ + \\EOT\EOT\\\STX\SYN\DC2\EOT\145\DC1\EOT)\SUB\DC2 Activation time.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SYN\EOT\DC2\EOT\145\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SYN\ENQ\DC2\EOT\145\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SYN\SOH\DC2\EOT\145\DC1\DC4#\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SYN\ETX\DC2\EOT\145\DC1&(\n\ + \\SUB\n\ + \\EOT\EOT\\\STX\ETB\DC2\EOT\148\DC1\EOT)\SUB\f Park time.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ETB\EOT\DC2\EOT\148\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ETB\ENQ\DC2\EOT\148\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ETB\SOH\DC2\EOT\148\DC1\DC4#\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ETB\ETX\DC2\EOT\148\DC1&(\n\ + \ \n\ + \\EOT\EOT\\\STX\CAN\DC2\EOT\151\DC1\EOT)\SUB\DC2 Expiration time.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\CAN\EOT\DC2\EOT\151\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\CAN\ENQ\DC2\EOT\151\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\CAN\SOH\DC2\EOT\151\DC1\DC4#\n\ + \\r\n\ + \\ENQ\EOT\\\STX\CAN\ETX\DC2\EOT\151\DC1&(\n\ + \\ETB\n\ + \\EOT\EOT\\\STX\EM\DC2\EOT\154\DC1\EOT$\SUB\t Routes.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\EM\EOT\DC2\EOT\154\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\EM\ACK\DC2\EOT\154\DC1\r\ETB\n\ + \\r\n\ + \\ENQ\EOT\\\STX\EM\SOH\DC2\EOT\154\DC1\CAN\RS\n\ + \\r\n\ + \\ENQ\EOT\\\STX\EM\ETX\DC2\EOT\154\DC1!#\n\ + \,\n\ + \\EOT\EOT\\\STX\SUB\DC2\EOT\157\DC1\EOT8\SUB\RS Client regulation algorithm.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SUB\EOT\DC2\EOT\157\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SUB\ENQ\DC2\EOT\157\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SUB\SOH\DC2\EOT\157\DC1\DC42\n\ + \\r\n\ + \\ENQ\EOT\\\STX\SUB\ETX\DC2\EOT\157\DC157\n\ + \/\n\ + \\EOT\EOT\\\STX\ESC\DC2\EOT\160\DC1\EOT;\SUB! Effective regulation algorithm.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ESC\EOT\DC2\EOT\160\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ESC\ENQ\DC2\EOT\160\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ESC\SOH\DC2\EOT\160\DC1\DC45\n\ + \\r\n\ + \\ENQ\EOT\\\STX\ESC\ETX\DC2\EOT\160\DC18:\n\ + \$\n\ + \\EOT\EOT\\\STX\FS\DC2\EOT\163\DC1\EOT9\SUB\SYN Operational details.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\FS\EOT\DC2\EOT\163\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\FS\ACK\DC2\EOT\163\DC1\r\US\n\ + \\r\n\ + \\ENQ\EOT\\\STX\FS\SOH\DC2\EOT\163\DC1 3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\FS\ETX\DC2\EOT\163\DC168\n\ + \&\n\ + \\EOT\EOT\\\STX\GS\DC2\EOT\166\DC1\EOT&\SUB\CAN Specific instructions.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\GS\EOT\DC2\EOT\166\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\GS\ENQ\DC2\EOT\166\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\GS\SOH\DC2\EOT\166\DC1\DC4 \n\ + \\r\n\ + \\ENQ\EOT\\\STX\GS\ETX\DC2\EOT\166\DC1#%\n\ + \C\n\ + \\EOT\EOT\\\STX\RS\DC2\EOT\170\DC1\EOT5\SUB5 Client extra values.\n\ + \ First - name, second - value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\RS\EOT\DC2\EOT\170\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\RS\ACK\DC2\EOT\170\DC1\r\ESC\n\ + \\r\n\ + \\ENQ\EOT\\\STX\RS\SOH\DC2\EOT\170\DC1\FS/\n\ + \\r\n\ + \\ENQ\EOT\\\STX\RS\ETX\DC2\EOT\170\DC124\n\ + \&\n\ + \\EOT\EOT\\\STX\US\DC2\EOT\173\DC1\EOT/\SUB\CAN Route client order ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\US\EOT\DC2\EOT\173\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\US\ENQ\DC2\EOT\173\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX\US\SOH\DC2\EOT\173\DC1\DC4)\n\ + \\r\n\ + \\ENQ\EOT\\\STX\US\ETX\DC2\EOT\173\DC1,.\n\ + \A\n\ + \\EOT\EOT\\\STX \DC2\EOT\176\DC1\EOTK\SUB3 [obsolete] This operation is no longer supported.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX \EOT\DC2\EOT\176\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX \ENQ\DC2\EOT\176\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX \SOH\DC2\EOT\176\DC1\DC41\n\ + \\r\n\ + \\ENQ\EOT\\\STX \ETX\DC2\EOT\176\DC146\n\ + \\r\n\ + \\ENQ\EOT\\\STX \b\DC2\EOT\176\DC17J\n\ + \\SO\n\ + \\ACK\EOT\\\STX \b\ETX\DC2\EOT\176\DC18I\n\ + \t\n\ + \\EOT\EOT\\\STX!\DC2\EOT\180\DC1\EOT*\SUBf List of execution instructions.\n\ + \ This field is associated with OrderChain.ExecInstruction enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX!\EOT\DC2\EOT\180\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX!\ENQ\DC2\EOT\180\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX!\SOH\DC2\EOT\180\DC1\DC4$\n\ + \\r\n\ + \\ENQ\EOT\\\STX!\ETX\DC2\EOT\180\DC1')\n\ + \3\n\ + \\EOT\EOT\\\STX\"\DC2\EOT\183\DC1\EOT#\SUB% Positive size of the order request.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX\"\EOT\DC2\EOT\183\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX\"\ACK\DC2\EOT\183\DC1\r\CAN\n\ + \\r\n\ + \\ENQ\EOT\\\STX\"\SOH\DC2\EOT\183\DC1\EM\GS\n\ + \\r\n\ + \\ENQ\EOT\\\STX\"\ETX\DC2\EOT\183\DC1 \"\n\ + \I\n\ + \\EOT\EOT\\\STX#\DC2\EOT\186\DC1\EOT/\SUB; Actual execution source code that is sent to an exchange.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX#\EOT\DC2\EOT\186\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX#\ENQ\DC2\EOT\186\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX#\SOH\DC2\EOT\186\DC1\DC4)\n\ + \\r\n\ + \\ENQ\EOT\\\STX#\ETX\DC2\EOT\186\DC1,.\n\ + \[\n\ + \\EOT\EOT\\\STX$\DC2\EOT\190\DC1\EOT'\SUBM Order extended side.\n\ + \ This field is associated with ExtendedSide enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX$\EOT\DC2\EOT\190\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX$\ENQ\DC2\EOT\190\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX$\SOH\DC2\EOT\190\DC1\DC4!\n\ + \\r\n\ + \\ENQ\EOT\\\STX$\ETX\DC2\EOT\190\DC1$&\n\ + \a\n\ + \\EOT\EOT\\\STX%\DC2\EOT\194\DC1\EOT#\SUBS Identifies a brokerage that lended an equity being sold short.\n\ + \ (max length = 64)\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\\\STX%\EOT\DC2\EOT\194\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\\\STX%\ENQ\DC2\EOT\194\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\\\STX%\SOH\DC2\EOT\194\DC1\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT\\\STX%\ETX\DC2\EOT\194\DC1 \"\n\ + \'\n\ + \\STX\EOT]\DC2\ACK\198\DC1\NUL\223\DC1\SOH\SUB\EM Represents order sizes.\n\ + \\n\ + \\v\n\ + \\ETX\EOT]\SOH\DC2\EOT\198\DC1\b\DC2\n\ + \:\n\ + \\EOT\EOT]\STX\NUL\DC2\EOT\201\DC1\EOTB\SUB, [obsolete] Use trigger_size field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT]\STX\NUL\EOT\DC2\EOT\201\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT]\STX\NUL\ENQ\DC2\EOT\201\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT]\STX\NUL\SOH\DC2\EOT\201\DC1\DC4)\n\ + \\r\n\ + \\ENQ\EOT]\STX\NUL\ETX\DC2\EOT\201\DC1,-\n\ + \\r\n\ + \\ENQ\EOT]\STX\NUL\b\DC2\EOT\201\DC1.A\n\ + \\SO\n\ + \\ACK\EOT]\STX\NUL\b\ETX\DC2\EOT\201\DC1/@\n\ + \:\n\ + \\EOT\EOT]\STX\SOH\DC2\EOT\204\DC1\EOTB\SUB, [obsolete] Use visible_size field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT]\STX\SOH\EOT\DC2\EOT\204\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT]\STX\SOH\ENQ\DC2\EOT\204\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT]\STX\SOH\SOH\DC2\EOT\204\DC1\DC4)\n\ + \\r\n\ + \\ENQ\EOT]\STX\SOH\ETX\DC2\EOT\204\DC1,-\n\ + \\r\n\ + \\ENQ\EOT]\STX\SOH\b\DC2\EOT\204\DC1.A\n\ + \\SO\n\ + \\ACK\EOT]\STX\SOH\b\ETX\DC2\EOT\204\DC1/@\n\ + \>\n\ + \\EOT\EOT]\STX\STX\DC2\EOT\207\DC1\EOTF\SUB0 [obsolete] Use min_visible_size field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT]\STX\STX\EOT\DC2\EOT\207\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT]\STX\STX\ENQ\DC2\EOT\207\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT]\STX\STX\SOH\DC2\EOT\207\DC1\DC4-\n\ + \\r\n\ + \\ENQ\EOT]\STX\STX\ETX\DC2\EOT\207\DC101\n\ + \\r\n\ + \\ENQ\EOT]\STX\STX\b\DC2\EOT\207\DC12E\n\ + \\SO\n\ + \\ACK\EOT]\STX\STX\b\ETX\DC2\EOT\207\DC13D\n\ + \<\n\ + \\EOT\EOT]\STX\ETX\DC2\EOT\210\DC1\EOTD\SUB. [obsolete] Use remaining_size field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT]\STX\ETX\EOT\DC2\EOT\210\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT]\STX\ETX\ENQ\DC2\EOT\210\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT]\STX\ETX\SOH\DC2\EOT\210\DC1\DC4+\n\ + \\r\n\ + \\ENQ\EOT]\STX\ETX\ETX\DC2\EOT\210\DC1./\n\ + \\r\n\ + \\ENQ\EOT]\STX\ETX\b\DC2\EOT\210\DC10C\n\ + \\SO\n\ + \\ACK\EOT]\STX\ETX\b\ETX\DC2\EOT\210\DC11B\n\ + \.\n\ + \\EOT\EOT]\STX\EOT\DC2\EOT\213\DC1\EOT*\SUB Trigger size. (DOM Threshold).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT]\STX\EOT\EOT\DC2\EOT\213\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT]\STX\EOT\ACK\DC2\EOT\213\DC1\r\CAN\n\ + \\r\n\ + \\ENQ\EOT]\STX\EOT\SOH\DC2\EOT\213\DC1\EM%\n\ + \\r\n\ + \\ENQ\EOT]\STX\EOT\ETX\DC2\EOT\213\DC1()\n\ + \&\n\ + \\EOT\EOT]\STX\ENQ\DC2\EOT\216\DC1\EOT*\SUB\CAN Visible size. Iceberg.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT]\STX\ENQ\EOT\DC2\EOT\216\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT]\STX\ENQ\ACK\DC2\EOT\216\DC1\r\CAN\n\ + \\r\n\ + \\ENQ\EOT]\STX\ENQ\SOH\DC2\EOT\216\DC1\EM%\n\ + \\r\n\ + \\ENQ\EOT]\STX\ENQ\ETX\DC2\EOT\216\DC1()\n\ + \.\n\ + \\EOT\EOT]\STX\ACK\DC2\EOT\219\DC1\EOT.\SUB Minimum visible size. Iceberg.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT]\STX\ACK\EOT\DC2\EOT\219\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT]\STX\ACK\ACK\DC2\EOT\219\DC1\r\CAN\n\ + \\r\n\ + \\ENQ\EOT]\STX\ACK\SOH\DC2\EOT\219\DC1\EM)\n\ + \\r\n\ + \\ENQ\EOT]\STX\ACK\ETX\DC2\EOT\219\DC1,-\n\ + \=\n\ + \\EOT\EOT]\STX\a\DC2\EOT\222\DC1\EOT,\SUB/ Remaining size of chain (set only for chain).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT]\STX\a\EOT\DC2\EOT\222\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT]\STX\a\ACK\DC2\EOT\222\DC1\r\CAN\n\ + \\r\n\ + \\ENQ\EOT]\STX\a\SOH\DC2\EOT\222\DC1\EM'\n\ + \\r\n\ + \\ENQ\EOT]\STX\a\ETX\DC2\EOT\222\DC1*+\n\ + \6\n\ + \\STX\EOT^\DC2\ACK\226\DC1\NUL\137\DC2\SOH\SUB( Represents order trailing information.\n\ + \\n\ + \\v\n\ + \\ETX\EOT^\SOH\DC2\EOT\226\DC1\b\NAK\n\ + \ \n\ + \\EOT\EOT^\EOT\NUL\DC2\ACK\229\DC1\EOT\234\DC1\ENQ\SUB\DLE Trailing type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT^\EOT\NUL\SOH\DC2\EOT\229\DC1\t\DC2\n\ + \\SO\n\ + \\ACK\EOT^\EOT\NUL\STX\NUL\DC2\EOT\231\DC1\b\NAK\n\ + \\SI\n\ + \\a\EOT^\EOT\NUL\STX\NUL\SOH\DC2\EOT\231\DC1\b\DLE\n\ + \\SI\n\ + \\a\EOT^\EOT\NUL\STX\NUL\STX\DC2\EOT\231\DC1\DC3\DC4\n\ + \\SO\n\ + \\ACK\EOT^\EOT\NUL\STX\SOH\DC2\EOT\232\DC1\b\NAK\n\ + \\SI\n\ + \\a\EOT^\EOT\NUL\STX\SOH\SOH\DC2\EOT\232\DC1\b\DLE\n\ + \\SI\n\ + \\a\EOT^\EOT\NUL\STX\SOH\STX\DC2\EOT\232\DC1\DC3\DC4\n\ + \\SO\n\ + \\ACK\EOT^\EOT\NUL\STX\STX\DC2\EOT\233\DC1\b\ETB\n\ + \\SI\n\ + \\a\EOT^\EOT\NUL\STX\STX\SOH\DC2\EOT\233\DC1\b\DC2\n\ + \\SI\n\ + \\a\EOT^\EOT\NUL\STX\STX\STX\DC2\EOT\233\DC1\NAK\SYN\n\ + \B\n\ + \\EOT\EOT^\STX\NUL\DC2\EOT\237\DC1\EOT#\SUB4 This field is associated with TrailType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT^\STX\NUL\EOT\DC2\EOT\237\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT^\STX\NUL\ENQ\DC2\EOT\237\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT^\STX\NUL\SOH\DC2\EOT\237\DC1\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT^\STX\NUL\ETX\DC2\EOT\237\DC1!\"\n\ + \.\n\ + \\EOT\EOT^\STX\SOH\DC2\EOT\241\DC1\EOT\US\SUB Trail offset.\n\ + \ Correct format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT^\STX\SOH\EOT\DC2\EOT\241\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT^\STX\SOH\ENQ\DC2\EOT\241\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT^\STX\SOH\SOH\DC2\EOT\241\DC1\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOT^\STX\SOH\ETX\DC2\EOT\241\DC1\GS\RS\n\ + \2\n\ + \\EOT\EOT^\STX\STX\DC2\EOT\245\DC1\EOT#\SUB$ Trail stop price.\n\ + \ Correct format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT^\STX\STX\EOT\DC2\EOT\245\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT^\STX\STX\ENQ\DC2\EOT\245\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT^\STX\STX\SOH\DC2\EOT\245\DC1\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT^\STX\STX\ETX\DC2\EOT\245\DC1!\"\n\ + \3\n\ + \\EOT\EOT^\STX\ETX\DC2\EOT\249\DC1\EOT$\SUB% Trail limit price.\n\ + \ Correct format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT^\STX\ETX\EOT\DC2\EOT\249\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT^\STX\ETX\ENQ\DC2\EOT\249\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT^\STX\ETX\SOH\DC2\EOT\249\DC1\DC4\US\n\ + \\r\n\ + \\ENQ\EOT^\STX\ETX\ETX\DC2\EOT\249\DC1\"#\n\ + \.\n\ + \\EOT\EOT^\STX\EOT\DC2\EOT\253\DC1\EOT'\SUB Trail offset.\n\ + \ Display format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT^\STX\EOT\EOT\DC2\EOT\253\DC1\EOT\f\n\ + \\r\n\ + \\ENQ\EOT^\STX\EOT\ENQ\DC2\EOT\253\DC1\r\DC3\n\ + \\r\n\ + \\ENQ\EOT^\STX\EOT\SOH\DC2\EOT\253\DC1\DC4\"\n\ + \\r\n\ + \\ENQ\EOT^\STX\EOT\ETX\DC2\EOT\253\DC1%&\n\ + \2\n\ + \\EOT\EOT^\STX\ENQ\DC2\EOT\129\DC2\EOT+\SUB$ Trail stop price.\n\ + \ Display format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT^\STX\ENQ\EOT\DC2\EOT\129\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT^\STX\ENQ\ENQ\DC2\EOT\129\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT^\STX\ENQ\SOH\DC2\EOT\129\DC2\DC4&\n\ + \\r\n\ + \\ENQ\EOT^\STX\ENQ\ETX\DC2\EOT\129\DC2)*\n\ + \3\n\ + \\EOT\EOT^\STX\ACK\DC2\EOT\133\DC2\EOT,\SUB% Trail limit price.\n\ + \ Display format.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT^\STX\ACK\EOT\DC2\EOT\133\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT^\STX\ACK\ENQ\DC2\EOT\133\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT^\STX\ACK\SOH\DC2\EOT\133\DC2\DC4'\n\ + \\r\n\ + \\ENQ\EOT^\STX\ACK\ETX\DC2\EOT\133\DC2*+\n\ + \#\n\ + \\EOT\EOT^\STX\a\DC2\EOT\136\DC2\EOT$\SUB\NAK Prices update time.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT^\STX\a\EOT\DC2\EOT\136\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT^\STX\a\ENQ\DC2\EOT\136\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT^\STX\a\SOH\DC2\EOT\136\DC2\DC4\US\n\ + \\r\n\ + \\ENQ\EOT^\STX\a\ETX\DC2\EOT\136\DC2\"#\n\ + \$\n\ + \\STX\EOT_\DC2\ACK\140\DC2\NUL\189\DC2\SOH\SUB\SYN Operational details.\n\ + \\n\ + \\v\n\ + \\ETX\EOT_\SOH\DC2\EOT\140\DC2\b\SUB\n\ + \%\n\ + \\EOT\EOT_\STX\NUL\DC2\EOT\143\DC2\EOT(\SUB\ETB Client-side order id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\NUL\EOT\DC2\EOT\143\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\NUL\ENQ\DC2\EOT\143\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\NUL\SOH\DC2\EOT\143\DC2\DC4#\n\ + \\r\n\ + \\ENQ\EOT_\STX\NUL\ETX\DC2\EOT\143\DC2&'\n\ + \#\n\ + \\EOT\EOT_\STX\SOH\DC2\EOT\146\DC2\EOT$\SUB\NAK Unique client guid.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\SOH\EOT\DC2\EOT\146\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\SOH\ENQ\DC2\EOT\146\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\SOH\SOH\DC2\EOT\146\DC2\DC4\US\n\ + \\r\n\ + \\ENQ\EOT_\STX\SOH\ETX\DC2\EOT\146\DC2\"#\n\ + \G\n\ + \\EOT\EOT_\STX\STX\DC2\EOT\150\DC2\EOT)\SUB9 Client unique system id.\n\ + \ Hidden for Sale Series scope.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\STX\EOT\DC2\EOT\150\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\STX\ENQ\DC2\EOT\150\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\STX\SOH\DC2\EOT\150\DC2\DC4$\n\ + \\r\n\ + \\ENQ\EOT_\STX\STX\ETX\DC2\EOT\150\DC2'(\n\ + \\"\n\ + \\EOT\EOT_\STX\ETX\DC2\EOT\153\DC2\EOT\"\SUB\DC4 Client ip address.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\ETX\EOT\DC2\EOT\153\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\ETX\ENQ\DC2\EOT\153\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\ETX\SOH\DC2\EOT\153\DC2\DC4\GS\n\ + \\r\n\ + \\ENQ\EOT_\STX\ETX\ETX\DC2\EOT\153\DC2 !\n\ + \+\n\ + \\EOT\EOT_\STX\EOT\DC2\EOT\156\DC2\EOT'\SUB\GS Client application version.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\EOT\EOT\DC2\EOT\156\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\EOT\ENQ\DC2\EOT\156\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\EOT\SOH\DC2\EOT\156\DC2\DC4\"\n\ + \\r\n\ + \\ENQ\EOT_\STX\EOT\ETX\DC2\EOT\156\DC2%&\n\ + \\US\n\ + \\EOT\EOT_\STX\ENQ\DC2\EOT\159\DC2\EOT*\SUB\DC1 Trade location.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\ENQ\EOT\DC2\EOT\159\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\ENQ\ENQ\DC2\EOT\159\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\ENQ\SOH\DC2\EOT\159\DC2\DC4%\n\ + \\r\n\ + \\ENQ\EOT_\STX\ENQ\ETX\DC2\EOT\159\DC2()\n\ + \p\n\ + \\EOT\EOT_\STX\ACK\DC2\EOT\163\DC2\EOT#\SUBb Product to which client application belongs.\n\ + \ Can be used to obtain IDs of CAT, PL and Platform.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\ACK\EOT\DC2\EOT\163\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\ACK\ENQ\DC2\EOT\163\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\ACK\SOH\DC2\EOT\163\DC2\DC4\RS\n\ + \\r\n\ + \\ENQ\EOT_\STX\ACK\ETX\DC2\EOT\163\DC2!\"\n\ + \(\n\ + \\EOT\EOT_\STX\a\DC2\EOT\166\DC2\EOT-\SUB\SUB Client application name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\a\EOT\DC2\EOT\166\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\a\ENQ\DC2\EOT\166\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\a\SOH\DC2\EOT\166\DC2\DC4(\n\ + \\r\n\ + \\ENQ\EOT_\STX\a\ETX\DC2\EOT\166\DC2+,\n\ + \I\n\ + \\EOT\EOT_\STX\b\DC2\EOT\169\DC2\EOT&\SUB; Name of the platform to which client application belongs.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\b\EOT\DC2\EOT\169\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\b\ENQ\DC2\EOT\169\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\b\SOH\DC2\EOT\169\DC2\DC4!\n\ + \\r\n\ + \\ENQ\EOT_\STX\b\ETX\DC2\EOT\169\DC2$%\n\ + \6\n\ + \\EOT\EOT_\STX\t\DC2\EOT\172\DC2\EOT,\SUB( Client application private label name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\t\EOT\DC2\EOT\172\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\t\ENQ\DC2\EOT\172\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\t\SOH\DC2\EOT\172\DC2\DC4&\n\ + \\r\n\ + \\ENQ\EOT_\STX\t\ETX\DC2\EOT\172\DC2)+\n\ + \\132\SOH\n\ + \\EOT\EOT_\STX\n\ + \\DC2\EOT\176\DC2\EOT%\SUBv Identifies effective operator, used to identify specific message originator (desk, trader, etc.).\n\ + \ (max length = 64)\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\n\ + \\EOT\DC2\EOT\176\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\n\ + \\ENQ\DC2\EOT\176\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\n\ + \\SOH\DC2\EOT\176\DC2\DC4\US\n\ + \\r\n\ + \\ENQ\EOT_\STX\n\ + \\ETX\DC2\EOT\176\DC2\"$\n\ + \\138\SOH\n\ + \\EOT\EOT_\STX\v\DC2\EOT\180\DC2\EOT,\SUB| Identifies client-supplied operator, used to identify specific message originator (desk, trader, etc.).\n\ + \ (max length = 64)\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\v\EOT\DC2\EOT\180\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\v\ENQ\DC2\EOT\180\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\v\SOH\DC2\EOT\180\DC2\DC4&\n\ + \\r\n\ + \\ENQ\EOT_\STX\v\ETX\DC2\EOT\180\DC2)+\n\ + \\176\SOH\n\ + \\EOT\EOT_\STX\f\DC2\EOT\184\DC2\EOT,\SUB\161\SOH Identifies client-supplied location, used to identify specific message originator's location (i.e. geographic location and/or desk, trader).\n\ + \ (max length = 12)\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\f\EOT\DC2\EOT\184\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\f\ENQ\DC2\EOT\184\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\f\SOH\DC2\EOT\184\DC2\DC4&\n\ + \\r\n\ + \\ENQ\EOT_\STX\f\ETX\DC2\EOT\184\DC2)+\n\ + \W\n\ + \\EOT\EOT_\STX\r\DC2\EOT\188\DC2\EOT0\SUBI [required] Identifies effective originator location.\n\ + \ (max length = 12)\n\ + \\n\ + \\r\n\ + \\ENQ\EOT_\STX\r\EOT\DC2\EOT\188\DC2\EOT\f\n\ + \\r\n\ + \\ENQ\EOT_\STX\r\ENQ\DC2\EOT\188\DC2\r\DC3\n\ + \\r\n\ + \\ENQ\EOT_\STX\r\SOH\DC2\EOT\188\DC2\DC4*\n\ + \\r\n\ + \\ENQ\EOT_\STX\r\ETX\DC2\EOT\188\DC2-/\n\ + \`\n\ + \\STX\EOT`\DC2\ACK\193\DC2\NUL\187\DC3\SOH\SUBR Status of a specific transaction.\n\ + \ All attributes are at the transaction moment.\n\ + \\n\ + \\v\n\ + \\ETX\EOT`\SOH\DC2\EOT\193\DC2\b\RS\n\ + \,\n\ + \\EOT\EOT`\EOT\NUL\DC2\ACK\196\DC2\EOT\160\DC3\ENQ\SUB\FS Status of the transaction.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT`\EOT\NUL\SOH\DC2\EOT\196\DC2\t\SI\n\ + \H\n\ + \\ACK\EOT`\EOT\NUL\STX\NUL\DC2\EOT\199\DC2\b\SYN\SUB8 This status is used for internal Gateway transactions.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\NUL\SOH\DC2\EOT\199\DC2\b\DC1\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\NUL\STX\DC2\EOT\199\DC2\DC4\NAK\n\ + \=\n\ + \\ACK\EOT`\EOT\NUL\STX\SOH\DC2\EOT\202\DC2\b\ETB\SUB- Original order is sent to execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\SOH\SOH\DC2\EOT\202\DC2\b\DC2\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\SOH\STX\DC2\EOT\202\DC2\NAK\SYN\n\ + \9\n\ + \\ACK\EOT`\EOT\NUL\STX\STX\DC2\EOT\205\DC2\b\NAK\SUB) Original order is rejected (exception).\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\STX\SOH\DC2\EOT\205\DC2\b\DLE\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\STX\STX\DC2\EOT\205\DC2\DC3\DC4\n\ + \<\n\ + \\ACK\EOT`\EOT\NUL\STX\ETX\DC2\EOT\208\DC2\b\SYN\SUB, Order is acknowledged by execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\ETX\SOH\DC2\EOT\208\DC2\b\DC1\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\ETX\STX\DC2\EOT\208\DC2\DC4\NAK\n\ + \/\n\ + \\ACK\EOT`\EOT\NUL\STX\EOT\DC2\EOT\211\DC2\b\DC4\SUB\US Order is expired (exception).\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\EOT\SOH\DC2\EOT\211\DC2\b\SI\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\EOT\STX\DC2\EOT\211\DC2\DC2\DC3\n\ + \=\n\ + \\ACK\EOT`\EOT\NUL\STX\ENQ\DC2\EOT\214\DC2\b\SYN\SUB- Cancel request is sent to execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\ENQ\SOH\DC2\EOT\214\DC2\b\DC1\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\ENQ\STX\DC2\EOT\214\DC2\DC4\NAK\n\ + \=\n\ + \\ACK\EOT`\EOT\NUL\STX\ACK\DC2\EOT\217\DC2\b\ETB\SUB- Cancel is acknowledged by execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\ACK\SOH\DC2\EOT\217\DC2\b\DC2\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\ACK\STX\DC2\EOT\217\DC2\NAK\SYN\n\ + \9\n\ + \\ACK\EOT`\EOT\NUL\STX\a\DC2\EOT\220\DC2\b\SUB\SUB) Cancel request is rejected (exception).\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\a\SOH\DC2\EOT\220\DC2\b\NAK\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\a\STX\DC2\EOT\220\DC2\CAN\EM\n\ + \=\n\ + \\ACK\EOT`\EOT\NUL\STX\b\DC2\EOT\223\DC2\b\SYN\SUB- Modify request is sent to execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\b\SOH\DC2\EOT\223\DC2\b\DC1\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\b\STX\DC2\EOT\223\DC2\DC4\NAK\n\ + \=\n\ + \\ACK\EOT`\EOT\NUL\STX\t\DC2\EOT\226\DC2\b\ETB\SUB- Modify is acknowledged by execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\t\SOH\DC2\EOT\226\DC2\b\DC2\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\t\STX\DC2\EOT\226\DC2\NAK\SYN\n\ + \9\n\ + \\ACK\EOT`\EOT\NUL\STX\n\ + \\DC2\EOT\229\DC2\b\ESC\SUB) Modify request is rejected (exception).\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\n\ + \\SOH\DC2\EOT\229\DC2\b\NAK\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\n\ + \\STX\DC2\EOT\229\DC2\CAN\SUB\n\ + \?\n\ + \\ACK\EOT`\EOT\NUL\STX\v\DC2\EOT\232\DC2\b\DC2\SUB/ Fill event is received from execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\v\SOH\DC2\EOT\232\DC2\b\f\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\v\STX\DC2\EOT\232\DC2\SI\DC1\n\ + \%\n\ + \\ACK\EOT`\EOT\NUL\STX\f\DC2\EOT\235\DC2\b\NAK\SUB\NAK Order is suspended.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\f\SOH\DC2\EOT\235\DC2\b\SI\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\f\STX\DC2\EOT\235\DC2\DC2\DC4\n\ + \/\n\ + \\ACK\EOT`\EOT\NUL\STX\r\DC2\EOT\238\DC2\b\SUB\SUB\US Referenced fill is corrected.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\r\SOH\DC2\EOT\238\DC2\b\DC4\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\r\STX\DC2\EOT\238\DC2\ETB\EM\n\ + \:\n\ + \\ACK\EOT`\EOT\NUL\STX\SO\DC2\EOT\241\DC2\b\EM\SUB* Referenced fill is canceled (exception).\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\SO\SOH\DC2\EOT\241\DC2\b\DC3\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\SO\STX\DC2\EOT\241\DC2\SYN\CAN\n\ + \8\n\ + \\ACK\EOT`\EOT\NUL\STX\SI\DC2\EOT\244\DC2\b\ETB\SUB( Referenced fill is busted (exception).\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\SI\SOH\DC2\EOT\244\DC2\b\DC1\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\SI\STX\DC2\EOT\244\DC2\DC4\SYN\n\ + \L\n\ + \\ACK\EOT`\EOT\NUL\STX\DLE\DC2\EOT\247\DC2\b\SYN\SUB< Acknowledgment that order will activate at specified time.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\DLE\SOH\DC2\EOT\247\DC2\b\DLE\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\DLE\STX\DC2\EOT\247\DC2\DC3\NAK\n\ + \R\n\ + \\ACK\EOT`\EOT\NUL\STX\DC1\DC2\EOT\250\DC2\b\CAN\SUBB Order may be canceled because a disconnect occurred (exception).\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\DC1\SOH\DC2\EOT\250\DC2\b\DC2\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\DC1\STX\DC2\EOT\250\DC2\NAK\ETB\n\ + \J\n\ + \\ACK\EOT`\EOT\NUL\STX\DC2\DC2\EOT\253\DC2\b!\SUB: Synthetic order was sent to the actual execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\DC2\SOH\DC2\EOT\253\DC2\b\ESC\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\DC2\STX\DC2\EOT\253\DC2\RS \n\ + \>\n\ + \\ACK\EOT`\EOT\NUL\STX\DC3\DC2\EOT\128\DC3\b\DC4\SUB. Order status and/ or attributes are updated.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\DC3\SOH\DC2\EOT\128\DC3\b\SO\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\DC3\STX\DC2\EOT\128\DC3\DC1\DC3\n\ + \6\n\ + \\ACK\EOT`\EOT\NUL\STX\DC4\DC2\EOT\131\DC3\b\RS\SUB& Synthetic strategy execution failed.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\DC4\SOH\DC2\EOT\131\DC3\b\CAN\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\DC4\STX\DC2\EOT\131\DC3\ESC\GS\n\ + \K\n\ + \\ACK\EOT`\EOT\NUL\STX\NAK\DC2\EOT\134\DC3\b \SUB; Synthetic strategy order has at least one overfilled leg.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\NAK\SOH\DC2\EOT\134\DC3\b\SUB\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\NAK\STX\DC2\EOT\134\DC3\GS\US\n\ + \K\n\ + \\ACK\EOT`\EOT\NUL\STX\SYN\DC2\EOT\137\DC3\b\FS\SUB; Hanging quantity update for the synthetic strategy order.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\SYN\SOH\DC2\EOT\137\DC3\b\SYN\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\SYN\STX\DC2\EOT\137\DC3\EM\ESC\n\ + \h\n\ + \\ACK\EOT`\EOT\NUL\STX\ETB\DC2\EOT\140\DC3\b\ETB\SUBX Cross order is acknowledged by exchange but waiting for approval from counter-parties.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\ETB\SOH\DC2\EOT\140\DC3\b\DC1\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\ETB\STX\DC2\EOT\140\DC3\DC4\SYN\n\ + \\134\SOH\n\ + \\ACK\EOT`\EOT\NUL\STX\CAN\DC2\EOT\143\DC3\b\US\SUBv Cross order is waiting for approval from the client (i.e. from the side/participant that received this transaction).\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\CAN\SOH\DC2\EOT\143\DC3\b\EM\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\CAN\STX\DC2\EOT\143\DC3\FS\RS\n\ + \8\n\ + \\ACK\EOT`\EOT\NUL\STX\EM\DC2\EOT\146\DC3\b\"\SUB( The exchange approved the cross order.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\EM\SOH\DC2\EOT\146\DC3\b\FS\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\EM\STX\DC2\EOT\146\DC3\US!\n\ + \E\n\ + \\ACK\EOT`\EOT\NUL\STX\SUB\DC2\EOT\149\DC3\b\RS\SUB5 Cross order is rejected by one of its participants.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\SUB\SOH\DC2\EOT\149\DC3\b\CAN\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\SUB\STX\DC2\EOT\149\DC3\ESC\GS\n\ + \m\n\ + \\ACK\EOT`\EOT\NUL\STX\ESC\DC2\EOT\152\DC3\b\NAK\SUB] Cross order is completely executed on exchange, this is the final state of the cross order.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\ESC\SOH\DC2\EOT\152\DC3\b\SI\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\ESC\STX\DC2\EOT\152\DC3\DC2\DC4\n\ + \W\n\ + \\ACK\EOT`\EOT\NUL\STX\FS\DC2\EOT\155\DC3\b\ESC\SUBG Previously matched cross order/leg have been amended by the exchange.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\FS\SOH\DC2\EOT\155\DC3\b\NAK\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\FS\STX\DC2\EOT\155\DC3\CAN\SUB\n\ + \\132\SOH\n\ + \\ACK\EOT`\EOT\NUL\STX\GS\DC2\EOT\159\DC3\b\SUB\SUBt Cross order has a previously executed trade/leg broken by exchange;\n\ + \ this is analogous to bust on a regular order.\n\ + \\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\GS\SOH\DC2\EOT\159\DC3\b\DC4\n\ + \\SI\n\ + \\a\EOT`\EOT\NUL\STX\GS\STX\DC2\EOT\159\DC3\ETB\EM\n\ + \?\n\ + \\EOT\EOT`\STX\NUL\DC2\EOT\163\DC3\EOT\US\SUB1 This field is associated with Status enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT`\STX\NUL\EOT\DC2\EOT\163\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOT`\STX\NUL\ENQ\DC2\EOT\163\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOT`\STX\NUL\SOH\DC2\EOT\163\DC3\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOT`\STX\NUL\ETX\DC2\EOT\163\DC3\GS\RS\n\ + \H\n\ + \\EOT\EOT`\STX\SOH\DC2\EOT\166\DC3\EOT!\SUB: Order transaction identifier, unique within order chain.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT`\STX\SOH\EOT\DC2\EOT\166\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOT`\STX\SOH\ENQ\DC2\EOT\166\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOT`\STX\SOH\SOH\DC2\EOT\166\DC3\DC4\FS\n\ + \\r\n\ + \\ENQ\EOT`\STX\SOH\ETX\DC2\EOT\166\DC3\US \n\ + \:\n\ + \\EOT\EOT`\STX\STX\DC2\EOT\169\DC3\EOT'\SUB, Transaction time assigned by server (UTC).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT`\STX\STX\EOT\DC2\EOT\169\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOT`\STX\STX\ENQ\DC2\EOT\169\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOT`\STX\STX\SOH\DC2\EOT\169\DC3\DC4\"\n\ + \\r\n\ + \\ENQ\EOT`\STX\STX\ETX\DC2\EOT\169\DC3%&\n\ + \{\n\ + \\EOT\EOT`\STX\ETX\DC2\EOT\173\DC3\EOT$\SUBm Order request state at the transaction moment.\n\ + \ This field is associated with OrderRequest.State enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT`\STX\ETX\EOT\DC2\EOT\173\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOT`\STX\ETX\ENQ\DC2\EOT\173\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOT`\STX\ETX\SOH\DC2\EOT\173\DC3\DC4\US\n\ + \\r\n\ + \\ENQ\EOT`\STX\ETX\ETX\DC2\EOT\173\DC3\"#\n\ + \y\n\ + \\EOT\EOT`\STX\EOT\DC2\EOT\177\DC3\EOT+\SUBk Order chain status at the transaction moment.\n\ + \ This field is associated with OrderChain.Status enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT`\STX\EOT\EOT\DC2\EOT\177\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOT`\STX\EOT\ENQ\DC2\EOT\177\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOT`\STX\EOT\SOH\DC2\EOT\177\DC3\DC4&\n\ + \\r\n\ + \\ENQ\EOT`\STX\EOT\ETX\DC2\EOT\177\DC3)*\n\ + \0\n\ + \\EOT\EOT`\STX\ENQ\DC2\EOT\180\DC3\EOT%\SUB\" Additional transaction comments.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT`\STX\ENQ\EOT\DC2\EOT\180\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOT`\STX\ENQ\ENQ\DC2\EOT\180\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOT`\STX\ENQ\SOH\DC2\EOT\180\DC3\DC4 \n\ + \\r\n\ + \\ENQ\EOT`\STX\ENQ\ETX\DC2\EOT\180\DC3#$\n\ + \A\n\ + \\EOT\EOT`\STX\ACK\DC2\EOT\183\DC3\EOTO\SUB3 [obsolete] This operation is no longer supported.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT`\STX\ACK\EOT\DC2\EOT\183\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOT`\STX\ACK\ENQ\DC2\EOT\183\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOT`\STX\ACK\SOH\DC2\EOT\183\DC3\DC45\n\ + \\r\n\ + \\ENQ\EOT`\STX\ACK\ETX\DC2\EOT\183\DC39:\n\ + \\r\n\ + \\ENQ\EOT`\STX\ACK\b\DC2\EOT\183\DC3;N\n\ + \\SO\n\ + \\ACK\EOT`\STX\ACK\b\ETX\DC2\EOT\183\DC3\n\ + \\EOT\EOTa\STX\SOH\DC2\EOT\196\DC3\EOT \SUB0 Trade routing order fill execution identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\SOH\EOT\DC2\EOT\196\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\SOH\ENQ\DC2\EOT\196\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\SOH\SOH\DC2\EOT\196\DC3\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOTa\STX\SOH\ETX\DC2\EOT\196\DC3\RS\US\n\ + \6\n\ + \\EOT\EOTa\STX\STX\DC2\EOT\199\DC3\EOT>\SUB( [obsolete] Use quantity field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\STX\EOT\DC2\EOT\199\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\STX\ENQ\DC2\EOT\199\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\STX\SOH\DC2\EOT\199\DC3\DC4%\n\ + \\r\n\ + \\ENQ\EOTa\STX\STX\ETX\DC2\EOT\199\DC3()\n\ + \\r\n\ + \\ENQ\EOTa\STX\STX\b\DC2\EOT\199\DC3*=\n\ + \\SO\n\ + \\ACK\EOTa\STX\STX\b\ETX\DC2\EOT\199\DC3+<\n\ + \L\n\ + \\EOT\EOTa\STX\ETX\DC2\EOT\203\DC3\EOT\RS\SUB> Price at which the lots were bought or sold.\n\ + \ Correct price.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\ETX\EOT\DC2\EOT\203\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\ETX\ENQ\DC2\EOT\203\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\ETX\SOH\DC2\EOT\203\DC3\DC4\EM\n\ + \\r\n\ + \\ENQ\EOTa\STX\ETX\ETX\DC2\EOT\203\DC3\FS\GS\n\ + \T\n\ + \\EOT\EOTa\STX\EOT\DC2\EOT\206\DC3\EOT&\SUBF UTC time the fill happened (offset in milliseconds from 01.01.1970).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\EOT\EOT\DC2\EOT\206\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\EOT\ENQ\DC2\EOT\206\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\EOT\SOH\DC2\EOT\206\DC3\DC4!\n\ + \\r\n\ + \\ENQ\EOTa\STX\EOT\ETX\DC2\EOT\206\DC3$%\n\ + \V\n\ + \\EOT\EOTa\STX\ENQ\DC2\EOT\209\DC3\EOT$\SUBH Flag that trade was aggressive (Fixed Income specific order modifier).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\ENQ\EOT\DC2\EOT\209\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\ENQ\ENQ\DC2\EOT\209\DC3\r\DC1\n\ + \\r\n\ + \\ENQ\EOTa\STX\ENQ\SOH\DC2\EOT\209\DC3\DC2\US\n\ + \\r\n\ + \\ENQ\EOTa\STX\ENQ\ETX\DC2\EOT\209\DC3\"#\n\ + \:\n\ + \\EOT\EOTa\STX\ACK\DC2\EOT\212\DC3\EOT#\SUB, Leg fills associated with this order fill.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\ACK\EOT\DC2\EOT\212\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\ACK\ACK\DC2\EOT\212\DC3\r\DC4\n\ + \\r\n\ + \\ENQ\EOTa\STX\ACK\SOH\DC2\EOT\212\DC3\NAK\RS\n\ + \\r\n\ + \\ENQ\EOTa\STX\ACK\ETX\DC2\EOT\212\DC3!\"\n\ + \P\n\ + \\EOT\EOTa\STX\a\DC2\EOT\216\DC3\EOT!\SUBB Interesting to show.\n\ + \ Order request ID associated with the fill.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\a\EOT\DC2\EOT\216\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\a\ENQ\DC2\EOT\216\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\a\SOH\DC2\EOT\216\DC3\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTa\STX\a\ETX\DC2\EOT\216\DC3\US \n\ + \'\n\ + \\EOT\EOTa\EOT\NUL\DC2\ACK\219\DC3\EOT\232\DC3\ENQ\SUB\ETB Possible fill status.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\EOT\NUL\SOH\DC2\EOT\219\DC3\t\DC3\n\ + \%\n\ + \\ACK\EOTa\EOT\NUL\STX\NUL\DC2\EOT\222\DC3\b\DC2\SUB\NAK Regular valid fill.\n\ + \\n\ + \\SI\n\ + \\a\EOTa\EOT\NUL\STX\NUL\SOH\DC2\EOT\222\DC3\b\r\n\ + \\SI\n\ + \\a\EOTa\EOT\NUL\STX\NUL\STX\DC2\EOT\222\DC3\DLE\DC1\n\ + \\"\n\ + \\ACK\EOTa\EOT\NUL\STX\SOH\DC2\EOT\225\DC3\b\DC3\SUB\DC2 Fill was busted.\n\ + \\n\ + \\SI\n\ + \\a\EOTa\EOT\NUL\STX\SOH\SOH\DC2\EOT\225\DC3\b\SO\n\ + \\SI\n\ + \\a\EOTa\EOT\NUL\STX\SOH\STX\DC2\EOT\225\DC3\DC1\DC2\n\ + \%\n\ + \\ACK\EOTa\EOT\NUL\STX\STX\DC2\EOT\228\DC3\b\SYN\SUB\NAK Fill was corrected.\n\ + \\n\ + \\SI\n\ + \\a\EOTa\EOT\NUL\STX\STX\SOH\DC2\EOT\228\DC3\b\DC1\n\ + \\SI\n\ + \\a\EOTa\EOT\NUL\STX\STX\STX\DC2\EOT\228\DC3\DC4\NAK\n\ + \%\n\ + \\ACK\EOTa\EOT\NUL\STX\ETX\DC2\EOT\231\DC3\b\SYN\SUB\NAK Fill was cancelled.\n\ + \\n\ + \\SI\n\ + \\a\EOTa\EOT\NUL\STX\ETX\SOH\DC2\EOT\231\DC3\b\DC1\n\ + \\SI\n\ + \\a\EOTa\EOT\NUL\STX\ETX\STX\DC2\EOT\231\DC3\DC4\NAK\n\ + \R\n\ + \\EOT\EOTa\STX\b\DC2\EOT\236\DC3\EOT$\SUBD Status of the fill.\n\ + \ The value is associated with FillStatus enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\b\EOT\DC2\EOT\236\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\b\ENQ\DC2\EOT\236\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\b\SOH\DC2\EOT\236\DC3\DC4\US\n\ + \\r\n\ + \\ENQ\EOTa\STX\b\ETX\DC2\EOT\236\DC3\"#\n\ + \6\n\ + \\EOT\EOTa\STX\t\DC2\EOT\239\DC3\EOT4\SUB( Associated fill care order request id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\t\EOT\DC2\EOT\239\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\t\ENQ\DC2\EOT\239\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\t\SOH\DC2\EOT\239\DC3\DC4.\n\ + \\r\n\ + \\ENQ\EOTa\STX\t\ETX\DC2\EOT\239\DC313\n\ + \L\n\ + \\EOT\EOTa\STX\n\ + \\DC2\EOT\243\DC3\EOT'\SUB> Price at which the lots were bought or sold.\n\ + \ Display price.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\n\ + \\EOT\DC2\EOT\243\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\n\ + \\ENQ\DC2\EOT\243\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\n\ + \\SOH\DC2\EOT\243\DC3\DC4!\n\ + \\r\n\ + \\ENQ\EOTa\STX\n\ + \\ETX\DC2\EOT\243\DC3$&\n\ + \h\n\ + \\EOT\EOTa\STX\v\DC2\EOT\247\DC3\EOT)\SUBZ Fill open/close type.\n\ + \ This field is associated with OrderChain.OpenCloseType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\v\EOT\DC2\EOT\247\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\v\ENQ\DC2\EOT\247\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\v\SOH\DC2\EOT\247\DC3\DC4#\n\ + \\r\n\ + \\ENQ\EOTa\STX\v\ETX\DC2\EOT\247\DC3&(\n\ + \k\n\ + \\EOT\EOTa\STX\f\DC2\EOT\251\DC3\EOT*\SUB] Fill speculation type.\n\ + \ This field is associated with OrderChain.SpeculationType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\f\EOT\DC2\EOT\251\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\f\ENQ\DC2\EOT\251\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\f\SOH\DC2\EOT\251\DC3\DC4$\n\ + \\r\n\ + \\ENQ\EOTa\STX\f\ETX\DC2\EOT\251\DC3')\n\ + \-\n\ + \\EOT\EOTa\STX\r\DC2\EOT\254\DC3\EOT$\SUB\US Commission value of the fill.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\r\EOT\DC2\EOT\254\DC3\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\r\ENQ\DC2\EOT\254\DC3\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\r\SOH\DC2\EOT\254\DC3\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTa\STX\r\ETX\DC2\EOT\254\DC3!#\n\ + \F\n\ + \\EOT\EOTa\STX\SO\DC2\EOT\129\DC4\EOT-\SUB8 Commission currency code (ISO 4217 based) of the fill.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\SO\EOT\DC2\EOT\129\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\SO\ENQ\DC2\EOT\129\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTa\STX\SO\SOH\DC2\EOT\129\DC4\DC4'\n\ + \\r\n\ + \\ENQ\EOTa\STX\SO\ETX\DC2\EOT\129\DC4*,\n\ + \H\n\ + \\EOT\EOTa\STX\SI\DC2\EOT\132\DC4\EOT'\SUB: Quantity of bought or sold lots depending on order side.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTa\STX\SI\EOT\DC2\EOT\132\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTa\STX\SI\ACK\DC2\EOT\132\DC4\r\CAN\n\ + \\r\n\ + \\ENQ\EOTa\STX\SI\SOH\DC2\EOT\132\DC4\EM!\n\ + \\r\n\ + \\ENQ\EOTa\STX\SI\ETX\DC2\EOT\132\DC4$&\n\ + \'\n\ + \\STX\EOTb\DC2\ACK\136\DC4\NUL\197\DC4\SOH\SUB\EM Trade routing fill leg.\n\ + \\n\ + \\v\n\ + \\ETX\EOTb\SOH\DC2\EOT\136\DC4\b\SI\n\ + \9\n\ + \\EOT\EOTb\STX\NUL\DC2\EOT\139\DC4\EOT\ESC\SUB+ Trade routing leg fill unique identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\NUL\EOT\DC2\EOT\139\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\NUL\ENQ\DC2\EOT\139\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\NUL\SOH\DC2\EOT\139\DC4\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOTb\STX\NUL\ETX\DC2\EOT\139\DC4\EM\SUB\n\ + \<\n\ + \\EOT\EOTb\STX\SOH\DC2\EOT\142\DC4\EOT \SUB. Trade routing leg fill execution identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\SOH\EOT\DC2\EOT\142\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\SOH\ENQ\DC2\EOT\142\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\SOH\SOH\DC2\EOT\142\DC4\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOTb\STX\SOH\ETX\DC2\EOT\142\DC4\RS\US\n\ + \1\n\ + \\EOT\EOTb\STX\STX\DC2\EOT\145\DC4\EOT(\SUB#Full contract symbol for this leg.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\STX\EOT\DC2\EOT\145\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\STX\ENQ\DC2\EOT\145\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\STX\SOH\DC2\EOT\145\DC4\DC4#\n\ + \\r\n\ + \\ENQ\EOTb\STX\STX\ETX\DC2\EOT\145\DC4&'\n\ + \6\n\ + \\EOT\EOTb\STX\ETX\DC2\EOT\148\DC4\EOT>\SUB( [obsolete] Use quantity field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\ETX\EOT\DC2\EOT\148\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\ETX\ENQ\DC2\EOT\148\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\ETX\SOH\DC2\EOT\148\DC4\DC4%\n\ + \\r\n\ + \\ENQ\EOTb\STX\ETX\ETX\DC2\EOT\148\DC4()\n\ + \\r\n\ + \\ENQ\EOTb\STX\ETX\b\DC2\EOT\148\DC4*=\n\ + \\SO\n\ + \\ACK\EOTb\STX\ETX\b\ETX\DC2\EOT\148\DC4+<\n\ + \S\n\ + \\EOT\EOTb\STX\EOT\DC2\EOT\152\DC4\EOT\GS\SUBE Leg side.\n\ + \ This field is associated with OrderChain.Side enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\EOT\EOT\DC2\EOT\152\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\EOT\ENQ\DC2\EOT\152\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\EOT\SOH\DC2\EOT\152\DC4\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTb\STX\EOT\ETX\DC2\EOT\152\DC4\ESC\FS\n\ + \L\n\ + \\EOT\EOTb\STX\ENQ\DC2\EOT\156\DC4\EOT\RS\SUB> Price at which the lots were bought or sold.\n\ + \ Correct price.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\ENQ\EOT\DC2\EOT\156\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\ENQ\ENQ\DC2\EOT\156\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\ENQ\SOH\DC2\EOT\156\DC4\DC4\EM\n\ + \\r\n\ + \\ENQ\EOTb\STX\ENQ\ETX\DC2\EOT\156\DC4\FS\GS\n\ + \T\n\ + \\EOT\EOTb\STX\ACK\DC2\EOT\159\DC4\EOT&\SUBF UTC time the fill happened (offset in milliseconds from 01.01.1970).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\ACK\EOT\DC2\EOT\159\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\ACK\ENQ\DC2\EOT\159\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\ACK\SOH\DC2\EOT\159\DC4\DC4!\n\ + \\r\n\ + \\ENQ\EOTb\STX\ACK\ETX\DC2\EOT\159\DC4$%\n\ + \`\n\ + \\EOT\EOTb\STX\a\DC2\EOT\163\DC4\EOT$\SUBR Status of the leg fill.\n\ + \ The value is associated with OrderFill.FillStatus enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\a\EOT\DC2\EOT\163\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\a\ENQ\DC2\EOT\163\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\a\SOH\DC2\EOT\163\DC4\DC4\US\n\ + \\r\n\ + \\ENQ\EOTb\STX\a\ETX\DC2\EOT\163\DC4\"#\n\ + \L\n\ + \\EOT\EOTb\STX\b\DC2\EOT\167\DC4\EOT&\SUB> Price at which the lots were bought or sold.\n\ + \ Display price.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\b\EOT\DC2\EOT\167\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\b\ENQ\DC2\EOT\167\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\b\SOH\DC2\EOT\167\DC4\DC4!\n\ + \\r\n\ + \\ENQ\EOTb\STX\b\ETX\DC2\EOT\167\DC4$%\n\ + \l\n\ + \\EOT\EOTb\STX\t\DC2\EOT\171\DC4\EOT)\SUB^ Leg fill open/close type.\n\ + \ This field is associated with OrderChain.OpenCloseType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\t\EOT\DC2\EOT\171\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\t\ENQ\DC2\EOT\171\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\t\SOH\DC2\EOT\171\DC4\DC4#\n\ + \\r\n\ + \\ENQ\EOTb\STX\t\ETX\DC2\EOT\171\DC4&(\n\ + \o\n\ + \\EOT\EOTb\STX\n\ + \\DC2\EOT\175\DC4\EOT*\SUBa Leg fill speculation type.\n\ + \ This field is associated with OrderChain.SpeculationType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\n\ + \\EOT\DC2\EOT\175\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\n\ + \\ENQ\DC2\EOT\175\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\n\ + \\SOH\DC2\EOT\175\DC4\DC4$\n\ + \\r\n\ + \\ENQ\EOTb\STX\n\ + \\ETX\DC2\EOT\175\DC4')\n\ + \V\n\ + \\EOT\EOTb\STX\v\DC2\EOT\178\DC4\EOT%\SUBH Flag that trade was aggressive (Fixed Income specific order modifier).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\v\EOT\DC2\EOT\178\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\v\ENQ\DC2\EOT\178\DC4\r\DC1\n\ + \\r\n\ + \\ENQ\EOTb\STX\v\SOH\DC2\EOT\178\DC4\DC2\US\n\ + \\r\n\ + \\ENQ\EOTb\STX\v\ETX\DC2\EOT\178\DC4\"$\n\ + \F\n\ + \\EOT\EOTb\STX\f\DC2\EOT\181\DC4\EOT'\SUB8 Quantity of bought or sold lots depending on leg side.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\f\EOT\DC2\EOT\181\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\f\ACK\DC2\EOT\181\DC4\r\CAN\n\ + \\r\n\ + \\ENQ\EOTb\STX\f\SOH\DC2\EOT\181\DC4\EM!\n\ + \\r\n\ + \\ENQ\EOTb\STX\f\ETX\DC2\EOT\181\DC4$&\n\ + \[\n\ + \\EOT\EOTb\STX\r\DC2\EOT\185\DC4\EOT'\SUBM Order extended side.\n\ + \ This field is associated with ExtendedSide enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\r\EOT\DC2\EOT\185\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\r\ENQ\DC2\EOT\185\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\r\SOH\DC2\EOT\185\DC4\DC4!\n\ + \\r\n\ + \\ENQ\EOTb\STX\r\ETX\DC2\EOT\185\DC4$&\n\ + \a\n\ + \\EOT\EOTb\STX\SO\DC2\EOT\189\DC4\EOT#\SUBS Identifies a brokerage that lended an equity being sold short.\n\ + \ (max length = 64)\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\SO\EOT\DC2\EOT\189\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\SO\ENQ\DC2\EOT\189\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\SO\SOH\DC2\EOT\189\DC4\DC4\GS\n\ + \\r\n\ + \\ENQ\EOTb\STX\SO\ETX\DC2\EOT\189\DC4 \"\n\ + \A\n\ + \\EOT\EOTb\STX\SI\DC2\EOT\193\DC4\EOT3\SUB3 Fill extra values.\n\ + \ First - name, second - value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\SI\EOT\DC2\EOT\193\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\SI\ACK\DC2\EOT\193\DC4\r\ESC\n\ + \\r\n\ + \\ENQ\EOTb\STX\SI\SOH\DC2\EOT\193\DC4\FS-\n\ + \\r\n\ + \\ENQ\EOTb\STX\SI\ETX\DC2\EOT\193\DC402\n\ + \\GS\n\ + \\EOT\EOTb\STX\DLE\DC2\EOT\196\DC4\EOT$\SUB\SI Leg's number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTb\STX\DLE\EOT\DC2\EOT\196\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTb\STX\DLE\ENQ\DC2\EOT\196\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTb\STX\DLE\SOH\DC2\EOT\196\DC4\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTb\STX\DLE\ETX\DC2\EOT\196\DC4!#\n\ + \;\n\ + \\STX\EOTc\DC2\ACK\200\DC4\NUL\211\DC4\SOH\SUB- Represents order with related child orders.\n\ + \\n\ + \\v\n\ + \\ETX\EOTc\SOH\DC2\EOT\200\DC4\b\DC4\n\ + \'\n\ + \\EOT\EOTc\STX\NUL\DC2\EOT\203\DC4\EOT(\SUB\EM Associated Order chain.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTc\STX\NUL\EOT\DC2\EOT\203\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTc\STX\NUL\ACK\DC2\EOT\203\DC4\r\ETB\n\ + \\r\n\ + \\ENQ\EOTc\STX\NUL\SOH\DC2\EOT\203\DC4\CAN#\n\ + \\r\n\ + \\ENQ\EOTc\STX\NUL\ETX\DC2\EOT\203\DC4&'\n\ + \#\n\ + \\EOT\EOTc\STX\SOH\DC2\EOT\206\DC4\EOT'\SUB\NAK Child order chains.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTc\STX\SOH\EOT\DC2\EOT\206\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTc\STX\SOH\ACK\DC2\EOT\206\DC4\r\EM\n\ + \\r\n\ + \\ENQ\EOTc\STX\SOH\SOH\DC2\EOT\206\DC4\SUB\"\n\ + \\r\n\ + \\ENQ\EOTc\STX\SOH\ETX\DC2\EOT\206\DC4%&\n\ + \+\n\ + \\EOT\EOTc\STX\STX\DC2\EOT\210\DC4\EOT!\SUB\GS Leg path.\n\ + \ Example: '1/2/'.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTc\STX\STX\EOT\DC2\EOT\210\DC4\EOT\f\n\ + \\r\n\ + \\ENQ\EOTc\STX\STX\ENQ\DC2\EOT\210\DC4\r\DC3\n\ + \\r\n\ + \\ENQ\EOTc\STX\STX\SOH\DC2\EOT\210\DC4\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTc\STX\STX\ETX\DC2\EOT\210\DC4\US \n\ + \<\n\ + \\STX\EOTd\DC2\ACK\214\DC4\NUL\157\NAK\SOH\SUB. Represents compound order with child orders.\n\ + \\n\ + \\v\n\ + \\ETX\EOTd\SOH\DC2\EOT\214\DC4\b\NAK\n\ + \\SO\n\ + \\EOT\EOTd\EOT\NUL\DC2\ACK\216\DC4\EOT\232\DC4\ENQ\n\ + \\r\n\ + \\ENQ\EOTd\EOT\NUL\SOH\DC2\EOT\216\DC4\t\RS\n\ + \\US\n\ + \\ACK\EOTd\EOT\NUL\STX\NUL\DC2\EOT\219\DC4\b\DC1\SUB\SI Root of tree.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\NUL\STX\NUL\SOH\DC2\EOT\219\DC4\b\f\n\ + \\SI\n\ + \\a\EOTd\EOT\NUL\STX\NUL\STX\DC2\EOT\219\DC4\SI\DLE\n\ + \,\n\ + \\ACK\EOTd\EOT\NUL\STX\SOH\DC2\EOT\222\DC4\b\CAN\SUB\FS Order place order primary.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\NUL\STX\SOH\SOH\DC2\EOT\222\DC4\b\DC3\n\ + \\SI\n\ + \\a\EOTd\EOT\NUL\STX\SOH\STX\DC2\EOT\222\DC4\SYN\ETB\n\ + \.\n\ + \\ACK\EOTd\EOT\NUL\STX\STX\DC2\EOT\225\DC4\b\SUB\SUB\RS Order place order secondary.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\NUL\STX\STX\SOH\DC2\EOT\225\DC4\b\NAK\n\ + \\SI\n\ + \\a\EOTd\EOT\NUL\STX\STX\STX\DC2\EOT\225\DC4\CAN\EM\n\ + \%\n\ + \\ACK\EOTd\EOT\NUL\STX\ETX\DC2\EOT\228\DC4\b\NAK\SUB\NAK Order cancel order.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\NUL\STX\ETX\SOH\DC2\EOT\228\DC4\b\DLE\n\ + \\SI\n\ + \\a\EOTd\EOT\NUL\STX\ETX\STX\DC2\EOT\228\DC4\DC3\DC4\n\ + \'\n\ + \\ACK\EOTd\EOT\NUL\STX\EOT\DC2\EOT\231\DC4\b\GS\SUB\ETB Independent compound.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\NUL\STX\EOT\SOH\DC2\EOT\231\DC4\b\CAN\n\ + \\SI\n\ + \\a\EOTd\EOT\NUL\STX\EOT\STX\DC2\EOT\231\DC4\ESC\FS\n\ + \\SO\n\ + \\EOT\EOTd\EOT\SOH\DC2\ACK\234\DC4\EOT\247\DC4\ENQ\n\ + \\r\n\ + \\ENQ\EOTd\EOT\SOH\SOH\DC2\EOT\234\DC4\t\SUB\n\ + \%\n\ + \\ACK\EOTd\EOT\SOH\STX\NUL\DC2\EOT\237\DC4\b\DLE\SUB\NAK Order cancel order.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\SOH\STX\NUL\SOH\DC2\EOT\237\DC4\b\v\n\ + \\SI\n\ + \\a\EOTd\EOT\SOH\STX\NUL\STX\DC2\EOT\237\DC4\SO\SI\n\ + \$\n\ + \\ACK\EOTd\EOT\SOH\STX\SOH\DC2\EOT\240\DC4\b\DLE\SUB\DC4 Order place order.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\SOH\STX\SOH\SOH\DC2\EOT\240\DC4\b\v\n\ + \\SI\n\ + \\a\EOTd\EOT\SOH\STX\SOH\STX\DC2\EOT\240\DC4\SO\SI\n\ + \\\\n\ + \\ACK\EOTd\EOT\SOH\STX\STX\DC2\EOT\243\DC4\b\DC2\SUBL Order type. Compound order with ORDER type is associated with order chain.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\SOH\STX\STX\SOH\DC2\EOT\243\DC4\b\r\n\ + \\SI\n\ + \\a\EOTd\EOT\SOH\STX\STX\STX\DC2\EOT\243\DC4\DLE\DC1\n\ + \\DEL\n\ + \\ACK\EOTd\EOT\SOH\STX\ETX\DC2\EOT\246\DC4\b\CAN\SUBo Independent compound relation as set of two or more of otherwise unrelated orders being placed in one action.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\SOH\STX\ETX\SOH\DC2\EOT\246\DC4\b\DC3\n\ + \\SI\n\ + \\a\EOTd\EOT\SOH\STX\ETX\STX\DC2\EOT\246\DC4\SYN\ETB\n\ + \\SO\n\ + \\EOT\EOTd\EOT\STX\DC2\ACK\249\DC4\EOT\131\NAK\ENQ\n\ + \\r\n\ + \\ENQ\EOTd\EOT\STX\SOH\DC2\EOT\249\DC4\t!\n\ + \a\n\ + \\ACK\EOTd\EOT\STX\STX\NUL\DC2\EOT\252\DC4\b\DC4\SUBQ Default value for compound order. Indicates whether \209\129ompound order is working.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\STX\STX\NUL\SOH\DC2\EOT\252\DC4\b\SI\n\ + \\SI\n\ + \\a\EOTd\EOT\STX\STX\NUL\STX\DC2\EOT\252\DC4\DC2\DC3\n\ + \D\n\ + \\ACK\EOTd\EOT\STX\STX\SOH\DC2\EOT\255\DC4\b\DC3\SUB4 Indicates whether \209\129ompound order has been filled.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\STX\STX\SOH\SOH\DC2\EOT\255\DC4\b\SO\n\ + \\SI\n\ + \\a\EOTd\EOT\STX\STX\SOH\STX\DC2\EOT\255\DC4\DC1\DC2\n\ + \G\n\ + \\ACK\EOTd\EOT\STX\STX\STX\DC2\EOT\130\NAK\b\SYN\SUB7 Indicates whether \209\129ompound order has been cancelled.\n\ + \\n\ + \\SI\n\ + \\a\EOTd\EOT\STX\STX\STX\SOH\DC2\EOT\130\NAK\b\DC1\n\ + \\SI\n\ + \\a\EOTd\EOT\STX\STX\STX\STX\DC2\EOT\130\NAK\DC4\NAK\n\ + \\"\n\ + \\EOT\EOTd\STX\NUL\DC2\EOT\134\NAK\EOT\ESC\SUB\DC4 Compound order id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTd\STX\NUL\EOT\DC2\EOT\134\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTd\STX\NUL\ENQ\DC2\EOT\134\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTd\STX\NUL\SOH\DC2\EOT\134\NAK\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOTd\STX\NUL\ETX\DC2\EOT\134\NAK\EM\SUB\n\ + \l\n\ + \\EOT\EOTd\STX\SOH\DC2\EOT\138\NAK\EOT\"\SUB^ Compound role.\n\ + \ This field is associated with CompoundOrder.CompoundOrderNodeRole enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTd\STX\SOH\EOT\DC2\EOT\138\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTd\STX\SOH\ENQ\DC2\EOT\138\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTd\STX\SOH\SOH\DC2\EOT\138\NAK\DC4\GS\n\ + \\r\n\ + \\ENQ\EOTd\STX\SOH\ETX\DC2\EOT\138\NAK !\n\ + \h\n\ + \\EOT\EOTd\STX\STX\DC2\EOT\142\NAK\EOT\GS\SUBZ Compound type.\n\ + \ This field is associated with CompoundOrder.CompoundOrderType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTd\STX\STX\EOT\DC2\EOT\142\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTd\STX\STX\ENQ\DC2\EOT\142\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTd\STX\STX\SOH\DC2\EOT\142\NAK\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTd\STX\STX\ETX\DC2\EOT\142\NAK\ESC\FS\n\ + \,\n\ + \\EOT\EOTd\STX\ETX\DC2\EOT\145\NAK\EOT$\SUB\RS Unique compound client guid.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTd\STX\ETX\EOT\DC2\EOT\145\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTd\STX\ETX\ENQ\DC2\EOT\145\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTd\STX\ETX\SOH\DC2\EOT\145\NAK\DC4\US\n\ + \\r\n\ + \\ENQ\EOTd\STX\ETX\ETX\DC2\EOT\145\NAK\"#\n\ + \x\n\ + \\EOT\EOTd\STX\EOT\DC2\EOT\149\NAK\EOT%\SUBj Trigger on market type.\n\ + \ This field is associated with CompoundOrder.CompoundOrderTriggerType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTd\STX\EOT\EOT\DC2\EOT\149\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTd\STX\EOT\ENQ\DC2\EOT\149\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTd\STX\EOT\SOH\DC2\EOT\149\NAK\DC4 \n\ + \\r\n\ + \\ENQ\EOTd\STX\EOT\ETX\DC2\EOT\149\NAK#$\n\ + \T\n\ + \\EOT\EOTd\STX\ENQ\DC2\EOT\153\NAK\EOT(\SUBF Associated order chain.\n\ + \ Required when compound order type is ORDER.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTd\STX\ENQ\EOT\DC2\EOT\153\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTd\STX\ENQ\ACK\DC2\EOT\153\NAK\r\ETB\n\ + \\r\n\ + \\ENQ\EOTd\STX\ENQ\SOH\DC2\EOT\153\NAK\CAN#\n\ + \\r\n\ + \\ENQ\EOTd\STX\ENQ\ETX\DC2\EOT\153\NAK&'\n\ + \ \n\ + \\EOT\EOTd\STX\ACK\DC2\EOT\156\NAK\EOT(\SUB\DC2 Child compounds.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTd\STX\ACK\EOT\DC2\EOT\156\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTd\STX\ACK\ACK\DC2\EOT\156\NAK\r\SUB\n\ + \\r\n\ + \\ENQ\EOTd\STX\ACK\SOH\DC2\EOT\156\NAK\ESC#\n\ + \\r\n\ + \\ENQ\EOTd\STX\ACK\ETX\DC2\EOT\156\NAK&'\n\ + \8\n\ + \\STX\EOTe\DC2\ACK\160\NAK\NUL\209\NAK\SOH\SUB* Represents strategy leg with child legs.\n\ + \\n\ + \\v\n\ + \\ETX\EOTe\SOH\DC2\EOT\160\NAK\b\DC3\n\ + \\SO\n\ + \\EOT\EOTe\EOT\NUL\DC2\ACK\162\NAK\EOT\172\NAK\ENQ\n\ + \\r\n\ + \\ENQ\EOTe\EOT\NUL\SOH\DC2\EOT\162\NAK\t\NAK\n\ + \$\n\ + \\ACK\EOTe\EOT\NUL\STX\NUL\DC2\EOT\165\NAK\b\DLE\SUB\DC4 All legs executed.\n\ + \\n\ + \\SI\n\ + \\a\EOTe\EOT\NUL\STX\NUL\SOH\DC2\EOT\165\NAK\b\v\n\ + \\SI\n\ + \\a\EOTe\EOT\NUL\STX\NUL\STX\DC2\EOT\165\NAK\SO\SI\n\ + \!\n\ + \\ACK\EOTe\EOT\NUL\STX\SOH\DC2\EOT\168\NAK\b\DC1\SUB\DC1 Aggregate legs.\n\ + \\n\ + \\SI\n\ + \\a\EOTe\EOT\NUL\STX\SOH\SOH\DC2\EOT\168\NAK\b\f\n\ + \\SI\n\ + \\a\EOTe\EOT\NUL\STX\SOH\STX\DC2\EOT\168\NAK\SI\DLE\n\ + \*\n\ + \\ACK\EOTe\EOT\NUL\STX\STX\DC2\EOT\171\NAK\b\DLE\SUB\SUB Multiplicative strategy.\n\ + \\n\ + \\SI\n\ + \\a\EOTe\EOT\NUL\STX\STX\SOH\DC2\EOT\171\NAK\b\v\n\ + \\SI\n\ + \\a\EOTe\EOT\NUL\STX\STX\STX\DC2\EOT\171\NAK\SO\SI\n\ + \\EM\n\ + \\EOT\EOTe\STX\NUL\DC2\EOT\175\NAK\EOT!\SUB\v Leg path.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTe\STX\NUL\EOT\DC2\EOT\175\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTe\STX\NUL\ENQ\DC2\EOT\175\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTe\STX\NUL\SOH\DC2\EOT\175\NAK\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTe\STX\NUL\ETX\DC2\EOT\175\NAK\US \n\ + \\"\n\ + \\EOT\EOTe\STX\SOH\DC2\EOT\178\NAK\EOT(\SUB\DC4 Strategy contract.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTe\STX\SOH\EOT\DC2\EOT\178\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTe\STX\SOH\ENQ\DC2\EOT\178\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTe\STX\SOH\SOH\DC2\EOT\178\NAK\DC4#\n\ + \\r\n\ + \\ENQ\EOTe\STX\SOH\ETX\DC2\EOT\178\NAK&'\n\ + \<\n\ + \\EOT\EOTe\STX\STX\DC2\EOT\181\NAK\EOTD\SUB. [obsolete] Use quantity_ratio field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTe\STX\STX\EOT\DC2\EOT\181\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTe\STX\STX\ENQ\DC2\EOT\181\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTe\STX\STX\SOH\DC2\EOT\181\NAK\DC4+\n\ + \\r\n\ + \\ENQ\EOTe\STX\STX\ETX\DC2\EOT\181\NAK./\n\ + \\r\n\ + \\ENQ\EOTe\STX\STX\b\DC2\EOT\181\NAK0C\n\ + \\SO\n\ + \\ACK\EOTe\STX\STX\b\ETX\DC2\EOT\181\NAK1B\n\ + \\FS\n\ + \\EOT\EOTe\STX\ETX\DC2\EOT\184\NAK\EOT$\SUB\SO Price ratio.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTe\STX\ETX\EOT\DC2\EOT\184\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTe\STX\ETX\ENQ\DC2\EOT\184\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTe\STX\ETX\SOH\DC2\EOT\184\NAK\DC4\US\n\ + \\r\n\ + \\ENQ\EOTe\STX\ETX\ETX\DC2\EOT\184\NAK\"#\n\ + \2\n\ + \\EOT\EOTe\STX\EOT\DC2\EOT\187\NAK\EOT\GS\SUB$ Associated with StrategyMode enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTe\STX\EOT\EOT\DC2\EOT\187\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTe\STX\EOT\ENQ\DC2\EOT\187\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTe\STX\EOT\SOH\DC2\EOT\187\NAK\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTe\STX\EOT\ETX\DC2\EOT\187\NAK\ESC\FS\n\ + \\CAN\n\ + \\EOT\EOTe\STX\ENQ\DC2\EOT\190\NAK\EOT&\SUB\n\ + \ Account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTe\STX\ENQ\EOT\DC2\EOT\190\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTe\STX\ENQ\ACK\DC2\EOT\190\NAK\r\EM\n\ + \\r\n\ + \\ENQ\EOTe\STX\ENQ\SOH\DC2\EOT\190\NAK\SUB!\n\ + \\r\n\ + \\ENQ\EOTe\STX\ENQ\ETX\DC2\EOT\190\NAK$%\n\ + \:\n\ + \\EOT\EOTe\STX\ACK\DC2\EOT\194\NAK\EOT,\SUB, Yield model.\n\ + \ First - key, second - value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTe\STX\ACK\EOT\DC2\EOT\194\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTe\STX\ACK\ACK\DC2\EOT\194\NAK\r\ESC\n\ + \\r\n\ + \\ENQ\EOTe\STX\ACK\SOH\DC2\EOT\194\NAK\FS'\n\ + \\r\n\ + \\ENQ\EOTe\STX\ACK\ETX\DC2\EOT\194\NAK*+\n\ + \\ESC\n\ + \\EOT\EOTe\STX\a\DC2\EOT\197\NAK\EOT\"\SUB\r Child legs.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTe\STX\a\EOT\DC2\EOT\197\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTe\STX\a\ACK\DC2\EOT\197\NAK\r\CAN\n\ + \\r\n\ + \\ENQ\EOTe\STX\a\SOH\DC2\EOT\197\NAK\EM\GS\n\ + \\r\n\ + \\ENQ\EOTe\STX\a\ETX\DC2\EOT\197\NAK !\n\ + \p\n\ + \\EOT\EOTe\STX\b\DC2\EOT\201\NAK\EOT(\SUBb Strategy leg open/close type.\n\ + \ This field is associated with OrderChain.OpenCloseType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTe\STX\b\EOT\DC2\EOT\201\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTe\STX\b\ENQ\DC2\EOT\201\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTe\STX\b\SOH\DC2\EOT\201\NAK\DC4#\n\ + \\r\n\ + \\ENQ\EOTe\STX\b\ETX\DC2\EOT\201\NAK&'\n\ + \s\n\ + \\EOT\EOTe\STX\t\DC2\EOT\205\NAK\EOT*\SUBe Strategy leg speculation type.\n\ + \ This field is associated with OrderChain.SpeculationType enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTe\STX\t\EOT\DC2\EOT\205\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTe\STX\t\ENQ\DC2\EOT\205\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTe\STX\t\SOH\DC2\EOT\205\NAK\DC4$\n\ + \\r\n\ + \\ENQ\EOTe\STX\t\ETX\DC2\EOT\205\NAK')\n\ + \\US\n\ + \\EOT\EOTe\STX\n\ + \\DC2\EOT\208\NAK\EOT-\SUB\DC1 Quantity ratio.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTe\STX\n\ + \\EOT\DC2\EOT\208\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTe\STX\n\ + \\ACK\DC2\EOT\208\NAK\r\CAN\n\ + \\r\n\ + \\ENQ\EOTe\STX\n\ + \\SOH\DC2\EOT\208\NAK\EM'\n\ + \\r\n\ + \\ENQ\EOTe\STX\n\ + \\ETX\DC2\EOT\208\NAK*,\n\ + \I\n\ + \\STX\EOTf\DC2\ACK\212\NAK\NUL\200\SYN\SOH\SUB; Represents general information about CQG Gateway account.\n\ + \\n\ + \\v\n\ + \\ETX\EOTf\SOH\DC2\EOT\212\NAK\b\SI\n\ + \C\n\ + \\EOT\EOTf\STX\NUL\DC2\EOT\215\NAK\EOT\ESC\SUB5 [required-update] Trade routing account identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\NUL\EOT\DC2\EOT\215\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\NUL\ENQ\DC2\EOT\215\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\NUL\SOH\DC2\EOT\215\NAK\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOTf\STX\NUL\ETX\DC2\EOT\215\NAK\EM\SUB\n\ + \\145\SOH\n\ + \\EOT\EOTf\STX\SOH\DC2\EOT\219\NAK\EOT\GS\SUB\130\SOH [required-create] Account name (max length = 64).\n\ + \ Can contain prefix (like SIM for simalation account) which cannot be changed.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\SOH\EOT\DC2\EOT\219\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\SOH\ENQ\DC2\EOT\219\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\SOH\SOH\DC2\EOT\219\NAK\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTf\STX\SOH\ETX\DC2\EOT\219\NAK\ESC\FS\n\ + \\159\SOH\n\ + \\EOT\EOTf\STX\STX\DC2\EOT\223\NAK\EOT1\SUB\144\SOH [required-create] Brokerage account number (max length = 256).\n\ + \ Can contain prefix (like PS for permanent simulation) which cannot be changed.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\STX\EOT\DC2\EOT\223\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\STX\ENQ\DC2\EOT\223\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\STX\SOH\DC2\EOT\223\NAK\DC4,\n\ + \\r\n\ + \\ENQ\EOTf\STX\STX\ETX\DC2\EOT\223\NAK/0\n\ + \\199\SOH\n\ + \\EOT\EOTf\STX\ETX\DC2\EOT\228\NAK\EOTI\SUB\184\SOH [immutable][obsolete] Use sales_series_id field instead.\n\ + \ Sales series number.\n\ + \ Cannot be changed directly with UpdateAccount message, but can be changed by changing sales_series_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\ETX\EOT\DC2\EOT\228\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\ETX\ENQ\DC2\EOT\228\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\ETX\SOH\DC2\EOT\228\NAK\DC40\n\ + \\r\n\ + \\ENQ\EOTf\STX\ETX\ETX\DC2\EOT\228\NAK34\n\ + \\r\n\ + \\ENQ\EOTf\STX\ETX\b\DC2\EOT\228\NAK5H\n\ + \\SO\n\ + \\ACK\EOTf\STX\ETX\b\ETX\DC2\EOT\228\NAK6G\n\ + \\197\SOH\n\ + \\EOT\EOTf\STX\EOT\DC2\EOT\233\NAK\EOTG\SUB\182\SOH [immutable][obsolete] Use sales_series_id field instead.\n\ + \ Sales series name.\n\ + \ Cannot be changed directly with UpdateAccount message, but can be changed by changing sales_series_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\EOT\EOT\DC2\EOT\233\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\EOT\ENQ\DC2\EOT\233\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\EOT\SOH\DC2\EOT\233\NAK\DC4.\n\ + \\r\n\ + \\ENQ\EOTf\STX\EOT\ETX\DC2\EOT\233\NAK12\n\ + \\r\n\ + \\ENQ\EOTf\STX\EOT\b\DC2\EOT\233\NAK3F\n\ + \\SO\n\ + \\ACK\EOTf\STX\EOT\b\ETX\DC2\EOT\233\NAK4E\n\ + \V\n\ + \\EOT\EOTf\STX\ENQ\DC2\EOT\237\NAK\EOTD\SUBH [immutable][obsolete] Use brokerage_id field instead.\n\ + \ Brokerage name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\ENQ\EOT\DC2\EOT\237\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\ENQ\ENQ\DC2\EOT\237\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\ENQ\SOH\DC2\EOT\237\NAK\DC4+\n\ + \\r\n\ + \\ENQ\EOTf\STX\ENQ\ETX\DC2\EOT\237\NAK./\n\ + \\r\n\ + \\ENQ\EOTf\STX\ENQ\b\DC2\EOT\237\NAK0C\n\ + \\SO\n\ + \\ACK\EOTf\STX\ENQ\b\ETX\DC2\EOT\237\NAK1B\n\ + \,\n\ + \\EOT\EOTf\EOT\NUL\DC2\ACK\240\NAK\EOT\251\NAK\ENQ\SUB\FS Account class enumeration.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\EOT\NUL\SOH\DC2\EOT\240\NAK\t\SO\n\ + \(\n\ + \\ACK\EOTf\EOT\NUL\STX\NUL\DC2\EOT\243\NAK\b\DC4\SUB\CAN Regular account class.\n\ + \\n\ + \\SI\n\ + \\a\EOTf\EOT\NUL\STX\NUL\SOH\DC2\EOT\243\NAK\b\SI\n\ + \\SI\n\ + \\a\EOTf\EOT\NUL\STX\NUL\STX\DC2\EOT\243\NAK\DC2\DC3\n\ + \g\n\ + \\ACK\EOTf\EOT\NUL\STX\SOH\DC2\EOT\247\NAK\b\NAK\SUBW Template account class.\n\ + \ This class is used for back office parsing not for clonning.\n\ + \\n\ + \\SI\n\ + \\a\EOTf\EOT\NUL\STX\SOH\SOH\DC2\EOT\247\NAK\b\DLE\n\ + \\SI\n\ + \\a\EOTf\EOT\NUL\STX\SOH\STX\DC2\EOT\247\NAK\DC3\DC4\n\ + \(\n\ + \\ACK\EOTf\EOT\NUL\STX\STX\DC2\EOT\250\NAK\b\DC4\SUB\CAN Omnibus account class.\n\ + \\n\ + \\SI\n\ + \\a\EOTf\EOT\NUL\STX\STX\SOH\DC2\EOT\250\NAK\b\SI\n\ + \\SI\n\ + \\a\EOTf\EOT\NUL\STX\STX\STX\DC2\EOT\250\NAK\DC2\DC3\n\ + \]\n\ + \\EOT\EOTf\STX\ACK\DC2\EOT\254\NAK\EOT\RS\SUBO [required-create][immutable-update] This field is associated with Class enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\ACK\EOT\DC2\EOT\254\NAK\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\ACK\ENQ\DC2\EOT\254\NAK\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\ACK\SOH\DC2\EOT\254\NAK\DC4\EM\n\ + \\r\n\ + \\ENQ\EOTf\STX\ACK\ETX\DC2\EOT\254\NAK\FS\GS\n\ + \\145\SOH\n\ + \\EOT\EOTf\STX\a\DC2\EOT\131\SYN\EOT$\SUB\130\SOH Id of customer - owner of the account.\n\ + \ If changed then new customer must belong to the same brokerage.\n\ + \ Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\a\EOT\DC2\EOT\131\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\a\ENQ\DC2\EOT\131\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\a\SOH\DC2\EOT\131\SYN\DC4\US\n\ + \\r\n\ + \\ENQ\EOTf\STX\a\ETX\DC2\EOT\131\SYN\"#\n\ + \}\n\ + \\EOT\EOTf\STX\b\DC2\EOT\134\SYN\EOT.\SUBo [immutable] Risk server instance which calculates risks for this account (includes related Gateway location).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\b\EOT\DC2\EOT\134\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\b\ENQ\DC2\EOT\134\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\b\SOH\DC2\EOT\134\SYN\DC4(\n\ + \\r\n\ + \\ENQ\EOTf\STX\b\ETX\DC2\EOT\134\SYN+-\n\ + \\249\SOH\n\ + \\EOT\EOTf\STX\t\DC2\EOT\139\SYN\EOT)\SUB\234\SOH [required-create] Type of the account (e.g. 'Customer Account', 'House Account', etc.)\n\ + \ List of available account types can be obtained with:\n\ + \ LookupPropertyListRequest { property_type = TradeRoutingLookupPropertyType.ACCOUNT_TYPE }\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\t\EOT\DC2\EOT\139\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\t\ENQ\DC2\EOT\139\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\t\SOH\DC2\EOT\139\SYN\DC4#\n\ + \\r\n\ + \\ENQ\EOTf\STX\t\ETX\DC2\EOT\139\SYN&(\n\ + \\151\SOH\n\ + \\EOT\EOTf\STX\n\ + \\DC2\EOT\144\SYN\EOT)\SUB\136\SOH ID of related sales series.\n\ + \ If changed then new sales series must belong to the same brokerage.\n\ + \ Use profile_sales_series_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\n\ + \\EOT\DC2\EOT\144\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\n\ + \\ENQ\DC2\EOT\144\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\n\ + \\SOH\DC2\EOT\144\SYN\DC4#\n\ + \\r\n\ + \\ENQ\EOTf\STX\n\ + \\ETX\DC2\EOT\144\SYN&(\n\ + \4\n\ + \\EOT\EOTf\STX\v\DC2\EOT\147\SYN\EOT&\SUB& [immutable] ID of related brokerage.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\v\EOT\DC2\EOT\147\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\v\ENQ\DC2\EOT\147\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\v\SOH\DC2\EOT\147\SYN\DC4 \n\ + \\r\n\ + \\ENQ\EOTf\STX\v\ETX\DC2\EOT\147\SYN#%\n\ + \E\n\ + \\EOT\EOTf\STX\f\DC2\EOT\150\SYN\EOT\"\SUB7 [immutable] Default account currency code (ISO 4217).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\f\EOT\DC2\EOT\150\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\f\ENQ\DC2\EOT\150\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\f\SOH\DC2\EOT\150\SYN\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTf\STX\f\ETX\DC2\EOT\150\SYN\US!\n\ + \0\n\ + \\EOT\EOTf\EOT\SOH\DC2\ACK\153\SYN\EOT\160\SYN\ENQ\SUB Account sub-class enumeration.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\EOT\SOH\SOH\DC2\EOT\153\SYN\t\DC1\n\ + \,\n\ + \\ACK\EOTf\EOT\SOH\STX\NUL\DC2\EOT\156\SYN\b\RS\SUB\FS Regular account sub-class.\n\ + \\n\ + \\SI\n\ + \\a\EOTf\EOT\SOH\STX\NUL\SOH\DC2\EOT\156\SYN\b\EM\n\ + \\SI\n\ + \\a\EOTf\EOT\SOH\STX\NUL\STX\DC2\EOT\156\SYN\FS\GS\n\ + \5\n\ + \\ACK\EOTf\EOT\SOH\STX\SOH\DC2\EOT\159\SYN\b\US\SUB% Gateway internal account sub-class.\n\ + \\n\ + \\SI\n\ + \\a\EOTf\EOT\SOH\STX\SOH\SOH\DC2\EOT\159\SYN\b\SUB\n\ + \\SI\n\ + \\a\EOTf\EOT\SOH\STX\SOH\STX\DC2\EOT\159\SYN\GS\RS\n\ + \{\n\ + \\EOT\EOTf\STX\r\DC2\EOT\164\SYN\EOT#\SUBm This field is associated with SubClass enum.\n\ + \ Can be set/changed only for account with class = 3 (omnibus).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\r\EOT\DC2\EOT\164\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\r\ENQ\DC2\EOT\164\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\r\SOH\DC2\EOT\164\SYN\DC4\GS\n\ + \\r\n\ + \\ENQ\EOTf\STX\r\ETX\DC2\EOT\164\SYN \"\n\ + \\132\SOH\n\ + \\EOT\EOTf\STX\SO\DC2\EOT\168\SYN\EOT1\SUBv [immutable-update] Risk server instance id.\n\ + \ If not set during CreateAccount message, default brokerage one is used.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\SO\EOT\DC2\EOT\168\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\SO\ENQ\DC2\EOT\168\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\SO\SOH\DC2\EOT\168\SYN\DC4+\n\ + \\r\n\ + \\ENQ\EOTf\STX\SO\ETX\DC2\EOT\168\SYN.0\n\ + \G\n\ + \\EOT\EOTf\STX\SI\DC2\EOT\171\SYN\EOTI\SUB9 [obsolete] ID of account cluster the account points to.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\SI\EOT\DC2\EOT\171\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\SI\ENQ\DC2\EOT\171\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\SI\SOH\DC2\EOT\171\SYN\DC4/\n\ + \\r\n\ + \\ENQ\EOTf\STX\SI\ETX\DC2\EOT\171\SYN24\n\ + \\r\n\ + \\ENQ\EOTf\STX\SI\b\DC2\EOT\171\SYN5H\n\ + \\SO\n\ + \\ACK\EOTf\STX\SI\b\ETX\DC2\EOT\171\SYN6G\n\ + \C\n\ + \\EOT\EOTf\STX\DLE\DC2\EOT\174\SYN\EOT\US\SUB5 [immutable] Determines, whether account is removed.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\DLE\EOT\DC2\EOT\174\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\DLE\ENQ\DC2\EOT\174\SYN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTf\STX\DLE\SOH\DC2\EOT\174\SYN\DC2\EM\n\ + \\r\n\ + \\ENQ\EOTf\STX\DLE\ETX\DC2\EOT\174\SYN\FS\RS\n\ + \p\n\ + \\EOT\EOTf\STX\DC1\DC2\EOT\178\SYN\EOT!\SUBb [immutable] Determines group role (master/sub-account)\n\ + \ in case when account belongs to a group.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC1\EOT\DC2\EOT\178\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC1\ENQ\DC2\EOT\178\SYN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC1\SOH\DC2\EOT\178\SYN\DC2\ESC\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC1\ETX\DC2\EOT\178\SYN\RS \n\ + \\162\SOH\n\ + \\EOT\EOTf\STX\DC2\DC2\EOT\182\SYN\EOT-\SUB\147\SOH [immutable] This field is associated with AccountGroup.RelationType enum.\n\ + \ Specifies group relation type in case when account belongs to a group.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC2\EOT\DC2\EOT\182\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC2\ENQ\DC2\EOT\182\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC2\SOH\DC2\EOT\182\SYN\DC4'\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC2\ETX\DC2\EOT\182\SYN*,\n\ + \@\n\ + \\EOT\EOTf\STX\DC3\DC2\EOT\185\SYN\EOT%\SUB2 [immutable] Determines if account is collection.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC3\EOT\DC2\EOT\185\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC3\ENQ\DC2\EOT\185\SYN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC3\SOH\DC2\EOT\185\SYN\DC2\US\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC3\ETX\DC2\EOT\185\SYN\"$\n\ + \\211\SOH\n\ + \\EOT\EOTf\STX\DC4\DC2\EOT\191\SYN\EOT$\SUB\196\SOH [required-create] Id of profile - owner of the account.\n\ + \ If changed then new profile must belong to the same brokerage.\n\ + \ Has priority over customer_id.\n\ + \ Supported profile types: admin, customer.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC4\EOT\DC2\EOT\191\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC4\ENQ\DC2\EOT\191\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC4\SOH\DC2\EOT\191\SYN\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTf\STX\DC4\ETX\DC2\EOT\191\SYN!#\n\ + \\182\SOH\n\ + \\EOT\EOTf\STX\NAK\DC2\EOT\196\SYN\EOT1\SUB\167\SOH [required-create] ID of linked sales series profile.\n\ + \ If changed then new sales series profile must belong to the same brokerage.\n\ + \ Has priority over sales_series_id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\NAK\EOT\DC2\EOT\196\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\NAK\ENQ\DC2\EOT\196\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTf\STX\NAK\SOH\DC2\EOT\196\SYN\DC4+\n\ + \\r\n\ + \\ENQ\EOTf\STX\NAK\ETX\DC2\EOT\196\SYN.0\n\ + \^\n\ + \\EOT\EOTf\STX\SYN\DC2\EOT\199\SYN\EOT'\SUBP [immutable] Determines if account has migration request(s) not in final state.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTf\STX\SYN\EOT\DC2\EOT\199\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTf\STX\SYN\ENQ\DC2\EOT\199\SYN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTf\STX\SYN\SOH\DC2\EOT\199\SYN\DC2!\n\ + \\r\n\ + \\ENQ\EOTf\STX\SYN\ETX\DC2\EOT\199\SYN$&\n\ + \'\n\ + \\STX\EOTg\DC2\ACK\203\SYN\NUL\242\SYN\SOH\SUB\EM Gateway balance record.\n\ + \\n\ + \\v\n\ + \\ETX\EOTg\SOH\DC2\EOT\203\SYN\b\NAK\n\ + \1\n\ + \\EOT\EOTg\STX\NUL\DC2\EOT\206\SYN\EOT#\SUB# Trade routing account identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTg\STX\NUL\EOT\DC2\EOT\206\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTg\STX\NUL\ENQ\DC2\EOT\206\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTg\STX\NUL\SOH\DC2\EOT\206\SYN\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTg\STX\NUL\ETX\DC2\EOT\206\SYN!\"\n\ + \*\n\ + \\EOT\EOTg\STX\SOH\DC2\EOT\209\SYN\EOT*\SUB\FS Balance record identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTg\STX\SOH\EOT\DC2\EOT\209\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTg\STX\SOH\ENQ\DC2\EOT\209\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTg\STX\SOH\SOH\DC2\EOT\209\SYN\DC4%\n\ + \\r\n\ + \\ENQ\EOTg\STX\SOH\ETX\DC2\EOT\209\SYN()\n\ + \D\n\ + \\EOT\EOTg\STX\STX\DC2\EOT\212\SYN\EOT!\SUB6 Currency code (real currency code is ISO 4217 based.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTg\STX\STX\EOT\DC2\EOT\212\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTg\STX\STX\ENQ\DC2\EOT\212\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTg\STX\STX\SOH\DC2\EOT\212\SYN\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTg\STX\STX\ETX\DC2\EOT\212\SYN\US \n\ + \!\n\ + \\EOT\EOTg\STX\ETX\DC2\EOT\215\SYN\EOT)\SUB\DC3 End cash balance.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTg\STX\ETX\EOT\DC2\EOT\215\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTg\STX\ETX\ENQ\DC2\EOT\215\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTg\STX\ETX\SOH\DC2\EOT\215\SYN\DC4$\n\ + \\r\n\ + \\ENQ\EOTg\STX\ETX\ETX\DC2\EOT\215\SYN'(\n\ + \\ESC\n\ + \\EOT\EOTg\STX\EOT\DC2\EOT\218\SYN\EOT#\SUB\r Collateral.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTg\STX\EOT\EOT\DC2\EOT\218\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTg\STX\EOT\ENQ\DC2\EOT\218\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTg\STX\EOT\SOH\DC2\EOT\218\SYN\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTg\STX\EOT\ETX\DC2\EOT\218\SYN!\"\n\ + \<\n\ + \\EOT\EOTg\STX\ENQ\DC2\EOT\221\SYN\EOT#\SUB. Previous close date (date value only) (UTC).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTg\STX\ENQ\EOT\DC2\EOT\221\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTg\STX\ENQ\ENQ\DC2\EOT\221\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTg\STX\ENQ\SOH\DC2\EOT\221\SYN\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTg\STX\ENQ\ETX\DC2\EOT\221\SYN!\"\n\ + \1\n\ + \\EOT\EOTg\EOT\NUL\DC2\ACK\224\SYN\EOT\234\SYN\ENQ\SUB! Represents balance origin enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTg\EOT\NUL\SOH\DC2\EOT\224\SYN\t\SYN\n\ + \ \n\ + \\ACK\EOTg\EOT\NUL\STX\NUL\DC2\EOT\227\SYN\b\SI\SUB\DLE Not-available.\n\ + \\n\ + \\SI\n\ + \\a\EOTg\EOT\NUL\STX\NUL\SOH\DC2\EOT\227\SYN\b\n\ + \\n\ + \\SI\n\ + \\a\EOTg\EOT\NUL\STX\NUL\STX\DC2\EOT\227\SYN\r\SO\n\ + \ \n\ + \\ACK\EOTg\EOT\NUL\STX\SOH\DC2\EOT\230\SYN\b\DC2\SUB\DLE Local balance.\n\ + \\n\ + \\SI\n\ + \\a\EOTg\EOT\NUL\STX\SOH\SOH\DC2\EOT\230\SYN\b\r\n\ + \\SI\n\ + \\a\EOTg\EOT\NUL\STX\SOH\STX\DC2\EOT\230\SYN\DLE\DC1\n\ + \!\n\ + \\ACK\EOTg\EOT\NUL\STX\STX\DC2\EOT\233\SYN\b\NAK\SUB\DC1 Abroad balance.\n\ + \\n\ + \\SI\n\ + \\a\EOTg\EOT\NUL\STX\STX\SOH\DC2\EOT\233\SYN\b\DLE\n\ + \\SI\n\ + \\a\EOTg\EOT\NUL\STX\STX\STX\DC2\EOT\233\SYN\DC3\DC4\n\ + \c\n\ + \\EOT\EOTg\STX\ACK\DC2\EOT\238\SYN\EOT\US\SUBU [immutable] Balance origin.\n\ + \ This field is associated with BalanceOrigin enum type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTg\STX\ACK\EOT\DC2\EOT\238\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTg\STX\ACK\ENQ\DC2\EOT\238\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTg\STX\ACK\SOH\DC2\EOT\238\SYN\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOTg\STX\ACK\ETX\DC2\EOT\238\SYN\GS\RS\n\ + \\SUB\n\ + \\EOT\EOTg\STX\a\DC2\EOT\241\SYN\EOT \SUB\f Regulated.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTg\STX\a\EOT\DC2\EOT\241\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTg\STX\a\ENQ\DC2\EOT\241\SYN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTg\STX\a\SOH\DC2\EOT\241\SYN\DC2\ESC\n\ + \\r\n\ + \\ENQ\EOTg\STX\a\ETX\DC2\EOT\241\SYN\RS\US\n\ + \<\n\ + \\STX\EOTh\DC2\ACK\245\SYN\NUL\165\ETB\SOH\SUB. Information about one of the found accounts.\n\ + \\n\ + \\v\n\ + \\ETX\EOTh\SOH\DC2\EOT\245\SYN\b!\n\ + \1\n\ + \\EOT\EOTh\STX\NUL\DC2\EOT\248\SYN\EOT#\SUB# Trade routing account identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\NUL\EOT\DC2\EOT\248\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\NUL\ENQ\DC2\EOT\248\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\NUL\SOH\DC2\EOT\248\SYN\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTh\STX\NUL\ETX\DC2\EOT\248\SYN!\"\n\ + \\GS\n\ + \\EOT\EOTh\STX\SOH\DC2\EOT\251\SYN\EOT\GS\SUB\SI Account name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\SOH\EOT\DC2\EOT\251\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\SOH\ENQ\DC2\EOT\251\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\SOH\SOH\DC2\EOT\251\SYN\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTh\STX\SOH\ETX\DC2\EOT\251\SYN\ESC\FS\n\ + \)\n\ + \\EOT\EOTh\STX\STX\DC2\EOT\254\SYN\EOT1\SUB\ESC Brokerage account number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\STX\EOT\DC2\EOT\254\SYN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\STX\ENQ\DC2\EOT\254\SYN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\STX\SOH\DC2\EOT\254\SYN\DC4,\n\ + \\r\n\ + \\ENQ\EOTh\STX\STX\ETX\DC2\EOT\254\SYN/0\n\ + \$\n\ + \\EOT\EOTh\STX\ETX\DC2\EOT\129\ETB\EOT,\SUB\SYN Sales series number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\ETX\EOT\DC2\EOT\129\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\ETX\ENQ\DC2\EOT\129\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\ETX\SOH\DC2\EOT\129\ETB\DC4'\n\ + \\r\n\ + \\ENQ\EOTh\STX\ETX\ETX\DC2\EOT\129\ETB*+\n\ + \\"\n\ + \\EOT\EOTh\STX\EOT\DC2\EOT\132\ETB\EOT*\SUB\DC4 Sales series name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\EOT\EOT\DC2\EOT\132\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\EOT\ENQ\DC2\EOT\132\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\EOT\SOH\DC2\EOT\132\ETB\DC4%\n\ + \\r\n\ + \\ENQ\EOTh\STX\EOT\ETX\DC2\EOT\132\ETB()\n\ + \\US\n\ + \\EOT\EOTh\STX\ENQ\DC2\EOT\135\ETB\EOT'\SUB\DC1 Brokerage name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\ENQ\EOT\DC2\EOT\135\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\ENQ\ENQ\DC2\EOT\135\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\ENQ\SOH\DC2\EOT\135\ETB\DC4\"\n\ + \\r\n\ + \\ENQ\EOTh\STX\ENQ\ETX\DC2\EOT\135\ETB%&\n\ + \O\n\ + \\EOT\EOTh\STX\ACK\DC2\EOT\139\ETB\EOT$\SUBA Id of customer - owner of the account.\n\ + \ Use profile_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\ACK\EOT\DC2\EOT\139\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\ACK\ENQ\DC2\EOT\139\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\ACK\SOH\DC2\EOT\139\ETB\DC4\US\n\ + \\r\n\ + \\ENQ\EOTh\STX\ACK\ETX\DC2\EOT\139\ETB\"#\n\ + \8\n\ + \\EOT\EOTh\STX\a\DC2\EOT\142\ETB\EOT&\SUB* Name of customer - owner of the account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\a\EOT\DC2\EOT\142\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\a\ENQ\DC2\EOT\142\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\a\SOH\DC2\EOT\142\ETB\DC4!\n\ + \\r\n\ + \\ENQ\EOTh\STX\a\ETX\DC2\EOT\142\ETB$%\n\ + \\GS\n\ + \\EOT\EOTh\STX\b\DC2\EOT\145\ETB\EOT\RS\SUB\SI Removed flag.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\b\EOT\DC2\EOT\145\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\b\ENQ\DC2\EOT\145\ETB\r\DC1\n\ + \\r\n\ + \\ENQ\EOTh\STX\b\SOH\DC2\EOT\145\ETB\DC2\EM\n\ + \\r\n\ + \\ENQ\EOTh\STX\b\ETX\DC2\EOT\145\ETB\FS\GS\n\ + \I\n\ + \\EOT\EOTh\STX\t\DC2\EOT\149\ETB\EOT)\SUB; Id of sales series.\n\ + \ Use profile_sales_series_id instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\t\EOT\DC2\EOT\149\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\t\ENQ\DC2\EOT\149\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\t\SOH\DC2\EOT\149\ETB\DC4#\n\ + \\r\n\ + \\ENQ\EOTh\STX\t\ETX\DC2\EOT\149\ETB&(\n\ + \\f\n\ + \\EOT\EOTh\STX\n\ + \\DC2\EOT\151\ETB\EOT&\n\ + \\r\n\ + \\ENQ\EOTh\STX\n\ + \\EOT\DC2\EOT\151\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\n\ + \\ENQ\DC2\EOT\151\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\n\ + \\SOH\DC2\EOT\151\ETB\DC4 \n\ + \\r\n\ + \\ENQ\EOTh\STX\n\ + \\ETX\DC2\EOT\151\ETB#%\n\ + \\f\n\ + \\EOT\EOTh\STX\v\DC2\EOT\153\ETB\EOT1\n\ + \\r\n\ + \\ENQ\EOTh\STX\v\EOT\DC2\EOT\153\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\v\ENQ\DC2\EOT\153\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\v\SOH\DC2\EOT\153\ETB\DC4+\n\ + \\r\n\ + \\ENQ\EOTh\STX\v\ETX\DC2\EOT\153\ETB.0\n\ + \\f\n\ + \\EOT\EOTh\STX\f\DC2\EOT\155\ETB\EOT\"\n\ + \\r\n\ + \\ENQ\EOTh\STX\f\EOT\DC2\EOT\155\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\f\ENQ\DC2\EOT\155\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\f\SOH\DC2\EOT\155\ETB\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTh\STX\f\ETX\DC2\EOT\155\ETB\US!\n\ + \9\n\ + \\EOT\EOTh\STX\r\DC2\EOT\158\ETB\EOT\US\SUB+ This field is associated with Class enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\r\EOT\DC2\EOT\158\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\r\ENQ\DC2\EOT\158\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\r\SOH\DC2\EOT\158\ETB\DC4\EM\n\ + \\r\n\ + \\ENQ\EOTh\STX\r\ETX\DC2\EOT\158\ETB\FS\RS\n\ + \!\n\ + \\EOT\EOTh\STX\SO\DC2\EOT\161\ETB\EOT$\SUB\DC3 Owner profile id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\SO\EOT\DC2\EOT\161\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\SO\ENQ\DC2\EOT\161\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\SO\SOH\DC2\EOT\161\ETB\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTh\STX\SO\ETX\DC2\EOT\161\ETB!#\n\ + \/\n\ + \\EOT\EOTh\STX\SI\DC2\EOT\164\ETB\EOT1\SUB! Linked sales series profile id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTh\STX\SI\EOT\DC2\EOT\164\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTh\STX\SI\ENQ\DC2\EOT\164\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTh\STX\SI\SOH\DC2\EOT\164\ETB\DC4+\n\ + \\r\n\ + \\ENQ\EOTh\STX\SI\ETX\DC2\EOT\164\ETB.0\n\ + \8\n\ + \\STX\EOTi\DC2\ACK\168\ETB\NUL\232\ETB\SOH\SUB* Information about enabled account route.\n\ + \\n\ + \\v\n\ + \\ETX\EOTi\SOH\DC2\EOT\168\ETB\b\SUB\n\ + \d\n\ + \\EOT\EOTi\EOT\NUL\DC2\ACK\171\ETB\EOT\181\ETB\ENQ\SUBT Values indicating whether CQG MiFID Algo \"CQG Variable Latency\" should be applyed.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\EOT\NUL\SOH\DC2\EOT\171\ETB\t!\n\ + \5\n\ + \\ACK\EOTi\EOT\NUL\STX\NUL\DC2\EOT\174\ETB\b\NAK\SUB% Never for any orders on this route.\n\ + \\n\ + \\SI\n\ + \\a\EOTi\EOT\NUL\STX\NUL\SOH\DC2\EOT\174\ETB\b\DLE\n\ + \\SI\n\ + \\a\EOTi\EOT\NUL\STX\NUL\STX\DC2\EOT\174\ETB\DC3\DC4\n\ + \i\n\ + \\ACK\EOTi\EOT\NUL\STX\SOH\DC2\EOT\177\ETB\b \SUBY For any orders on this route if they do not already have a CQG Algo or Spreader orders.\n\ + \\n\ + \\SI\n\ + \\a\EOTi\EOT\NUL\STX\SOH\SOH\DC2\EOT\177\ETB\b\ESC\n\ + \\SI\n\ + \\a\EOTi\EOT\NUL\STX\SOH\STX\DC2\EOT\177\ETB\RS\US\n\ + \V\n\ + \\ACK\EOTi\EOT\NUL\STX\STX\DC2\EOT\180\ETB\b#\SUBF Always for any orders on this route if they are not Spreader orders.\n\ + \\n\ + \\SI\n\ + \\a\EOTi\EOT\NUL\STX\STX\SOH\DC2\EOT\180\ETB\b\US\n\ + \\SI\n\ + \\a\EOTi\EOT\NUL\STX\STX\STX\DC2\EOT\180\ETB!\"\n\ + \C\n\ + \\EOT\EOTi\STX\NUL\DC2\EOT\184\ETB\EOT'\SUB5 List of field ids to clear during update operation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\NUL\EOT\DC2\EOT\184\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\NUL\ENQ\DC2\EOT\184\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTi\STX\NUL\SOH\DC2\EOT\184\ETB\DC4\"\n\ + \\r\n\ + \\ENQ\EOTi\STX\NUL\ETX\DC2\EOT\184\ETB%&\n\ + \4\n\ + \\EOT\EOTi\STX\SOH\DC2\EOT\187\ETB\EOT#\SUB& [required] Code number of the route.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\SOH\EOT\DC2\EOT\187\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\SOH\ENQ\DC2\EOT\187\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTi\STX\SOH\SOH\DC2\EOT\187\ETB\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTi\STX\SOH\ETX\DC2\EOT\187\ETB!\"\n\ + \H\n\ + \\EOT\EOTi\STX\STX\DC2\EOT\191\ETB\EOT@\SUB: [obsolete] Route name.\n\ + \ See RouteInformation.name field.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\STX\EOT\DC2\EOT\191\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\STX\ENQ\DC2\EOT\191\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTi\STX\STX\SOH\DC2\EOT\191\ETB\DC4'\n\ + \\r\n\ + \\ENQ\EOTi\STX\STX\ETX\DC2\EOT\191\ETB*+\n\ + \\r\n\ + \\ENQ\EOTi\STX\STX\b\DC2\EOT\191\ETB,?\n\ + \\SO\n\ + \\ACK\EOTi\STX\STX\b\ETX\DC2\EOT\191\ETB->\n\ + \c\n\ + \\EOT\EOTi\STX\ETX\DC2\EOT\195\ETB\EOT!\SUBU [required-create] Account priority of the route.\n\ + \ Should be unique positive number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\ETX\EOT\DC2\EOT\195\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\ETX\ENQ\DC2\EOT\195\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTi\STX\ETX\SOH\DC2\EOT\195\ETB\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTi\STX\ETX\ETX\DC2\EOT\195\ETB\US \n\ + \\179\SOH\n\ + \\EOT\EOTi\STX\EOT\DC2\EOT\200\ETB\EOT+\SUB\164\SOH [erasable] Omnibus account ID if it is used for this route.\n\ + \ NOTE: erasing using cleared_fields functionality is\n\ + \ implemented for protocol version 1.33 or higher.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\EOT\EOT\DC2\EOT\200\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\EOT\ENQ\DC2\EOT\200\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTi\STX\EOT\SOH\DC2\EOT\200\ETB\DC4&\n\ + \\r\n\ + \\ENQ\EOTi\STX\EOT\ETX\DC2\EOT\200\ETB)*\n\ + \p\n\ + \\EOT\EOTi\STX\ENQ\DC2\EOT\204\ETB\EOTJ\SUBb [obsolete] Omnibus account name if it is used for this route.\n\ + \ See Route.omnibus_accounts field.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\ENQ\EOT\DC2\EOT\204\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\ENQ\ENQ\DC2\EOT\204\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTi\STX\ENQ\SOH\DC2\EOT\204\ETB\DC41\n\ + \\r\n\ + \\ENQ\EOTi\STX\ENQ\ETX\DC2\EOT\204\ETB45\n\ + \\r\n\ + \\ENQ\EOTi\STX\ENQ\b\DC2\EOT\204\ETB6I\n\ + \\SO\n\ + \\ACK\EOTi\STX\ENQ\b\ETX\DC2\EOT\204\ETB7H\n\ + \5\n\ + \\EOT\EOTi\STX\ACK\DC2\EOT\207\ETB\EOT2\SUB' List of route attributes with values.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\ACK\EOT\DC2\EOT\207\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\ACK\ACK\DC2\EOT\207\ETB\r\"\n\ + \\r\n\ + \\ENQ\EOTi\STX\ACK\SOH\DC2\EOT\207\ETB#-\n\ + \\r\n\ + \\ENQ\EOTi\STX\ACK\ETX\DC2\EOT\207\ETB01\n\ + \f\n\ + \\EOT\EOTi\STX\a\DC2\EOT\210\ETB\EOT \SUBX [immutable] If set, route is in use by some other account using this configured route.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\a\EOT\DC2\EOT\210\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\a\ENQ\DC2\EOT\210\ETB\r\DC1\n\ + \\r\n\ + \\ENQ\EOTi\STX\a\SOH\DC2\EOT\210\ETB\DC2\ESC\n\ + \\r\n\ + \\ENQ\EOTi\STX\a\ETX\DC2\EOT\210\ETB\RS\US\n\ + \\196\SOH\n\ + \\EOT\EOTi\STX\b\DC2\EOT\214\ETB\EOT2\SUB\181\SOH Indicates whether synthetic orders are allowed on this route for this account.\n\ + \ Can be 'true' only if route allows synthetic orders (RouteInformation.allow_synthetic_order_types).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\b\EOT\DC2\EOT\214\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\b\ENQ\DC2\EOT\214\ETB\r\DC1\n\ + \\r\n\ + \\ENQ\EOTi\STX\b\SOH\DC2\EOT\214\ETB\DC2-\n\ + \\r\n\ + \\ENQ\EOTi\STX\b\ETX\DC2\EOT\214\ETB01\n\ + \\128\STX\n\ + \\EOT\EOTi\STX\t\DC2\EOT\220\ETB\EOT8\SUB\205\SOH Indicates whether the algo_strategies_whitelist contains information about allowed algorithmic strategies.\n\ + \ Otherwise all available algorithmic strategies on particular route are allowed for the account.\n\ + \2\" 9 is occupied by cleared_fields.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\t\EOT\DC2\EOT\220\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\t\ENQ\DC2\EOT\220\ETB\r\DC1\n\ + \\r\n\ + \\ENQ\EOTi\STX\t\SOH\DC2\EOT\220\ETB\DC22\n\ + \\r\n\ + \\ENQ\EOTi\STX\t\ETX\DC2\EOT\220\ETB57\n\ + \\219\SOH\n\ + \\EOT\EOTi\STX\n\ + \\DC2\EOT\224\ETB\EOT3\SUB\204\SOH [erasable] List of route algorithmic strategy ids allowed to account on particular route.\n\ + \ Can contain specific algorithmic strategy enablement in case when enable_algo_strategies_whitelist flag is set.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\n\ + \\EOT\DC2\EOT\224\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\n\ + \\ENQ\DC2\EOT\224\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTi\STX\n\ + \\SOH\DC2\EOT\224\ETB\DC4-\n\ + \\r\n\ + \\ENQ\EOTi\STX\n\ + \\ETX\DC2\EOT\224\ETB02\n\ + \\213\SOH\n\ + \\EOT\EOTi\STX\v\DC2\EOT\228\ETB\EOT,\SUB\198\SOH Flag indicating whether during doing order route calculation, Risk Server should enforce\n\ + \ that a route enabled as \"CQG Algo orders only\" is only used for the order when it has a CQG MiFID Algo ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\v\EOT\DC2\EOT\228\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\v\ENQ\DC2\EOT\228\ETB\r\DC1\n\ + \\r\n\ + \\ENQ\EOTi\STX\v\SOH\DC2\EOT\228\ETB\DC2&\n\ + \\r\n\ + \\ENQ\EOTi\STX\v\ETX\DC2\EOT\228\ETB)+\n\ + \L\n\ + \\EOT\EOTi\STX\f\DC2\EOT\231\ETB\EOT5\SUB> This field is associated with ForceVariableLatencyAlgo enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTi\STX\f\EOT\DC2\EOT\231\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTi\STX\f\ENQ\DC2\EOT\231\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTi\STX\f\SOH\DC2\EOT\231\ETB\DC4/\n\ + \\r\n\ + \\ENQ\EOTi\STX\f\ETX\DC2\EOT\231\ETB24\n\ + \!\n\ + \\STX\EOTj\DC2\ACK\235\ETB\NUL\245\ETB\SOH\SUB\DC3 Route attributes.\n\ + \\n\ + \\v\n\ + \\ETX\EOTj\SOH\DC2\EOT\235\ETB\b\GS\n\ + \1\n\ + \\EOT\EOTj\STX\NUL\DC2\EOT\238\ETB\EOT\GS\SUB# [immutable] Route attribute name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTj\STX\NUL\EOT\DC2\EOT\238\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTj\STX\NUL\ENQ\DC2\EOT\238\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTj\STX\NUL\SOH\DC2\EOT\238\ETB\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTj\STX\NUL\ETX\DC2\EOT\238\ETB\ESC\FS\n\ + \&\n\ + \\EOT\EOTj\STX\SOH\DC2\EOT\241\ETB\EOT\RS\SUB\CAN Route attribute value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTj\STX\SOH\EOT\DC2\EOT\241\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTj\STX\SOH\ENQ\DC2\EOT\241\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTj\STX\SOH\SOH\DC2\EOT\241\ETB\DC4\EM\n\ + \\r\n\ + \\ENQ\EOTj\STX\SOH\ETX\DC2\EOT\241\ETB\FS\GS\n\ + \3\n\ + \\EOT\EOTj\STX\STX\DC2\EOT\244\ETB\EOT\ESC\SUB% [required][immutable] attribute id.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTj\STX\STX\EOT\DC2\EOT\244\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTj\STX\STX\ENQ\DC2\EOT\244\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTj\STX\STX\SOH\DC2\EOT\244\ETB\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOTj\STX\STX\ETX\DC2\EOT\244\ETB\EM\SUB\n\ + \3\n\ + \\STX\EOTk\DC2\ACK\248\ETB\NUL\174\CAN\SOH\SUB% Account to user authorization link.\n\ + \\n\ + \\v\n\ + \\ETX\EOTk\SOH\DC2\EOT\248\ETB\b\ETB\n\ + \&\n\ + \\EOT\EOTk\STX\NUL\DC2\EOT\251\ETB\EOT#\SUB\CAN [required] Account ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\NUL\EOT\DC2\EOT\251\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\NUL\ENQ\DC2\EOT\251\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTk\STX\NUL\SOH\DC2\EOT\251\ETB\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTk\STX\NUL\ETX\DC2\EOT\251\ETB!\"\n\ + \#\n\ + \\EOT\EOTk\STX\SOH\DC2\EOT\254\ETB\EOT \SUB\NAK [required] User ID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\SOH\EOT\DC2\EOT\254\ETB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\SOH\ENQ\DC2\EOT\254\ETB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTk\STX\SOH\SOH\DC2\EOT\254\ETB\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOTk\STX\SOH\ETX\DC2\EOT\254\ETB\RS\US\n\ + \E\n\ + \\EOT\EOTk\STX\STX\DC2\EOT\129\CAN\EOT#\SUB7 True means the trader can only view account activity.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\STX\EOT\DC2\EOT\129\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\STX\ENQ\DC2\EOT\129\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTk\STX\STX\SOH\DC2\EOT\129\CAN\DC2\RS\n\ + \\r\n\ + \\ENQ\EOTk\STX\STX\ETX\DC2\EOT\129\CAN!\"\n\ + \]\n\ + \\EOT\EOTk\STX\ETX\DC2\EOT\132\CAN\EOT$\SUBO Determines if Gateway will automatically park trader's orders as Care Orders.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\ETX\EOT\DC2\EOT\132\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\ETX\ENQ\DC2\EOT\132\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTk\STX\ETX\SOH\DC2\EOT\132\CAN\DC2\US\n\ + \\r\n\ + \\ENQ\EOTk\STX\ETX\ETX\DC2\EOT\132\CAN\"#\n\ + \&\n\ + \\EOT\EOTk\STX\EOT\DC2\EOT\135\CAN\EOT\"\SUB\CAN [immutable] User name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\EOT\EOT\DC2\EOT\135\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\EOT\ENQ\DC2\EOT\135\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTk\STX\EOT\SOH\DC2\EOT\135\CAN\DC4\GS\n\ + \\r\n\ + \\ENQ\EOTk\STX\EOT\ETX\DC2\EOT\135\CAN !\n\ + \)\n\ + \\EOT\EOTk\STX\ENQ\DC2\EOT\138\CAN\EOT%\SUB\ESC [immutable] Account name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\ENQ\EOT\DC2\EOT\138\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\ENQ\ENQ\DC2\EOT\138\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTk\STX\ENQ\SOH\DC2\EOT\138\CAN\DC4 \n\ + \\r\n\ + \\ENQ\EOTk\STX\ENQ\ETX\DC2\EOT\138\CAN#$\n\ + \5\n\ + \\EOT\EOTk\STX\ACK\DC2\EOT\141\CAN\EOT1\SUB' [immutable] Brokerage account number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\ACK\EOT\DC2\EOT\141\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\ACK\ENQ\DC2\EOT\141\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTk\STX\ACK\SOH\DC2\EOT\141\CAN\DC4,\n\ + \\r\n\ + \\ENQ\EOTk\STX\ACK\ETX\DC2\EOT\141\CAN/0\n\ + \5\n\ + \\EOT\EOTk\STX\a\DC2\EOT\144\CAN\EOT'\SUB' [immutable] Account's brokerage name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\a\EOT\DC2\EOT\144\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\a\ENQ\DC2\EOT\144\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTk\STX\a\SOH\DC2\EOT\144\CAN\DC4\"\n\ + \\r\n\ + \\ENQ\EOTk\STX\a\ETX\DC2\EOT\144\CAN%&\n\ + \P\n\ + \\EOT\EOTk\STX\b\DC2\EOT\147\CAN\EOT.\SUBB Enables trader to place orders into external FCM account number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\b\EOT\DC2\EOT\147\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\b\ENQ\DC2\EOT\147\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTk\STX\b\SOH\DC2\EOT\147\CAN\DC2)\n\ + \\r\n\ + \\ENQ\EOTk\STX\b\ETX\DC2\EOT\147\CAN,-\n\ + \H\n\ + \\EOT\EOTk\STX\t\DC2\EOT\150\CAN\EOT.\SUB: [immutable] Authorization via brokerage or sales series.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\t\EOT\DC2\EOT\150\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\t\ENQ\DC2\EOT\150\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTk\STX\t\SOH\DC2\EOT\150\CAN\DC2(\n\ + \\r\n\ + \\ENQ\EOTk\STX\t\ETX\DC2\EOT\150\CAN+-\n\ + \\150\STX\n\ + \\EOT\EOTk\STX\n\ + \\DC2\EOT\155\CAN\EOT2\SUB\135\STX Execution Source Code that is used for orders placed by user_id on account_id.\n\ + \ This is not an actual code but ID that can be obtained from lookup (value field).\n\ + \ LookupPropertyListRequest { property_type = TradeRoutingLookupPropertyType.EXECUTION_SOURCE_CODE }\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\n\ + \\EOT\DC2\EOT\155\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\n\ + \\ENQ\DC2\EOT\155\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTk\STX\n\ + \\SOH\DC2\EOT\155\CAN\DC4,\n\ + \\r\n\ + \\ENQ\EOTk\STX\n\ + \\ETX\DC2\EOT\155\CAN/1\n\ + \;\n\ + \\EOT\EOTk\STX\v\DC2\EOT\158\CAN\EOT.\SUB- [immutable] Account's brokerage identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\v\EOT\DC2\EOT\158\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\v\ENQ\DC2\EOT\158\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTk\STX\v\SOH\DC2\EOT\158\CAN\DC4(\n\ + \\r\n\ + \\ENQ\EOTk\STX\v\ETX\DC2\EOT\158\CAN+-\n\ + \>\n\ + \\EOT\EOTk\STX\f\DC2\EOT\161\CAN\EOT1\SUB0 [immutable] Account's sales series identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\f\EOT\DC2\EOT\161\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\f\ENQ\DC2\EOT\161\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTk\STX\f\SOH\DC2\EOT\161\CAN\DC4+\n\ + \\r\n\ + \\ENQ\EOTk\STX\f\ETX\DC2\EOT\161\CAN.0\n\ + \\135\SOH\n\ + \\EOT\EOTk\STX\r\DC2\EOT\165\CAN\EOT$\SUBy Indicates whether orders on Brokerage/Sales series accounts\n\ + \ should be flagged as Direct Electronic Access under MiFID.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\r\EOT\DC2\EOT\165\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\r\ENQ\DC2\EOT\165\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTk\STX\r\SOH\DC2\EOT\165\CAN\DC2\RS\n\ + \\r\n\ + \\ENQ\EOTk\STX\r\ETX\DC2\EOT\165\CAN!#\n\ + \k\n\ + \\EOT\EOTk\STX\SO\DC2\EOT\168\CAN\EOT?\SUB] Forces CQG MiFID algorithms to be treated as client algorithms rather than firm algorithms.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\SO\EOT\DC2\EOT\168\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\SO\ENQ\DC2\EOT\168\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTk\STX\SO\SOH\DC2\EOT\168\CAN\DC29\n\ + \\r\n\ + \\ENQ\EOTk\STX\SO\ETX\DC2\EOT\168\CAN<>\n\ + \\173\SOH\n\ + \\EOT\EOTk\STX\SI\DC2\EOT\173\CAN\EOT(\SUB\158\SOH Indicates whether trade-routing login is primary on account.\n\ + \ If account already has primary login then it will be\n\ + \ cleared from account and new one is set.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTk\STX\SI\EOT\DC2\EOT\173\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTk\STX\SI\ENQ\DC2\EOT\173\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTk\STX\SI\SOH\DC2\EOT\173\CAN\DC2\"\n\ + \\r\n\ + \\ENQ\EOTk\STX\SI\ETX\DC2\EOT\173\CAN%'\n\ + \!\n\ + \\STX\EOTl\DC2\ACK\177\CAN\NUL\136\EM\SOH\SUB\DC3 Account settings.\n\ + \\n\ + \\v\n\ + \\ETX\EOTl\SOH\DC2\EOT\177\CAN\b\ETB\n\ + \C\n\ + \\EOT\EOTl\STX\NUL\DC2\EOT\180\CAN\EOT(\SUB5 List of field ids to clear during update operation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\NUL\EOT\DC2\EOT\180\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\NUL\ENQ\DC2\EOT\180\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTl\STX\NUL\SOH\DC2\EOT\180\CAN\DC4\"\n\ + \\r\n\ + \\ENQ\EOTl\STX\NUL\ETX\DC2\EOT\180\CAN%'\n\ + \C\n\ + \\EOT\EOTl\STX\SOH\DC2\EOT\183\CAN\EOT#\SUB5 [required-update] Trade routing account identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\SOH\EOT\DC2\EOT\183\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\SOH\ENQ\DC2\EOT\183\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTl\STX\SOH\SOH\DC2\EOT\183\CAN\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTl\STX\SOH\ETX\DC2\EOT\183\CAN!\"\n\ + \e\n\ + \\EOT\EOTl\STX\STX\DC2\EOT\186\CAN\EOT<\SUBW [obsolete] Block account indicator. The field is obsolete and always has False value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\STX\EOT\DC2\EOT\186\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\STX\ENQ\DC2\EOT\186\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTl\STX\STX\SOH\DC2\EOT\186\CAN\DC2#\n\ + \\r\n\ + \\ENQ\EOTl\STX\STX\ETX\DC2\EOT\186\CAN&'\n\ + \\r\n\ + \\ENQ\EOTl\STX\STX\b\DC2\EOT\186\CAN(;\n\ + \\SO\n\ + \\ACK\EOTl\STX\STX\b\ETX\DC2\EOT\186\CAN):\n\ + \A\n\ + \\EOT\EOTl\STX\ETX\DC2\EOT\189\CAN\EOT@\SUB3 [obsolete] Block size if this is a block account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\ETX\EOT\DC2\EOT\189\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\ETX\ENQ\DC2\EOT\189\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTl\STX\ETX\SOH\DC2\EOT\189\CAN\DC4'\n\ + \\r\n\ + \\ENQ\EOTl\STX\ETX\ETX\DC2\EOT\189\CAN*+\n\ + \\r\n\ + \\ENQ\EOTl\STX\ETX\b\DC2\EOT\189\CAN,?\n\ + \\SO\n\ + \\ACK\EOTl\STX\ETX\b\ETX\DC2\EOT\189\CAN->\n\ + \*\n\ + \\EOT\EOTl\STX\EOT\DC2\EOT\192\CAN\EOT \SUB\FS Give up account indicator.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\EOT\EOT\DC2\EOT\192\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\EOT\ENQ\DC2\EOT\192\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTl\STX\EOT\SOH\DC2\EOT\192\CAN\DC2\ESC\n\ + \\r\n\ + \\ENQ\EOTl\STX\EOT\ETX\DC2\EOT\192\CAN\RS\US\n\ + \w\n\ + \\EOT\EOTl\STX\ENQ\DC2\EOT\196\CAN\EOTK\SUBi [obsolete] Use giveup_brokerage_id field instead.\n\ + \ Give up brokerage name if this is a give up account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\ENQ\EOT\DC2\EOT\196\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\ENQ\ENQ\DC2\EOT\196\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTl\STX\ENQ\SOH\DC2\EOT\196\CAN\DC42\n\ + \\r\n\ + \\ENQ\EOTl\STX\ENQ\ETX\DC2\EOT\196\CAN56\n\ + \\r\n\ + \\ENQ\EOTl\STX\ENQ\b\DC2\EOT\196\CAN7J\n\ + \\SO\n\ + \\ACK\EOTl\STX\ENQ\b\ETX\DC2\EOT\196\CAN8I\n\ + \U\n\ + \\EOT\EOTl\EOT\NUL\DC2\ACK\199\CAN\EOT\209\CAN\ENQ\SUBE Account statement processing option enumeration (account clearing).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\EOT\NUL\SOH\DC2\EOT\199\CAN\t\CAN\n\ + \I\n\ + \\ACK\EOTl\EOT\NUL\STX\NUL\DC2\EOT\202\CAN\b\NAK\SUB9 Generate complete daily statement (simulated clearing).\n\ + \\n\ + \\SI\n\ + \\a\EOTl\EOT\NUL\STX\NUL\SOH\DC2\EOT\202\CAN\b\DLE\n\ + \\SI\n\ + \\a\EOTl\EOT\NUL\STX\NUL\STX\DC2\EOT\202\CAN\DC3\DC4\n\ + \B\n\ + \\ACK\EOTl\EOT\NUL\STX\SOH\DC2\EOT\205\CAN\b\SYN\SUB2 Process statements as received from a brokerage.\n\ + \\n\ + \\SI\n\ + \\a\EOTl\EOT\NUL\STX\SOH\SOH\DC2\EOT\205\CAN\b\DC1\n\ + \\SI\n\ + \\a\EOTl\EOT\NUL\STX\SOH\STX\DC2\EOT\205\CAN\DC4\NAK\n\ + \@\n\ + \\ACK\EOTl\EOT\NUL\STX\STX\DC2\EOT\208\CAN\b\DC2\SUB0 Reset to zero positions at the end of the day.\n\ + \\n\ + \\SI\n\ + \\a\EOTl\EOT\NUL\STX\STX\SOH\DC2\EOT\208\CAN\b\r\n\ + \\SI\n\ + \\a\EOTl\EOT\NUL\STX\STX\STX\DC2\EOT\208\CAN\DLE\DC1\n\ + \C\n\ + \\EOT\EOTl\STX\ACK\DC2\EOT\212\CAN\EOT)\SUB5 This field is associated with StatementOption enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\ACK\EOT\DC2\EOT\212\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\ACK\ENQ\DC2\EOT\212\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTl\STX\ACK\SOH\DC2\EOT\212\CAN\DC4$\n\ + \\r\n\ + \\ENQ\EOTl\STX\ACK\ETX\DC2\EOT\212\CAN'(\n\ + \\128\SOH\n\ + \\EOT\EOTl\STX\a\DC2\EOT\215\CAN\EOT#\SUBr If statement processing option is RESET this field indicates if balances are reset to zero along with positions.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\a\EOT\DC2\EOT\215\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\a\ENQ\DC2\EOT\215\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTl\STX\a\SOH\DC2\EOT\215\CAN\DC2\RS\n\ + \\r\n\ + \\ENQ\EOTl\STX\a\ETX\DC2\EOT\215\CAN!\"\n\ + \~\n\ + \\EOT\EOTl\STX\b\DC2\EOT\218\CAN\EOT%\SUBp [erasable] Reconciliation indicator. Account follows brokerage reconciliation setting if the filed is omitted.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\b\EOT\DC2\EOT\218\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\b\ENQ\DC2\EOT\218\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTl\STX\b\SOH\DC2\EOT\218\CAN\DC2 \n\ + \\r\n\ + \\ENQ\EOTl\STX\b\ETX\DC2\EOT\218\CAN#$\n\ + \B\n\ + \\EOT\EOTl\STX\t\DC2\EOT\221\CAN\EOT,\SUB4 Give up brokerage id if this is a give up account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\t\EOT\DC2\EOT\221\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\t\ENQ\DC2\EOT\221\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTl\STX\t\SOH\DC2\EOT\221\CAN\DC4'\n\ + \\r\n\ + \\ENQ\EOTl\STX\t\ETX\DC2\EOT\221\CAN*+\n\ + \i\n\ + \\EOT\EOTl\STX\n\ + \\DC2\EOT\225\CAN\EOT+\SUB[ [erasable] Start of account trading time in ISO 8601 format.\n\ + \ Only time must be provided.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\n\ + \\EOT\DC2\EOT\225\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\n\ + \\ENQ\DC2\EOT\225\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTl\STX\n\ + \\SOH\DC2\EOT\225\CAN\DC4%\n\ + \\r\n\ + \\ENQ\EOTl\STX\n\ + \\ETX\DC2\EOT\225\CAN(*\n\ + \\168\SOH\n\ + \\EOT\EOTl\STX\v\DC2\EOT\230\CAN\EOT)\SUB\153\SOH [erasable] End of account trading time in ISO 8601 format.\n\ + \ Only time must be provided.\n\ + \ Must be provided with the same time zone if start time is set.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\v\EOT\DC2\EOT\230\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\v\ENQ\DC2\EOT\230\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTl\STX\v\SOH\DC2\EOT\230\CAN\DC4#\n\ + \\r\n\ + \\ENQ\EOTl\STX\v\ETX\DC2\EOT\230\CAN&(\n\ + \s\n\ + \\EOT\EOTl\STX\f\DC2\EOT\234\CAN\EOT+\SUBe [erasable] Trading time zone.\n\ + \ The value are associated with a lookup property with TIME_ZONE type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\f\EOT\DC2\EOT\234\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\f\ENQ\DC2\EOT\234\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTl\STX\f\SOH\DC2\EOT\234\CAN\DC4%\n\ + \\r\n\ + \\ENQ\EOTl\STX\f\ETX\DC2\EOT\234\CAN(*\n\ + \W\n\ + \\EOT\EOTl\STX\r\DC2\EOT\237\CAN\EOT?\SUBI Allow to liquidate orders outside trading time, if trading time is set.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\r\EOT\DC2\EOT\237\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\r\ENQ\DC2\EOT\237\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTl\STX\r\SOH\DC2\EOT\237\CAN\DC29\n\ + \\r\n\ + \\ENQ\EOTl\STX\r\ETX\DC2\EOT\237\CAN<>\n\ + \+\n\ + \\EOT\EOTl\STX\SO\DC2\EOT\240\CAN\EOT#\SUB\GS Instruct account indicator.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\SO\EOT\DC2\EOT\240\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\SO\ENQ\DC2\EOT\240\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTl\STX\SO\SOH\DC2\EOT\240\CAN\DC2\GS\n\ + \\r\n\ + \\ENQ\EOTl\STX\SO\ETX\DC2\EOT\240\CAN \"\n\ + \?\n\ + \\EOT\EOTl\STX\SI\DC2\EOT\243\CAN\EOT5\SUB1 Allow externally provided execution of account.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\SI\EOT\DC2\EOT\243\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\SI\ENQ\DC2\EOT\243\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTl\STX\SI\SOH\DC2\EOT\243\CAN\DC2/\n\ + \\r\n\ + \\ENQ\EOTl\STX\SI\ETX\DC2\EOT\243\CAN24\n\ + \\242\SOH\n\ + \\EOT\EOTl\STX\DLE\DC2\EOT\248\CAN\EOT.\SUB\227\SOH [erasable] Associated MODES account groups.\n\ + \ The values are associated with a lookup property with MODES_ACCOUNT_GROUP type.\n\ + \ Empty string will not be processed, use cleared_fields during update operation to clear this field.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\DLE\EOT\DC2\EOT\248\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\DLE\ENQ\DC2\EOT\248\CAN\r\DC3\n\ + \\r\n\ + \\ENQ\EOTl\STX\DLE\SOH\DC2\EOT\248\CAN\DC4(\n\ + \\r\n\ + \\ENQ\EOTl\STX\DLE\ETX\DC2\EOT\248\CAN+-\n\ + \Z\n\ + \\EOT\EOTl\STX\DC1\DC2\EOT\251\CAN\EOT9\SUBL Determines whether Pre-trade middle market price for an order is required.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC1\EOT\DC2\EOT\251\CAN\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC1\ENQ\DC2\EOT\251\CAN\r\DC1\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC1\SOH\DC2\EOT\251\CAN\DC23\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC1\ETX\DC2\EOT\251\CAN68\n\ + \T\n\ + \\EOT\EOTl\STX\DC2\DC2\EOT\128\EM\EOT+\SUB! Allows using of extended sides.\n\ + \2# 18 is occupied by cleared_fields.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC2\EOT\DC2\EOT\128\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC2\ENQ\DC2\EOT\128\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC2\SOH\DC2\EOT\128\EM\DC2%\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC2\ETX\DC2\EOT\128\EM(*\n\ + \_\n\ + \\EOT\EOTl\STX\DC3\DC2\EOT\131\EM\EOT%\SUBQ Indicates whether GoFlat request for the account is allowed (false by default).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC3\EOT\DC2\EOT\131\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC3\ENQ\DC2\EOT\131\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC3\SOH\DC2\EOT\131\EM\DC2\US\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC3\ETX\DC2\EOT\131\EM\"$\n\ + \\243\SOH\n\ + \\EOT\EOTl\STX\DC4\DC2\EOT\135\EM\EOT:\SUB\228\SOH [erasable] This field is associated with OrderChain.SpeculationType enum.\n\ + \ Value should be used for orders initiated from a GoFlat request that does not include speculation type on contracts where speculation type is required.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC4\EOT\DC2\EOT\135\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC4\ENQ\DC2\EOT\135\EM\r\DC3\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC4\SOH\DC2\EOT\135\EM\DC44\n\ + \\r\n\ + \\ENQ\EOTl\STX\DC4\ETX\DC2\EOT\135\EM79\n\ + \\f\n\ + \\STX\EOTm\DC2\ACK\138\EM\NUL\132\SUB\SOH\n\ + \\v\n\ + \\ETX\EOTm\SOH\DC2\EOT\138\EM\b\SYN\n\ + \u\n\ + \\EOT\EOTm\STX\NUL\DC2\EOT\142\EM\EOT@\SUBg Trade routing account identifier.\n\ + \ [obsolete] Use specific entity identifier on update message level.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\NUL\EOT\DC2\EOT\142\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\NUL\ENQ\DC2\EOT\142\EM\r\DC3\n\ + \\r\n\ + \\ENQ\EOTm\STX\NUL\SOH\DC2\EOT\142\EM\DC4'\n\ + \\r\n\ + \\ENQ\EOTm\STX\NUL\ETX\DC2\EOT\142\EM*+\n\ + \\r\n\ + \\ENQ\EOTm\STX\NUL\b\DC2\EOT\142\EM,?\n\ + \\SO\n\ + \\ACK\EOTm\STX\NUL\b\ETX\DC2\EOT\142\EM->\n\ + \2\n\ + \\EOT\EOTm\STX\SOH\DC2\EOT\145\EM\EOT'\SUB$ Allow positions to be closed only.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\SOH\EOT\DC2\EOT\145\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\SOH\ENQ\DC2\EOT\145\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\SOH\SOH\DC2\EOT\145\EM\DC2\"\n\ + \\r\n\ + \\ENQ\EOTm\STX\SOH\ETX\DC2\EOT\145\EM%&\n\ + \&\n\ + \\EOT\EOTm\STX\STX\DC2\EOT\148\EM\EOT$\SUB\CAN Allow futures trading.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\STX\EOT\DC2\EOT\148\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\STX\ENQ\DC2\EOT\148\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\STX\SOH\DC2\EOT\148\EM\DC2\US\n\ + \\r\n\ + \\ENQ\EOTm\STX\STX\ETX\DC2\EOT\148\EM\"#\n\ + \\SO\n\ + \\EOT\EOTm\EOT\NUL\DC2\ACK\150\EM\EOT\160\EM\ENQ\n\ + \\r\n\ + \\ENQ\EOTm\EOT\NUL\SOH\DC2\EOT\150\EM\t\ETB\n\ + \-\n\ + \\ACK\EOTm\EOT\NUL\STX\NUL\DC2\EOT\153\EM\b\SI\SUB\GS Cannot buy or sell options.\n\ + \\n\ + \\SI\n\ + \\a\EOTm\EOT\NUL\STX\NUL\SOH\DC2\EOT\153\EM\b\n\ + \\n\ + \\SI\n\ + \\a\EOTm\EOT\NUL\STX\NUL\STX\DC2\EOT\153\EM\r\SO\n\ + \A\n\ + \\ACK\EOTm\EOT\NUL\STX\SOH\DC2\EOT\156\EM\b\DLE\SUB1 Buy options or liquidate long option positions.\n\ + \\n\ + \\SI\n\ + \\a\EOTm\EOT\NUL\STX\SOH\SOH\DC2\EOT\156\EM\b\v\n\ + \\SI\n\ + \\a\EOTm\EOT\NUL\STX\SOH\STX\DC2\EOT\156\EM\SO\SI\n\ + \&\n\ + \\ACK\EOTm\EOT\NUL\STX\STX\DC2\EOT\159\EM\b\DLE\SUB\SYN Buy or Sell options.\n\ + \\n\ + \\SI\n\ + \\a\EOTm\EOT\NUL\STX\STX\SOH\DC2\EOT\159\EM\b\v\n\ + \\SI\n\ + \\a\EOTm\EOT\NUL\STX\STX\STX\DC2\EOT\159\EM\SO\SI\n\ + \Y\n\ + \\EOT\EOTm\STX\ETX\DC2\EOT\164\EM\EOT&\SUBK Allow options trading.\n\ + \ The value is associated with OptionsTrading enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\ETX\EOT\DC2\EOT\164\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\ETX\ENQ\DC2\EOT\164\EM\r\DC3\n\ + \\r\n\ + \\ENQ\EOTm\STX\ETX\SOH\DC2\EOT\164\EM\DC4!\n\ + \\r\n\ + \\ENQ\EOTm\STX\ETX\ETX\DC2\EOT\164\EM$%\n\ + \5\n\ + \\EOT\EOTm\STX\EOT\DC2\EOT\167\EM\EOT/\SUB' True if trade size limit is enforced.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\EOT\EOT\DC2\EOT\167\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\EOT\ENQ\DC2\EOT\167\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\EOT\SOH\DC2\EOT\167\EM\DC2*\n\ + \\r\n\ + \\ENQ\EOTm\STX\EOT\ETX\DC2\EOT\167\EM-.\n\ + \>\n\ + \\EOT\EOTm\STX\ENQ\DC2\EOT\170\EM\EOTF\SUB0 [obsolete] Use trade_size_limit field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\ENQ\EOT\DC2\EOT\170\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\ENQ\ENQ\DC2\EOT\170\EM\r\DC3\n\ + \\r\n\ + \\ENQ\EOTm\STX\ENQ\SOH\DC2\EOT\170\EM\DC4-\n\ + \\r\n\ + \\ENQ\EOTm\STX\ENQ\ETX\DC2\EOT\170\EM01\n\ + \\r\n\ + \\ENQ\EOTm\STX\ENQ\b\DC2\EOT\170\EM2E\n\ + \\SO\n\ + \\ACK\EOTm\STX\ENQ\b\ETX\DC2\EOT\170\EM3D\n\ + \7\n\ + \\EOT\EOTm\STX\ACK\DC2\EOT\173\EM\EOT1\SUB) True if trade margin limit is enforced.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\ACK\EOT\DC2\EOT\173\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\ACK\ENQ\DC2\EOT\173\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\ACK\SOH\DC2\EOT\173\EM\DC2,\n\ + \\r\n\ + \\ENQ\EOTm\STX\ACK\ETX\DC2\EOT\173\EM/0\n\ + \e\n\ + \\EOT\EOTm\STX\a\DC2\EOT\176\EM\EOT+\SUBW Optional trade margin limit which is maximum margin requirement for any single trade.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\a\EOT\DC2\EOT\176\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\a\ENQ\DC2\EOT\176\EM\r\DC3\n\ + \\r\n\ + \\ENQ\EOTm\STX\a\SOH\DC2\EOT\176\EM\DC4&\n\ + \\r\n\ + \\ENQ\EOTm\STX\a\ETX\DC2\EOT\176\EM)*\n\ + \?\n\ + \\EOT\EOTm\STX\b\DC2\EOT\179\EM\EOT6\SUB1 True if trade price limit in ticks is enforced.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\b\EOT\DC2\EOT\179\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\b\ENQ\DC2\EOT\179\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\b\SOH\DC2\EOT\179\EM\DC21\n\ + \\r\n\ + \\ENQ\EOTm\STX\b\ETX\DC2\EOT\179\EM45\n\ + \I\n\ + \\EOT\EOTm\STX\t\DC2\EOT\182\EM\EOT:\SUB; Optional trade price limit in ticks for any single trade.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\t\EOT\DC2\EOT\182\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\t\ACK\DC2\EOT\182\EM\r\FS\n\ + \\r\n\ + \\ENQ\EOTm\STX\t\SOH\DC2\EOT\182\EM\GS4\n\ + \\r\n\ + \\ENQ\EOTm\STX\t\ETX\DC2\EOT\182\EM79\n\ + \=\n\ + \\EOT\EOTm\STX\n\ + \\DC2\EOT\185\EM\EOT8\SUB/ True if commodity position limit is enforced.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\n\ + \\EOT\DC2\EOT\185\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\n\ + \\ENQ\DC2\EOT\185\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\n\ + \\SOH\DC2\EOT\185\EM\DC22\n\ + \\r\n\ + \\ENQ\EOTm\STX\n\ + \\ETX\DC2\EOT\185\EM57\n\ + \F\n\ + \\EOT\EOTm\STX\v\DC2\EOT\188\EM\EOTS\SUB8 [obsolete] Use commodity_position_limit field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\v\EOT\DC2\EOT\188\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\v\ACK\DC2\EOT\188\EM\r\ETB\n\ + \\r\n\ + \\ENQ\EOTm\STX\v\SOH\DC2\EOT\188\EM\CAN9\n\ + \\r\n\ + \\ENQ\EOTm\STX\v\ETX\DC2\EOT\188\EM<>\n\ + \\r\n\ + \\ENQ\EOTm\STX\v\b\DC2\EOT\188\EM?R\n\ + \\SO\n\ + \\ACK\EOTm\STX\v\b\ETX\DC2\EOT\188\EM@Q\n\ + \<\n\ + \\EOT\EOTm\STX\f\DC2\EOT\191\EM\EOT7\SUB. True if contract position limit is enforced.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\f\EOT\DC2\EOT\191\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\f\ENQ\DC2\EOT\191\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\f\SOH\DC2\EOT\191\EM\DC21\n\ + \\r\n\ + \\ENQ\EOTm\STX\f\ETX\DC2\EOT\191\EM46\n\ + \E\n\ + \\EOT\EOTm\STX\r\DC2\EOT\194\EM\EOTR\SUB7 [obsolete] Use contract_position_limit field instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\r\EOT\DC2\EOT\194\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\r\ACK\DC2\EOT\194\EM\r\ETB\n\ + \\r\n\ + \\ENQ\EOTm\STX\r\SOH\DC2\EOT\194\EM\CAN8\n\ + \\r\n\ + \\ENQ\EOTm\STX\r\ETX\DC2\EOT\194\EM;=\n\ + \\r\n\ + \\ENQ\EOTm\STX\r\b\DC2\EOT\194\EM>Q\n\ + \\SO\n\ + \\ACK\EOTm\STX\r\b\ETX\DC2\EOT\194\EM?P\n\ + \\176\SOH\n\ + \\EOT\EOTm\STX\SO\DC2\EOT\198\EM\EOT;\SUB\161\SOH True if margin sybsystem parameters are enforced.\n\ + \ When enforced, any trade that could cause margin requirements to exceed account's available funds is denied.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\SO\EOT\DC2\EOT\198\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\SO\ENQ\DC2\EOT\198\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\SO\SOH\DC2\EOT\198\EM\DC25\n\ + \\r\n\ + \\ENQ\EOTm\STX\SO\ETX\DC2\EOT\198\EM8:\n\ + \,\n\ + \\EOT\EOTm\STX\SI\DC2\EOT\201\EM\EOTH\SUB\RS Purchasing power parameters.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\SI\EOT\DC2\EOT\201\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\SI\ACK\DC2\EOT\201\EM\r&\n\ + \\r\n\ + \\ENQ\EOTm\STX\SI\SOH\DC2\EOT\201\EM'B\n\ + \\r\n\ + \\ENQ\EOTm\STX\SI\ETX\DC2\EOT\201\EMEG\n\ + \5\n\ + \\EOT\EOTm\STX\DLE\DC2\EOT\204\EM\EOT0\SUB' True if daily loss limit is enforced.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\DLE\EOT\DC2\EOT\204\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\DLE\ENQ\DC2\EOT\204\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\DLE\SOH\DC2\EOT\204\EM\DC2*\n\ + \\r\n\ + \\ENQ\EOTm\STX\DLE\ETX\DC2\EOT\204\EM-/\n\ + \\226\SOH\n\ + \\EOT\EOTm\STX\DC1\DC2\EOT\209\EM\EOT-\SUB\211\SOH Optional daily loss limit. Limits losses during a single day.\n\ + \ Account ending balance + collateral are considered as 'funds' for the limit.\n\ + \ Losses during a single day are considered as 'losses' for the limit.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC1\EOT\DC2\EOT\209\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC1\ACK\DC2\EOT\209\EM\r\SYN\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC1\SOH\DC2\EOT\209\EM\ETB'\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC1\ETX\DC2\EOT\209\EM*,\n\ + \;\n\ + \\EOT\EOTm\STX\DC2\DC2\EOT\212\EM\EOT6\SUB- True if delta daily loss limit is enforced.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC2\EOT\DC2\EOT\212\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC2\ENQ\DC2\EOT\212\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC2\SOH\DC2\EOT\212\EM\DC20\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC2\ETX\DC2\EOT\212\EM35\n\ + \\225\SOH\n\ + \\EOT\EOTm\STX\DC3\DC2\EOT\217\EM\EOT3\SUB\210\SOH Optional delta daily loss limit. Limits losses since yesterday.\n\ + \ Yesterday's purchasing power is considered as 'funds' for the limit.\n\ + \ Losses incurred since yesterday are considered as 'losses' for the limit.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC3\EOT\DC2\EOT\217\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC3\ACK\DC2\EOT\217\EM\r\SYN\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC3\SOH\DC2\EOT\217\EM\ETB-\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC3\ETX\DC2\EOT\217\EM02\n\ + \o\n\ + \\EOT\EOTm\STX\DC4\DC2\EOT\220\EM\EOT,\SUBa Maximum number of order requests (new orders, modifications, cancellations) allowed per second.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC4\EOT\DC2\EOT\220\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC4\ENQ\DC2\EOT\220\EM\r\DC3\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC4\SOH\DC2\EOT\220\EM\DC4&\n\ + \\r\n\ + \\ENQ\EOTm\STX\DC4\ETX\DC2\EOT\220\EM)+\n\ + \v\n\ + \\EOT\EOTm\STX\NAK\DC2\EOT\223\EM\EOT2\SUBh Reject BUY MKT orders if ask price is not available and SELL MKT orders if bid price is not available.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\NAK\EOT\DC2\EOT\223\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\NAK\ENQ\DC2\EOT\223\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\NAK\SOH\DC2\EOT\223\EM\DC2,\n\ + \\r\n\ + \\ENQ\EOTm\STX\NAK\ETX\DC2\EOT\223\EM/1\n\ + \A\n\ + \\EOT\EOTm\STX\SYN\DC2\EOT\226\EM\EOT9\SUB3 True if trade price limit in percent is enforced.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\SYN\EOT\DC2\EOT\226\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\SYN\ENQ\DC2\EOT\226\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\SYN\SOH\DC2\EOT\226\EM\DC23\n\ + \\r\n\ + \\ENQ\EOTm\STX\SYN\ETX\DC2\EOT\226\EM68\n\ + \K\n\ + \\EOT\EOTm\STX\ETB\DC2\EOT\229\EM\EOTC\SUB= Optional trade price limit in percent for any single trade.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\ETB\EOT\DC2\EOT\229\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\ETB\ACK\DC2\EOT\229\EM\r#\n\ + \\r\n\ + \\ENQ\EOTm\STX\ETB\SOH\DC2\EOT\229\EM$=\n\ + \\r\n\ + \\ENQ\EOTm\STX\ETB\ETX\DC2\EOT\229\EM@B\n\ + \?\n\ + \\EOT\EOTm\STX\CAN\DC2\EOT\232\EM\EOT/\SUB1 Optional trade size limit for any single trade.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\CAN\EOT\DC2\EOT\232\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\CAN\ACK\DC2\EOT\232\EM\r\CAN\n\ + \\r\n\ + \\ENQ\EOTm\STX\CAN\SOH\DC2\EOT\232\EM\EM)\n\ + \\r\n\ + \\ENQ\EOTm\STX\CAN\ETX\DC2\EOT\232\EM,.\n\ + \2\n\ + \\EOT\EOTm\STX\EM\DC2\EOT\235\EM\EOT=\SUB$ Optional commodity position limit.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\EM\EOT\DC2\EOT\235\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\EM\ACK\DC2\EOT\235\EM\r\RS\n\ + \\r\n\ + \\ENQ\EOTm\STX\EM\SOH\DC2\EOT\235\EM\US7\n\ + \\r\n\ + \\ENQ\EOTm\STX\EM\ETX\DC2\EOT\235\EM:<\n\ + \1\n\ + \\EOT\EOTm\STX\SUB\DC2\EOT\238\EM\EOT<\SUB# Optional contract position limit.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\SUB\EOT\DC2\EOT\238\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\SUB\ACK\DC2\EOT\238\EM\r\RS\n\ + \\r\n\ + \\ENQ\EOTm\STX\SUB\SOH\DC2\EOT\238\EM\US6\n\ + \\r\n\ + \\ENQ\EOTm\STX\SUB\ETX\DC2\EOT\238\EM9;\n\ + \k\n\ + \\EOT\EOTm\STX\ESC\DC2\EOT\241\EM\EOT5\SUB] Order placement date plus this number of days must be more than contract last trading date.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\ESC\EOT\DC2\EOT\241\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\ESC\ACK\DC2\EOT\241\EM\r\ETB\n\ + \\r\n\ + \\ENQ\EOTm\STX\ESC\SOH\DC2\EOT\241\EM\CAN/\n\ + \\r\n\ + \\ENQ\EOTm\STX\ESC\ETX\DC2\EOT\241\EM24\n\ + \|\n\ + \\EOT\EOTm\STX\FS\DC2\EOT\245\EM\EOT@\SUBn Trade size limit with unlimited/inherited mode.\n\ + \ Unlimited/inherited modes aren't supported for account now.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\FS\EOT\DC2\EOT\245\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\FS\ACK\DC2\EOT\245\EM\r\RS\n\ + \\r\n\ + \\ENQ\EOTm\STX\FS\SOH\DC2\EOT\245\EM\US:\n\ + \\r\n\ + \\ENQ\EOTm\STX\FS\ETX\DC2\EOT\245\EM=?\n\ + \D\n\ + \\EOT\EOTm\STX\GS\DC2\EOT\248\EM\EOT?\SUB6 True if total gross open position limit is enforced.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\GS\EOT\DC2\EOT\248\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\GS\ENQ\DC2\EOT\248\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\GS\SOH\DC2\EOT\248\EM\DC29\n\ + \\r\n\ + \\ENQ\EOTm\STX\GS\ETX\DC2\EOT\248\EM<>\n\ + \9\n\ + \\EOT\EOTm\STX\RS\DC2\EOT\251\EM\EOTD\SUB+ Optional total gross open position limit.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\RS\EOT\DC2\EOT\251\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\RS\ACK\DC2\EOT\251\EM\r\RS\n\ + \\r\n\ + \\ENQ\EOTm\STX\RS\SOH\DC2\EOT\251\EM\US>\n\ + \\r\n\ + \\ENQ\EOTm\STX\RS\ETX\DC2\EOT\251\EMAC\n\ + \\145\SOH\n\ + \\EOT\EOTm\STX\US\DC2\EOT\255\EM\EOTJ\SUB\130\SOH Long Option Premium check parameter.\n\ + \ True means that check is performed against Purchasing Power, False - against Cash Balance.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX\US\EOT\DC2\EOT\255\EM\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX\US\ENQ\DC2\EOT\255\EM\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX\US\SOH\DC2\EOT\255\EM\DC2D\n\ + \\r\n\ + \\ENQ\EOTm\STX\US\ETX\DC2\EOT\255\EMGI\n\ + \\211\SOH\n\ + \\EOT\EOTm\STX \DC2\EOT\131\SUB\EOT2\SUB\196\SOH True means that real-time currency rates are used for intra-day currency conversions, where available.\n\ + \ Otherwise, Brokerage daily statement currency rates are used for all currency conversions.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTm\STX \EOT\DC2\EOT\131\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTm\STX \ENQ\DC2\EOT\131\SUB\r\DC1\n\ + \\r\n\ + \\ENQ\EOTm\STX \SOH\DC2\EOT\131\SUB\DC2,\n\ + \\r\n\ + \\ENQ\EOTm\STX \ETX\DC2\EOT\131\SUB/1\n\ + \\RS\n\ + \\STX\EOTn\DC2\ACK\135\SUB\NUL\162\SUB\SOH\SUB\DLE Account group.\n\ + \\n\ + \\v\n\ + \\ETX\EOTn\SOH\DC2\EOT\135\SUB\b\DC4\n\ + \6\n\ + \\EOT\EOTn\EOT\NUL\DC2\ACK\138\SUB\EOT\148\SUB\ENQ\SUB& Group accounts relation enumeration.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTn\EOT\NUL\SOH\DC2\EOT\138\SUB\t\NAK\n\ + \q\n\ + \\ACK\EOTn\EOT\NUL\STX\NUL\DC2\EOT\141\SUB\b(\SUBa Margin independently (sub accounts can borrow Purchasing Power from master up to configured %).\n\ + \\n\ + \\SI\n\ + \\a\EOTn\EOT\NUL\STX\NUL\SOH\DC2\EOT\141\SUB\b#\n\ + \\SI\n\ + \\a\EOTn\EOT\NUL\STX\NUL\STX\DC2\EOT\141\SUB&'\n\ + \[\n\ + \\ACK\EOTn\EOT\NUL\STX\SOH\DC2\EOT\144\SUB\b%\SUBK Margin independently, then sum margin requirements and Purchasing Powers.\n\ + \\n\ + \\SI\n\ + \\a\EOTn\EOT\NUL\STX\SOH\SOH\DC2\EOT\144\SUB\b \n\ + \\SI\n\ + \\a\EOTn\EOT\NUL\STX\SOH\STX\DC2\EOT\144\SUB#$\n\ + \y\n\ + \\ACK\EOTn\EOT\NUL\STX\STX\DC2\EOT\147\SUB\b\FS\SUBi Margin master and sub-accounts together (combine funds, orders, and positions for margin calculations).\n\ + \\n\ + \\SI\n\ + \\a\EOTn\EOT\NUL\STX\STX\SOH\DC2\EOT\147\SUB\b\ETB\n\ + \\SI\n\ + \\a\EOTn\EOT\NUL\STX\STX\STX\DC2\EOT\147\SUB\SUB\ESC\n\ + \3\n\ + \\EOT\EOTn\STX\NUL\DC2\EOT\151\SUB\EOT!\SUB% [required-update] Group identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTn\STX\NUL\EOT\DC2\EOT\151\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTn\STX\NUL\ENQ\DC2\EOT\151\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTn\STX\NUL\SOH\DC2\EOT\151\SUB\DC4\FS\n\ + \\r\n\ + \\ENQ\EOTn\STX\NUL\ETX\DC2\EOT\151\SUB\US \n\ + \H\n\ + \\EOT\EOTn\STX\SOH\DC2\EOT\154\SUB\EOT*\SUB: [required-create][immutable-update] Master of the group.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTn\STX\SOH\EOT\DC2\EOT\154\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTn\STX\SOH\ENQ\DC2\EOT\154\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTn\STX\SOH\SOH\DC2\EOT\154\SUB\DC4%\n\ + \\r\n\ + \\ENQ\EOTn\STX\SOH\ETX\DC2\EOT\154\SUB()\n\ + \b\n\ + \\EOT\EOTn\STX\STX\DC2\EOT\158\SUB\EOT&\SUBT [required-create] Relation type.\n\ + \ This field is associated with RelationType enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTn\STX\STX\EOT\DC2\EOT\158\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTn\STX\STX\ENQ\DC2\EOT\158\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTn\STX\STX\SOH\DC2\EOT\158\SUB\DC4!\n\ + \\r\n\ + \\ENQ\EOTn\STX\STX\ETX\DC2\EOT\158\SUB$%\n\ + \<\n\ + \\EOT\EOTn\STX\ETX\DC2\EOT\161\SUB\EOT)\SUB. [immutable-update] Sub account of the group.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTn\STX\ETX\EOT\DC2\EOT\161\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTn\STX\ETX\ACK\DC2\EOT\161\SUB\r\ETB\n\ + \\r\n\ + \\ENQ\EOTn\STX\ETX\SOH\DC2\EOT\161\SUB\CAN$\n\ + \\r\n\ + \\ENQ\EOTn\STX\ETX\ETX\DC2\EOT\161\SUB'(\n\ + \%\n\ + \\STX\EOTo\DC2\ACK\165\SUB\NUL\178\SUB\SOH\SUB\ETB Sub account of group.\n\ + \\n\ + \\v\n\ + \\ETX\EOTo\SOH\DC2\EOT\165\SUB\b\DC2\n\ + \.\n\ + \\EOT\EOTo\STX\NUL\DC2\EOT\168\SUB\EOT#\SUB [required] Account identifier.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTo\STX\NUL\EOT\DC2\EOT\168\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTo\STX\NUL\ENQ\DC2\EOT\168\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTo\STX\NUL\SOH\DC2\EOT\168\SUB\DC4\RS\n\ + \\r\n\ + \\ENQ\EOTo\STX\NUL\ETX\DC2\EOT\168\SUB!\"\n\ + \)\n\ + \\EOT\EOTo\STX\SOH\DC2\EOT\171\SUB\EOT%\SUB\ESC [immutable] Account name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTo\STX\SOH\EOT\DC2\EOT\171\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTo\STX\SOH\ENQ\DC2\EOT\171\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTo\STX\SOH\SOH\DC2\EOT\171\SUB\DC4 \n\ + \\r\n\ + \\ENQ\EOTo\STX\SOH\ETX\DC2\EOT\171\SUB#$\n\ + \5\n\ + \\EOT\EOTo\STX\STX\DC2\EOT\174\SUB\EOT1\SUB' [immutable] Brokerage account number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTo\STX\STX\EOT\DC2\EOT\174\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTo\STX\STX\ENQ\DC2\EOT\174\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTo\STX\STX\SOH\DC2\EOT\174\SUB\DC4,\n\ + \\r\n\ + \\ENQ\EOTo\STX\STX\ETX\DC2\EOT\174\SUB/0\n\ + \C\n\ + \\EOT\EOTo\STX\ETX\DC2\EOT\177\SUB\EOT2\SUB5 [required] Purchasing power. Allowed values (0..1).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTo\STX\ETX\EOT\DC2\EOT\177\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTo\STX\ETX\ENQ\DC2\EOT\177\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTo\STX\ETX\SOH\DC2\EOT\177\SUB\DC4-\n\ + \\r\n\ + \\ENQ\EOTo\STX\ETX\ETX\DC2\EOT\177\SUB01\n\ + \-\n\ + \\STX\EOTp\DC2\ACK\181\SUB\NUL\191\SUB\SOH\SUB\US Trade price limit parameters.\n\ + \\n\ + \\v\n\ + \\ETX\EOTp\SOH\DC2\EOT\181\SUB\b\ETB\n\ + \B\n\ + \\EOT\EOTp\STX\NUL\DC2\EOT\184\SUB\EOT\GS\SUB4 This field is associated with PriceLimitMode enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTp\STX\NUL\EOT\DC2\EOT\184\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTp\STX\NUL\ENQ\DC2\EOT\184\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTp\STX\NUL\SOH\DC2\EOT\184\SUB\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTp\STX\NUL\ETX\DC2\EOT\184\SUB\ESC\FS\n\ + \i\n\ + \\EOT\EOTp\STX\SOH\DC2\EOT\187\SUB\EOT;\SUB[ [obsolete] Number of ticks away from the current market price to enforce the price limit.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTp\STX\SOH\EOT\DC2\EOT\187\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTp\STX\SOH\ENQ\DC2\EOT\187\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTp\STX\SOH\SOH\DC2\EOT\187\SUB\DC4\"\n\ + \\r\n\ + \\ENQ\EOTp\STX\SOH\ETX\DC2\EOT\187\SUB%&\n\ + \\r\n\ + \\ENQ\EOTp\STX\SOH\b\DC2\EOT\187\SUB':\n\ + \\SO\n\ + \\ACK\EOTp\STX\SOH\b\ETX\DC2\EOT\187\SUB(9\n\ + \^\n\ + \\EOT\EOTp\STX\STX\DC2\EOT\190\SUB\EOT\"\SUBP Number of ticks away from the current market price to enforce the price limit.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTp\STX\STX\EOT\DC2\EOT\190\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTp\STX\STX\ACK\DC2\EOT\190\SUB\r\ETB\n\ + \\r\n\ + \\ENQ\EOTp\STX\STX\SOH\DC2\EOT\190\SUB\CAN\GS\n\ + \\r\n\ + \\ENQ\EOTp\STX\STX\ETX\DC2\EOT\190\SUB !\n\ + \-\n\ + \\STX\EOTq\DC2\ACK\194\SUB\NUL\201\SUB\SOH\SUB\US Trade price limit parameters.\n\ + \\n\ + \\v\n\ + \\ETX\EOTq\SOH\DC2\EOT\194\SUB\b\RS\n\ + \B\n\ + \\EOT\EOTq\STX\NUL\DC2\EOT\197\SUB\EOT\GS\SUB4 This field is associated with PriceLimitMode enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTq\STX\NUL\EOT\DC2\EOT\197\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTq\STX\NUL\ENQ\DC2\EOT\197\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTq\STX\NUL\SOH\DC2\EOT\197\SUB\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTq\STX\NUL\ETX\DC2\EOT\197\SUB\ESC\FS\n\ + \Q\n\ + \\EOT\EOTq\STX\SOH\DC2\EOT\200\SUB\EOT(\SUBC Percent from the current market price to enforce the price limit.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTq\STX\SOH\EOT\DC2\EOT\200\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTq\STX\SOH\ACK\DC2\EOT\200\SUB\r\GS\n\ + \\r\n\ + \\ENQ\EOTq\STX\SOH\SOH\DC2\EOT\200\SUB\RS#\n\ + \\r\n\ + \\ENQ\EOTq\STX\SOH\ETX\DC2\EOT\200\SUB&'\n\ + \%\n\ + \\STX\EOTr\DC2\ACK\204\SUB\NUL\219\SUB\SOH\SUB\ETB Limit value in ticks.\n\ + \\n\ + \\v\n\ + \\ETX\EOTr\SOH\DC2\EOT\204\SUB\b\DC2\n\ + \=\n\ + \\EOT\EOTr\STX\NUL\DC2\EOT\207\SUB\EOT\GS\SUB/ This field is associated with LimitMode enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTr\STX\NUL\EOT\DC2\EOT\207\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTr\STX\NUL\ENQ\DC2\EOT\207\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTr\STX\NUL\SOH\DC2\EOT\207\SUB\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTr\STX\NUL\ETX\DC2\EOT\207\SUB\ESC\FS\n\ + \1\n\ + \\EOT\EOTr\STX\SOH\DC2\EOT\210\SUB\EOT\RS\SUB# Limit value when mode is LIMITED.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTr\STX\SOH\EOT\DC2\EOT\210\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTr\STX\SOH\ENQ\DC2\EOT\210\SUB\r\DC3\n\ + \\r\n\ + \\ENQ\EOTr\STX\SOH\SOH\DC2\EOT\210\SUB\DC4\EM\n\ + \\r\n\ + \\ENQ\EOTr\STX\SOH\ETX\DC2\EOT\210\SUB\FS\GS\n\ + \W\n\ + \\EOT\EOTr\STX\STX\DC2\EOT\213\SUB\EOTO\SUBI [obsolete] List of optional contract expiration based limits overrides.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTr\STX\STX\EOT\DC2\EOT\213\SUB\EOT\f\n\ + \\r\n\ + \\ENQ\EOTr\STX\STX\ACK\DC2\EOT\213\SUB\r\FS\n\ + \\r\n\ + \\ENQ\EOTr\STX\STX\SOH\DC2\EOT\213\SUB\GS6\n\ + \\r\n\ + \\ENQ\EOTr\STX\STX\ETX\DC2\EOT\213\SUB9:\n\ + \\r\n\ + \\ENQ\EOTr\STX\STX\b\DC2\EOT\213\SUB;N\n\ + \\SO\n\ + \\ACK\EOTr\STX\STX\b\ETX\DC2\EOT\213\SUB@\n\ + \v\n\ + \\EOT\EOTx\STX\SI\DC2\EOT\241\ESC\EOT?\SUBh Multiplier for calculated instrument group (options) margin requirements. Allowed values (0.001..100).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTx\STX\SI\EOT\DC2\EOT\241\ESC\EOT\f\n\ + \\r\n\ + \\ENQ\EOTx\STX\SI\ENQ\DC2\EOT\241\ESC\r\DC3\n\ + \\r\n\ + \\ENQ\EOTx\STX\SI\SOH\DC2\EOT\241\ESC\DC49\n\ + \\r\n\ + \\ENQ\EOTx\STX\SI\ETX\DC2\EOT\241\ESC<>\n\ + \\165\SOH\n\ + \\EOT\EOTx\STX\DLE\DC2\EOT\245\ESC\EOT5\SUB\150\SOH Multiplier for calculated margin requirements. Allowed values (0.001..100).\n\ + \ In update request you should use LimitMode.DEFAULT to reset this field.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTx\STX\DLE\EOT\DC2\EOT\245\ESC\EOT\f\n\ + \\r\n\ + \\ENQ\EOTx\STX\DLE\ACK\DC2\EOT\245\ESC\r\GS\n\ + \\r\n\ + \\ENQ\EOTx\STX\DLE\SOH\DC2\EOT\245\ESC\RS/\n\ + \\r\n\ + \\ENQ\EOTx\STX\DLE\ETX\DC2\EOT\245\ESC24\n\ + \\206\SOH\n\ + \\EOT\EOTx\STX\DC1\DC2\EOT\250\ESC\EOT0\SUB\191\SOH This parameter allows to ignore margin-based checks for liquidation orders.\n\ + \ Any other risk checks that are enabled for this account\n\ + \ will be conducted as usual even for liquidation orders.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC1\EOT\DC2\EOT\250\ESC\EOT\f\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC1\ENQ\DC2\EOT\250\ESC\r\DC1\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC1\SOH\DC2\EOT\250\ESC\DC2*\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC1\ETX\DC2\EOT\250\ESC-/\n\ + \D\n\ + \\EOT\EOTx\STX\DC2\DC2\EOT\253\ESC\EOT4\SUB6 If true then max_purchasing_power parameter is used.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC2\EOT\DC2\EOT\253\ESC\EOT\f\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC2\ENQ\DC2\EOT\253\ESC\r\DC1\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC2\SOH\DC2\EOT\253\ESC\DC2.\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC2\ETX\DC2\EOT\253\ESC13\n\ + \\184\SOH\n\ + \\EOT\EOTx\STX\DC3\DC2\EOT\129\FS\EOT.\SUB\169\SOH Maximum amount of purchasing power available to satisfy margin requirements.\n\ + \ Applicable when enforce_max_purchasing_power is true. Allowed values (0.001..9999999999).\n\ + \\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC3\EOT\DC2\EOT\129\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC3\ENQ\DC2\EOT\129\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC3\SOH\DC2\EOT\129\FS\DC4(\n\ + \\r\n\ + \\ENQ\EOTx\STX\DC3\ETX\DC2\EOT\129\FS+-\n\ + \\ESC\n\ + \\STX\EOTy\DC2\ACK\133\FS\NUL\163\FS\SOH\SUB\r Loss limit.\n\ + \\n\ + \\v\n\ + \\ETX\EOTy\SOH\DC2\EOT\133\FS\b\DC1\n\ + \{\n\ + \\EOT\EOTy\EOT\NUL\DC2\ACK\137\FS\EOT\153\FS\ENQ\SUBk Loss limit type enumeration.\n\ + \ It defines what is used to get the limit absolute value during calculation.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTy\EOT\NUL\SOH\DC2\EOT\137\FS\t\r\n\ + \8\n\ + \\ACK\EOTy\EOT\NUL\STX\NUL\DC2\EOT\140\FS\b\DC4\SUB( Percentage of funds allowed in losses.\n\ + \\n\ + \\SI\n\ + \\a\EOTy\EOT\NUL\STX\NUL\SOH\DC2\EOT\140\FS\b\SI\n\ + \\SI\n\ + \\a\EOTy\EOT\NUL\STX\NUL\STX\DC2\EOT\140\FS\DC2\DC3\n\ + \F\n\ + \\ACK\EOTy\EOT\NUL\STX\SOH\DC2\EOT\143\FS\b\DC3\SUB6 Absolute amount allowed in losses, limited by funds.\n\ + \\n\ + \\SI\n\ + \\a\EOTy\EOT\NUL\STX\SOH\SOH\DC2\EOT\143\FS\b\SO\n\ + \\SI\n\ + \\a\EOTy\EOT\NUL\STX\SOH\STX\DC2\EOT\143\FS\DC1\DC2\n\ + \V\n\ + \\ACK\EOTy\EOT\NUL\STX\STX\DC2\EOT\146\FS\b\US\SUBF Minimum from percent and absolute amount of funds allowed in losses.\n\ + \\n\ + \\SI\n\ + \\a\EOTy\EOT\NUL\STX\STX\SOH\DC2\EOT\146\FS\b\SUB\n\ + \\SI\n\ + \\a\EOTy\EOT\NUL\STX\STX\STX\DC2\EOT\146\FS\GS\RS\n\ + \V\n\ + \\ACK\EOTy\EOT\NUL\STX\ETX\DC2\EOT\149\FS\b\US\SUBF Maximum from percent and absolute amount of funds allowed in losses.\n\ + \\n\ + \\SI\n\ + \\a\EOTy\EOT\NUL\STX\ETX\SOH\DC2\EOT\149\FS\b\SUB\n\ + \\SI\n\ + \\a\EOTy\EOT\NUL\STX\ETX\STX\DC2\EOT\149\FS\GS\RS\n\ + \W\n\ + \\ACK\EOTy\EOT\NUL\STX\EOT\DC2\EOT\152\FS\b\FS\SUBG Absolute amount of funds allowed in losses, and not limited by funds.\n\ + \\n\ + \\SI\n\ + \\a\EOTy\EOT\NUL\STX\EOT\SOH\DC2\EOT\152\FS\b\ETB\n\ + \\SI\n\ + \\a\EOTy\EOT\NUL\STX\EOT\STX\DC2\EOT\152\FS\SUB\ESC\n\ + \?\n\ + \\EOT\EOTy\STX\NUL\DC2\EOT\156\FS\EOT\GS\SUB1 This field is associated with Type enumeration.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTy\STX\NUL\EOT\DC2\EOT\156\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOTy\STX\NUL\ENQ\DC2\EOT\156\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOTy\STX\NUL\SOH\DC2\EOT\156\FS\DC4\CAN\n\ + \\r\n\ + \\ENQ\EOTy\STX\NUL\ETX\DC2\EOT\156\FS\ESC\FS\n\ + \\\\n\ + \\EOT\EOTy\STX\SOH\DC2\EOT\159\FS\EOT \SUBN Percent of funds allowed in losses, entered as a fractional between 0 and 1.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTy\STX\SOH\EOT\DC2\EOT\159\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOTy\STX\SOH\ENQ\DC2\EOT\159\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOTy\STX\SOH\SOH\DC2\EOT\159\FS\DC4\ESC\n\ + \\r\n\ + \\ENQ\EOTy\STX\SOH\ETX\DC2\EOT\159\FS\RS\US\n\ + \@\n\ + \\EOT\EOTy\STX\STX\DC2\EOT\162\FS\EOT\US\SUB2 Absolute amount in US dollars allowed in losses.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTy\STX\STX\EOT\DC2\EOT\162\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOTy\STX\STX\ENQ\DC2\EOT\162\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOTy\STX\STX\SOH\DC2\EOT\162\FS\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOTy\STX\STX\ETX\DC2\EOT\162\FS\GS\RS\n\ + \:\n\ + \\STX\EOTz\DC2\ACK\166\FS\NUL\176\FS\SOH\SUB, Exchange group with a list of commodities.\n\ + \\n\ + \\v\n\ + \\ETX\EOTz\SOH\DC2\EOT\166\FS\b\NAK\n\ + \E\n\ + \\EOT\EOTz\STX\NUL\DC2\EOT\169\FS\EOT\ESC\SUB7 Trade routing system identifier of an exchange group.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTz\STX\NUL\EOT\DC2\EOT\169\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOTz\STX\NUL\ENQ\DC2\EOT\169\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOTz\STX\NUL\SOH\DC2\EOT\169\FS\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOTz\STX\NUL\ETX\DC2\EOT\169\FS\EM\SUB\n\ + \+\n\ + \\EOT\EOTz\STX\SOH\DC2\EOT\172\FS\EOT$\SUB\GS Name of the exchange group.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTz\STX\SOH\EOT\DC2\EOT\172\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOTz\STX\SOH\ACK\DC2\EOT\172\FS\r\SUB\n\ + \\r\n\ + \\ENQ\EOTz\STX\SOH\SOH\DC2\EOT\172\FS\ESC\US\n\ + \\r\n\ + \\ENQ\EOTz\STX\SOH\ETX\DC2\EOT\172\FS\"#\n\ + \<\n\ + \\EOT\EOTz\STX\STX\DC2\EOT\175\FS\EOT6\SUB. List of exchange group fungible commodities.\n\ + \\n\ + \\r\n\ + \\ENQ\EOTz\STX\STX\EOT\DC2\EOT\175\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOTz\STX\STX\ACK\DC2\EOT\175\FS\r\RS\n\ + \\r\n\ + \\ENQ\EOTz\STX\STX\SOH\DC2\EOT\175\FS\US1\n\ + \\r\n\ + \\ENQ\EOTz\STX\STX\ETX\DC2\EOT\175\FS45\n\ + \#\n\ + \\STX\EOT{\DC2\ACK\179\FS\NUL\204\FS\SOH\SUB\NAK Fungible commodity.\n\ + \\n\ + \\v\n\ + \\ETX\EOT{\SOH\DC2\EOT\179\FS\b\EM\n\ + \J\n\ + \\EOT\EOT{\STX\NUL\DC2\EOT\182\FS\EOT\ESC\SUB< Trade routing system identifier of the fungible commodity.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT{\STX\NUL\EOT\DC2\EOT\182\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT{\STX\NUL\ENQ\DC2\EOT\182\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT{\STX\NUL\SOH\DC2\EOT\182\FS\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT{\STX\NUL\ETX\DC2\EOT\182\FS\EM\SUB\n\ + \/\n\ + \\EOT\EOT{\STX\SOH\DC2\EOT\185\FS\EOT$\SUB! Name of the fungible commodity.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT{\STX\SOH\EOT\DC2\EOT\185\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT{\STX\SOH\ACK\DC2\EOT\185\FS\r\SUB\n\ + \\r\n\ + \\ENQ\EOT{\STX\SOH\SOH\DC2\EOT\185\FS\ESC\US\n\ + \\r\n\ + \\ENQ\EOT{\STX\SOH\ETX\DC2\EOT\185\FS\"#\n\ + \-\n\ + \\EOT\EOT{\STX\STX\DC2\EOT\188\FS\EOT6\SUB\US List of tradable commodities.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT{\STX\STX\EOT\DC2\EOT\188\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT{\STX\STX\ACK\DC2\EOT\188\FS\r\RS\n\ + \\r\n\ + \\ENQ\EOT{\STX\STX\SOH\DC2\EOT\188\FS\US1\n\ + \\r\n\ + \\ENQ\EOT{\STX\STX\ETX\DC2\EOT\188\FS45\n\ + \'\n\ + \\EOT\EOT{\STX\ETX\DC2\EOT\191\FS\EOT\FS\SUB\EM US commodity indicator.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT{\STX\ETX\EOT\DC2\EOT\191\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT{\STX\ETX\ENQ\DC2\EOT\191\FS\r\DC1\n\ + \\r\n\ + \\ENQ\EOT{\STX\ETX\SOH\DC2\EOT\191\FS\DC2\ETB\n\ + \\r\n\ + \\ENQ\EOT{\STX\ETX\ETX\DC2\EOT\191\FS\SUB\ESC\n\ + \M\n\ + \\EOT\EOT{\STX\EOT\DC2\EOT\194\FS\EOT+\SUB? List of instrument types defined for this fungible commodity.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT{\STX\EOT\EOT\DC2\EOT\194\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT{\STX\EOT\ENQ\DC2\EOT\194\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT{\STX\EOT\SOH\DC2\EOT\194\FS\DC4&\n\ + \\r\n\ + \\ENQ\EOT{\STX\EOT\ETX\DC2\EOT\194\FS)*\n\ + \-\n\ + \\EOT\EOT{\STX\ENQ\DC2\EOT\197\FS\EOT(\SUB\US Synthetic ID of margin group.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT{\STX\ENQ\EOT\DC2\EOT\197\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT{\STX\ENQ\ENQ\DC2\EOT\197\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT{\STX\ENQ\SOH\DC2\EOT\197\FS\DC4#\n\ + \\r\n\ + \\ENQ\EOT{\STX\ENQ\ETX\DC2\EOT\197\FS&'\n\ + \1\n\ + \\EOT\EOT{\STX\ACK\DC2\EOT\200\FS\EOT\US\SUB# Prefix of the fungible commodity.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT{\STX\ACK\EOT\DC2\EOT\200\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT{\STX\ACK\ENQ\DC2\EOT\200\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT{\STX\ACK\SOH\DC2\EOT\200\FS\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOT{\STX\ACK\ETX\DC2\EOT\200\FS\GS\RS\n\ + \3\n\ + \\EOT\EOT{\STX\a\DC2\EOT\203\FS\EOT&\SUB% Fungible commodity's extended code.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT{\STX\a\EOT\DC2\EOT\203\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT{\STX\a\ENQ\DC2\EOT\203\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT{\STX\a\SOH\DC2\EOT\203\FS\DC4!\n\ + \\r\n\ + \\ENQ\EOT{\STX\a\ETX\DC2\EOT\203\FS$%\n\ + \#\n\ + \\STX\EOT|\DC2\ACK\207\FS\NUL\214\FS\SOH\SUB\NAK Tradable commodity.\n\ + \\n\ + \\v\n\ + \\ETX\EOT|\SOH\DC2\EOT\207\FS\b\EM\n\ + \9\n\ + \\EOT\EOT|\STX\NUL\DC2\EOT\210\FS\EOT\ESC\SUB+ Commodity string id (aka Commodity XBit).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT|\STX\NUL\EOT\DC2\EOT\210\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT|\STX\NUL\ENQ\DC2\EOT\210\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT|\STX\NUL\SOH\DC2\EOT\210\FS\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT|\STX\NUL\ETX\DC2\EOT\210\FS\EM\SUB\n\ + \!\n\ + \\EOT\EOT|\STX\SOH\DC2\EOT\213\FS\EOT\US\SUB\DC3 Commodity symbol.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT|\STX\SOH\EOT\DC2\EOT\213\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT|\STX\SOH\ENQ\DC2\EOT\213\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT|\STX\SOH\SOH\DC2\EOT\213\FS\DC4\SUB\n\ + \\r\n\ + \\ENQ\EOT|\STX\SOH\ETX\DC2\EOT\213\FS\GS\RS\n\ + \ \n\ + \\STX\EOT}\DC2\ACK\217\FS\NUL\154\GS\SOH\SUB\DC2 Instrument type.\n\ + \\n\ + \\v\n\ + \\ETX\EOT}\SOH\DC2\EOT\217\FS\b\SYN\n\ + \G\n\ + \\EOT\EOT}\STX\NUL\DC2\EOT\220\FS\EOT\ESC\SUB9 Trade routing system identifier of the instrument type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT}\STX\NUL\EOT\DC2\EOT\220\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT}\STX\NUL\ENQ\DC2\EOT\220\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT}\STX\NUL\SOH\DC2\EOT\220\FS\DC4\SYN\n\ + \\r\n\ + \\ENQ\EOT}\STX\NUL\ETX\DC2\EOT\220\FS\EM\SUB\n\ + \,\n\ + \\EOT\EOT}\STX\SOH\DC2\EOT\223\FS\EOT$\SUB\RS Name of the instrument type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT}\STX\SOH\EOT\DC2\EOT\223\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT}\STX\SOH\ACK\DC2\EOT\223\FS\r\SUB\n\ + \\r\n\ + \\ENQ\EOT}\STX\SOH\SOH\DC2\EOT\223\FS\ESC\US\n\ + \\r\n\ + \\ENQ\EOT}\STX\SOH\ETX\DC2\EOT\223\FS\"#\n\ + \/\n\ + \\EOT\EOT}\EOT\NUL\DC2\ACK\226\FS\EOT\245\FS\ENQ\SUB\US Different market limit types.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT}\EOT\NUL\SOH\DC2\EOT\226\FS\t\CAN\n\ + \1\n\ + \\ACK\EOT}\EOT\NUL\STX\NUL\DC2\EOT\229\FS\b&\SUB! Instrument position limit type.\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\NUL\SOH\DC2\EOT\229\FS\b!\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\NUL\STX\DC2\EOT\229\FS$%\n\ + \/\n\ + \\ACK\EOT}\EOT\NUL\STX\SOH\DC2\EOT\232\FS\b$\SUB\US Contract position limit type.\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\SOH\SOH\DC2\EOT\232\FS\b\US\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\SOH\STX\DC2\EOT\232\FS\"#\n\ + \(\n\ + \\ACK\EOT}\EOT\NUL\STX\STX\DC2\EOT\235\FS\b\GS\SUB\CAN Trade size limit type.\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\STX\SOH\DC2\EOT\235\FS\b\CAN\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\STX\STX\DC2\EOT\235\FS\ESC\FS\n\ + \)\n\ + \\ACK\EOT}\EOT\NUL\STX\ETX\DC2\EOT\238\FS\b\RS\SUB\EM Trade price limit type.\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\ETX\SOH\DC2\EOT\238\FS\b\EM\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\ETX\STX\DC2\EOT\238\FS\FS\GS\n\ + \)\n\ + \\ACK\EOT}\EOT\NUL\STX\EOT\DC2\EOT\241\FS\b$\SUB\EM Trade price limit type.\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\EOT\SOH\DC2\EOT\241\FS\b\US\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\EOT\STX\DC2\EOT\241\FS\"#\n\ + \+\n\ + \\ACK\EOT}\EOT\NUL\STX\ENQ\DC2\EOT\244\FS\b \SUB\ESC Long positions only type.\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\ENQ\SOH\DC2\EOT\244\FS\b\ESC\n\ + \\SI\n\ + \\a\EOT}\EOT\NUL\STX\ENQ\STX\DC2\EOT\244\FS\RS\US\n\ + \\134\SOH\n\ + \\EOT\EOT}\STX\STX\DC2\EOT\249\FS\EOT'\SUBx List of limit types that are acceptable for this instrument type.\n\ + \ This filed is associated with MarketLimitType enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT}\STX\STX\EOT\DC2\EOT\249\FS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT}\STX\STX\ENQ\DC2\EOT\249\FS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT}\STX\STX\SOH\DC2\EOT\249\FS\DC4\"\n\ + \\r\n\ + \\ENQ\EOT}\STX\STX\ETX\DC2\EOT\249\FS%&\n\ + \)\n\ + \\EOT\EOT}\EOT\SOH\DC2\ACK\252\FS\EOT\149\GS\ENQ\SUB\EM Instrument group types.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT}\EOT\SOH\SOH\DC2\EOT\252\FS\t\FS\n\ + \\SUB\n\ + \\ACK\EOT}\EOT\SOH\STX\NUL\DC2\EOT\255\FS\b\DC4\SUB\n\ + \ Futures.\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\NUL\SOH\DC2\EOT\255\FS\b\SI\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\NUL\STX\DC2\EOT\255\FS\DC2\DC3\n\ + \#\n\ + \\ACK\EOT}\EOT\SOH\STX\SOH\DC2\EOT\130\GS\b\DC4\SUB\DC3 Options call/put.\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\SOH\SOH\DC2\EOT\130\GS\b\SI\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\SOH\STX\DC2\EOT\130\GS\DC2\DC3\n\ + \l\n\ + \\ACK\EOT}\EOT\SOH\STX\STX\DC2\EOT\133\GS\b\ETB\SUB\\ All strategy types (calendar spreads, reduced tick calendar spreads, packs, strips, etc.).\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\STX\SOH\DC2\EOT\133\GS\b\DC2\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\STX\STX\DC2\EOT\133\GS\NAK\SYN\n\ + \\SUB\n\ + \\ACK\EOT}\EOT\SOH\STX\ETX\DC2\EOT\136\GS\b\DC4\SUB\n\ + \ Indices.\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\ETX\SOH\DC2\EOT\136\GS\b\SI\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\ETX\STX\DC2\EOT\136\GS\DC2\DC3\n\ + \\US\n\ + \\ACK\EOT}\EOT\SOH\STX\EOT\DC2\EOT\139\GS\b\EM\SUB\SI Fixed Income.\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\EOT\SOH\DC2\EOT\139\GS\b\DC4\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\EOT\STX\DC2\EOT\139\GS\ETB\CAN\n\ + \+\n\ + \\ACK\EOT}\EOT\SOH\STX\ENQ\DC2\EOT\142\GS\b\SYN\SUB\ESC Cash Spot (including FX).\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\ENQ\SOH\DC2\EOT\142\GS\b\DC1\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\ENQ\STX\DC2\EOT\142\GS\DC4\NAK\n\ + \;\n\ + \\ACK\EOT}\EOT\SOH\STX\ACK\DC2\EOT\145\GS\b\SUB\SUB+ Daily Futures (relative/rolling prompts).\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\ACK\SOH\DC2\EOT\145\GS\b\NAK\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\ACK\STX\DC2\EOT\145\GS\CAN\EM\n\ + \\ESC\n\ + \\ACK\EOT}\EOT\SOH\STX\a\DC2\EOT\148\GS\b\NAK\SUB\v Equities.\n\ + \\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\a\SOH\DC2\EOT\148\GS\b\DLE\n\ + \\SI\n\ + \\a\EOT}\EOT\SOH\STX\a\STX\DC2\EOT\148\GS\DC3\DC4\n\ + \b\n\ + \\EOT\EOT}\STX\ETX\DC2\EOT\153\GS\EOT)\SUBT Instrument group type id.\n\ + \ This filed is associated with InstrumentGroupType enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT}\STX\ETX\EOT\DC2\EOT\153\GS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT}\STX\ETX\ENQ\DC2\EOT\153\GS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT}\STX\ETX\SOH\DC2\EOT\153\GS\DC4$\n\ + \\r\n\ + \\ENQ\EOT}\STX\ETX\ETX\DC2\EOT\153\GS'(\n\ + \\193\EOT\n\ + \\STX\EOT~\DC2\ACK\163\GS\NUL\181\GS\SOH\SUB\178\EOT Market Limits set.\n\ + \ The general rules for using this result are:\n\ + \ - all fungible commodities with non-default limit(s) are returned (even those with no 'allowed to trade' tradable commodities);\n\ + \ - to determine if a tradable commodity is enabled (allowed to trade), first check tradable_commodity_id field;\n\ + \ if the tradable commodity is not present there, use the next rule;\n\ + \ - if something is not specified on a lower level, check defaults at applicable higher levels\n\ + \ (fungible commodity -> exchange group -> all US/non-US commodities -> all commodities).\n\ + \\n\ + \\v\n\ + \\ETX\EOT~\SOH\DC2\EOT\163\GS\b\DC4\n\ + \\141\SOH\n\ + \\EOT\EOT~\STX\NUL\DC2\EOT\166\GS\EOT'\SUB\DEL Allows to clear (set to default) all market limits (including trading authority) for provided level except all_market_limits.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT~\STX\NUL\EOT\DC2\EOT\166\GS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT~\STX\NUL\ENQ\DC2\EOT\166\GS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT~\STX\NUL\SOH\DC2\EOT\166\GS\DC4\"\n\ + \\r\n\ + \\ENQ\EOT~\STX\NUL\ETX\DC2\EOT\166\GS%&\n\ + \:\n\ + \\EOT\EOT~\STX\SOH\DC2\EOT\169\GS\EOT6\SUB, Default market limits for all commodities.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT~\STX\SOH\EOT\DC2\EOT\169\GS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT~\STX\SOH\ACK\DC2\EOT\169\GS\r\US\n\ + \\r\n\ + \\ENQ\EOT~\STX\SOH\SOH\DC2\EOT\169\GS 1\n\ + \\r\n\ + \\ENQ\EOT~\STX\SOH\ETX\DC2\EOT\169\GS45\n\ + \D\n\ + \\EOT\EOT~\STX\STX\DC2\EOT\172\GS\EOT5\SUB6 [erasable] Default market limits for US commodities.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT~\STX\STX\EOT\DC2\EOT\172\GS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT~\STX\STX\ACK\DC2\EOT\172\GS\r\US\n\ + \\r\n\ + \\ENQ\EOT~\STX\STX\SOH\DC2\EOT\172\GS 0\n\ + \\r\n\ + \\ENQ\EOT~\STX\STX\ETX\DC2\EOT\172\GS34\n\ + \H\n\ + \\EOT\EOT~\STX\ETX\DC2\EOT\175\GS\EOT9\SUB: [erasable] Default market limits for non-US commodities.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT~\STX\ETX\EOT\DC2\EOT\175\GS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT~\STX\ETX\ACK\DC2\EOT\175\GS\r\US\n\ + \\r\n\ + \\ENQ\EOT~\STX\ETX\SOH\DC2\EOT\175\GS 4\n\ + \\r\n\ + \\ENQ\EOT~\STX\ETX\ETX\DC2\EOT\175\GS78\n\ + \E\n\ + \\EOT\EOT~\STX\EOT\DC2\EOT\178\GS\EOT=\SUB7 [erasable] Default market limits for exchange groups.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT~\STX\EOT\EOT\DC2\EOT\178\GS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT~\STX\EOT\ACK\DC2\EOT\178\GS\r!\n\ + \\r\n\ + \\ENQ\EOT~\STX\EOT\SOH\DC2\EOT\178\GS\"8\n\ + \\r\n\ + \\ENQ\EOT~\STX\EOT\ETX\DC2\EOT\178\GS;<\n\ + \\186\SOH\n\ + \\STX\EOT\DEL\DC2\ACK\185\GS\NUL\206\GS\SOH\SUB\171\SOH Record of market limit setting for exchange group level or higher.\n\ + \ Limit values are defaults for all included commodities and can be can be overridden on a lower level.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DEL\SOH\DC2\EOT\185\GS\b\SUB\n\ + \6\n\ + \\EOT\EOT\DEL\STX\NUL\DC2\EOT\188\GS\EOT'\SUB( Reserved for future use, not used now.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\NUL\EOT\DC2\EOT\188\GS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\NUL\ENQ\DC2\EOT\188\GS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\NUL\SOH\DC2\EOT\188\GS\DC4\"\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\NUL\ETX\DC2\EOT\188\GS%&\n\ + \~\n\ + \\EOT\EOT\DEL\STX\SOH\DC2\EOT\192\GS\EOT7\SUBp Indicates if level is allowed to trade.\n\ + \ If null (not set) - default, actual value inherited from upper level.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\SOH\EOT\DC2\EOT\192\GS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\SOH\ACK\DC2\EOT\192\GS\r!\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\SOH\SOH\DC2\EOT\192\GS\"2\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\SOH\ETX\DC2\EOT\192\GS56\n\ + \v\n\ + \\EOT\EOT\DEL\STX\STX\DC2\EOT\196\GS\EOTG\SUBh [obsolete] Default margin multiplier. Allowed values (0.001..100).\n\ + \ Use margin_multiplier = 5 instead.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\STX\EOT\DC2\EOT\196\GS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\STX\ENQ\DC2\EOT\196\GS\r\DC3\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\STX\SOH\DC2\EOT\196\GS\DC4.\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\STX\ETX\DC2\EOT\196\GS12\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\STX\b\DC2\EOT\196\GS3F\n\ + \\SO\n\ + \\ACK\EOT\DEL\STX\STX\b\ETX\DC2\EOT\196\GS4E\n\ + \2\n\ + \\EOT\EOT\DEL\STX\ETX\DC2\EOT\199\GS\EOTB\SUB$ Default position and Trade limits.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\ETX\EOT\DC2\EOT\199\GS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\ETX\ACK\DC2\EOT\199\GS\r#\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\ETX\SOH\DC2\EOT\199\GS$=\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\ETX\ETX\DC2\EOT\199\GS@A\n\ + \\171\SOH\n\ + \\EOT\EOT\DEL\STX\EOT\DC2\EOT\205\GS\EOT4\SUBy Margin multiplier for default and exchange levels. Allowed values (0.001..100).\n\ + \ Can be enforced (locked) on FCM level.\n\ + \2\" 4 is occupied by cleared_fields.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\EOT\EOT\DC2\EOT\205\GS\EOT\f\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\EOT\ACK\DC2\EOT\205\GS\r\GS\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\EOT\SOH\DC2\EOT\205\GS\RS/\n\ + \\r\n\ + \\ENQ\EOT\DEL\STX\EOT\ETX\DC2\EOT\205\GS23\n\ + \J\n\ + \\ETX\EOT\128\SOH\DC2\ACK\209\GS\NUL\145\RS\SOH\SUB; Set of position and trade limits for all possible levels.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\128\SOH\SOH\DC2\EOT\209\GS\b\RS\n\ + \7\n\ + \\ENQ\EOT\128\SOH\STX\NUL\DC2\EOT\212\GS\EOT(\SUB( Reserved for future use, not used now.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\NUL\EOT\DC2\EOT\212\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\NUL\ENQ\DC2\EOT\212\GS\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\NUL\SOH\DC2\EOT\212\GS\DC4\"\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\NUL\ETX\DC2\EOT\212\GS%'\n\ + \G\n\ + \\ENQ\EOT\128\SOH\STX\SOH\DC2\EOT\215\GS\EOTR\SUB8 [obsolete] Use commodity_position_limit field instead.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SOH\EOT\DC2\EOT\215\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SOH\ACK\DC2\EOT\215\GS\r\ETB\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SOH\SOH\DC2\EOT\215\GS\CAN9\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SOH\ETX\DC2\EOT\215\GS<=\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SOH\b\DC2\EOT\215\GS>Q\n\ + \\SI\n\ + \\a\EOT\128\SOH\STX\SOH\b\ETX\DC2\EOT\215\GS?P\n\ + \H\n\ + \\ENQ\EOT\128\SOH\STX\STX\DC2\EOT\218\GS\EOTS\SUB9 [obsolete] Use instrument_position_limit field instead.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\STX\EOT\DC2\EOT\218\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\STX\ACK\DC2\EOT\218\GS\r\ETB\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\STX\SOH\DC2\EOT\218\GS\CAN:\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\STX\ETX\DC2\EOT\218\GS=>\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\STX\b\DC2\EOT\218\GS?R\n\ + \\SI\n\ + \\a\EOT\128\SOH\STX\STX\b\ETX\DC2\EOT\218\GS@Q\n\ + \F\n\ + \\ENQ\EOT\128\SOH\STX\ETX\DC2\EOT\221\GS\EOTQ\SUB7 [obsolete] Use contract_position_limit field instead.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ETX\EOT\DC2\EOT\221\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ETX\ACK\DC2\EOT\221\GS\r\ETB\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ETX\SOH\DC2\EOT\221\GS\CAN8\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ETX\ETX\DC2\EOT\221\GS;<\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ETX\b\DC2\EOT\221\GS=P\n\ + \\SI\n\ + \\a\EOT\128\SOH\STX\ETX\b\ETX\DC2\EOT\221\GS>O\n\ + \?\n\ + \\ENQ\EOT\128\SOH\STX\EOT\DC2\EOT\224\GS\EOTJ\SUB0 [obsolete] Use trade_size_limit field instead.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\EOT\EOT\DC2\EOT\224\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\EOT\ACK\DC2\EOT\224\GS\r\ETB\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\EOT\SOH\DC2\EOT\224\GS\CAN1\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\EOT\ETX\DC2\EOT\224\GS45\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\EOT\b\DC2\EOT\224\GS6I\n\ + \\SI\n\ + \\a\EOT\128\SOH\STX\EOT\b\ETX\DC2\EOT\224\GS7H\n\ + \B\n\ + \\ENQ\EOT\128\SOH\STX\ENQ\DC2\EOT\227\GS\EOT4\SUB3 Trade price limit (all price sources) (in ticks).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ENQ\EOT\DC2\EOT\227\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ENQ\ACK\DC2\EOT\227\GS\r\ETB\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ENQ\SOH\DC2\EOT\227\GS\CAN/\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ENQ\ETX\DC2\EOT\227\GS23\n\ + \D\n\ + \\ENQ\EOT\128\SOH\STX\ACK\DC2\EOT\230\GS\EOT<\SUB5 Trade price limit (all price sources) (in percent).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ACK\EOT\DC2\EOT\230\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ACK\ACK\DC2\EOT\230\GS\r\GS\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ACK\SOH\DC2\EOT\230\GS\RS7\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\ACK\ETX\DC2\EOT\230\GS:;\n\ + \V\n\ + \\ENQ\EOT\128\SOH\STX\a\DC2\EOT\233\GS\EOTJ\SUBG Trade price limits in ticks per price sources for continuous trading.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\a\EOT\DC2\EOT\233\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\a\ACK\DC2\EOT\233\GS\r\"\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\a\SOH\DC2\EOT\233\GS#E\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\a\ETX\DC2\EOT\233\GSHI\n\ + \Z\n\ + \\ENQ\EOT\128\SOH\STX\b\DC2\EOT\236\GS\EOTN\SUBK Trade price limits in ticks per price sources for non-continuous trading.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\b\EOT\DC2\EOT\236\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\b\ACK\DC2\EOT\236\GS\r\"\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\b\SOH\DC2\EOT\236\GS#I\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\b\ETX\DC2\EOT\236\GSLM\n\ + \X\n\ + \\ENQ\EOT\128\SOH\STX\t\DC2\EOT\239\GS\EOTN\SUBI Trade price limits in percent per price sources for continuous trading.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\t\EOT\DC2\EOT\239\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\t\ACK\DC2\EOT\239\GS\r$\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\t\SOH\DC2\EOT\239\GS%I\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\t\ETX\DC2\EOT\239\GSLM\n\ + \\\\n\ + \\ENQ\EOT\128\SOH\STX\n\ + \\DC2\EOT\242\GS\EOTS\SUBM Trade price limits in percent per price sources for non-continuous trading.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\n\ + \\EOT\DC2\EOT\242\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\n\ + \\ACK\DC2\EOT\242\GS\r$\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\n\ + \\SOH\DC2\EOT\242\GS%M\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\n\ + \\ETX\DC2\EOT\242\GSPR\n\ + \l\n\ + \\ENQ\EOT\128\SOH\STX\v\DC2\EOT\245\GS\EOT5\SUB] Order placement date plus this amount of days must be more than contract last trading date.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\v\EOT\DC2\EOT\245\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\v\ACK\DC2\EOT\245\GS\r\ETB\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\v\SOH\DC2\EOT\245\GS\CAN/\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\v\ETX\DC2\EOT\245\GS24\n\ + \\168\SOH\n\ + \\ENQ\EOT\128\SOH\STX\f\DC2\EOT\251\GS\EOT=\SUBt Optional commodity position limit.\n\ + \ It is not used (and does not make sense) on instrument type level of settings.\n\ + \2# 12 is occupied by cleared_fields.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\f\EOT\DC2\EOT\251\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\f\ACK\DC2\EOT\251\GS\r\RS\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\f\SOH\DC2\EOT\251\GS\US7\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\f\ETX\DC2\EOT\251\GS:<\n\ + \\\\n\ + \\ENQ\EOT\128\SOH\STX\r\DC2\EOT\255\GS\EOT>\SUBM Instrument position limit.\n\ + \ It is not applicable for some instrument types.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\r\EOT\DC2\EOT\255\GS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\r\ACK\DC2\EOT\255\GS\r\RS\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\r\SOH\DC2\EOT\255\GS\US8\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\r\ETX\DC2\EOT\255\GS;=\n\ + \Z\n\ + \\ENQ\EOT\128\SOH\STX\SO\DC2\EOT\131\RS\EOT<\SUBK Contract position limit.\n\ + \ It is not applicable for some instrument types.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SO\EOT\DC2\EOT\131\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SO\ACK\DC2\EOT\131\RS\r\RS\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SO\SOH\DC2\EOT\131\RS\US6\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SO\ETX\DC2\EOT\131\RS9;\n\ + \S\n\ + \\ENQ\EOT\128\SOH\STX\SI\DC2\EOT\135\RS\EOT5\SUBD Trade size limit.\n\ + \ It is not applicable for some instrument types.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SI\EOT\DC2\EOT\135\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SI\ACK\DC2\EOT\135\RS\r\RS\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SI\SOH\DC2\EOT\135\RS\US/\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\SI\ETX\DC2\EOT\135\RS24\n\ + \\147\SOH\n\ + \\ENQ\EOT\128\SOH\STX\DLE\DC2\EOT\139\RS\EOT8\SUB\131\SOH Indicates if selling before buying is restricted on level.\n\ + \ If null (not set) - default, actual value inherited from upper level.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\DLE\EOT\DC2\EOT\139\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\DLE\ACK\DC2\EOT\139\RS\r\RS\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\DLE\SOH\DC2\EOT\139\RS\US2\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\DLE\ETX\DC2\EOT\139\RS57\n\ + \a\n\ + \\ENQ\EOT\128\SOH\STX\DC1\DC2\EOT\143\RS\EOTH\SUBR Commodity gross open position limit.\n\ + \ It is not applicable for instrument types.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\DC1\EOT\DC2\EOT\143\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\DC1\ACK\DC2\EOT\143\RS\r\RS\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\DC1\SOH\DC2\EOT\143\RS\USB\n\ + \\SO\n\ + \\ACK\EOT\128\SOH\STX\DC1\ETX\DC2\EOT\143\RSEG\n\ + \?\n\ + \\ETX\EOT\129\SOH\DC2\ACK\148\RS\NUL\163\RS\SOH\SUB0 Trade price limits in ticks per price sources.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\129\SOH\SOH\DC2\EOT\148\RS\b\GS\n\ + \&\n\ + \\ENQ\EOT\129\SOH\STX\NUL\DC2\EOT\151\RS\EOT$\SUB\ETB Bid/Ask price source.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\NUL\EOT\DC2\EOT\151\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\NUL\ACK\DC2\EOT\151\RS\r\ETB\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\NUL\SOH\DC2\EOT\151\RS\CAN\US\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\NUL\ETX\DC2\EOT\151\RS\"#\n\ + \S\n\ + \\ENQ\EOT\129\SOH\STX\SOH\DC2\EOT\155\RS\EOT!\SUBD The last trade price source.\n\ + \ Not used for non-continuous trading.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\SOH\EOT\DC2\EOT\155\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\SOH\ACK\DC2\EOT\155\RS\r\ETB\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\SOH\SOH\DC2\EOT\155\RS\CAN\FS\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\SOH\ETX\DC2\EOT\155\RS\US \n\ + \\234\SOH\n\ + \\ENQ\EOT\129\SOH\STX\STX\DC2\EOT\159\RS\EOT!\SUB\218\SOH Open (for continuous) price source - the first trading price at the beginning of the trading day.\n\ + \ Indicative open (for non-continuous) price source - the proposed open price at the beginning of the next trading day.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\STX\EOT\DC2\EOT\159\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\STX\ACK\DC2\EOT\159\RS\r\ETB\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\STX\SOH\DC2\EOT\159\RS\CAN\FS\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\STX\ETX\DC2\EOT\159\RS\US \n\ + \h\n\ + \\ENQ\EOT\129\SOH\STX\ETX\DC2\EOT\162\RS\EOT'\SUBY Settlement price source - an official price established at the end of each trading day.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\ETX\EOT\DC2\EOT\162\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\ETX\ACK\DC2\EOT\162\RS\r\ETB\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\ETX\SOH\DC2\EOT\162\RS\CAN\"\n\ + \\SO\n\ + \\ACK\EOT\129\SOH\STX\ETX\ETX\DC2\EOT\162\RS%&\n\ + \A\n\ + \\ETX\EOT\130\SOH\DC2\ACK\166\RS\NUL\181\RS\SOH\SUB2 Trade price limits in percent per price sources.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\130\SOH\SOH\DC2\EOT\166\RS\b\US\n\ + \&\n\ + \\ENQ\EOT\130\SOH\STX\NUL\DC2\EOT\169\RS\EOT*\SUB\ETB Bid/Ask price source.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\NUL\EOT\DC2\EOT\169\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\NUL\ACK\DC2\EOT\169\RS\r\GS\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\NUL\SOH\DC2\EOT\169\RS\RS%\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\NUL\ETX\DC2\EOT\169\RS()\n\ + \S\n\ + \\ENQ\EOT\130\SOH\STX\SOH\DC2\EOT\173\RS\EOT'\SUBD The last trade price source.\n\ + \ Not used for non-continuous trading.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\SOH\EOT\DC2\EOT\173\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\SOH\ACK\DC2\EOT\173\RS\r\GS\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\SOH\SOH\DC2\EOT\173\RS\RS\"\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\SOH\ETX\DC2\EOT\173\RS%&\n\ + \\234\SOH\n\ + \\ENQ\EOT\130\SOH\STX\STX\DC2\EOT\177\RS\EOT'\SUB\218\SOH Open (for continuous) price source - the first trading price at the beginning of the trading day.\n\ + \ Indicative open (for non-continuous) price source - the proposed open price at the beginning of the next trading day.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\STX\EOT\DC2\EOT\177\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\STX\ACK\DC2\EOT\177\RS\r\GS\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\STX\SOH\DC2\EOT\177\RS\RS\"\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\STX\ETX\DC2\EOT\177\RS%&\n\ + \h\n\ + \\ENQ\EOT\130\SOH\STX\ETX\DC2\EOT\180\RS\EOT-\SUBY Settlement price source - an official price established at the end of each trading day.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\ETX\EOT\DC2\EOT\180\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\ETX\ACK\DC2\EOT\180\RS\r\GS\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\ETX\SOH\DC2\EOT\180\RS\RS(\n\ + \\SO\n\ + \\ACK\EOT\130\SOH\STX\ETX\ETX\DC2\EOT\180\RS+,\n\ + \-\n\ + \\ETX\EOT\131\SOH\DC2\ACK\184\RS\NUL\201\RS\SOH\SUB\RS Exchange group level limits.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\131\SOH\SOH\DC2\EOT\184\RS\b\FS\n\ + \\139\SOH\n\ + \\ENQ\EOT\131\SOH\STX\NUL\DC2\EOT\187\RS\EOT'\SUB| Allows to clear (set to default) all limits on exchange level (default_market_limits) and below (commodity_market_limits).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\NUL\EOT\DC2\EOT\187\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\NUL\ENQ\DC2\EOT\187\RS\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\NUL\SOH\DC2\EOT\187\RS\DC4\"\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\NUL\ETX\DC2\EOT\187\RS%&\n\ + \\171\SOH\n\ + \\ENQ\EOT\131\SOH\STX\SOH\DC2\EOT\192\RS\EOT*\SUB\155\SOH Trade routing system identifier of an exchange group.\n\ + \ Can be obtained via AccountAvailableExchangeGroupsRequest.\n\ + \ Corresponds to ExchangeGroup.id field.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\SOH\EOT\DC2\EOT\192\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\SOH\ENQ\DC2\EOT\192\RS\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\SOH\SOH\DC2\EOT\192\RS\DC4%\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\SOH\ETX\DC2\EOT\192\RS()\n\ + \@\n\ + \\ENQ\EOT\131\SOH\STX\STX\DC2\EOT\195\RS\EOT:\SUB1 [erasable] Default exchange group level limits.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\STX\EOT\DC2\EOT\195\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\STX\ACK\DC2\EOT\195\RS\r\US\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\STX\SOH\DC2\EOT\195\RS 5\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\STX\ETX\DC2\EOT\195\RS89\n\ + \D\n\ + \\ENQ\EOT\131\SOH\STX\ETX\DC2\EOT\198\RS\EOT?\SUB5 [erasable] List of fungible commodity level limits.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\ETX\EOT\DC2\EOT\198\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\ETX\ACK\DC2\EOT\198\RS\r\"\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\ETX\SOH\DC2\EOT\198\RS#:\n\ + \\SO\n\ + \\ACK\EOT\131\SOH\STX\ETX\ETX\DC2\EOT\198\RS=>\n\ + \1\n\ + \\ETX\EOT\132\SOH\DC2\ACK\204\RS\NUL\233\RS\SOH\SUB\" Fungible commodity level limits.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\132\SOH\SOH\DC2\EOT\204\RS\b\GS\n\ + \z\n\ + \\ENQ\EOT\132\SOH\STX\NUL\DC2\EOT\207\RS\EOT'\SUBk Allows to clear (set to default) all limits of this commodity level and below (instrument_market_limits).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\NUL\EOT\DC2\EOT\207\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\NUL\ENQ\DC2\EOT\207\RS\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\NUL\SOH\DC2\EOT\207\RS\DC4\"\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\NUL\ETX\DC2\EOT\207\RS%&\n\ + \\144\SOH\n\ + \\ENQ\EOT\132\SOH\STX\SOH\DC2\EOT\212\RS\EOT.\SUB\128\SOH Fungible commodity ID.\n\ + \ Can be obtained via AccountAvailableExchangeGroupsRequest.\n\ + \ Corresponds to FungibleCommodity.id field.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\SOH\EOT\DC2\EOT\212\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\SOH\ENQ\DC2\EOT\212\RS\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\SOH\SOH\DC2\EOT\212\RS\DC4)\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\SOH\ETX\DC2\EOT\212\RS,-\n\ + \L\n\ + \\ENQ\EOT\132\SOH\STX\STX\DC2\EOT\215\RS\EOTK\SUB= [obsolete] List of allowed to trade tradable commodity ids.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\STX\EOT\DC2\EOT\215\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\STX\ENQ\DC2\EOT\215\RS\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\STX\SOH\DC2\EOT\215\RS\DC42\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\STX\ETX\DC2\EOT\215\RS56\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\STX\b\DC2\EOT\215\RS7J\n\ + \\SI\n\ + \\a\EOT\132\SOH\STX\STX\b\ETX\DC2\EOT\215\RS8I\n\ + \N\n\ + \\ENQ\EOT\132\SOH\STX\ETX\DC2\EOT\218\RS\EOTB\SUB? [erasable] Default commodity level position and Trade limits.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ETX\EOT\DC2\EOT\218\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ETX\ACK\DC2\EOT\218\RS\r#\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ETX\SOH\DC2\EOT\218\RS$=\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ETX\ETX\DC2\EOT\218\RS@A\n\ + \A\n\ + \\ENQ\EOT\132\SOH\STX\EOT\DC2\EOT\221\RS\EOTA\SUB2 [erasable] List of instrument type level limits.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\EOT\EOT\DC2\EOT\221\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\EOT\ACK\DC2\EOT\221\RS\r#\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\EOT\SOH\DC2\EOT\221\RS$<\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\EOT\ETX\DC2\EOT\221\RS?@\n\ + \\148\SOH\n\ + \\ENQ\EOT\132\SOH\STX\ENQ\DC2\EOT\225\RS\EOTC\SUB\132\SOH [erasable] List of non-default allowed to trade configuration of commodities.\n\ + \ EntityAllowedToTrade.id is commodity_id (aka XBit).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ENQ\EOT\DC2\EOT\225\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ENQ\ACK\DC2\EOT\225\RS\r!\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ENQ\SOH\DC2\EOT\225\RS\">\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ENQ\ETX\DC2\EOT\225\RSAB\n\ + \\140\STX\n\ + \\ENQ\EOT\132\SOH\STX\ACK\DC2\EOT\232\RS\EOT4\SUB\216\SOH Commodity margin multiplier. Allowed values (0.001..100).\n\ + \ It is applied to all commodities with same margin_group_id even if specified only for one commodity from the group.\n\ + \ Can be enforced (locked) on FCM level.\n\ + \2\" 6 is occupied by cleared_fields.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ACK\EOT\DC2\EOT\232\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ACK\ACK\DC2\EOT\232\RS\r\GS\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ACK\SOH\DC2\EOT\232\RS\RS/\n\ + \\SO\n\ + \\ACK\EOT\132\SOH\STX\ACK\ETX\DC2\EOT\232\RS23\n\ + \.\n\ + \\ETX\EOT\133\SOH\DC2\ACK\236\RS\NUL\128\US\SOH\SUB\US Instrument type level limits.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\133\SOH\SOH\DC2\EOT\236\RS\b\RS\n\ + \P\n\ + \\ENQ\EOT\133\SOH\STX\NUL\DC2\EOT\239\RS\EOT'\SUBA Allows to clear (set to default) all limits of this instrument.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\NUL\EOT\DC2\EOT\239\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\NUL\ENQ\DC2\EOT\239\RS\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\NUL\SOH\DC2\EOT\239\RS\DC4\"\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\NUL\ETX\DC2\EOT\239\RS%&\n\ + \\145\SOH\n\ + \\ENQ\EOT\133\SOH\STX\SOH\DC2\EOT\244\RS\EOT+\SUB\129\SOH ID of the instrument type.\n\ + \ Can be obtained via AccountAvailableExchangeGroupsRequest.\n\ + \ Corresponds to InstrumentType.id field.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\SOH\EOT\DC2\EOT\244\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\SOH\ENQ\DC2\EOT\244\RS\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\SOH\SOH\DC2\EOT\244\RS\DC4&\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\SOH\ETX\DC2\EOT\244\RS)*\n\ + \L\n\ + \\ENQ\EOT\133\SOH\STX\STX\DC2\EOT\247\RS\EOTB\SUB= [erasable] Instrument type level position and Trade limits.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\STX\EOT\DC2\EOT\247\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\STX\ACK\DC2\EOT\247\RS\r#\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\STX\SOH\DC2\EOT\247\RS$=\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\STX\ETX\DC2\EOT\247\RS@A\n\ + \^\n\ + \\ENQ\EOT\133\SOH\STX\ETX\DC2\EOT\250\RS\EOTC\SUBO [erasable] List of non-default allowed to trade configuration of commodities.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\ETX\EOT\DC2\EOT\250\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\ETX\ACK\DC2\EOT\250\RS\r!\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\ETX\SOH\DC2\EOT\250\RS\">\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\ETX\ETX\DC2\EOT\250\RSAB\n\ + \\\\n\ + \\ENQ\EOT\133\SOH\STX\EOT\DC2\EOT\253\RS\EOTA\SUBM [erasable] List of non-default allowed to trade configuration of contracts.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\EOT\EOT\DC2\EOT\253\RS\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\EOT\ACK\DC2\EOT\253\RS\r!\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\EOT\SOH\DC2\EOT\253\RS\"<\n\ + \\SO\n\ + \\ACK\EOT\133\SOH\STX\EOT\ETX\DC2\EOT\253\RS?@\n\ + \O\n\ + \\ETX\EOT\134\SOH\DC2\ACK\131\US\NUL\152\US\SOH\SUB@ Represents any entity that can be allowed/disallowed to trade.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\134\SOH\SOH\DC2\EOT\131\US\b\FS\n\ + \8\n\ + \\ENQ\EOT\134\SOH\STX\NUL\DC2\EOT\134\US\EOT'\SUB) Allows to clear allowed_to_trade field.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\NUL\EOT\DC2\EOT\134\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\NUL\ENQ\DC2\EOT\134\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\NUL\SOH\DC2\EOT\134\US\DC4\"\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\NUL\ETX\DC2\EOT\134\US%&\n\ + \\192\SOH\n\ + \\ENQ\EOT\134\SOH\STX\SOH\DC2\EOT\139\US\EOT\ESC\SUB\176\SOH Entity identifier. Can be ID of commodity or contract.\n\ + \ Commodity ID can be obtained via AccountAvailableExchangeGroupsRequest\n\ + \ and corresponds to TradableCommodity.id field.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\SOH\EOT\DC2\EOT\139\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\SOH\ENQ\DC2\EOT\139\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\SOH\SOH\DC2\EOT\139\US\DC4\SYN\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\SOH\ETX\DC2\EOT\139\US\EM\SUB\n\ + \\173\STX\n\ + \\ENQ\EOT\134\SOH\STX\STX\DC2\EOT\145\US\EOT'\SUB\157\STX [erasable] Indicates if entity is allowed to trade.\n\ + \ Values: null (not set) - default, actual value inherited from upper level.\n\ + \ false - explicitly disallowed, no matter what value is on upper level.\n\ + \ true - explicitly allowed, no matter what value is on upper level.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\STX\EOT\DC2\EOT\145\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\STX\ENQ\DC2\EOT\145\US\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\STX\SOH\DC2\EOT\145\US\DC2\"\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\STX\ETX\DC2\EOT\145\US%&\n\ + \x\n\ + \\ENQ\EOT\134\SOH\STX\ETX\DC2\EOT\149\US\EOT\RS\SUBi Enforce All brokerage accounts to use this setting.\n\ + \ Only applicable for Brokerage level configuration.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\ETX\EOT\DC2\EOT\149\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\ETX\ENQ\DC2\EOT\149\US\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\ETX\SOH\DC2\EOT\149\US\DC2\EM\n\ + \\SO\n\ + \\ACK\EOT\134\SOH\STX\ETX\ETX\DC2\EOT\149\US\FS\GS\n\ + \$\n\ + \\ETX\EOT\135\SOH\DC2\ACK\155\US\NUL\169\US\SOH\SUB\NAK Contract positions.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\135\SOH\SOH\DC2\EOT\155\US\b\CAN\n\ + \6\n\ + \\ENQ\EOT\135\SOH\STX\NUL\DC2\EOT\158\US\EOT\US\SUB' Contract symbol (Full contract name).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\NUL\EOT\DC2\EOT\158\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\NUL\ENQ\DC2\EOT\158\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\NUL\SOH\DC2\EOT\158\US\DC4\SUB\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\NUL\ETX\DC2\EOT\158\US\GS\RS\n\ + \^\n\ + \\ENQ\EOT\135\SOH\STX\SOH\DC2\EOT\161\US\EOT-\SUBO True if open positions are short (result of sell operations), long otherwise.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\SOH\EOT\DC2\EOT\161\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\SOH\ENQ\DC2\EOT\161\US\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\SOH\SOH\DC2\EOT\161\US\DC2(\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\SOH\ETX\DC2\EOT\161\US+,\n\ + \\150\SOH\n\ + \\ENQ\EOT\135\SOH\STX\STX\DC2\EOT\165\US\EOT,\SUB\134\SOH List of open positions.\n\ + \ There could be more than one position per contract separating contributed trades on different price levels.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\STX\EOT\DC2\EOT\165\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\STX\ACK\DC2\EOT\165\US\r\EM\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\STX\SOH\DC2\EOT\165\US\SUB'\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\STX\ETX\DC2\EOT\165\US*+\n\ + \=\n\ + \\ENQ\EOT\135\SOH\STX\ETX\DC2\EOT\168\US\EOT$\SUB. Contract id in case of grouping by contract.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\ETX\EOT\DC2\EOT\168\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\ETX\ENQ\DC2\EOT\168\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\ETX\SOH\DC2\EOT\168\US\DC4\US\n\ + \\SO\n\ + \\ACK\EOT\135\SOH\STX\ETX\ETX\DC2\EOT\168\US\"#\n\ + \(\n\ + \\ETX\EOT\136\SOH\DC2\ACK\172\US\NUL\227\US\SOH\SUB\EM Contract open position.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\136\SOH\SOH\DC2\EOT\172\US\b\DC4\n\ + \\SI\n\ + \\ENQ\EOT\136\SOH\EOT\NUL\DC2\ACK\174\US\EOT\182\US\ENQ\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\EOT\NUL\SOH\DC2\EOT\174\US\t\ETB\n\ + \B\n\ + \\a\EOT\136\SOH\EOT\NUL\STX\NUL\DC2\EOT\177\US\b\NAK\SUB1 'Start of the day' position. Statement was run.\n\ + \\n\ + \\DLE\n\ + \\b\EOT\136\SOH\EOT\NUL\STX\NUL\SOH\DC2\EOT\177\US\b\DLE\n\ + \\DLE\n\ + \\b\EOT\136\SOH\EOT\NUL\STX\NUL\STX\DC2\EOT\177\US\DC3\DC4\n\ + \\141\SOH\n\ + \\a\EOT\136\SOH\EOT\NUL\STX\SOH\DC2\EOT\181\US\b\SUB\SUB| 'Intraday' position. Order request was filled in current trading day.\n\ + \ Until statement, currency fills also included here.\n\ + \\n\ + \\DLE\n\ + \\b\EOT\136\SOH\EOT\NUL\STX\SOH\SOH\DC2\EOT\181\US\b\NAK\n\ + \\DLE\n\ + \\b\EOT\136\SOH\EOT\NUL\STX\SOH\STX\DC2\EOT\181\US\CAN\EM\n\ + \2\n\ + \\ENQ\EOT\136\SOH\STX\NUL\DC2\EOT\185\US\EOT9\SUB# [obsolete] Use qty field instead.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\NUL\EOT\DC2\EOT\185\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\NUL\ENQ\DC2\EOT\185\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\NUL\SOH\DC2\EOT\185\US\DC4 \n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\NUL\ETX\DC2\EOT\185\US#$\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\NUL\b\DC2\EOT\185\US%8\n\ + \\SI\n\ + \\a\EOT\136\SOH\STX\NUL\b\ETX\DC2\EOT\185\US&7\n\ + \\130\SOH\n\ + \\ENQ\EOT\136\SOH\STX\SOH\DC2\EOT\189\US\EOT\RS\SUBs Position average price.\n\ + \ NOTE: Since it could be an aggregated position price is sent in correct format directly.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\SOH\EOT\DC2\EOT\189\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\SOH\ENQ\DC2\EOT\189\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\SOH\SOH\DC2\EOT\189\US\DC4\EM\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\SOH\ETX\DC2\EOT\189\US\FS\GS\n\ + \k\n\ + \\ENQ\EOT\136\SOH\STX\STX\DC2\EOT\192\US\EOT#\SUB\\ Exchange specific trade date when the position was open or last changed (date only value).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\STX\EOT\DC2\EOT\192\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\STX\ENQ\DC2\EOT\192\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\STX\SOH\DC2\EOT\192\US\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\STX\ETX\DC2\EOT\192\US!\"\n\ + \2\n\ + \\ENQ\EOT\136\SOH\STX\ETX\DC2\EOT\195\US\EOT'\SUB# Statement date (date value only).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ETX\EOT\DC2\EOT\195\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ETX\ENQ\DC2\EOT\195\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ETX\SOH\DC2\EOT\195\US\DC4\"\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ETX\ETX\DC2\EOT\195\US%&\n\ + \\139\SOH\n\ + \\ENQ\EOT\136\SOH\STX\EOT\DC2\EOT\198\US\EOT'\SUB| UTC trade time (including date) if available, it might not be available e.g. for the previous day or aggregated positions.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\EOT\EOT\DC2\EOT\198\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\EOT\ENQ\DC2\EOT\198\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\EOT\SOH\DC2\EOT\198\US\DC4\"\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\EOT\ETX\DC2\EOT\198\US%&\n\ + \\151\SOH\n\ + \\ENQ\EOT\136\SOH\STX\ENQ\DC2\EOT\202\US\EOT$\SUB\135\SOH Position ID (status=POSITION) or order request ID (status=WORKING_ORDER)\n\ + \ associated with the position (if statement hasn't run yet).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ENQ\EOT\DC2\EOT\202\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ENQ\ENQ\DC2\EOT\202\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ENQ\SOH\DC2\EOT\202\US\DC4\US\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ENQ\ETX\DC2\EOT\202\US\"#\n\ + \\164\SOH\n\ + \\ENQ\EOT\136\SOH\STX\ACK\DC2\EOT\206\US\EOT\US\SUB\148\SOH Indicates whether it is 'start of the day' or 'intraday' (working order) position.\n\ + \ The value is associated with OpenPosition.PositionStatus enum.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ACK\EOT\DC2\EOT\206\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ACK\ENQ\DC2\EOT\206\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ACK\SOH\DC2\EOT\206\US\DC4\SUB\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\ACK\ETX\DC2\EOT\206\US\GS\RS\n\ + \I\n\ + \\ENQ\EOT\136\SOH\STX\a\DC2\EOT\209\US\EOT!\SUB: Position size, zero means that this position is deleted.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\a\EOT\DC2\EOT\209\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\a\ACK\DC2\EOT\209\US\r\CAN\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\a\SOH\DC2\EOT\209\US\EM\FS\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\a\ETX\DC2\EOT\209\US\US \n\ + \b\n\ + \\ENQ\EOT\136\SOH\STX\b\DC2\EOT\213\US\EOTD\SUBS [obsolete] Currency code (internal format).\n\ + \ Use currency_iso_code field instead.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\b\EOT\DC2\EOT\213\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\b\ENQ\DC2\EOT\213\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\b\SOH\DC2\EOT\213\US\DC4*\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\b\ETX\DC2\EOT\213\US-/\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\b\b\DC2\EOT\213\US0C\n\ + \\SI\n\ + \\a\EOT\136\SOH\STX\b\b\ETX\DC2\EOT\213\US1B\n\ + \p\n\ + \\ENQ\EOT\136\SOH\STX\t\DC2\EOT\217\US\EOT*\SUBa Position speculation type.\n\ + \ This field is associated with OrderChain.SpeculationType enum type.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\t\EOT\DC2\EOT\217\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\t\ENQ\DC2\EOT\217\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\t\SOH\DC2\EOT\217\US\DC4$\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\t\ETX\DC2\EOT\217\US')\n\ + \J\n\ + \\ENQ\EOT\136\SOH\STX\n\ + \\DC2\EOT\220\US\EOT(\SUB; Associated order chain in case of status = WORKING_ORDER.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\n\ + \\EOT\DC2\EOT\220\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\n\ + \\ENQ\DC2\EOT\220\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\n\ + \\SOH\DC2\EOT\220\US\DC4\"\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\n\ + \\ETX\DC2\EOT\220\US%'\n\ + \(\n\ + \\ENQ\EOT\136\SOH\STX\v\DC2\EOT\223\US\EOT'\SUB\EM Position display price.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\v\EOT\DC2\EOT\223\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\v\ENQ\DC2\EOT\223\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\v\SOH\DC2\EOT\223\US\DC4!\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\v\ETX\DC2\EOT\223\US$&\n\ + \<\n\ + \\ENQ\EOT\136\SOH\STX\f\DC2\EOT\226\US\EOT+\SUB- Currency code of position (ISO 4217 based).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\f\EOT\DC2\EOT\226\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\f\ENQ\DC2\EOT\226\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\f\SOH\DC2\EOT\226\US\DC4%\n\ + \\SO\n\ + \\ACK\EOT\136\SOH\STX\f\ETX\DC2\EOT\226\US(*\n\ + \\CAN\n\ + \\ETX\EOT\137\SOH\DC2\ACK\230\US\NUL\138 \SOH\SUB\t Equity.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\137\SOH\SOH\DC2\EOT\230\US\b\SO\n\ + \A\n\ + \\ENQ\EOT\137\SOH\STX\NUL\DC2\EOT\233\US\EOT!\SUB2 Currency code of equity values (ISO 4217 based).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\NUL\EOT\DC2\EOT\233\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\NUL\ENQ\DC2\EOT\233\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\NUL\SOH\DC2\EOT\233\US\DC4\FS\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\NUL\ETX\DC2\EOT\233\US\US \n\ + \N\n\ + \\ENQ\EOT\137\SOH\STX\SOH\DC2\EOT\236\US\EOT#\SUB? Securities on deposit. Margin security values net of haircut.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\SOH\EOT\DC2\EOT\236\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\SOH\ENQ\DC2\EOT\236\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\SOH\SOH\DC2\EOT\236\US\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\SOH\ETX\DC2\EOT\236\US!\"\n\ + \u\n\ + \\ENQ\EOT\137\SOH\STX\STX\DC2\EOT\239\US\EOT \SUBf Cash Balance excluding open futures profits/losses, option market values, and securities on deposit.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\STX\EOT\DC2\EOT\239\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\STX\ENQ\DC2\EOT\239\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\STX\SOH\DC2\EOT\239\US\DC4\ESC\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\STX\ETX\DC2\EOT\239\US\RS\US\n\ + \W\n\ + \\ENQ\EOT\137\SOH\STX\ETX\DC2\EOT\242\US\EOT\FS\SUBH Total open trade equity. Open profits/losses on all futures positions.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ETX\EOT\DC2\EOT\242\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ETX\ENQ\DC2\EOT\242\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ETX\SOH\DC2\EOT\242\US\DC4\ETB\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ETX\ETX\DC2\EOT\242\US\SUB\ESC\n\ + \:\n\ + \\ENQ\EOT\137\SOH\STX\EOT\DC2\EOT\245\US\EOT%\SUB+ Ending balance + total open trade equity.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\EOT\EOT\DC2\EOT\245\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\EOT\ENQ\DC2\EOT\245\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\EOT\SOH\DC2\EOT\245\US\DC4 \n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\EOT\ETX\DC2\EOT\245\US#$\n\ + \:\n\ + \\ENQ\EOT\137\SOH\STX\ENQ\DC2\EOT\248\US\EOT\FS\SUB+ Mark to market value of option positions.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ENQ\EOT\DC2\EOT\248\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ENQ\ENQ\DC2\EOT\248\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ENQ\SOH\DC2\EOT\248\US\DC4\ETB\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ENQ\ETX\DC2\EOT\248\US\SUB\ESC\n\ + \A\n\ + \\ENQ\EOT\137\SOH\STX\ACK\DC2\EOT\251\US\EOT$\SUB2 Total equity + option market value + securities.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ACK\EOT\DC2\EOT\251\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ACK\ENQ\DC2\EOT\251\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ACK\SOH\DC2\EOT\251\US\DC4\US\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\ACK\ETX\DC2\EOT\251\US\"#\n\ + \I\n\ + \\ENQ\EOT\137\SOH\STX\a\DC2\EOT\254\US\EOT$\SUB: Liquid funds available -- can be withdrawn from account.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\a\EOT\DC2\EOT\254\US\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\a\ENQ\DC2\EOT\254\US\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\a\SOH\DC2\EOT\254\US\DC4\US\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\a\ETX\DC2\EOT\254\US\"#\n\ + \\130\SOH\n\ + \\ENQ\EOT\137\SOH\STX\b\DC2\EOT\130 \EOT'\SUBs Implied initial margin requirement.\n\ + \ Equity required to establish current positions based on margin requirements.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\b\EOT\DC2\EOT\130 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\b\ENQ\DC2\EOT\130 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\b\SOH\DC2\EOT\130 \DC4\"\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\b\ETX\DC2\EOT\130 %&\n\ + \\141\SOH\n\ + \\ENQ\EOT\137\SOH\STX\t\DC2\EOT\134 \EOT&\SUB~ Implied maintenance margin requirement.\n\ + \ Minimum equity required to maintain current positions based on margin requirements.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\t\EOT\DC2\EOT\134 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\t\ENQ\DC2\EOT\134 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\t\SOH\DC2\EOT\134 \DC4 \n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\t\ETX\DC2\EOT\134 #%\n\ + \C\n\ + \\ENQ\EOT\137\SOH\STX\n\ + \\DC2\EOT\137 \EOT'\SUB4 The sum of total equity and securities on deposit.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\n\ + \\EOT\DC2\EOT\137 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\n\ + \\ENQ\DC2\EOT\137 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\n\ + \\SOH\DC2\EOT\137 \DC4!\n\ + \\SO\n\ + \\ACK\EOT\137\SOH\STX\n\ + \\ETX\DC2\EOT\137 $&\n\ + \-\n\ + \\ETX\EOT\138\SOH\DC2\ACK\141 \NUL\152 \SOH\SUB\RS Collateral (margin details).\n\ + \\n\ + \\f\n\ + \\EOT\EOT\138\SOH\SOH\DC2\EOT\141 \b\DC2\n\ + \H\n\ + \\ENQ\EOT\138\SOH\STX\NUL\DC2\EOT\144 \EOT!\SUB9 Currency code of margin and PP values (ISO 4217 based).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\NUL\EOT\DC2\EOT\144 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\NUL\ENQ\DC2\EOT\144 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\NUL\SOH\DC2\EOT\144 \DC4\FS\n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\NUL\ETX\DC2\EOT\144 \US \n\ + \&\n\ + \\ENQ\EOT\138\SOH\STX\SOH\DC2\EOT\147 \EOT%\SUB\ETB Current total margin.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\SOH\EOT\DC2\EOT\147 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\SOH\ENQ\DC2\EOT\147 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\SOH\SOH\DC2\EOT\147 \DC4 \n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\SOH\ETX\DC2\EOT\147 #$\n\ + \\187\SOH\n\ + \\ENQ\EOT\138\SOH\STX\STX\DC2\EOT\151 \EOT)\SUB\171\SOH Available account funds including balance, realized profit (or loss), collateral and credits.\n\ + \ NOTE: OTE and MVO are not included, regardless of account risk parameters.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\STX\EOT\DC2\EOT\151 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\STX\ENQ\DC2\EOT\151 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\STX\SOH\DC2\EOT\151 \DC4$\n\ + \\SO\n\ + \\ACK\EOT\138\SOH\STX\STX\ETX\DC2\EOT\151 '(\n\ + \;\n\ + \\ETX\EOT\139\SOH\DC2\ACK\155 \NUL\131!\SOH\SUB, Information about one of the found orders.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\139\SOH\SOH\DC2\EOT\155 \b\US\n\ + \*\n\ + \\ENQ\EOT\139\SOH\STX\NUL\DC2\EOT\158 \EOT1\SUB\ESC Brokerage account number.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\NUL\EOT\DC2\EOT\158 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\NUL\ENQ\DC2\EOT\158 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\NUL\SOH\DC2\EOT\158 \DC4,\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\NUL\ETX\DC2\EOT\158 /0\n\ + \\SUB\n\ + \\ENQ\EOT\139\SOH\STX\SOH\DC2\EOT\161 \EOT!\SUB\v Order ID.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SOH\EOT\DC2\EOT\161 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SOH\ENQ\DC2\EOT\161 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SOH\SOH\DC2\EOT\161 \DC4\FS\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SOH\ETX\DC2\EOT\161 \US \n\ + \\US\n\ + \\ENQ\EOT\139\SOH\STX\STX\DC2\EOT\164 \EOT&\SUB\DLE Ticket number.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\STX\EOT\DC2\EOT\164 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\STX\ENQ\DC2\EOT\164 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\STX\SOH\DC2\EOT\164 \DC4!\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\STX\ETX\DC2\EOT\164 $%\n\ + \P\n\ + \\ENQ\EOT\139\SOH\STX\ETX\DC2\EOT\168 \EOT\GS\SUBA Order side.\n\ + \ The value is associated with OrderChain.Side enum.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ETX\EOT\DC2\EOT\168 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ETX\ENQ\DC2\EOT\168 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ETX\SOH\DC2\EOT\168 \DC4\CAN\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ETX\ETX\DC2\EOT\168 \ESC\FS\n\ + \U\n\ + \\ENQ\EOT\139\SOH\STX\EOT\DC2\EOT\172 \EOT\GS\SUBF Order type.\n\ + \ The value is associated with OrderChain.OrderType enum.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\EOT\EOT\DC2\EOT\172 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\EOT\ENQ\DC2\EOT\172 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\EOT\SOH\DC2\EOT\172 \DC4\CAN\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\EOT\ETX\DC2\EOT\172 \ESC\FS\n\ + \:\n\ + \\ENQ\EOT\139\SOH\STX\ENQ\DC2\EOT\176 \EOT$\SUB+ Order limit price.\n\ + \ Correct price format.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ENQ\EOT\DC2\EOT\176 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ENQ\ENQ\DC2\EOT\176 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ENQ\SOH\DC2\EOT\176 \DC4\US\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ENQ\ETX\DC2\EOT\176 \"#\n\ + \9\n\ + \\ENQ\EOT\139\SOH\STX\ACK\DC2\EOT\180 \EOT#\SUB* Order stop price.\n\ + \ Correct price format.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ACK\EOT\DC2\EOT\180 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ACK\ENQ\DC2\EOT\180 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ACK\SOH\DC2\EOT\180 \DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ACK\ETX\DC2\EOT\180 !\"\n\ + \\US\n\ + \\ENQ\EOT\139\SOH\STX\a\DC2\EOT\183 \EOT&\SUB\DLE Contract name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\a\EOT\DC2\EOT\183 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\a\ENQ\DC2\EOT\183 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\a\SOH\DC2\EOT\183 \DC4!\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\a\ETX\DC2\EOT\183 $%\n\ + \I\n\ + \\ENQ\EOT\139\SOH\STX\b\DC2\EOT\186 \EOT+\SUB: Time when order was submitted to execution system (UTC).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\b\EOT\DC2\EOT\186 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\b\ENQ\DC2\EOT\186 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\b\SOH\DC2\EOT\186 \DC4&\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\b\ETX\DC2\EOT\186 )*\n\ + \`\n\ + \\ENQ\EOT\139\SOH\STX\t\DC2\EOT\190 \EOT \SUBQ Order chain status.\n\ + \ This field is associated with OrderChain.Status enum type.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\t\EOT\DC2\EOT\190 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\t\ENQ\DC2\EOT\190 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\t\SOH\DC2\EOT\190 \DC4\SUB\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\t\ETX\DC2\EOT\190 \GS\US\n\ + \\ESC\n\ + \\ENQ\EOT\139\SOH\STX\n\ + \\DC2\EOT\193 \EOT#\SUB\f User name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\n\ + \\EOT\DC2\EOT\193 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\n\ + \\ENQ\DC2\EOT\193 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\n\ + \\SOH\DC2\EOT\193 \DC4\GS\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\n\ + \\ETX\DC2\EOT\193 \"\n\ + \S\n\ + \\ENQ\EOT\139\SOH\STX\v\DC2\EOT\196 \EOT,\SUBD Last name of customer to whom belongs login that placed the order.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\v\EOT\DC2\EOT\196 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\v\ENQ\DC2\EOT\196 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\v\SOH\DC2\EOT\196 \DC4&\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\v\ETX\DC2\EOT\196 )+\n\ + \ \n\ + \\ENQ\EOT\139\SOH\STX\f\DC2\EOT\199 \EOT(\SUB\DC1 Brokerage name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\f\EOT\DC2\EOT\199 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\f\ENQ\DC2\EOT\199 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\f\SOH\DC2\EOT\199 \DC4\"\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\f\ETX\DC2\EOT\199 %'\n\ + \\FS\n\ + \\ENQ\EOT\139\SOH\STX\r\DC2\EOT\202 \EOT$\SUB\r Route name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\r\EOT\DC2\EOT\202 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\r\ENQ\DC2\EOT\202 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\r\SOH\DC2\EOT\202 \DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\r\ETX\DC2\EOT\202 !#\n\ + \2\n\ + \\ENQ\EOT\139\SOH\STX\SO\DC2\EOT\205 \EOT$\SUB# Trade routing account identifier.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SO\EOT\DC2\EOT\205 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SO\ENQ\DC2\EOT\205 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SO\SOH\DC2\EOT\205 \DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SO\ETX\DC2\EOT\205 !#\n\ + \\RS\n\ + \\ENQ\EOT\139\SOH\STX\SI\DC2\EOT\208 \EOT&\SUB\SI Account name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SI\EOT\DC2\EOT\208 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SI\ENQ\DC2\EOT\208 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SI\SOH\DC2\EOT\208 \DC4 \n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SI\ETX\DC2\EOT\208 #%\n\ + \#\n\ + \\ENQ\EOT\139\SOH\STX\DLE\DC2\EOT\211 \EOT+\SUB\DC4 Native route name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DLE\EOT\DC2\EOT\211 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DLE\ENQ\DC2\EOT\211 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DLE\SOH\DC2\EOT\211 \DC4%\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DLE\ETX\DC2\EOT\211 (*\n\ + \'\n\ + \\ENQ\EOT\139\SOH\STX\DC1\DC2\EOT\214 \EOT/\SUB\CAN Route client order ID.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC1\EOT\DC2\EOT\214 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC1\ENQ\DC2\EOT\214 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC1\SOH\DC2\EOT\214 \DC4)\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC1\ETX\DC2\EOT\214 ,.\n\ + \\US\n\ + \\ENQ\EOT\139\SOH\STX\DC2\DC2\EOT\217 \EOT'\SUB\DLE Exchange name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC2\EOT\DC2\EOT\217 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC2\ENQ\DC2\EOT\217 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC2\SOH\DC2\EOT\217 \DC4!\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC2\ETX\DC2\EOT\217 $&\n\ + \ \n\ + \\ENQ\EOT\139\SOH\STX\DC3\DC2\EOT\220 \EOT(\SUB\DC1 Chain order id.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC3\EOT\DC2\EOT\220 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC3\ENQ\DC2\EOT\220 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC3\SOH\DC2\EOT\220 \DC4\"\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC3\ETX\DC2\EOT\220 %'\n\ + \A\n\ + \\ENQ\EOT\139\SOH\STX\DC4\DC2\EOT\224 \EOT-\SUB2 Limit price of the order.\n\ + \ Display price format.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC4\EOT\DC2\EOT\224 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC4\ENQ\DC2\EOT\224 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC4\SOH\DC2\EOT\224 \DC4'\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\DC4\ETX\DC2\EOT\224 *,\n\ + \@\n\ + \\ENQ\EOT\139\SOH\STX\NAK\DC2\EOT\228 \EOT,\SUB1 Stop price of the order.\n\ + \ Display price format.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\NAK\EOT\DC2\EOT\228 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\NAK\ENQ\DC2\EOT\228 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\NAK\SOH\DC2\EOT\228 \DC4&\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\NAK\ETX\DC2\EOT\228 )+\n\ + \3\n\ + \\ENQ\EOT\139\SOH\STX\SYN\DC2\EOT\231 \EOT;\SUB$ [obsolete] Use size field instead.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SYN\EOT\DC2\EOT\231 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SYN\ENQ\DC2\EOT\231 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SYN\SOH\DC2\EOT\231 \DC4!\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SYN\ETX\DC2\EOT\231 $&\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SYN\b\DC2\EOT\231 ':\n\ + \\SI\n\ + \\a\EOT\139\SOH\STX\SYN\b\ETX\DC2\EOT\231 (9\n\ + \%\n\ + \\ENQ\EOT\139\SOH\STX\ETB\DC2\EOT\234 \EOT-\SUB\SYN Sales series number.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ETB\EOT\DC2\EOT\234 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ETB\ENQ\DC2\EOT\234 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ETB\SOH\DC2\EOT\234 \DC4'\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ETB\ETX\DC2\EOT\234 *,\n\ + \#\n\ + \\ENQ\EOT\139\SOH\STX\CAN\DC2\EOT\237 \EOT+\SUB\DC4 Sales series name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\CAN\EOT\DC2\EOT\237 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\CAN\ENQ\DC2\EOT\237 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\CAN\SOH\DC2\EOT\237 \DC4%\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\CAN\ETX\DC2\EOT\237 (*\n\ + \J\n\ + \\ENQ\EOT\139\SOH\STX\EM\DC2\EOT\241 \EOT)\SUB; Id of sales series.\n\ + \ Use profile_sales_series_id instead.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\EM\EOT\DC2\EOT\241 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\EM\ENQ\DC2\EOT\241 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\EM\SOH\DC2\EOT\241 \DC4#\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\EM\ETX\DC2\EOT\241 &(\n\ + \2\n\ + \\ENQ\EOT\139\SOH\STX\SUB\DC2\EOT\244 \EOT#\SUB# Total positive size of the order.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SUB\EOT\DC2\EOT\244 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SUB\ACK\DC2\EOT\244 \r\CAN\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SUB\SOH\DC2\EOT\244 \EM\GS\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\SUB\ETX\DC2\EOT\244 \"\n\ + \,\n\ + \\ENQ\EOT\139\SOH\STX\ESC\DC2\EOT\247 \EOT1\SUB\GS Profile id of sales series.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ESC\EOT\DC2\EOT\247 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ESC\ENQ\DC2\EOT\247 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ESC\SOH\DC2\EOT\247 \DC4+\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\ESC\ETX\DC2\EOT\247 .0\n\ + \\\\n\ + \\ENQ\EOT\139\SOH\STX\FS\DC2\EOT\251 \EOT'\SUBM Order extended side.\n\ + \ This field is associated with ExtendedSide enum type.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\FS\EOT\DC2\EOT\251 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\FS\ENQ\DC2\EOT\251 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\FS\SOH\DC2\EOT\251 \DC4!\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\FS\ETX\DC2\EOT\251 $&\n\ + \C\n\ + \\ENQ\EOT\139\SOH\STX\GS\DC2\EOT\254 \EOT,\SUB4 Guid of batch request initiated this order request\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\GS\EOT\DC2\EOT\254 \EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\GS\ENQ\DC2\EOT\254 \r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\GS\SOH\DC2\EOT\254 \DC4&\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\GS\ETX\DC2\EOT\254 )+\n\ + \b\n\ + \\ENQ\EOT\139\SOH\STX\RS\DC2\EOT\130!\EOT%\SUBS Order request state.\n\ + \ This field is associated with OrderRequest.State enum type.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\RS\EOT\DC2\EOT\130!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\RS\ENQ\DC2\EOT\130!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\RS\SOH\DC2\EOT\130!\DC4\US\n\ + \\SO\n\ + \\ACK\EOT\139\SOH\STX\RS\ETX\DC2\EOT\130!\"$\n\ + \,\n\ + \\ETX\EOT\140\SOH\DC2\ACK\134!\NUL\149!\SOH\SUB\GS [obsolete] Account cluster.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\140\SOH\SOH\DC2\EOT\134!\b\SYN\n\ + \U\n\ + \\ENQ\EOT\140\SOH\STX\NUL\DC2\EOT\138!\EOT\ESC\SUBF Account cluster id.\n\ + \ Omit the value during account cluster creation.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\NUL\EOT\DC2\EOT\138!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\NUL\ENQ\DC2\EOT\138!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\NUL\SOH\DC2\EOT\138!\DC4\SYN\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\NUL\ETX\DC2\EOT\138!\EM\SUB\n\ + \4\n\ + \\ENQ\EOT\140\SOH\STX\SOH\DC2\EOT\141!\EOT%\SUB% Brokerage id the cluster points to.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\SOH\EOT\DC2\EOT\141!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\SOH\ENQ\DC2\EOT\141!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\SOH\SOH\DC2\EOT\141!\DC4 \n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\SOH\ETX\DC2\EOT\141!#$\n\ + \1\n\ + \\ENQ\EOT\140\SOH\STX\STX\DC2\EOT\144!\EOT\GS\SUB\" Cluster name (max length = 256).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\STX\EOT\DC2\EOT\144!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\STX\ENQ\DC2\EOT\144!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\STX\SOH\DC2\EOT\144!\DC4\CAN\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\STX\ETX\DC2\EOT\144!\ESC\FS\n\ + \u\n\ + \\ENQ\EOT\140\SOH\STX\ETX\DC2\EOT\148!\EOT!\SUBf True if the cluster is removed.\n\ + \ Set the value to true during update to remove this account cluster.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\ETX\EOT\DC2\EOT\148!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\ETX\ENQ\DC2\EOT\148!\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\ETX\SOH\DC2\EOT\148!\DC2\FS\n\ + \\SO\n\ + \\ACK\EOT\140\SOH\STX\ETX\ETX\DC2\EOT\148!\US \n\ + \\\\n\ + \\ETX\EOT\141\SOH\DC2\ACK\152!\NUL\176!\SOH\SUBM [obsolete] Account cluster price offsets per commodity and instrument type.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\141\SOH\SOH\DC2\EOT\152!\b!\n\ + \D\n\ + \\ENQ\EOT\141\SOH\STX\NUL\DC2\EOT\155!\EOT'\SUB5 List of field ids to clear during update operation.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\NUL\EOT\DC2\EOT\155!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\NUL\ENQ\DC2\EOT\155!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\NUL\SOH\DC2\EOT\155!\DC4\"\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\NUL\ETX\DC2\EOT\155!%&\n\ + \0\n\ + \\ENQ\EOT\141\SOH\STX\SOH\DC2\EOT\158!\EOT%\SUB! Commodity string id (aka Xbit).\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\SOH\EOT\DC2\EOT\158!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\SOH\ENQ\DC2\EOT\158!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\SOH\SOH\DC2\EOT\158!\DC4 \n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\SOH\ETX\DC2\EOT\158!#$\n\ + \H\n\ + \\ENQ\EOT\141\SOH\STX\STX\DC2\EOT\161!\EOT+\SUB9 Trade routing system identifier of the instrument type.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\STX\EOT\DC2\EOT\161!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\STX\ENQ\DC2\EOT\161!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\STX\SOH\DC2\EOT\161!\DC4&\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\STX\ETX\DC2\EOT\161!)*\n\ + \'\n\ + \\ENQ\EOT\141\SOH\STX\ETX\DC2\EOT\164!\EOT+\SUB\CAN Price offset in ticks.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ETX\EOT\DC2\EOT\164!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ETX\ENQ\DC2\EOT\164!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ETX\SOH\DC2\EOT\164!\DC4&\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ETX\ETX\DC2\EOT\164!)*\n\ + \>\n\ + \\ENQ\EOT\141\SOH\STX\EOT\DC2\EOT\167!\EOT+\SUB/ [erasable] Hedge order price offset in ticks.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\EOT\EOT\DC2\EOT\167!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\EOT\ENQ\DC2\EOT\167!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\EOT\SOH\DC2\EOT\167!\DC4&\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\EOT\ETX\DC2\EOT\167!)*\n\ + \\151\SOH\n\ + \\ENQ\EOT\141\SOH\STX\ENQ\DC2\EOT\171!\EOT/\SUB\135\SOH [erasable] List of execution instructions for hedge order.\n\ + \ Each field value is associated with OrderChain.ExecInstruction enum type.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ENQ\EOT\DC2\EOT\171!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ENQ\ENQ\DC2\EOT\171!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ENQ\SOH\DC2\EOT\171!\DC4*\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ENQ\ETX\DC2\EOT\171!-.\n\ + \\158\SOH\n\ + \\ENQ\EOT\141\SOH\STX\ACK\DC2\EOT\175!\EOT4\SUB\142\SOH [erasable] Visible quantity of hedge iceberg order in percent.\n\ + \ The parameter is applied for hedge order with ICEBERG execution instruction.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ACK\EOT\DC2\EOT\175!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ACK\ENQ\DC2\EOT\175!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ACK\SOH\DC2\EOT\175!\DC4/\n\ + \\SO\n\ + \\ACK\EOT\141\SOH\STX\ACK\ETX\DC2\EOT\175!23\n\ + \,\n\ + \\ETX\EOT\142\SOH\DC2\ACK\179!\NUL\201!\SOH\SUB\GS Represents available route.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\142\SOH\SOH\DC2\EOT\179!\b\SYN\n\ + \*\n\ + \\ENQ\EOT\142\SOH\STX\NUL\DC2\EOT\182!\EOT4\SUB\ESC Route common information.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\NUL\EOT\DC2\EOT\182!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\NUL\ACK\DC2\EOT\182!\r\GS\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\NUL\SOH\DC2\EOT\182!\RS/\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\NUL\ETX\DC2\EOT\182!23\n\ + \ \n\ + \\ENQ\EOT\142\SOH\STX\SOH\DC2\EOT\185!\EOT!\SUB\DC1 Route priority.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\SOH\EOT\DC2\EOT\185!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\SOH\ENQ\DC2\EOT\185!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\SOH\SOH\DC2\EOT\185!\DC4\FS\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\SOH\ETX\DC2\EOT\185!\US \n\ + \\SI\n\ + \\ENQ\EOT\142\SOH\EOT\NUL\DC2\ACK\187!\EOT\194!\ENQ\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\EOT\NUL\SOH\DC2\EOT\187!\t\ESC\n\ + \\SI\n\ + \\a\EOT\142\SOH\EOT\NUL\STX\NUL\DC2\EOT\189!\b\ETB\n\ + \\DLE\n\ + \\b\EOT\142\SOH\EOT\NUL\STX\NUL\SOH\DC2\EOT\189!\b\DC2\n\ + \\DLE\n\ + \\b\EOT\142\SOH\EOT\NUL\STX\NUL\STX\DC2\EOT\189!\NAK\SYN\n\ + \\SI\n\ + \\a\EOT\142\SOH\EOT\NUL\STX\SOH\DC2\EOT\191!\b\DC4\n\ + \\DLE\n\ + \\b\EOT\142\SOH\EOT\NUL\STX\SOH\SOH\DC2\EOT\191!\b\SI\n\ + \\DLE\n\ + \\b\EOT\142\SOH\EOT\NUL\STX\SOH\STX\DC2\EOT\191!\DC2\DC3\n\ + \\SI\n\ + \\a\EOT\142\SOH\EOT\NUL\STX\STX\DC2\EOT\193!\b\NAK\n\ + \\DLE\n\ + \\b\EOT\142\SOH\EOT\NUL\STX\STX\SOH\DC2\EOT\193!\b\DLE\n\ + \\DLE\n\ + \\b\EOT\142\SOH\EOT\NUL\STX\STX\STX\DC2\EOT\193!\DC3\DC4\n\ + \G\n\ + \\ENQ\EOT\142\SOH\STX\STX\DC2\EOT\197!\EOT-\SUB8 This filed is associated with OmnibusSupportType enum.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\STX\EOT\DC2\EOT\197!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\STX\ENQ\DC2\EOT\197!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\STX\SOH\DC2\EOT\197!\DC4(\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\STX\ETX\DC2\EOT\197!+,\n\ + \:\n\ + \\ENQ\EOT\142\SOH\STX\ETX\DC2\EOT\200!\EOT6\SUB+ Available omnibus accounts for the route.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\ETX\EOT\DC2\EOT\200!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\ETX\ACK\DC2\EOT\200!\r \n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\ETX\SOH\DC2\EOT\200!!1\n\ + \\SO\n\ + \\ACK\EOT\142\SOH\STX\ETX\ETX\DC2\EOT\200!45\n\ + \E\n\ + \\ETX\EOT\143\SOH\DC2\ACK\204!\NUL\220!\SOH\SUB6 Represents omnibus account, configured on the route.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\143\SOH\SOH\DC2\EOT\204!\b\ESC\n\ + \$\n\ + \\ENQ\EOT\143\SOH\STX\NUL\DC2\EOT\207!\EOT#\SUB\NAK Omnibus account id.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\NUL\EOT\DC2\EOT\207!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\NUL\ENQ\DC2\EOT\207!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\NUL\SOH\DC2\EOT\207!\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\NUL\ETX\DC2\EOT\207!!\"\n\ + \&\n\ + \\ENQ\EOT\143\SOH\STX\SOH\DC2\EOT\210!\EOT%\SUB\ETB Omnibus account name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\SOH\EOT\DC2\EOT\210!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\SOH\ENQ\DC2\EOT\210!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\SOH\SOH\DC2\EOT\210!\DC4 \n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\SOH\ETX\DC2\EOT\210!#$\n\ + \0\n\ + \\ENQ\EOT\143\SOH\STX\STX\DC2\EOT\213!\EOT1\SUB! Omnibus brokerage account name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\STX\EOT\DC2\EOT\213!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\STX\ENQ\DC2\EOT\213!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\STX\SOH\DC2\EOT\213!\DC4,\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\STX\ETX\DC2\EOT\213!/0\n\ + \*\n\ + \\ENQ\EOT\143\SOH\STX\ETX\DC2\EOT\216!\EOT!\SUB\ESC Omnibus account priority.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\ETX\EOT\DC2\EOT\216!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\ETX\ENQ\DC2\EOT\216!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\ETX\SOH\DC2\EOT\216!\DC4\FS\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\ETX\ETX\DC2\EOT\216!\US \n\ + \)\n\ + \\ENQ\EOT\143\SOH\STX\EOT\DC2\EOT\219!\EOT0\SUB\SUB Risk server instance id.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\EOT\EOT\DC2\EOT\219!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\EOT\ENQ\DC2\EOT\219!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\EOT\SOH\DC2\EOT\219!\DC4+\n\ + \\SO\n\ + \\ACK\EOT\143\SOH\STX\EOT\ETX\DC2\EOT\219!./\n\ + \5\n\ + \\ETX\EOT\144\SOH\DC2\ACK\223!\NUL\252!\SOH\SUB& Represents route common information.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\144\SOH\SOH\DC2\EOT\223!\b\CAN\n\ + \*\n\ + \\ENQ\EOT\144\SOH\STX\NUL\DC2\EOT\226!\EOT#\SUB\ESC Code number of the route.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\NUL\EOT\DC2\EOT\226!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\NUL\ENQ\DC2\EOT\226!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\NUL\SOH\DC2\EOT\226!\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\NUL\ETX\DC2\EOT\226!!\"\n\ + \\FS\n\ + \\ENQ\EOT\144\SOH\STX\SOH\DC2\EOT\229!\EOT#\SUB\r Route name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\SOH\EOT\DC2\EOT\229!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\SOH\ENQ\DC2\EOT\229!\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\SOH\SOH\DC2\EOT\229!\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\SOH\ETX\DC2\EOT\229!!\"\n\ + \:\n\ + \\ENQ\EOT\144\SOH\STX\STX\DC2\EOT\232!\EOT+\SUB+ If set, synthetic strategies are allowed.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\STX\EOT\DC2\EOT\232!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\STX\ENQ\DC2\EOT\232!\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\STX\SOH\DC2\EOT\232!\DC2&\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\STX\ETX\DC2\EOT\232!)*\n\ + \4\n\ + \\ENQ\EOT\144\SOH\STX\ETX\DC2\EOT\235!\EOT2\SUB% List of available route attributes.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ETX\EOT\DC2\EOT\235!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ETX\ACK\DC2\EOT\235!\r\"\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ETX\SOH\DC2\EOT\235!#-\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ETX\ETX\DC2\EOT\235!01\n\ + \E\n\ + \\ENQ\EOT\144\SOH\STX\EOT\DC2\EOT\238!\EOTN\SUB6 [obsolete] If set, route has overlapped instruments.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\EOT\EOT\DC2\EOT\238!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\EOT\ENQ\DC2\EOT\238!\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\EOT\SOH\DC2\EOT\238!\DC25\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\EOT\ETX\DC2\EOT\238!89\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\EOT\b\DC2\EOT\238!:M\n\ + \\SI\n\ + \\a\EOT\144\SOH\STX\EOT\b\ETX\DC2\EOT\238!;L\n\ + \V\n\ + \\ENQ\EOT\144\SOH\STX\ENQ\DC2\EOT\241!\EOT-\SUBG [immutable] If set, account requires authorization to use this route.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ENQ\EOT\DC2\EOT\241!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ENQ\ENQ\DC2\EOT\241!\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ENQ\SOH\DC2\EOT\241!\DC2(\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ENQ\ETX\DC2\EOT\241!+,\n\ + \T\n\ + \\ENQ\EOT\144\SOH\STX\ACK\DC2\EOT\244!\EOT2\SUBE [immutable] Indicates whether this route supports synthetic orders.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ACK\EOT\DC2\EOT\244!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ACK\ENQ\DC2\EOT\244!\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ACK\SOH\DC2\EOT\244!\DC2-\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\ACK\ETX\DC2\EOT\244!01\n\ + \\\\n\ + \\ENQ\EOT\144\SOH\STX\a\DC2\EOT\247!\EOT9\SUBM List of available route algorithmic strategies allowed on particular route.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\a\EOT\DC2\EOT\247!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\a\ACK\DC2\EOT\247!\r\RS\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\a\SOH\DC2\EOT\247!\US4\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\a\ETX\DC2\EOT\247!78\n\ + \\175\SOH\n\ + \\ENQ\EOT\144\SOH\STX\b\DC2\EOT\251!\EOT-\SUB\159\SOH [immutable] If set, account requires primary trade-routing login enabled to use this route.\n\ + \ Only one route with enabled this flag can be enabled on account.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\b\EOT\DC2\EOT\251!\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\b\ENQ\DC2\EOT\251!\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\b\SOH\DC2\EOT\251!\DC2(\n\ + \\SO\n\ + \\ACK\EOT\144\SOH\STX\b\ETX\DC2\EOT\251!+,\n\ + \,\n\ + \\ETX\EOT\145\SOH\DC2\ACK\255!\NUL\137\"\SOH\SUB\GS Route algorithmic strategy.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\145\SOH\SOH\DC2\EOT\255!\b\EM\n\ + \M\n\ + \\ENQ\EOT\145\SOH\STX\NUL\DC2\EOT\130\"\EOT\ESC\SUB> Algorithmic strategy identifier allowed on particular route.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\NUL\EOT\DC2\EOT\130\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\NUL\ENQ\DC2\EOT\130\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\NUL\SOH\DC2\EOT\130\"\DC4\SYN\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\NUL\ETX\DC2\EOT\130\"\EM\SUB\n\ + \+\n\ + \\ENQ\EOT\145\SOH\STX\SOH\DC2\EOT\133\"\EOT$\SUB\FS Algorithmic strategy name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\SOH\EOT\DC2\EOT\133\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\SOH\ACK\DC2\EOT\133\"\r\SUB\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\SOH\SOH\DC2\EOT\133\"\ESC\US\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\SOH\ETX\DC2\EOT\133\"\"#\n\ + \\RS\n\ + \\ENQ\EOT\145\SOH\STX\STX\DC2\EOT\136\"\EOT\RS\SUB\SI Removed flag.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\STX\EOT\DC2\EOT\136\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\STX\ENQ\DC2\EOT\136\"\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\STX\SOH\DC2\EOT\136\"\DC2\EM\n\ + \\SO\n\ + \\ACK\EOT\145\SOH\STX\STX\ETX\DC2\EOT\136\"\FS\GS\n\ + \!\n\ + \\ETX\EOT\146\SOH\DC2\ACK\140\"\NUL\144\"\SOH\SUB\DC2 Restore account.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\146\SOH\SOH\DC2\EOT\140\"\b\SYN\n\ + \2\n\ + \\ENQ\EOT\146\SOH\STX\NUL\DC2\EOT\143\"\EOT#\SUB# [required] Account id to restore.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\146\SOH\STX\NUL\EOT\DC2\EOT\143\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\146\SOH\STX\NUL\ENQ\DC2\EOT\143\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\146\SOH\STX\NUL\SOH\DC2\EOT\143\"\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\146\SOH\STX\NUL\ETX\DC2\EOT\143\"!\"\n\ + \:\n\ + \\ETX\EOT\147\SOH\DC2\ACK\147\"\NUL\151\"\SOH\SUB+ Account type overrides per exchange list.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\147\SOH\SOH\DC2\EOT\147\"\b&\n\ + \=\n\ + \\ENQ\EOT\147\SOH\STX\NUL\DC2\EOT\150\"\EOT#\SUB. [required] Account id to get type overrides.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\147\SOH\STX\NUL\EOT\DC2\EOT\150\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\147\SOH\STX\NUL\ENQ\DC2\EOT\150\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\147\SOH\STX\NUL\SOH\DC2\EOT\150\"\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\147\SOH\STX\NUL\ETX\DC2\EOT\150\"!\"\n\ + \4\n\ + \\ETX\EOT\148\SOH\DC2\ACK\154\"\NUL\165\"\SOH\SUB% Update account type overrides list.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\148\SOH\SOH\DC2\EOT\154\"\b%\n\ + \@\n\ + \\ENQ\EOT\148\SOH\STX\NUL\DC2\EOT\157\"\EOT#\SUB1 [required] Account id to update type overrides.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\NUL\EOT\DC2\EOT\157\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\NUL\ENQ\DC2\EOT\157\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\NUL\SOH\DC2\EOT\157\"\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\NUL\ETX\DC2\EOT\157\"!\"\n\ + \,\n\ + \\ENQ\EOT\148\SOH\STX\SOH\DC2\EOT\160\"\EOT6\SUB\GS Overrides to add or change.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\SOH\EOT\DC2\EOT\160\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\SOH\ACK\DC2\EOT\160\"\r \n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\SOH\SOH\DC2\EOT\160\"!1\n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\SOH\ETX\DC2\EOT\160\"45\n\ + \[\n\ + \\ENQ\EOT\148\SOH\STX\STX\DC2\EOT\164\"\EOT4\SUBL Overrides to remove from account.\n\ + \ First - login id, second - exchange id.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\STX\EOT\DC2\EOT\164\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\STX\ACK\DC2\EOT\164\"\r\ESC\n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\STX\SOH\DC2\EOT\164\"\FS/\n\ + \\SO\n\ + \\ACK\EOT\148\SOH\STX\STX\ETX\DC2\EOT\164\"23\n\ + \e\n\ + \\ETX\EOT\149\SOH\DC2\ACK\168\"\NUL\171\"\SOH\SUB\ESC Result of RestoreAccount.\n\ + \\"9 If message is received then operation was successfully.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\149\SOH\SOH\DC2\EOT\168\"\b\FS\n\ + \:\n\ + \\ETX\EOT\150\SOH\DC2\ACK\174\"\NUL\178\"\SOH\SUB+ Result of AccountTypeOverrideListRequest.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\150\SOH\SOH\DC2\EOT\174\"\b%\n\ + \(\n\ + \\ENQ\EOT\150\SOH\STX\NUL\DC2\EOT\177\"\EOT/\SUB\EM Account type overrides.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\150\SOH\STX\NUL\EOT\DC2\EOT\177\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\150\SOH\STX\NUL\ACK\DC2\EOT\177\"\r \n\ + \\SO\n\ + \\ACK\EOT\150\SOH\STX\NUL\SOH\DC2\EOT\177\"!*\n\ + \\SO\n\ + \\ACK\EOT\150\SOH\STX\NUL\ETX\DC2\EOT\177\"-.\n\ + \u\n\ + \\ETX\EOT\151\SOH\DC2\ACK\182\"\NUL\199\"\SOH\SUBf Represents account type override per exchange.\n\ + \ Exchange ID + trade routing login ID pair is unique.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\151\SOH\SOH\DC2\EOT\182\"\b\ESC\n\ + \\138\SOH\n\ + \\ENQ\EOT\151\SOH\STX\NUL\DC2\EOT\186\"\EOT$\SUB{ [required] Exchange identifier.\n\ + \ LookupPropertyListRequest { property_type = common_1.CommonLookupPropertyType.EXCHANGE }\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\NUL\EOT\DC2\EOT\186\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\NUL\ENQ\DC2\EOT\186\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\NUL\SOH\DC2\EOT\186\"\DC4\US\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\NUL\ETX\DC2\EOT\186\"\"#\n\ + \T\n\ + \\ENQ\EOT\151\SOH\STX\SOH\DC2\EOT\190\"\EOT!\SUBE Possible affected login.\n\ + \ If not provided, all logins are affected.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\SOH\EOT\DC2\EOT\190\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\SOH\ENQ\DC2\EOT\190\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\SOH\SOH\DC2\EOT\190\"\DC4\FS\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\SOH\ETX\DC2\EOT\190\"\US \n\ + \\141\SOH\n\ + \\ENQ\EOT\151\SOH\STX\STX\DC2\EOT\194\"\EOT \SUB~ [required] Account type override.\n\ + \ LookupPropertyListRequest { property_type = TradeRoutingLookupPropertyType.ACCOUNT_TYPE }\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\STX\EOT\DC2\EOT\194\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\STX\ENQ\DC2\EOT\194\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\STX\SOH\DC2\EOT\194\"\DC4\ESC\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\STX\ETX\DC2\EOT\194\"\RS\US\n\ + \\146\SOH\n\ + \\ENQ\EOT\151\SOH\STX\ETX\DC2\EOT\198\"\EOT\"\SUB\130\SOH [required] Account origin override.\n\ + \ LookupPropertyListRequest { property_type = TradeRoutingLookupPropertyType.ACCOUNT_ORIGIN }\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\ETX\EOT\DC2\EOT\198\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\ETX\ENQ\DC2\EOT\198\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\ETX\SOH\DC2\EOT\198\"\DC4\GS\n\ + \\SO\n\ + \\ACK\EOT\151\SOH\STX\ETX\ETX\DC2\EOT\198\" !\n\ + \t\n\ + \\ETX\EOT\152\SOH\DC2\ACK\202\"\NUL\205\"\SOH\SUB* Result of UpdateAccountTypeOverrideList.\n\ + \\"9 If message is received then operation was successfully.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\152\SOH\SOH\DC2\EOT\202\"\b+\n\ + \B\n\ + \\ETX\EOT\153\SOH\DC2\ACK\208\"\NUL\216\"\SOH\SUB3 Update account user authorization list operation.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\153\SOH\SOH\DC2\EOT\208\"\b*\n\ + \\141\SOH\n\ + \\ENQ\EOT\153\SOH\STX\NUL\DC2\EOT\212\"\EOT.\SUB~ Links to add or modify.\n\ + \ Authorization is added if it does not exist with this account and user id, it is updated otherwise.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\153\SOH\STX\NUL\EOT\DC2\EOT\212\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\153\SOH\STX\NUL\ACK\DC2\EOT\212\"\r\FS\n\ + \\SO\n\ + \\ACK\EOT\153\SOH\STX\NUL\SOH\DC2\EOT\212\"\GS)\n\ + \\SO\n\ + \\ACK\EOT\153\SOH\STX\NUL\ETX\DC2\EOT\212\",-\n\ + \]\n\ + \\ENQ\EOT\153\SOH\STX\SOH\DC2\EOT\215\"\EOT0\SUBN Links to remove. First - account id [required], second - user id [required].\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\153\SOH\STX\SOH\EOT\DC2\EOT\215\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\153\SOH\STX\SOH\ACK\DC2\EOT\215\"\r\ESC\n\ + \\SO\n\ + \\ACK\EOT\153\SOH\STX\SOH\SOH\DC2\EOT\215\"\FS+\n\ + \\SO\n\ + \\ACK\EOT\153\SOH\STX\SOH\ETX\DC2\EOT\215\"./\n\ + \\138\SOH\n\ + \\ETX\EOT\154\SOH\DC2\ACK\219\"\NUL\222\"\SOH\SUB3 Result of account user authorization list update.\n\ + \\"F If message is received then authorizations was updated successfully.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\154\SOH\SOH\DC2\EOT\219\"\b0\n\ + \ \n\ + \\ETX\EOT\155\SOH\DC2\ACK\225\"\NUL\229\"\SOH\SUB\DC1 Remove account.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\155\SOH\SOH\DC2\EOT\225\"\b\NAK\n\ + \1\n\ + \\ENQ\EOT\155\SOH\STX\NUL\DC2\EOT\228\"\EOT#\SUB\" [required] Account id to remove.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\155\SOH\STX\NUL\EOT\DC2\EOT\228\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\155\SOH\STX\NUL\ENQ\DC2\EOT\228\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\155\SOH\STX\NUL\SOH\DC2\EOT\228\"\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\155\SOH\STX\NUL\ETX\DC2\EOT\228\"!\"\n\ + \d\n\ + \\ETX\EOT\156\SOH\DC2\ACK\232\"\NUL\235\"\SOH\SUB\SUB Result of RemoveAccount.\n\ + \\"9 If message is received then operation was successfully.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\156\SOH\SOH\DC2\EOT\232\"\b\ESC\n\ + \V\n\ + \\ETX\EOT\157\SOH\DC2\ACK\238\"\NUL\242\"\SOH\SUBG Gets available to account Service Groups according to enabled routes.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\157\SOH\SOH\DC2\EOT\238\"\b/\n\ + \'\n\ + \\ENQ\EOT\157\SOH\STX\NUL\DC2\EOT\241\"\EOT#\SUB\CAN [required] Account id.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\157\SOH\STX\NUL\EOT\DC2\EOT\241\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\157\SOH\STX\NUL\ENQ\DC2\EOT\241\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\157\SOH\STX\NUL\SOH\DC2\EOT\241\"\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\157\SOH\STX\NUL\ETX\DC2\EOT\241\"!\"\n\ + \7\n\ + \\ETX\EOT\158\SOH\DC2\ACK\245\"\NUL\249\"\SOH\SUB( Gets account's enabled Service Groups.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\158\SOH\SOH\DC2\EOT\245\"\b&\n\ + \'\n\ + \\ENQ\EOT\158\SOH\STX\NUL\DC2\EOT\248\"\EOT#\SUB\CAN [required] Account id.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\158\SOH\STX\NUL\EOT\DC2\EOT\248\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\158\SOH\STX\NUL\ENQ\DC2\EOT\248\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\158\SOH\STX\NUL\SOH\DC2\EOT\248\"\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\158\SOH\STX\NUL\ETX\DC2\EOT\248\"!\"\n\ + \B\n\ + \\ETX\EOT\159\SOH\DC2\ACK\252\"\NUL\134#\SOH\SUB3 Updates list of account's enabled Service Groups.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\159\SOH\SOH\DC2\EOT\252\"\b%\n\ + \'\n\ + \\ENQ\EOT\159\SOH\STX\NUL\DC2\EOT\255\"\EOT#\SUB\CAN [required] Account id.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\NUL\EOT\DC2\EOT\255\"\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\NUL\ENQ\DC2\EOT\255\"\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\NUL\SOH\DC2\EOT\255\"\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\NUL\ETX\DC2\EOT\255\"!\"\n\ + \)\n\ + \\ENQ\EOT\159\SOH\STX\SOH\DC2\EOT\130#\EOT1\SUB\SUB Service Groups to enable\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\SOH\EOT\DC2\EOT\130#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\SOH\ENQ\DC2\EOT\130#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\SOH\SOH\DC2\EOT\130#\DC4,\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\SOH\ETX\DC2\EOT\130#/0\n\ + \7\n\ + \\ENQ\EOT\159\SOH\STX\STX\DC2\EOT\133#\EOT4\SUB( Service Groups to remove from account.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\STX\EOT\DC2\EOT\133#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\STX\ENQ\DC2\EOT\133#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\STX\SOH\DC2\EOT\133#\DC4/\n\ + \\SO\n\ + \\ACK\EOT\159\SOH\STX\STX\ETX\DC2\EOT\133#23\n\ + \C\n\ + \\ETX\EOT\160\SOH\DC2\ACK\137#\NUL\141#\SOH\SUB4 Result of AccountAvailableServiceGroupListRequest.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\160\SOH\SOH\DC2\EOT\137#\b.\n\ + \C\n\ + \\ENQ\EOT\160\SOH\STX\NUL\DC2\EOT\140#\EOT-\SUB4 Currently available to account Service Group list.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\160\SOH\STX\NUL\EOT\DC2\EOT\140#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\160\SOH\STX\NUL\ACK\DC2\EOT\140#\r\EM\n\ + \\SO\n\ + \\ACK\EOT\160\SOH\STX\NUL\SOH\DC2\EOT\140#\SUB(\n\ + \\SO\n\ + \\ACK\EOT\160\SOH\STX\NUL\ETX\DC2\EOT\140#+,\n\ + \1\n\ + \\ETX\EOT\161\SOH\DC2\ACK\144#\NUL\154#\SOH\SUB\" Represents Service Group entity.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\161\SOH\SOH\DC2\EOT\144#\b\DC4\n\ + \0\n\ + \\ENQ\EOT\161\SOH\STX\NUL\DC2\EOT\147#\EOT\ESC\SUB! [immutable] Service Group's id.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\NUL\EOT\DC2\EOT\147#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\NUL\ENQ\DC2\EOT\147#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\NUL\SOH\DC2\EOT\147#\DC4\SYN\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\NUL\ETX\DC2\EOT\147#\EM\SUB\n\ + \\"\n\ + \\ENQ\EOT\161\SOH\STX\SOH\DC2\EOT\150#\EOT\GS\SUB\DC3 [immutable] Name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\SOH\EOT\DC2\EOT\150#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\SOH\ENQ\DC2\EOT\150#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\SOH\SOH\DC2\EOT\150#\DC4\CAN\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\SOH\ETX\DC2\EOT\150#\ESC\FS\n\ + \*\n\ + \\ENQ\EOT\161\SOH\STX\STX\DC2\EOT\153#\EOT\RS\SUB\ESC [immutable] Removed flag.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\STX\EOT\DC2\EOT\153#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\STX\ENQ\DC2\EOT\153#\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\STX\SOH\DC2\EOT\153#\DC2\EM\n\ + \\SO\n\ + \\ACK\EOT\161\SOH\STX\STX\ETX\DC2\EOT\153#\FS\GS\n\ + \:\n\ + \\ETX\EOT\162\SOH\DC2\ACK\157#\NUL\161#\SOH\SUB+ Result of AccountServiceGroupListRequest.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\162\SOH\SOH\DC2\EOT\157#\b%\n\ + \(\n\ + \\ENQ\EOT\162\SOH\STX\NUL\DC2\EOT\160#\EOT*\SUB\EM Enabled Service Groups.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\162\SOH\STX\NUL\EOT\DC2\EOT\160#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\162\SOH\STX\NUL\ENQ\DC2\EOT\160#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\162\SOH\STX\NUL\SOH\DC2\EOT\160#\DC4%\n\ + \\SO\n\ + \\ACK\EOT\162\SOH\STX\NUL\ETX\DC2\EOT\160#()\n\ + \t\n\ + \\ETX\EOT\163\SOH\DC2\ACK\164#\NUL\167#\SOH\SUB* Result of UpdateAccountServiceGroupList.\n\ + \\"9 If message is received then operation was successfully.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\163\SOH\SOH\DC2\EOT\164#\b+\n\ + \N\n\ + \\ETX\EOT\164\SOH\DC2\ACK\170#\NUL\172#\SOH\SUB? Gets billable exchanges available to the current admin login.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\164\SOH\SOH\DC2\EOT\170#\b#\n\ + \7\n\ + \\ETX\EOT\165\SOH\DC2\ACK\175#\NUL\178#\SOH\SUB( Result of BillableExchangeListRequest.\n\ + \\n\ + \\f\n\ + \\EOT\EOT\165\SOH\SOH\DC2\EOT\175#\b\"\n\ + \\r\n\ + \\ENQ\EOT\165\SOH\STX\NUL\DC2\EOT\177#\EOT5\n\ + \\SO\n\ + \\ACK\EOT\165\SOH\STX\NUL\EOT\DC2\EOT\177#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\165\SOH\STX\NUL\ACK\DC2\EOT\177#\r\GS\n\ + \\SO\n\ + \\ACK\EOT\165\SOH\STX\NUL\SOH\DC2\EOT\177#\RS0\n\ + \\SO\n\ + \\ACK\EOT\165\SOH\STX\NUL\ETX\DC2\EOT\177#34\n\ + \\r\n\ + \\ETX\EOT\166\SOH\DC2\ACK\180#\NUL\197#\SOH\n\ + \\f\n\ + \\EOT\EOT\166\SOH\SOH\DC2\EOT\180#\b\CAN\n\ + \(\n\ + \\ENQ\EOT\166\SOH\STX\NUL\DC2\EOT\183#\EOT\US\SUB\EM Billable Exchange's id.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\NUL\EOT\DC2\EOT\183#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\NUL\ENQ\DC2\EOT\183#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\NUL\SOH\DC2\EOT\183#\DC4\SUB\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\NUL\ETX\DC2\EOT\183#\GS\RS\n\ + \\SYN\n\ + \\ENQ\EOT\166\SOH\STX\SOH\DC2\EOT\186#\EOT\GS\SUB\a Name.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\SOH\EOT\DC2\EOT\186#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\SOH\ENQ\DC2\EOT\186#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\SOH\SOH\DC2\EOT\186#\DC4\CAN\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\SOH\ETX\DC2\EOT\186#\ESC\FS\n\ + \\GS\n\ + \\ENQ\EOT\166\SOH\STX\STX\DC2\EOT\189#\EOT$\SUB\SO Description.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\STX\EOT\DC2\EOT\189#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\STX\ENQ\DC2\EOT\189#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\STX\SOH\DC2\EOT\189#\DC4\US\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\STX\ETX\DC2\EOT\189#\"#\n\ + \\151\SOH\n\ + \\ENQ\EOT\166\SOH\STX\ETX\DC2\EOT\193#\EOT:\SUB\135\SOH Service Groups authorization level (Amount Allowed per Exchange).\n\ + \ This field is associated with ServiceGroupAuthorizationLevel enum.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\ETX\EOT\DC2\EOT\193#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\ETX\ENQ\DC2\EOT\193#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\ETX\SOH\DC2\EOT\193#\DC45\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\ETX\ETX\DC2\EOT\193#89\n\ + \'\n\ + \\ENQ\EOT\166\SOH\STX\EOT\DC2\EOT\196#\EOT*\SUB\CAN Linked Service Groups.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\EOT\EOT\DC2\EOT\196#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\EOT\ENQ\DC2\EOT\196#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\EOT\SOH\DC2\EOT\196#\DC4%\n\ + \\SO\n\ + \\ACK\EOT\166\SOH\STX\EOT\ETX\DC2\EOT\196#()\n\ + \\r\n\ + \\ETX\EOT\167\SOH\DC2\ACK\199#\NUL\202#\SOH\n\ + \\f\n\ + \\EOT\EOT\167\SOH\SOH\DC2\EOT\199#\b\SUB\n\ + \\r\n\ + \\ENQ\EOT\167\SOH\STX\NUL\DC2\EOT\201#\EOT0\n\ + \\SO\n\ + \\ACK\EOT\167\SOH\STX\NUL\EOT\DC2\EOT\201#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\167\SOH\STX\NUL\ACK\DC2\EOT\201#\r\EM\n\ + \\SO\n\ + \\ACK\EOT\167\SOH\STX\NUL\SOH\DC2\EOT\201#\SUB+\n\ + \\SO\n\ + \\ACK\EOT\167\SOH\STX\NUL\ETX\DC2\EOT\201#./\n\ + \\r\n\ + \\ETX\EOT\168\SOH\DC2\ACK\204#\NUL\208#\SOH\n\ + \\f\n\ + \\EOT\EOT\168\SOH\SOH\DC2\EOT\204#\b \n\ + \*\n\ + \\ENQ\EOT\168\SOH\STX\NUL\DC2\EOT\207#\EOT-\SUB\ESC Created account group id.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\168\SOH\STX\NUL\EOT\DC2\EOT\207#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\168\SOH\STX\NUL\ENQ\DC2\EOT\207#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\168\SOH\STX\NUL\SOH\DC2\EOT\207#\DC4(\n\ + \\SO\n\ + \\ACK\EOT\168\SOH\STX\NUL\ETX\DC2\EOT\207#+,\n\ + \\r\n\ + \\ETX\EOT\169\SOH\DC2\ACK\210#\NUL\220#\SOH\n\ + \\f\n\ + \\EOT\EOT\169\SOH\SOH\DC2\EOT\210#\b\SUB\n\ + \4\n\ + \\ENQ\EOT\169\SOH\STX\NUL\DC2\EOT\213#\EOT,\SUB% [required] Account group to update.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\NUL\EOT\DC2\EOT\213#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\NUL\ACK\DC2\EOT\213#\r\EM\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\NUL\SOH\DC2\EOT\213#\SUB'\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\NUL\ETX\DC2\EOT\213#*+\n\ + \,\n\ + \\ENQ\EOT\169\SOH\STX\SOH\DC2\EOT\216#\EOT0\SUB\GS Sub-accounts to add/update.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\SOH\EOT\DC2\EOT\216#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\SOH\ACK\DC2\EOT\216#\r\ETB\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\SOH\SOH\DC2\EOT\216#\CAN+\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\SOH\ETX\DC2\EOT\216#./\n\ + \(\n\ + \\ENQ\EOT\169\SOH\STX\STX\DC2\EOT\219#\EOT2\SUB\EM Sub-accounts to remove.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\STX\EOT\DC2\EOT\219#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\STX\ENQ\DC2\EOT\219#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\STX\SOH\DC2\EOT\219#\DC4-\n\ + \\SO\n\ + \\ACK\EOT\169\SOH\STX\STX\ETX\DC2\EOT\219#01\n\ + \\r\n\ + \\ETX\EOT\170\SOH\DC2\ACK\222#\NUL\226#\SOH\n\ + \\f\n\ + \\EOT\EOT\170\SOH\SOH\DC2\EOT\222#\b\SUB\n\ + \7\n\ + \\ENQ\EOT\170\SOH\STX\NUL\DC2\EOT\225#\EOT)\SUB( [required] Account group id to remove.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\170\SOH\STX\NUL\EOT\DC2\EOT\225#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\170\SOH\STX\NUL\ENQ\DC2\EOT\225#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\170\SOH\STX\NUL\SOH\DC2\EOT\225#\DC4$\n\ + \\SO\n\ + \\ACK\EOT\170\SOH\STX\NUL\ETX\DC2\EOT\225#'(\n\ + \\r\n\ + \\ETX\EOT\171\SOH\DC2\ACK\228#\NUL\237#\SOH\n\ + \\f\n\ + \\EOT\EOT\171\SOH\SOH\DC2\EOT\228#\b\RS\n\ + \n\n\ + \\ENQ\EOT\171\SOH\STX\NUL\DC2\EOT\232#\EOT#\SUB_ ID of the account with positions data to delete.\n\ + \ Mutually exclusive with position_ids field.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\171\SOH\STX\NUL\EOT\DC2\EOT\232#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\171\SOH\STX\NUL\ENQ\DC2\EOT\232#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\171\SOH\STX\NUL\SOH\DC2\EOT\232#\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\171\SOH\STX\NUL\ETX\DC2\EOT\232#!\"\n\ + \d\n\ + \\ENQ\EOT\171\SOH\STX\SOH\DC2\EOT\236#\EOT%\SUBU Specific position identifiers to delete.\n\ + \ Mutually exclusive with account_id field.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\171\SOH\STX\SOH\EOT\DC2\EOT\236#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\171\SOH\STX\SOH\ENQ\DC2\EOT\236#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\171\SOH\STX\SOH\SOH\DC2\EOT\236#\DC4 \n\ + \\SO\n\ + \\ACK\EOT\171\SOH\STX\SOH\ETX\DC2\EOT\236##$\n\ + \\r\n\ + \\ETX\EOT\172\SOH\DC2\ACK\239#\NUL\243#\SOH\n\ + \\f\n\ + \\EOT\EOT\172\SOH\SOH\DC2\EOT\239#\b%\n\ + \.\n\ + \\ENQ\EOT\172\SOH\STX\NUL\DC2\EOT\242#\EOT#\SUB\US [required] ID of the account.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\172\SOH\STX\NUL\EOT\DC2\EOT\242#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\172\SOH\STX\NUL\ENQ\DC2\EOT\242#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\172\SOH\STX\NUL\SOH\DC2\EOT\242#\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\172\SOH\STX\NUL\ETX\DC2\EOT\242#!\"\n\ + \\r\n\ + \\ETX\EOT\173\SOH\DC2\ACK\245#\NUL\248#\SOH\n\ + \\f\n\ + \\EOT\EOT\173\SOH\SOH\DC2\EOT\245#\b$\n\ + \\r\n\ + \\ENQ\EOT\173\SOH\STX\NUL\DC2\EOT\247#\EOTS\n\ + \\SO\n\ + \\ACK\EOT\173\SOH\STX\NUL\EOT\DC2\EOT\247#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\173\SOH\STX\NUL\ACK\DC2\EOT\247#\r+\n\ + \\SO\n\ + \\ACK\EOT\173\SOH\STX\NUL\SOH\DC2\EOT\247#,N\n\ + \\SO\n\ + \\ACK\EOT\173\SOH\STX\NUL\ETX\DC2\EOT\247#QR\n\ + \\r\n\ + \\ETX\EOT\174\SOH\DC2\ACK\250#\NUL\130$\SOH\n\ + \\f\n\ + \\EOT\EOT\174\SOH\SOH\DC2\EOT\250#\b$\n\ + \.\n\ + \\ENQ\EOT\174\SOH\STX\NUL\DC2\EOT\253#\EOT#\SUB\US [required] ID of the account.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\NUL\EOT\DC2\EOT\253#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\NUL\ENQ\DC2\EOT\253#\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\NUL\SOH\DC2\EOT\253#\DC4\RS\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\NUL\ETX\DC2\EOT\253#!\"\n\ + \\r\n\ + \\ENQ\EOT\174\SOH\STX\SOH\DC2\EOT\255#\EOTR\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\SOH\EOT\DC2\EOT\255#\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\SOH\ACK\DC2\EOT\255#\r+\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\SOH\SOH\DC2\EOT\255#,M\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\SOH\ETX\DC2\EOT\255#PQ\n\ + \\r\n\ + \\ENQ\EOT\174\SOH\STX\STX\DC2\EOT\129$\EOT@\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\STX\EOT\DC2\EOT\129$\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\STX\ENQ\DC2\EOT\129$\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\STX\SOH\DC2\EOT\129$\DC4;\n\ + \\SO\n\ + \\ACK\EOT\174\SOH\STX\STX\ETX\DC2\EOT\129$>?\n\ + \\r\n\ + \\ETX\EOT\175\SOH\DC2\ACK\132$\NUL\143$\SOH\n\ + \\f\n\ + \\EOT\EOT\175\SOH\SOH\DC2\EOT\132$\b&\n\ + \\189\SOH\n\ + \\ENQ\EOT\175\SOH\STX\NUL\DC2\EOT\137$\EOT\ESC\SUB\173\SOH [required-update] ID of the trading interface element.\n\ + \ List of available Interface Elements with corresponding ID's\n\ + \ can be obtained with cmsapi_1.TradingFeaturesRequest.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\175\SOH\STX\NUL\EOT\DC2\EOT\137$\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\175\SOH\STX\NUL\ENQ\DC2\EOT\137$\r\DC3\n\ + \\SO\n\ + \\ACK\EOT\175\SOH\STX\NUL\SOH\DC2\EOT\137$\DC4\SYN\n\ + \\SO\n\ + \\ACK\EOT\175\SOH\STX\NUL\ETX\DC2\EOT\137$\EM\SUB\n\ + \\158\SOH\n\ + \\ENQ\EOT\175\SOH\STX\SOH\DC2\EOT\142$\EOT\RS\SUB\142\SOH Indicates if trading interface element is enabled for the account.\n\ + \ Values: false - explicitly disabled.\n\ + \ true - explicitly enabled.\n\ + \\n\ + \\SO\n\ + \\ACK\EOT\175\SOH\STX\SOH\EOT\DC2\EOT\142$\EOT\f\n\ + \\SO\n\ + \\ACK\EOT\175\SOH\STX\SOH\ENQ\DC2\EOT\142$\r\DC1\n\ + \\SO\n\ + \\ACK\EOT\175\SOH\STX\SOH\SOH\DC2\EOT\142$\DC2\EM\n\ + \\SO\n\ + \\ACK\EOT\175\SOH\STX\SOH\ETX\DC2\EOT\142$\FS\GS\n\ + \\128\SOH\n\ + \\STX\ENQ\NUL\DC2\ACK\149$\NUL\180$\SOH\SUB3 Types of trade routing related lookup properties.\n\ + \2=//------------------------------------------\n\ + \// Enumerations\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\NUL\SOH\DC2\EOT\149$\ENQ#\n\ + \T\n\ + \\EOT\ENQ\NUL\STX\NUL\DC2\EOT\152$\EOT\ETB\SUBF Type of the account (e.g. 'Customer Account', 'House Account', etc.)\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\NUL\SOH\DC2\EOT\152$\EOT\DLE\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\NUL\STX\DC2\EOT\152$\DC3\SYN\n\ + \*\n\ + \\EOT\ENQ\NUL\STX\SOH\DC2\EOT\155$\EOT\RS\SUB\FS MODES Account groups type.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\SOH\SOH\DC2\EOT\155$\EOT\ETB\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\SOH\STX\DC2\EOT\155$\SUB\GS\n\ + \\ESC\n\ + \\EOT\ENQ\NUL\STX\STX\DC2\EOT\158$\EOT\DC4\SUB\r Time zones.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\STX\SOH\DC2\EOT\158$\EOT\r\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\STX\STX\DC2\EOT\158$\DLE\DC3\n\ + \&\n\ + \\EOT\ENQ\NUL\STX\ETX\DC2\EOT\161$\EOT\US\SUB\CAN Risk server instances.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\ETX\SOH\DC2\EOT\161$\EOT\CAN\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\ETX\STX\DC2\EOT\161$\ESC\RS\n\ + \ \n\ + \\EOT\ENQ\NUL\STX\EOT\DC2\EOT\164$\EOT\EM\SUB\DC2 Trade locations.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\EOT\SOH\DC2\EOT\164$\EOT\DC2\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\EOT\STX\DC2\EOT\164$\NAK\CAN\n\ + \\RS\n\ + \\EOT\ENQ\NUL\STX\ENQ\DC2\EOT\167$\EOT\SYN\SUB\DLE Order classes.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\ENQ\SOH\DC2\EOT\167$\EOT\SI\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\ENQ\STX\DC2\EOT\167$\DC2\NAK\n\ + \:\n\ + \\EOT\ENQ\NUL\STX\ACK\DC2\EOT\170$\EOT\EM\SUB, Account origin ('Customer', 'firm', etc. )\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\ACK\SOH\DC2\EOT\170$\EOT\DC2\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\ACK\STX\DC2\EOT\170$\NAK\CAN\n\ + \O\n\ + \\EOT\ENQ\NUL\STX\a\DC2\EOT\173$\EOT \SUBA Execution source codes that can be used for Account-Login link.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\a\SOH\DC2\EOT\173$\EOT\EM\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\a\STX\DC2\EOT\173$\FS\US\n\ + \%\n\ + \\EOT\ENQ\NUL\STX\b\DC2\EOT\176$\EOT\RS\SUB\ETB CQG MiFID Algorithms.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\b\SOH\DC2\EOT\176$\EOT\ETB\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\b\STX\DC2\EOT\176$\SUB\GS\n\ + \\NAK\n\ + \\EOT\ENQ\NUL\STX\t\DC2\EOT\179$\EOT\RS\SUB\a MiFID\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\t\SOH\DC2\EOT\179$\EOT\ETB\n\ + \\r\n\ + \\ENQ\ENQ\NUL\STX\t\STX\DC2\EOT\179$\SUB\GS\n\ + \-\n\ + \\STX\ENQ\SOH\DC2\ACK\183$\NUL\196$\SOH\SUB\US Price limit mode enumeration.\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\SOH\SOH\DC2\EOT\183$\ENQ\DC3\n\ + \s\n\ + \\EOT\ENQ\SOH\STX\NUL\DC2\EOT\186$\EOT\ETB\SUBe Trade price limit check is enforced only for orders subject to immediate execution. Check LMT only.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\NUL\SOH\DC2\EOT\186$\EOT\DC2\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\NUL\STX\DC2\EOT\186$\NAK\SYN\n\ + \v\n\ + \\EOT\ENQ\SOH\STX\SOH\DC2\EOT\189$\EOT\ESC\SUBh Trade price limit check is enforced only for orders subject to immediate execution. Check LMT and STP.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\SOH\SOH\DC2\EOT\189$\EOT\SYN\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\SOH\STX\DC2\EOT\189$\EM\SUB\n\ + \S\n\ + \\EOT\ENQ\SOH\STX\STX\DC2\EOT\192$\EOT\DLE\SUBE Trade price limit check is enforced for all orders. Check LMT only.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\STX\SOH\DC2\EOT\192$\EOT\v\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\STX\STX\DC2\EOT\192$\SO\SI\n\ + \V\n\ + \\EOT\ENQ\SOH\STX\ETX\DC2\EOT\195$\EOT\DC4\SUBH Trade price limit check is enforced for all orders. Check LMT and STP.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\ETX\SOH\DC2\EOT\195$\EOT\SI\n\ + \\r\n\ + \\ENQ\ENQ\SOH\STX\ETX\STX\DC2\EOT\195$\DC2\DC3\n\ + \\ESC\n\ + \\STX\ENQ\STX\DC2\ACK\199$\NUL\209$\SOH\SUB\r Limit mode.\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\STX\SOH\DC2\EOT\199$\ENQ\SO\n\ + \8\n\ + \\EOT\ENQ\STX\STX\NUL\DC2\EOT\202$\EOT\DLE\SUB* Limit is inherited from a parent entity.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\NUL\SOH\DC2\EOT\202$\EOT\v\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\NUL\STX\DC2\EOT\202$\SO\SI\n\ + \&\n\ + \\EOT\ENQ\STX\STX\SOH\DC2\EOT\205$\EOT\DC2\SUB\CAN Limit is not enforced.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\SOH\SOH\DC2\EOT\205$\EOT\r\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\SOH\STX\DC2\EOT\205$\DLE\DC1\n\ + \\"\n\ + \\EOT\ENQ\STX\STX\STX\DC2\EOT\208$\EOT\DLE\SUB\DC4 Limit is enforced.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\STX\SOH\DC2\EOT\208$\EOT\v\n\ + \\r\n\ + \\ENQ\ENQ\STX\STX\STX\STX\DC2\EOT\208$\SO\SI\n\ + \\f\n\ + \\STX\ENQ\ETX\DC2\ACK\211$\NUL\223$\SOH\n\ + \\v\n\ + \\ETX\ENQ\ETX\SOH\DC2\EOT\211$\ENQ#\n\ + \j\n\ + \\EOT\ENQ\ETX\STX\NUL\DC2\EOT\214$\EOT\r\SUB\\ No additional authorization is required. Product enablement enables linked Service Groups.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\NUL\SOH\DC2\EOT\214$\EOT\b\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\NUL\STX\DC2\EOT\214$\v\f\n\ + \\180\SOH\n\ + \\EOT\ENQ\ETX\STX\SOH\DC2\EOT\218$\EOT\NAK\SUB\165\SOH Only one Service Group for the exchange is possible to enable at the same time.\n\ + \ If nothing is enabled then there is no authorization to see/trade linked products.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\SOH\SOH\DC2\EOT\218$\EOT\DLE\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\SOH\STX\DC2\EOT\218$\DC3\DC4\n\ + \\159\SOH\n\ + \\EOT\ENQ\ETX\STX\STX\DC2\EOT\222$\EOT\NAK\SUB\144\SOH One or more Service Group can be enabled at the same time.\n\ + \ If nothing is enabled then there is no authorization to see/trade linked products.\n\ + \\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\STX\SOH\DC2\EOT\222$\EOT\DLE\n\ + \\r\n\ + \\ENQ\ENQ\ETX\STX\STX\STX\DC2\EOT\222$\DC3\DC4\n\ + \0\n\ + \\STX\ENQ\EOT\DC2\ACK\226$\NUL\232$\SOH\SUB\" List of possible extended sides.\n\ + \\n\ + \\v\n\ + \\ETX\ENQ\EOT\SOH\DC2\EOT\226$\ENQ\DC1\n\ + \\f\n\ + \\EOT\ENQ\EOT\STX\NUL\DC2\EOT\228$\EOT\SUB\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\NUL\SOH\DC2\EOT\228$\EOT\NAK\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\NUL\STX\DC2\EOT\228$\CAN\EM\n\ + \\f\n\ + \\EOT\ENQ\EOT\STX\SOH\DC2\EOT\229$\EOT\ESC\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\SOH\SOH\DC2\EOT\229$\EOT\SYN\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\SOH\STX\DC2\EOT\229$\EM\SUB\n\ + \\f\n\ + \\EOT\ENQ\EOT\STX\STX\DC2\EOT\230$\EOT!\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\STX\SOH\DC2\EOT\230$\EOT\FS\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\STX\STX\DC2\EOT\230$\US \n\ + \\f\n\ + \\EOT\ENQ\EOT\STX\ETX\DC2\EOT\231$\EOT(\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\ETX\SOH\DC2\EOT\231$\EOT#\n\ + \\r\n\ + \\ENQ\ENQ\EOT\STX\ETX\STX\DC2\EOT\231$&'" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/CMS/Traderouting1_Fields.hs b/cqg-cms-api-proto/src/Proto/CMS/Traderouting1_Fields.hs new file mode 100644 index 0000000..1dd0cc3 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/CMS/Traderouting1_Fields.hs @@ -0,0 +1,7164 @@ +{- This file was auto-generated from CMS/traderouting_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.CMS.Traderouting1_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +import qualified Proto.CMS.Common1 +import qualified Proto.CMS.Order1 +import qualified Proto.Common.Decimal +import qualified Proto.Common.Shared1 +account :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "account" a) => + Lens.Family2.LensLike' f s a +account = Data.ProtoLens.Field.field @"account" +accountAndUserInfo :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountAndUserInfo" a) => + Lens.Family2.LensLike' f s a +accountAndUserInfo + = Data.ProtoLens.Field.field @"accountAndUserInfo" +accountAvailableExchangeGroupsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountAvailableExchangeGroupsRequest" a) => + Lens.Family2.LensLike' f s a +accountAvailableExchangeGroupsRequest + = Data.ProtoLens.Field.field + @"accountAvailableExchangeGroupsRequest" +accountAvailableRouteListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountAvailableRouteListRequest" a) => + Lens.Family2.LensLike' f s a +accountAvailableRouteListRequest + = Data.ProtoLens.Field.field @"accountAvailableRouteListRequest" +accountAvailableRouteListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountAvailableRouteListResult" a) => + Lens.Family2.LensLike' f s a +accountAvailableRouteListResult + = Data.ProtoLens.Field.field @"accountAvailableRouteListResult" +accountAvailableServiceGroupListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountAvailableServiceGroupListRequest" a) => + Lens.Family2.LensLike' f s a +accountAvailableServiceGroupListRequest + = Data.ProtoLens.Field.field + @"accountAvailableServiceGroupListRequest" +accountAvailableServiceGroupListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountAvailableServiceGroupListResult" a) => + Lens.Family2.LensLike' f s a +accountAvailableServiceGroupListResult + = Data.ProtoLens.Field.field + @"accountAvailableServiceGroupListResult" +accountBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountBrokerageId" a) => + Lens.Family2.LensLike' f s a +accountBrokerageId + = Data.ProtoLens.Field.field @"accountBrokerageId" +accountClusterId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountClusterId" a) => + Lens.Family2.LensLike' f s a +accountClusterId = Data.ProtoLens.Field.field @"accountClusterId" +accountCollateralRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountCollateralRequest" a) => + Lens.Family2.LensLike' f s a +accountCollateralRequest + = Data.ProtoLens.Field.field @"accountCollateralRequest" +accountCollateralResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountCollateralResult" a) => + Lens.Family2.LensLike' f s a +accountCollateralResult + = Data.ProtoLens.Field.field @"accountCollateralResult" +accountEquityRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountEquityRequest" a) => + Lens.Family2.LensLike' f s a +accountEquityRequest + = Data.ProtoLens.Field.field @"accountEquityRequest" +accountEquityResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountEquityResult" a) => + Lens.Family2.LensLike' f s a +accountEquityResult + = Data.ProtoLens.Field.field @"accountEquityResult" +accountExchangeGroupsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountExchangeGroupsResult" a) => + Lens.Family2.LensLike' f s a +accountExchangeGroupsResult + = Data.ProtoLens.Field.field @"accountExchangeGroupsResult" +accountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountGroup" a) => + Lens.Family2.LensLike' f s a +accountGroup = Data.ProtoLens.Field.field @"accountGroup" +accountGroupId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountGroupId" a) => + Lens.Family2.LensLike' f s a +accountGroupId = Data.ProtoLens.Field.field @"accountGroupId" +accountGroupRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountGroupRequest" a) => + Lens.Family2.LensLike' f s a +accountGroupRequest + = Data.ProtoLens.Field.field @"accountGroupRequest" +accountGroupResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountGroupResult" a) => + Lens.Family2.LensLike' f s a +accountGroupResult + = Data.ProtoLens.Field.field @"accountGroupResult" +accountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountId" a) => + Lens.Family2.LensLike' f s a +accountId = Data.ProtoLens.Field.field @"accountId" +accountInfoRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountInfoRequest" a) => + Lens.Family2.LensLike' f s a +accountInfoRequest + = Data.ProtoLens.Field.field @"accountInfoRequest" +accountInfoResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountInfoResult" a) => + Lens.Family2.LensLike' f s a +accountInfoResult = Data.ProtoLens.Field.field @"accountInfoResult" +accountMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountMarketLimits" a) => + Lens.Family2.LensLike' f s a +accountMarketLimits + = Data.ProtoLens.Field.field @"accountMarketLimits" +accountMarketLimitsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountMarketLimitsRequest" a) => + Lens.Family2.LensLike' f s a +accountMarketLimitsRequest + = Data.ProtoLens.Field.field @"accountMarketLimitsRequest" +accountMarketLimitsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountMarketLimitsResult" a) => + Lens.Family2.LensLike' f s a +accountMarketLimitsResult + = Data.ProtoLens.Field.field @"accountMarketLimitsResult" +accountName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountName" a) => + Lens.Family2.LensLike' f s a +accountName = Data.ProtoLens.Field.field @"accountName" +accountPositionsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountPositionsRequest" a) => + Lens.Family2.LensLike' f s a +accountPositionsRequest + = Data.ProtoLens.Field.field @"accountPositionsRequest" +accountPositionsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountPositionsResult" a) => + Lens.Family2.LensLike' f s a +accountPositionsResult + = Data.ProtoLens.Field.field @"accountPositionsResult" +accountRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountRecord" a) => + Lens.Family2.LensLike' f s a +accountRecord = Data.ProtoLens.Field.field @"accountRecord" +accountRiskParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountRiskParameters" a) => + Lens.Family2.LensLike' f s a +accountRiskParameters + = Data.ProtoLens.Field.field @"accountRiskParameters" +accountRiskParametersRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountRiskParametersRequest" a) => + Lens.Family2.LensLike' f s a +accountRiskParametersRequest + = Data.ProtoLens.Field.field @"accountRiskParametersRequest" +accountRiskParametersResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountRiskParametersResult" a) => + Lens.Family2.LensLike' f s a +accountRiskParametersResult + = Data.ProtoLens.Field.field @"accountRiskParametersResult" +accountRouteListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountRouteListRequest" a) => + Lens.Family2.LensLike' f s a +accountRouteListRequest + = Data.ProtoLens.Field.field @"accountRouteListRequest" +accountRouteListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountRouteListResult" a) => + Lens.Family2.LensLike' f s a +accountRouteListResult + = Data.ProtoLens.Field.field @"accountRouteListResult" +accountRouteRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountRouteRecord" a) => + Lens.Family2.LensLike' f s a +accountRouteRecord + = Data.ProtoLens.Field.field @"accountRouteRecord" +accountSalesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountSalesSeriesId" a) => + Lens.Family2.LensLike' f s a +accountSalesSeriesId + = Data.ProtoLens.Field.field @"accountSalesSeriesId" +accountScopeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountScopeRequest" a) => + Lens.Family2.LensLike' f s a +accountScopeRequest + = Data.ProtoLens.Field.field @"accountScopeRequest" +accountScopeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountScopeResult" a) => + Lens.Family2.LensLike' f s a +accountScopeResult + = Data.ProtoLens.Field.field @"accountScopeResult" +accountSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountSearchRequest" a) => + Lens.Family2.LensLike' f s a +accountSearchRequest + = Data.ProtoLens.Field.field @"accountSearchRequest" +accountSearchResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountSearchResult" a) => + Lens.Family2.LensLike' f s a +accountSearchResult + = Data.ProtoLens.Field.field @"accountSearchResult" +accountServiceGroupListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountServiceGroupListRequest" a) => + Lens.Family2.LensLike' f s a +accountServiceGroupListRequest + = Data.ProtoLens.Field.field @"accountServiceGroupListRequest" +accountServiceGroupListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountServiceGroupListResult" a) => + Lens.Family2.LensLike' f s a +accountServiceGroupListResult + = Data.ProtoLens.Field.field @"accountServiceGroupListResult" +accountSettings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountSettings" a) => + Lens.Family2.LensLike' f s a +accountSettings = Data.ProtoLens.Field.field @"accountSettings" +accountSettingsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountSettingsRequest" a) => + Lens.Family2.LensLike' f s a +accountSettingsRequest + = Data.ProtoLens.Field.field @"accountSettingsRequest" +accountSettingsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountSettingsResult" a) => + Lens.Family2.LensLike' f s a +accountSettingsResult + = Data.ProtoLens.Field.field @"accountSettingsResult" +accountTradingFeaturesRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountTradingFeaturesRequest" a) => + Lens.Family2.LensLike' f s a +accountTradingFeaturesRequest + = Data.ProtoLens.Field.field @"accountTradingFeaturesRequest" +accountTradingFeaturesResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountTradingFeaturesResult" a) => + Lens.Family2.LensLike' f s a +accountTradingFeaturesResult + = Data.ProtoLens.Field.field @"accountTradingFeaturesResult" +accountTradingInterfaceElements :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountTradingInterfaceElements" a) => + Lens.Family2.LensLike' f s a +accountTradingInterfaceElements + = Data.ProtoLens.Field.field @"accountTradingInterfaceElements" +accountTypeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountTypeId" a) => + Lens.Family2.LensLike' f s a +accountTypeId = Data.ProtoLens.Field.field @"accountTypeId" +accountTypeOverrideListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountTypeOverrideListRequest" a) => + Lens.Family2.LensLike' f s a +accountTypeOverrideListRequest + = Data.ProtoLens.Field.field @"accountTypeOverrideListRequest" +accountTypeOverrideListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountTypeOverrideListResult" a) => + Lens.Family2.LensLike' f s a +accountTypeOverrideListResult + = Data.ProtoLens.Field.field @"accountTypeOverrideListResult" +accountUserAuthorizationListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountUserAuthorizationListRequest" a) => + Lens.Family2.LensLike' f s a +accountUserAuthorizationListRequest + = Data.ProtoLens.Field.field @"accountUserAuthorizationListRequest" +accountUserAuthorizationListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountUserAuthorizationListResult" a) => + Lens.Family2.LensLike' f s a +accountUserAuthorizationListResult + = Data.ProtoLens.Field.field @"accountUserAuthorizationListResult" +accountUserLink :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accountUserLink" a) => + Lens.Family2.LensLike' f s a +accountUserLink = Data.ProtoLens.Field.field @"accountUserLink" +accounts :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accounts" a) => + Lens.Family2.LensLike' f s a +accounts = Data.ProtoLens.Field.field @"accounts" +acountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "acountGroup" a) => + Lens.Family2.LensLike' f s a +acountGroup = Data.ProtoLens.Field.field @"acountGroup" +action :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "action" a) => + Lens.Family2.LensLike' f s a +action = Data.ProtoLens.Field.field @"action" +activateOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "activateOrder" a) => + Lens.Family2.LensLike' f s a +activateOrder = Data.ProtoLens.Field.field @"activateOrder" +activationTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "activationTime" a) => + Lens.Family2.LensLike' f s a +activationTime = Data.ProtoLens.Field.field @"activationTime" +addFill :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "addFill" a) => + Lens.Family2.LensLike' f s a +addFill = Data.ProtoLens.Field.field @"addFill" +addFillResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "addFillResult" a) => + Lens.Family2.LensLike' f s a +addFillResult = Data.ProtoLens.Field.field @"addFillResult" +adjustPriceByNetchange :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "adjustPriceByNetchange" a) => + Lens.Family2.LensLike' f s a +adjustPriceByNetchange + = Data.ProtoLens.Field.field @"adjustPriceByNetchange" +algoStrategiesWhitelist :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "algoStrategiesWhitelist" a) => + Lens.Family2.LensLike' f s a +algoStrategiesWhitelist + = Data.ProtoLens.Field.field @"algoStrategiesWhitelist" +algoStrategy :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "algoStrategy" a) => + Lens.Family2.LensLike' f s a +algoStrategy = Data.ProtoLens.Field.field @"algoStrategy" +allMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allMarketLimits" a) => + Lens.Family2.LensLike' f s a +allMarketLimits = Data.ProtoLens.Field.field @"allMarketLimits" +allMatchMode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allMatchMode" a) => + Lens.Family2.LensLike' f s a +allMatchMode = Data.ProtoLens.Field.field @"allMatchMode" +allowExtendedSide :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowExtendedSide" a) => + Lens.Family2.LensLike' f s a +allowExtendedSide = Data.ProtoLens.Field.field @"allowExtendedSide" +allowExternalAccounts :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowExternalAccounts" a) => + Lens.Family2.LensLike' f s a +allowExternalAccounts + = Data.ProtoLens.Field.field @"allowExternalAccounts" +allowFutures :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowFutures" a) => + Lens.Family2.LensLike' f s a +allowFutures = Data.ProtoLens.Field.field @"allowFutures" +allowGoFlat :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowGoFlat" a) => + Lens.Family2.LensLike' f s a +allowGoFlat = Data.ProtoLens.Field.field @"allowGoFlat" +allowOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowOptions" a) => + Lens.Family2.LensLike' f s a +allowOptions = Data.ProtoLens.Field.field @"allowOptions" +allowSyntheticOrderTypes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowSyntheticOrderTypes" a) => + Lens.Family2.LensLike' f s a +allowSyntheticOrderTypes + = Data.ProtoLens.Field.field @"allowSyntheticOrderTypes" +allowableMarginCredit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowableMarginCredit" a) => + Lens.Family2.LensLike' f s a +allowableMarginCredit + = Data.ProtoLens.Field.field @"allowableMarginCredit" +allowedLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowedLimits" a) => + Lens.Family2.LensLike' f s a +allowedLimits = Data.ProtoLens.Field.field @"allowedLimits" +allowedToTrade :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowedToTrade" a) => + Lens.Family2.LensLike' f s a +allowedToTrade = Data.ProtoLens.Field.field @"allowedToTrade" +allowedToTradeCommodities :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowedToTradeCommodities" a) => + Lens.Family2.LensLike' f s a +allowedToTradeCommodities + = Data.ProtoLens.Field.field @"allowedToTradeCommodities" +allowedToTradeContracts :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "allowedToTradeContracts" a) => + Lens.Family2.LensLike' f s a +allowedToTradeContracts + = Data.ProtoLens.Field.field @"allowedToTradeContracts" +alwaysAllowLiquidation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "alwaysAllowLiquidation" a) => + Lens.Family2.LensLike' f s a +alwaysAllowLiquidation + = Data.ProtoLens.Field.field @"alwaysAllowLiquidation" +amount :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "amount" a) => + Lens.Family2.LensLike' f s a +amount = Data.ProtoLens.Field.field @"amount" +archived :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "archived" a) => + Lens.Family2.LensLike' f s a +archived = Data.ProtoLens.Field.field @"archived" +asOfDate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "asOfDate" a) => + Lens.Family2.LensLike' f s a +asOfDate = Data.ProtoLens.Field.field @"asOfDate" +attributes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "attributes" a) => + Lens.Family2.LensLike' f s a +attributes = Data.ProtoLens.Field.field @"attributes" +authorizationRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "authorizationRequired" a) => + Lens.Family2.LensLike' f s a +authorizationRequired + = Data.ProtoLens.Field.field @"authorizationRequired" +balance :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "balance" a) => + Lens.Family2.LensLike' f s a +balance = Data.ProtoLens.Field.field @"balance" +balanceId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "balanceId" a) => + Lens.Family2.LensLike' f s a +balanceId = Data.ProtoLens.Field.field @"balanceId" +balanceRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "balanceRecord" a) => + Lens.Family2.LensLike' f s a +balanceRecord = Data.ProtoLens.Field.field @"balanceRecord" +balanceRecordId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "balanceRecordId" a) => + Lens.Family2.LensLike' f s a +balanceRecordId = Data.ProtoLens.Field.field @"balanceRecordId" +balanceRecordsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "balanceRecordsRequest" a) => + Lens.Family2.LensLike' f s a +balanceRecordsRequest + = Data.ProtoLens.Field.field @"balanceRecordsRequest" +balanceRecordsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "balanceRecordsResult" a) => + Lens.Family2.LensLike' f s a +balanceRecordsResult + = Data.ProtoLens.Field.field @"balanceRecordsResult" +batchOrdersOperation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "batchOrdersOperation" a) => + Lens.Family2.LensLike' f s a +batchOrdersOperation + = Data.ProtoLens.Field.field @"batchOrdersOperation" +batchOrdersOperationResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "batchOrdersOperationResult" a) => + Lens.Family2.LensLike' f s a +batchOrdersOperationResult + = Data.ProtoLens.Field.field @"batchOrdersOperationResult" +batchRequestGuid :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "batchRequestGuid" a) => + Lens.Family2.LensLike' f s a +batchRequestGuid = Data.ProtoLens.Field.field @"batchRequestGuid" +bidAsk :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "bidAsk" a) => + Lens.Family2.LensLike' f s a +bidAsk = Data.ProtoLens.Field.field @"bidAsk" +billableExchangeListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "billableExchangeListRequest" a) => + Lens.Family2.LensLike' f s a +billableExchangeListRequest + = Data.ProtoLens.Field.field @"billableExchangeListRequest" +billableExchangeListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "billableExchangeListResult" a) => + Lens.Family2.LensLike' f s a +billableExchangeListResult + = Data.ProtoLens.Field.field @"billableExchangeListResult" +billableExchanges :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "billableExchanges" a) => + Lens.Family2.LensLike' f s a +billableExchanges = Data.ProtoLens.Field.field @"billableExchanges" +brokerageAccountNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageAccountNumber" a) => + Lens.Family2.LensLike' f s a +brokerageAccountNumber + = Data.ProtoLens.Field.field @"brokerageAccountNumber" +brokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageId" a) => + Lens.Family2.LensLike' f s a +brokerageId = Data.ProtoLens.Field.field @"brokerageId" +brokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "brokerageName" a) => + Lens.Family2.LensLike' f s a +brokerageName = Data.ProtoLens.Field.field @"brokerageName" +bust :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "bust" a) => + Lens.Family2.LensLike' f s a +bust = Data.ProtoLens.Field.field @"bust" +cancelCompoundOrderTree :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cancelCompoundOrderTree" a) => + Lens.Family2.LensLike' f s a +cancelCompoundOrderTree + = Data.ProtoLens.Field.field @"cancelCompoundOrderTree" +cancelCompoundOrderTreeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cancelCompoundOrderTreeResult" a) => + Lens.Family2.LensLike' f s a +cancelCompoundOrderTreeResult + = Data.ProtoLens.Field.field @"cancelCompoundOrderTreeResult" +cancelFill :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cancelFill" a) => + Lens.Family2.LensLike' f s a +cancelFill = Data.ProtoLens.Field.field @"cancelFill" +cancelOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cancelOrder" a) => + Lens.Family2.LensLike' f s a +cancelOrder = Data.ProtoLens.Field.field @"cancelOrder" +cancelOrderResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cancelOrderResult" a) => + Lens.Family2.LensLike' f s a +cancelOrderResult = Data.ProtoLens.Field.field @"cancelOrderResult" +cashExcess :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cashExcess" a) => + Lens.Family2.LensLike' f s a +cashExcess = Data.ProtoLens.Field.field @"cashExcess" +chainOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "chainOrderId" a) => + Lens.Family2.LensLike' f s a +chainOrderId = Data.ProtoLens.Field.field @"chainOrderId" +chainOrigAccountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "chainOrigAccountId" a) => + Lens.Family2.LensLike' f s a +chainOrigAccountId + = Data.ProtoLens.Field.field @"chainOrigAccountId" +checkNegativeBalance :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "checkNegativeBalance" a) => + Lens.Family2.LensLike' f s a +checkNegativeBalance + = Data.ProtoLens.Field.field @"checkNegativeBalance" +checked :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "checked" a) => + Lens.Family2.LensLike' f s a +checked = Data.ProtoLens.Field.field @"checked" +children :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "children" a) => + Lens.Family2.LensLike' f s a +children = Data.ProtoLens.Field.field @"children" +class' :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "class'" a) => + Lens.Family2.LensLike' f s a +class' = Data.ProtoLens.Field.field @"class'" +clearedFields :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clearedFields" a) => + Lens.Family2.LensLike' f s a +clearedFields = Data.ProtoLens.Field.field @"clearedFields" +clientAlgoStrategy :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientAlgoStrategy" a) => + Lens.Family2.LensLike' f s a +clientAlgoStrategy + = Data.ProtoLens.Field.field @"clientAlgoStrategy" +clientAppTypeName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientAppTypeName" a) => + Lens.Family2.LensLike' f s a +clientAppTypeName = Data.ProtoLens.Field.field @"clientAppTypeName" +clientExtraValues :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientExtraValues" a) => + Lens.Family2.LensLike' f s a +clientExtraValues = Data.ProtoLens.Field.field @"clientExtraValues" +clientGuid :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientGuid" a) => + Lens.Family2.LensLike' f s a +clientGuid = Data.ProtoLens.Field.field @"clientGuid" +clientIp :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientIp" a) => + Lens.Family2.LensLike' f s a +clientIp = Data.ProtoLens.Field.field @"clientIp" +clientOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientOrderId" a) => + Lens.Family2.LensLike' f s a +clientOrderId = Data.ProtoLens.Field.field @"clientOrderId" +clientRegulatoryAlgorithmId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientRegulatoryAlgorithmId" a) => + Lens.Family2.LensLike' f s a +clientRegulatoryAlgorithmId + = Data.ProtoLens.Field.field @"clientRegulatoryAlgorithmId" +clientSystemId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientSystemId" a) => + Lens.Family2.LensLike' f s a +clientSystemId = Data.ProtoLens.Field.field @"clientSystemId" +clientVersion :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "clientVersion" a) => + Lens.Family2.LensLike' f s a +clientVersion = Data.ProtoLens.Field.field @"clientVersion" +cloneAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cloneAccount" a) => + Lens.Family2.LensLike' f s a +cloneAccount = Data.ProtoLens.Field.field @"cloneAccount" +cloneAccountResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cloneAccountResult" a) => + Lens.Family2.LensLike' f s a +cloneAccountResult + = Data.ProtoLens.Field.field @"cloneAccountResult" +code :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "code" a) => + Lens.Family2.LensLike' f s a +code = Data.ProtoLens.Field.field @"code" +collateral :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "collateral" a) => + Lens.Family2.LensLike' f s a +collateral = Data.ProtoLens.Field.field @"collateral" +comments :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "comments" a) => + Lens.Family2.LensLike' f s a +comments = Data.ProtoLens.Field.field @"comments" +commission :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "commission" a) => + Lens.Family2.LensLike' f s a +commission = Data.ProtoLens.Field.field @"commission" +commissionCurrency :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "commissionCurrency" a) => + Lens.Family2.LensLike' f s a +commissionCurrency + = Data.ProtoLens.Field.field @"commissionCurrency" +commodityGrossOpenPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "commodityGrossOpenPositionLimit" a) => + Lens.Family2.LensLike' f s a +commodityGrossOpenPositionLimit + = Data.ProtoLens.Field.field @"commodityGrossOpenPositionLimit" +commodityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "commodityId" a) => + Lens.Family2.LensLike' f s a +commodityId = Data.ProtoLens.Field.field @"commodityId" +commodityMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "commodityMarketLimits" a) => + Lens.Family2.LensLike' f s a +commodityMarketLimits + = Data.ProtoLens.Field.field @"commodityMarketLimits" +commodityPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "commodityPositionLimit" a) => + Lens.Family2.LensLike' f s a +commodityPositionLimit + = Data.ProtoLens.Field.field @"commodityPositionLimit" +compoundOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "compoundOrder" a) => + Lens.Family2.LensLike' f s a +compoundOrder = Data.ProtoLens.Field.field @"compoundOrder" +compoundOrderTreeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "compoundOrderTreeRequest" a) => + Lens.Family2.LensLike' f s a +compoundOrderTreeRequest + = Data.ProtoLens.Field.field @"compoundOrderTreeRequest" +compoundOrderTreeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "compoundOrderTreeResult" a) => + Lens.Family2.LensLike' f s a +compoundOrderTreeResult + = Data.ProtoLens.Field.field @"compoundOrderTreeResult" +compoundTreeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "compoundTreeId" a) => + Lens.Family2.LensLike' f s a +compoundTreeId = Data.ProtoLens.Field.field @"compoundTreeId" +confirmOrderSentToExchange :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "confirmOrderSentToExchange" a) => + Lens.Family2.LensLike' f s a +confirmOrderSentToExchange + = Data.ProtoLens.Field.field @"confirmOrderSentToExchange" +contractDescription :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractDescription" a) => + Lens.Family2.LensLike' f s a +contractDescription + = Data.ProtoLens.Field.field @"contractDescription" +contractId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractId" a) => + Lens.Family2.LensLike' f s a +contractId = Data.ProtoLens.Field.field @"contractId" +contractName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractName" a) => + Lens.Family2.LensLike' f s a +contractName = Data.ProtoLens.Field.field @"contractName" +contractPosition :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractPosition" a) => + Lens.Family2.LensLike' f s a +contractPosition = Data.ProtoLens.Field.field @"contractPosition" +contractPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractPositionLimit" a) => + Lens.Family2.LensLike' f s a +contractPositionLimit + = Data.ProtoLens.Field.field @"contractPositionLimit" +contractSymbol :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "contractSymbol" a) => + Lens.Family2.LensLike' f s a +contractSymbol = Data.ProtoLens.Field.field @"contractSymbol" +correctFill :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "correctFill" a) => + Lens.Family2.LensLike' f s a +correctFill = Data.ProtoLens.Field.field @"correctFill" +cqgAlgoOrdersOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "cqgAlgoOrdersOnly" a) => + Lens.Family2.LensLike' f s a +cqgAlgoOrdersOnly = Data.ProtoLens.Field.field @"cqgAlgoOrdersOnly" +createAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createAccount" a) => + Lens.Family2.LensLike' f s a +createAccount = Data.ProtoLens.Field.field @"createAccount" +createAccountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createAccountGroup" a) => + Lens.Family2.LensLike' f s a +createAccountGroup + = Data.ProtoLens.Field.field @"createAccountGroup" +createAccountGroupResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createAccountGroupResult" a) => + Lens.Family2.LensLike' f s a +createAccountGroupResult + = Data.ProtoLens.Field.field @"createAccountGroupResult" +createAccountResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createAccountResult" a) => + Lens.Family2.LensLike' f s a +createAccountResult + = Data.ProtoLens.Field.field @"createAccountResult" +createBalanceRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createBalanceRecord" a) => + Lens.Family2.LensLike' f s a +createBalanceRecord + = Data.ProtoLens.Field.field @"createBalanceRecord" +createBalanceRecordResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createBalanceRecordResult" a) => + Lens.Family2.LensLike' f s a +createBalanceRecordResult + = Data.ProtoLens.Field.field @"createBalanceRecordResult" +createExternalOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createExternalOrder" a) => + Lens.Family2.LensLike' f s a +createExternalOrder + = Data.ProtoLens.Field.field @"createExternalOrder" +createExternalOrderResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "createExternalOrderResult" a) => + Lens.Family2.LensLike' f s a +createExternalOrderResult + = Data.ProtoLens.Field.field @"createExternalOrderResult" +currency :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "currency" a) => + Lens.Family2.LensLike' f s a +currency = Data.ProtoLens.Field.field @"currency" +currencyIsoCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "currencyIsoCode" a) => + Lens.Family2.LensLike' f s a +currencyIsoCode = Data.ProtoLens.Field.field @"currencyIsoCode" +customerId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "customerId" a) => + Lens.Family2.LensLike' f s a +customerId = Data.ProtoLens.Field.field @"customerId" +customerLastName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "customerLastName" a) => + Lens.Family2.LensLike' f s a +customerLastName = Data.ProtoLens.Field.field @"customerLastName" +customerName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "customerName" a) => + Lens.Family2.LensLike' f s a +customerName = Data.ProtoLens.Field.field @"customerName" +dailyLossLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "dailyLossLimit" a) => + Lens.Family2.LensLike' f s a +dailyLossLimit = Data.ProtoLens.Field.field @"dailyLossLimit" +daysBeforeExpiration :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "daysBeforeExpiration" a) => + Lens.Family2.LensLike' f s a +daysBeforeExpiration + = Data.ProtoLens.Field.field @"daysBeforeExpiration" +defaultMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "defaultMarketLimits" a) => + Lens.Family2.LensLike' f s a +defaultMarketLimits + = Data.ProtoLens.Field.field @"defaultMarketLimits" +deleteAccountPositions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "deleteAccountPositions" a) => + Lens.Family2.LensLike' f s a +deleteAccountPositions + = Data.ProtoLens.Field.field @"deleteAccountPositions" +deltaDailyLossLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "deltaDailyLossLimit" a) => + Lens.Family2.LensLike' f s a +deltaDailyLossLimit + = Data.ProtoLens.Field.field @"deltaDailyLossLimit" +description :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "description" a) => + Lens.Family2.LensLike' f s a +description = Data.ProtoLens.Field.field @"description" +displayFillPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "displayFillPrice" a) => + Lens.Family2.LensLike' f s a +displayFillPrice = Data.ProtoLens.Field.field @"displayFillPrice" +displayLimitPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "displayLimitPrice" a) => + Lens.Family2.LensLike' f s a +displayLimitPrice = Data.ProtoLens.Field.field @"displayLimitPrice" +displayOffset :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "displayOffset" a) => + Lens.Family2.LensLike' f s a +displayOffset = Data.ProtoLens.Field.field @"displayOffset" +displayPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "displayPrice" a) => + Lens.Family2.LensLike' f s a +displayPrice = Data.ProtoLens.Field.field @"displayPrice" +displayStopPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "displayStopPrice" a) => + Lens.Family2.LensLike' f s a +displayStopPrice = Data.ProtoLens.Field.field @"displayStopPrice" +duration :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "duration" a) => + Lens.Family2.LensLike' f s a +duration = Data.ProtoLens.Field.field @"duration" +effectiveRegulatoryAlgorithmId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "effectiveRegulatoryAlgorithmId" a) => + Lens.Family2.LensLike' f s a +effectiveRegulatoryAlgorithmId + = Data.ProtoLens.Field.field @"effectiveRegulatoryAlgorithmId" +enableAlgoStrategiesWhitelist :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enableAlgoStrategiesWhitelist" a) => + Lens.Family2.LensLike' f s a +enableAlgoStrategiesWhitelist + = Data.ProtoLens.Field.field @"enableAlgoStrategiesWhitelist" +enabled :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "enabled" a) => + Lens.Family2.LensLike' f s a +enabled = Data.ProtoLens.Field.field @"enabled" +endCashBalance :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "endCashBalance" a) => + Lens.Family2.LensLike' f s a +endCashBalance = Data.ProtoLens.Field.field @"endCashBalance" +enforce :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "enforce" a) => + Lens.Family2.LensLike' f s a +enforce = Data.ProtoLens.Field.field @"enforce" +enforceCommodityPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceCommodityPositionLimit" a) => + Lens.Family2.LensLike' f s a +enforceCommodityPositionLimit + = Data.ProtoLens.Field.field @"enforceCommodityPositionLimit" +enforceContractPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceContractPositionLimit" a) => + Lens.Family2.LensLike' f s a +enforceContractPositionLimit + = Data.ProtoLens.Field.field @"enforceContractPositionLimit" +enforceDailyLossLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceDailyLossLimit" a) => + Lens.Family2.LensLike' f s a +enforceDailyLossLimit + = Data.ProtoLens.Field.field @"enforceDailyLossLimit" +enforceDeltaDailyLossLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceDeltaDailyLossLimit" a) => + Lens.Family2.LensLike' f s a +enforceDeltaDailyLossLimit + = Data.ProtoLens.Field.field @"enforceDeltaDailyLossLimit" +enforceMarginSubsystemParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceMarginSubsystemParameters" a) => + Lens.Family2.LensLike' f s a +enforceMarginSubsystemParameters + = Data.ProtoLens.Field.field @"enforceMarginSubsystemParameters" +enforceMaxPurchasingPower :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceMaxPurchasingPower" a) => + Lens.Family2.LensLike' f s a +enforceMaxPurchasingPower + = Data.ProtoLens.Field.field @"enforceMaxPurchasingPower" +enforceTotalGrossOpenPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceTotalGrossOpenPositionLimit" a) => + Lens.Family2.LensLike' f s a +enforceTotalGrossOpenPositionLimit + = Data.ProtoLens.Field.field @"enforceTotalGrossOpenPositionLimit" +enforceTradeMarginLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceTradeMarginLimit" a) => + Lens.Family2.LensLike' f s a +enforceTradeMarginLimit + = Data.ProtoLens.Field.field @"enforceTradeMarginLimit" +enforceTradePriceLimitPercent :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceTradePriceLimitPercent" a) => + Lens.Family2.LensLike' f s a +enforceTradePriceLimitPercent + = Data.ProtoLens.Field.field @"enforceTradePriceLimitPercent" +enforceTradePriceLimitTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceTradePriceLimitTicks" a) => + Lens.Family2.LensLike' f s a +enforceTradePriceLimitTicks + = Data.ProtoLens.Field.field @"enforceTradePriceLimitTicks" +enforceTradeSizeLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "enforceTradeSizeLimit" a) => + Lens.Family2.LensLike' f s a +enforceTradeSizeLimit + = Data.ProtoLens.Field.field @"enforceTradeSizeLimit" +equity :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "equity" a) => + Lens.Family2.LensLike' f s a +equity = Data.ProtoLens.Field.field @"equity" +errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "errorMessage" a) => + Lens.Family2.LensLike' f s a +errorMessage = Data.ProtoLens.Field.field @"errorMessage" +exchangeExtraValues :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "exchangeExtraValues" a) => + Lens.Family2.LensLike' f s a +exchangeExtraValues + = Data.ProtoLens.Field.field @"exchangeExtraValues" +exchangeGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "exchangeGroup" a) => + Lens.Family2.LensLike' f s a +exchangeGroup = Data.ProtoLens.Field.field @"exchangeGroup" +exchangeGroupId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "exchangeGroupId" a) => + Lens.Family2.LensLike' f s a +exchangeGroupId = Data.ProtoLens.Field.field @"exchangeGroupId" +exchangeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "exchangeId" a) => + Lens.Family2.LensLike' f s a +exchangeId = Data.ProtoLens.Field.field @"exchangeId" +exchangeMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "exchangeMarketLimits" a) => + Lens.Family2.LensLike' f s a +exchangeMarketLimits + = Data.ProtoLens.Field.field @"exchangeMarketLimits" +exchangeName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "exchangeName" a) => + Lens.Family2.LensLike' f s a +exchangeName = Data.ProtoLens.Field.field @"exchangeName" +execId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "execId" a) => + Lens.Family2.LensLike' f s a +execId = Data.ProtoLens.Field.field @"execId" +execInstruction :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "execInstruction" a) => + Lens.Family2.LensLike' f s a +execInstruction = Data.ProtoLens.Field.field @"execInstruction" +executionAccountName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "executionAccountName" a) => + Lens.Family2.LensLike' f s a +executionAccountName + = Data.ProtoLens.Field.field @"executionAccountName" +executionSourceCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "executionSourceCode" a) => + Lens.Family2.LensLike' f s a +executionSourceCode + = Data.ProtoLens.Field.field @"executionSourceCode" +executionSourceCodeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "executionSourceCodeId" a) => + Lens.Family2.LensLike' f s a +executionSourceCodeId + = Data.ProtoLens.Field.field @"executionSourceCodeId" +expirationLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "expirationLimit" a) => + Lens.Family2.LensLike' f s a +expirationLimit = Data.ProtoLens.Field.field @"expirationLimit" +expirationTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "expirationTime" a) => + Lens.Family2.LensLike' f s a +expirationTime = Data.ProtoLens.Field.field @"expirationTime" +extendedCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "extendedCode" a) => + Lens.Family2.LensLike' f s a +extendedCode = Data.ProtoLens.Field.field @"extendedCode" +extendedSide :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "extendedSide" a) => + Lens.Family2.LensLike' f s a +extendedSide = Data.ProtoLens.Field.field @"extendedSide" +externallyProvidedExecution :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "externallyProvidedExecution" a) => + Lens.Family2.LensLike' f s a +externallyProvidedExecution + = Data.ProtoLens.Field.field @"externallyProvidedExecution" +fillCareOrderRequestId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fillCareOrderRequestId" a) => + Lens.Family2.LensLike' f s a +fillCareOrderRequestId + = Data.ProtoLens.Field.field @"fillCareOrderRequestId" +fillExtraValues :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fillExtraValues" a) => + Lens.Family2.LensLike' f s a +fillExtraValues = Data.ProtoLens.Field.field @"fillExtraValues" +fillIsAggressive :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fillIsAggressive" a) => + Lens.Family2.LensLike' f s a +fillIsAggressive = Data.ProtoLens.Field.field @"fillIsAggressive" +fillPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fillPrice" a) => + Lens.Family2.LensLike' f s a +fillPrice = Data.ProtoLens.Field.field @"fillPrice" +fillQuantity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fillQuantity" a) => + Lens.Family2.LensLike' f s a +fillQuantity = Data.ProtoLens.Field.field @"fillQuantity" +fillStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fillStatus" a) => + Lens.Family2.LensLike' f s a +fillStatus = Data.ProtoLens.Field.field @"fillStatus" +fillType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fillType" a) => + Lens.Family2.LensLike' f s a +fillType = Data.ProtoLens.Field.field @"fillType" +fillUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fillUtcTime" a) => + Lens.Family2.LensLike' f s a +fillUtcTime = Data.ProtoLens.Field.field @"fillUtcTime" +forceVariableLatencyAlgo :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "forceVariableLatencyAlgo" a) => + Lens.Family2.LensLike' f s a +forceVariableLatencyAlgo + = Data.ProtoLens.Field.field @"forceVariableLatencyAlgo" +fungibleCommodity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fungibleCommodity" a) => + Lens.Family2.LensLike' f s a +fungibleCommodity = Data.ProtoLens.Field.field @"fungibleCommodity" +fungibleCommodityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "fungibleCommodityId" a) => + Lens.Family2.LensLike' f s a +fungibleCommodityId + = Data.ProtoLens.Field.field @"fungibleCommodityId" +giveupBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "giveupBrokerageId" a) => + Lens.Family2.LensLike' f s a +giveupBrokerageId = Data.ProtoLens.Field.field @"giveupBrokerageId" +goFlatDefaultSpeculationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "goFlatDefaultSpeculationType" a) => + Lens.Family2.LensLike' f s a +goFlatDefaultSpeculationType + = Data.ProtoLens.Field.field @"goFlatDefaultSpeculationType" +goodThruDate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "goodThruDate" a) => + Lens.Family2.LensLike' f s a +goodThruDate = Data.ProtoLens.Field.field @"goodThruDate" +goodThruUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "goodThruUtcTime" a) => + Lens.Family2.LensLike' f s a +goodThruUtcTime = Data.ProtoLens.Field.field @"goodThruUtcTime" +groupByContract :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "groupByContract" a) => + Lens.Family2.LensLike' f s a +groupByContract = Data.ProtoLens.Field.field @"groupByContract" +groupId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "groupId" a) => + Lens.Family2.LensLike' f s a +groupId = Data.ProtoLens.Field.field @"groupId" +groupRelationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "groupRelationType" a) => + Lens.Family2.LensLike' f s a +groupRelationType = Data.ProtoLens.Field.field @"groupRelationType" +hedgeExecInstruction :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "hedgeExecInstruction" a) => + Lens.Family2.LensLike' f s a +hedgeExecInstruction + = Data.ProtoLens.Field.field @"hedgeExecInstruction" +hedgeOffsetTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "hedgeOffsetTicks" a) => + Lens.Family2.LensLike' f s a +hedgeOffsetTicks = Data.ProtoLens.Field.field @"hedgeOffsetTicks" +icebergVisibleQtyPercent :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "icebergVisibleQtyPercent" a) => + Lens.Family2.LensLike' f s a +icebergVisibleQtyPercent + = Data.ProtoLens.Field.field @"icebergVisibleQtyPercent" +id :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "id" a) => + Lens.Family2.LensLike' f s a +id = Data.ProtoLens.Field.field @"id" +ignoreOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "ignoreOrder" a) => + Lens.Family2.LensLike' f s a +ignoreOrder = Data.ProtoLens.Field.field @"ignoreOrder" +implicitAuthorization :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "implicitAuthorization" a) => + Lens.Family2.LensLike' f s a +implicitAuthorization + = Data.ProtoLens.Field.field @"implicitAuthorization" +includeAccountsFromMappedSalesSeries :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "includeAccountsFromMappedSalesSeries" a) => + Lens.Family2.LensLike' f s a +includeAccountsFromMappedSalesSeries + = Data.ProtoLens.Field.field + @"includeAccountsFromMappedSalesSeries" +includeImplicitAuthorization :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "includeImplicitAuthorization" a) => + Lens.Family2.LensLike' f s a +includeImplicitAuthorization + = Data.ProtoLens.Field.field @"includeImplicitAuthorization" +includeOteLl :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "includeOteLl" a) => + Lens.Family2.LensLike' f s a +includeOteLl = Data.ProtoLens.Field.field @"includeOteLl" +includeRemoved :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "includeRemoved" a) => + Lens.Family2.LensLike' f s a +includeRemoved = Data.ProtoLens.Field.field @"includeRemoved" +includeUplLl :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "includeUplLl" a) => + Lens.Family2.LensLike' f s a +includeUplLl = Data.ProtoLens.Field.field @"includeUplLl" +initialMargin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "initialMargin" a) => + Lens.Family2.LensLike' f s a +initialMargin = Data.ProtoLens.Field.field @"initialMargin" +instructions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "instructions" a) => + Lens.Family2.LensLike' f s a +instructions = Data.ProtoLens.Field.field @"instructions" +instrumentGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "instrumentGroup" a) => + Lens.Family2.LensLike' f s a +instrumentGroup = Data.ProtoLens.Field.field @"instrumentGroup" +instrumentMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "instrumentMarketLimits" a) => + Lens.Family2.LensLike' f s a +instrumentMarketLimits + = Data.ProtoLens.Field.field @"instrumentMarketLimits" +instrumentPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "instrumentPositionLimit" a) => + Lens.Family2.LensLike' f s a +instrumentPositionLimit + = Data.ProtoLens.Field.field @"instrumentPositionLimit" +instrumentType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "instrumentType" a) => + Lens.Family2.LensLike' f s a +instrumentType = Data.ProtoLens.Field.field @"instrumentType" +instrumentTypeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "instrumentTypeId" a) => + Lens.Family2.LensLike' f s a +instrumentTypeId = Data.ProtoLens.Field.field @"instrumentTypeId" +isAggressive :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isAggressive" a) => + Lens.Family2.LensLike' f s a +isAggressive = Data.ProtoLens.Field.field @"isAggressive" +isCollection :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isCollection" a) => + Lens.Family2.LensLike' f s a +isCollection = Data.ProtoLens.Field.field @"isCollection" +isComplete :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isComplete" a) => + Lens.Family2.LensLike' f s a +isComplete = Data.ProtoLens.Field.field @"isComplete" +isExcludedFromRiskCalculation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isExcludedFromRiskCalculation" a) => + Lens.Family2.LensLike' f s a +isExcludedFromRiskCalculation + = Data.ProtoLens.Field.field @"isExcludedFromRiskCalculation" +isForceCare :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isForceCare" a) => + Lens.Family2.LensLike' f s a +isForceCare = Data.ProtoLens.Field.field @"isForceCare" +isGiveup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isGiveup" a) => + Lens.Family2.LensLike' f s a +isGiveup = Data.ProtoLens.Field.field @"isGiveup" +isInMigration :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isInMigration" a) => + Lens.Family2.LensLike' f s a +isInMigration = Data.ProtoLens.Field.field @"isInMigration" +isInUse :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "isInUse" a) => + Lens.Family2.LensLike' f s a +isInUse = Data.ProtoLens.Field.field @"isInUse" +isInstruct :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isInstruct" a) => + Lens.Family2.LensLike' f s a +isInstruct = Data.ProtoLens.Field.field @"isInstruct" +isMaster :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isMaster" a) => + Lens.Family2.LensLike' f s a +isMaster = Data.ProtoLens.Field.field @"isMaster" +isMifidDea :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isMifidDea" a) => + Lens.Family2.LensLike' f s a +isMifidDea = Data.ProtoLens.Field.field @"isMifidDea" +isPrimaryLogin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isPrimaryLogin" a) => + Lens.Family2.LensLike' f s a +isPrimaryLogin = Data.ProtoLens.Field.field @"isPrimaryLogin" +isRemoved :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isRemoved" a) => + Lens.Family2.LensLike' f s a +isRemoved = Data.ProtoLens.Field.field @"isRemoved" +isShortOpenPosition :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isShortOpenPosition" a) => + Lens.Family2.LensLike' f s a +isShortOpenPosition + = Data.ProtoLens.Field.field @"isShortOpenPosition" +isUs :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "isUs" a) => + Lens.Family2.LensLike' f s a +isUs = Data.ProtoLens.Field.field @"isUs" +isViewOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "isViewOnly" a) => + Lens.Family2.LensLike' f s a +isViewOnly = Data.ProtoLens.Field.field @"isViewOnly" +last :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "last" a) => + Lens.Family2.LensLike' f s a +last = Data.ProtoLens.Field.field @"last" +lastTradingDateLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "lastTradingDateLimit" a) => + Lens.Family2.LensLike' f s a +lastTradingDateLimit + = Data.ProtoLens.Field.field @"lastTradingDateLimit" +legFills :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "legFills" a) => + Lens.Family2.LensLike' f s a +legFills = Data.ProtoLens.Field.field @"legFills" +legNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "legNumber" a) => + Lens.Family2.LensLike' f s a +legNumber = Data.ProtoLens.Field.field @"legNumber" +legPath :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "legPath" a) => + Lens.Family2.LensLike' f s a +legPath = Data.ProtoLens.Field.field @"legPath" +legs :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "legs" a) => + Lens.Family2.LensLike' f s a +legs = Data.ProtoLens.Field.field @"legs" +limitPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "limitPrice" a) => + Lens.Family2.LensLike' f s a +limitPrice = Data.ProtoLens.Field.field @"limitPrice" +linkOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "linkOrderId" a) => + Lens.Family2.LensLike' f s a +linkOrderId = Data.ProtoLens.Field.field @"linkOrderId" +linksToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "linksToRemove" a) => + Lens.Family2.LensLike' f s a +linksToRemove = Data.ProtoLens.Field.field @"linksToRemove" +linksToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "linksToSet" a) => + Lens.Family2.LensLike' f s a +linksToSet = Data.ProtoLens.Field.field @"linksToSet" +liquidationOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "liquidationOnly" a) => + Lens.Family2.LensLike' f s a +liquidationOnly = Data.ProtoLens.Field.field @"liquidationOnly" +liquidationOrdersOutsideTradingTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "liquidationOrdersOutsideTradingTime" a) => + Lens.Family2.LensLike' f s a +liquidationOrdersOutsideTradingTime + = Data.ProtoLens.Field.field @"liquidationOrdersOutsideTradingTime" +locateId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "locateId" a) => + Lens.Family2.LensLike' f s a +locateId = Data.ProtoLens.Field.field @"locateId" +loginEnforce :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "loginEnforce" a) => + Lens.Family2.LensLike' f s a +loginEnforce = Data.ProtoLens.Field.field @"loginEnforce" +loginId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "loginId" a) => + Lens.Family2.LensLike' f s a +loginId = Data.ProtoLens.Field.field @"loginId" +longOptionPremiumCheckAgainstPurchasingPower :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "longOptionPremiumCheckAgainstPurchasingPower" a) => + Lens.Family2.LensLike' f s a +longOptionPremiumCheckAgainstPurchasingPower + = Data.ProtoLens.Field.field + @"longOptionPremiumCheckAgainstPurchasingPower" +longPositionsOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "longPositionsOnly" a) => + Lens.Family2.LensLike' f s a +longPositionsOnly = Data.ProtoLens.Field.field @"longPositionsOnly" +lookupPropertyListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "lookupPropertyListRequest" a) => + Lens.Family2.LensLike' f s a +lookupPropertyListRequest + = Data.ProtoLens.Field.field @"lookupPropertyListRequest" +lookupPropertyListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "lookupPropertyListResult" a) => + Lens.Family2.LensLike' f s a +lookupPropertyListResult + = Data.ProtoLens.Field.field @"lookupPropertyListResult" +maintMargin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maintMargin" a) => + Lens.Family2.LensLike' f s a +maintMargin = Data.ProtoLens.Field.field @"maintMargin" +marginGroupId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "marginGroupId" a) => + Lens.Family2.LensLike' f s a +marginGroupId = Data.ProtoLens.Field.field @"marginGroupId" +marginMultiplier :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "marginMultiplier" a) => + Lens.Family2.LensLike' f s a +marginMultiplier = Data.ProtoLens.Field.field @"marginMultiplier" +marketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "marketLimits" a) => + Lens.Family2.LensLike' f s a +marketLimits = Data.ProtoLens.Field.field @"marketLimits" +masterAccountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "masterAccountId" a) => + Lens.Family2.LensLike' f s a +masterAccountId = Data.ProtoLens.Field.field @"masterAccountId" +maxPurchasingPower :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maxPurchasingPower" a) => + Lens.Family2.LensLike' f s a +maxPurchasingPower + = Data.ProtoLens.Field.field @"maxPurchasingPower" +maximumOrderRate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maximumOrderRate" a) => + Lens.Family2.LensLike' f s a +maximumOrderRate = Data.ProtoLens.Field.field @"maximumOrderRate" +maybe'account :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'account" a) => + Lens.Family2.LensLike' f s a +maybe'account = Data.ProtoLens.Field.field @"maybe'account" +maybe'accountAvailableExchangeGroupsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountAvailableExchangeGroupsRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountAvailableExchangeGroupsRequest + = Data.ProtoLens.Field.field + @"maybe'accountAvailableExchangeGroupsRequest" +maybe'accountAvailableRouteListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountAvailableRouteListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountAvailableRouteListRequest + = Data.ProtoLens.Field.field + @"maybe'accountAvailableRouteListRequest" +maybe'accountAvailableRouteListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountAvailableRouteListResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountAvailableRouteListResult + = Data.ProtoLens.Field.field + @"maybe'accountAvailableRouteListResult" +maybe'accountAvailableServiceGroupListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountAvailableServiceGroupListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountAvailableServiceGroupListRequest + = Data.ProtoLens.Field.field + @"maybe'accountAvailableServiceGroupListRequest" +maybe'accountAvailableServiceGroupListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountAvailableServiceGroupListResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountAvailableServiceGroupListResult + = Data.ProtoLens.Field.field + @"maybe'accountAvailableServiceGroupListResult" +maybe'accountBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountBrokerageId" a) => + Lens.Family2.LensLike' f s a +maybe'accountBrokerageId + = Data.ProtoLens.Field.field @"maybe'accountBrokerageId" +maybe'accountClusterId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountClusterId" a) => + Lens.Family2.LensLike' f s a +maybe'accountClusterId + = Data.ProtoLens.Field.field @"maybe'accountClusterId" +maybe'accountCollateralRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountCollateralRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountCollateralRequest + = Data.ProtoLens.Field.field @"maybe'accountCollateralRequest" +maybe'accountCollateralResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountCollateralResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountCollateralResult + = Data.ProtoLens.Field.field @"maybe'accountCollateralResult" +maybe'accountEquityRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountEquityRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountEquityRequest + = Data.ProtoLens.Field.field @"maybe'accountEquityRequest" +maybe'accountEquityResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountEquityResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountEquityResult + = Data.ProtoLens.Field.field @"maybe'accountEquityResult" +maybe'accountExchangeGroupsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountExchangeGroupsResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountExchangeGroupsResult + = Data.ProtoLens.Field.field @"maybe'accountExchangeGroupsResult" +maybe'accountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountGroup" a) => + Lens.Family2.LensLike' f s a +maybe'accountGroup + = Data.ProtoLens.Field.field @"maybe'accountGroup" +maybe'accountGroupId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountGroupId" a) => + Lens.Family2.LensLike' f s a +maybe'accountGroupId + = Data.ProtoLens.Field.field @"maybe'accountGroupId" +maybe'accountGroupRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountGroupRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountGroupRequest + = Data.ProtoLens.Field.field @"maybe'accountGroupRequest" +maybe'accountGroupResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountGroupResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountGroupResult + = Data.ProtoLens.Field.field @"maybe'accountGroupResult" +maybe'accountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountId" a) => + Lens.Family2.LensLike' f s a +maybe'accountId = Data.ProtoLens.Field.field @"maybe'accountId" +maybe'accountInfoRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountInfoRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountInfoRequest + = Data.ProtoLens.Field.field @"maybe'accountInfoRequest" +maybe'accountInfoResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountInfoResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountInfoResult + = Data.ProtoLens.Field.field @"maybe'accountInfoResult" +maybe'accountMarketLimitsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountMarketLimitsRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountMarketLimitsRequest + = Data.ProtoLens.Field.field @"maybe'accountMarketLimitsRequest" +maybe'accountMarketLimitsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountMarketLimitsResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountMarketLimitsResult + = Data.ProtoLens.Field.field @"maybe'accountMarketLimitsResult" +maybe'accountName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountName" a) => + Lens.Family2.LensLike' f s a +maybe'accountName = Data.ProtoLens.Field.field @"maybe'accountName" +maybe'accountPositionsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountPositionsRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountPositionsRequest + = Data.ProtoLens.Field.field @"maybe'accountPositionsRequest" +maybe'accountPositionsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountPositionsResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountPositionsResult + = Data.ProtoLens.Field.field @"maybe'accountPositionsResult" +maybe'accountRiskParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountRiskParameters" a) => + Lens.Family2.LensLike' f s a +maybe'accountRiskParameters + = Data.ProtoLens.Field.field @"maybe'accountRiskParameters" +maybe'accountRiskParametersRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountRiskParametersRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountRiskParametersRequest + = Data.ProtoLens.Field.field @"maybe'accountRiskParametersRequest" +maybe'accountRiskParametersResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountRiskParametersResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountRiskParametersResult + = Data.ProtoLens.Field.field @"maybe'accountRiskParametersResult" +maybe'accountRouteListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountRouteListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountRouteListRequest + = Data.ProtoLens.Field.field @"maybe'accountRouteListRequest" +maybe'accountRouteListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountRouteListResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountRouteListResult + = Data.ProtoLens.Field.field @"maybe'accountRouteListResult" +maybe'accountSalesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountSalesSeriesId" a) => + Lens.Family2.LensLike' f s a +maybe'accountSalesSeriesId + = Data.ProtoLens.Field.field @"maybe'accountSalesSeriesId" +maybe'accountScopeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountScopeRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountScopeRequest + = Data.ProtoLens.Field.field @"maybe'accountScopeRequest" +maybe'accountScopeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountScopeResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountScopeResult + = Data.ProtoLens.Field.field @"maybe'accountScopeResult" +maybe'accountSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountSearchRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountSearchRequest + = Data.ProtoLens.Field.field @"maybe'accountSearchRequest" +maybe'accountSearchResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountSearchResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountSearchResult + = Data.ProtoLens.Field.field @"maybe'accountSearchResult" +maybe'accountServiceGroupListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountServiceGroupListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountServiceGroupListRequest + = Data.ProtoLens.Field.field + @"maybe'accountServiceGroupListRequest" +maybe'accountServiceGroupListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountServiceGroupListResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountServiceGroupListResult + = Data.ProtoLens.Field.field @"maybe'accountServiceGroupListResult" +maybe'accountSettingsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountSettingsRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountSettingsRequest + = Data.ProtoLens.Field.field @"maybe'accountSettingsRequest" +maybe'accountSettingsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountSettingsResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountSettingsResult + = Data.ProtoLens.Field.field @"maybe'accountSettingsResult" +maybe'accountTradingFeaturesRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountTradingFeaturesRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountTradingFeaturesRequest + = Data.ProtoLens.Field.field @"maybe'accountTradingFeaturesRequest" +maybe'accountTradingFeaturesResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountTradingFeaturesResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountTradingFeaturesResult + = Data.ProtoLens.Field.field @"maybe'accountTradingFeaturesResult" +maybe'accountTypeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountTypeId" a) => + Lens.Family2.LensLike' f s a +maybe'accountTypeId + = Data.ProtoLens.Field.field @"maybe'accountTypeId" +maybe'accountTypeOverrideListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountTypeOverrideListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountTypeOverrideListRequest + = Data.ProtoLens.Field.field + @"maybe'accountTypeOverrideListRequest" +maybe'accountTypeOverrideListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountTypeOverrideListResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountTypeOverrideListResult + = Data.ProtoLens.Field.field @"maybe'accountTypeOverrideListResult" +maybe'accountUserAuthorizationListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountUserAuthorizationListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'accountUserAuthorizationListRequest + = Data.ProtoLens.Field.field + @"maybe'accountUserAuthorizationListRequest" +maybe'accountUserAuthorizationListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'accountUserAuthorizationListResult" a) => + Lens.Family2.LensLike' f s a +maybe'accountUserAuthorizationListResult + = Data.ProtoLens.Field.field + @"maybe'accountUserAuthorizationListResult" +maybe'acountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'acountGroup" a) => + Lens.Family2.LensLike' f s a +maybe'acountGroup = Data.ProtoLens.Field.field @"maybe'acountGroup" +maybe'action :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'action" a) => + Lens.Family2.LensLike' f s a +maybe'action = Data.ProtoLens.Field.field @"maybe'action" +maybe'activateOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'activateOrder" a) => + Lens.Family2.LensLike' f s a +maybe'activateOrder + = Data.ProtoLens.Field.field @"maybe'activateOrder" +maybe'activationTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'activationTime" a) => + Lens.Family2.LensLike' f s a +maybe'activationTime + = Data.ProtoLens.Field.field @"maybe'activationTime" +maybe'addFill :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'addFill" a) => + Lens.Family2.LensLike' f s a +maybe'addFill = Data.ProtoLens.Field.field @"maybe'addFill" +maybe'addFillResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'addFillResult" a) => + Lens.Family2.LensLike' f s a +maybe'addFillResult + = Data.ProtoLens.Field.field @"maybe'addFillResult" +maybe'adjustPriceByNetchange :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'adjustPriceByNetchange" a) => + Lens.Family2.LensLike' f s a +maybe'adjustPriceByNetchange + = Data.ProtoLens.Field.field @"maybe'adjustPriceByNetchange" +maybe'algoStrategy :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'algoStrategy" a) => + Lens.Family2.LensLike' f s a +maybe'algoStrategy + = Data.ProtoLens.Field.field @"maybe'algoStrategy" +maybe'allMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allMarketLimits" a) => + Lens.Family2.LensLike' f s a +maybe'allMarketLimits + = Data.ProtoLens.Field.field @"maybe'allMarketLimits" +maybe'allMatchMode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allMatchMode" a) => + Lens.Family2.LensLike' f s a +maybe'allMatchMode + = Data.ProtoLens.Field.field @"maybe'allMatchMode" +maybe'allowExtendedSide :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allowExtendedSide" a) => + Lens.Family2.LensLike' f s a +maybe'allowExtendedSide + = Data.ProtoLens.Field.field @"maybe'allowExtendedSide" +maybe'allowExternalAccounts :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allowExternalAccounts" a) => + Lens.Family2.LensLike' f s a +maybe'allowExternalAccounts + = Data.ProtoLens.Field.field @"maybe'allowExternalAccounts" +maybe'allowFutures :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allowFutures" a) => + Lens.Family2.LensLike' f s a +maybe'allowFutures + = Data.ProtoLens.Field.field @"maybe'allowFutures" +maybe'allowGoFlat :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allowGoFlat" a) => + Lens.Family2.LensLike' f s a +maybe'allowGoFlat = Data.ProtoLens.Field.field @"maybe'allowGoFlat" +maybe'allowOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allowOptions" a) => + Lens.Family2.LensLike' f s a +maybe'allowOptions + = Data.ProtoLens.Field.field @"maybe'allowOptions" +maybe'allowSyntheticOrderTypes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allowSyntheticOrderTypes" a) => + Lens.Family2.LensLike' f s a +maybe'allowSyntheticOrderTypes + = Data.ProtoLens.Field.field @"maybe'allowSyntheticOrderTypes" +maybe'allowableMarginCredit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allowableMarginCredit" a) => + Lens.Family2.LensLike' f s a +maybe'allowableMarginCredit + = Data.ProtoLens.Field.field @"maybe'allowableMarginCredit" +maybe'allowedToTrade :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'allowedToTrade" a) => + Lens.Family2.LensLike' f s a +maybe'allowedToTrade + = Data.ProtoLens.Field.field @"maybe'allowedToTrade" +maybe'alwaysAllowLiquidation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'alwaysAllowLiquidation" a) => + Lens.Family2.LensLike' f s a +maybe'alwaysAllowLiquidation + = Data.ProtoLens.Field.field @"maybe'alwaysAllowLiquidation" +maybe'amount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'amount" a) => + Lens.Family2.LensLike' f s a +maybe'amount = Data.ProtoLens.Field.field @"maybe'amount" +maybe'archived :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'archived" a) => + Lens.Family2.LensLike' f s a +maybe'archived = Data.ProtoLens.Field.field @"maybe'archived" +maybe'asOfDate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'asOfDate" a) => + Lens.Family2.LensLike' f s a +maybe'asOfDate = Data.ProtoLens.Field.field @"maybe'asOfDate" +maybe'authorizationRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'authorizationRequired" a) => + Lens.Family2.LensLike' f s a +maybe'authorizationRequired + = Data.ProtoLens.Field.field @"maybe'authorizationRequired" +maybe'balanceId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'balanceId" a) => + Lens.Family2.LensLike' f s a +maybe'balanceId = Data.ProtoLens.Field.field @"maybe'balanceId" +maybe'balanceRecordsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'balanceRecordsRequest" a) => + Lens.Family2.LensLike' f s a +maybe'balanceRecordsRequest + = Data.ProtoLens.Field.field @"maybe'balanceRecordsRequest" +maybe'balanceRecordsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'balanceRecordsResult" a) => + Lens.Family2.LensLike' f s a +maybe'balanceRecordsResult + = Data.ProtoLens.Field.field @"maybe'balanceRecordsResult" +maybe'batchOrdersOperation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'batchOrdersOperation" a) => + Lens.Family2.LensLike' f s a +maybe'batchOrdersOperation + = Data.ProtoLens.Field.field @"maybe'batchOrdersOperation" +maybe'batchOrdersOperationResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'batchOrdersOperationResult" a) => + Lens.Family2.LensLike' f s a +maybe'batchOrdersOperationResult + = Data.ProtoLens.Field.field @"maybe'batchOrdersOperationResult" +maybe'batchRequestGuid :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'batchRequestGuid" a) => + Lens.Family2.LensLike' f s a +maybe'batchRequestGuid + = Data.ProtoLens.Field.field @"maybe'batchRequestGuid" +maybe'bidAsk :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'bidAsk" a) => + Lens.Family2.LensLike' f s a +maybe'bidAsk = Data.ProtoLens.Field.field @"maybe'bidAsk" +maybe'billableExchangeListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'billableExchangeListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'billableExchangeListRequest + = Data.ProtoLens.Field.field @"maybe'billableExchangeListRequest" +maybe'billableExchangeListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'billableExchangeListResult" a) => + Lens.Family2.LensLike' f s a +maybe'billableExchangeListResult + = Data.ProtoLens.Field.field @"maybe'billableExchangeListResult" +maybe'brokerageAccountNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'brokerageAccountNumber" a) => + Lens.Family2.LensLike' f s a +maybe'brokerageAccountNumber + = Data.ProtoLens.Field.field @"maybe'brokerageAccountNumber" +maybe'brokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'brokerageId" a) => + Lens.Family2.LensLike' f s a +maybe'brokerageId = Data.ProtoLens.Field.field @"maybe'brokerageId" +maybe'brokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'brokerageName" a) => + Lens.Family2.LensLike' f s a +maybe'brokerageName + = Data.ProtoLens.Field.field @"maybe'brokerageName" +maybe'bust :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'bust" a) => + Lens.Family2.LensLike' f s a +maybe'bust = Data.ProtoLens.Field.field @"maybe'bust" +maybe'cancelCompoundOrderTree :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cancelCompoundOrderTree" a) => + Lens.Family2.LensLike' f s a +maybe'cancelCompoundOrderTree + = Data.ProtoLens.Field.field @"maybe'cancelCompoundOrderTree" +maybe'cancelCompoundOrderTreeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cancelCompoundOrderTreeResult" a) => + Lens.Family2.LensLike' f s a +maybe'cancelCompoundOrderTreeResult + = Data.ProtoLens.Field.field @"maybe'cancelCompoundOrderTreeResult" +maybe'cancelFill :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cancelFill" a) => + Lens.Family2.LensLike' f s a +maybe'cancelFill = Data.ProtoLens.Field.field @"maybe'cancelFill" +maybe'cancelOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cancelOrder" a) => + Lens.Family2.LensLike' f s a +maybe'cancelOrder = Data.ProtoLens.Field.field @"maybe'cancelOrder" +maybe'cancelOrderResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cancelOrderResult" a) => + Lens.Family2.LensLike' f s a +maybe'cancelOrderResult + = Data.ProtoLens.Field.field @"maybe'cancelOrderResult" +maybe'cashExcess :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cashExcess" a) => + Lens.Family2.LensLike' f s a +maybe'cashExcess = Data.ProtoLens.Field.field @"maybe'cashExcess" +maybe'chainOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'chainOrderId" a) => + Lens.Family2.LensLike' f s a +maybe'chainOrderId + = Data.ProtoLens.Field.field @"maybe'chainOrderId" +maybe'checkNegativeBalance :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'checkNegativeBalance" a) => + Lens.Family2.LensLike' f s a +maybe'checkNegativeBalance + = Data.ProtoLens.Field.field @"maybe'checkNegativeBalance" +maybe'checked :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'checked" a) => + Lens.Family2.LensLike' f s a +maybe'checked = Data.ProtoLens.Field.field @"maybe'checked" +maybe'class' :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'class'" a) => + Lens.Family2.LensLike' f s a +maybe'class' = Data.ProtoLens.Field.field @"maybe'class'" +maybe'clientAlgoStrategy :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'clientAlgoStrategy" a) => + Lens.Family2.LensLike' f s a +maybe'clientAlgoStrategy + = Data.ProtoLens.Field.field @"maybe'clientAlgoStrategy" +maybe'clientAppTypeName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'clientAppTypeName" a) => + Lens.Family2.LensLike' f s a +maybe'clientAppTypeName + = Data.ProtoLens.Field.field @"maybe'clientAppTypeName" +maybe'clientGuid :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'clientGuid" a) => + Lens.Family2.LensLike' f s a +maybe'clientGuid = Data.ProtoLens.Field.field @"maybe'clientGuid" +maybe'clientIp :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'clientIp" a) => + Lens.Family2.LensLike' f s a +maybe'clientIp = Data.ProtoLens.Field.field @"maybe'clientIp" +maybe'clientOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'clientOrderId" a) => + Lens.Family2.LensLike' f s a +maybe'clientOrderId + = Data.ProtoLens.Field.field @"maybe'clientOrderId" +maybe'clientRegulatoryAlgorithmId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'clientRegulatoryAlgorithmId" a) => + Lens.Family2.LensLike' f s a +maybe'clientRegulatoryAlgorithmId + = Data.ProtoLens.Field.field @"maybe'clientRegulatoryAlgorithmId" +maybe'clientSystemId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'clientSystemId" a) => + Lens.Family2.LensLike' f s a +maybe'clientSystemId + = Data.ProtoLens.Field.field @"maybe'clientSystemId" +maybe'clientVersion :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'clientVersion" a) => + Lens.Family2.LensLike' f s a +maybe'clientVersion + = Data.ProtoLens.Field.field @"maybe'clientVersion" +maybe'cloneAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cloneAccount" a) => + Lens.Family2.LensLike' f s a +maybe'cloneAccount + = Data.ProtoLens.Field.field @"maybe'cloneAccount" +maybe'cloneAccountResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cloneAccountResult" a) => + Lens.Family2.LensLike' f s a +maybe'cloneAccountResult + = Data.ProtoLens.Field.field @"maybe'cloneAccountResult" +maybe'code :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'code" a) => + Lens.Family2.LensLike' f s a +maybe'code = Data.ProtoLens.Field.field @"maybe'code" +maybe'collateral :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'collateral" a) => + Lens.Family2.LensLike' f s a +maybe'collateral = Data.ProtoLens.Field.field @"maybe'collateral" +maybe'comments :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'comments" a) => + Lens.Family2.LensLike' f s a +maybe'comments = Data.ProtoLens.Field.field @"maybe'comments" +maybe'commission :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'commission" a) => + Lens.Family2.LensLike' f s a +maybe'commission = Data.ProtoLens.Field.field @"maybe'commission" +maybe'commissionCurrency :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'commissionCurrency" a) => + Lens.Family2.LensLike' f s a +maybe'commissionCurrency + = Data.ProtoLens.Field.field @"maybe'commissionCurrency" +maybe'commodityGrossOpenPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'commodityGrossOpenPositionLimit" a) => + Lens.Family2.LensLike' f s a +maybe'commodityGrossOpenPositionLimit + = Data.ProtoLens.Field.field + @"maybe'commodityGrossOpenPositionLimit" +maybe'commodityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'commodityId" a) => + Lens.Family2.LensLike' f s a +maybe'commodityId = Data.ProtoLens.Field.field @"maybe'commodityId" +maybe'commodityPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'commodityPositionLimit" a) => + Lens.Family2.LensLike' f s a +maybe'commodityPositionLimit + = Data.ProtoLens.Field.field @"maybe'commodityPositionLimit" +maybe'compoundOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'compoundOrder" a) => + Lens.Family2.LensLike' f s a +maybe'compoundOrder + = Data.ProtoLens.Field.field @"maybe'compoundOrder" +maybe'compoundOrderTreeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'compoundOrderTreeRequest" a) => + Lens.Family2.LensLike' f s a +maybe'compoundOrderTreeRequest + = Data.ProtoLens.Field.field @"maybe'compoundOrderTreeRequest" +maybe'compoundOrderTreeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'compoundOrderTreeResult" a) => + Lens.Family2.LensLike' f s a +maybe'compoundOrderTreeResult + = Data.ProtoLens.Field.field @"maybe'compoundOrderTreeResult" +maybe'compoundTreeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'compoundTreeId" a) => + Lens.Family2.LensLike' f s a +maybe'compoundTreeId + = Data.ProtoLens.Field.field @"maybe'compoundTreeId" +maybe'confirmOrderSentToExchange :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'confirmOrderSentToExchange" a) => + Lens.Family2.LensLike' f s a +maybe'confirmOrderSentToExchange + = Data.ProtoLens.Field.field @"maybe'confirmOrderSentToExchange" +maybe'contractDescription :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'contractDescription" a) => + Lens.Family2.LensLike' f s a +maybe'contractDescription + = Data.ProtoLens.Field.field @"maybe'contractDescription" +maybe'contractId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'contractId" a) => + Lens.Family2.LensLike' f s a +maybe'contractId = Data.ProtoLens.Field.field @"maybe'contractId" +maybe'contractPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'contractPositionLimit" a) => + Lens.Family2.LensLike' f s a +maybe'contractPositionLimit + = Data.ProtoLens.Field.field @"maybe'contractPositionLimit" +maybe'contractSymbol :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'contractSymbol" a) => + Lens.Family2.LensLike' f s a +maybe'contractSymbol + = Data.ProtoLens.Field.field @"maybe'contractSymbol" +maybe'correctFill :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'correctFill" a) => + Lens.Family2.LensLike' f s a +maybe'correctFill = Data.ProtoLens.Field.field @"maybe'correctFill" +maybe'cqgAlgoOrdersOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'cqgAlgoOrdersOnly" a) => + Lens.Family2.LensLike' f s a +maybe'cqgAlgoOrdersOnly + = Data.ProtoLens.Field.field @"maybe'cqgAlgoOrdersOnly" +maybe'createAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createAccount" a) => + Lens.Family2.LensLike' f s a +maybe'createAccount + = Data.ProtoLens.Field.field @"maybe'createAccount" +maybe'createAccountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createAccountGroup" a) => + Lens.Family2.LensLike' f s a +maybe'createAccountGroup + = Data.ProtoLens.Field.field @"maybe'createAccountGroup" +maybe'createAccountGroupResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createAccountGroupResult" a) => + Lens.Family2.LensLike' f s a +maybe'createAccountGroupResult + = Data.ProtoLens.Field.field @"maybe'createAccountGroupResult" +maybe'createAccountResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createAccountResult" a) => + Lens.Family2.LensLike' f s a +maybe'createAccountResult + = Data.ProtoLens.Field.field @"maybe'createAccountResult" +maybe'createBalanceRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createBalanceRecord" a) => + Lens.Family2.LensLike' f s a +maybe'createBalanceRecord + = Data.ProtoLens.Field.field @"maybe'createBalanceRecord" +maybe'createBalanceRecordResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createBalanceRecordResult" a) => + Lens.Family2.LensLike' f s a +maybe'createBalanceRecordResult + = Data.ProtoLens.Field.field @"maybe'createBalanceRecordResult" +maybe'createExternalOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createExternalOrder" a) => + Lens.Family2.LensLike' f s a +maybe'createExternalOrder + = Data.ProtoLens.Field.field @"maybe'createExternalOrder" +maybe'createExternalOrderResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'createExternalOrderResult" a) => + Lens.Family2.LensLike' f s a +maybe'createExternalOrderResult + = Data.ProtoLens.Field.field @"maybe'createExternalOrderResult" +maybe'currency :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'currency" a) => + Lens.Family2.LensLike' f s a +maybe'currency = Data.ProtoLens.Field.field @"maybe'currency" +maybe'currencyIsoCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'currencyIsoCode" a) => + Lens.Family2.LensLike' f s a +maybe'currencyIsoCode + = Data.ProtoLens.Field.field @"maybe'currencyIsoCode" +maybe'customerId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'customerId" a) => + Lens.Family2.LensLike' f s a +maybe'customerId = Data.ProtoLens.Field.field @"maybe'customerId" +maybe'customerLastName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'customerLastName" a) => + Lens.Family2.LensLike' f s a +maybe'customerLastName + = Data.ProtoLens.Field.field @"maybe'customerLastName" +maybe'customerName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'customerName" a) => + Lens.Family2.LensLike' f s a +maybe'customerName + = Data.ProtoLens.Field.field @"maybe'customerName" +maybe'dailyLossLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'dailyLossLimit" a) => + Lens.Family2.LensLike' f s a +maybe'dailyLossLimit + = Data.ProtoLens.Field.field @"maybe'dailyLossLimit" +maybe'daysBeforeExpiration :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'daysBeforeExpiration" a) => + Lens.Family2.LensLike' f s a +maybe'daysBeforeExpiration + = Data.ProtoLens.Field.field @"maybe'daysBeforeExpiration" +maybe'defaultMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'defaultMarketLimits" a) => + Lens.Family2.LensLike' f s a +maybe'defaultMarketLimits + = Data.ProtoLens.Field.field @"maybe'defaultMarketLimits" +maybe'deleteAccountPositions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'deleteAccountPositions" a) => + Lens.Family2.LensLike' f s a +maybe'deleteAccountPositions + = Data.ProtoLens.Field.field @"maybe'deleteAccountPositions" +maybe'deltaDailyLossLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'deltaDailyLossLimit" a) => + Lens.Family2.LensLike' f s a +maybe'deltaDailyLossLimit + = Data.ProtoLens.Field.field @"maybe'deltaDailyLossLimit" +maybe'description :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'description" a) => + Lens.Family2.LensLike' f s a +maybe'description = Data.ProtoLens.Field.field @"maybe'description" +maybe'displayFillPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'displayFillPrice" a) => + Lens.Family2.LensLike' f s a +maybe'displayFillPrice + = Data.ProtoLens.Field.field @"maybe'displayFillPrice" +maybe'displayLimitPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'displayLimitPrice" a) => + Lens.Family2.LensLike' f s a +maybe'displayLimitPrice + = Data.ProtoLens.Field.field @"maybe'displayLimitPrice" +maybe'displayOffset :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'displayOffset" a) => + Lens.Family2.LensLike' f s a +maybe'displayOffset + = Data.ProtoLens.Field.field @"maybe'displayOffset" +maybe'displayPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'displayPrice" a) => + Lens.Family2.LensLike' f s a +maybe'displayPrice + = Data.ProtoLens.Field.field @"maybe'displayPrice" +maybe'displayStopPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'displayStopPrice" a) => + Lens.Family2.LensLike' f s a +maybe'displayStopPrice + = Data.ProtoLens.Field.field @"maybe'displayStopPrice" +maybe'duration :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'duration" a) => + Lens.Family2.LensLike' f s a +maybe'duration = Data.ProtoLens.Field.field @"maybe'duration" +maybe'effectiveRegulatoryAlgorithmId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'effectiveRegulatoryAlgorithmId" a) => + Lens.Family2.LensLike' f s a +maybe'effectiveRegulatoryAlgorithmId + = Data.ProtoLens.Field.field + @"maybe'effectiveRegulatoryAlgorithmId" +maybe'enableAlgoStrategiesWhitelist :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enableAlgoStrategiesWhitelist" a) => + Lens.Family2.LensLike' f s a +maybe'enableAlgoStrategiesWhitelist + = Data.ProtoLens.Field.field @"maybe'enableAlgoStrategiesWhitelist" +maybe'enabled :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enabled" a) => + Lens.Family2.LensLike' f s a +maybe'enabled = Data.ProtoLens.Field.field @"maybe'enabled" +maybe'endCashBalance :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'endCashBalance" a) => + Lens.Family2.LensLike' f s a +maybe'endCashBalance + = Data.ProtoLens.Field.field @"maybe'endCashBalance" +maybe'enforce :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforce" a) => + Lens.Family2.LensLike' f s a +maybe'enforce = Data.ProtoLens.Field.field @"maybe'enforce" +maybe'enforceCommodityPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceCommodityPositionLimit" a) => + Lens.Family2.LensLike' f s a +maybe'enforceCommodityPositionLimit + = Data.ProtoLens.Field.field @"maybe'enforceCommodityPositionLimit" +maybe'enforceContractPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceContractPositionLimit" a) => + Lens.Family2.LensLike' f s a +maybe'enforceContractPositionLimit + = Data.ProtoLens.Field.field @"maybe'enforceContractPositionLimit" +maybe'enforceDailyLossLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceDailyLossLimit" a) => + Lens.Family2.LensLike' f s a +maybe'enforceDailyLossLimit + = Data.ProtoLens.Field.field @"maybe'enforceDailyLossLimit" +maybe'enforceDeltaDailyLossLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceDeltaDailyLossLimit" a) => + Lens.Family2.LensLike' f s a +maybe'enforceDeltaDailyLossLimit + = Data.ProtoLens.Field.field @"maybe'enforceDeltaDailyLossLimit" +maybe'enforceMarginSubsystemParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceMarginSubsystemParameters" a) => + Lens.Family2.LensLike' f s a +maybe'enforceMarginSubsystemParameters + = Data.ProtoLens.Field.field + @"maybe'enforceMarginSubsystemParameters" +maybe'enforceMaxPurchasingPower :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceMaxPurchasingPower" a) => + Lens.Family2.LensLike' f s a +maybe'enforceMaxPurchasingPower + = Data.ProtoLens.Field.field @"maybe'enforceMaxPurchasingPower" +maybe'enforceTotalGrossOpenPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceTotalGrossOpenPositionLimit" a) => + Lens.Family2.LensLike' f s a +maybe'enforceTotalGrossOpenPositionLimit + = Data.ProtoLens.Field.field + @"maybe'enforceTotalGrossOpenPositionLimit" +maybe'enforceTradeMarginLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceTradeMarginLimit" a) => + Lens.Family2.LensLike' f s a +maybe'enforceTradeMarginLimit + = Data.ProtoLens.Field.field @"maybe'enforceTradeMarginLimit" +maybe'enforceTradePriceLimitPercent :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceTradePriceLimitPercent" a) => + Lens.Family2.LensLike' f s a +maybe'enforceTradePriceLimitPercent + = Data.ProtoLens.Field.field @"maybe'enforceTradePriceLimitPercent" +maybe'enforceTradePriceLimitTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceTradePriceLimitTicks" a) => + Lens.Family2.LensLike' f s a +maybe'enforceTradePriceLimitTicks + = Data.ProtoLens.Field.field @"maybe'enforceTradePriceLimitTicks" +maybe'enforceTradeSizeLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'enforceTradeSizeLimit" a) => + Lens.Family2.LensLike' f s a +maybe'enforceTradeSizeLimit + = Data.ProtoLens.Field.field @"maybe'enforceTradeSizeLimit" +maybe'errorMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'errorMessage" a) => + Lens.Family2.LensLike' f s a +maybe'errorMessage + = Data.ProtoLens.Field.field @"maybe'errorMessage" +maybe'exchangeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'exchangeId" a) => + Lens.Family2.LensLike' f s a +maybe'exchangeId = Data.ProtoLens.Field.field @"maybe'exchangeId" +maybe'execId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'execId" a) => + Lens.Family2.LensLike' f s a +maybe'execId = Data.ProtoLens.Field.field @"maybe'execId" +maybe'executionAccountName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'executionAccountName" a) => + Lens.Family2.LensLike' f s a +maybe'executionAccountName + = Data.ProtoLens.Field.field @"maybe'executionAccountName" +maybe'executionSourceCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'executionSourceCode" a) => + Lens.Family2.LensLike' f s a +maybe'executionSourceCode + = Data.ProtoLens.Field.field @"maybe'executionSourceCode" +maybe'executionSourceCodeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'executionSourceCodeId" a) => + Lens.Family2.LensLike' f s a +maybe'executionSourceCodeId + = Data.ProtoLens.Field.field @"maybe'executionSourceCodeId" +maybe'expirationTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'expirationTime" a) => + Lens.Family2.LensLike' f s a +maybe'expirationTime + = Data.ProtoLens.Field.field @"maybe'expirationTime" +maybe'extendedCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'extendedCode" a) => + Lens.Family2.LensLike' f s a +maybe'extendedCode + = Data.ProtoLens.Field.field @"maybe'extendedCode" +maybe'extendedSide :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'extendedSide" a) => + Lens.Family2.LensLike' f s a +maybe'extendedSide + = Data.ProtoLens.Field.field @"maybe'extendedSide" +maybe'externallyProvidedExecution :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'externallyProvidedExecution" a) => + Lens.Family2.LensLike' f s a +maybe'externallyProvidedExecution + = Data.ProtoLens.Field.field @"maybe'externallyProvidedExecution" +maybe'fillCareOrderRequestId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'fillCareOrderRequestId" a) => + Lens.Family2.LensLike' f s a +maybe'fillCareOrderRequestId + = Data.ProtoLens.Field.field @"maybe'fillCareOrderRequestId" +maybe'fillIsAggressive :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'fillIsAggressive" a) => + Lens.Family2.LensLike' f s a +maybe'fillIsAggressive + = Data.ProtoLens.Field.field @"maybe'fillIsAggressive" +maybe'fillPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'fillPrice" a) => + Lens.Family2.LensLike' f s a +maybe'fillPrice = Data.ProtoLens.Field.field @"maybe'fillPrice" +maybe'fillQuantity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'fillQuantity" a) => + Lens.Family2.LensLike' f s a +maybe'fillQuantity + = Data.ProtoLens.Field.field @"maybe'fillQuantity" +maybe'fillStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'fillStatus" a) => + Lens.Family2.LensLike' f s a +maybe'fillStatus = Data.ProtoLens.Field.field @"maybe'fillStatus" +maybe'fillType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'fillType" a) => + Lens.Family2.LensLike' f s a +maybe'fillType = Data.ProtoLens.Field.field @"maybe'fillType" +maybe'fillUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'fillUtcTime" a) => + Lens.Family2.LensLike' f s a +maybe'fillUtcTime = Data.ProtoLens.Field.field @"maybe'fillUtcTime" +maybe'forceVariableLatencyAlgo :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'forceVariableLatencyAlgo" a) => + Lens.Family2.LensLike' f s a +maybe'forceVariableLatencyAlgo + = Data.ProtoLens.Field.field @"maybe'forceVariableLatencyAlgo" +maybe'giveupBrokerageId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'giveupBrokerageId" a) => + Lens.Family2.LensLike' f s a +maybe'giveupBrokerageId + = Data.ProtoLens.Field.field @"maybe'giveupBrokerageId" +maybe'goFlatDefaultSpeculationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'goFlatDefaultSpeculationType" a) => + Lens.Family2.LensLike' f s a +maybe'goFlatDefaultSpeculationType + = Data.ProtoLens.Field.field @"maybe'goFlatDefaultSpeculationType" +maybe'goodThruDate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'goodThruDate" a) => + Lens.Family2.LensLike' f s a +maybe'goodThruDate + = Data.ProtoLens.Field.field @"maybe'goodThruDate" +maybe'goodThruUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'goodThruUtcTime" a) => + Lens.Family2.LensLike' f s a +maybe'goodThruUtcTime + = Data.ProtoLens.Field.field @"maybe'goodThruUtcTime" +maybe'groupByContract :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'groupByContract" a) => + Lens.Family2.LensLike' f s a +maybe'groupByContract + = Data.ProtoLens.Field.field @"maybe'groupByContract" +maybe'groupId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'groupId" a) => + Lens.Family2.LensLike' f s a +maybe'groupId = Data.ProtoLens.Field.field @"maybe'groupId" +maybe'groupRelationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'groupRelationType" a) => + Lens.Family2.LensLike' f s a +maybe'groupRelationType + = Data.ProtoLens.Field.field @"maybe'groupRelationType" +maybe'hedgeOffsetTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'hedgeOffsetTicks" a) => + Lens.Family2.LensLike' f s a +maybe'hedgeOffsetTicks + = Data.ProtoLens.Field.field @"maybe'hedgeOffsetTicks" +maybe'icebergVisibleQtyPercent :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'icebergVisibleQtyPercent" a) => + Lens.Family2.LensLike' f s a +maybe'icebergVisibleQtyPercent + = Data.ProtoLens.Field.field @"maybe'icebergVisibleQtyPercent" +maybe'id :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'id" a) => + Lens.Family2.LensLike' f s a +maybe'id = Data.ProtoLens.Field.field @"maybe'id" +maybe'ignoreOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'ignoreOrder" a) => + Lens.Family2.LensLike' f s a +maybe'ignoreOrder = Data.ProtoLens.Field.field @"maybe'ignoreOrder" +maybe'implicitAuthorization :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'implicitAuthorization" a) => + Lens.Family2.LensLike' f s a +maybe'implicitAuthorization + = Data.ProtoLens.Field.field @"maybe'implicitAuthorization" +maybe'includeAccountsFromMappedSalesSeries :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'includeAccountsFromMappedSalesSeries" a) => + Lens.Family2.LensLike' f s a +maybe'includeAccountsFromMappedSalesSeries + = Data.ProtoLens.Field.field + @"maybe'includeAccountsFromMappedSalesSeries" +maybe'includeImplicitAuthorization :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'includeImplicitAuthorization" a) => + Lens.Family2.LensLike' f s a +maybe'includeImplicitAuthorization + = Data.ProtoLens.Field.field @"maybe'includeImplicitAuthorization" +maybe'includeOteLl :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'includeOteLl" a) => + Lens.Family2.LensLike' f s a +maybe'includeOteLl + = Data.ProtoLens.Field.field @"maybe'includeOteLl" +maybe'includeRemoved :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'includeRemoved" a) => + Lens.Family2.LensLike' f s a +maybe'includeRemoved + = Data.ProtoLens.Field.field @"maybe'includeRemoved" +maybe'includeUplLl :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'includeUplLl" a) => + Lens.Family2.LensLike' f s a +maybe'includeUplLl + = Data.ProtoLens.Field.field @"maybe'includeUplLl" +maybe'initialMargin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'initialMargin" a) => + Lens.Family2.LensLike' f s a +maybe'initialMargin + = Data.ProtoLens.Field.field @"maybe'initialMargin" +maybe'instructions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'instructions" a) => + Lens.Family2.LensLike' f s a +maybe'instructions + = Data.ProtoLens.Field.field @"maybe'instructions" +maybe'instrumentGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'instrumentGroup" a) => + Lens.Family2.LensLike' f s a +maybe'instrumentGroup + = Data.ProtoLens.Field.field @"maybe'instrumentGroup" +maybe'instrumentPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'instrumentPositionLimit" a) => + Lens.Family2.LensLike' f s a +maybe'instrumentPositionLimit + = Data.ProtoLens.Field.field @"maybe'instrumentPositionLimit" +maybe'instrumentTypeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'instrumentTypeId" a) => + Lens.Family2.LensLike' f s a +maybe'instrumentTypeId + = Data.ProtoLens.Field.field @"maybe'instrumentTypeId" +maybe'isAggressive :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isAggressive" a) => + Lens.Family2.LensLike' f s a +maybe'isAggressive + = Data.ProtoLens.Field.field @"maybe'isAggressive" +maybe'isCollection :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isCollection" a) => + Lens.Family2.LensLike' f s a +maybe'isCollection + = Data.ProtoLens.Field.field @"maybe'isCollection" +maybe'isComplete :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isComplete" a) => + Lens.Family2.LensLike' f s a +maybe'isComplete = Data.ProtoLens.Field.field @"maybe'isComplete" +maybe'isExcludedFromRiskCalculation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isExcludedFromRiskCalculation" a) => + Lens.Family2.LensLike' f s a +maybe'isExcludedFromRiskCalculation + = Data.ProtoLens.Field.field @"maybe'isExcludedFromRiskCalculation" +maybe'isForceCare :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isForceCare" a) => + Lens.Family2.LensLike' f s a +maybe'isForceCare = Data.ProtoLens.Field.field @"maybe'isForceCare" +maybe'isGiveup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isGiveup" a) => + Lens.Family2.LensLike' f s a +maybe'isGiveup = Data.ProtoLens.Field.field @"maybe'isGiveup" +maybe'isInMigration :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isInMigration" a) => + Lens.Family2.LensLike' f s a +maybe'isInMigration + = Data.ProtoLens.Field.field @"maybe'isInMigration" +maybe'isInUse :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isInUse" a) => + Lens.Family2.LensLike' f s a +maybe'isInUse = Data.ProtoLens.Field.field @"maybe'isInUse" +maybe'isInstruct :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isInstruct" a) => + Lens.Family2.LensLike' f s a +maybe'isInstruct = Data.ProtoLens.Field.field @"maybe'isInstruct" +maybe'isMaster :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isMaster" a) => + Lens.Family2.LensLike' f s a +maybe'isMaster = Data.ProtoLens.Field.field @"maybe'isMaster" +maybe'isMifidDea :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isMifidDea" a) => + Lens.Family2.LensLike' f s a +maybe'isMifidDea = Data.ProtoLens.Field.field @"maybe'isMifidDea" +maybe'isPrimaryLogin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isPrimaryLogin" a) => + Lens.Family2.LensLike' f s a +maybe'isPrimaryLogin + = Data.ProtoLens.Field.field @"maybe'isPrimaryLogin" +maybe'isRemoved :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isRemoved" a) => + Lens.Family2.LensLike' f s a +maybe'isRemoved = Data.ProtoLens.Field.field @"maybe'isRemoved" +maybe'isUs :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isUs" a) => + Lens.Family2.LensLike' f s a +maybe'isUs = Data.ProtoLens.Field.field @"maybe'isUs" +maybe'isViewOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'isViewOnly" a) => + Lens.Family2.LensLike' f s a +maybe'isViewOnly = Data.ProtoLens.Field.field @"maybe'isViewOnly" +maybe'last :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'last" a) => + Lens.Family2.LensLike' f s a +maybe'last = Data.ProtoLens.Field.field @"maybe'last" +maybe'lastTradingDateLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'lastTradingDateLimit" a) => + Lens.Family2.LensLike' f s a +maybe'lastTradingDateLimit + = Data.ProtoLens.Field.field @"maybe'lastTradingDateLimit" +maybe'legNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'legNumber" a) => + Lens.Family2.LensLike' f s a +maybe'legNumber = Data.ProtoLens.Field.field @"maybe'legNumber" +maybe'legPath :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'legPath" a) => + Lens.Family2.LensLike' f s a +maybe'legPath = Data.ProtoLens.Field.field @"maybe'legPath" +maybe'limitPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'limitPrice" a) => + Lens.Family2.LensLike' f s a +maybe'limitPrice = Data.ProtoLens.Field.field @"maybe'limitPrice" +maybe'linkOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'linkOrderId" a) => + Lens.Family2.LensLike' f s a +maybe'linkOrderId = Data.ProtoLens.Field.field @"maybe'linkOrderId" +maybe'liquidationOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'liquidationOnly" a) => + Lens.Family2.LensLike' f s a +maybe'liquidationOnly + = Data.ProtoLens.Field.field @"maybe'liquidationOnly" +maybe'liquidationOrdersOutsideTradingTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'liquidationOrdersOutsideTradingTime" a) => + Lens.Family2.LensLike' f s a +maybe'liquidationOrdersOutsideTradingTime + = Data.ProtoLens.Field.field + @"maybe'liquidationOrdersOutsideTradingTime" +maybe'locateId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'locateId" a) => + Lens.Family2.LensLike' f s a +maybe'locateId = Data.ProtoLens.Field.field @"maybe'locateId" +maybe'loginEnforce :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginEnforce" a) => + Lens.Family2.LensLike' f s a +maybe'loginEnforce + = Data.ProtoLens.Field.field @"maybe'loginEnforce" +maybe'loginId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'loginId" a) => + Lens.Family2.LensLike' f s a +maybe'loginId = Data.ProtoLens.Field.field @"maybe'loginId" +maybe'longOptionPremiumCheckAgainstPurchasingPower :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'longOptionPremiumCheckAgainstPurchasingPower" a) => + Lens.Family2.LensLike' f s a +maybe'longOptionPremiumCheckAgainstPurchasingPower + = Data.ProtoLens.Field.field + @"maybe'longOptionPremiumCheckAgainstPurchasingPower" +maybe'longPositionsOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'longPositionsOnly" a) => + Lens.Family2.LensLike' f s a +maybe'longPositionsOnly + = Data.ProtoLens.Field.field @"maybe'longPositionsOnly" +maybe'lookupPropertyListRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'lookupPropertyListRequest" a) => + Lens.Family2.LensLike' f s a +maybe'lookupPropertyListRequest + = Data.ProtoLens.Field.field @"maybe'lookupPropertyListRequest" +maybe'lookupPropertyListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'lookupPropertyListResult" a) => + Lens.Family2.LensLike' f s a +maybe'lookupPropertyListResult + = Data.ProtoLens.Field.field @"maybe'lookupPropertyListResult" +maybe'maintMargin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'maintMargin" a) => + Lens.Family2.LensLike' f s a +maybe'maintMargin = Data.ProtoLens.Field.field @"maybe'maintMargin" +maybe'marginGroupId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'marginGroupId" a) => + Lens.Family2.LensLike' f s a +maybe'marginGroupId + = Data.ProtoLens.Field.field @"maybe'marginGroupId" +maybe'marginMultiplier :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'marginMultiplier" a) => + Lens.Family2.LensLike' f s a +maybe'marginMultiplier + = Data.ProtoLens.Field.field @"maybe'marginMultiplier" +maybe'marketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'marketLimits" a) => + Lens.Family2.LensLike' f s a +maybe'marketLimits + = Data.ProtoLens.Field.field @"maybe'marketLimits" +maybe'masterAccountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'masterAccountId" a) => + Lens.Family2.LensLike' f s a +maybe'masterAccountId + = Data.ProtoLens.Field.field @"maybe'masterAccountId" +maybe'maxPurchasingPower :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'maxPurchasingPower" a) => + Lens.Family2.LensLike' f s a +maybe'maxPurchasingPower + = Data.ProtoLens.Field.field @"maybe'maxPurchasingPower" +maybe'maximumOrderRate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'maximumOrderRate" a) => + Lens.Family2.LensLike' f s a +maybe'maximumOrderRate + = Data.ProtoLens.Field.field @"maybe'maximumOrderRate" +maybe'minVisibleSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'minVisibleSize" a) => + Lens.Family2.LensLike' f s a +maybe'minVisibleSize + = Data.ProtoLens.Field.field @"maybe'minVisibleSize" +maybe'mode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'mode" a) => + Lens.Family2.LensLike' f s a +maybe'mode = Data.ProtoLens.Field.field @"maybe'mode" +maybe'msAllowableMarginCredit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'msAllowableMarginCredit" a) => + Lens.Family2.LensLike' f s a +maybe'msAllowableMarginCredit + = Data.ProtoLens.Field.field @"maybe'msAllowableMarginCredit" +maybe'msCrossMargining :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'msCrossMargining" a) => + Lens.Family2.LensLike' f s a +maybe'msCrossMargining + = Data.ProtoLens.Field.field @"maybe'msCrossMargining" +maybe'msIncludeNovPp :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'msIncludeNovPp" a) => + Lens.Family2.LensLike' f s a +maybe'msIncludeNovPp + = Data.ProtoLens.Field.field @"maybe'msIncludeNovPp" +maybe'msIncludeOtePp :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'msIncludeOtePp" a) => + Lens.Family2.LensLike' f s a +maybe'msIncludeOtePp + = Data.ProtoLens.Field.field @"maybe'msIncludeOtePp" +maybe'msInstrumentGroupMarginMultiplier :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'msInstrumentGroupMarginMultiplier" a) => + Lens.Family2.LensLike' f s a +maybe'msInstrumentGroupMarginMultiplier + = Data.ProtoLens.Field.field + @"maybe'msInstrumentGroupMarginMultiplier" +maybe'msUseInstrumentGroupMarginMultiplier :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'msUseInstrumentGroupMarginMultiplier" a) => + Lens.Family2.LensLike' f s a +maybe'msUseInstrumentGroupMarginMultiplier + = Data.ProtoLens.Field.field + @"maybe'msUseInstrumentGroupMarginMultiplier" +maybe'name :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'name" a) => + Lens.Family2.LensLike' f s a +maybe'name = Data.ProtoLens.Field.field @"maybe'name" +maybe'nativeOrderType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'nativeOrderType" a) => + Lens.Family2.LensLike' f s a +maybe'nativeOrderType + = Data.ProtoLens.Field.field @"maybe'nativeOrderType" +maybe'nativeRouteName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'nativeRouteName" a) => + Lens.Family2.LensLike' f s a +maybe'nativeRouteName + = Data.ProtoLens.Field.field @"maybe'nativeRouteName" +maybe'newAccountClass :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'newAccountClass" a) => + Lens.Family2.LensLike' f s a +maybe'newAccountClass + = Data.ProtoLens.Field.field @"maybe'newAccountClass" +maybe'newAccountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'newAccountGroup" a) => + Lens.Family2.LensLike' f s a +maybe'newAccountGroup + = Data.ProtoLens.Field.field @"maybe'newAccountGroup" +maybe'newAccountGroupId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'newAccountGroupId" a) => + Lens.Family2.LensLike' f s a +maybe'newAccountGroupId + = Data.ProtoLens.Field.field @"maybe'newAccountGroupId" +maybe'newAccountUserId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'newAccountUserId" a) => + Lens.Family2.LensLike' f s a +maybe'newAccountUserId + = Data.ProtoLens.Field.field @"maybe'newAccountUserId" +maybe'newRouteOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'newRouteOrderId" a) => + Lens.Family2.LensLike' f s a +maybe'newRouteOrderId + = Data.ProtoLens.Field.field @"maybe'newRouteOrderId" +maybe'nodeRole :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'nodeRole" a) => + Lens.Family2.LensLike' f s a +maybe'nodeRole = Data.ProtoLens.Field.field @"maybe'nodeRole" +maybe'nonUsMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'nonUsMarketLimits" a) => + Lens.Family2.LensLike' f s a +maybe'nonUsMarketLimits + = Data.ProtoLens.Field.field @"maybe'nonUsMarketLimits" +maybe'number :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'number" a) => + Lens.Family2.LensLike' f s a +maybe'number = Data.ProtoLens.Field.field @"maybe'number" +maybe'obsoleteAccountCluster :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteAccountCluster" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteAccountCluster + = Data.ProtoLens.Field.field @"maybe'obsoleteAccountCluster" +maybe'obsoleteAccountClusterId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteAccountClusterId" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteAccountClusterId + = Data.ProtoLens.Field.field @"maybe'obsoleteAccountClusterId" +maybe'obsoleteAccountClusterRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteAccountClusterRequest" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteAccountClusterRequest + = Data.ProtoLens.Field.field @"maybe'obsoleteAccountClusterRequest" +maybe'obsoleteAccountClusterResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteAccountClusterResult" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteAccountClusterResult + = Data.ProtoLens.Field.field @"maybe'obsoleteAccountClusterResult" +maybe'obsoleteAccountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteAccountId" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteAccountId + = Data.ProtoLens.Field.field @"maybe'obsoleteAccountId" +maybe'obsoleteBlockSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteBlockSize" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteBlockSize + = Data.ProtoLens.Field.field @"maybe'obsoleteBlockSize" +maybe'obsoleteBrokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteBrokerageName" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteBrokerageName + = Data.ProtoLens.Field.field @"maybe'obsoleteBrokerageName" +maybe'obsoleteCommodityPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteCommodityPositionLimit" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteCommodityPositionLimit + = Data.ProtoLens.Field.field + @"maybe'obsoleteCommodityPositionLimit" +maybe'obsoleteContractPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteContractPositionLimit" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteContractPositionLimit + = Data.ProtoLens.Field.field @"maybe'obsoleteContractPositionLimit" +maybe'obsoleteCreateAccountCluster :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteCreateAccountCluster" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteCreateAccountCluster + = Data.ProtoLens.Field.field @"maybe'obsoleteCreateAccountCluster" +maybe'obsoleteCreateAccountClusterResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteCreateAccountClusterResult" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteCreateAccountClusterResult + = Data.ProtoLens.Field.field + @"maybe'obsoleteCreateAccountClusterResult" +maybe'obsoleteCurrencyCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteCurrencyCode" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteCurrencyCode + = Data.ProtoLens.Field.field @"maybe'obsoleteCurrencyCode" +maybe'obsoleteDiscretionaryOffset :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteDiscretionaryOffset" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteDiscretionaryOffset + = Data.ProtoLens.Field.field @"maybe'obsoleteDiscretionaryOffset" +maybe'obsoleteFillQuantity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteFillQuantity" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteFillQuantity + = Data.ProtoLens.Field.field @"maybe'obsoleteFillQuantity" +maybe'obsoleteGiveupBrokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteGiveupBrokerageName" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteGiveupBrokerageName + = Data.ProtoLens.Field.field @"maybe'obsoleteGiveupBrokerageName" +maybe'obsoleteHasOverlappedInstruments :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteHasOverlappedInstruments" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteHasOverlappedInstruments + = Data.ProtoLens.Field.field + @"maybe'obsoleteHasOverlappedInstruments" +maybe'obsoleteInstrumentPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteInstrumentPositionLimit" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteInstrumentPositionLimit + = Data.ProtoLens.Field.field + @"maybe'obsoleteInstrumentPositionLimit" +maybe'obsoleteIsBlock :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteIsBlock" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteIsBlock + = Data.ProtoLens.Field.field @"maybe'obsoleteIsBlock" +maybe'obsoleteMarginMultiplier :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteMarginMultiplier" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteMarginMultiplier + = Data.ProtoLens.Field.field @"maybe'obsoleteMarginMultiplier" +maybe'obsoleteMinVisibleSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteMinVisibleSize" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteMinVisibleSize + = Data.ProtoLens.Field.field @"maybe'obsoleteMinVisibleSize" +maybe'obsoleteNewDiscretionaryOffset :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteNewDiscretionaryOffset" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteNewDiscretionaryOffset + = Data.ProtoLens.Field.field + @"maybe'obsoleteNewDiscretionaryOffset" +maybe'obsoleteOmnibusAccountName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteOmnibusAccountName" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteOmnibusAccountName + = Data.ProtoLens.Field.field @"maybe'obsoleteOmnibusAccountName" +maybe'obsoleteOriginalAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteOriginalAccount" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteOriginalAccount + = Data.ProtoLens.Field.field @"maybe'obsoleteOriginalAccount" +maybe'obsoleteOriginalAccountCluster :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteOriginalAccountCluster" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteOriginalAccountCluster + = Data.ProtoLens.Field.field + @"maybe'obsoleteOriginalAccountCluster" +maybe'obsoleteOriginalMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteOriginalMarketLimits" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteOriginalMarketLimits + = Data.ProtoLens.Field.field @"maybe'obsoleteOriginalMarketLimits" +maybe'obsoleteOriginalRiskParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteOriginalRiskParameters" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteOriginalRiskParameters + = Data.ProtoLens.Field.field + @"maybe'obsoleteOriginalRiskParameters" +maybe'obsoleteOriginalSettings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteOriginalSettings" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteOriginalSettings + = Data.ProtoLens.Field.field @"maybe'obsoleteOriginalSettings" +maybe'obsoletePrevDiscretionaryOffset :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoletePrevDiscretionaryOffset" a) => + Lens.Family2.LensLike' f s a +maybe'obsoletePrevDiscretionaryOffset + = Data.ProtoLens.Field.field + @"maybe'obsoletePrevDiscretionaryOffset" +maybe'obsoleteQty :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteQty" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteQty = Data.ProtoLens.Field.field @"maybe'obsoleteQty" +maybe'obsoleteQuantity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteQuantity" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteQuantity + = Data.ProtoLens.Field.field @"maybe'obsoleteQuantity" +maybe'obsoleteQuantityRatio :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteQuantityRatio" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteQuantityRatio + = Data.ProtoLens.Field.field @"maybe'obsoleteQuantityRatio" +maybe'obsoleteRemainingSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteRemainingSize" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteRemainingSize + = Data.ProtoLens.Field.field @"maybe'obsoleteRemainingSize" +maybe'obsoleteRouteName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteRouteName" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteRouteName + = Data.ProtoLens.Field.field @"maybe'obsoleteRouteName" +maybe'obsoleteSalesSeriesName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteSalesSeriesName" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteSalesSeriesName + = Data.ProtoLens.Field.field @"maybe'obsoleteSalesSeriesName" +maybe'obsoleteSalesSeriesNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteSalesSeriesNumber" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteSalesSeriesNumber + = Data.ProtoLens.Field.field @"maybe'obsoleteSalesSeriesNumber" +maybe'obsoleteSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteSize" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteSize + = Data.ProtoLens.Field.field @"maybe'obsoleteSize" +maybe'obsoleteText :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteText" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteText + = Data.ProtoLens.Field.field @"maybe'obsoleteText" +maybe'obsoleteTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteTicks" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteTicks + = Data.ProtoLens.Field.field @"maybe'obsoleteTicks" +maybe'obsoleteTradeSizeLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteTradeSizeLimit" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteTradeSizeLimit + = Data.ProtoLens.Field.field @"maybe'obsoleteTradeSizeLimit" +maybe'obsoleteTriggerSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteTriggerSize" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteTriggerSize + = Data.ProtoLens.Field.field @"maybe'obsoleteTriggerSize" +maybe'obsoleteUpdateAccountCluster :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteUpdateAccountCluster" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteUpdateAccountCluster + = Data.ProtoLens.Field.field @"maybe'obsoleteUpdateAccountCluster" +maybe'obsoleteUpdateAccountClusterPriceOffsets :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteUpdateAccountClusterPriceOffsets" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteUpdateAccountClusterPriceOffsets + = Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateAccountClusterPriceOffsets" +maybe'obsoleteUpdateAccountClusterPriceOffsetsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteUpdateAccountClusterPriceOffsetsResult" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteUpdateAccountClusterPriceOffsetsResult + = Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateAccountClusterPriceOffsetsResult" +maybe'obsoleteUpdateAccountClusterResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteUpdateAccountClusterResult" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteUpdateAccountClusterResult + = Data.ProtoLens.Field.field + @"maybe'obsoleteUpdateAccountClusterResult" +maybe'obsoleteUpdateRiskParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteUpdateRiskParameters" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteUpdateRiskParameters + = Data.ProtoLens.Field.field @"maybe'obsoleteUpdateRiskParameters" +maybe'obsoleteVisibleSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'obsoleteVisibleSize" a) => + Lens.Family2.LensLike' f s a +maybe'obsoleteVisibleSize + = Data.ProtoLens.Field.field @"maybe'obsoleteVisibleSize" +maybe'offset :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'offset" a) => + Lens.Family2.LensLike' f s a +maybe'offset = Data.ProtoLens.Field.field @"maybe'offset" +maybe'omnibusAccountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'omnibusAccountId" a) => + Lens.Family2.LensLike' f s a +maybe'omnibusAccountId + = Data.ProtoLens.Field.field @"maybe'omnibusAccountId" +maybe'omnibusSupportType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'omnibusSupportType" a) => + Lens.Family2.LensLike' f s a +maybe'omnibusSupportType + = Data.ProtoLens.Field.field @"maybe'omnibusSupportType" +maybe'open :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'open" a) => + Lens.Family2.LensLike' f s a +maybe'open = Data.ProtoLens.Field.field @"maybe'open" +maybe'openCloseType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'openCloseType" a) => + Lens.Family2.LensLike' f s a +maybe'openCloseType + = Data.ProtoLens.Field.field @"maybe'openCloseType" +maybe'operationalDetails :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'operationalDetails" a) => + Lens.Family2.LensLike' f s a +maybe'operationalDetails + = Data.ProtoLens.Field.field @"maybe'operationalDetails" +maybe'operatorId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'operatorId" a) => + Lens.Family2.LensLike' f s a +maybe'operatorId = Data.ProtoLens.Field.field @"maybe'operatorId" +maybe'orderChain :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderChain" a) => + Lens.Family2.LensLike' f s a +maybe'orderChain = Data.ProtoLens.Field.field @"maybe'orderChain" +maybe'orderChainId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderChainId" a) => + Lens.Family2.LensLike' f s a +maybe'orderChainId + = Data.ProtoLens.Field.field @"maybe'orderChainId" +maybe'orderDetailsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderDetailsRequest" a) => + Lens.Family2.LensLike' f s a +maybe'orderDetailsRequest + = Data.ProtoLens.Field.field @"maybe'orderDetailsRequest" +maybe'orderDetailsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderDetailsResult" a) => + Lens.Family2.LensLike' f s a +maybe'orderDetailsResult + = Data.ProtoLens.Field.field @"maybe'orderDetailsResult" +maybe'orderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderId" a) => + Lens.Family2.LensLike' f s a +maybe'orderId = Data.ProtoLens.Field.field @"maybe'orderId" +maybe'orderIdAtExchange :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderIdAtExchange" a) => + Lens.Family2.LensLike' f s a +maybe'orderIdAtExchange + = Data.ProtoLens.Field.field @"maybe'orderIdAtExchange" +maybe'orderRequestsTop :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderRequestsTop" a) => + Lens.Family2.LensLike' f s a +maybe'orderRequestsTop + = Data.ProtoLens.Field.field @"maybe'orderRequestsTop" +maybe'orderScopeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderScopeRequest" a) => + Lens.Family2.LensLike' f s a +maybe'orderScopeRequest + = Data.ProtoLens.Field.field @"maybe'orderScopeRequest" +maybe'orderScopeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderScopeResult" a) => + Lens.Family2.LensLike' f s a +maybe'orderScopeResult + = Data.ProtoLens.Field.field @"maybe'orderScopeResult" +maybe'orderSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderSearchRequest" a) => + Lens.Family2.LensLike' f s a +maybe'orderSearchRequest + = Data.ProtoLens.Field.field @"maybe'orderSearchRequest" +maybe'orderSearchResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderSearchResult" a) => + Lens.Family2.LensLike' f s a +maybe'orderSearchResult + = Data.ProtoLens.Field.field @"maybe'orderSearchResult" +maybe'orderState :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderState" a) => + Lens.Family2.LensLike' f s a +maybe'orderState = Data.ProtoLens.Field.field @"maybe'orderState" +maybe'orderType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'orderType" a) => + Lens.Family2.LensLike' f s a +maybe'orderType = Data.ProtoLens.Field.field @"maybe'orderType" +maybe'origin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'origin" a) => + Lens.Family2.LensLike' f s a +maybe'origin = Data.ProtoLens.Field.field @"maybe'origin" +maybe'originId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'originId" a) => + Lens.Family2.LensLike' f s a +maybe'originId = Data.ProtoLens.Field.field @"maybe'originId" +maybe'originatorLocationId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'originatorLocationId" a) => + Lens.Family2.LensLike' f s a +maybe'originatorLocationId + = Data.ProtoLens.Field.field @"maybe'originatorLocationId" +maybe'percent :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'percent" a) => + Lens.Family2.LensLike' f s a +maybe'percent = Data.ProtoLens.Field.field @"maybe'percent" +maybe'platformName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'platformName" a) => + Lens.Family2.LensLike' f s a +maybe'platformName + = Data.ProtoLens.Field.field @"maybe'platformName" +maybe'positionAndTradeLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'positionAndTradeLimits" a) => + Lens.Family2.LensLike' f s a +maybe'positionAndTradeLimits + = Data.ProtoLens.Field.field @"maybe'positionAndTradeLimits" +maybe'positionId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'positionId" a) => + Lens.Family2.LensLike' f s a +maybe'positionId = Data.ProtoLens.Field.field @"maybe'positionId" +maybe'postedMargin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'postedMargin" a) => + Lens.Family2.LensLike' f s a +maybe'postedMargin + = Data.ProtoLens.Field.field @"maybe'postedMargin" +maybe'prefix :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'prefix" a) => + Lens.Family2.LensLike' f s a +maybe'prefix = Data.ProtoLens.Field.field @"maybe'prefix" +maybe'price :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'price" a) => + Lens.Family2.LensLike' f s a +maybe'price = Data.ProtoLens.Field.field @"maybe'price" +maybe'priceOffsetTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'priceOffsetTicks" a) => + Lens.Family2.LensLike' f s a +maybe'priceOffsetTicks + = Data.ProtoLens.Field.field @"maybe'priceOffsetTicks" +maybe'priceRatio :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'priceRatio" a) => + Lens.Family2.LensLike' f s a +maybe'priceRatio = Data.ProtoLens.Field.field @"maybe'priceRatio" +maybe'primaryLoginRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'primaryLoginRequired" a) => + Lens.Family2.LensLike' f s a +maybe'primaryLoginRequired + = Data.ProtoLens.Field.field @"maybe'primaryLoginRequired" +maybe'priority :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'priority" a) => + Lens.Family2.LensLike' f s a +maybe'priority = Data.ProtoLens.Field.field @"maybe'priority" +maybe'privateLabelName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'privateLabelName" a) => + Lens.Family2.LensLike' f s a +maybe'privateLabelName + = Data.ProtoLens.Field.field @"maybe'privateLabelName" +maybe'productId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'productId" a) => + Lens.Family2.LensLike' f s a +maybe'productId = Data.ProtoLens.Field.field @"maybe'productId" +maybe'profileId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profileId" a) => + Lens.Family2.LensLike' f s a +maybe'profileId = Data.ProtoLens.Field.field @"maybe'profileId" +maybe'profileSalesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profileSalesSeriesId" a) => + Lens.Family2.LensLike' f s a +maybe'profileSalesSeriesId + = Data.ProtoLens.Field.field @"maybe'profileSalesSeriesId" +maybe'purchasingPowerFraction :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'purchasingPowerFraction" a) => + Lens.Family2.LensLike' f s a +maybe'purchasingPowerFraction + = Data.ProtoLens.Field.field @"maybe'purchasingPowerFraction" +maybe'purchasingPowerParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'purchasingPowerParameters" a) => + Lens.Family2.LensLike' f s a +maybe'purchasingPowerParameters + = Data.ProtoLens.Field.field @"maybe'purchasingPowerParameters" +maybe'qty :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'qty" a) => + Lens.Family2.LensLike' f s a +maybe'qty = Data.ProtoLens.Field.field @"maybe'qty" +maybe'quantity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'quantity" a) => + Lens.Family2.LensLike' f s a +maybe'quantity = Data.ProtoLens.Field.field @"maybe'quantity" +maybe'quantityRatio :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'quantityRatio" a) => + Lens.Family2.LensLike' f s a +maybe'quantityRatio + = Data.ProtoLens.Field.field @"maybe'quantityRatio" +maybe'reconciliation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'reconciliation" a) => + Lens.Family2.LensLike' f s a +maybe'reconciliation + = Data.ProtoLens.Field.field @"maybe'reconciliation" +maybe'reflectAsCanceledOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'reflectAsCanceledOrder" a) => + Lens.Family2.LensLike' f s a +maybe'reflectAsCanceledOrder + = Data.ProtoLens.Field.field @"maybe'reflectAsCanceledOrder" +maybe'reflectAsCanceledOrderResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'reflectAsCanceledOrderResult" a) => + Lens.Family2.LensLike' f s a +maybe'reflectAsCanceledOrderResult + = Data.ProtoLens.Field.field @"maybe'reflectAsCanceledOrderResult" +maybe'regulated :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'regulated" a) => + Lens.Family2.LensLike' f s a +maybe'regulated = Data.ProtoLens.Field.field @"maybe'regulated" +maybe'rejectDetails :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'rejectDetails" a) => + Lens.Family2.LensLike' f s a +maybe'rejectDetails + = Data.ProtoLens.Field.field @"maybe'rejectDetails" +maybe'rejectDetailsInternal :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'rejectDetailsInternal" a) => + Lens.Family2.LensLike' f s a +maybe'rejectDetailsInternal + = Data.ProtoLens.Field.field @"maybe'rejectDetailsInternal" +maybe'rejectRiskyMarketOrders :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'rejectRiskyMarketOrders" a) => + Lens.Family2.LensLike' f s a +maybe'rejectRiskyMarketOrders + = Data.ProtoLens.Field.field @"maybe'rejectRiskyMarketOrders" +maybe'relatedOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'relatedOrder" a) => + Lens.Family2.LensLike' f s a +maybe'relatedOrder + = Data.ProtoLens.Field.field @"maybe'relatedOrder" +maybe'relatedOrderTreeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'relatedOrderTreeRequest" a) => + Lens.Family2.LensLike' f s a +maybe'relatedOrderTreeRequest + = Data.ProtoLens.Field.field @"maybe'relatedOrderTreeRequest" +maybe'relatedOrderTreeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'relatedOrderTreeResult" a) => + Lens.Family2.LensLike' f s a +maybe'relatedOrderTreeResult + = Data.ProtoLens.Field.field @"maybe'relatedOrderTreeResult" +maybe'relationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'relationType" a) => + Lens.Family2.LensLike' f s a +maybe'relationType + = Data.ProtoLens.Field.field @"maybe'relationType" +maybe'remainingSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'remainingSize" a) => + Lens.Family2.LensLike' f s a +maybe'remainingSize + = Data.ProtoLens.Field.field @"maybe'remainingSize" +maybe'removeAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'removeAccount" a) => + Lens.Family2.LensLike' f s a +maybe'removeAccount + = Data.ProtoLens.Field.field @"maybe'removeAccount" +maybe'removeAccountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'removeAccountGroup" a) => + Lens.Family2.LensLike' f s a +maybe'removeAccountGroup + = Data.ProtoLens.Field.field @"maybe'removeAccountGroup" +maybe'removeAccountResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'removeAccountResult" a) => + Lens.Family2.LensLike' f s a +maybe'removeAccountResult + = Data.ProtoLens.Field.field @"maybe'removeAccountResult" +maybe'removed :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'removed" a) => + Lens.Family2.LensLike' f s a +maybe'removed = Data.ProtoLens.Field.field @"maybe'removed" +maybe'requirePreTradeMidMarketMark :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'requirePreTradeMidMarketMark" a) => + Lens.Family2.LensLike' f s a +maybe'requirePreTradeMidMarketMark + = Data.ProtoLens.Field.field @"maybe'requirePreTradeMidMarketMark" +maybe'restoreAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'restoreAccount" a) => + Lens.Family2.LensLike' f s a +maybe'restoreAccount + = Data.ProtoLens.Field.field @"maybe'restoreAccount" +maybe'restoreAccountResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'restoreAccountResult" a) => + Lens.Family2.LensLike' f s a +maybe'restoreAccountResult + = Data.ProtoLens.Field.field @"maybe'restoreAccountResult" +maybe'riskParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'riskParameters" a) => + Lens.Family2.LensLike' f s a +maybe'riskParameters + = Data.ProtoLens.Field.field @"maybe'riskParameters" +maybe'riskServerInstance :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'riskServerInstance" a) => + Lens.Family2.LensLike' f s a +maybe'riskServerInstance + = Data.ProtoLens.Field.field @"maybe'riskServerInstance" +maybe'riskServerInstanceId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'riskServerInstanceId" a) => + Lens.Family2.LensLike' f s a +maybe'riskServerInstanceId + = Data.ProtoLens.Field.field @"maybe'riskServerInstanceId" +maybe'rootChainOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'rootChainOrderId" a) => + Lens.Family2.LensLike' f s a +maybe'rootChainOrderId + = Data.ProtoLens.Field.field @"maybe'rootChainOrderId" +maybe'route :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'route" a) => + Lens.Family2.LensLike' f s a +maybe'route = Data.ProtoLens.Field.field @"maybe'route" +maybe'routeClientOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'routeClientOrderId" a) => + Lens.Family2.LensLike' f s a +maybe'routeClientOrderId + = Data.ProtoLens.Field.field @"maybe'routeClientOrderId" +maybe'routeCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'routeCode" a) => + Lens.Family2.LensLike' f s a +maybe'routeCode = Data.ProtoLens.Field.field @"maybe'routeCode" +maybe'routeInformation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'routeInformation" a) => + Lens.Family2.LensLike' f s a +maybe'routeInformation + = Data.ProtoLens.Field.field @"maybe'routeInformation" +maybe'routeName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'routeName" a) => + Lens.Family2.LensLike' f s a +maybe'routeName = Data.ProtoLens.Field.field @"maybe'routeName" +maybe'salesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'salesSeriesId" a) => + Lens.Family2.LensLike' f s a +maybe'salesSeriesId + = Data.ProtoLens.Field.field @"maybe'salesSeriesId" +maybe'salesSeriesName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'salesSeriesName" a) => + Lens.Family2.LensLike' f s a +maybe'salesSeriesName + = Data.ProtoLens.Field.field @"maybe'salesSeriesName" +maybe'salesSeriesNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'salesSeriesNumber" a) => + Lens.Family2.LensLike' f s a +maybe'salesSeriesNumber + = Data.ProtoLens.Field.field @"maybe'salesSeriesNumber" +maybe'senderLocationId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'senderLocationId" a) => + Lens.Family2.LensLike' f s a +maybe'senderLocationId + = Data.ProtoLens.Field.field @"maybe'senderLocationId" +maybe'senderOperatorId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'senderOperatorId" a) => + Lens.Family2.LensLike' f s a +maybe'senderOperatorId + = Data.ProtoLens.Field.field @"maybe'senderOperatorId" +maybe'serviceGroupAuthorizationLevel :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'serviceGroupAuthorizationLevel" a) => + Lens.Family2.LensLike' f s a +maybe'serviceGroupAuthorizationLevel + = Data.ProtoLens.Field.field + @"maybe'serviceGroupAuthorizationLevel" +maybe'settings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'settings" a) => + Lens.Family2.LensLike' f s a +maybe'settings = Data.ProtoLens.Field.field @"maybe'settings" +maybe'settlement :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'settlement" a) => + Lens.Family2.LensLike' f s a +maybe'settlement = Data.ProtoLens.Field.field @"maybe'settlement" +maybe'side :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'side" a) => + Lens.Family2.LensLike' f s a +maybe'side = Data.ProtoLens.Field.field @"maybe'side" +maybe'size :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'size" a) => + Lens.Family2.LensLike' f s a +maybe'size = Data.ProtoLens.Field.field @"maybe'size" +maybe'sizes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'sizes" a) => + Lens.Family2.LensLike' f s a +maybe'sizes = Data.ProtoLens.Field.field @"maybe'sizes" +maybe'speculationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'speculationType" a) => + Lens.Family2.LensLike' f s a +maybe'speculationType + = Data.ProtoLens.Field.field @"maybe'speculationType" +maybe'statementOption :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'statementOption" a) => + Lens.Family2.LensLike' f s a +maybe'statementOption + = Data.ProtoLens.Field.field @"maybe'statementOption" +maybe'status :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'status" a) => + Lens.Family2.LensLike' f s a +maybe'status = Data.ProtoLens.Field.field @"maybe'status" +maybe'stopPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'stopPrice" a) => + Lens.Family2.LensLike' f s a +maybe'stopPrice = Data.ProtoLens.Field.field @"maybe'stopPrice" +maybe'strategyName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'strategyName" a) => + Lens.Family2.LensLike' f s a +maybe'strategyName + = Data.ProtoLens.Field.field @"maybe'strategyName" +maybe'subClass :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'subClass" a) => + Lens.Family2.LensLike' f s a +maybe'subClass = Data.ProtoLens.Field.field @"maybe'subClass" +maybe'suspensionTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'suspensionTime" a) => + Lens.Family2.LensLike' f s a +maybe'suspensionTime + = Data.ProtoLens.Field.field @"maybe'suspensionTime" +maybe'sync :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'sync" a) => + Lens.Family2.LensLike' f s a +maybe'sync = Data.ProtoLens.Field.field @"maybe'sync" +maybe'syntheticStrategies :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'syntheticStrategies" a) => + Lens.Family2.LensLike' f s a +maybe'syntheticStrategies + = Data.ProtoLens.Field.field @"maybe'syntheticStrategies" +maybe'syntheticStrategyTreeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'syntheticStrategyTreeRequest" a) => + Lens.Family2.LensLike' f s a +maybe'syntheticStrategyTreeRequest + = Data.ProtoLens.Field.field @"maybe'syntheticStrategyTreeRequest" +maybe'syntheticStrategyTreeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'syntheticStrategyTreeResult" a) => + Lens.Family2.LensLike' f s a +maybe'syntheticStrategyTreeResult + = Data.ProtoLens.Field.field @"maybe'syntheticStrategyTreeResult" +maybe'textMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'textMessage" a) => + Lens.Family2.LensLike' f s a +maybe'textMessage = Data.ProtoLens.Field.field @"maybe'textMessage" +maybe'theoTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'theoTicks" a) => + Lens.Family2.LensLike' f s a +maybe'theoTicks = Data.ProtoLens.Field.field @"maybe'theoTicks" +maybe'ticketNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'ticketNumber" a) => + Lens.Family2.LensLike' f s a +maybe'ticketNumber + = Data.ProtoLens.Field.field @"maybe'ticketNumber" +maybe'top :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'top" a) => + Lens.Family2.LensLike' f s a +maybe'top = Data.ProtoLens.Field.field @"maybe'top" +maybe'totalGrossOpenPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'totalGrossOpenPositionLimit" a) => + Lens.Family2.LensLike' f s a +maybe'totalGrossOpenPositionLimit + = Data.ProtoLens.Field.field @"maybe'totalGrossOpenPositionLimit" +maybe'trackingNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'trackingNumber" a) => + Lens.Family2.LensLike' f s a +maybe'trackingNumber + = Data.ProtoLens.Field.field @"maybe'trackingNumber" +maybe'tradeLocationId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradeLocationId" a) => + Lens.Family2.LensLike' f s a +maybe'tradeLocationId + = Data.ProtoLens.Field.field @"maybe'tradeLocationId" +maybe'tradeMarginLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradeMarginLimit" a) => + Lens.Family2.LensLike' f s a +maybe'tradeMarginLimit + = Data.ProtoLens.Field.field @"maybe'tradeMarginLimit" +maybe'tradePriceLimitPercent :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradePriceLimitPercent" a) => + Lens.Family2.LensLike' f s a +maybe'tradePriceLimitPercent + = Data.ProtoLens.Field.field @"maybe'tradePriceLimitPercent" +maybe'tradePriceLimitPercentContinuous :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradePriceLimitPercentContinuous" a) => + Lens.Family2.LensLike' f s a +maybe'tradePriceLimitPercentContinuous + = Data.ProtoLens.Field.field + @"maybe'tradePriceLimitPercentContinuous" +maybe'tradePriceLimitPercentNonContinuous :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradePriceLimitPercentNonContinuous" a) => + Lens.Family2.LensLike' f s a +maybe'tradePriceLimitPercentNonContinuous + = Data.ProtoLens.Field.field + @"maybe'tradePriceLimitPercentNonContinuous" +maybe'tradePriceLimitTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradePriceLimitTicks" a) => + Lens.Family2.LensLike' f s a +maybe'tradePriceLimitTicks + = Data.ProtoLens.Field.field @"maybe'tradePriceLimitTicks" +maybe'tradePriceLimitTicksContinuous :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradePriceLimitTicksContinuous" a) => + Lens.Family2.LensLike' f s a +maybe'tradePriceLimitTicksContinuous + = Data.ProtoLens.Field.field + @"maybe'tradePriceLimitTicksContinuous" +maybe'tradePriceLimitTicksNonContinuous :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradePriceLimitTicksNonContinuous" a) => + Lens.Family2.LensLike' f s a +maybe'tradePriceLimitTicksNonContinuous + = Data.ProtoLens.Field.field + @"maybe'tradePriceLimitTicksNonContinuous" +maybe'tradeSizeLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradeSizeLimit" a) => + Lens.Family2.LensLike' f s a +maybe'tradeSizeLimit + = Data.ProtoLens.Field.field @"maybe'tradeSizeLimit" +maybe'tradeSizeLimitWithModes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradeSizeLimitWithModes" a) => + Lens.Family2.LensLike' f s a +maybe'tradeSizeLimitWithModes + = Data.ProtoLens.Field.field @"maybe'tradeSizeLimitWithModes" +maybe'tradeUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradeUtcTime" a) => + Lens.Family2.LensLike' f s a +maybe'tradeUtcTime + = Data.ProtoLens.Field.field @"maybe'tradeUtcTime" +maybe'tradingExpression :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradingExpression" a) => + Lens.Family2.LensLike' f s a +maybe'tradingExpression + = Data.ProtoLens.Field.field @"maybe'tradingExpression" +maybe'tradingTimeFrom :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradingTimeFrom" a) => + Lens.Family2.LensLike' f s a +maybe'tradingTimeFrom + = Data.ProtoLens.Field.field @"maybe'tradingTimeFrom" +maybe'tradingTimeTo :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradingTimeTo" a) => + Lens.Family2.LensLike' f s a +maybe'tradingTimeTo + = Data.ProtoLens.Field.field @"maybe'tradingTimeTo" +maybe'tradingTimeZone :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'tradingTimeZone" a) => + Lens.Family2.LensLike' f s a +maybe'tradingTimeZone + = Data.ProtoLens.Field.field @"maybe'tradingTimeZone" +maybe'trailType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'trailType" a) => + Lens.Family2.LensLike' f s a +maybe'trailType = Data.ProtoLens.Field.field @"maybe'trailType" +maybe'trailing :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'trailing" a) => + Lens.Family2.LensLike' f s a +maybe'trailing = Data.ProtoLens.Field.field @"maybe'trailing" +maybe'transformMifidAlgoCqgToClientAlgo :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'transformMifidAlgoCqgToClientAlgo" a) => + Lens.Family2.LensLike' f s a +maybe'transformMifidAlgoCqgToClientAlgo + = Data.ProtoLens.Field.field + @"maybe'transformMifidAlgoCqgToClientAlgo" +maybe'triggerSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'triggerSize" a) => + Lens.Family2.LensLike' f s a +maybe'triggerSize = Data.ProtoLens.Field.field @"maybe'triggerSize" +maybe'triggerType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'triggerType" a) => + Lens.Family2.LensLike' f s a +maybe'triggerType = Data.ProtoLens.Field.field @"maybe'triggerType" +maybe'type' :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'type'" a) => + Lens.Family2.LensLike' f s a +maybe'type' = Data.ProtoLens.Field.field @"maybe'type'" +maybe'typeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'typeId" a) => + Lens.Family2.LensLike' f s a +maybe'typeId = Data.ProtoLens.Field.field @"maybe'typeId" +maybe'updateAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccount" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccount + = Data.ProtoLens.Field.field @"maybe'updateAccount" +maybe'updateAccountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountGroup" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountGroup + = Data.ProtoLens.Field.field @"maybe'updateAccountGroup" +maybe'updateAccountMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountMarketLimits" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountMarketLimits + = Data.ProtoLens.Field.field @"maybe'updateAccountMarketLimits" +maybe'updateAccountMarketLimitsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountMarketLimitsResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountMarketLimitsResult + = Data.ProtoLens.Field.field + @"maybe'updateAccountMarketLimitsResult" +maybe'updateAccountResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountResult + = Data.ProtoLens.Field.field @"maybe'updateAccountResult" +maybe'updateAccountRiskParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountRiskParameters" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountRiskParameters + = Data.ProtoLens.Field.field @"maybe'updateAccountRiskParameters" +maybe'updateAccountRiskParametersResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountRiskParametersResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountRiskParametersResult + = Data.ProtoLens.Field.field + @"maybe'updateAccountRiskParametersResult" +maybe'updateAccountRouteList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountRouteList" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountRouteList + = Data.ProtoLens.Field.field @"maybe'updateAccountRouteList" +maybe'updateAccountRouteListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountRouteListResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountRouteListResult + = Data.ProtoLens.Field.field @"maybe'updateAccountRouteListResult" +maybe'updateAccountServiceGroupList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountServiceGroupList" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountServiceGroupList + = Data.ProtoLens.Field.field @"maybe'updateAccountServiceGroupList" +maybe'updateAccountServiceGroupListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountServiceGroupListResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountServiceGroupListResult + = Data.ProtoLens.Field.field + @"maybe'updateAccountServiceGroupListResult" +maybe'updateAccountSettings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountSettings" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountSettings + = Data.ProtoLens.Field.field @"maybe'updateAccountSettings" +maybe'updateAccountSettingsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountSettingsResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountSettingsResult + = Data.ProtoLens.Field.field @"maybe'updateAccountSettingsResult" +maybe'updateAccountTradingFeatures :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountTradingFeatures" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountTradingFeatures + = Data.ProtoLens.Field.field @"maybe'updateAccountTradingFeatures" +maybe'updateAccountTypeOverrideList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountTypeOverrideList" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountTypeOverrideList + = Data.ProtoLens.Field.field @"maybe'updateAccountTypeOverrideList" +maybe'updateAccountTypeOverrideListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountTypeOverrideListResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountTypeOverrideListResult + = Data.ProtoLens.Field.field + @"maybe'updateAccountTypeOverrideListResult" +maybe'updateAccountUserAuthorizationList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountUserAuthorizationList" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountUserAuthorizationList + = Data.ProtoLens.Field.field + @"maybe'updateAccountUserAuthorizationList" +maybe'updateAccountUserAuthorizationListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateAccountUserAuthorizationListResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateAccountUserAuthorizationListResult + = Data.ProtoLens.Field.field + @"maybe'updateAccountUserAuthorizationListResult" +maybe'updateBalanceRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateBalanceRecord" a) => + Lens.Family2.LensLike' f s a +maybe'updateBalanceRecord + = Data.ProtoLens.Field.field @"maybe'updateBalanceRecord" +maybe'updateBalanceRecordResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateBalanceRecordResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateBalanceRecordResult + = Data.ProtoLens.Field.field @"maybe'updateBalanceRecordResult" +maybe'updateRiskParametersResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateRiskParametersResult" a) => + Lens.Family2.LensLike' f s a +maybe'updateRiskParametersResult + = Data.ProtoLens.Field.field @"maybe'updateRiskParametersResult" +maybe'updateTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'updateTime" a) => + Lens.Family2.LensLike' f s a +maybe'updateTime = Data.ProtoLens.Field.field @"maybe'updateTime" +maybe'usMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'usMarketLimits" a) => + Lens.Family2.LensLike' f s a +maybe'usMarketLimits + = Data.ProtoLens.Field.field @"maybe'usMarketLimits" +maybe'useBbaNovUpl :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'useBbaNovUpl" a) => + Lens.Family2.LensLike' f s a +maybe'useBbaNovUpl + = Data.ProtoLens.Field.field @"maybe'useBbaNovUpl" +maybe'useBbaOte :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'useBbaOte" a) => + Lens.Family2.LensLike' f s a +maybe'useBbaOte = Data.ProtoLens.Field.field @"maybe'useBbaOte" +maybe'useBrokerageMarginsOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'useBrokerageMarginsOnly" a) => + Lens.Family2.LensLike' f s a +maybe'useBrokerageMarginsOnly + = Data.ProtoLens.Field.field @"maybe'useBrokerageMarginsOnly" +maybe'useIntradayCurrencyRate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'useIntradayCurrencyRate" a) => + Lens.Family2.LensLike' f s a +maybe'useIntradayCurrencyRate + = Data.ProtoLens.Field.field @"maybe'useIntradayCurrencyRate" +maybe'useTheoPrices :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'useTheoPrices" a) => + Lens.Family2.LensLike' f s a +maybe'useTheoPrices + = Data.ProtoLens.Field.field @"maybe'useTheoPrices" +maybe'userId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'userId" a) => + Lens.Family2.LensLike' f s a +maybe'userId = Data.ProtoLens.Field.field @"maybe'userId" +maybe'userName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'userName" a) => + Lens.Family2.LensLike' f s a +maybe'userName = Data.ProtoLens.Field.field @"maybe'userName" +maybe'value :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'value" a) => + Lens.Family2.LensLike' f s a +maybe'value = Data.ProtoLens.Field.field @"maybe'value" +maybe'visibleSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'visibleSize" a) => + Lens.Family2.LensLike' f s a +maybe'visibleSize = Data.ProtoLens.Field.field @"maybe'visibleSize" +maybe'zeroBalance :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'zeroBalance" a) => + Lens.Family2.LensLike' f s a +maybe'zeroBalance = Data.ProtoLens.Field.field @"maybe'zeroBalance" +minVisibleSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "minVisibleSize" a) => + Lens.Family2.LensLike' f s a +minVisibleSize = Data.ProtoLens.Field.field @"minVisibleSize" +mode :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "mode" a) => + Lens.Family2.LensLike' f s a +mode = Data.ProtoLens.Field.field @"mode" +modesAccountGroups :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "modesAccountGroups" a) => + Lens.Family2.LensLike' f s a +modesAccountGroups + = Data.ProtoLens.Field.field @"modesAccountGroups" +msAllowableMarginCredit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "msAllowableMarginCredit" a) => + Lens.Family2.LensLike' f s a +msAllowableMarginCredit + = Data.ProtoLens.Field.field @"msAllowableMarginCredit" +msCrossMargining :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "msCrossMargining" a) => + Lens.Family2.LensLike' f s a +msCrossMargining = Data.ProtoLens.Field.field @"msCrossMargining" +msIncludeNovPp :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "msIncludeNovPp" a) => + Lens.Family2.LensLike' f s a +msIncludeNovPp = Data.ProtoLens.Field.field @"msIncludeNovPp" +msIncludeOtePp :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "msIncludeOtePp" a) => + Lens.Family2.LensLike' f s a +msIncludeOtePp = Data.ProtoLens.Field.field @"msIncludeOtePp" +msInstrumentGroupMarginMultiplier :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "msInstrumentGroupMarginMultiplier" a) => + Lens.Family2.LensLike' f s a +msInstrumentGroupMarginMultiplier + = Data.ProtoLens.Field.field @"msInstrumentGroupMarginMultiplier" +msUseInstrumentGroupMarginMultiplier :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "msUseInstrumentGroupMarginMultiplier" a) => + Lens.Family2.LensLike' f s a +msUseInstrumentGroupMarginMultiplier + = Data.ProtoLens.Field.field + @"msUseInstrumentGroupMarginMultiplier" +mvo :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "mvo" a) => + Lens.Family2.LensLike' f s a +mvo = Data.ProtoLens.Field.field @"mvo" +name :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "name" a) => + Lens.Family2.LensLike' f s a +name = Data.ProtoLens.Field.field @"name" +nativeOrderType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "nativeOrderType" a) => + Lens.Family2.LensLike' f s a +nativeOrderType = Data.ProtoLens.Field.field @"nativeOrderType" +nativeRouteName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "nativeRouteName" a) => + Lens.Family2.LensLike' f s a +nativeRouteName = Data.ProtoLens.Field.field @"nativeRouteName" +newAccountBrokerageNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newAccountBrokerageNumber" a) => + Lens.Family2.LensLike' f s a +newAccountBrokerageNumber + = Data.ProtoLens.Field.field @"newAccountBrokerageNumber" +newAccountClass :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newAccountClass" a) => + Lens.Family2.LensLike' f s a +newAccountClass = Data.ProtoLens.Field.field @"newAccountClass" +newAccountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newAccountGroup" a) => + Lens.Family2.LensLike' f s a +newAccountGroup = Data.ProtoLens.Field.field @"newAccountGroup" +newAccountGroupId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newAccountGroupId" a) => + Lens.Family2.LensLike' f s a +newAccountGroupId = Data.ProtoLens.Field.field @"newAccountGroupId" +newAccountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newAccountId" a) => + Lens.Family2.LensLike' f s a +newAccountId = Data.ProtoLens.Field.field @"newAccountId" +newAccountName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newAccountName" a) => + Lens.Family2.LensLike' f s a +newAccountName = Data.ProtoLens.Field.field @"newAccountName" +newAccountUserId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newAccountUserId" a) => + Lens.Family2.LensLike' f s a +newAccountUserId = Data.ProtoLens.Field.field @"newAccountUserId" +newRouteOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "newRouteOrderId" a) => + Lens.Family2.LensLike' f s a +newRouteOrderId = Data.ProtoLens.Field.field @"newRouteOrderId" +nodeRole :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "nodeRole" a) => + Lens.Family2.LensLike' f s a +nodeRole = Data.ProtoLens.Field.field @"nodeRole" +nonUsMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "nonUsMarketLimits" a) => + Lens.Family2.LensLike' f s a +nonUsMarketLimits = Data.ProtoLens.Field.field @"nonUsMarketLimits" +number :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "number" a) => + Lens.Family2.LensLike' f s a +number = Data.ProtoLens.Field.field @"number" +obsoleteAccountCluster :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteAccountCluster" a) => + Lens.Family2.LensLike' f s a +obsoleteAccountCluster + = Data.ProtoLens.Field.field @"obsoleteAccountCluster" +obsoleteAccountClusterId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteAccountClusterId" a) => + Lens.Family2.LensLike' f s a +obsoleteAccountClusterId + = Data.ProtoLens.Field.field @"obsoleteAccountClusterId" +obsoleteAccountClusterPriceOffsets :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteAccountClusterPriceOffsets" a) => + Lens.Family2.LensLike' f s a +obsoleteAccountClusterPriceOffsets + = Data.ProtoLens.Field.field @"obsoleteAccountClusterPriceOffsets" +obsoleteAccountClusterRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteAccountClusterRequest" a) => + Lens.Family2.LensLike' f s a +obsoleteAccountClusterRequest + = Data.ProtoLens.Field.field @"obsoleteAccountClusterRequest" +obsoleteAccountClusterResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteAccountClusterResult" a) => + Lens.Family2.LensLike' f s a +obsoleteAccountClusterResult + = Data.ProtoLens.Field.field @"obsoleteAccountClusterResult" +obsoleteAccountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteAccountId" a) => + Lens.Family2.LensLike' f s a +obsoleteAccountId = Data.ProtoLens.Field.field @"obsoleteAccountId" +obsoleteBlockSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteBlockSize" a) => + Lens.Family2.LensLike' f s a +obsoleteBlockSize = Data.ProtoLens.Field.field @"obsoleteBlockSize" +obsoleteBrokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteBrokerageName" a) => + Lens.Family2.LensLike' f s a +obsoleteBrokerageName + = Data.ProtoLens.Field.field @"obsoleteBrokerageName" +obsoleteCommodityPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteCommodityPositionLimit" a) => + Lens.Family2.LensLike' f s a +obsoleteCommodityPositionLimit + = Data.ProtoLens.Field.field @"obsoleteCommodityPositionLimit" +obsoleteContractPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteContractPositionLimit" a) => + Lens.Family2.LensLike' f s a +obsoleteContractPositionLimit + = Data.ProtoLens.Field.field @"obsoleteContractPositionLimit" +obsoleteCreateAccountCluster :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteCreateAccountCluster" a) => + Lens.Family2.LensLike' f s a +obsoleteCreateAccountCluster + = Data.ProtoLens.Field.field @"obsoleteCreateAccountCluster" +obsoleteCreateAccountClusterResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteCreateAccountClusterResult" a) => + Lens.Family2.LensLike' f s a +obsoleteCreateAccountClusterResult + = Data.ProtoLens.Field.field @"obsoleteCreateAccountClusterResult" +obsoleteCurrencyCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteCurrencyCode" a) => + Lens.Family2.LensLike' f s a +obsoleteCurrencyCode + = Data.ProtoLens.Field.field @"obsoleteCurrencyCode" +obsoleteDiscretionaryOffset :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteDiscretionaryOffset" a) => + Lens.Family2.LensLike' f s a +obsoleteDiscretionaryOffset + = Data.ProtoLens.Field.field @"obsoleteDiscretionaryOffset" +obsoleteExpirationLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteExpirationLimit" a) => + Lens.Family2.LensLike' f s a +obsoleteExpirationLimit + = Data.ProtoLens.Field.field @"obsoleteExpirationLimit" +obsoleteFillQuantity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteFillQuantity" a) => + Lens.Family2.LensLike' f s a +obsoleteFillQuantity + = Data.ProtoLens.Field.field @"obsoleteFillQuantity" +obsoleteGiveupBrokerageName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteGiveupBrokerageName" a) => + Lens.Family2.LensLike' f s a +obsoleteGiveupBrokerageName + = Data.ProtoLens.Field.field @"obsoleteGiveupBrokerageName" +obsoleteHasOverlappedInstruments :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteHasOverlappedInstruments" a) => + Lens.Family2.LensLike' f s a +obsoleteHasOverlappedInstruments + = Data.ProtoLens.Field.field @"obsoleteHasOverlappedInstruments" +obsoleteInstrumentPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteInstrumentPositionLimit" a) => + Lens.Family2.LensLike' f s a +obsoleteInstrumentPositionLimit + = Data.ProtoLens.Field.field @"obsoleteInstrumentPositionLimit" +obsoleteIsBlock :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteIsBlock" a) => + Lens.Family2.LensLike' f s a +obsoleteIsBlock = Data.ProtoLens.Field.field @"obsoleteIsBlock" +obsoleteMarginMultiplier :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteMarginMultiplier" a) => + Lens.Family2.LensLike' f s a +obsoleteMarginMultiplier + = Data.ProtoLens.Field.field @"obsoleteMarginMultiplier" +obsoleteMinVisibleSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteMinVisibleSize" a) => + Lens.Family2.LensLike' f s a +obsoleteMinVisibleSize + = Data.ProtoLens.Field.field @"obsoleteMinVisibleSize" +obsoleteNewDiscretionaryOffset :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteNewDiscretionaryOffset" a) => + Lens.Family2.LensLike' f s a +obsoleteNewDiscretionaryOffset + = Data.ProtoLens.Field.field @"obsoleteNewDiscretionaryOffset" +obsoleteOmnibusAccountName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteOmnibusAccountName" a) => + Lens.Family2.LensLike' f s a +obsoleteOmnibusAccountName + = Data.ProtoLens.Field.field @"obsoleteOmnibusAccountName" +obsoleteOriginalAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteOriginalAccount" a) => + Lens.Family2.LensLike' f s a +obsoleteOriginalAccount + = Data.ProtoLens.Field.field @"obsoleteOriginalAccount" +obsoleteOriginalAccountCluster :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteOriginalAccountCluster" a) => + Lens.Family2.LensLike' f s a +obsoleteOriginalAccountCluster + = Data.ProtoLens.Field.field @"obsoleteOriginalAccountCluster" +obsoleteOriginalMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteOriginalMarketLimits" a) => + Lens.Family2.LensLike' f s a +obsoleteOriginalMarketLimits + = Data.ProtoLens.Field.field @"obsoleteOriginalMarketLimits" +obsoleteOriginalRiskParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteOriginalRiskParameters" a) => + Lens.Family2.LensLike' f s a +obsoleteOriginalRiskParameters + = Data.ProtoLens.Field.field @"obsoleteOriginalRiskParameters" +obsoleteOriginalSettings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteOriginalSettings" a) => + Lens.Family2.LensLike' f s a +obsoleteOriginalSettings + = Data.ProtoLens.Field.field @"obsoleteOriginalSettings" +obsoletePrevDiscretionaryOffset :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoletePrevDiscretionaryOffset" a) => + Lens.Family2.LensLike' f s a +obsoletePrevDiscretionaryOffset + = Data.ProtoLens.Field.field @"obsoletePrevDiscretionaryOffset" +obsoleteQty :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteQty" a) => + Lens.Family2.LensLike' f s a +obsoleteQty = Data.ProtoLens.Field.field @"obsoleteQty" +obsoleteQuantity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteQuantity" a) => + Lens.Family2.LensLike' f s a +obsoleteQuantity = Data.ProtoLens.Field.field @"obsoleteQuantity" +obsoleteQuantityRatio :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteQuantityRatio" a) => + Lens.Family2.LensLike' f s a +obsoleteQuantityRatio + = Data.ProtoLens.Field.field @"obsoleteQuantityRatio" +obsoleteRemainingSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteRemainingSize" a) => + Lens.Family2.LensLike' f s a +obsoleteRemainingSize + = Data.ProtoLens.Field.field @"obsoleteRemainingSize" +obsoleteRouteName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteRouteName" a) => + Lens.Family2.LensLike' f s a +obsoleteRouteName = Data.ProtoLens.Field.field @"obsoleteRouteName" +obsoleteSalesSeriesName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteSalesSeriesName" a) => + Lens.Family2.LensLike' f s a +obsoleteSalesSeriesName + = Data.ProtoLens.Field.field @"obsoleteSalesSeriesName" +obsoleteSalesSeriesNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteSalesSeriesNumber" a) => + Lens.Family2.LensLike' f s a +obsoleteSalesSeriesNumber + = Data.ProtoLens.Field.field @"obsoleteSalesSeriesNumber" +obsoleteSearchCriteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteSearchCriteria" a) => + Lens.Family2.LensLike' f s a +obsoleteSearchCriteria + = Data.ProtoLens.Field.field @"obsoleteSearchCriteria" +obsoleteSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteSize" a) => + Lens.Family2.LensLike' f s a +obsoleteSize = Data.ProtoLens.Field.field @"obsoleteSize" +obsoleteText :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteText" a) => + Lens.Family2.LensLike' f s a +obsoleteText = Data.ProtoLens.Field.field @"obsoleteText" +obsoleteTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteTicks" a) => + Lens.Family2.LensLike' f s a +obsoleteTicks = Data.ProtoLens.Field.field @"obsoleteTicks" +obsoleteTradableCommodityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteTradableCommodityId" a) => + Lens.Family2.LensLike' f s a +obsoleteTradableCommodityId + = Data.ProtoLens.Field.field @"obsoleteTradableCommodityId" +obsoleteTradeSizeLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteTradeSizeLimit" a) => + Lens.Family2.LensLike' f s a +obsoleteTradeSizeLimit + = Data.ProtoLens.Field.field @"obsoleteTradeSizeLimit" +obsoleteTriggerSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteTriggerSize" a) => + Lens.Family2.LensLike' f s a +obsoleteTriggerSize + = Data.ProtoLens.Field.field @"obsoleteTriggerSize" +obsoleteUpdateAccountCluster :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteUpdateAccountCluster" a) => + Lens.Family2.LensLike' f s a +obsoleteUpdateAccountCluster + = Data.ProtoLens.Field.field @"obsoleteUpdateAccountCluster" +obsoleteUpdateAccountClusterPriceOffsets :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteUpdateAccountClusterPriceOffsets" a) => + Lens.Family2.LensLike' f s a +obsoleteUpdateAccountClusterPriceOffsets + = Data.ProtoLens.Field.field + @"obsoleteUpdateAccountClusterPriceOffsets" +obsoleteUpdateAccountClusterPriceOffsetsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteUpdateAccountClusterPriceOffsetsResult" a) => + Lens.Family2.LensLike' f s a +obsoleteUpdateAccountClusterPriceOffsetsResult + = Data.ProtoLens.Field.field + @"obsoleteUpdateAccountClusterPriceOffsetsResult" +obsoleteUpdateAccountClusterResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteUpdateAccountClusterResult" a) => + Lens.Family2.LensLike' f s a +obsoleteUpdateAccountClusterResult + = Data.ProtoLens.Field.field @"obsoleteUpdateAccountClusterResult" +obsoleteUpdateRiskParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteUpdateRiskParameters" a) => + Lens.Family2.LensLike' f s a +obsoleteUpdateRiskParameters + = Data.ProtoLens.Field.field @"obsoleteUpdateRiskParameters" +obsoleteVisibleSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "obsoleteVisibleSize" a) => + Lens.Family2.LensLike' f s a +obsoleteVisibleSize + = Data.ProtoLens.Field.field @"obsoleteVisibleSize" +offset :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "offset" a) => + Lens.Family2.LensLike' f s a +offset = Data.ProtoLens.Field.field @"offset" +offsetsToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "offsetsToRemove" a) => + Lens.Family2.LensLike' f s a +offsetsToRemove = Data.ProtoLens.Field.field @"offsetsToRemove" +offsetsToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "offsetsToSet" a) => + Lens.Family2.LensLike' f s a +offsetsToSet = Data.ProtoLens.Field.field @"offsetsToSet" +omnibusAccountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "omnibusAccountId" a) => + Lens.Family2.LensLike' f s a +omnibusAccountId = Data.ProtoLens.Field.field @"omnibusAccountId" +omnibusAccounts :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "omnibusAccounts" a) => + Lens.Family2.LensLike' f s a +omnibusAccounts = Data.ProtoLens.Field.field @"omnibusAccounts" +omnibusSupportType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "omnibusSupportType" a) => + Lens.Family2.LensLike' f s a +omnibusSupportType + = Data.ProtoLens.Field.field @"omnibusSupportType" +open :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "open" a) => + Lens.Family2.LensLike' f s a +open = Data.ProtoLens.Field.field @"open" +openCloseType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "openCloseType" a) => + Lens.Family2.LensLike' f s a +openCloseType = Data.ProtoLens.Field.field @"openCloseType" +openPosition :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "openPosition" a) => + Lens.Family2.LensLike' f s a +openPosition = Data.ProtoLens.Field.field @"openPosition" +operationStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operationStatus" a) => + Lens.Family2.LensLike' f s a +operationStatus = Data.ProtoLens.Field.field @"operationStatus" +operationalDetails :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operationalDetails" a) => + Lens.Family2.LensLike' f s a +operationalDetails + = Data.ProtoLens.Field.field @"operationalDetails" +operatorId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "operatorId" a) => + Lens.Family2.LensLike' f s a +operatorId = Data.ProtoLens.Field.field @"operatorId" +orderChain :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderChain" a) => + Lens.Family2.LensLike' f s a +orderChain = Data.ProtoLens.Field.field @"orderChain" +orderChainId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderChainId" a) => + Lens.Family2.LensLike' f s a +orderChainId = Data.ProtoLens.Field.field @"orderChainId" +orderChainStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderChainStatus" a) => + Lens.Family2.LensLike' f s a +orderChainStatus = Data.ProtoLens.Field.field @"orderChainStatus" +orderClasses :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderClasses" a) => + Lens.Family2.LensLike' f s a +orderClasses = Data.ProtoLens.Field.field @"orderClasses" +orderDetailsRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderDetailsRequest" a) => + Lens.Family2.LensLike' f s a +orderDetailsRequest + = Data.ProtoLens.Field.field @"orderDetailsRequest" +orderDetailsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderDetailsResult" a) => + Lens.Family2.LensLike' f s a +orderDetailsResult + = Data.ProtoLens.Field.field @"orderDetailsResult" +orderFill :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderFill" a) => + Lens.Family2.LensLike' f s a +orderFill = Data.ProtoLens.Field.field @"orderFill" +orderId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "orderId" a) => + Lens.Family2.LensLike' f s a +orderId = Data.ProtoLens.Field.field @"orderId" +orderIdAtExchange :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderIdAtExchange" a) => + Lens.Family2.LensLike' f s a +orderIdAtExchange = Data.ProtoLens.Field.field @"orderIdAtExchange" +orderRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderRecord" a) => + Lens.Family2.LensLike' f s a +orderRecord = Data.ProtoLens.Field.field @"orderRecord" +orderRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderRequest" a) => + Lens.Family2.LensLike' f s a +orderRequest = Data.ProtoLens.Field.field @"orderRequest" +orderRequestsTop :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderRequestsTop" a) => + Lens.Family2.LensLike' f s a +orderRequestsTop = Data.ProtoLens.Field.field @"orderRequestsTop" +orderScopeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderScopeRequest" a) => + Lens.Family2.LensLike' f s a +orderScopeRequest = Data.ProtoLens.Field.field @"orderScopeRequest" +orderScopeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderScopeResult" a) => + Lens.Family2.LensLike' f s a +orderScopeResult = Data.ProtoLens.Field.field @"orderScopeResult" +orderSearchRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderSearchRequest" a) => + Lens.Family2.LensLike' f s a +orderSearchRequest + = Data.ProtoLens.Field.field @"orderSearchRequest" +orderSearchResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderSearchResult" a) => + Lens.Family2.LensLike' f s a +orderSearchResult = Data.ProtoLens.Field.field @"orderSearchResult" +orderState :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderState" a) => + Lens.Family2.LensLike' f s a +orderState = Data.ProtoLens.Field.field @"orderState" +orderType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "orderType" a) => + Lens.Family2.LensLike' f s a +orderType = Data.ProtoLens.Field.field @"orderType" +origin :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "origin" a) => + Lens.Family2.LensLike' f s a +origin = Data.ProtoLens.Field.field @"origin" +originId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "originId" a) => + Lens.Family2.LensLike' f s a +originId = Data.ProtoLens.Field.field @"originId" +originatorLocationId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "originatorLocationId" a) => + Lens.Family2.LensLike' f s a +originatorLocationId + = Data.ProtoLens.Field.field @"originatorLocationId" +ote :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "ote" a) => + Lens.Family2.LensLike' f s a +ote = Data.ProtoLens.Field.field @"ote" +overrides :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "overrides" a) => + Lens.Family2.LensLike' f s a +overrides = Data.ProtoLens.Field.field @"overrides" +overridesToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "overridesToRemove" a) => + Lens.Family2.LensLike' f s a +overridesToRemove = Data.ProtoLens.Field.field @"overridesToRemove" +overridesToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "overridesToSet" a) => + Lens.Family2.LensLike' f s a +overridesToSet = Data.ProtoLens.Field.field @"overridesToSet" +percent :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "percent" a) => + Lens.Family2.LensLike' f s a +percent = Data.ProtoLens.Field.field @"percent" +platformName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "platformName" a) => + Lens.Family2.LensLike' f s a +platformName = Data.ProtoLens.Field.field @"platformName" +positionAndTradeLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "positionAndTradeLimits" a) => + Lens.Family2.LensLike' f s a +positionAndTradeLimits + = Data.ProtoLens.Field.field @"positionAndTradeLimits" +positionId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "positionId" a) => + Lens.Family2.LensLike' f s a +positionId = Data.ProtoLens.Field.field @"positionId" +positionIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "positionIds" a) => + Lens.Family2.LensLike' f s a +positionIds = Data.ProtoLens.Field.field @"positionIds" +postedMargin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "postedMargin" a) => + Lens.Family2.LensLike' f s a +postedMargin = Data.ProtoLens.Field.field @"postedMargin" +prefix :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "prefix" a) => + Lens.Family2.LensLike' f s a +prefix = Data.ProtoLens.Field.field @"prefix" +price :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "price" a) => + Lens.Family2.LensLike' f s a +price = Data.ProtoLens.Field.field @"price" +priceOffsetTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "priceOffsetTicks" a) => + Lens.Family2.LensLike' f s a +priceOffsetTicks = Data.ProtoLens.Field.field @"priceOffsetTicks" +priceRatio :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "priceRatio" a) => + Lens.Family2.LensLike' f s a +priceRatio = Data.ProtoLens.Field.field @"priceRatio" +primaryLoginRequired :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "primaryLoginRequired" a) => + Lens.Family2.LensLike' f s a +primaryLoginRequired + = Data.ProtoLens.Field.field @"primaryLoginRequired" +priority :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "priority" a) => + Lens.Family2.LensLike' f s a +priority = Data.ProtoLens.Field.field @"priority" +privateLabelName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "privateLabelName" a) => + Lens.Family2.LensLike' f s a +privateLabelName = Data.ProtoLens.Field.field @"privateLabelName" +productId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "productId" a) => + Lens.Family2.LensLike' f s a +productId = Data.ProtoLens.Field.field @"productId" +profileId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileId" a) => + Lens.Family2.LensLike' f s a +profileId = Data.ProtoLens.Field.field @"profileId" +profileSalesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileSalesSeriesId" a) => + Lens.Family2.LensLike' f s a +profileSalesSeriesId + = Data.ProtoLens.Field.field @"profileSalesSeriesId" +purchasingPower :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "purchasingPower" a) => + Lens.Family2.LensLike' f s a +purchasingPower = Data.ProtoLens.Field.field @"purchasingPower" +purchasingPowerFraction :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "purchasingPowerFraction" a) => + Lens.Family2.LensLike' f s a +purchasingPowerFraction + = Data.ProtoLens.Field.field @"purchasingPowerFraction" +purchasingPowerParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "purchasingPowerParameters" a) => + Lens.Family2.LensLike' f s a +purchasingPowerParameters + = Data.ProtoLens.Field.field @"purchasingPowerParameters" +qty :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "qty" a) => + Lens.Family2.LensLike' f s a +qty = Data.ProtoLens.Field.field @"qty" +quantity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "quantity" a) => + Lens.Family2.LensLike' f s a +quantity = Data.ProtoLens.Field.field @"quantity" +quantityRatio :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "quantityRatio" a) => + Lens.Family2.LensLike' f s a +quantityRatio = Data.ProtoLens.Field.field @"quantityRatio" +reconciliation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "reconciliation" a) => + Lens.Family2.LensLike' f s a +reconciliation = Data.ProtoLens.Field.field @"reconciliation" +reflectAsCanceledOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "reflectAsCanceledOrder" a) => + Lens.Family2.LensLike' f s a +reflectAsCanceledOrder + = Data.ProtoLens.Field.field @"reflectAsCanceledOrder" +reflectAsCanceledOrderResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "reflectAsCanceledOrderResult" a) => + Lens.Family2.LensLike' f s a +reflectAsCanceledOrderResult + = Data.ProtoLens.Field.field @"reflectAsCanceledOrderResult" +regulated :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "regulated" a) => + Lens.Family2.LensLike' f s a +regulated = Data.ProtoLens.Field.field @"regulated" +rejectDetails :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "rejectDetails" a) => + Lens.Family2.LensLike' f s a +rejectDetails = Data.ProtoLens.Field.field @"rejectDetails" +rejectDetailsInternal :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "rejectDetailsInternal" a) => + Lens.Family2.LensLike' f s a +rejectDetailsInternal + = Data.ProtoLens.Field.field @"rejectDetailsInternal" +rejectRiskyMarketOrders :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "rejectRiskyMarketOrders" a) => + Lens.Family2.LensLike' f s a +rejectRiskyMarketOrders + = Data.ProtoLens.Field.field @"rejectRiskyMarketOrders" +relatedOrder :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "relatedOrder" a) => + Lens.Family2.LensLike' f s a +relatedOrder = Data.ProtoLens.Field.field @"relatedOrder" +relatedOrderTreeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "relatedOrderTreeRequest" a) => + Lens.Family2.LensLike' f s a +relatedOrderTreeRequest + = Data.ProtoLens.Field.field @"relatedOrderTreeRequest" +relatedOrderTreeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "relatedOrderTreeResult" a) => + Lens.Family2.LensLike' f s a +relatedOrderTreeResult + = Data.ProtoLens.Field.field @"relatedOrderTreeResult" +relationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "relationType" a) => + Lens.Family2.LensLike' f s a +relationType = Data.ProtoLens.Field.field @"relationType" +remainingSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "remainingSize" a) => + Lens.Family2.LensLike' f s a +remainingSize = Data.ProtoLens.Field.field @"remainingSize" +removeAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "removeAccount" a) => + Lens.Family2.LensLike' f s a +removeAccount = Data.ProtoLens.Field.field @"removeAccount" +removeAccountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "removeAccountGroup" a) => + Lens.Family2.LensLike' f s a +removeAccountGroup + = Data.ProtoLens.Field.field @"removeAccountGroup" +removeAccountResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "removeAccountResult" a) => + Lens.Family2.LensLike' f s a +removeAccountResult + = Data.ProtoLens.Field.field @"removeAccountResult" +removed :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "removed" a) => + Lens.Family2.LensLike' f s a +removed = Data.ProtoLens.Field.field @"removed" +requestId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "requestId" a) => + Lens.Family2.LensLike' f s a +requestId = Data.ProtoLens.Field.field @"requestId" +requestType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "requestType" a) => + Lens.Family2.LensLike' f s a +requestType = Data.ProtoLens.Field.field @"requestType" +requirePreTradeMidMarketMark :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "requirePreTradeMidMarketMark" a) => + Lens.Family2.LensLike' f s a +requirePreTradeMidMarketMark + = Data.ProtoLens.Field.field @"requirePreTradeMidMarketMark" +restoreAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "restoreAccount" a) => + Lens.Family2.LensLike' f s a +restoreAccount = Data.ProtoLens.Field.field @"restoreAccount" +restoreAccountResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "restoreAccountResult" a) => + Lens.Family2.LensLike' f s a +restoreAccountResult + = Data.ProtoLens.Field.field @"restoreAccountResult" +riskParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "riskParameters" a) => + Lens.Family2.LensLike' f s a +riskParameters = Data.ProtoLens.Field.field @"riskParameters" +riskServerInstance :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "riskServerInstance" a) => + Lens.Family2.LensLike' f s a +riskServerInstance + = Data.ProtoLens.Field.field @"riskServerInstance" +riskServerInstanceId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "riskServerInstanceId" a) => + Lens.Family2.LensLike' f s a +riskServerInstanceId + = Data.ProtoLens.Field.field @"riskServerInstanceId" +rootChainOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "rootChainOrderId" a) => + Lens.Family2.LensLike' f s a +rootChainOrderId = Data.ProtoLens.Field.field @"rootChainOrderId" +route :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "route" a) => + Lens.Family2.LensLike' f s a +route = Data.ProtoLens.Field.field @"route" +routeAlgoStrategies :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "routeAlgoStrategies" a) => + Lens.Family2.LensLike' f s a +routeAlgoStrategies + = Data.ProtoLens.Field.field @"routeAlgoStrategies" +routeClientOrderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "routeClientOrderId" a) => + Lens.Family2.LensLike' f s a +routeClientOrderId + = Data.ProtoLens.Field.field @"routeClientOrderId" +routeCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "routeCode" a) => + Lens.Family2.LensLike' f s a +routeCode = Data.ProtoLens.Field.field @"routeCode" +routeCodesToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "routeCodesToRemove" a) => + Lens.Family2.LensLike' f s a +routeCodesToRemove + = Data.ProtoLens.Field.field @"routeCodesToRemove" +routeInformation :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "routeInformation" a) => + Lens.Family2.LensLike' f s a +routeInformation = Data.ProtoLens.Field.field @"routeInformation" +routeName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "routeName" a) => + Lens.Family2.LensLike' f s a +routeName = Data.ProtoLens.Field.field @"routeName" +routes :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "routes" a) => + Lens.Family2.LensLike' f s a +routes = Data.ProtoLens.Field.field @"routes" +routesToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "routesToSet" a) => + Lens.Family2.LensLike' f s a +routesToSet = Data.ProtoLens.Field.field @"routesToSet" +salesSeriesId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "salesSeriesId" a) => + Lens.Family2.LensLike' f s a +salesSeriesId = Data.ProtoLens.Field.field @"salesSeriesId" +salesSeriesName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "salesSeriesName" a) => + Lens.Family2.LensLike' f s a +salesSeriesName = Data.ProtoLens.Field.field @"salesSeriesName" +salesSeriesNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "salesSeriesNumber" a) => + Lens.Family2.LensLike' f s a +salesSeriesNumber = Data.ProtoLens.Field.field @"salesSeriesNumber" +searchOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "searchOptions" a) => + Lens.Family2.LensLike' f s a +searchOptions = Data.ProtoLens.Field.field @"searchOptions" +securities :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "securities" a) => + Lens.Family2.LensLike' f s a +securities = Data.ProtoLens.Field.field @"securities" +senderLocationId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "senderLocationId" a) => + Lens.Family2.LensLike' f s a +senderLocationId = Data.ProtoLens.Field.field @"senderLocationId" +senderOperatorId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "senderOperatorId" a) => + Lens.Family2.LensLike' f s a +senderOperatorId = Data.ProtoLens.Field.field @"senderOperatorId" +serviceGroupAuthorizationLevel :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "serviceGroupAuthorizationLevel" a) => + Lens.Family2.LensLike' f s a +serviceGroupAuthorizationLevel + = Data.ProtoLens.Field.field @"serviceGroupAuthorizationLevel" +serviceGroupIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "serviceGroupIds" a) => + Lens.Family2.LensLike' f s a +serviceGroupIds = Data.ProtoLens.Field.field @"serviceGroupIds" +serviceGroupIdsToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "serviceGroupIdsToRemove" a) => + Lens.Family2.LensLike' f s a +serviceGroupIdsToRemove + = Data.ProtoLens.Field.field @"serviceGroupIdsToRemove" +serviceGroupIdsToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "serviceGroupIdsToSet" a) => + Lens.Family2.LensLike' f s a +serviceGroupIdsToSet + = Data.ProtoLens.Field.field @"serviceGroupIdsToSet" +serviceGroups :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "serviceGroups" a) => + Lens.Family2.LensLike' f s a +serviceGroups = Data.ProtoLens.Field.field @"serviceGroups" +settings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "settings" a) => + Lens.Family2.LensLike' f s a +settings = Data.ProtoLens.Field.field @"settings" +settlement :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "settlement" a) => + Lens.Family2.LensLike' f s a +settlement = Data.ProtoLens.Field.field @"settlement" +side :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "side" a) => + Lens.Family2.LensLike' f s a +side = Data.ProtoLens.Field.field @"side" +size :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "size" a) => + Lens.Family2.LensLike' f s a +size = Data.ProtoLens.Field.field @"size" +sizes :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "sizes" a) => + Lens.Family2.LensLike' f s a +sizes = Data.ProtoLens.Field.field @"sizes" +sourceAccountId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "sourceAccountId" a) => + Lens.Family2.LensLike' f s a +sourceAccountId = Data.ProtoLens.Field.field @"sourceAccountId" +speculationType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "speculationType" a) => + Lens.Family2.LensLike' f s a +speculationType = Data.ProtoLens.Field.field @"speculationType" +state :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "state" a) => + Lens.Family2.LensLike' f s a +state = Data.ProtoLens.Field.field @"state" +statementDate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "statementDate" a) => + Lens.Family2.LensLike' f s a +statementDate = Data.ProtoLens.Field.field @"statementDate" +statementOption :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "statementOption" a) => + Lens.Family2.LensLike' f s a +statementOption = Data.ProtoLens.Field.field @"statementOption" +status :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "status" a) => + Lens.Family2.LensLike' f s a +status = Data.ProtoLens.Field.field @"status" +stopPrice :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "stopPrice" a) => + Lens.Family2.LensLike' f s a +stopPrice = Data.ProtoLens.Field.field @"stopPrice" +strategyName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "strategyName" a) => + Lens.Family2.LensLike' f s a +strategyName = Data.ProtoLens.Field.field @"strategyName" +subAccountIdsToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "subAccountIdsToRemove" a) => + Lens.Family2.LensLike' f s a +subAccountIdsToRemove + = Data.ProtoLens.Field.field @"subAccountIdsToRemove" +subAccounts :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "subAccounts" a) => + Lens.Family2.LensLike' f s a +subAccounts = Data.ProtoLens.Field.field @"subAccounts" +subAccountsToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "subAccountsToSet" a) => + Lens.Family2.LensLike' f s a +subAccountsToSet = Data.ProtoLens.Field.field @"subAccountsToSet" +subClass :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "subClass" a) => + Lens.Family2.LensLike' f s a +subClass = Data.ProtoLens.Field.field @"subClass" +submittedUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "submittedUtcTime" a) => + Lens.Family2.LensLike' f s a +submittedUtcTime = Data.ProtoLens.Field.field @"submittedUtcTime" +suspensionTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "suspensionTime" a) => + Lens.Family2.LensLike' f s a +suspensionTime = Data.ProtoLens.Field.field @"suspensionTime" +symbol :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "symbol" a) => + Lens.Family2.LensLike' f s a +symbol = Data.ProtoLens.Field.field @"symbol" +sync :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "sync" a) => + Lens.Family2.LensLike' f s a +sync = Data.ProtoLens.Field.field @"sync" +syntheticStrategies :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "syntheticStrategies" a) => + Lens.Family2.LensLike' f s a +syntheticStrategies + = Data.ProtoLens.Field.field @"syntheticStrategies" +syntheticStrategyTreeRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "syntheticStrategyTreeRequest" a) => + Lens.Family2.LensLike' f s a +syntheticStrategyTreeRequest + = Data.ProtoLens.Field.field @"syntheticStrategyTreeRequest" +syntheticStrategyTreeResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "syntheticStrategyTreeResult" a) => + Lens.Family2.LensLike' f s a +syntheticStrategyTreeResult + = Data.ProtoLens.Field.field @"syntheticStrategyTreeResult" +textMessage :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "textMessage" a) => + Lens.Family2.LensLike' f s a +textMessage = Data.ProtoLens.Field.field @"textMessage" +theoTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "theoTicks" a) => + Lens.Family2.LensLike' f s a +theoTicks = Data.ProtoLens.Field.field @"theoTicks" +ticketNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "ticketNumber" a) => + Lens.Family2.LensLike' f s a +ticketNumber = Data.ProtoLens.Field.field @"ticketNumber" +top :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "top" a) => + Lens.Family2.LensLike' f s a +top = Data.ProtoLens.Field.field @"top" +totalEquity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "totalEquity" a) => + Lens.Family2.LensLike' f s a +totalEquity = Data.ProtoLens.Field.field @"totalEquity" +totalGrossOpenPositionLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "totalGrossOpenPositionLimit" a) => + Lens.Family2.LensLike' f s a +totalGrossOpenPositionLimit + = Data.ProtoLens.Field.field @"totalGrossOpenPositionLimit" +totalMargin :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "totalMargin" a) => + Lens.Family2.LensLike' f s a +totalMargin = Data.ProtoLens.Field.field @"totalMargin" +totalValue :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "totalValue" a) => + Lens.Family2.LensLike' f s a +totalValue = Data.ProtoLens.Field.field @"totalValue" +trackingNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "trackingNumber" a) => + Lens.Family2.LensLike' f s a +trackingNumber = Data.ProtoLens.Field.field @"trackingNumber" +tradableCommodity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradableCommodity" a) => + Lens.Family2.LensLike' f s a +tradableCommodity = Data.ProtoLens.Field.field @"tradableCommodity" +tradeDate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradeDate" a) => + Lens.Family2.LensLike' f s a +tradeDate = Data.ProtoLens.Field.field @"tradeDate" +tradeLocationId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradeLocationId" a) => + Lens.Family2.LensLike' f s a +tradeLocationId = Data.ProtoLens.Field.field @"tradeLocationId" +tradeMarginLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradeMarginLimit" a) => + Lens.Family2.LensLike' f s a +tradeMarginLimit = Data.ProtoLens.Field.field @"tradeMarginLimit" +tradePriceLimitPercent :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradePriceLimitPercent" a) => + Lens.Family2.LensLike' f s a +tradePriceLimitPercent + = Data.ProtoLens.Field.field @"tradePriceLimitPercent" +tradePriceLimitPercentContinuous :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradePriceLimitPercentContinuous" a) => + Lens.Family2.LensLike' f s a +tradePriceLimitPercentContinuous + = Data.ProtoLens.Field.field @"tradePriceLimitPercentContinuous" +tradePriceLimitPercentNonContinuous :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradePriceLimitPercentNonContinuous" a) => + Lens.Family2.LensLike' f s a +tradePriceLimitPercentNonContinuous + = Data.ProtoLens.Field.field @"tradePriceLimitPercentNonContinuous" +tradePriceLimitTicks :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradePriceLimitTicks" a) => + Lens.Family2.LensLike' f s a +tradePriceLimitTicks + = Data.ProtoLens.Field.field @"tradePriceLimitTicks" +tradePriceLimitTicksContinuous :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradePriceLimitTicksContinuous" a) => + Lens.Family2.LensLike' f s a +tradePriceLimitTicksContinuous + = Data.ProtoLens.Field.field @"tradePriceLimitTicksContinuous" +tradePriceLimitTicksNonContinuous :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradePriceLimitTicksNonContinuous" a) => + Lens.Family2.LensLike' f s a +tradePriceLimitTicksNonContinuous + = Data.ProtoLens.Field.field @"tradePriceLimitTicksNonContinuous" +tradeSizeLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradeSizeLimit" a) => + Lens.Family2.LensLike' f s a +tradeSizeLimit = Data.ProtoLens.Field.field @"tradeSizeLimit" +tradeSizeLimitWithModes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradeSizeLimitWithModes" a) => + Lens.Family2.LensLike' f s a +tradeSizeLimitWithModes + = Data.ProtoLens.Field.field @"tradeSizeLimitWithModes" +tradeUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradeUtcTime" a) => + Lens.Family2.LensLike' f s a +tradeUtcTime = Data.ProtoLens.Field.field @"tradeUtcTime" +tradingExpression :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradingExpression" a) => + Lens.Family2.LensLike' f s a +tradingExpression = Data.ProtoLens.Field.field @"tradingExpression" +tradingInterfaceElementIdsToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradingInterfaceElementIdsToRemove" a) => + Lens.Family2.LensLike' f s a +tradingInterfaceElementIdsToRemove + = Data.ProtoLens.Field.field @"tradingInterfaceElementIdsToRemove" +tradingInterfaceElementsToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradingInterfaceElementsToSet" a) => + Lens.Family2.LensLike' f s a +tradingInterfaceElementsToSet + = Data.ProtoLens.Field.field @"tradingInterfaceElementsToSet" +tradingTimeFrom :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradingTimeFrom" a) => + Lens.Family2.LensLike' f s a +tradingTimeFrom = Data.ProtoLens.Field.field @"tradingTimeFrom" +tradingTimeTo :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradingTimeTo" a) => + Lens.Family2.LensLike' f s a +tradingTimeTo = Data.ProtoLens.Field.field @"tradingTimeTo" +tradingTimeZone :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "tradingTimeZone" a) => + Lens.Family2.LensLike' f s a +tradingTimeZone = Data.ProtoLens.Field.field @"tradingTimeZone" +trailType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "trailType" a) => + Lens.Family2.LensLike' f s a +trailType = Data.ProtoLens.Field.field @"trailType" +trailing :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "trailing" a) => + Lens.Family2.LensLike' f s a +trailing = Data.ProtoLens.Field.field @"trailing" +transId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "transId" a) => + Lens.Family2.LensLike' f s a +transId = Data.ProtoLens.Field.field @"transId" +transUtcTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "transUtcTime" a) => + Lens.Family2.LensLike' f s a +transUtcTime = Data.ProtoLens.Field.field @"transUtcTime" +transactionStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "transactionStatus" a) => + Lens.Family2.LensLike' f s a +transactionStatus = Data.ProtoLens.Field.field @"transactionStatus" +transformMifidAlgoCqgToClientAlgo :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "transformMifidAlgoCqgToClientAlgo" a) => + Lens.Family2.LensLike' f s a +transformMifidAlgoCqgToClientAlgo + = Data.ProtoLens.Field.field @"transformMifidAlgoCqgToClientAlgo" +triggerSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "triggerSize" a) => + Lens.Family2.LensLike' f s a +triggerSize = Data.ProtoLens.Field.field @"triggerSize" +triggerType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "triggerType" a) => + Lens.Family2.LensLike' f s a +triggerType = Data.ProtoLens.Field.field @"triggerType" +type' :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "type'" a) => + Lens.Family2.LensLike' f s a +type' = Data.ProtoLens.Field.field @"type'" +typeId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "typeId" a) => + Lens.Family2.LensLike' f s a +typeId = Data.ProtoLens.Field.field @"typeId" +updateAccount :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccount" a) => + Lens.Family2.LensLike' f s a +updateAccount = Data.ProtoLens.Field.field @"updateAccount" +updateAccountGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountGroup" a) => + Lens.Family2.LensLike' f s a +updateAccountGroup + = Data.ProtoLens.Field.field @"updateAccountGroup" +updateAccountMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountMarketLimits" a) => + Lens.Family2.LensLike' f s a +updateAccountMarketLimits + = Data.ProtoLens.Field.field @"updateAccountMarketLimits" +updateAccountMarketLimitsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountMarketLimitsResult" a) => + Lens.Family2.LensLike' f s a +updateAccountMarketLimitsResult + = Data.ProtoLens.Field.field @"updateAccountMarketLimitsResult" +updateAccountResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountResult" a) => + Lens.Family2.LensLike' f s a +updateAccountResult + = Data.ProtoLens.Field.field @"updateAccountResult" +updateAccountRiskParameters :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountRiskParameters" a) => + Lens.Family2.LensLike' f s a +updateAccountRiskParameters + = Data.ProtoLens.Field.field @"updateAccountRiskParameters" +updateAccountRiskParametersResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountRiskParametersResult" a) => + Lens.Family2.LensLike' f s a +updateAccountRiskParametersResult + = Data.ProtoLens.Field.field @"updateAccountRiskParametersResult" +updateAccountRouteList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountRouteList" a) => + Lens.Family2.LensLike' f s a +updateAccountRouteList + = Data.ProtoLens.Field.field @"updateAccountRouteList" +updateAccountRouteListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountRouteListResult" a) => + Lens.Family2.LensLike' f s a +updateAccountRouteListResult + = Data.ProtoLens.Field.field @"updateAccountRouteListResult" +updateAccountServiceGroupList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountServiceGroupList" a) => + Lens.Family2.LensLike' f s a +updateAccountServiceGroupList + = Data.ProtoLens.Field.field @"updateAccountServiceGroupList" +updateAccountServiceGroupListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountServiceGroupListResult" a) => + Lens.Family2.LensLike' f s a +updateAccountServiceGroupListResult + = Data.ProtoLens.Field.field @"updateAccountServiceGroupListResult" +updateAccountSettings :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountSettings" a) => + Lens.Family2.LensLike' f s a +updateAccountSettings + = Data.ProtoLens.Field.field @"updateAccountSettings" +updateAccountSettingsResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountSettingsResult" a) => + Lens.Family2.LensLike' f s a +updateAccountSettingsResult + = Data.ProtoLens.Field.field @"updateAccountSettingsResult" +updateAccountTradingFeatures :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountTradingFeatures" a) => + Lens.Family2.LensLike' f s a +updateAccountTradingFeatures + = Data.ProtoLens.Field.field @"updateAccountTradingFeatures" +updateAccountTypeOverrideList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountTypeOverrideList" a) => + Lens.Family2.LensLike' f s a +updateAccountTypeOverrideList + = Data.ProtoLens.Field.field @"updateAccountTypeOverrideList" +updateAccountTypeOverrideListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountTypeOverrideListResult" a) => + Lens.Family2.LensLike' f s a +updateAccountTypeOverrideListResult + = Data.ProtoLens.Field.field @"updateAccountTypeOverrideListResult" +updateAccountUserAuthorizationList :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountUserAuthorizationList" a) => + Lens.Family2.LensLike' f s a +updateAccountUserAuthorizationList + = Data.ProtoLens.Field.field @"updateAccountUserAuthorizationList" +updateAccountUserAuthorizationListResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateAccountUserAuthorizationListResult" a) => + Lens.Family2.LensLike' f s a +updateAccountUserAuthorizationListResult + = Data.ProtoLens.Field.field + @"updateAccountUserAuthorizationListResult" +updateBalanceRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateBalanceRecord" a) => + Lens.Family2.LensLike' f s a +updateBalanceRecord + = Data.ProtoLens.Field.field @"updateBalanceRecord" +updateBalanceRecordResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateBalanceRecordResult" a) => + Lens.Family2.LensLike' f s a +updateBalanceRecordResult + = Data.ProtoLens.Field.field @"updateBalanceRecordResult" +updateRiskParametersResult :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateRiskParametersResult" a) => + Lens.Family2.LensLike' f s a +updateRiskParametersResult + = Data.ProtoLens.Field.field @"updateRiskParametersResult" +updateTime :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "updateTime" a) => + Lens.Family2.LensLike' f s a +updateTime = Data.ProtoLens.Field.field @"updateTime" +usMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "usMarketLimits" a) => + Lens.Family2.LensLike' f s a +usMarketLimits = Data.ProtoLens.Field.field @"usMarketLimits" +useBbaNovUpl :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "useBbaNovUpl" a) => + Lens.Family2.LensLike' f s a +useBbaNovUpl = Data.ProtoLens.Field.field @"useBbaNovUpl" +useBbaOte :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "useBbaOte" a) => + Lens.Family2.LensLike' f s a +useBbaOte = Data.ProtoLens.Field.field @"useBbaOte" +useBrokerageMarginsOnly :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "useBrokerageMarginsOnly" a) => + Lens.Family2.LensLike' f s a +useBrokerageMarginsOnly + = Data.ProtoLens.Field.field @"useBrokerageMarginsOnly" +useIntradayCurrencyRate :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "useIntradayCurrencyRate" a) => + Lens.Family2.LensLike' f s a +useIntradayCurrencyRate + = Data.ProtoLens.Field.field @"useIntradayCurrencyRate" +useTheoPrices :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "useTheoPrices" a) => + Lens.Family2.LensLike' f s a +useTheoPrices = Data.ProtoLens.Field.field @"useTheoPrices" +userAttributes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "userAttributes" a) => + Lens.Family2.LensLike' f s a +userAttributes = Data.ProtoLens.Field.field @"userAttributes" +userId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "userId" a) => + Lens.Family2.LensLike' f s a +userId = Data.ProtoLens.Field.field @"userId" +userInfo :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "userInfo" a) => + Lens.Family2.LensLike' f s a +userInfo = Data.ProtoLens.Field.field @"userInfo" +userName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "userName" a) => + Lens.Family2.LensLike' f s a +userName = Data.ProtoLens.Field.field @"userName" +value :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "value" a) => + Lens.Family2.LensLike' f s a +value = Data.ProtoLens.Field.field @"value" +vec'accountAndUserInfo :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'accountAndUserInfo" a) => + Lens.Family2.LensLike' f s a +vec'accountAndUserInfo + = Data.ProtoLens.Field.field @"vec'accountAndUserInfo" +vec'accountRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'accountRecord" a) => + Lens.Family2.LensLike' f s a +vec'accountRecord = Data.ProtoLens.Field.field @"vec'accountRecord" +vec'accountRouteRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'accountRouteRecord" a) => + Lens.Family2.LensLike' f s a +vec'accountRouteRecord + = Data.ProtoLens.Field.field @"vec'accountRouteRecord" +vec'accountTradingInterfaceElements :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'accountTradingInterfaceElements" a) => + Lens.Family2.LensLike' f s a +vec'accountTradingInterfaceElements + = Data.ProtoLens.Field.field @"vec'accountTradingInterfaceElements" +vec'accountUserLink :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'accountUserLink" a) => + Lens.Family2.LensLike' f s a +vec'accountUserLink + = Data.ProtoLens.Field.field @"vec'accountUserLink" +vec'accounts :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'accounts" a) => + Lens.Family2.LensLike' f s a +vec'accounts = Data.ProtoLens.Field.field @"vec'accounts" +vec'algoStrategiesWhitelist :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'algoStrategiesWhitelist" a) => + Lens.Family2.LensLike' f s a +vec'algoStrategiesWhitelist + = Data.ProtoLens.Field.field @"vec'algoStrategiesWhitelist" +vec'allowedLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'allowedLimits" a) => + Lens.Family2.LensLike' f s a +vec'allowedLimits = Data.ProtoLens.Field.field @"vec'allowedLimits" +vec'allowedToTradeCommodities :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'allowedToTradeCommodities" a) => + Lens.Family2.LensLike' f s a +vec'allowedToTradeCommodities + = Data.ProtoLens.Field.field @"vec'allowedToTradeCommodities" +vec'allowedToTradeContracts :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'allowedToTradeContracts" a) => + Lens.Family2.LensLike' f s a +vec'allowedToTradeContracts + = Data.ProtoLens.Field.field @"vec'allowedToTradeContracts" +vec'attributes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'attributes" a) => + Lens.Family2.LensLike' f s a +vec'attributes = Data.ProtoLens.Field.field @"vec'attributes" +vec'balanceRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'balanceRecord" a) => + Lens.Family2.LensLike' f s a +vec'balanceRecord = Data.ProtoLens.Field.field @"vec'balanceRecord" +vec'billableExchanges :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'billableExchanges" a) => + Lens.Family2.LensLike' f s a +vec'billableExchanges + = Data.ProtoLens.Field.field @"vec'billableExchanges" +vec'children :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'children" a) => + Lens.Family2.LensLike' f s a +vec'children = Data.ProtoLens.Field.field @"vec'children" +vec'clearedFields :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'clearedFields" a) => + Lens.Family2.LensLike' f s a +vec'clearedFields = Data.ProtoLens.Field.field @"vec'clearedFields" +vec'clientExtraValues :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'clientExtraValues" a) => + Lens.Family2.LensLike' f s a +vec'clientExtraValues + = Data.ProtoLens.Field.field @"vec'clientExtraValues" +vec'commodityMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'commodityMarketLimits" a) => + Lens.Family2.LensLike' f s a +vec'commodityMarketLimits + = Data.ProtoLens.Field.field @"vec'commodityMarketLimits" +vec'contractPosition :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'contractPosition" a) => + Lens.Family2.LensLike' f s a +vec'contractPosition + = Data.ProtoLens.Field.field @"vec'contractPosition" +vec'exchangeExtraValues :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'exchangeExtraValues" a) => + Lens.Family2.LensLike' f s a +vec'exchangeExtraValues + = Data.ProtoLens.Field.field @"vec'exchangeExtraValues" +vec'exchangeGroup :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'exchangeGroup" a) => + Lens.Family2.LensLike' f s a +vec'exchangeGroup = Data.ProtoLens.Field.field @"vec'exchangeGroup" +vec'exchangeMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'exchangeMarketLimits" a) => + Lens.Family2.LensLike' f s a +vec'exchangeMarketLimits + = Data.ProtoLens.Field.field @"vec'exchangeMarketLimits" +vec'execInstruction :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'execInstruction" a) => + Lens.Family2.LensLike' f s a +vec'execInstruction + = Data.ProtoLens.Field.field @"vec'execInstruction" +vec'expirationLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'expirationLimit" a) => + Lens.Family2.LensLike' f s a +vec'expirationLimit + = Data.ProtoLens.Field.field @"vec'expirationLimit" +vec'fillExtraValues :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'fillExtraValues" a) => + Lens.Family2.LensLike' f s a +vec'fillExtraValues + = Data.ProtoLens.Field.field @"vec'fillExtraValues" +vec'fungibleCommodity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'fungibleCommodity" a) => + Lens.Family2.LensLike' f s a +vec'fungibleCommodity + = Data.ProtoLens.Field.field @"vec'fungibleCommodity" +vec'hedgeExecInstruction :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'hedgeExecInstruction" a) => + Lens.Family2.LensLike' f s a +vec'hedgeExecInstruction + = Data.ProtoLens.Field.field @"vec'hedgeExecInstruction" +vec'instrumentMarketLimits :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'instrumentMarketLimits" a) => + Lens.Family2.LensLike' f s a +vec'instrumentMarketLimits + = Data.ProtoLens.Field.field @"vec'instrumentMarketLimits" +vec'instrumentType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'instrumentType" a) => + Lens.Family2.LensLike' f s a +vec'instrumentType + = Data.ProtoLens.Field.field @"vec'instrumentType" +vec'instrumentTypeId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'instrumentTypeId" a) => + Lens.Family2.LensLike' f s a +vec'instrumentTypeId + = Data.ProtoLens.Field.field @"vec'instrumentTypeId" +vec'legFills :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'legFills" a) => + Lens.Family2.LensLike' f s a +vec'legFills = Data.ProtoLens.Field.field @"vec'legFills" +vec'legs :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'legs" a) => + Lens.Family2.LensLike' f s a +vec'legs = Data.ProtoLens.Field.field @"vec'legs" +vec'linksToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'linksToRemove" a) => + Lens.Family2.LensLike' f s a +vec'linksToRemove = Data.ProtoLens.Field.field @"vec'linksToRemove" +vec'linksToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'linksToSet" a) => + Lens.Family2.LensLike' f s a +vec'linksToSet = Data.ProtoLens.Field.field @"vec'linksToSet" +vec'modesAccountGroups :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'modesAccountGroups" a) => + Lens.Family2.LensLike' f s a +vec'modesAccountGroups + = Data.ProtoLens.Field.field @"vec'modesAccountGroups" +vec'obsoleteAccountClusterPriceOffsets :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'obsoleteAccountClusterPriceOffsets" a) => + Lens.Family2.LensLike' f s a +vec'obsoleteAccountClusterPriceOffsets + = Data.ProtoLens.Field.field + @"vec'obsoleteAccountClusterPriceOffsets" +vec'obsoleteExpirationLimit :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'obsoleteExpirationLimit" a) => + Lens.Family2.LensLike' f s a +vec'obsoleteExpirationLimit + = Data.ProtoLens.Field.field @"vec'obsoleteExpirationLimit" +vec'obsoleteSearchCriteria :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'obsoleteSearchCriteria" a) => + Lens.Family2.LensLike' f s a +vec'obsoleteSearchCriteria + = Data.ProtoLens.Field.field @"vec'obsoleteSearchCriteria" +vec'obsoleteTradableCommodityId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'obsoleteTradableCommodityId" a) => + Lens.Family2.LensLike' f s a +vec'obsoleteTradableCommodityId + = Data.ProtoLens.Field.field @"vec'obsoleteTradableCommodityId" +vec'offsetsToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'offsetsToRemove" a) => + Lens.Family2.LensLike' f s a +vec'offsetsToRemove + = Data.ProtoLens.Field.field @"vec'offsetsToRemove" +vec'offsetsToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'offsetsToSet" a) => + Lens.Family2.LensLike' f s a +vec'offsetsToSet = Data.ProtoLens.Field.field @"vec'offsetsToSet" +vec'omnibusAccounts :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'omnibusAccounts" a) => + Lens.Family2.LensLike' f s a +vec'omnibusAccounts + = Data.ProtoLens.Field.field @"vec'omnibusAccounts" +vec'openPosition :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'openPosition" a) => + Lens.Family2.LensLike' f s a +vec'openPosition = Data.ProtoLens.Field.field @"vec'openPosition" +vec'orderClasses :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'orderClasses" a) => + Lens.Family2.LensLike' f s a +vec'orderClasses = Data.ProtoLens.Field.field @"vec'orderClasses" +vec'orderFill :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'orderFill" a) => + Lens.Family2.LensLike' f s a +vec'orderFill = Data.ProtoLens.Field.field @"vec'orderFill" +vec'orderRecord :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'orderRecord" a) => + Lens.Family2.LensLike' f s a +vec'orderRecord = Data.ProtoLens.Field.field @"vec'orderRecord" +vec'orderRequest :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'orderRequest" a) => + Lens.Family2.LensLike' f s a +vec'orderRequest = Data.ProtoLens.Field.field @"vec'orderRequest" +vec'overrides :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'overrides" a) => + Lens.Family2.LensLike' f s a +vec'overrides = Data.ProtoLens.Field.field @"vec'overrides" +vec'overridesToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'overridesToRemove" a) => + Lens.Family2.LensLike' f s a +vec'overridesToRemove + = Data.ProtoLens.Field.field @"vec'overridesToRemove" +vec'overridesToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'overridesToSet" a) => + Lens.Family2.LensLike' f s a +vec'overridesToSet + = Data.ProtoLens.Field.field @"vec'overridesToSet" +vec'positionIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'positionIds" a) => + Lens.Family2.LensLike' f s a +vec'positionIds = Data.ProtoLens.Field.field @"vec'positionIds" +vec'routeAlgoStrategies :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'routeAlgoStrategies" a) => + Lens.Family2.LensLike' f s a +vec'routeAlgoStrategies + = Data.ProtoLens.Field.field @"vec'routeAlgoStrategies" +vec'routeCodesToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'routeCodesToRemove" a) => + Lens.Family2.LensLike' f s a +vec'routeCodesToRemove + = Data.ProtoLens.Field.field @"vec'routeCodesToRemove" +vec'routes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'routes" a) => + Lens.Family2.LensLike' f s a +vec'routes = Data.ProtoLens.Field.field @"vec'routes" +vec'routesToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'routesToSet" a) => + Lens.Family2.LensLike' f s a +vec'routesToSet = Data.ProtoLens.Field.field @"vec'routesToSet" +vec'searchOptions :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'searchOptions" a) => + Lens.Family2.LensLike' f s a +vec'searchOptions = Data.ProtoLens.Field.field @"vec'searchOptions" +vec'serviceGroupIds :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'serviceGroupIds" a) => + Lens.Family2.LensLike' f s a +vec'serviceGroupIds + = Data.ProtoLens.Field.field @"vec'serviceGroupIds" +vec'serviceGroupIdsToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'serviceGroupIdsToRemove" a) => + Lens.Family2.LensLike' f s a +vec'serviceGroupIdsToRemove + = Data.ProtoLens.Field.field @"vec'serviceGroupIdsToRemove" +vec'serviceGroupIdsToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'serviceGroupIdsToSet" a) => + Lens.Family2.LensLike' f s a +vec'serviceGroupIdsToSet + = Data.ProtoLens.Field.field @"vec'serviceGroupIdsToSet" +vec'serviceGroups :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'serviceGroups" a) => + Lens.Family2.LensLike' f s a +vec'serviceGroups = Data.ProtoLens.Field.field @"vec'serviceGroups" +vec'subAccountIdsToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'subAccountIdsToRemove" a) => + Lens.Family2.LensLike' f s a +vec'subAccountIdsToRemove + = Data.ProtoLens.Field.field @"vec'subAccountIdsToRemove" +vec'subAccounts :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'subAccounts" a) => + Lens.Family2.LensLike' f s a +vec'subAccounts = Data.ProtoLens.Field.field @"vec'subAccounts" +vec'subAccountsToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'subAccountsToSet" a) => + Lens.Family2.LensLike' f s a +vec'subAccountsToSet + = Data.ProtoLens.Field.field @"vec'subAccountsToSet" +vec'tradableCommodity :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'tradableCommodity" a) => + Lens.Family2.LensLike' f s a +vec'tradableCommodity + = Data.ProtoLens.Field.field @"vec'tradableCommodity" +vec'tradingInterfaceElementIdsToRemove :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'tradingInterfaceElementIdsToRemove" a) => + Lens.Family2.LensLike' f s a +vec'tradingInterfaceElementIdsToRemove + = Data.ProtoLens.Field.field + @"vec'tradingInterfaceElementIdsToRemove" +vec'tradingInterfaceElementsToSet :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'tradingInterfaceElementsToSet" a) => + Lens.Family2.LensLike' f s a +vec'tradingInterfaceElementsToSet + = Data.ProtoLens.Field.field @"vec'tradingInterfaceElementsToSet" +vec'transactionStatus :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'transactionStatus" a) => + Lens.Family2.LensLike' f s a +vec'transactionStatus + = Data.ProtoLens.Field.field @"vec'transactionStatus" +vec'userAttributes :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'userAttributes" a) => + Lens.Family2.LensLike' f s a +vec'userAttributes + = Data.ProtoLens.Field.field @"vec'userAttributes" +vec'yieldModel :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'yieldModel" a) => + Lens.Family2.LensLike' f s a +vec'yieldModel = Data.ProtoLens.Field.field @"vec'yieldModel" +visibleSize :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "visibleSize" a) => + Lens.Family2.LensLike' f s a +visibleSize = Data.ProtoLens.Field.field @"visibleSize" +yieldModel :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "yieldModel" a) => + Lens.Family2.LensLike' f s a +yieldModel = Data.ProtoLens.Field.field @"yieldModel" +zeroBalance :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "zeroBalance" a) => + Lens.Family2.LensLike' f s a +zeroBalance = Data.ProtoLens.Field.field @"zeroBalance" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/Common/Decimal.hs b/cqg-cms-api-proto/src/Proto/Common/Decimal.hs new file mode 100644 index 0000000..8dea43e --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/Common/Decimal.hs @@ -0,0 +1,258 @@ +{- This file was auto-generated from common/decimal.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.Common.Decimal ( + Decimal() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +{- | Fields : + + * 'Proto.Common.Decimal_Fields.significand' @:: Lens' Decimal Data.Int.Int64@ + * 'Proto.Common.Decimal_Fields.maybe'significand' @:: Lens' Decimal (Prelude.Maybe Data.Int.Int64)@ + * 'Proto.Common.Decimal_Fields.exponent' @:: Lens' Decimal Data.Int.Int32@ + * 'Proto.Common.Decimal_Fields.maybe'exponent' @:: Lens' Decimal (Prelude.Maybe Data.Int.Int32)@ -} +data Decimal + = Decimal'_constructor {_Decimal'significand :: !(Prelude.Maybe Data.Int.Int64), + _Decimal'exponent :: !(Prelude.Maybe Data.Int.Int32), + _Decimal'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Decimal where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Decimal "significand" Data.Int.Int64 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Decimal'significand + (\ x__ y__ -> x__ {_Decimal'significand = y__})) + (Data.ProtoLens.maybeLens 0) +instance Data.ProtoLens.Field.HasField Decimal "maybe'significand" (Prelude.Maybe Data.Int.Int64) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Decimal'significand + (\ x__ y__ -> x__ {_Decimal'significand = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Decimal "exponent" Data.Int.Int32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Decimal'exponent (\ x__ y__ -> x__ {_Decimal'exponent = y__})) + (Data.ProtoLens.maybeLens 0) +instance Data.ProtoLens.Field.HasField Decimal "maybe'exponent" (Prelude.Maybe Data.Int.Int32) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Decimal'exponent (\ x__ y__ -> x__ {_Decimal'exponent = y__})) + Prelude.id +instance Data.ProtoLens.Message Decimal where + messageName _ = Data.Text.pack "cqg.Decimal" + packedMessageDescriptor _ + = "\n\ + \\aDecimal\DC2#\n\ + \\vsignificand\CAN\SOH \SOH(\DC2:\SOH0R\vsignificand\DC2\GS\n\ + \\bexponent\CAN\STX \SOH(\DC1:\SOH0R\bexponent" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + significand__field_descriptor + = Data.ProtoLens.FieldDescriptor + "significand" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt64Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'significand")) :: + Data.ProtoLens.FieldDescriptor Decimal + exponent__field_descriptor + = Data.ProtoLens.FieldDescriptor + "exponent" + (Data.ProtoLens.ScalarField Data.ProtoLens.SInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'exponent")) :: + Data.ProtoLens.FieldDescriptor Decimal + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, significand__field_descriptor), + (Data.ProtoLens.Tag 2, exponent__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Decimal'_unknownFields + (\ x__ y__ -> x__ {_Decimal'_unknownFields = y__}) + defMessage + = Decimal'_constructor + {_Decimal'significand = Prelude.Nothing, + _Decimal'exponent = Prelude.Nothing, _Decimal'_unknownFields = []} + parseMessage + = let + loop :: Decimal -> Data.ProtoLens.Encoding.Bytes.Parser Decimal + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt64 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "significand" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"significand") y x) + 16 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Data.ProtoLens.Encoding.Bytes.wordToSignedInt32 + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt)) + "exponent" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"exponent") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "Decimal" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'significand") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt64ToWord _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'exponent") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 16) + ((Prelude..) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral) + Data.ProtoLens.Encoding.Bytes.signedInt32ToWord _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData Decimal where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Decimal'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Decimal'significand x__) + (Control.DeepSeq.deepseq (_Decimal'exponent x__) ())) +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\DC4common/decimal.proto\DC2\ETXcqg\"M\n\ + \\aDecimal\DC2#\n\ + \\vsignificand\CAN\SOH \SOH(\DC2:\SOH0R\vsignificand\DC2\GS\n\ + \\bexponent\CAN\STX \SOH(\DC1:\SOH0R\bexponentB\SOB\fDecimalProtoJ\231\EOT\n\ + \\ACK\DC2\EOT\STX\NUL\DC2\SOH\n\ + \.\n\ + \\SOH\f\DC2\ETX\STX\NUL\DC22$ Representation of a decimal number\n\ + \\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\EOT\NUL\f\n\ + \\b\n\ + \\SOH\b\DC2\ETX\ACK\NUL-\n\ + \\t\n\ + \\STX\b\b\DC2\ETX\ACK\NUL-\n\ + \\190\SOH\n\ + \\STX\EOT\NUL\DC2\EOT\v\NUL\DC2\SOH\SUB\177\SOH Number is represented as a decimal floating point significand (limited by 64 bits including sign)\n\ + \ and 32-bit exponent.\n\ + \ The value represented is significand * (10 ^ exponent)\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\v\b\SI\n\ + \p\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX\SO\STX0\SUBc Significand (aka mantissa) of the decimal. Signed.\n\ + \ It can have trailing zeros (not normalized).\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX\SO\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\SO\v\DC1\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\SO\DC2\GS\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\SO !\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\b\DC2\ETX\SO\"/\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\a\DC2\ETX\SO-.\n\ + \'\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX\DC1\STX-\SUB\SUB Exponent of the decimal.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX\DC1\STX\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX\DC1\v\DC1\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\DC1\DC2\SUB\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\DC1\GS\RS\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\b\DC2\ETX\DC1\US,\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\a\DC2\ETX\DC1*+" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/Common/Decimal_Fields.hs b/cqg-cms-api-proto/src/Proto/Common/Decimal_Fields.hs new file mode 100644 index 0000000..88d485a --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/Common/Decimal_Fields.hs @@ -0,0 +1,53 @@ +{- This file was auto-generated from common/decimal.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.Common.Decimal_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +exponent :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "exponent" a) => + Lens.Family2.LensLike' f s a +exponent = Data.ProtoLens.Field.field @"exponent" +maybe'exponent :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'exponent" a) => + Lens.Family2.LensLike' f s a +maybe'exponent = Data.ProtoLens.Field.field @"maybe'exponent" +maybe'significand :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'significand" a) => + Lens.Family2.LensLike' f s a +maybe'significand = Data.ProtoLens.Field.field @"maybe'significand" +significand :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "significand" a) => + Lens.Family2.LensLike' f s a +significand = Data.ProtoLens.Field.field @"significand" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/Common/Shared1.hs b/cqg-cms-api-proto/src/Proto/Common/Shared1.hs new file mode 100644 index 0000000..691e725 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/Common/Shared1.hs @@ -0,0 +1,4355 @@ +{- This file was auto-generated from common/shared_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.Common.Shared1 ( + ApplePushNotif(), Destination(), EmailFromProfileNotif(), + EmailNotif(), Entitlement(), Entitlement'EntitlementType(..), + Entitlement'EntitlementType(), EntitlementReport(), + EntitlementRequest(), GooglePushNotif(), NamedValue(), + NotificationProperty(), OrderStatus(), OrderStatus'Status(..), + OrderStatus'Status(), SignOnRequest(), SignOnResult(), + SignOnResult'ResultCode(..), SignOnResult'ResultCode(), SmsNotif(), + SmsToPhoneFromProfileNotif(), Text(), TransactionStatus(), + TransactionStatus'Status(..), TransactionStatus'Status() + ) where +import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +{- | Fields : + + * 'Proto.Common.Shared1_Fields.deviceToken' @:: Lens' ApplePushNotif Data.Text.Text@ + * 'Proto.Common.Shared1_Fields.appId' @:: Lens' ApplePushNotif Data.Text.Text@ -} +data ApplePushNotif + = ApplePushNotif'_constructor {_ApplePushNotif'deviceToken :: !Data.Text.Text, + _ApplePushNotif'appId :: !Data.Text.Text, + _ApplePushNotif'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show ApplePushNotif where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField ApplePushNotif "deviceToken" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApplePushNotif'deviceToken + (\ x__ y__ -> x__ {_ApplePushNotif'deviceToken = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField ApplePushNotif "appId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _ApplePushNotif'appId + (\ x__ y__ -> x__ {_ApplePushNotif'appId = y__})) + Prelude.id +instance Data.ProtoLens.Message ApplePushNotif where + messageName _ = Data.Text.pack "shared_1.ApplePushNotif" + packedMessageDescriptor _ + = "\n\ + \\SOApplePushNotif\DC2!\n\ + \\fdevice_token\CAN\SOH \STX(\tR\vdeviceToken\DC2\NAK\n\ + \\ACKapp_id\CAN\STX \STX(\tR\ENQappId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + deviceToken__field_descriptor + = Data.ProtoLens.FieldDescriptor + "device_token" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"deviceToken")) :: + Data.ProtoLens.FieldDescriptor ApplePushNotif + appId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "app_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"appId")) :: + Data.ProtoLens.FieldDescriptor ApplePushNotif + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, deviceToken__field_descriptor), + (Data.ProtoLens.Tag 2, appId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _ApplePushNotif'_unknownFields + (\ x__ y__ -> x__ {_ApplePushNotif'_unknownFields = y__}) + defMessage + = ApplePushNotif'_constructor + {_ApplePushNotif'deviceToken = Data.ProtoLens.fieldDefault, + _ApplePushNotif'appId = Data.ProtoLens.fieldDefault, + _ApplePushNotif'_unknownFields = []} + parseMessage + = let + loop :: + ApplePushNotif + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser ApplePushNotif + loop x required'appId required'deviceToken + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'appId then (:) "app_id" else Prelude.id) + ((if required'deviceToken then (:) "device_token" else Prelude.id) + []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "device_token" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"deviceToken") y x) + required'appId Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "app_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"appId") y x) + Prelude.False required'deviceToken + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'appId required'deviceToken + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "ApplePushNotif" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"deviceToken") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"appId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData ApplePushNotif where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_ApplePushNotif'_unknownFields x__) + (Control.DeepSeq.deepseq + (_ApplePushNotif'deviceToken x__) + (Control.DeepSeq.deepseq (_ApplePushNotif'appId x__) ())) +{- | Fields : + + * 'Proto.Common.Shared1_Fields.description' @:: Lens' Destination Data.Text.Text@ + * 'Proto.Common.Shared1_Fields.maybe'description' @:: Lens' Destination (Prelude.Maybe Data.Text.Text)@ + * 'Proto.Common.Shared1_Fields.applePushNotif' @:: Lens' Destination ApplePushNotif@ + * 'Proto.Common.Shared1_Fields.maybe'applePushNotif' @:: Lens' Destination (Prelude.Maybe ApplePushNotif)@ + * 'Proto.Common.Shared1_Fields.googlePushNotif' @:: Lens' Destination GooglePushNotif@ + * 'Proto.Common.Shared1_Fields.maybe'googlePushNotif' @:: Lens' Destination (Prelude.Maybe GooglePushNotif)@ + * 'Proto.Common.Shared1_Fields.emailNotif' @:: Lens' Destination EmailNotif@ + * 'Proto.Common.Shared1_Fields.maybe'emailNotif' @:: Lens' Destination (Prelude.Maybe EmailNotif)@ + * 'Proto.Common.Shared1_Fields.profileEmailNotif' @:: Lens' Destination EmailFromProfileNotif@ + * 'Proto.Common.Shared1_Fields.maybe'profileEmailNotif' @:: Lens' Destination (Prelude.Maybe EmailFromProfileNotif)@ + * 'Proto.Common.Shared1_Fields.smsNotif' @:: Lens' Destination SmsNotif@ + * 'Proto.Common.Shared1_Fields.maybe'smsNotif' @:: Lens' Destination (Prelude.Maybe SmsNotif)@ + * 'Proto.Common.Shared1_Fields.profileSmsNotif' @:: Lens' Destination SmsToPhoneFromProfileNotif@ + * 'Proto.Common.Shared1_Fields.maybe'profileSmsNotif' @:: Lens' Destination (Prelude.Maybe SmsToPhoneFromProfileNotif)@ -} +data Destination + = Destination'_constructor {_Destination'description :: !(Prelude.Maybe Data.Text.Text), + _Destination'applePushNotif :: !(Prelude.Maybe ApplePushNotif), + _Destination'googlePushNotif :: !(Prelude.Maybe GooglePushNotif), + _Destination'emailNotif :: !(Prelude.Maybe EmailNotif), + _Destination'profileEmailNotif :: !(Prelude.Maybe EmailFromProfileNotif), + _Destination'smsNotif :: !(Prelude.Maybe SmsNotif), + _Destination'profileSmsNotif :: !(Prelude.Maybe SmsToPhoneFromProfileNotif), + _Destination'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Destination where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Destination "description" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'description + (\ x__ y__ -> x__ {_Destination'description = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Destination "maybe'description" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'description + (\ x__ y__ -> x__ {_Destination'description = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Destination "applePushNotif" ApplePushNotif where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'applePushNotif + (\ x__ y__ -> x__ {_Destination'applePushNotif = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Destination "maybe'applePushNotif" (Prelude.Maybe ApplePushNotif) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'applePushNotif + (\ x__ y__ -> x__ {_Destination'applePushNotif = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Destination "googlePushNotif" GooglePushNotif where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'googlePushNotif + (\ x__ y__ -> x__ {_Destination'googlePushNotif = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Destination "maybe'googlePushNotif" (Prelude.Maybe GooglePushNotif) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'googlePushNotif + (\ x__ y__ -> x__ {_Destination'googlePushNotif = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Destination "emailNotif" EmailNotif where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'emailNotif + (\ x__ y__ -> x__ {_Destination'emailNotif = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Destination "maybe'emailNotif" (Prelude.Maybe EmailNotif) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'emailNotif + (\ x__ y__ -> x__ {_Destination'emailNotif = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Destination "profileEmailNotif" EmailFromProfileNotif where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'profileEmailNotif + (\ x__ y__ -> x__ {_Destination'profileEmailNotif = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Destination "maybe'profileEmailNotif" (Prelude.Maybe EmailFromProfileNotif) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'profileEmailNotif + (\ x__ y__ -> x__ {_Destination'profileEmailNotif = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Destination "smsNotif" SmsNotif where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'smsNotif + (\ x__ y__ -> x__ {_Destination'smsNotif = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Destination "maybe'smsNotif" (Prelude.Maybe SmsNotif) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'smsNotif + (\ x__ y__ -> x__ {_Destination'smsNotif = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Destination "profileSmsNotif" SmsToPhoneFromProfileNotif where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'profileSmsNotif + (\ x__ y__ -> x__ {_Destination'profileSmsNotif = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField Destination "maybe'profileSmsNotif" (Prelude.Maybe SmsToPhoneFromProfileNotif) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Destination'profileSmsNotif + (\ x__ y__ -> x__ {_Destination'profileSmsNotif = y__})) + Prelude.id +instance Data.ProtoLens.Message Destination where + messageName _ = Data.Text.pack "shared_1.Destination" + packedMessageDescriptor _ + = "\n\ + \\vDestination\DC2 \n\ + \\vdescription\CAN\SOH \SOH(\tR\vdescription\DC2B\n\ + \\DLEapple_push_notif\CAN\STX \SOH(\v2\CAN.shared_1.ApplePushNotifR\SOapplePushNotif\DC2E\n\ + \\DC1google_push_notif\CAN\ETX \SOH(\v2\EM.shared_1.GooglePushNotifR\SIgooglePushNotif\DC25\n\ + \\vemail_notif\CAN\EOT \SOH(\v2\DC4.shared_1.EmailNotifR\n\ + \emailNotif\DC2O\n\ + \\DC3profile_email_notif\CAN\ACK \SOH(\v2\US.shared_1.EmailFromProfileNotifR\DC1profileEmailNotif\DC2/\n\ + \\tsms_notif\CAN\ENQ \SOH(\v2\DC2.shared_1.SmsNotifR\bsmsNotif\DC2P\n\ + \\DC1profile_sms_notif\CAN\a \SOH(\v2$.shared_1.SmsToPhoneFromProfileNotifR\SIprofileSmsNotif" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + description__field_descriptor + = Data.ProtoLens.FieldDescriptor + "description" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'description")) :: + Data.ProtoLens.FieldDescriptor Destination + applePushNotif__field_descriptor + = Data.ProtoLens.FieldDescriptor + "apple_push_notif" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor ApplePushNotif) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'applePushNotif")) :: + Data.ProtoLens.FieldDescriptor Destination + googlePushNotif__field_descriptor + = Data.ProtoLens.FieldDescriptor + "google_push_notif" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor GooglePushNotif) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'googlePushNotif")) :: + Data.ProtoLens.FieldDescriptor Destination + emailNotif__field_descriptor + = Data.ProtoLens.FieldDescriptor + "email_notif" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EmailNotif) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'emailNotif")) :: + Data.ProtoLens.FieldDescriptor Destination + profileEmailNotif__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_email_notif" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor EmailFromProfileNotif) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileEmailNotif")) :: + Data.ProtoLens.FieldDescriptor Destination + smsNotif__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sms_notif" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SmsNotif) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'smsNotif")) :: + Data.ProtoLens.FieldDescriptor Destination + profileSmsNotif__field_descriptor + = Data.ProtoLens.FieldDescriptor + "profile_sms_notif" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor SmsToPhoneFromProfileNotif) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'profileSmsNotif")) :: + Data.ProtoLens.FieldDescriptor Destination + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, description__field_descriptor), + (Data.ProtoLens.Tag 2, applePushNotif__field_descriptor), + (Data.ProtoLens.Tag 3, googlePushNotif__field_descriptor), + (Data.ProtoLens.Tag 4, emailNotif__field_descriptor), + (Data.ProtoLens.Tag 6, profileEmailNotif__field_descriptor), + (Data.ProtoLens.Tag 5, smsNotif__field_descriptor), + (Data.ProtoLens.Tag 7, profileSmsNotif__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Destination'_unknownFields + (\ x__ y__ -> x__ {_Destination'_unknownFields = y__}) + defMessage + = Destination'_constructor + {_Destination'description = Prelude.Nothing, + _Destination'applePushNotif = Prelude.Nothing, + _Destination'googlePushNotif = Prelude.Nothing, + _Destination'emailNotif = Prelude.Nothing, + _Destination'profileEmailNotif = Prelude.Nothing, + _Destination'smsNotif = Prelude.Nothing, + _Destination'profileSmsNotif = Prelude.Nothing, + _Destination'_unknownFields = []} + parseMessage + = let + loop :: + Destination -> Data.ProtoLens.Encoding.Bytes.Parser Destination + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "description" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"description") y x) + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "apple_push_notif" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"applePushNotif") y x) + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "google_push_notif" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"googlePushNotif") y x) + 34 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "email_notif" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"emailNotif") y x) + 50 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "profile_email_notif" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"profileEmailNotif") y x) + 42 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "sms_notif" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"smsNotif") y x) + 58 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "profile_sms_notif" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"profileSmsNotif") y x) + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "Destination" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'description") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'applePushNotif") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'googlePushNotif") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'emailNotif") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileEmailNotif") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 50) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'smsNotif") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 42) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view + (Data.ProtoLens.Field.field @"maybe'profileSmsNotif") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 58) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral + (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))))))) +instance Control.DeepSeq.NFData Destination where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Destination'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Destination'description x__) + (Control.DeepSeq.deepseq + (_Destination'applePushNotif x__) + (Control.DeepSeq.deepseq + (_Destination'googlePushNotif x__) + (Control.DeepSeq.deepseq + (_Destination'emailNotif x__) + (Control.DeepSeq.deepseq + (_Destination'profileEmailNotif x__) + (Control.DeepSeq.deepseq + (_Destination'smsNotif x__) + (Control.DeepSeq.deepseq + (_Destination'profileSmsNotif x__) ()))))))) +{- | Fields : + -} +data EmailFromProfileNotif + = EmailFromProfileNotif'_constructor {_EmailFromProfileNotif'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EmailFromProfileNotif where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message EmailFromProfileNotif where + messageName _ = Data.Text.pack "shared_1.EmailFromProfileNotif" + packedMessageDescriptor _ + = "\n\ + \\NAKEmailFromProfileNotif" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _EmailFromProfileNotif'_unknownFields + (\ x__ y__ -> x__ {_EmailFromProfileNotif'_unknownFields = y__}) + defMessage + = EmailFromProfileNotif'_constructor + {_EmailFromProfileNotif'_unknownFields = []} + parseMessage + = let + loop :: + EmailFromProfileNotif + -> Data.ProtoLens.Encoding.Bytes.Parser EmailFromProfileNotif + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "EmailFromProfileNotif" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData EmailFromProfileNotif where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EmailFromProfileNotif'_unknownFields x__) () +{- | Fields : + + * 'Proto.Common.Shared1_Fields.recipients' @:: Lens' EmailNotif [Data.Text.Text]@ + * 'Proto.Common.Shared1_Fields.vec'recipients' @:: Lens' EmailNotif (Data.Vector.Vector Data.Text.Text)@ -} +data EmailNotif + = EmailNotif'_constructor {_EmailNotif'recipients :: !(Data.Vector.Vector Data.Text.Text), + _EmailNotif'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EmailNotif where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EmailNotif "recipients" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EmailNotif'recipients + (\ x__ y__ -> x__ {_EmailNotif'recipients = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EmailNotif "vec'recipients" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EmailNotif'recipients + (\ x__ y__ -> x__ {_EmailNotif'recipients = y__})) + Prelude.id +instance Data.ProtoLens.Message EmailNotif where + messageName _ = Data.Text.pack "shared_1.EmailNotif" + packedMessageDescriptor _ + = "\n\ + \\n\ + \EmailNotif\DC2\RS\n\ + \\n\ + \recipients\CAN\SOH \ETX(\tR\n\ + \recipients" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + recipients__field_descriptor + = Data.ProtoLens.FieldDescriptor + "recipients" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"recipients")) :: + Data.ProtoLens.FieldDescriptor EmailNotif + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, recipients__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EmailNotif'_unknownFields + (\ x__ y__ -> x__ {_EmailNotif'_unknownFields = y__}) + defMessage + = EmailNotif'_constructor + {_EmailNotif'recipients = Data.Vector.Generic.empty, + _EmailNotif'_unknownFields = []} + parseMessage + = let + loop :: + EmailNotif + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser EmailNotif + loop x mutable'recipients + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'recipients <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'recipients) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'recipients") frozen'recipients + x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "recipients" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'recipients y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'recipients + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'recipients <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'recipients) + "EmailNotif" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'recipients") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData EmailNotif where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EmailNotif'_unknownFields x__) + (Control.DeepSeq.deepseq (_EmailNotif'recipients x__) ()) +{- | Fields : + + * 'Proto.Common.Shared1_Fields.entitlementType' @:: Lens' Entitlement Data.Word.Word32@ + * 'Proto.Common.Shared1_Fields.entitlementCode' @:: Lens' Entitlement Data.Text.Text@ + * 'Proto.Common.Shared1_Fields.deleted' @:: Lens' Entitlement Prelude.Bool@ + * 'Proto.Common.Shared1_Fields.maybe'deleted' @:: Lens' Entitlement (Prelude.Maybe Prelude.Bool)@ -} +data Entitlement + = Entitlement'_constructor {_Entitlement'entitlementType :: !Data.Word.Word32, + _Entitlement'entitlementCode :: !Data.Text.Text, + _Entitlement'deleted :: !(Prelude.Maybe Prelude.Bool), + _Entitlement'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Entitlement where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Entitlement "entitlementType" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Entitlement'entitlementType + (\ x__ y__ -> x__ {_Entitlement'entitlementType = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Entitlement "entitlementCode" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Entitlement'entitlementCode + (\ x__ y__ -> x__ {_Entitlement'entitlementCode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Entitlement "deleted" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Entitlement'deleted + (\ x__ y__ -> x__ {_Entitlement'deleted = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Entitlement "maybe'deleted" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Entitlement'deleted + (\ x__ y__ -> x__ {_Entitlement'deleted = y__})) + Prelude.id +instance Data.ProtoLens.Message Entitlement where + messageName _ = Data.Text.pack "shared_1.Entitlement" + packedMessageDescriptor _ + = "\n\ + \\vEntitlement\DC2)\n\ + \\DLEentitlement_type\CAN\SOH \STX(\rR\SIentitlementType\DC2)\n\ + \\DLEentitlement_code\CAN\STX \STX(\tR\SIentitlementCode\DC2\CAN\n\ + \\adeleted\CAN\ETX \SOH(\bR\adeleted\"\147\SOH\n\ + \\SIEntitlementType\DC2\v\n\ + \\aFEATURE\DLE\b\DC2\b\n\ + \\EOTNEWS\DLE\n\ + \\DC2\n\ + \\n\ + \\ACKDJNEWS\DLE\SUB\DC2\v\n\ + \\aSTUDIES\DLE$\DC2\FS\n\ + \\CANMANAGE_SECURITY_METADATA\DLE1\DC2\FS\n\ + \\CANMANAGE_CONTRACT_METADATA\DLE2\DC2\DC4\n\ + \\DLEOTC_MANAGE_TAILS\DLE3" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + entitlementType__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_type" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"entitlementType")) :: + Data.ProtoLens.FieldDescriptor Entitlement + entitlementCode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement_code" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"entitlementCode")) :: + Data.ProtoLens.FieldDescriptor Entitlement + deleted__field_descriptor + = Data.ProtoLens.FieldDescriptor + "deleted" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'deleted")) :: + Data.ProtoLens.FieldDescriptor Entitlement + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, entitlementType__field_descriptor), + (Data.ProtoLens.Tag 2, entitlementCode__field_descriptor), + (Data.ProtoLens.Tag 3, deleted__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Entitlement'_unknownFields + (\ x__ y__ -> x__ {_Entitlement'_unknownFields = y__}) + defMessage + = Entitlement'_constructor + {_Entitlement'entitlementType = Data.ProtoLens.fieldDefault, + _Entitlement'entitlementCode = Data.ProtoLens.fieldDefault, + _Entitlement'deleted = Prelude.Nothing, + _Entitlement'_unknownFields = []} + parseMessage + = let + loop :: + Entitlement + -> Prelude.Bool + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser Entitlement + loop x required'entitlementCode required'entitlementType + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'entitlementCode then + (:) "entitlement_code" + else + Prelude.id) + ((if required'entitlementType then + (:) "entitlement_type" + else + Prelude.id) + []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "entitlement_type" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"entitlementType") y x) + required'entitlementCode Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "entitlement_code" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"entitlementCode") y x) + Prelude.False required'entitlementType + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "deleted" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"deleted") y x) + required'entitlementCode required'entitlementType + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'entitlementCode required'entitlementType + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "Entitlement" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view + (Data.ProtoLens.Field.field @"entitlementType") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"entitlementCode") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'deleted") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData Entitlement where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Entitlement'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Entitlement'entitlementType x__) + (Control.DeepSeq.deepseq + (_Entitlement'entitlementCode x__) + (Control.DeepSeq.deepseq (_Entitlement'deleted x__) ()))) +data Entitlement'EntitlementType + = Entitlement'FEATURE | + Entitlement'NEWS | + Entitlement'DJNEWS | + Entitlement'STUDIES | + Entitlement'MANAGE_SECURITY_METADATA | + Entitlement'MANAGE_CONTRACT_METADATA | + Entitlement'OTC_MANAGE_TAILS + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum Entitlement'EntitlementType where + maybeToEnum 8 = Prelude.Just Entitlement'FEATURE + maybeToEnum 10 = Prelude.Just Entitlement'NEWS + maybeToEnum 26 = Prelude.Just Entitlement'DJNEWS + maybeToEnum 36 = Prelude.Just Entitlement'STUDIES + maybeToEnum 49 = Prelude.Just Entitlement'MANAGE_SECURITY_METADATA + maybeToEnum 50 = Prelude.Just Entitlement'MANAGE_CONTRACT_METADATA + maybeToEnum 51 = Prelude.Just Entitlement'OTC_MANAGE_TAILS + maybeToEnum _ = Prelude.Nothing + showEnum Entitlement'FEATURE = "FEATURE" + showEnum Entitlement'NEWS = "NEWS" + showEnum Entitlement'DJNEWS = "DJNEWS" + showEnum Entitlement'STUDIES = "STUDIES" + showEnum Entitlement'MANAGE_SECURITY_METADATA + = "MANAGE_SECURITY_METADATA" + showEnum Entitlement'MANAGE_CONTRACT_METADATA + = "MANAGE_CONTRACT_METADATA" + showEnum Entitlement'OTC_MANAGE_TAILS = "OTC_MANAGE_TAILS" + readEnum k + | (Prelude.==) k "FEATURE" = Prelude.Just Entitlement'FEATURE + | (Prelude.==) k "NEWS" = Prelude.Just Entitlement'NEWS + | (Prelude.==) k "DJNEWS" = Prelude.Just Entitlement'DJNEWS + | (Prelude.==) k "STUDIES" = Prelude.Just Entitlement'STUDIES + | (Prelude.==) k "MANAGE_SECURITY_METADATA" + = Prelude.Just Entitlement'MANAGE_SECURITY_METADATA + | (Prelude.==) k "MANAGE_CONTRACT_METADATA" + = Prelude.Just Entitlement'MANAGE_CONTRACT_METADATA + | (Prelude.==) k "OTC_MANAGE_TAILS" + = Prelude.Just Entitlement'OTC_MANAGE_TAILS + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded Entitlement'EntitlementType where + minBound = Entitlement'FEATURE + maxBound = Entitlement'OTC_MANAGE_TAILS +instance Prelude.Enum Entitlement'EntitlementType where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum EntitlementType: " + (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum Entitlement'FEATURE = 8 + fromEnum Entitlement'NEWS = 10 + fromEnum Entitlement'DJNEWS = 26 + fromEnum Entitlement'STUDIES = 36 + fromEnum Entitlement'MANAGE_SECURITY_METADATA = 49 + fromEnum Entitlement'MANAGE_CONTRACT_METADATA = 50 + fromEnum Entitlement'OTC_MANAGE_TAILS = 51 + succ Entitlement'OTC_MANAGE_TAILS + = Prelude.error + "Entitlement'EntitlementType.succ: bad argument Entitlement'OTC_MANAGE_TAILS. This value would be out of bounds." + succ Entitlement'FEATURE = Entitlement'NEWS + succ Entitlement'NEWS = Entitlement'DJNEWS + succ Entitlement'DJNEWS = Entitlement'STUDIES + succ Entitlement'STUDIES = Entitlement'MANAGE_SECURITY_METADATA + succ Entitlement'MANAGE_SECURITY_METADATA + = Entitlement'MANAGE_CONTRACT_METADATA + succ Entitlement'MANAGE_CONTRACT_METADATA + = Entitlement'OTC_MANAGE_TAILS + pred Entitlement'FEATURE + = Prelude.error + "Entitlement'EntitlementType.pred: bad argument Entitlement'FEATURE. This value would be out of bounds." + pred Entitlement'NEWS = Entitlement'FEATURE + pred Entitlement'DJNEWS = Entitlement'NEWS + pred Entitlement'STUDIES = Entitlement'DJNEWS + pred Entitlement'MANAGE_SECURITY_METADATA = Entitlement'STUDIES + pred Entitlement'MANAGE_CONTRACT_METADATA + = Entitlement'MANAGE_SECURITY_METADATA + pred Entitlement'OTC_MANAGE_TAILS + = Entitlement'MANAGE_CONTRACT_METADATA + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault Entitlement'EntitlementType where + fieldDefault = Entitlement'FEATURE +instance Control.DeepSeq.NFData Entitlement'EntitlementType where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.Common.Shared1_Fields.entitlement' @:: Lens' EntitlementReport [Entitlement]@ + * 'Proto.Common.Shared1_Fields.vec'entitlement' @:: Lens' EntitlementReport (Data.Vector.Vector Entitlement)@ -} +data EntitlementReport + = EntitlementReport'_constructor {_EntitlementReport'entitlement :: !(Data.Vector.Vector Entitlement), + _EntitlementReport'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntitlementReport where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField EntitlementReport "entitlement" [Entitlement] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementReport'entitlement + (\ x__ y__ -> x__ {_EntitlementReport'entitlement = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField EntitlementReport "vec'entitlement" (Data.Vector.Vector Entitlement) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _EntitlementReport'entitlement + (\ x__ y__ -> x__ {_EntitlementReport'entitlement = y__})) + Prelude.id +instance Data.ProtoLens.Message EntitlementReport where + messageName _ = Data.Text.pack "shared_1.EntitlementReport" + packedMessageDescriptor _ + = "\n\ + \\DC1EntitlementReport\DC27\n\ + \\ventitlement\CAN\SOH \ETX(\v2\NAK.shared_1.EntitlementR\ventitlement" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + entitlement__field_descriptor + = Data.ProtoLens.FieldDescriptor + "entitlement" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Entitlement) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked + (Data.ProtoLens.Field.field @"entitlement")) :: + Data.ProtoLens.FieldDescriptor EntitlementReport + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, entitlement__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _EntitlementReport'_unknownFields + (\ x__ y__ -> x__ {_EntitlementReport'_unknownFields = y__}) + defMessage + = EntitlementReport'_constructor + {_EntitlementReport'entitlement = Data.Vector.Generic.empty, + _EntitlementReport'_unknownFields = []} + parseMessage + = let + loop :: + EntitlementReport + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Entitlement + -> Data.ProtoLens.Encoding.Bytes.Parser EntitlementReport + loop x mutable'entitlement + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'entitlement <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze + mutable'entitlement) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'entitlement") frozen'entitlement + x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) + Data.ProtoLens.parseMessage) + "entitlement" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append + mutable'entitlement y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'entitlement + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'entitlement <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'entitlement) + "EntitlementReport" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Lens.Family2.view + (Data.ProtoLens.Field.field @"vec'entitlement") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData EntitlementReport where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntitlementReport'_unknownFields x__) + (Control.DeepSeq.deepseq (_EntitlementReport'entitlement x__) ()) +{- | Fields : + -} +data EntitlementRequest + = EntitlementRequest'_constructor {_EntitlementRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show EntitlementRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message EntitlementRequest where + messageName _ = Data.Text.pack "shared_1.EntitlementRequest" + packedMessageDescriptor _ + = "\n\ + \\DC2EntitlementRequest" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _EntitlementRequest'_unknownFields + (\ x__ y__ -> x__ {_EntitlementRequest'_unknownFields = y__}) + defMessage + = EntitlementRequest'_constructor + {_EntitlementRequest'_unknownFields = []} + parseMessage + = let + loop :: + EntitlementRequest + -> Data.ProtoLens.Encoding.Bytes.Parser EntitlementRequest + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "EntitlementRequest" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData EntitlementRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_EntitlementRequest'_unknownFields x__) () +{- | Fields : + + * 'Proto.Common.Shared1_Fields.registrationToken' @:: Lens' GooglePushNotif Data.Text.Text@ + * 'Proto.Common.Shared1_Fields.senderId' @:: Lens' GooglePushNotif Data.Text.Text@ -} +data GooglePushNotif + = GooglePushNotif'_constructor {_GooglePushNotif'registrationToken :: !Data.Text.Text, + _GooglePushNotif'senderId :: !Data.Text.Text, + _GooglePushNotif'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show GooglePushNotif where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField GooglePushNotif "registrationToken" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GooglePushNotif'registrationToken + (\ x__ y__ -> x__ {_GooglePushNotif'registrationToken = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField GooglePushNotif "senderId" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _GooglePushNotif'senderId + (\ x__ y__ -> x__ {_GooglePushNotif'senderId = y__})) + Prelude.id +instance Data.ProtoLens.Message GooglePushNotif where + messageName _ = Data.Text.pack "shared_1.GooglePushNotif" + packedMessageDescriptor _ + = "\n\ + \\SIGooglePushNotif\DC2-\n\ + \\DC2registration_token\CAN\SOH \STX(\tR\DC1registrationToken\DC2\ESC\n\ + \\tsender_id\CAN\STX \STX(\tR\bsenderId" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + registrationToken__field_descriptor + = Data.ProtoLens.FieldDescriptor + "registration_token" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"registrationToken")) :: + Data.ProtoLens.FieldDescriptor GooglePushNotif + senderId__field_descriptor + = Data.ProtoLens.FieldDescriptor + "sender_id" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"senderId")) :: + Data.ProtoLens.FieldDescriptor GooglePushNotif + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, registrationToken__field_descriptor), + (Data.ProtoLens.Tag 2, senderId__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _GooglePushNotif'_unknownFields + (\ x__ y__ -> x__ {_GooglePushNotif'_unknownFields = y__}) + defMessage + = GooglePushNotif'_constructor + {_GooglePushNotif'registrationToken = Data.ProtoLens.fieldDefault, + _GooglePushNotif'senderId = Data.ProtoLens.fieldDefault, + _GooglePushNotif'_unknownFields = []} + parseMessage + = let + loop :: + GooglePushNotif + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser GooglePushNotif + loop x required'registrationToken required'senderId + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'registrationToken then + (:) "registration_token" + else + Prelude.id) + ((if required'senderId then (:) "sender_id" else Prelude.id) []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "registration_token" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"registrationToken") y x) + Prelude.False required'senderId + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "sender_id" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"senderId") y x) + required'registrationToken Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'registrationToken required'senderId + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "GooglePushNotif" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"registrationToken") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"senderId") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData GooglePushNotif where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_GooglePushNotif'_unknownFields x__) + (Control.DeepSeq.deepseq + (_GooglePushNotif'registrationToken x__) + (Control.DeepSeq.deepseq (_GooglePushNotif'senderId x__) ())) +{- | Fields : + + * 'Proto.Common.Shared1_Fields.name' @:: Lens' NamedValue Data.Text.Text@ + * 'Proto.Common.Shared1_Fields.value' @:: Lens' NamedValue Data.Text.Text@ + * 'Proto.Common.Shared1_Fields.maybe'value' @:: Lens' NamedValue (Prelude.Maybe Data.Text.Text)@ + * 'Proto.Common.Shared1_Fields.deleted' @:: Lens' NamedValue Prelude.Bool@ + * 'Proto.Common.Shared1_Fields.maybe'deleted' @:: Lens' NamedValue (Prelude.Maybe Prelude.Bool)@ -} +data NamedValue + = NamedValue'_constructor {_NamedValue'name :: !Data.Text.Text, + _NamedValue'value :: !(Prelude.Maybe Data.Text.Text), + _NamedValue'deleted :: !(Prelude.Maybe Prelude.Bool), + _NamedValue'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show NamedValue where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField NamedValue "name" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _NamedValue'name (\ x__ y__ -> x__ {_NamedValue'name = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField NamedValue "value" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _NamedValue'value (\ x__ y__ -> x__ {_NamedValue'value = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField NamedValue "maybe'value" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _NamedValue'value (\ x__ y__ -> x__ {_NamedValue'value = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField NamedValue "deleted" Prelude.Bool where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _NamedValue'deleted (\ x__ y__ -> x__ {_NamedValue'deleted = y__})) + (Data.ProtoLens.maybeLens Prelude.False) +instance Data.ProtoLens.Field.HasField NamedValue "maybe'deleted" (Prelude.Maybe Prelude.Bool) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _NamedValue'deleted (\ x__ y__ -> x__ {_NamedValue'deleted = y__})) + Prelude.id +instance Data.ProtoLens.Message NamedValue where + messageName _ = Data.Text.pack "shared_1.NamedValue" + packedMessageDescriptor _ + = "\n\ + \\n\ + \NamedValue\DC2\DC2\n\ + \\EOTname\CAN\SOH \STX(\tR\EOTname\DC2\DC4\n\ + \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue\DC2\US\n\ + \\adeleted\CAN\ETX \SOH(\b:\ENQfalseR\adeleted" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + name__field_descriptor + = Data.ProtoLens.FieldDescriptor + "name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required (Data.ProtoLens.Field.field @"name")) :: + Data.ProtoLens.FieldDescriptor NamedValue + value__field_descriptor + = Data.ProtoLens.FieldDescriptor + "value" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'value")) :: + Data.ProtoLens.FieldDescriptor NamedValue + deleted__field_descriptor + = Data.ProtoLens.FieldDescriptor + "deleted" + (Data.ProtoLens.ScalarField Data.ProtoLens.BoolField :: + Data.ProtoLens.FieldTypeDescriptor Prelude.Bool) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'deleted")) :: + Data.ProtoLens.FieldDescriptor NamedValue + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, name__field_descriptor), + (Data.ProtoLens.Tag 2, value__field_descriptor), + (Data.ProtoLens.Tag 3, deleted__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _NamedValue'_unknownFields + (\ x__ y__ -> x__ {_NamedValue'_unknownFields = y__}) + defMessage + = NamedValue'_constructor + {_NamedValue'name = Data.ProtoLens.fieldDefault, + _NamedValue'value = Prelude.Nothing, + _NamedValue'deleted = Prelude.Nothing, + _NamedValue'_unknownFields = []} + parseMessage + = let + loop :: + NamedValue + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser NamedValue + loop x required'name + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing = (if required'name then (:) "name" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "name" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x) + Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "value" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x) + required'name + 24 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + ((Prelude./=) 0) Data.ProtoLens.Encoding.Bytes.getVarInt) + "deleted" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"deleted") y x) + required'name + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'name + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "NamedValue" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"name") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'value") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'deleted") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 24) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt (\ b -> if b then 1 else 0) + _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)))) +instance Control.DeepSeq.NFData NamedValue where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_NamedValue'_unknownFields x__) + (Control.DeepSeq.deepseq + (_NamedValue'name x__) + (Control.DeepSeq.deepseq + (_NamedValue'value x__) + (Control.DeepSeq.deepseq (_NamedValue'deleted x__) ()))) +{- | Fields : + + * 'Proto.Common.Shared1_Fields.propertyName' @:: Lens' NotificationProperty Data.Text.Text@ + * 'Proto.Common.Shared1_Fields.propertyValue' @:: Lens' NotificationProperty Data.Text.Text@ -} +data NotificationProperty + = NotificationProperty'_constructor {_NotificationProperty'propertyName :: !Data.Text.Text, + _NotificationProperty'propertyValue :: !Data.Text.Text, + _NotificationProperty'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show NotificationProperty where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField NotificationProperty "propertyName" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _NotificationProperty'propertyName + (\ x__ y__ -> x__ {_NotificationProperty'propertyName = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField NotificationProperty "propertyValue" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _NotificationProperty'propertyValue + (\ x__ y__ -> x__ {_NotificationProperty'propertyValue = y__})) + Prelude.id +instance Data.ProtoLens.Message NotificationProperty where + messageName _ = Data.Text.pack "shared_1.NotificationProperty" + packedMessageDescriptor _ + = "\n\ + \\DC4NotificationProperty\DC2#\n\ + \\rproperty_name\CAN\SOH \STX(\tR\fpropertyName\DC2%\n\ + \\SOproperty_value\CAN\STX \STX(\tR\rpropertyValue" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + propertyName__field_descriptor + = Data.ProtoLens.FieldDescriptor + "property_name" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"propertyName")) :: + Data.ProtoLens.FieldDescriptor NotificationProperty + propertyValue__field_descriptor + = Data.ProtoLens.FieldDescriptor + "property_value" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"propertyValue")) :: + Data.ProtoLens.FieldDescriptor NotificationProperty + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, propertyName__field_descriptor), + (Data.ProtoLens.Tag 2, propertyValue__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _NotificationProperty'_unknownFields + (\ x__ y__ -> x__ {_NotificationProperty'_unknownFields = y__}) + defMessage + = NotificationProperty'_constructor + {_NotificationProperty'propertyName = Data.ProtoLens.fieldDefault, + _NotificationProperty'propertyValue = Data.ProtoLens.fieldDefault, + _NotificationProperty'_unknownFields = []} + parseMessage + = let + loop :: + NotificationProperty + -> Prelude.Bool + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser NotificationProperty + loop x required'propertyName required'propertyValue + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'propertyName then + (:) "property_name" + else + Prelude.id) + ((if required'propertyValue then + (:) "property_value" + else + Prelude.id) + []) + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "property_name" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"propertyName") y x) + Prelude.False required'propertyValue + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "property_value" + loop + (Lens.Family2.set + (Data.ProtoLens.Field.field @"propertyValue") y x) + required'propertyName Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'propertyName required'propertyValue + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True Prelude.True) + "NotificationProperty" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"propertyName") _x))) + ((Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"propertyValue") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData NotificationProperty where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_NotificationProperty'_unknownFields x__) + (Control.DeepSeq.deepseq + (_NotificationProperty'propertyName x__) + (Control.DeepSeq.deepseq + (_NotificationProperty'propertyValue x__) ())) +{- | Fields : + -} +data OrderStatus + = OrderStatus'_constructor {_OrderStatus'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show OrderStatus where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message OrderStatus where + messageName _ = Data.Text.pack "shared_1.OrderStatus" + packedMessageDescriptor _ + = "\n\ + \\vOrderStatus\"\164\STX\n\ + \\ACKStatus\DC2\SO\n\ + \\n\ + \IN_TRANSIT\DLE\SOH\DC2\f\n\ + \\bREJECTED\DLE\STX\DC2\v\n\ + \\aWORKING\DLE\ETX\DC2\v\n\ + \\aEXPIRED\DLE\EOT\DC2\r\n\ + \\tIN_CANCEL\DLE\ENQ\DC2\r\n\ + \\tIN_MODIFY\DLE\ACK\DC2\r\n\ + \\tCANCELLED\DLE\a\DC2\n\ + \\n\ + \\ACKFILLED\DLE\b\DC2\r\n\ + \\tSUSPENDED\DLE\t\DC2\DLE\n\ + \\fDISCONNECTED\DLE\n\ + \\DC2\f\n\ + \\bACTIVEAT\DLE\v\DC2\DC4\n\ + \\DLEAPPROVE_REQUIRED\DLE\f\DC2\CAN\n\ + \\DC4APPROVED_BY_EXCHANGE\DLE\r\DC2\DC4\n\ + \\DLEAPPROVE_REJECTED\DLE\SO\DC2\v\n\ + \\aMATCHED\DLE\SI\DC2\NAK\n\ + \\DC1PARTIALLY_MATCHED\DLE\DLE\DC2\DLE\n\ + \\fTRADE_BROKEN\DLE\DC1" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _OrderStatus'_unknownFields + (\ x__ y__ -> x__ {_OrderStatus'_unknownFields = y__}) + defMessage + = OrderStatus'_constructor {_OrderStatus'_unknownFields = []} + parseMessage + = let + loop :: + OrderStatus -> Data.ProtoLens.Encoding.Bytes.Parser OrderStatus + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "OrderStatus" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData OrderStatus where + rnf + = \ x__ + -> Control.DeepSeq.deepseq (_OrderStatus'_unknownFields x__) () +data OrderStatus'Status + = OrderStatus'IN_TRANSIT | + OrderStatus'REJECTED | + OrderStatus'WORKING | + OrderStatus'EXPIRED | + OrderStatus'IN_CANCEL | + OrderStatus'IN_MODIFY | + OrderStatus'CANCELLED | + OrderStatus'FILLED | + OrderStatus'SUSPENDED | + OrderStatus'DISCONNECTED | + OrderStatus'ACTIVEAT | + OrderStatus'APPROVE_REQUIRED | + OrderStatus'APPROVED_BY_EXCHANGE | + OrderStatus'APPROVE_REJECTED | + OrderStatus'MATCHED | + OrderStatus'PARTIALLY_MATCHED | + OrderStatus'TRADE_BROKEN + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum OrderStatus'Status where + maybeToEnum 1 = Prelude.Just OrderStatus'IN_TRANSIT + maybeToEnum 2 = Prelude.Just OrderStatus'REJECTED + maybeToEnum 3 = Prelude.Just OrderStatus'WORKING + maybeToEnum 4 = Prelude.Just OrderStatus'EXPIRED + maybeToEnum 5 = Prelude.Just OrderStatus'IN_CANCEL + maybeToEnum 6 = Prelude.Just OrderStatus'IN_MODIFY + maybeToEnum 7 = Prelude.Just OrderStatus'CANCELLED + maybeToEnum 8 = Prelude.Just OrderStatus'FILLED + maybeToEnum 9 = Prelude.Just OrderStatus'SUSPENDED + maybeToEnum 10 = Prelude.Just OrderStatus'DISCONNECTED + maybeToEnum 11 = Prelude.Just OrderStatus'ACTIVEAT + maybeToEnum 12 = Prelude.Just OrderStatus'APPROVE_REQUIRED + maybeToEnum 13 = Prelude.Just OrderStatus'APPROVED_BY_EXCHANGE + maybeToEnum 14 = Prelude.Just OrderStatus'APPROVE_REJECTED + maybeToEnum 15 = Prelude.Just OrderStatus'MATCHED + maybeToEnum 16 = Prelude.Just OrderStatus'PARTIALLY_MATCHED + maybeToEnum 17 = Prelude.Just OrderStatus'TRADE_BROKEN + maybeToEnum _ = Prelude.Nothing + showEnum OrderStatus'IN_TRANSIT = "IN_TRANSIT" + showEnum OrderStatus'REJECTED = "REJECTED" + showEnum OrderStatus'WORKING = "WORKING" + showEnum OrderStatus'EXPIRED = "EXPIRED" + showEnum OrderStatus'IN_CANCEL = "IN_CANCEL" + showEnum OrderStatus'IN_MODIFY = "IN_MODIFY" + showEnum OrderStatus'CANCELLED = "CANCELLED" + showEnum OrderStatus'FILLED = "FILLED" + showEnum OrderStatus'SUSPENDED = "SUSPENDED" + showEnum OrderStatus'DISCONNECTED = "DISCONNECTED" + showEnum OrderStatus'ACTIVEAT = "ACTIVEAT" + showEnum OrderStatus'APPROVE_REQUIRED = "APPROVE_REQUIRED" + showEnum OrderStatus'APPROVED_BY_EXCHANGE = "APPROVED_BY_EXCHANGE" + showEnum OrderStatus'APPROVE_REJECTED = "APPROVE_REJECTED" + showEnum OrderStatus'MATCHED = "MATCHED" + showEnum OrderStatus'PARTIALLY_MATCHED = "PARTIALLY_MATCHED" + showEnum OrderStatus'TRADE_BROKEN = "TRADE_BROKEN" + readEnum k + | (Prelude.==) k "IN_TRANSIT" = Prelude.Just OrderStatus'IN_TRANSIT + | (Prelude.==) k "REJECTED" = Prelude.Just OrderStatus'REJECTED + | (Prelude.==) k "WORKING" = Prelude.Just OrderStatus'WORKING + | (Prelude.==) k "EXPIRED" = Prelude.Just OrderStatus'EXPIRED + | (Prelude.==) k "IN_CANCEL" = Prelude.Just OrderStatus'IN_CANCEL + | (Prelude.==) k "IN_MODIFY" = Prelude.Just OrderStatus'IN_MODIFY + | (Prelude.==) k "CANCELLED" = Prelude.Just OrderStatus'CANCELLED + | (Prelude.==) k "FILLED" = Prelude.Just OrderStatus'FILLED + | (Prelude.==) k "SUSPENDED" = Prelude.Just OrderStatus'SUSPENDED + | (Prelude.==) k "DISCONNECTED" + = Prelude.Just OrderStatus'DISCONNECTED + | (Prelude.==) k "ACTIVEAT" = Prelude.Just OrderStatus'ACTIVEAT + | (Prelude.==) k "APPROVE_REQUIRED" + = Prelude.Just OrderStatus'APPROVE_REQUIRED + | (Prelude.==) k "APPROVED_BY_EXCHANGE" + = Prelude.Just OrderStatus'APPROVED_BY_EXCHANGE + | (Prelude.==) k "APPROVE_REJECTED" + = Prelude.Just OrderStatus'APPROVE_REJECTED + | (Prelude.==) k "MATCHED" = Prelude.Just OrderStatus'MATCHED + | (Prelude.==) k "PARTIALLY_MATCHED" + = Prelude.Just OrderStatus'PARTIALLY_MATCHED + | (Prelude.==) k "TRADE_BROKEN" + = Prelude.Just OrderStatus'TRADE_BROKEN + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded OrderStatus'Status where + minBound = OrderStatus'IN_TRANSIT + maxBound = OrderStatus'TRADE_BROKEN +instance Prelude.Enum OrderStatus'Status where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum Status: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum OrderStatus'IN_TRANSIT = 1 + fromEnum OrderStatus'REJECTED = 2 + fromEnum OrderStatus'WORKING = 3 + fromEnum OrderStatus'EXPIRED = 4 + fromEnum OrderStatus'IN_CANCEL = 5 + fromEnum OrderStatus'IN_MODIFY = 6 + fromEnum OrderStatus'CANCELLED = 7 + fromEnum OrderStatus'FILLED = 8 + fromEnum OrderStatus'SUSPENDED = 9 + fromEnum OrderStatus'DISCONNECTED = 10 + fromEnum OrderStatus'ACTIVEAT = 11 + fromEnum OrderStatus'APPROVE_REQUIRED = 12 + fromEnum OrderStatus'APPROVED_BY_EXCHANGE = 13 + fromEnum OrderStatus'APPROVE_REJECTED = 14 + fromEnum OrderStatus'MATCHED = 15 + fromEnum OrderStatus'PARTIALLY_MATCHED = 16 + fromEnum OrderStatus'TRADE_BROKEN = 17 + succ OrderStatus'TRADE_BROKEN + = Prelude.error + "OrderStatus'Status.succ: bad argument OrderStatus'TRADE_BROKEN. This value would be out of bounds." + succ OrderStatus'IN_TRANSIT = OrderStatus'REJECTED + succ OrderStatus'REJECTED = OrderStatus'WORKING + succ OrderStatus'WORKING = OrderStatus'EXPIRED + succ OrderStatus'EXPIRED = OrderStatus'IN_CANCEL + succ OrderStatus'IN_CANCEL = OrderStatus'IN_MODIFY + succ OrderStatus'IN_MODIFY = OrderStatus'CANCELLED + succ OrderStatus'CANCELLED = OrderStatus'FILLED + succ OrderStatus'FILLED = OrderStatus'SUSPENDED + succ OrderStatus'SUSPENDED = OrderStatus'DISCONNECTED + succ OrderStatus'DISCONNECTED = OrderStatus'ACTIVEAT + succ OrderStatus'ACTIVEAT = OrderStatus'APPROVE_REQUIRED + succ OrderStatus'APPROVE_REQUIRED + = OrderStatus'APPROVED_BY_EXCHANGE + succ OrderStatus'APPROVED_BY_EXCHANGE + = OrderStatus'APPROVE_REJECTED + succ OrderStatus'APPROVE_REJECTED = OrderStatus'MATCHED + succ OrderStatus'MATCHED = OrderStatus'PARTIALLY_MATCHED + succ OrderStatus'PARTIALLY_MATCHED = OrderStatus'TRADE_BROKEN + pred OrderStatus'IN_TRANSIT + = Prelude.error + "OrderStatus'Status.pred: bad argument OrderStatus'IN_TRANSIT. This value would be out of bounds." + pred OrderStatus'REJECTED = OrderStatus'IN_TRANSIT + pred OrderStatus'WORKING = OrderStatus'REJECTED + pred OrderStatus'EXPIRED = OrderStatus'WORKING + pred OrderStatus'IN_CANCEL = OrderStatus'EXPIRED + pred OrderStatus'IN_MODIFY = OrderStatus'IN_CANCEL + pred OrderStatus'CANCELLED = OrderStatus'IN_MODIFY + pred OrderStatus'FILLED = OrderStatus'CANCELLED + pred OrderStatus'SUSPENDED = OrderStatus'FILLED + pred OrderStatus'DISCONNECTED = OrderStatus'SUSPENDED + pred OrderStatus'ACTIVEAT = OrderStatus'DISCONNECTED + pred OrderStatus'APPROVE_REQUIRED = OrderStatus'ACTIVEAT + pred OrderStatus'APPROVED_BY_EXCHANGE + = OrderStatus'APPROVE_REQUIRED + pred OrderStatus'APPROVE_REJECTED + = OrderStatus'APPROVED_BY_EXCHANGE + pred OrderStatus'MATCHED = OrderStatus'APPROVE_REJECTED + pred OrderStatus'PARTIALLY_MATCHED = OrderStatus'MATCHED + pred OrderStatus'TRADE_BROKEN = OrderStatus'PARTIALLY_MATCHED + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault OrderStatus'Status where + fieldDefault = OrderStatus'IN_TRANSIT +instance Control.DeepSeq.NFData OrderStatus'Status where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.Common.Shared1_Fields.accessKey' @:: Lens' SignOnRequest Data.Text.Text@ -} +data SignOnRequest + = SignOnRequest'_constructor {_SignOnRequest'accessKey :: !Data.Text.Text, + _SignOnRequest'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SignOnRequest where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SignOnRequest "accessKey" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SignOnRequest'accessKey + (\ x__ y__ -> x__ {_SignOnRequest'accessKey = y__})) + Prelude.id +instance Data.ProtoLens.Message SignOnRequest where + messageName _ = Data.Text.pack "shared_1.SignOnRequest" + packedMessageDescriptor _ + = "\n\ + \\rSignOnRequest\DC2\GS\n\ + \\n\ + \access_key\CAN\SOH \STX(\tR\taccessKey" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + accessKey__field_descriptor + = Data.ProtoLens.FieldDescriptor + "access_key" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"accessKey")) :: + Data.ProtoLens.FieldDescriptor SignOnRequest + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, accessKey__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SignOnRequest'_unknownFields + (\ x__ y__ -> x__ {_SignOnRequest'_unknownFields = y__}) + defMessage + = SignOnRequest'_constructor + {_SignOnRequest'accessKey = Data.ProtoLens.fieldDefault, + _SignOnRequest'_unknownFields = []} + parseMessage + = let + loop :: + SignOnRequest + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser SignOnRequest + loop x required'accessKey + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'accessKey then (:) "access_key" else Prelude.id) [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "access_key" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"accessKey") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'accessKey + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "SignOnRequest" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view (Data.ProtoLens.Field.field @"accessKey") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData SignOnRequest where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SignOnRequest'_unknownFields x__) + (Control.DeepSeq.deepseq (_SignOnRequest'accessKey x__) ()) +{- | Fields : + + * 'Proto.Common.Shared1_Fields.resultCode' @:: Lens' SignOnResult Data.Word.Word32@ + * 'Proto.Common.Shared1_Fields.details' @:: Lens' SignOnResult Text@ + * 'Proto.Common.Shared1_Fields.maybe'details' @:: Lens' SignOnResult (Prelude.Maybe Text)@ -} +data SignOnResult + = SignOnResult'_constructor {_SignOnResult'resultCode :: !Data.Word.Word32, + _SignOnResult'details :: !(Prelude.Maybe Text), + _SignOnResult'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SignOnResult where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SignOnResult "resultCode" Data.Word.Word32 where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SignOnResult'resultCode + (\ x__ y__ -> x__ {_SignOnResult'resultCode = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField SignOnResult "details" Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SignOnResult'details + (\ x__ y__ -> x__ {_SignOnResult'details = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.defMessage) +instance Data.ProtoLens.Field.HasField SignOnResult "maybe'details" (Prelude.Maybe Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SignOnResult'details + (\ x__ y__ -> x__ {_SignOnResult'details = y__})) + Prelude.id +instance Data.ProtoLens.Message SignOnResult where + messageName _ = Data.Text.pack "shared_1.SignOnResult" + packedMessageDescriptor _ + = "\n\ + \\fSignOnResult\DC2\US\n\ + \\vresult_code\CAN\SOH \STX(\rR\n\ + \resultCode\DC2(\n\ + \\adetails\CAN\STX \SOH(\v2\SO.shared_1.TextR\adetails\"&\n\ + \\n\ + \ResultCode\DC2\v\n\ + \\aSUCCESS\DLE\NUL\DC2\v\n\ + \\aFAILURE\DLEe" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + resultCode__field_descriptor + = Data.ProtoLens.FieldDescriptor + "result_code" + (Data.ProtoLens.ScalarField Data.ProtoLens.UInt32Field :: + Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"resultCode")) :: + Data.ProtoLens.FieldDescriptor SignOnResult + details__field_descriptor + = Data.ProtoLens.FieldDescriptor + "details" + (Data.ProtoLens.MessageField Data.ProtoLens.MessageType :: + Data.ProtoLens.FieldTypeDescriptor Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'details")) :: + Data.ProtoLens.FieldDescriptor SignOnResult + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, resultCode__field_descriptor), + (Data.ProtoLens.Tag 2, details__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SignOnResult'_unknownFields + (\ x__ y__ -> x__ {_SignOnResult'_unknownFields = y__}) + defMessage + = SignOnResult'_constructor + {_SignOnResult'resultCode = Data.ProtoLens.fieldDefault, + _SignOnResult'details = Prelude.Nothing, + _SignOnResult'_unknownFields = []} + parseMessage + = let + loop :: + SignOnResult + -> Prelude.Bool + -> Data.ProtoLens.Encoding.Bytes.Parser SignOnResult + loop x required'resultCode + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'resultCode then (:) "result_code" else Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 8 -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (Prelude.fmap + Prelude.fromIntegral + Data.ProtoLens.Encoding.Bytes.getVarInt) + "result_code" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"resultCode") y x) + Prelude.False + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.isolate + (Prelude.fromIntegral len) Data.ProtoLens.parseMessage) + "details" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"details") y x) + required'resultCode + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'resultCode + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "SignOnResult" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 8) + ((Prelude..) + Data.ProtoLens.Encoding.Bytes.putVarInt Prelude.fromIntegral + (Lens.Family2.view (Data.ProtoLens.Field.field @"resultCode") _x))) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'details") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.ProtoLens.encodeMessage _v)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))) +instance Control.DeepSeq.NFData SignOnResult where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SignOnResult'_unknownFields x__) + (Control.DeepSeq.deepseq + (_SignOnResult'resultCode x__) + (Control.DeepSeq.deepseq (_SignOnResult'details x__) ())) +data SignOnResult'ResultCode + = SignOnResult'SUCCESS | SignOnResult'FAILURE + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum SignOnResult'ResultCode where + maybeToEnum 0 = Prelude.Just SignOnResult'SUCCESS + maybeToEnum 101 = Prelude.Just SignOnResult'FAILURE + maybeToEnum _ = Prelude.Nothing + showEnum SignOnResult'SUCCESS = "SUCCESS" + showEnum SignOnResult'FAILURE = "FAILURE" + readEnum k + | (Prelude.==) k "SUCCESS" = Prelude.Just SignOnResult'SUCCESS + | (Prelude.==) k "FAILURE" = Prelude.Just SignOnResult'FAILURE + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded SignOnResult'ResultCode where + minBound = SignOnResult'SUCCESS + maxBound = SignOnResult'FAILURE +instance Prelude.Enum SignOnResult'ResultCode where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum ResultCode: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum SignOnResult'SUCCESS = 0 + fromEnum SignOnResult'FAILURE = 101 + succ SignOnResult'FAILURE + = Prelude.error + "SignOnResult'ResultCode.succ: bad argument SignOnResult'FAILURE. This value would be out of bounds." + succ SignOnResult'SUCCESS = SignOnResult'FAILURE + pred SignOnResult'SUCCESS + = Prelude.error + "SignOnResult'ResultCode.pred: bad argument SignOnResult'SUCCESS. This value would be out of bounds." + pred SignOnResult'FAILURE = SignOnResult'SUCCESS + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault SignOnResult'ResultCode where + fieldDefault = SignOnResult'SUCCESS +instance Control.DeepSeq.NFData SignOnResult'ResultCode where + rnf x__ = Prelude.seq x__ () +{- | Fields : + + * 'Proto.Common.Shared1_Fields.phoneNumber' @:: Lens' SmsNotif Data.Text.Text@ -} +data SmsNotif + = SmsNotif'_constructor {_SmsNotif'phoneNumber :: !Data.Text.Text, + _SmsNotif'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SmsNotif where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField SmsNotif "phoneNumber" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _SmsNotif'phoneNumber + (\ x__ y__ -> x__ {_SmsNotif'phoneNumber = y__})) + Prelude.id +instance Data.ProtoLens.Message SmsNotif where + messageName _ = Data.Text.pack "shared_1.SmsNotif" + packedMessageDescriptor _ + = "\n\ + \\bSmsNotif\DC2!\n\ + \\fphone_number\CAN\SOH \STX(\tR\vphoneNumber" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + phoneNumber__field_descriptor + = Data.ProtoLens.FieldDescriptor + "phone_number" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.PlainField + Data.ProtoLens.Required + (Data.ProtoLens.Field.field @"phoneNumber")) :: + Data.ProtoLens.FieldDescriptor SmsNotif + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, phoneNumber__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _SmsNotif'_unknownFields + (\ x__ y__ -> x__ {_SmsNotif'_unknownFields = y__}) + defMessage + = SmsNotif'_constructor + {_SmsNotif'phoneNumber = Data.ProtoLens.fieldDefault, + _SmsNotif'_unknownFields = []} + parseMessage + = let + loop :: + SmsNotif + -> Prelude.Bool -> Data.ProtoLens.Encoding.Bytes.Parser SmsNotif + loop x required'phoneNumber + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let + missing + = (if required'phoneNumber then (:) "phone_number" else Prelude.id) + [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "phone_number" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"phoneNumber") y x) + Prelude.False + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + required'phoneNumber + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage Prelude.True) "SmsNotif" + buildMessage + = \ _x + -> (Data.Monoid.<>) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 + (Lens.Family2.view + (Data.ProtoLens.Field.field @"phoneNumber") _x))) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x)) +instance Control.DeepSeq.NFData SmsNotif where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SmsNotif'_unknownFields x__) + (Control.DeepSeq.deepseq (_SmsNotif'phoneNumber x__) ()) +{- | Fields : + -} +data SmsToPhoneFromProfileNotif + = SmsToPhoneFromProfileNotif'_constructor {_SmsToPhoneFromProfileNotif'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show SmsToPhoneFromProfileNotif where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message SmsToPhoneFromProfileNotif where + messageName _ + = Data.Text.pack "shared_1.SmsToPhoneFromProfileNotif" + packedMessageDescriptor _ + = "\n\ + \\SUBSmsToPhoneFromProfileNotif" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _SmsToPhoneFromProfileNotif'_unknownFields + (\ x__ y__ + -> x__ {_SmsToPhoneFromProfileNotif'_unknownFields = y__}) + defMessage + = SmsToPhoneFromProfileNotif'_constructor + {_SmsToPhoneFromProfileNotif'_unknownFields = []} + parseMessage + = let + loop :: + SmsToPhoneFromProfileNotif + -> Data.ProtoLens.Encoding.Bytes.Parser SmsToPhoneFromProfileNotif + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "SmsToPhoneFromProfileNotif" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData SmsToPhoneFromProfileNotif where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_SmsToPhoneFromProfileNotif'_unknownFields x__) () +{- | Fields : + + * 'Proto.Common.Shared1_Fields.key' @:: Lens' Text Data.Text.Text@ + * 'Proto.Common.Shared1_Fields.maybe'key' @:: Lens' Text (Prelude.Maybe Data.Text.Text)@ + * 'Proto.Common.Shared1_Fields.text' @:: Lens' Text Data.Text.Text@ + * 'Proto.Common.Shared1_Fields.maybe'text' @:: Lens' Text (Prelude.Maybe Data.Text.Text)@ + * 'Proto.Common.Shared1_Fields.format' @:: Lens' Text Data.Text.Text@ + * 'Proto.Common.Shared1_Fields.maybe'format' @:: Lens' Text (Prelude.Maybe Data.Text.Text)@ + * 'Proto.Common.Shared1_Fields.param' @:: Lens' Text [Data.Text.Text]@ + * 'Proto.Common.Shared1_Fields.vec'param' @:: Lens' Text (Data.Vector.Vector Data.Text.Text)@ -} +data Text + = Text'_constructor {_Text'key :: !(Prelude.Maybe Data.Text.Text), + _Text'text :: !(Prelude.Maybe Data.Text.Text), + _Text'format :: !(Prelude.Maybe Data.Text.Text), + _Text'param :: !(Data.Vector.Vector Data.Text.Text), + _Text'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show Text where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Field.HasField Text "key" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Text'key (\ x__ y__ -> x__ {_Text'key = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Text "maybe'key" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Text'key (\ x__ y__ -> x__ {_Text'key = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Text "text" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Text'text (\ x__ y__ -> x__ {_Text'text = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Text "maybe'text" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Text'text (\ x__ y__ -> x__ {_Text'text = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Text "format" Data.Text.Text where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Text'format (\ x__ y__ -> x__ {_Text'format = y__})) + (Data.ProtoLens.maybeLens Data.ProtoLens.fieldDefault) +instance Data.ProtoLens.Field.HasField Text "maybe'format" (Prelude.Maybe Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Text'format (\ x__ y__ -> x__ {_Text'format = y__})) + Prelude.id +instance Data.ProtoLens.Field.HasField Text "param" [Data.Text.Text] where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Text'param (\ x__ y__ -> x__ {_Text'param = y__})) + (Lens.Family2.Unchecked.lens + Data.Vector.Generic.toList + (\ _ y__ -> Data.Vector.Generic.fromList y__)) +instance Data.ProtoLens.Field.HasField Text "vec'param" (Data.Vector.Vector Data.Text.Text) where + fieldOf _ + = (Prelude..) + (Lens.Family2.Unchecked.lens + _Text'param (\ x__ y__ -> x__ {_Text'param = y__})) + Prelude.id +instance Data.ProtoLens.Message Text where + messageName _ = Data.Text.pack "shared_1.Text" + packedMessageDescriptor _ + = "\n\ + \\EOTText\DC2\DLE\n\ + \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC2\n\ + \\EOTtext\CAN\STX \SOH(\tR\EOTtext\DC2\SYN\n\ + \\ACKformat\CAN\ETX \SOH(\tR\ACKformat\DC2\DC4\n\ + \\ENQparam\CAN\EOT \ETX(\tR\ENQparam" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag + = let + key__field_descriptor + = Data.ProtoLens.FieldDescriptor + "key" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'key")) :: + Data.ProtoLens.FieldDescriptor Text + text__field_descriptor + = Data.ProtoLens.FieldDescriptor + "text" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'text")) :: + Data.ProtoLens.FieldDescriptor Text + format__field_descriptor + = Data.ProtoLens.FieldDescriptor + "format" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.OptionalField + (Data.ProtoLens.Field.field @"maybe'format")) :: + Data.ProtoLens.FieldDescriptor Text + param__field_descriptor + = Data.ProtoLens.FieldDescriptor + "param" + (Data.ProtoLens.ScalarField Data.ProtoLens.StringField :: + Data.ProtoLens.FieldTypeDescriptor Data.Text.Text) + (Data.ProtoLens.RepeatedField + Data.ProtoLens.Unpacked (Data.ProtoLens.Field.field @"param")) :: + Data.ProtoLens.FieldDescriptor Text + in + Data.Map.fromList + [(Data.ProtoLens.Tag 1, key__field_descriptor), + (Data.ProtoLens.Tag 2, text__field_descriptor), + (Data.ProtoLens.Tag 3, format__field_descriptor), + (Data.ProtoLens.Tag 4, param__field_descriptor)] + unknownFields + = Lens.Family2.Unchecked.lens + _Text'_unknownFields + (\ x__ y__ -> x__ {_Text'_unknownFields = y__}) + defMessage + = Text'_constructor + {_Text'key = Prelude.Nothing, _Text'text = Prelude.Nothing, + _Text'format = Prelude.Nothing, + _Text'param = Data.Vector.Generic.empty, _Text'_unknownFields = []} + parseMessage + = let + loop :: + Text + -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text + -> Data.ProtoLens.Encoding.Bytes.Parser Text + loop x mutable'param + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do frozen'param <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'param) + (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) + (Lens.Family2.set + (Data.ProtoLens.Field.field @"vec'param") frozen'param x)) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + 10 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "key" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"key") y x) + mutable'param + 18 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "text" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"text") y x) + mutable'param + 26 + -> do y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "format" + loop + (Lens.Family2.set (Data.ProtoLens.Field.field @"format") y x) + mutable'param + 34 + -> do !y <- (Data.ProtoLens.Encoding.Bytes.) + (do len <- Data.ProtoLens.Encoding.Bytes.getVarInt + Data.ProtoLens.Encoding.Bytes.getText + (Prelude.fromIntegral len)) + "param" + v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + (Data.ProtoLens.Encoding.Growing.append mutable'param y) + loop x v + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + mutable'param + in + (Data.ProtoLens.Encoding.Bytes.) + (do mutable'param <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO + Data.ProtoLens.Encoding.Growing.new + loop Data.ProtoLens.defMessage mutable'param) + "Text" + buildMessage + = \ _x + -> (Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'key") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 10) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'text") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 18) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (case + Lens.Family2.view (Data.ProtoLens.Field.field @"maybe'format") _x + of + Prelude.Nothing -> Data.Monoid.mempty + (Prelude.Just _v) + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 26) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + ((Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.foldMapBuilder + (\ _v + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt 34) + ((Prelude..) + (\ bs + -> (Data.Monoid.<>) + (Data.ProtoLens.Encoding.Bytes.putVarInt + (Prelude.fromIntegral (Data.ByteString.length bs))) + (Data.ProtoLens.Encoding.Bytes.putBytes bs)) + Data.Text.Encoding.encodeUtf8 _v)) + (Lens.Family2.view (Data.ProtoLens.Field.field @"vec'param") _x)) + (Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x))))) +instance Control.DeepSeq.NFData Text where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_Text'_unknownFields x__) + (Control.DeepSeq.deepseq + (_Text'key x__) + (Control.DeepSeq.deepseq + (_Text'text x__) + (Control.DeepSeq.deepseq + (_Text'format x__) + (Control.DeepSeq.deepseq (_Text'param x__) ())))) +{- | Fields : + -} +data TransactionStatus + = TransactionStatus'_constructor {_TransactionStatus'_unknownFields :: !Data.ProtoLens.FieldSet} + deriving stock (Prelude.Eq, Prelude.Ord) +instance Prelude.Show TransactionStatus where + showsPrec _ __x __s + = Prelude.showChar + '{' + (Prelude.showString + (Data.ProtoLens.showMessageShort __x) (Prelude.showChar '}' __s)) +instance Data.ProtoLens.Message TransactionStatus where + messageName _ = Data.Text.pack "shared_1.TransactionStatus" + packedMessageDescriptor _ + = "\n\ + \\DC1TransactionStatus\"\252\ETX\n\ + \\ACKStatus\DC2\SO\n\ + \\n\ + \IN_TRANSIT\DLE\SOH\DC2\f\n\ + \\bREJECTED\DLE\STX\DC2\r\n\ + \\tACK_PLACE\DLE\ETX\DC2\v\n\ + \\aEXPIRED\DLE\EOT\DC2\r\n\ + \\tIN_CANCEL\DLE\ENQ\DC2\SO\n\ + \\n\ + \ACK_CANCEL\DLE\ACK\DC2\DC1\n\ + \\rREJECT_CANCEL\DLE\a\DC2\r\n\ + \\tIN_MODIFY\DLE\b\DC2\SO\n\ + \\n\ + \ACK_MODIFY\DLE\t\DC2\DC1\n\ + \\rREJECT_MODIFY\DLE\n\ + \\DC2\b\n\ + \\EOTFILL\DLE\v\DC2\v\n\ + \\aSUSPEND\DLE\f\DC2\DLE\n\ + \\fFILL_CORRECT\DLE\r\DC2\SI\n\ + \\vFILL_CANCEL\DLE\SO\DC2\r\n\ + \\tFILL_BUST\DLE\SI\DC2\f\n\ + \\bACTIVEAT\DLE\DLE\DC2\SO\n\ + \\n\ + \DISCONNECT\DLE\DC1\DC2\ETB\n\ + \\DC3SYNTHETIC_ACTIVATED\DLE\DC2\DC2\n\ + \\n\ + \\ACKUPDATE\DLE\DC3\DC2\DC4\n\ + \\DLESYNTHETIC_FAILED\DLE\DC4\DC2\SYN\n\ + \\DC2SYNTHETIC_OVERFILL\DLE\NAK\DC2\DC2\n\ + \\SOSYNTHETIC_HANG\DLE\SYN\DC2\r\n\ + \\tAPPROVING\DLE\ETB\DC2\NAK\n\ + \\DC1APPROVE_REQUESTED\DLE\CAN\DC2\CAN\n\ + \\DC4APPROVED_BY_EXCHANGE\DLE\EM\DC2\DC4\n\ + \\DLEREJECTED_BY_USER\DLE\SUB\DC2\v\n\ + \\aMATCHED\DLE\ESC\DC2\DLE\n\ + \\fTRADE_BROKEN\DLE\FS\DC2\DC1\n\ + \\rTRADE_AMENDED\DLE\GS" + packedFileDescriptor _ = packedFileDescriptor + fieldsByTag = let in Data.Map.fromList [] + unknownFields + = Lens.Family2.Unchecked.lens + _TransactionStatus'_unknownFields + (\ x__ y__ -> x__ {_TransactionStatus'_unknownFields = y__}) + defMessage + = TransactionStatus'_constructor + {_TransactionStatus'_unknownFields = []} + parseMessage + = let + loop :: + TransactionStatus + -> Data.ProtoLens.Encoding.Bytes.Parser TransactionStatus + loop x + = do end <- Data.ProtoLens.Encoding.Bytes.atEnd + if end then + do (let missing = [] + in + if Prelude.null missing then + Prelude.return () + else + Prelude.fail + ((Prelude.++) + "Missing required fields: " + (Prelude.show (missing :: [Prelude.String])))) + Prelude.return + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> Prelude.reverse t) x) + else + do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt + case tag of + wire + -> do !y <- Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire + wire + loop + (Lens.Family2.over + Data.ProtoLens.unknownFields (\ !t -> (:) y t) x) + in + (Data.ProtoLens.Encoding.Bytes.) + (do loop Data.ProtoLens.defMessage) "TransactionStatus" + buildMessage + = \ _x + -> Data.ProtoLens.Encoding.Wire.buildFieldSet + (Lens.Family2.view Data.ProtoLens.unknownFields _x) +instance Control.DeepSeq.NFData TransactionStatus where + rnf + = \ x__ + -> Control.DeepSeq.deepseq + (_TransactionStatus'_unknownFields x__) () +data TransactionStatus'Status + = TransactionStatus'IN_TRANSIT | + TransactionStatus'REJECTED | + TransactionStatus'ACK_PLACE | + TransactionStatus'EXPIRED | + TransactionStatus'IN_CANCEL | + TransactionStatus'ACK_CANCEL | + TransactionStatus'REJECT_CANCEL | + TransactionStatus'IN_MODIFY | + TransactionStatus'ACK_MODIFY | + TransactionStatus'REJECT_MODIFY | + TransactionStatus'FILL | + TransactionStatus'SUSPEND | + TransactionStatus'FILL_CORRECT | + TransactionStatus'FILL_CANCEL | + TransactionStatus'FILL_BUST | + TransactionStatus'ACTIVEAT | + TransactionStatus'DISCONNECT | + TransactionStatus'SYNTHETIC_ACTIVATED | + TransactionStatus'UPDATE | + TransactionStatus'SYNTHETIC_FAILED | + TransactionStatus'SYNTHETIC_OVERFILL | + TransactionStatus'SYNTHETIC_HANG | + TransactionStatus'APPROVING | + TransactionStatus'APPROVE_REQUESTED | + TransactionStatus'APPROVED_BY_EXCHANGE | + TransactionStatus'REJECTED_BY_USER | + TransactionStatus'MATCHED | + TransactionStatus'TRADE_BROKEN | + TransactionStatus'TRADE_AMENDED + deriving stock (Prelude.Show, Prelude.Eq, Prelude.Ord) +instance Data.ProtoLens.MessageEnum TransactionStatus'Status where + maybeToEnum 1 = Prelude.Just TransactionStatus'IN_TRANSIT + maybeToEnum 2 = Prelude.Just TransactionStatus'REJECTED + maybeToEnum 3 = Prelude.Just TransactionStatus'ACK_PLACE + maybeToEnum 4 = Prelude.Just TransactionStatus'EXPIRED + maybeToEnum 5 = Prelude.Just TransactionStatus'IN_CANCEL + maybeToEnum 6 = Prelude.Just TransactionStatus'ACK_CANCEL + maybeToEnum 7 = Prelude.Just TransactionStatus'REJECT_CANCEL + maybeToEnum 8 = Prelude.Just TransactionStatus'IN_MODIFY + maybeToEnum 9 = Prelude.Just TransactionStatus'ACK_MODIFY + maybeToEnum 10 = Prelude.Just TransactionStatus'REJECT_MODIFY + maybeToEnum 11 = Prelude.Just TransactionStatus'FILL + maybeToEnum 12 = Prelude.Just TransactionStatus'SUSPEND + maybeToEnum 13 = Prelude.Just TransactionStatus'FILL_CORRECT + maybeToEnum 14 = Prelude.Just TransactionStatus'FILL_CANCEL + maybeToEnum 15 = Prelude.Just TransactionStatus'FILL_BUST + maybeToEnum 16 = Prelude.Just TransactionStatus'ACTIVEAT + maybeToEnum 17 = Prelude.Just TransactionStatus'DISCONNECT + maybeToEnum 18 = Prelude.Just TransactionStatus'SYNTHETIC_ACTIVATED + maybeToEnum 19 = Prelude.Just TransactionStatus'UPDATE + maybeToEnum 20 = Prelude.Just TransactionStatus'SYNTHETIC_FAILED + maybeToEnum 21 = Prelude.Just TransactionStatus'SYNTHETIC_OVERFILL + maybeToEnum 22 = Prelude.Just TransactionStatus'SYNTHETIC_HANG + maybeToEnum 23 = Prelude.Just TransactionStatus'APPROVING + maybeToEnum 24 = Prelude.Just TransactionStatus'APPROVE_REQUESTED + maybeToEnum 25 + = Prelude.Just TransactionStatus'APPROVED_BY_EXCHANGE + maybeToEnum 26 = Prelude.Just TransactionStatus'REJECTED_BY_USER + maybeToEnum 27 = Prelude.Just TransactionStatus'MATCHED + maybeToEnum 28 = Prelude.Just TransactionStatus'TRADE_BROKEN + maybeToEnum 29 = Prelude.Just TransactionStatus'TRADE_AMENDED + maybeToEnum _ = Prelude.Nothing + showEnum TransactionStatus'IN_TRANSIT = "IN_TRANSIT" + showEnum TransactionStatus'REJECTED = "REJECTED" + showEnum TransactionStatus'ACK_PLACE = "ACK_PLACE" + showEnum TransactionStatus'EXPIRED = "EXPIRED" + showEnum TransactionStatus'IN_CANCEL = "IN_CANCEL" + showEnum TransactionStatus'ACK_CANCEL = "ACK_CANCEL" + showEnum TransactionStatus'REJECT_CANCEL = "REJECT_CANCEL" + showEnum TransactionStatus'IN_MODIFY = "IN_MODIFY" + showEnum TransactionStatus'ACK_MODIFY = "ACK_MODIFY" + showEnum TransactionStatus'REJECT_MODIFY = "REJECT_MODIFY" + showEnum TransactionStatus'FILL = "FILL" + showEnum TransactionStatus'SUSPEND = "SUSPEND" + showEnum TransactionStatus'FILL_CORRECT = "FILL_CORRECT" + showEnum TransactionStatus'FILL_CANCEL = "FILL_CANCEL" + showEnum TransactionStatus'FILL_BUST = "FILL_BUST" + showEnum TransactionStatus'ACTIVEAT = "ACTIVEAT" + showEnum TransactionStatus'DISCONNECT = "DISCONNECT" + showEnum TransactionStatus'SYNTHETIC_ACTIVATED + = "SYNTHETIC_ACTIVATED" + showEnum TransactionStatus'UPDATE = "UPDATE" + showEnum TransactionStatus'SYNTHETIC_FAILED = "SYNTHETIC_FAILED" + showEnum TransactionStatus'SYNTHETIC_OVERFILL + = "SYNTHETIC_OVERFILL" + showEnum TransactionStatus'SYNTHETIC_HANG = "SYNTHETIC_HANG" + showEnum TransactionStatus'APPROVING = "APPROVING" + showEnum TransactionStatus'APPROVE_REQUESTED = "APPROVE_REQUESTED" + showEnum TransactionStatus'APPROVED_BY_EXCHANGE + = "APPROVED_BY_EXCHANGE" + showEnum TransactionStatus'REJECTED_BY_USER = "REJECTED_BY_USER" + showEnum TransactionStatus'MATCHED = "MATCHED" + showEnum TransactionStatus'TRADE_BROKEN = "TRADE_BROKEN" + showEnum TransactionStatus'TRADE_AMENDED = "TRADE_AMENDED" + readEnum k + | (Prelude.==) k "IN_TRANSIT" + = Prelude.Just TransactionStatus'IN_TRANSIT + | (Prelude.==) k "REJECTED" + = Prelude.Just TransactionStatus'REJECTED + | (Prelude.==) k "ACK_PLACE" + = Prelude.Just TransactionStatus'ACK_PLACE + | (Prelude.==) k "EXPIRED" = Prelude.Just TransactionStatus'EXPIRED + | (Prelude.==) k "IN_CANCEL" + = Prelude.Just TransactionStatus'IN_CANCEL + | (Prelude.==) k "ACK_CANCEL" + = Prelude.Just TransactionStatus'ACK_CANCEL + | (Prelude.==) k "REJECT_CANCEL" + = Prelude.Just TransactionStatus'REJECT_CANCEL + | (Prelude.==) k "IN_MODIFY" + = Prelude.Just TransactionStatus'IN_MODIFY + | (Prelude.==) k "ACK_MODIFY" + = Prelude.Just TransactionStatus'ACK_MODIFY + | (Prelude.==) k "REJECT_MODIFY" + = Prelude.Just TransactionStatus'REJECT_MODIFY + | (Prelude.==) k "FILL" = Prelude.Just TransactionStatus'FILL + | (Prelude.==) k "SUSPEND" = Prelude.Just TransactionStatus'SUSPEND + | (Prelude.==) k "FILL_CORRECT" + = Prelude.Just TransactionStatus'FILL_CORRECT + | (Prelude.==) k "FILL_CANCEL" + = Prelude.Just TransactionStatus'FILL_CANCEL + | (Prelude.==) k "FILL_BUST" + = Prelude.Just TransactionStatus'FILL_BUST + | (Prelude.==) k "ACTIVEAT" + = Prelude.Just TransactionStatus'ACTIVEAT + | (Prelude.==) k "DISCONNECT" + = Prelude.Just TransactionStatus'DISCONNECT + | (Prelude.==) k "SYNTHETIC_ACTIVATED" + = Prelude.Just TransactionStatus'SYNTHETIC_ACTIVATED + | (Prelude.==) k "UPDATE" = Prelude.Just TransactionStatus'UPDATE + | (Prelude.==) k "SYNTHETIC_FAILED" + = Prelude.Just TransactionStatus'SYNTHETIC_FAILED + | (Prelude.==) k "SYNTHETIC_OVERFILL" + = Prelude.Just TransactionStatus'SYNTHETIC_OVERFILL + | (Prelude.==) k "SYNTHETIC_HANG" + = Prelude.Just TransactionStatus'SYNTHETIC_HANG + | (Prelude.==) k "APPROVING" + = Prelude.Just TransactionStatus'APPROVING + | (Prelude.==) k "APPROVE_REQUESTED" + = Prelude.Just TransactionStatus'APPROVE_REQUESTED + | (Prelude.==) k "APPROVED_BY_EXCHANGE" + = Prelude.Just TransactionStatus'APPROVED_BY_EXCHANGE + | (Prelude.==) k "REJECTED_BY_USER" + = Prelude.Just TransactionStatus'REJECTED_BY_USER + | (Prelude.==) k "MATCHED" = Prelude.Just TransactionStatus'MATCHED + | (Prelude.==) k "TRADE_BROKEN" + = Prelude.Just TransactionStatus'TRADE_BROKEN + | (Prelude.==) k "TRADE_AMENDED" + = Prelude.Just TransactionStatus'TRADE_AMENDED + | Prelude.otherwise + = (Prelude.>>=) (Text.Read.readMaybe k) Data.ProtoLens.maybeToEnum +instance Prelude.Bounded TransactionStatus'Status where + minBound = TransactionStatus'IN_TRANSIT + maxBound = TransactionStatus'TRADE_AMENDED +instance Prelude.Enum TransactionStatus'Status where + toEnum k__ + = Prelude.maybe + (Prelude.error + ((Prelude.++) + "toEnum: unknown value for enum Status: " (Prelude.show k__))) + Prelude.id (Data.ProtoLens.maybeToEnum k__) + fromEnum TransactionStatus'IN_TRANSIT = 1 + fromEnum TransactionStatus'REJECTED = 2 + fromEnum TransactionStatus'ACK_PLACE = 3 + fromEnum TransactionStatus'EXPIRED = 4 + fromEnum TransactionStatus'IN_CANCEL = 5 + fromEnum TransactionStatus'ACK_CANCEL = 6 + fromEnum TransactionStatus'REJECT_CANCEL = 7 + fromEnum TransactionStatus'IN_MODIFY = 8 + fromEnum TransactionStatus'ACK_MODIFY = 9 + fromEnum TransactionStatus'REJECT_MODIFY = 10 + fromEnum TransactionStatus'FILL = 11 + fromEnum TransactionStatus'SUSPEND = 12 + fromEnum TransactionStatus'FILL_CORRECT = 13 + fromEnum TransactionStatus'FILL_CANCEL = 14 + fromEnum TransactionStatus'FILL_BUST = 15 + fromEnum TransactionStatus'ACTIVEAT = 16 + fromEnum TransactionStatus'DISCONNECT = 17 + fromEnum TransactionStatus'SYNTHETIC_ACTIVATED = 18 + fromEnum TransactionStatus'UPDATE = 19 + fromEnum TransactionStatus'SYNTHETIC_FAILED = 20 + fromEnum TransactionStatus'SYNTHETIC_OVERFILL = 21 + fromEnum TransactionStatus'SYNTHETIC_HANG = 22 + fromEnum TransactionStatus'APPROVING = 23 + fromEnum TransactionStatus'APPROVE_REQUESTED = 24 + fromEnum TransactionStatus'APPROVED_BY_EXCHANGE = 25 + fromEnum TransactionStatus'REJECTED_BY_USER = 26 + fromEnum TransactionStatus'MATCHED = 27 + fromEnum TransactionStatus'TRADE_BROKEN = 28 + fromEnum TransactionStatus'TRADE_AMENDED = 29 + succ TransactionStatus'TRADE_AMENDED + = Prelude.error + "TransactionStatus'Status.succ: bad argument TransactionStatus'TRADE_AMENDED. This value would be out of bounds." + succ TransactionStatus'IN_TRANSIT = TransactionStatus'REJECTED + succ TransactionStatus'REJECTED = TransactionStatus'ACK_PLACE + succ TransactionStatus'ACK_PLACE = TransactionStatus'EXPIRED + succ TransactionStatus'EXPIRED = TransactionStatus'IN_CANCEL + succ TransactionStatus'IN_CANCEL = TransactionStatus'ACK_CANCEL + succ TransactionStatus'ACK_CANCEL = TransactionStatus'REJECT_CANCEL + succ TransactionStatus'REJECT_CANCEL = TransactionStatus'IN_MODIFY + succ TransactionStatus'IN_MODIFY = TransactionStatus'ACK_MODIFY + succ TransactionStatus'ACK_MODIFY = TransactionStatus'REJECT_MODIFY + succ TransactionStatus'REJECT_MODIFY = TransactionStatus'FILL + succ TransactionStatus'FILL = TransactionStatus'SUSPEND + succ TransactionStatus'SUSPEND = TransactionStatus'FILL_CORRECT + succ TransactionStatus'FILL_CORRECT = TransactionStatus'FILL_CANCEL + succ TransactionStatus'FILL_CANCEL = TransactionStatus'FILL_BUST + succ TransactionStatus'FILL_BUST = TransactionStatus'ACTIVEAT + succ TransactionStatus'ACTIVEAT = TransactionStatus'DISCONNECT + succ TransactionStatus'DISCONNECT + = TransactionStatus'SYNTHETIC_ACTIVATED + succ TransactionStatus'SYNTHETIC_ACTIVATED + = TransactionStatus'UPDATE + succ TransactionStatus'UPDATE = TransactionStatus'SYNTHETIC_FAILED + succ TransactionStatus'SYNTHETIC_FAILED + = TransactionStatus'SYNTHETIC_OVERFILL + succ TransactionStatus'SYNTHETIC_OVERFILL + = TransactionStatus'SYNTHETIC_HANG + succ TransactionStatus'SYNTHETIC_HANG = TransactionStatus'APPROVING + succ TransactionStatus'APPROVING + = TransactionStatus'APPROVE_REQUESTED + succ TransactionStatus'APPROVE_REQUESTED + = TransactionStatus'APPROVED_BY_EXCHANGE + succ TransactionStatus'APPROVED_BY_EXCHANGE + = TransactionStatus'REJECTED_BY_USER + succ TransactionStatus'REJECTED_BY_USER = TransactionStatus'MATCHED + succ TransactionStatus'MATCHED = TransactionStatus'TRADE_BROKEN + succ TransactionStatus'TRADE_BROKEN + = TransactionStatus'TRADE_AMENDED + pred TransactionStatus'IN_TRANSIT + = Prelude.error + "TransactionStatus'Status.pred: bad argument TransactionStatus'IN_TRANSIT. This value would be out of bounds." + pred TransactionStatus'REJECTED = TransactionStatus'IN_TRANSIT + pred TransactionStatus'ACK_PLACE = TransactionStatus'REJECTED + pred TransactionStatus'EXPIRED = TransactionStatus'ACK_PLACE + pred TransactionStatus'IN_CANCEL = TransactionStatus'EXPIRED + pred TransactionStatus'ACK_CANCEL = TransactionStatus'IN_CANCEL + pred TransactionStatus'REJECT_CANCEL = TransactionStatus'ACK_CANCEL + pred TransactionStatus'IN_MODIFY = TransactionStatus'REJECT_CANCEL + pred TransactionStatus'ACK_MODIFY = TransactionStatus'IN_MODIFY + pred TransactionStatus'REJECT_MODIFY = TransactionStatus'ACK_MODIFY + pred TransactionStatus'FILL = TransactionStatus'REJECT_MODIFY + pred TransactionStatus'SUSPEND = TransactionStatus'FILL + pred TransactionStatus'FILL_CORRECT = TransactionStatus'SUSPEND + pred TransactionStatus'FILL_CANCEL = TransactionStatus'FILL_CORRECT + pred TransactionStatus'FILL_BUST = TransactionStatus'FILL_CANCEL + pred TransactionStatus'ACTIVEAT = TransactionStatus'FILL_BUST + pred TransactionStatus'DISCONNECT = TransactionStatus'ACTIVEAT + pred TransactionStatus'SYNTHETIC_ACTIVATED + = TransactionStatus'DISCONNECT + pred TransactionStatus'UPDATE + = TransactionStatus'SYNTHETIC_ACTIVATED + pred TransactionStatus'SYNTHETIC_FAILED = TransactionStatus'UPDATE + pred TransactionStatus'SYNTHETIC_OVERFILL + = TransactionStatus'SYNTHETIC_FAILED + pred TransactionStatus'SYNTHETIC_HANG + = TransactionStatus'SYNTHETIC_OVERFILL + pred TransactionStatus'APPROVING = TransactionStatus'SYNTHETIC_HANG + pred TransactionStatus'APPROVE_REQUESTED + = TransactionStatus'APPROVING + pred TransactionStatus'APPROVED_BY_EXCHANGE + = TransactionStatus'APPROVE_REQUESTED + pred TransactionStatus'REJECTED_BY_USER + = TransactionStatus'APPROVED_BY_EXCHANGE + pred TransactionStatus'MATCHED = TransactionStatus'REJECTED_BY_USER + pred TransactionStatus'TRADE_BROKEN = TransactionStatus'MATCHED + pred TransactionStatus'TRADE_AMENDED + = TransactionStatus'TRADE_BROKEN + enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom + enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo + enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen + enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo +instance Data.ProtoLens.FieldDefault TransactionStatus'Status where + fieldDefault = TransactionStatus'IN_TRANSIT +instance Control.DeepSeq.NFData TransactionStatus'Status where + rnf x__ = Prelude.seq x__ () +packedFileDescriptor :: Data.ByteString.ByteString +packedFileDescriptor + = "\n\ + \\NAKcommon/shared_1.proto\DC2\bshared_1\"Z\n\ + \\EOTText\DC2\DLE\n\ + \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC2\n\ + \\EOTtext\CAN\STX \SOH(\tR\EOTtext\DC2\SYN\n\ + \\ACKformat\CAN\ETX \SOH(\tR\ACKformat\DC2\DC4\n\ + \\ENQparam\CAN\EOT \ETX(\tR\ENQparam\"\180\STX\n\ + \\vOrderStatus\"\164\STX\n\ + \\ACKStatus\DC2\SO\n\ + \\n\ + \IN_TRANSIT\DLE\SOH\DC2\f\n\ + \\bREJECTED\DLE\STX\DC2\v\n\ + \\aWORKING\DLE\ETX\DC2\v\n\ + \\aEXPIRED\DLE\EOT\DC2\r\n\ + \\tIN_CANCEL\DLE\ENQ\DC2\r\n\ + \\tIN_MODIFY\DLE\ACK\DC2\r\n\ + \\tCANCELLED\DLE\a\DC2\n\ + \\n\ + \\ACKFILLED\DLE\b\DC2\r\n\ + \\tSUSPENDED\DLE\t\DC2\DLE\n\ + \\fDISCONNECTED\DLE\n\ + \\DC2\f\n\ + \\bACTIVEAT\DLE\v\DC2\DC4\n\ + \\DLEAPPROVE_REQUIRED\DLE\f\DC2\CAN\n\ + \\DC4APPROVED_BY_EXCHANGE\DLE\r\DC2\DC4\n\ + \\DLEAPPROVE_REJECTED\DLE\SO\DC2\v\n\ + \\aMATCHED\DLE\SI\DC2\NAK\n\ + \\DC1PARTIALLY_MATCHED\DLE\DLE\DC2\DLE\n\ + \\fTRADE_BROKEN\DLE\DC1\"\146\EOT\n\ + \\DC1TransactionStatus\"\252\ETX\n\ + \\ACKStatus\DC2\SO\n\ + \\n\ + \IN_TRANSIT\DLE\SOH\DC2\f\n\ + \\bREJECTED\DLE\STX\DC2\r\n\ + \\tACK_PLACE\DLE\ETX\DC2\v\n\ + \\aEXPIRED\DLE\EOT\DC2\r\n\ + \\tIN_CANCEL\DLE\ENQ\DC2\SO\n\ + \\n\ + \ACK_CANCEL\DLE\ACK\DC2\DC1\n\ + \\rREJECT_CANCEL\DLE\a\DC2\r\n\ + \\tIN_MODIFY\DLE\b\DC2\SO\n\ + \\n\ + \ACK_MODIFY\DLE\t\DC2\DC1\n\ + \\rREJECT_MODIFY\DLE\n\ + \\DC2\b\n\ + \\EOTFILL\DLE\v\DC2\v\n\ + \\aSUSPEND\DLE\f\DC2\DLE\n\ + \\fFILL_CORRECT\DLE\r\DC2\SI\n\ + \\vFILL_CANCEL\DLE\SO\DC2\r\n\ + \\tFILL_BUST\DLE\SI\DC2\f\n\ + \\bACTIVEAT\DLE\DLE\DC2\SO\n\ + \\n\ + \DISCONNECT\DLE\DC1\DC2\ETB\n\ + \\DC3SYNTHETIC_ACTIVATED\DLE\DC2\DC2\n\ + \\n\ + \\ACKUPDATE\DLE\DC3\DC2\DC4\n\ + \\DLESYNTHETIC_FAILED\DLE\DC4\DC2\SYN\n\ + \\DC2SYNTHETIC_OVERFILL\DLE\NAK\DC2\DC2\n\ + \\SOSYNTHETIC_HANG\DLE\SYN\DC2\r\n\ + \\tAPPROVING\DLE\ETB\DC2\NAK\n\ + \\DC1APPROVE_REQUESTED\DLE\CAN\DC2\CAN\n\ + \\DC4APPROVED_BY_EXCHANGE\DLE\EM\DC2\DC4\n\ + \\DLEREJECTED_BY_USER\DLE\SUB\DC2\v\n\ + \\aMATCHED\DLE\ESC\DC2\DLE\n\ + \\fTRADE_BROKEN\DLE\FS\DC2\DC1\n\ + \\rTRADE_AMENDED\DLE\GS\".\n\ + \\rSignOnRequest\DC2\GS\n\ + \\n\ + \access_key\CAN\SOH \STX(\tR\taccessKey\"\129\SOH\n\ + \\fSignOnResult\DC2\US\n\ + \\vresult_code\CAN\SOH \STX(\rR\n\ + \resultCode\DC2(\n\ + \\adetails\CAN\STX \SOH(\v2\SO.shared_1.TextR\adetails\"&\n\ + \\n\ + \ResultCode\DC2\v\n\ + \\aSUCCESS\DLE\NUL\DC2\v\n\ + \\aFAILURE\DLEe\"\DC4\n\ + \\DC2EntitlementRequest\"L\n\ + \\DC1EntitlementReport\DC27\n\ + \\ventitlement\CAN\SOH \ETX(\v2\NAK.shared_1.EntitlementR\ventitlement\"\147\STX\n\ + \\vEntitlement\DC2)\n\ + \\DLEentitlement_type\CAN\SOH \STX(\rR\SIentitlementType\DC2)\n\ + \\DLEentitlement_code\CAN\STX \STX(\tR\SIentitlementCode\DC2\CAN\n\ + \\adeleted\CAN\ETX \SOH(\bR\adeleted\"\147\SOH\n\ + \\SIEntitlementType\DC2\v\n\ + \\aFEATURE\DLE\b\DC2\b\n\ + \\EOTNEWS\DLE\n\ + \\DC2\n\ + \\n\ + \\ACKDJNEWS\DLE\SUB\DC2\v\n\ + \\aSTUDIES\DLE$\DC2\FS\n\ + \\CANMANAGE_SECURITY_METADATA\DLE1\DC2\FS\n\ + \\CANMANAGE_CONTRACT_METADATA\DLE2\DC2\DC4\n\ + \\DLEOTC_MANAGE_TAILS\DLE3\"\197\ETX\n\ + \\vDestination\DC2 \n\ + \\vdescription\CAN\SOH \SOH(\tR\vdescription\DC2B\n\ + \\DLEapple_push_notif\CAN\STX \SOH(\v2\CAN.shared_1.ApplePushNotifR\SOapplePushNotif\DC2E\n\ + \\DC1google_push_notif\CAN\ETX \SOH(\v2\EM.shared_1.GooglePushNotifR\SIgooglePushNotif\DC25\n\ + \\vemail_notif\CAN\EOT \SOH(\v2\DC4.shared_1.EmailNotifR\n\ + \emailNotif\DC2O\n\ + \\DC3profile_email_notif\CAN\ACK \SOH(\v2\US.shared_1.EmailFromProfileNotifR\DC1profileEmailNotif\DC2/\n\ + \\tsms_notif\CAN\ENQ \SOH(\v2\DC2.shared_1.SmsNotifR\bsmsNotif\DC2P\n\ + \\DC1profile_sms_notif\CAN\a \SOH(\v2$.shared_1.SmsToPhoneFromProfileNotifR\SIprofileSmsNotif\"J\n\ + \\SOApplePushNotif\DC2!\n\ + \\fdevice_token\CAN\SOH \STX(\tR\vdeviceToken\DC2\NAK\n\ + \\ACKapp_id\CAN\STX \STX(\tR\ENQappId\"]\n\ + \\SIGooglePushNotif\DC2-\n\ + \\DC2registration_token\CAN\SOH \STX(\tR\DC1registrationToken\DC2\ESC\n\ + \\tsender_id\CAN\STX \STX(\tR\bsenderId\"b\n\ + \\DC4NotificationProperty\DC2#\n\ + \\rproperty_name\CAN\SOH \STX(\tR\fpropertyName\DC2%\n\ + \\SOproperty_value\CAN\STX \STX(\tR\rpropertyValue\",\n\ + \\n\ + \EmailNotif\DC2\RS\n\ + \\n\ + \recipients\CAN\SOH \ETX(\tR\n\ + \recipients\"\ETB\n\ + \\NAKEmailFromProfileNotif\"-\n\ + \\bSmsNotif\DC2!\n\ + \\fphone_number\CAN\SOH \STX(\tR\vphoneNumber\"\FS\n\ + \\SUBSmsToPhoneFromProfileNotif\"W\n\ + \\n\ + \NamedValue\DC2\DC2\n\ + \\EOTname\CAN\SOH \STX(\tR\EOTname\DC2\DC4\n\ + \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue\DC2\US\n\ + \\adeleted\CAN\ETX \SOH(\b:\ENQfalseR\adeletedJ\245g\n\ + \\a\DC2\ENQ\STX\NUL\138\ETX\SOH\n\ + \9\n\ + \\SOH\f\DC2\ETX\STX\NUL\DC2\SUB/ Entities shared between different protocols.\n\ + \\n\ + \\n\ + \\b\n\ + \\SOH\STX\DC2\ETX\EOT\NUL\DC1\n\ + \\154\SOH\n\ + \\STX\EOT\NUL\DC2\EOT\n\ + \\NUL\US\SOH\SUBS Text with a unique key. Possible text messages are listed in a separate document.\n\ + \29//------------------------------------------\n\ + \// Entities\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\NUL\SOH\DC2\ETX\n\ + \\b\f\n\ + \\"\n\ + \\EOT\EOT\NUL\STX\NUL\DC2\ETX\r\ETX\ESC\SUB\NAK Message unique key.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\EOT\DC2\ETX\r\ETX\v\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX\r\f\DC2\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\r\DC3\SYN\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\r\EM\SUB\n\ + \\FS\n\ + \\EOT\EOT\NUL\STX\SOH\DC2\ETX\DLE\ETX\FS\SUB\SI Message text.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\EOT\DC2\ETX\DLE\ETX\v\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX\DLE\f\DC2\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\DLE\DC3\ETB\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\DLE\SUB\ESC\n\ + \\211\STX\n\ + \\EOT\EOT\NUL\STX\STX\DC2\ETX\SYN\ETX\RS\SUB\197\STX Optional message format string which is sent only if a message has parameters.\n\ + \ Format is defined as a sample for localized clients to replace it with a translated version\n\ + \ and compose a message using variable parameters.\n\ + \ Format string sample: \"The request is rejected because %1% limit of %2% per %3% seconds is exceeded\"\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\EOT\DC2\ETX\SYN\ETX\v\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX\SYN\f\DC2\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX\SYN\DC3\EM\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX\SYN\FS\GS\n\ + \\191\EOT\n\ + \\EOT\EOT\NUL\STX\ETX\DC2\ETX\RS\ETX\GS\SUB\177\EOT Optional list of format string parameters ordered according to the format string placeholders.\n\ + \ E.g. parameters for the sample format string above could be: [\"request rate\", \"1000\", \"10\"].\n\ + \ Note: float numbers are always defined in decimal format with a dot separator like \"23434.34\"\n\ + \ and date and time in extended ISO 8601 format as \"2016-11-09 15:11:20.323\" (time part is optional for\n\ + \ dates, date part is optional for time only, seconds in time part also may not have fractional part).\n\ + \ Client can convert these values to different formats if they need to.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\EOT\DC2\ETX\RS\ETX\v\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ENQ\DC2\ETX\RS\f\DC2\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX\RS\DC3\CAN\n\ + \\f\n\ + \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX\RS\ESC\FS\n\ + \\137\SOH\n\ + \\STX\EOT\SOH\DC2\EOT&\NULd\SOH\SUB> Message for holding OrderStatus enum values as a name space.\n\ + \2=//------------------------------------------\n\ + \// Enumerations\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\SOH\SOH\DC2\ETX&\b\DC3\n\ + \$\n\ + \\EOT\EOT\SOH\EOT\NUL\DC2\EOT)\ETXc\EOT\SUB\SYN Status of the order.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\SOH\EOT\NUL\SOH\DC2\ETX)\b\SO\n\ + \<\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\NUL\DC2\ETX,\ACK\NAK\SUB- Original order is sent to execution system.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\NUL\SOH\DC2\ETX,\ACK\DLE\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\NUL\STX\DC2\ETX,\DC3\DC4\n\ + \#\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\SOH\DC2\ETX/\ACK\DC3\SUB\DC4 Order is rejected.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\SOH\SOH\DC2\ETX/\ACK\SO\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\SOH\STX\DC2\ETX/\DC1\DC2\n\ + \X\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\STX\DC2\ETX2\ACK\DC2\SUBI Order is acknowledged by execution system and perhaps partially filled.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\STX\SOH\DC2\ETX2\ACK\r\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\STX\STX\DC2\ETX2\DLE\DC1\n\ + \\"\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\ETX\DC2\ETX5\ACK\DC2\SUB\DC3 Order is expired.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\ETX\SOH\DC2\ETX5\ACK\r\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\ETX\STX\DC2\ETX5\DLE\DC1\n\ + \<\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\EOT\DC2\ETX8\ACK\DC4\SUB- Cancel request is sent to execution system.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\EOT\SOH\DC2\ETX8\ACK\SI\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\EOT\STX\DC2\ETX8\DC2\DC3\n\ + \<\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\ENQ\DC2\ETX;\ACK\DC4\SUB- Modify request is sent to execution system.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\ENQ\SOH\DC2\ETX;\ACK\SI\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\ENQ\STX\DC2\ETX;\DC2\DC3\n\ + \#\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\ACK\DC2\ETX>\ACK\DC4\SUB\DC4 Order is canceled.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\ACK\SOH\DC2\ETX>\ACK\SI\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\ACK\STX\DC2\ETX>\DC2\DC3\n\ + \@\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\a\DC2\ETXA\ACK\DC1\SUB1 Order is completely filled by execution system.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\a\SOH\DC2\ETXA\ACK\f\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\a\STX\DC2\ETXA\SI\DLE\n\ + \A\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\b\DC2\ETXD\ACK\DC4\SUB2 Order is waiting submission to execution system.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\b\SOH\DC2\ETXD\ACK\SI\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\b\STX\DC2\ETXD\DC2\DC3\n\ + \E\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\t\DC2\ETXG\ACK\CAN\SUB6 Order may be canceled because a disconnect occurred.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\t\SOH\DC2\ETXG\ACK\DC2\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\t\STX\DC2\ETXG\NAK\ETB\n\ + \o\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\n\ + \\DC2\ETXJ\ACK\DC4\SUB` Order will be placed at a specified time (waiting execution system to start accepting orders).\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\n\ + \\SOH\DC2\ETXJ\ACK\SO\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\n\ + \\STX\DC2\ETXJ\DC1\DC3\n\ + \o\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\v\DC2\ETXM\ACK\FS\SUB` Cross order is sent to exchange and waiting for approval from exchange and/or counter-parties.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\v\SOH\DC2\ETXM\ACK\SYN\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\v\STX\DC2\ETXM\EM\ESC\n\ + \\238\SOH\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\f\DC2\ETXR\ACK \SUB\222\SOH The exchange approved the cross order.\n\ + \ Note that this approve relates only to the sides/participants specified in the order.\n\ + \ Thus, it is not implied the exchange approved the other sides of the order (counter-parties).\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\f\SOH\DC2\ETXR\ACK\SUB\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\f\STX\DC2\ETXR\GS\US\n\ + \\243\SOH\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\r\DC2\ETXW\ACK\FS\SUB\227\SOH Cross order is rejected by one of its participants.\n\ + \ Note that if a participant rejects its own side of the cross order, the counter-parties may not receive\n\ + \ any reject messages if exchange does not support this notification.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\r\SOH\DC2\ETXW\ACK\SYN\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\r\STX\DC2\ETXW\EM\ESC\n\ + \\179\SOH\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\SO\DC2\ETX[\ACK\DC3\SUB\163\SOH Cross order is completely executed on exchange, this is the final state of the cross order unless any of its\n\ + \ trades/legs is subsequently broken by the exchange.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\SO\SOH\DC2\ETX[\ACK\r\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\SO\STX\DC2\ETX[\DLE\DC2\n\ + \\135\SOH\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\SI\DC2\ETX_\ACK\GS\SUBx Cross order/leg is executed on exchange, this is transit state until all transactions for trades/breaks are\n\ + \ received.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\SI\SOH\DC2\ETX_\ACK\ETB\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\SI\STX\DC2\ETX_\SUB\FS\n\ + \t\n\ + \\ACK\EOT\SOH\EOT\NUL\STX\DLE\DC2\ETXb\ACK\CAN\SUBe Cross order was executed on exchange, but now all its trades/legs have been broken by the exchange.\n\ + \\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\DLE\SOH\DC2\ETXb\ACK\DC2\n\ + \\SO\n\ + \\a\EOT\SOH\EOT\NUL\STX\DLE\STX\DC2\ETXb\NAK\ETB\n\ + \Q\n\ + \\STX\EOT\STX\DC2\ENQg\NUL\205\SOH\SOH\SUBD Message for holding TransactionStatus enum values as a name space.\n\ + \\n\ + \\n\ + \\n\ + \\ETX\EOT\STX\SOH\DC2\ETXg\b\EM\n\ + \+\n\ + \\EOT\EOT\STX\EOT\NUL\DC2\ENQj\ETX\204\SOH\EOT\SUB\FS Status of the transaction.\n\ + \\n\ + \\f\n\ + \\ENQ\EOT\STX\EOT\NUL\SOH\DC2\ETXj\b\SO\n\ + \<\n\ + \\ACK\EOT\STX\EOT\NUL\STX\NUL\DC2\ETXm\ACK\NAK\SUB- Original order is sent to execution system.\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\NUL\SOH\DC2\ETXm\ACK\DLE\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\NUL\STX\DC2\ETXm\DC3\DC4\n\ + \8\n\ + \\ACK\EOT\STX\EOT\NUL\STX\SOH\DC2\ETXp\ACK\DC3\SUB) Original order is rejected (exception).\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\SOH\SOH\DC2\ETXp\ACK\SO\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\SOH\STX\DC2\ETXp\DC1\DC2\n\ + \;\n\ + \\ACK\EOT\STX\EOT\NUL\STX\STX\DC2\ETXs\ACK\DC4\SUB, Order is acknowledged by execution system.\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\STX\SOH\DC2\ETXs\ACK\SI\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\STX\STX\DC2\ETXs\DC2\DC3\n\ + \.\n\ + \\ACK\EOT\STX\EOT\NUL\STX\ETX\DC2\ETXv\ACK\DC2\SUB\US Order is expired (exception).\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\ETX\SOH\DC2\ETXv\ACK\r\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\ETX\STX\DC2\ETXv\DLE\DC1\n\ + \<\n\ + \\ACK\EOT\STX\EOT\NUL\STX\EOT\DC2\ETXy\ACK\DC4\SUB- Cancel request is sent to execution system.\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\EOT\SOH\DC2\ETXy\ACK\SI\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\EOT\STX\DC2\ETXy\DC2\DC3\n\ + \<\n\ + \\ACK\EOT\STX\EOT\NUL\STX\ENQ\DC2\ETX|\ACK\NAK\SUB- Cancel is acknowledged by execution system.\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\ENQ\SOH\DC2\ETX|\ACK\DLE\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\ENQ\STX\DC2\ETX|\DC3\DC4\n\ + \8\n\ + \\ACK\EOT\STX\EOT\NUL\STX\ACK\DC2\ETX\DEL\ACK\CAN\SUB) Cancel request is rejected (exception).\n\ + \\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\ACK\SOH\DC2\ETX\DEL\ACK\DC3\n\ + \\SO\n\ + \\a\EOT\STX\EOT\NUL\STX\ACK\STX\DC2\ETX\DEL\SYN\ETB\n\ + \=\n\ + \\ACK\EOT\STX\EOT\NUL\STX\a\DC2\EOT\130\SOH\ACK\DC4\SUB- Modify request is sent to execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\a\SOH\DC2\EOT\130\SOH\ACK\SI\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\a\STX\DC2\EOT\130\SOH\DC2\DC3\n\ + \=\n\ + \\ACK\EOT\STX\EOT\NUL\STX\b\DC2\EOT\133\SOH\ACK\NAK\SUB- Modify is acknowledged by execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\b\SOH\DC2\EOT\133\SOH\ACK\DLE\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\b\STX\DC2\EOT\133\SOH\DC3\DC4\n\ + \9\n\ + \\ACK\EOT\STX\EOT\NUL\STX\t\DC2\EOT\136\SOH\ACK\EM\SUB) Modify request is rejected (exception).\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\t\SOH\DC2\EOT\136\SOH\ACK\DC3\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\t\STX\DC2\EOT\136\SOH\SYN\CAN\n\ + \?\n\ + \\ACK\EOT\STX\EOT\NUL\STX\n\ + \\DC2\EOT\139\SOH\ACK\DLE\SUB/ Fill event is received from execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\n\ + \\SOH\DC2\EOT\139\SOH\ACK\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\n\ + \\STX\DC2\EOT\139\SOH\r\SI\n\ + \.\n\ + \\ACK\EOT\STX\EOT\NUL\STX\v\DC2\EOT\142\SOH\ACK\DC3\SUB\RS Order is suspended (parked).\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\v\SOH\DC2\EOT\142\SOH\ACK\r\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\v\STX\DC2\EOT\142\SOH\DLE\DC2\n\ + \/\n\ + \\ACK\EOT\STX\EOT\NUL\STX\f\DC2\EOT\145\SOH\ACK\CAN\SUB\US Referenced fill is corrected.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\f\SOH\DC2\EOT\145\SOH\ACK\DC2\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\f\STX\DC2\EOT\145\SOH\NAK\ETB\n\ + \:\n\ + \\ACK\EOT\STX\EOT\NUL\STX\r\DC2\EOT\148\SOH\ACK\ETB\SUB* Referenced fill is canceled (exception).\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\r\SOH\DC2\EOT\148\SOH\ACK\DC1\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\r\STX\DC2\EOT\148\SOH\DC4\SYN\n\ + \8\n\ + \\ACK\EOT\STX\EOT\NUL\STX\SO\DC2\EOT\151\SOH\ACK\NAK\SUB( Referenced fill is busted (exception).\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\SO\SOH\DC2\EOT\151\SOH\ACK\SI\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\SO\STX\DC2\EOT\151\SOH\DC2\DC4\n\ + \L\n\ + \\ACK\EOT\STX\EOT\NUL\STX\SI\DC2\EOT\154\SOH\ACK\DC4\SUB< Acknowledgment that order will activate at specified time.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\SI\SOH\DC2\EOT\154\SOH\ACK\SO\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\SI\STX\DC2\EOT\154\SOH\DC1\DC3\n\ + \R\n\ + \\ACK\EOT\STX\EOT\NUL\STX\DLE\DC2\EOT\157\SOH\ACK\SYN\SUBB Order may be canceled because a disconnect occurred (exception).\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\DLE\SOH\DC2\EOT\157\SOH\ACK\DLE\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\DLE\STX\DC2\EOT\157\SOH\DC3\NAK\n\ + \J\n\ + \\ACK\EOT\STX\EOT\NUL\STX\DC1\DC2\EOT\160\SOH\ACK\US\SUB: Synthetic order was sent to the actual execution system.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\DC1\SOH\DC2\EOT\160\SOH\ACK\EM\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\DC1\STX\DC2\EOT\160\SOH\FS\RS\n\ + \>\n\ + \\ACK\EOT\STX\EOT\NUL\STX\DC2\DC2\EOT\163\SOH\ACK\DC2\SUB. Order status and/ or attributes are updated.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\DC2\SOH\DC2\EOT\163\SOH\ACK\f\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\DC2\STX\DC2\EOT\163\SOH\SI\DC1\n\ + \\168\STX\n\ + \\ACK\EOT\STX\EOT\NUL\STX\DC3\DC2\EOT\169\SOH\ACK\FS\SUB\151\STX Synthetic strategy execution failed, expect 'text_message'\n\ + \ attribute with further details. The client may identify outright orders used\n\ + \ when attempting to execute the synthetic strategy by finding orders in its\n\ + \ book where OrderStatus.origin_order_id == OrderStatus.order_id.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\DC3\SOH\DC2\EOT\169\SOH\ACK\SYN\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\DC3\STX\DC2\EOT\169\SOH\EM\ESC\n\ + \t\n\ + \\ACK\EOT\STX\EOT\NUL\STX\DC4\DC2\EOT\172\SOH\ACK\RS\SUBd Synthetic strategy order has at least one overfilled leg, 'synthetic_hang' attribute is populated.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\DC4\SOH\DC2\EOT\172\SOH\ACK\CAN\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\DC4\STX\DC2\EOT\172\SOH\ESC\GS\n\ + \K\n\ + \\ACK\EOT\STX\EOT\NUL\STX\NAK\DC2\EOT\175\SOH\ACK\SUB\SUB; Hanging quantity update for the synthetic strategy order.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\NAK\SOH\DC2\EOT\175\SOH\ACK\DC4\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\NAK\STX\DC2\EOT\175\SOH\ETB\EM\n\ + \\153\STX\n\ + \\ACK\EOT\STX\EOT\NUL\STX\SYN\DC2\EOT\180\SOH\ACK\NAK\SUB\136\STX Cross order is in OrderStatus.APPROVE_REQUIRED and TransactionStatus.APPROVING state when it is\n\ + \ acknowledged by exchange but waiting for approval from counter-parties.\n\ + \ Note: if exchange does not support this status, APPROVED_BY_EXCHANGE status is sent instead.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\SYN\SOH\DC2\EOT\180\SOH\ACK\SI\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\SYN\STX\DC2\EOT\180\SOH\DC2\DC4\n\ + \\225\SOH\n\ + \\ACK\EOT\STX\EOT\NUL\STX\ETB\DC2\EOT\184\SOH\ACK\GS\SUB\208\SOH Cross order is in OrderStatus.APPROVE_REQUIRED and TransactionStatus.APPROVE_REQUESTED state when\n\ + \ it is waiting for approval from the client (i.e. from the side/participant that received this transaction).\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\ETB\SOH\DC2\EOT\184\SOH\ACK\ETB\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\ETB\STX\DC2\EOT\184\SOH\SUB\FS\n\ + \\239\SOH\n\ + \\ACK\EOT\STX\EOT\NUL\STX\CAN\DC2\EOT\189\SOH\ACK \SUB\222\SOH The exchange approved the cross order.\n\ + \ Note that this approve relates only to the sides/participants specified in the order.\n\ + \ Thus, it is not implied the exchange approved the other sides of the order (counter-parties).\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\CAN\SOH\DC2\EOT\189\SOH\ACK\SUB\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\CAN\STX\DC2\EOT\189\SOH\GS\US\n\ + \\244\SOH\n\ + \\ACK\EOT\STX\EOT\NUL\STX\EM\DC2\EOT\194\SOH\ACK\FS\SUB\227\SOH Cross order is rejected by one of its participants.\n\ + \ Note that if a participant rejects its own side of the cross order, the counter-parties may not receive\n\ + \ any reject messages if exchange does not support this notification.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\EM\SOH\DC2\EOT\194\SOH\ACK\SYN\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\EM\STX\DC2\EOT\194\SOH\EM\ESC\n\ + \6\n\ + \\ACK\EOT\STX\EOT\NUL\STX\SUB\DC2\EOT\197\SOH\ACK\DC3\SUB& Cross order is executed on exchange.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\SUB\SOH\DC2\EOT\197\SOH\ACK\r\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\SUB\STX\DC2\EOT\197\SOH\DLE\DC2\n\ + \C\n\ + \\ACK\EOT\STX\EOT\NUL\STX\ESC\DC2\EOT\200\SOH\ACK\CAN\SUB3 Cross order/leg have been broken by the exchange.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\ESC\SOH\DC2\EOT\200\SOH\ACK\DC2\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\ESC\STX\DC2\EOT\200\SOH\NAK\ETB\n\ + \W\n\ + \\ACK\EOT\STX\EOT\NUL\STX\FS\DC2\EOT\203\SOH\ACK\EM\SUBG Previously matched cross order/leg have been amended by the exchange.\n\ + \\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\FS\SOH\DC2\EOT\203\SOH\ACK\DC3\n\ + \\SI\n\ + \\a\EOT\STX\EOT\NUL\STX\FS\STX\DC2\EOT\203\SOH\SYN\CAN\n\ + \t\n\ + \\STX\EOT\ETX\DC2\ACK\211\SOH\NUL\214\SOH\SOH\SUB# Initial message to obtain access.\n\ + \2A//------------------------------------------\n\ + \// Sign On messages\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ETX\SOH\DC2\EOT\211\SOH\b\NAK\n\ + \\f\n\ + \\EOT\EOT\ETX\STX\NUL\DC2\EOT\213\SOH\ETX\"\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\EOT\DC2\EOT\213\SOH\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\EOT\213\SOH\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\EOT\213\SOH\DC3\GS\n\ + \\r\n\ + \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\EOT\213\SOH !\n\ + \\US\n\ + \\STX\EOT\EOT\DC2\ACK\217\SOH\NUL\235\SOH\SOH\SUB\DC1 Sign On result.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\EOT\SOH\DC2\EOT\217\SOH\b\DC4\n\ + \\SO\n\ + \\EOT\EOT\EOT\EOT\NUL\DC2\ACK\219\SOH\ETX\227\SOH\EOT\n\ + \\r\n\ + \\ENQ\EOT\EOT\EOT\NUL\SOH\DC2\EOT\219\SOH\b\DC2\n\ + \*\n\ + \\ACK\EOT\EOT\EOT\NUL\STX\NUL\DC2\EOT\222\SOH\ACK\DC2\SUB\SUB/ success codes (0 - 100)\n\ + \\n\ + \\SI\n\ + \\a\EOT\EOT\EOT\NUL\STX\NUL\SOH\DC2\EOT\222\SOH\ACK\r\n\ + \\SI\n\ + \\a\EOT\EOT\EOT\NUL\STX\NUL\STX\DC2\EOT\222\SOH\DLE\DC1\n\ + \:\n\ + \\ACK\EOT\EOT\EOT\NUL\STX\SOH\DC2\EOT\226\SOH\ACK\DC4\SUB*// failure codes (100+)\n\ + \ General failure.\n\ + \\n\ + \\SI\n\ + \\a\EOT\EOT\EOT\NUL\STX\SOH\SOH\DC2\EOT\226\SOH\ACK\r\n\ + \\SI\n\ + \\a\EOT\EOT\EOT\NUL\STX\SOH\STX\DC2\EOT\226\SOH\DLE\DC3\n\ + \Q\n\ + \\EOT\EOT\EOT\STX\NUL\DC2\EOT\231\SOH\ETX#\SUBC Operation status.\n\ + \ This field is associated with ResultCode enum.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\EOT\DC2\EOT\231\SOH\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\EOT\231\SOH\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\EOT\231\SOH\DC3\RS\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\EOT\231\SOH!\"\n\ + \\"\n\ + \\EOT\EOT\EOT\STX\SOH\DC2\EOT\234\SOH\ETX&\SUB\DC4 Operation details.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\EOT\DC2\EOT\234\SOH\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\ACK\DC2\EOT\234\SOH\f\EM\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\EOT\234\SOH\SUB!\n\ + \\r\n\ + \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\EOT\234\SOH$%\n\ + \\142\SOH\n\ + \\STX\EOT\ENQ\DC2\ACK\241\SOH\NUL\243\SOH\SOH\SUB9 Request for a list of entitlements of the current user.\n\ + \2E//------------------------------------------\n\ + \// Entitlement messages\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ENQ\SOH\DC2\EOT\241\SOH\b\SUB\n\ + \G\n\ + \\STX\EOT\ACK\DC2\ACK\246\SOH\NUL\250\SOH\SOH\SUB9 Report with a list of entitlements of the current user.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\ACK\SOH\DC2\EOT\246\SOH\b\EM\n\ + \%\n\ + \\EOT\EOT\ACK\STX\NUL\DC2\EOT\249\SOH\ETX(\SUB\ETB List of entitlements.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\EOT\DC2\EOT\249\SOH\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\ACK\DC2\EOT\249\SOH\f\ETB\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\EOT\249\SOH\CAN#\n\ + \\r\n\ + \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\EOT\249\SOH&'\n\ + \\f\n\ + \\STX\EOT\a\DC2\ACK\252\SOH\NUL\164\STX\SOH\n\ + \\v\n\ + \\ETX\EOT\a\SOH\DC2\EOT\252\SOH\b\DC3\n\ + \\SO\n\ + \\EOT\EOT\a\EOT\NUL\DC2\ACK\254\SOH\ETX\154\STX\EOT\n\ + \\r\n\ + \\ENQ\EOT\a\EOT\NUL\SOH\DC2\EOT\254\SOH\b\ETB\n\ + \L\n\ + \\ACK\EOT\a\EOT\NUL\STX\NUL\DC2\EOT\130\STX\a\DC3\SUB< Feature entitlement.\n\ + \ The code points to a feature number.\n\ + \\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\NUL\SOH\DC2\EOT\130\STX\a\SO\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\NUL\STX\DC2\EOT\130\STX\DC1\DC2\n\ + \N\n\ + \\ACK\EOT\a\EOT\NUL\STX\SOH\DC2\EOT\134\STX\a\DC1\SUB> News entitlement.\n\ + \ The code points to the enabled news feed.\n\ + \\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\SOH\SOH\DC2\EOT\134\STX\a\v\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\SOH\STX\DC2\EOT\134\STX\SO\DLE\n\ + \N\n\ + \\ACK\EOT\a\EOT\NUL\STX\STX\DC2\EOT\138\STX\a\DC3\SUB> Dow Jones news entitlement\n\ + \ The code points to DJ news feed.\n\ + \\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\STX\SOH\DC2\EOT\138\STX\a\r\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\STX\STX\DC2\EOT\138\STX\DLE\DC2\n\ + \\SUB\n\ + \\ACK\EOT\a\EOT\NUL\STX\ETX\DC2\EOT\141\STX\a\DC4\SUB\n\ + \ Studies.\n\ + \\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\ETX\SOH\DC2\EOT\141\STX\a\SO\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\ETX\STX\DC2\EOT\141\STX\DC1\DC3\n\ + \e\n\ + \\ACK\EOT\a\EOT\NUL\STX\EOT\DC2\EOT\145\STX\a%\SUBU Manage metadata on a security (prefix) level.\n\ + \ The code points to a contributor id.\n\ + \\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\EOT\SOH\DC2\EOT\145\STX\a\US\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\EOT\STX\DC2\EOT\145\STX\"$\n\ + \\\\n\ + \\ACK\EOT\a\EOT\NUL\STX\ENQ\DC2\EOT\149\STX\a%\SUBL Manage metadata on a contract level.\n\ + \ The code points to a contributor id.\n\ + \\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\ENQ\SOH\DC2\EOT\149\STX\a\US\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\ENQ\STX\DC2\EOT\149\STX\"$\n\ + \P\n\ + \\ACK\EOT\a\EOT\NUL\STX\ACK\DC2\EOT\153\STX\a\GS\SUB@ Manage OTC state.\n\ + \ The code points to a group of OTC services.\n\ + \\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\ACK\SOH\DC2\EOT\153\STX\a\ETB\n\ + \\SI\n\ + \\a\EOT\a\EOT\NUL\STX\ACK\STX\DC2\EOT\153\STX\SUB\FS\n\ + \\144\SOH\n\ + \\EOT\EOT\a\STX\NUL\DC2\EOT\157\STX\ETX(\SUB\129\SOH This value is associated with EntitlementType enum.\n\ + \ Ignore Entitlement entry if entitlement_type is not one of EntitlementType\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\EOT\DC2\EOT\157\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\ENQ\DC2\EOT\157\STX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\SOH\DC2\EOT\157\STX\DC3#\n\ + \\r\n\ + \\ENQ\EOT\a\STX\NUL\ETX\DC2\EOT\157\STX&'\n\ + \2\n\ + \\EOT\EOT\a\STX\SOH\DC2\EOT\160\STX\ETX(\SUB$ The code that depends on the type.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\EOT\DC2\EOT\160\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\ENQ\DC2\EOT\160\STX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\SOH\DC2\EOT\160\STX\DC3#\n\ + \\r\n\ + \\ENQ\EOT\a\STX\SOH\ETX\DC2\EOT\160\STX&'\n\ + \G\n\ + \\EOT\EOT\a\STX\STX\DC2\EOT\163\STX\ETX\GS\SUB9 Deleted flag is used in updates when entity is removed.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\EOT\DC2\EOT\163\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\ENQ\DC2\EOT\163\STX\f\DLE\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\SOH\DC2\EOT\163\STX\DC1\CAN\n\ + \\r\n\ + \\ENQ\EOT\a\STX\STX\ETX\DC2\EOT\163\STX\ESC\FS\n\ + \\175\SOH\n\ + \\STX\EOT\b\DC2\ACK\171\STX\NUL\193\STX\SOH\SUBL Destination specification.\n\ + \ Only one type of destination can be specified.\n\ + \2S//------------------------------------------\n\ + \// Notification destination entities.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\b\SOH\DC2\EOT\171\STX\b\DC3\n\ + \1\n\ + \\EOT\EOT\b\STX\NUL\DC2\EOT\174\STX\ETX#\SUB# Optional destination description.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\EOT\DC2\EOT\174\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\ENQ\DC2\EOT\174\STX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\SOH\DC2\EOT\174\STX\DC3\RS\n\ + \\r\n\ + \\ENQ\EOT\b\STX\NUL\ETX\DC2\EOT\174\STX!\"\n\ + \2\n\ + \\EOT\EOT\b\STX\SOH\DC2\EOT\177\STX\ETX0\SUB$ APN destination (for iOS devices).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\EOT\DC2\EOT\177\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\ACK\DC2\EOT\177\STX\f\SUB\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\SOH\DC2\EOT\177\STX\ESC+\n\ + \\r\n\ + \\ENQ\EOT\b\STX\SOH\ETX\DC2\EOT\177\STX./\n\ + \6\n\ + \\EOT\EOT\b\STX\STX\DC2\EOT\180\STX\ETX2\SUB( GCM destination (for Android devices).\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\EOT\DC2\EOT\180\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\ACK\DC2\EOT\180\STX\f\ESC\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\SOH\DC2\EOT\180\STX\FS-\n\ + \\r\n\ + \\ENQ\EOT\b\STX\STX\ETX\DC2\EOT\180\STX01\n\ + \\"\n\ + \\EOT\EOT\b\STX\ETX\DC2\EOT\183\STX\ETX'\SUB\DC4 Email destination.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\EOT\DC2\EOT\183\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\ACK\DC2\EOT\183\STX\f\SYN\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\SOH\DC2\EOT\183\STX\ETB\"\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ETX\ETX\DC2\EOT\183\STX%&\n\ + \G\n\ + \\EOT\EOT\b\STX\EOT\DC2\EOT\186\STX\ETX:\SUB9 Notification to an email specified in trader's profile.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\EOT\EOT\DC2\EOT\186\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\b\STX\EOT\ACK\DC2\EOT\186\STX\f!\n\ + \\r\n\ + \\ENQ\EOT\b\STX\EOT\SOH\DC2\EOT\186\STX\"5\n\ + \\r\n\ + \\ENQ\EOT\b\STX\EOT\ETX\DC2\EOT\186\STX89\n\ + \\DC4\n\ + \\EOT\EOT\b\STX\ENQ\DC2\EOT\189\STX\ETX#\SUB\ACK SMS.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ENQ\EOT\DC2\EOT\189\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ENQ\ACK\DC2\EOT\189\STX\f\DC4\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ENQ\SOH\DC2\EOT\189\STX\NAK\RS\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ENQ\ETX\DC2\EOT\189\STX!\"\n\ + \Q\n\ + \\EOT\EOT\b\STX\ACK\DC2\EOT\192\STX\ETX>\SUBC Sms notification to a phone number specified in trader's profile.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ACK\EOT\DC2\EOT\192\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ACK\ACK\DC2\EOT\192\STX\f&\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ACK\SOH\DC2\EOT\192\STX(9\n\ + \\r\n\ + \\ENQ\EOT\b\STX\ACK\ETX\DC2\EOT\192\STX<=\n\ + \2\n\ + \\STX\EOT\t\DC2\ACK\196\STX\NUL\203\STX\SOH\SUB$ Push notification for iOS devices.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\t\SOH\DC2\EOT\196\STX\b\SYN\n\ + \ \n\ + \\EOT\EOT\t\STX\NUL\DC2\EOT\199\STX\ETX$\SUB\DC2 iOS device token\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\EOT\DC2\EOT\199\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\ENQ\DC2\EOT\199\STX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\SOH\DC2\EOT\199\STX\DC3\US\n\ + \\r\n\ + \\ENQ\EOT\t\STX\NUL\ETX\DC2\EOT\199\STX\"#\n\ + \\"\n\ + \\EOT\EOT\t\STX\SOH\DC2\EOT\202\STX\ETX\RS\SUB\DC4 APN application ID\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\EOT\DC2\EOT\202\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\ENQ\DC2\EOT\202\STX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\SOH\DC2\EOT\202\STX\DC3\EM\n\ + \\r\n\ + \\ENQ\EOT\t\STX\SOH\ETX\DC2\EOT\202\STX\FS\GS\n\ + \6\n\ + \\STX\EOT\n\ + \\DC2\ACK\206\STX\NUL\213\STX\SOH\SUB( Push notification for Android devices.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\n\ + \\SOH\DC2\EOT\206\STX\b\ETB\n\ + \=\n\ + \\EOT\EOT\n\ + \\STX\NUL\DC2\EOT\209\STX\ETX*\SUB/ registration token for Android device and app\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\EOT\DC2\EOT\209\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\ENQ\DC2\EOT\209\STX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\SOH\DC2\EOT\209\STX\DC3%\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\NUL\ETX\DC2\EOT\209\STX()\n\ + \\GS\n\ + \\EOT\EOT\n\ + \\STX\SOH\DC2\EOT\212\STX\ETX!\SUB\SI GCN sender id\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\EOT\DC2\EOT\212\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\ENQ\DC2\EOT\212\STX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\SOH\DC2\EOT\212\STX\DC3\FS\n\ + \\r\n\ + \\ENQ\EOT\n\ + \\STX\SOH\ETX\DC2\EOT\212\STX\US \n\ + \j\n\ + \\STX\EOT\v\DC2\ACK\216\STX\NUL\223\STX\SOH\SUB\\ Notification property (e.g. order related information for order event rule notifications).\n\ + \\n\ + \\v\n\ + \\ETX\EOT\v\SOH\DC2\EOT\216\STX\b\FS\n\ + \\RS\n\ + \\EOT\EOT\v\STX\NUL\DC2\EOT\219\STX\ETX%\SUB\DLE Property name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\EOT\DC2\EOT\219\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\ENQ\DC2\EOT\219\STX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\SOH\DC2\EOT\219\STX\DC3 \n\ + \\r\n\ + \\ENQ\EOT\v\STX\NUL\ETX\DC2\EOT\219\STX#$\n\ + \\US\n\ + \\EOT\EOT\v\STX\SOH\DC2\EOT\222\STX\ETX&\SUB\DC1 Property value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\EOT\DC2\EOT\222\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\ENQ\DC2\EOT\222\STX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\SOH\DC2\EOT\222\STX\DC3!\n\ + \\r\n\ + \\ENQ\EOT\v\STX\SOH\ETX\DC2\EOT\222\STX$%\n\ + \#\n\ + \\STX\EOT\f\DC2\ACK\226\STX\NUL\230\STX\SOH\SUB\NAK Email notification.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\f\SOH\DC2\EOT\226\STX\b\DC2\n\ + \X\n\ + \\EOT\EOT\f\STX\NUL\DC2\EOT\229\STX\ETX\"\SUBJ List of recipients to send email to. At least one entry must be present.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\EOT\DC2\EOT\229\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\ENQ\DC2\EOT\229\STX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\SOH\DC2\EOT\229\STX\DC3\GS\n\ + \\r\n\ + \\ENQ\EOT\f\STX\NUL\ETX\DC2\EOT\229\STX !\n\ + \\135\SOH\n\ + \\STX\EOT\r\DC2\ACK\234\STX\NUL\236\STX\SOH\SUBy Notification to an email specified in trader's profile\n\ + \ (to the first email in case there are multiple in the profile).\n\ + \\n\ + \\v\n\ + \\ETX\EOT\r\SOH\DC2\EOT\234\STX\b\GS\n\ + \!\n\ + \\STX\EOT\SO\DC2\ACK\239\STX\NUL\243\STX\SOH\SUB\DC3 Sms notification.\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SO\SOH\DC2\EOT\239\STX\b\DLE\n\ + \)\n\ + \\EOT\EOT\SO\STX\NUL\DC2\EOT\242\STX\ETX$\SUB\ESC Destination phone number.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\EOT\DC2\EOT\242\STX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\ENQ\DC2\EOT\242\STX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\SOH\DC2\EOT\242\STX\DC3\US\n\ + \\r\n\ + \\ENQ\EOT\SO\STX\NUL\ETX\DC2\EOT\242\STX\"#\n\ + \\153\SOH\n\ + \\STX\EOT\SI\DC2\ACK\247\STX\NUL\249\STX\SOH\SUB\138\SOH Sms notification to a phone number specified in trader's profile\n\ + \ (to the first phone number in case there are multiple in the profile).\n\ + \\n\ + \\v\n\ + \\ETX\EOT\SI\SOH\DC2\EOT\247\STX\b\"\n\ + \\154\SOH\n\ + \\STX\EOT\DLE\DC2\ACK\128\ETX\NUL\138\ETX\SOH\SUBC Named value that can be used for custom parameters or properties.\n\ + \2G//------------------------------------------\n\ + \// Misc reusable messages\n\ + \\n\ + \\v\n\ + \\ETX\EOT\DLE\SOH\DC2\EOT\128\ETX\b\DC2\n\ + \\US\n\ + \\EOT\EOT\DLE\STX\NUL\DC2\EOT\131\ETX\ETX\FS\SUB\DC1 Attribute name.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\EOT\DC2\EOT\131\ETX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\ENQ\DC2\EOT\131\ETX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\SOH\DC2\EOT\131\ETX\DC3\ETB\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\NUL\ETX\DC2\EOT\131\ETX\SUB\ESC\n\ + \ \n\ + \\EOT\EOT\DLE\STX\SOH\DC2\EOT\134\ETX\ETX\GS\SUB\DC2 Attribute value.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\EOT\DC2\EOT\134\ETX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\ENQ\DC2\EOT\134\ETX\f\DC2\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\SOH\DC2\EOT\134\ETX\DC3\CAN\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\SOH\ETX\DC2\EOT\134\ETX\ESC\FS\n\ + \A\n\ + \\EOT\EOT\DLE\STX\STX\DC2\EOT\137\ETX\ETX/\SUB3 An optional \"deleted\" flag for update operations.\n\ + \\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\EOT\DC2\EOT\137\ETX\ETX\v\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\ENQ\DC2\EOT\137\ETX\f\DLE\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\SOH\DC2\EOT\137\ETX\DC1\CAN\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\ETX\DC2\EOT\137\ETX\ESC\FS\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\b\DC2\EOT\137\ETX\GS.\n\ + \\r\n\ + \\ENQ\EOT\DLE\STX\STX\a\DC2\EOT\137\ETX(-" \ No newline at end of file diff --git a/cqg-cms-api-proto/src/Proto/Common/Shared1_Fields.hs b/cqg-cms-api-proto/src/Proto/Common/Shared1_Fields.hs new file mode 100644 index 0000000..2697b65 --- /dev/null +++ b/cqg-cms-api-proto/src/Proto/Common/Shared1_Fields.hs @@ -0,0 +1,288 @@ +{- This file was auto-generated from common/shared_1.proto by the proto-lens-protoc program. -} +{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-} +{-# OPTIONS_GHC -Wno-unused-imports#-} +{-# OPTIONS_GHC -Wno-duplicate-exports#-} +{-# OPTIONS_GHC -Wno-dodgy-exports#-} +module Proto.Common.Shared1_Fields where +import qualified Data.ProtoLens.Runtime.Prelude as Prelude +import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int +import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid +import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word +import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum +import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types +import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2 +import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked +import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text +import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map +import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString +import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8 +import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding +import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector +import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic +import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed +import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read +accessKey :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "accessKey" a) => + Lens.Family2.LensLike' f s a +accessKey = Data.ProtoLens.Field.field @"accessKey" +appId :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "appId" a) => + Lens.Family2.LensLike' f s a +appId = Data.ProtoLens.Field.field @"appId" +applePushNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "applePushNotif" a) => + Lens.Family2.LensLike' f s a +applePushNotif = Data.ProtoLens.Field.field @"applePushNotif" +deleted :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "deleted" a) => + Lens.Family2.LensLike' f s a +deleted = Data.ProtoLens.Field.field @"deleted" +description :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "description" a) => + Lens.Family2.LensLike' f s a +description = Data.ProtoLens.Field.field @"description" +details :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "details" a) => + Lens.Family2.LensLike' f s a +details = Data.ProtoLens.Field.field @"details" +deviceToken :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "deviceToken" a) => + Lens.Family2.LensLike' f s a +deviceToken = Data.ProtoLens.Field.field @"deviceToken" +emailNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "emailNotif" a) => + Lens.Family2.LensLike' f s a +emailNotif = Data.ProtoLens.Field.field @"emailNotif" +entitlement :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlement" a) => + Lens.Family2.LensLike' f s a +entitlement = Data.ProtoLens.Field.field @"entitlement" +entitlementCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlementCode" a) => + Lens.Family2.LensLike' f s a +entitlementCode = Data.ProtoLens.Field.field @"entitlementCode" +entitlementType :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "entitlementType" a) => + Lens.Family2.LensLike' f s a +entitlementType = Data.ProtoLens.Field.field @"entitlementType" +format :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "format" a) => + Lens.Family2.LensLike' f s a +format = Data.ProtoLens.Field.field @"format" +googlePushNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "googlePushNotif" a) => + Lens.Family2.LensLike' f s a +googlePushNotif = Data.ProtoLens.Field.field @"googlePushNotif" +key :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "key" a) => + Lens.Family2.LensLike' f s a +key = Data.ProtoLens.Field.field @"key" +maybe'applePushNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'applePushNotif" a) => + Lens.Family2.LensLike' f s a +maybe'applePushNotif + = Data.ProtoLens.Field.field @"maybe'applePushNotif" +maybe'deleted :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'deleted" a) => + Lens.Family2.LensLike' f s a +maybe'deleted = Data.ProtoLens.Field.field @"maybe'deleted" +maybe'description :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'description" a) => + Lens.Family2.LensLike' f s a +maybe'description = Data.ProtoLens.Field.field @"maybe'description" +maybe'details :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'details" a) => + Lens.Family2.LensLike' f s a +maybe'details = Data.ProtoLens.Field.field @"maybe'details" +maybe'emailNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'emailNotif" a) => + Lens.Family2.LensLike' f s a +maybe'emailNotif = Data.ProtoLens.Field.field @"maybe'emailNotif" +maybe'format :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'format" a) => + Lens.Family2.LensLike' f s a +maybe'format = Data.ProtoLens.Field.field @"maybe'format" +maybe'googlePushNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'googlePushNotif" a) => + Lens.Family2.LensLike' f s a +maybe'googlePushNotif + = Data.ProtoLens.Field.field @"maybe'googlePushNotif" +maybe'key :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'key" a) => + Lens.Family2.LensLike' f s a +maybe'key = Data.ProtoLens.Field.field @"maybe'key" +maybe'profileEmailNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profileEmailNotif" a) => + Lens.Family2.LensLike' f s a +maybe'profileEmailNotif + = Data.ProtoLens.Field.field @"maybe'profileEmailNotif" +maybe'profileSmsNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'profileSmsNotif" a) => + Lens.Family2.LensLike' f s a +maybe'profileSmsNotif + = Data.ProtoLens.Field.field @"maybe'profileSmsNotif" +maybe'smsNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'smsNotif" a) => + Lens.Family2.LensLike' f s a +maybe'smsNotif = Data.ProtoLens.Field.field @"maybe'smsNotif" +maybe'text :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'text" a) => + Lens.Family2.LensLike' f s a +maybe'text = Data.ProtoLens.Field.field @"maybe'text" +maybe'value :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "maybe'value" a) => + Lens.Family2.LensLike' f s a +maybe'value = Data.ProtoLens.Field.field @"maybe'value" +name :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "name" a) => + Lens.Family2.LensLike' f s a +name = Data.ProtoLens.Field.field @"name" +param :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "param" a) => + Lens.Family2.LensLike' f s a +param = Data.ProtoLens.Field.field @"param" +phoneNumber :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "phoneNumber" a) => + Lens.Family2.LensLike' f s a +phoneNumber = Data.ProtoLens.Field.field @"phoneNumber" +profileEmailNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileEmailNotif" a) => + Lens.Family2.LensLike' f s a +profileEmailNotif = Data.ProtoLens.Field.field @"profileEmailNotif" +profileSmsNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "profileSmsNotif" a) => + Lens.Family2.LensLike' f s a +profileSmsNotif = Data.ProtoLens.Field.field @"profileSmsNotif" +propertyName :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "propertyName" a) => + Lens.Family2.LensLike' f s a +propertyName = Data.ProtoLens.Field.field @"propertyName" +propertyValue :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "propertyValue" a) => + Lens.Family2.LensLike' f s a +propertyValue = Data.ProtoLens.Field.field @"propertyValue" +recipients :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "recipients" a) => + Lens.Family2.LensLike' f s a +recipients = Data.ProtoLens.Field.field @"recipients" +registrationToken :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "registrationToken" a) => + Lens.Family2.LensLike' f s a +registrationToken = Data.ProtoLens.Field.field @"registrationToken" +resultCode :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "resultCode" a) => + Lens.Family2.LensLike' f s a +resultCode = Data.ProtoLens.Field.field @"resultCode" +senderId :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "senderId" a) => + Lens.Family2.LensLike' f s a +senderId = Data.ProtoLens.Field.field @"senderId" +smsNotif :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "smsNotif" a) => + Lens.Family2.LensLike' f s a +smsNotif = Data.ProtoLens.Field.field @"smsNotif" +text :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "text" a) => + Lens.Family2.LensLike' f s a +text = Data.ProtoLens.Field.field @"text" +value :: + forall f s a. + (Prelude.Functor f, Data.ProtoLens.Field.HasField s "value" a) => + Lens.Family2.LensLike' f s a +value = Data.ProtoLens.Field.field @"value" +vec'entitlement :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'entitlement" a) => + Lens.Family2.LensLike' f s a +vec'entitlement = Data.ProtoLens.Field.field @"vec'entitlement" +vec'param :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'param" a) => + Lens.Family2.LensLike' f s a +vec'param = Data.ProtoLens.Field.field @"vec'param" +vec'recipients :: + forall f s a. + (Prelude.Functor f, + Data.ProtoLens.Field.HasField s "vec'recipients" a) => + Lens.Family2.LensLike' f s a +vec'recipients = Data.ProtoLens.Field.field @"vec'recipients" \ No newline at end of file diff --git a/stack.yaml b/stack.yaml new file mode 100644 index 0000000..0119dfa --- /dev/null +++ b/stack.yaml @@ -0,0 +1,20 @@ +--- +resolver: lts-22.22 + +# By default, stack warns if it finds `nix` on your PATH, but you're not +# passing the `--nix` flag to stack. This is exactly how we do local +# development, and we don't want stack warning about this. +notify-if-nix-on-path: false + +flags: + zlib: + pkg-config: true + +ghc-options: + "$locals": -Werror + "$everything": -haddock + +packages: + - cqg-cms-api-proto + +extra-deps: [] diff --git a/stack.yaml.lock b/stack.yaml.lock new file mode 100644 index 0000000..f320842 --- /dev/null +++ b/stack.yaml.lock @@ -0,0 +1,12 @@ +# This file was autogenerated by Stack. +# You should not edit this file by hand. +# For more information, please see the documentation at: +# https://docs.haskellstack.org/en/stable/lock_files + +packages: [] +snapshots: +- completed: + sha256: 4be1ca5d31689b524a7f0f17a439bbe9136465213edc498e9a395899a670f2aa + size: 718486 + url: https://raw.githubusercontent.com/commercialhaskell/stackage-snapshots/master/lts/22/22.yaml + original: lts-22.22