{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.Transcribe.StartMedicalTranscriptionJob
(
StartMedicalTranscriptionJob (..),
newStartMedicalTranscriptionJob,
startMedicalTranscriptionJob_contentIdentificationType,
startMedicalTranscriptionJob_kmsEncryptionContext,
startMedicalTranscriptionJob_mediaFormat,
startMedicalTranscriptionJob_mediaSampleRateHertz,
startMedicalTranscriptionJob_outputEncryptionKMSKeyId,
startMedicalTranscriptionJob_outputKey,
startMedicalTranscriptionJob_settings,
startMedicalTranscriptionJob_tags,
startMedicalTranscriptionJob_medicalTranscriptionJobName,
startMedicalTranscriptionJob_languageCode,
startMedicalTranscriptionJob_media,
startMedicalTranscriptionJob_outputBucketName,
startMedicalTranscriptionJob_specialty,
startMedicalTranscriptionJob_type,
StartMedicalTranscriptionJobResponse (..),
newStartMedicalTranscriptionJobResponse,
startMedicalTranscriptionJobResponse_medicalTranscriptionJob,
startMedicalTranscriptionJobResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.Transcribe.Types
data StartMedicalTranscriptionJob = StartMedicalTranscriptionJob'
{
StartMedicalTranscriptionJob
-> Maybe MedicalContentIdentificationType
contentIdentificationType :: Prelude.Maybe MedicalContentIdentificationType,
StartMedicalTranscriptionJob -> Maybe (HashMap Text Text)
kmsEncryptionContext :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
StartMedicalTranscriptionJob -> Maybe MediaFormat
mediaFormat :: Prelude.Maybe MediaFormat,
StartMedicalTranscriptionJob -> Maybe Natural
mediaSampleRateHertz :: Prelude.Maybe Prelude.Natural,
StartMedicalTranscriptionJob -> Maybe Text
outputEncryptionKMSKeyId :: Prelude.Maybe Prelude.Text,
StartMedicalTranscriptionJob -> Maybe Text
outputKey :: Prelude.Maybe Prelude.Text,
StartMedicalTranscriptionJob -> Maybe MedicalTranscriptionSetting
settings :: Prelude.Maybe MedicalTranscriptionSetting,
StartMedicalTranscriptionJob -> Maybe (NonEmpty Tag)
tags :: Prelude.Maybe (Prelude.NonEmpty Tag),
StartMedicalTranscriptionJob -> Text
medicalTranscriptionJobName :: Prelude.Text,
StartMedicalTranscriptionJob -> LanguageCode
languageCode :: LanguageCode,
StartMedicalTranscriptionJob -> Media
media :: Media,
StartMedicalTranscriptionJob -> Text
outputBucketName :: Prelude.Text,
StartMedicalTranscriptionJob -> Specialty
specialty :: Specialty,
StartMedicalTranscriptionJob -> Type
type' :: Type
}
deriving (StartMedicalTranscriptionJob
-> StartMedicalTranscriptionJob -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartMedicalTranscriptionJob
-> StartMedicalTranscriptionJob -> Bool
$c/= :: StartMedicalTranscriptionJob
-> StartMedicalTranscriptionJob -> Bool
== :: StartMedicalTranscriptionJob
-> StartMedicalTranscriptionJob -> Bool
$c== :: StartMedicalTranscriptionJob
-> StartMedicalTranscriptionJob -> Bool
Prelude.Eq, ReadPrec [StartMedicalTranscriptionJob]
ReadPrec StartMedicalTranscriptionJob
Int -> ReadS StartMedicalTranscriptionJob
ReadS [StartMedicalTranscriptionJob]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StartMedicalTranscriptionJob]
$creadListPrec :: ReadPrec [StartMedicalTranscriptionJob]
readPrec :: ReadPrec StartMedicalTranscriptionJob
$creadPrec :: ReadPrec StartMedicalTranscriptionJob
readList :: ReadS [StartMedicalTranscriptionJob]
$creadList :: ReadS [StartMedicalTranscriptionJob]
readsPrec :: Int -> ReadS StartMedicalTranscriptionJob
$creadsPrec :: Int -> ReadS StartMedicalTranscriptionJob
Prelude.Read, Int -> StartMedicalTranscriptionJob -> ShowS
[StartMedicalTranscriptionJob] -> ShowS
StartMedicalTranscriptionJob -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartMedicalTranscriptionJob] -> ShowS
$cshowList :: [StartMedicalTranscriptionJob] -> ShowS
show :: StartMedicalTranscriptionJob -> String
$cshow :: StartMedicalTranscriptionJob -> String
showsPrec :: Int -> StartMedicalTranscriptionJob -> ShowS
$cshowsPrec :: Int -> StartMedicalTranscriptionJob -> ShowS
Prelude.Show, forall x.
Rep StartMedicalTranscriptionJob x -> StartMedicalTranscriptionJob
forall x.
StartMedicalTranscriptionJob -> Rep StartMedicalTranscriptionJob x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep StartMedicalTranscriptionJob x -> StartMedicalTranscriptionJob
$cfrom :: forall x.
StartMedicalTranscriptionJob -> Rep StartMedicalTranscriptionJob x
Prelude.Generic)
newStartMedicalTranscriptionJob ::
Prelude.Text ->
LanguageCode ->
Media ->
Prelude.Text ->
Specialty ->
Type ->
StartMedicalTranscriptionJob
newStartMedicalTranscriptionJob :: Text
-> LanguageCode
-> Media
-> Text
-> Specialty
-> Type
-> StartMedicalTranscriptionJob
newStartMedicalTranscriptionJob
Text
pMedicalTranscriptionJobName_
LanguageCode
pLanguageCode_
Media
pMedia_
Text
pOutputBucketName_
Specialty
pSpecialty_
Type
pType_ =
StartMedicalTranscriptionJob'
{ $sel:contentIdentificationType:StartMedicalTranscriptionJob' :: Maybe MedicalContentIdentificationType
contentIdentificationType =
forall a. Maybe a
Prelude.Nothing,
$sel:kmsEncryptionContext:StartMedicalTranscriptionJob' :: Maybe (HashMap Text Text)
kmsEncryptionContext = forall a. Maybe a
Prelude.Nothing,
$sel:mediaFormat:StartMedicalTranscriptionJob' :: Maybe MediaFormat
mediaFormat = forall a. Maybe a
Prelude.Nothing,
$sel:mediaSampleRateHertz:StartMedicalTranscriptionJob' :: Maybe Natural
mediaSampleRateHertz = forall a. Maybe a
Prelude.Nothing,
$sel:outputEncryptionKMSKeyId:StartMedicalTranscriptionJob' :: Maybe Text
outputEncryptionKMSKeyId = forall a. Maybe a
Prelude.Nothing,
$sel:outputKey:StartMedicalTranscriptionJob' :: Maybe Text
outputKey = forall a. Maybe a
Prelude.Nothing,
$sel:settings:StartMedicalTranscriptionJob' :: Maybe MedicalTranscriptionSetting
settings = forall a. Maybe a
Prelude.Nothing,
$sel:tags:StartMedicalTranscriptionJob' :: Maybe (NonEmpty Tag)
tags = forall a. Maybe a
Prelude.Nothing,
$sel:medicalTranscriptionJobName:StartMedicalTranscriptionJob' :: Text
medicalTranscriptionJobName =
Text
pMedicalTranscriptionJobName_,
$sel:languageCode:StartMedicalTranscriptionJob' :: LanguageCode
languageCode = LanguageCode
pLanguageCode_,
$sel:media:StartMedicalTranscriptionJob' :: Media
media = Media
pMedia_,
$sel:outputBucketName:StartMedicalTranscriptionJob' :: Text
outputBucketName = Text
pOutputBucketName_,
$sel:specialty:StartMedicalTranscriptionJob' :: Specialty
specialty = Specialty
pSpecialty_,
$sel:type':StartMedicalTranscriptionJob' :: Type
type' = Type
pType_
}
startMedicalTranscriptionJob_contentIdentificationType :: Lens.Lens' StartMedicalTranscriptionJob (Prelude.Maybe MedicalContentIdentificationType)
startMedicalTranscriptionJob_contentIdentificationType :: Lens'
StartMedicalTranscriptionJob
(Maybe MedicalContentIdentificationType)
startMedicalTranscriptionJob_contentIdentificationType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Maybe MedicalContentIdentificationType
contentIdentificationType :: Maybe MedicalContentIdentificationType
$sel:contentIdentificationType:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob
-> Maybe MedicalContentIdentificationType
contentIdentificationType} -> Maybe MedicalContentIdentificationType
contentIdentificationType) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Maybe MedicalContentIdentificationType
a -> StartMedicalTranscriptionJob
s {$sel:contentIdentificationType:StartMedicalTranscriptionJob' :: Maybe MedicalContentIdentificationType
contentIdentificationType = Maybe MedicalContentIdentificationType
a} :: StartMedicalTranscriptionJob)
startMedicalTranscriptionJob_kmsEncryptionContext :: Lens.Lens' StartMedicalTranscriptionJob (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
startMedicalTranscriptionJob_kmsEncryptionContext :: Lens' StartMedicalTranscriptionJob (Maybe (HashMap Text Text))
startMedicalTranscriptionJob_kmsEncryptionContext = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Maybe (HashMap Text Text)
kmsEncryptionContext :: Maybe (HashMap Text Text)
$sel:kmsEncryptionContext:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe (HashMap Text Text)
kmsEncryptionContext} -> Maybe (HashMap Text Text)
kmsEncryptionContext) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Maybe (HashMap Text Text)
a -> StartMedicalTranscriptionJob
s {$sel:kmsEncryptionContext:StartMedicalTranscriptionJob' :: Maybe (HashMap Text Text)
kmsEncryptionContext = Maybe (HashMap Text Text)
a} :: StartMedicalTranscriptionJob) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
startMedicalTranscriptionJob_mediaFormat :: Lens.Lens' StartMedicalTranscriptionJob (Prelude.Maybe MediaFormat)
startMedicalTranscriptionJob_mediaFormat :: Lens' StartMedicalTranscriptionJob (Maybe MediaFormat)
startMedicalTranscriptionJob_mediaFormat = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Maybe MediaFormat
mediaFormat :: Maybe MediaFormat
$sel:mediaFormat:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe MediaFormat
mediaFormat} -> Maybe MediaFormat
mediaFormat) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Maybe MediaFormat
a -> StartMedicalTranscriptionJob
s {$sel:mediaFormat:StartMedicalTranscriptionJob' :: Maybe MediaFormat
mediaFormat = Maybe MediaFormat
a} :: StartMedicalTranscriptionJob)
startMedicalTranscriptionJob_mediaSampleRateHertz :: Lens.Lens' StartMedicalTranscriptionJob (Prelude.Maybe Prelude.Natural)
startMedicalTranscriptionJob_mediaSampleRateHertz :: Lens' StartMedicalTranscriptionJob (Maybe Natural)
startMedicalTranscriptionJob_mediaSampleRateHertz = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Maybe Natural
mediaSampleRateHertz :: Maybe Natural
$sel:mediaSampleRateHertz:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Natural
mediaSampleRateHertz} -> Maybe Natural
mediaSampleRateHertz) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Maybe Natural
a -> StartMedicalTranscriptionJob
s {$sel:mediaSampleRateHertz:StartMedicalTranscriptionJob' :: Maybe Natural
mediaSampleRateHertz = Maybe Natural
a} :: StartMedicalTranscriptionJob)
startMedicalTranscriptionJob_outputEncryptionKMSKeyId :: Lens.Lens' StartMedicalTranscriptionJob (Prelude.Maybe Prelude.Text)
startMedicalTranscriptionJob_outputEncryptionKMSKeyId :: Lens' StartMedicalTranscriptionJob (Maybe Text)
startMedicalTranscriptionJob_outputEncryptionKMSKeyId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Maybe Text
outputEncryptionKMSKeyId :: Maybe Text
$sel:outputEncryptionKMSKeyId:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Text
outputEncryptionKMSKeyId} -> Maybe Text
outputEncryptionKMSKeyId) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Maybe Text
a -> StartMedicalTranscriptionJob
s {$sel:outputEncryptionKMSKeyId:StartMedicalTranscriptionJob' :: Maybe Text
outputEncryptionKMSKeyId = Maybe Text
a} :: StartMedicalTranscriptionJob)
startMedicalTranscriptionJob_outputKey :: Lens.Lens' StartMedicalTranscriptionJob (Prelude.Maybe Prelude.Text)
startMedicalTranscriptionJob_outputKey :: Lens' StartMedicalTranscriptionJob (Maybe Text)
startMedicalTranscriptionJob_outputKey = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Maybe Text
outputKey :: Maybe Text
$sel:outputKey:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Text
outputKey} -> Maybe Text
outputKey) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Maybe Text
a -> StartMedicalTranscriptionJob
s {$sel:outputKey:StartMedicalTranscriptionJob' :: Maybe Text
outputKey = Maybe Text
a} :: StartMedicalTranscriptionJob)
startMedicalTranscriptionJob_settings :: Lens.Lens' StartMedicalTranscriptionJob (Prelude.Maybe MedicalTranscriptionSetting)
startMedicalTranscriptionJob_settings :: Lens'
StartMedicalTranscriptionJob (Maybe MedicalTranscriptionSetting)
startMedicalTranscriptionJob_settings = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Maybe MedicalTranscriptionSetting
settings :: Maybe MedicalTranscriptionSetting
$sel:settings:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe MedicalTranscriptionSetting
settings} -> Maybe MedicalTranscriptionSetting
settings) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Maybe MedicalTranscriptionSetting
a -> StartMedicalTranscriptionJob
s {$sel:settings:StartMedicalTranscriptionJob' :: Maybe MedicalTranscriptionSetting
settings = Maybe MedicalTranscriptionSetting
a} :: StartMedicalTranscriptionJob)
startMedicalTranscriptionJob_tags :: Lens.Lens' StartMedicalTranscriptionJob (Prelude.Maybe (Prelude.NonEmpty Tag))
startMedicalTranscriptionJob_tags :: Lens' StartMedicalTranscriptionJob (Maybe (NonEmpty Tag))
startMedicalTranscriptionJob_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Maybe (NonEmpty Tag)
tags :: Maybe (NonEmpty Tag)
$sel:tags:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe (NonEmpty Tag)
tags} -> Maybe (NonEmpty Tag)
tags) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Maybe (NonEmpty Tag)
a -> StartMedicalTranscriptionJob
s {$sel:tags:StartMedicalTranscriptionJob' :: Maybe (NonEmpty Tag)
tags = Maybe (NonEmpty Tag)
a} :: StartMedicalTranscriptionJob) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
startMedicalTranscriptionJob_medicalTranscriptionJobName :: Lens.Lens' StartMedicalTranscriptionJob Prelude.Text
startMedicalTranscriptionJob_medicalTranscriptionJobName :: Lens' StartMedicalTranscriptionJob Text
startMedicalTranscriptionJob_medicalTranscriptionJobName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Text
medicalTranscriptionJobName :: Text
$sel:medicalTranscriptionJobName:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Text
medicalTranscriptionJobName} -> Text
medicalTranscriptionJobName) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Text
a -> StartMedicalTranscriptionJob
s {$sel:medicalTranscriptionJobName:StartMedicalTranscriptionJob' :: Text
medicalTranscriptionJobName = Text
a} :: StartMedicalTranscriptionJob)
startMedicalTranscriptionJob_languageCode :: Lens.Lens' StartMedicalTranscriptionJob LanguageCode
startMedicalTranscriptionJob_languageCode :: Lens' StartMedicalTranscriptionJob LanguageCode
startMedicalTranscriptionJob_languageCode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {LanguageCode
languageCode :: LanguageCode
$sel:languageCode:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> LanguageCode
languageCode} -> LanguageCode
languageCode) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} LanguageCode
a -> StartMedicalTranscriptionJob
s {$sel:languageCode:StartMedicalTranscriptionJob' :: LanguageCode
languageCode = LanguageCode
a} :: StartMedicalTranscriptionJob)
startMedicalTranscriptionJob_media :: Lens.Lens' StartMedicalTranscriptionJob Media
startMedicalTranscriptionJob_media :: Lens' StartMedicalTranscriptionJob Media
startMedicalTranscriptionJob_media = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Media
media :: Media
$sel:media:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Media
media} -> Media
media) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Media
a -> StartMedicalTranscriptionJob
s {$sel:media:StartMedicalTranscriptionJob' :: Media
media = Media
a} :: StartMedicalTranscriptionJob)
startMedicalTranscriptionJob_outputBucketName :: Lens.Lens' StartMedicalTranscriptionJob Prelude.Text
startMedicalTranscriptionJob_outputBucketName :: Lens' StartMedicalTranscriptionJob Text
startMedicalTranscriptionJob_outputBucketName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Text
outputBucketName :: Text
$sel:outputBucketName:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Text
outputBucketName} -> Text
outputBucketName) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Text
a -> StartMedicalTranscriptionJob
s {$sel:outputBucketName:StartMedicalTranscriptionJob' :: Text
outputBucketName = Text
a} :: StartMedicalTranscriptionJob)
startMedicalTranscriptionJob_specialty :: Lens.Lens' StartMedicalTranscriptionJob Specialty
startMedicalTranscriptionJob_specialty :: Lens' StartMedicalTranscriptionJob Specialty
startMedicalTranscriptionJob_specialty = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Specialty
specialty :: Specialty
$sel:specialty:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Specialty
specialty} -> Specialty
specialty) (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Specialty
a -> StartMedicalTranscriptionJob
s {$sel:specialty:StartMedicalTranscriptionJob' :: Specialty
specialty = Specialty
a} :: StartMedicalTranscriptionJob)
startMedicalTranscriptionJob_type :: Lens.Lens' StartMedicalTranscriptionJob Type
startMedicalTranscriptionJob_type :: Lens' StartMedicalTranscriptionJob Type
startMedicalTranscriptionJob_type = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJob' {Type
type' :: Type
$sel:type':StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Type
type'} -> Type
type') (\s :: StartMedicalTranscriptionJob
s@StartMedicalTranscriptionJob' {} Type
a -> StartMedicalTranscriptionJob
s {$sel:type':StartMedicalTranscriptionJob' :: Type
type' = Type
a} :: StartMedicalTranscriptionJob)
instance Core.AWSRequest StartMedicalTranscriptionJob where
type
AWSResponse StartMedicalTranscriptionJob =
StartMedicalTranscriptionJobResponse
request :: (Service -> Service)
-> StartMedicalTranscriptionJob
-> Request StartMedicalTranscriptionJob
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy StartMedicalTranscriptionJob
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse StartMedicalTranscriptionJob)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe MedicalTranscriptionJob
-> Int -> StartMedicalTranscriptionJobResponse
StartMedicalTranscriptionJobResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"MedicalTranscriptionJob")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance
Prelude.Hashable
StartMedicalTranscriptionJob
where
hashWithSalt :: Int -> StartMedicalTranscriptionJob -> Int
hashWithSalt Int
_salt StartMedicalTranscriptionJob' {Maybe Natural
Maybe (NonEmpty Tag)
Maybe Text
Maybe (HashMap Text Text)
Maybe MediaFormat
Maybe MedicalContentIdentificationType
Maybe MedicalTranscriptionSetting
Text
LanguageCode
Media
Specialty
Type
type' :: Type
specialty :: Specialty
outputBucketName :: Text
media :: Media
languageCode :: LanguageCode
medicalTranscriptionJobName :: Text
tags :: Maybe (NonEmpty Tag)
settings :: Maybe MedicalTranscriptionSetting
outputKey :: Maybe Text
outputEncryptionKMSKeyId :: Maybe Text
mediaSampleRateHertz :: Maybe Natural
mediaFormat :: Maybe MediaFormat
kmsEncryptionContext :: Maybe (HashMap Text Text)
contentIdentificationType :: Maybe MedicalContentIdentificationType
$sel:type':StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Type
$sel:specialty:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Specialty
$sel:outputBucketName:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Text
$sel:media:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Media
$sel:languageCode:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> LanguageCode
$sel:medicalTranscriptionJobName:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Text
$sel:tags:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe (NonEmpty Tag)
$sel:settings:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe MedicalTranscriptionSetting
$sel:outputKey:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Text
$sel:outputEncryptionKMSKeyId:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Text
$sel:mediaSampleRateHertz:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Natural
$sel:mediaFormat:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe MediaFormat
$sel:kmsEncryptionContext:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe (HashMap Text Text)
$sel:contentIdentificationType:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob
-> Maybe MedicalContentIdentificationType
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe MedicalContentIdentificationType
contentIdentificationType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text Text)
kmsEncryptionContext
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe MediaFormat
mediaFormat
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
mediaSampleRateHertz
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
outputEncryptionKMSKeyId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
outputKey
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe MedicalTranscriptionSetting
settings
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (NonEmpty Tag)
tags
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
medicalTranscriptionJobName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` LanguageCode
languageCode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Media
media
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
outputBucketName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Specialty
specialty
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Type
type'
instance Prelude.NFData StartMedicalTranscriptionJob where
rnf :: StartMedicalTranscriptionJob -> ()
rnf StartMedicalTranscriptionJob' {Maybe Natural
Maybe (NonEmpty Tag)
Maybe Text
Maybe (HashMap Text Text)
Maybe MediaFormat
Maybe MedicalContentIdentificationType
Maybe MedicalTranscriptionSetting
Text
LanguageCode
Media
Specialty
Type
type' :: Type
specialty :: Specialty
outputBucketName :: Text
media :: Media
languageCode :: LanguageCode
medicalTranscriptionJobName :: Text
tags :: Maybe (NonEmpty Tag)
settings :: Maybe MedicalTranscriptionSetting
outputKey :: Maybe Text
outputEncryptionKMSKeyId :: Maybe Text
mediaSampleRateHertz :: Maybe Natural
mediaFormat :: Maybe MediaFormat
kmsEncryptionContext :: Maybe (HashMap Text Text)
contentIdentificationType :: Maybe MedicalContentIdentificationType
$sel:type':StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Type
$sel:specialty:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Specialty
$sel:outputBucketName:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Text
$sel:media:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Media
$sel:languageCode:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> LanguageCode
$sel:medicalTranscriptionJobName:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Text
$sel:tags:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe (NonEmpty Tag)
$sel:settings:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe MedicalTranscriptionSetting
$sel:outputKey:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Text
$sel:outputEncryptionKMSKeyId:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Text
$sel:mediaSampleRateHertz:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Natural
$sel:mediaFormat:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe MediaFormat
$sel:kmsEncryptionContext:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe (HashMap Text Text)
$sel:contentIdentificationType:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob
-> Maybe MedicalContentIdentificationType
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe MedicalContentIdentificationType
contentIdentificationType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
kmsEncryptionContext
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe MediaFormat
mediaFormat
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
mediaSampleRateHertz
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
outputEncryptionKMSKeyId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
outputKey
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe MedicalTranscriptionSetting
settings
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (NonEmpty Tag)
tags
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
medicalTranscriptionJobName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf LanguageCode
languageCode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Media
media
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
outputBucketName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Specialty
specialty
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Type
type'
instance Data.ToHeaders StartMedicalTranscriptionJob where
toHeaders :: StartMedicalTranscriptionJob -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"Transcribe.StartMedicalTranscriptionJob" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON StartMedicalTranscriptionJob where
toJSON :: StartMedicalTranscriptionJob -> Value
toJSON StartMedicalTranscriptionJob' {Maybe Natural
Maybe (NonEmpty Tag)
Maybe Text
Maybe (HashMap Text Text)
Maybe MediaFormat
Maybe MedicalContentIdentificationType
Maybe MedicalTranscriptionSetting
Text
LanguageCode
Media
Specialty
Type
type' :: Type
specialty :: Specialty
outputBucketName :: Text
media :: Media
languageCode :: LanguageCode
medicalTranscriptionJobName :: Text
tags :: Maybe (NonEmpty Tag)
settings :: Maybe MedicalTranscriptionSetting
outputKey :: Maybe Text
outputEncryptionKMSKeyId :: Maybe Text
mediaSampleRateHertz :: Maybe Natural
mediaFormat :: Maybe MediaFormat
kmsEncryptionContext :: Maybe (HashMap Text Text)
contentIdentificationType :: Maybe MedicalContentIdentificationType
$sel:type':StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Type
$sel:specialty:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Specialty
$sel:outputBucketName:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Text
$sel:media:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Media
$sel:languageCode:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> LanguageCode
$sel:medicalTranscriptionJobName:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Text
$sel:tags:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe (NonEmpty Tag)
$sel:settings:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe MedicalTranscriptionSetting
$sel:outputKey:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Text
$sel:outputEncryptionKMSKeyId:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Text
$sel:mediaSampleRateHertz:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe Natural
$sel:mediaFormat:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe MediaFormat
$sel:kmsEncryptionContext:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob -> Maybe (HashMap Text Text)
$sel:contentIdentificationType:StartMedicalTranscriptionJob' :: StartMedicalTranscriptionJob
-> Maybe MedicalContentIdentificationType
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"ContentIdentificationType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe MedicalContentIdentificationType
contentIdentificationType,
(Key
"KMSEncryptionContext" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (HashMap Text Text)
kmsEncryptionContext,
(Key
"MediaFormat" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe MediaFormat
mediaFormat,
(Key
"MediaSampleRateHertz" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
mediaSampleRateHertz,
(Key
"OutputEncryptionKMSKeyId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
outputEncryptionKMSKeyId,
(Key
"OutputKey" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
outputKey,
(Key
"Settings" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe MedicalTranscriptionSetting
settings,
(Key
"Tags" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (NonEmpty Tag)
tags,
forall a. a -> Maybe a
Prelude.Just
( Key
"MedicalTranscriptionJobName"
forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
medicalTranscriptionJobName
),
forall a. a -> Maybe a
Prelude.Just (Key
"LanguageCode" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= LanguageCode
languageCode),
forall a. a -> Maybe a
Prelude.Just (Key
"Media" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Media
media),
forall a. a -> Maybe a
Prelude.Just
(Key
"OutputBucketName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
outputBucketName),
forall a. a -> Maybe a
Prelude.Just (Key
"Specialty" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Specialty
specialty),
forall a. a -> Maybe a
Prelude.Just (Key
"Type" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Type
type')
]
)
instance Data.ToPath StartMedicalTranscriptionJob where
toPath :: StartMedicalTranscriptionJob -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery StartMedicalTranscriptionJob where
toQuery :: StartMedicalTranscriptionJob -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data StartMedicalTranscriptionJobResponse = StartMedicalTranscriptionJobResponse'
{
StartMedicalTranscriptionJobResponse
-> Maybe MedicalTranscriptionJob
medicalTranscriptionJob :: Prelude.Maybe MedicalTranscriptionJob,
StartMedicalTranscriptionJobResponse -> Int
httpStatus :: Prelude.Int
}
deriving (StartMedicalTranscriptionJobResponse
-> StartMedicalTranscriptionJobResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartMedicalTranscriptionJobResponse
-> StartMedicalTranscriptionJobResponse -> Bool
$c/= :: StartMedicalTranscriptionJobResponse
-> StartMedicalTranscriptionJobResponse -> Bool
== :: StartMedicalTranscriptionJobResponse
-> StartMedicalTranscriptionJobResponse -> Bool
$c== :: StartMedicalTranscriptionJobResponse
-> StartMedicalTranscriptionJobResponse -> Bool
Prelude.Eq, ReadPrec [StartMedicalTranscriptionJobResponse]
ReadPrec StartMedicalTranscriptionJobResponse
Int -> ReadS StartMedicalTranscriptionJobResponse
ReadS [StartMedicalTranscriptionJobResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StartMedicalTranscriptionJobResponse]
$creadListPrec :: ReadPrec [StartMedicalTranscriptionJobResponse]
readPrec :: ReadPrec StartMedicalTranscriptionJobResponse
$creadPrec :: ReadPrec StartMedicalTranscriptionJobResponse
readList :: ReadS [StartMedicalTranscriptionJobResponse]
$creadList :: ReadS [StartMedicalTranscriptionJobResponse]
readsPrec :: Int -> ReadS StartMedicalTranscriptionJobResponse
$creadsPrec :: Int -> ReadS StartMedicalTranscriptionJobResponse
Prelude.Read, Int -> StartMedicalTranscriptionJobResponse -> ShowS
[StartMedicalTranscriptionJobResponse] -> ShowS
StartMedicalTranscriptionJobResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartMedicalTranscriptionJobResponse] -> ShowS
$cshowList :: [StartMedicalTranscriptionJobResponse] -> ShowS
show :: StartMedicalTranscriptionJobResponse -> String
$cshow :: StartMedicalTranscriptionJobResponse -> String
showsPrec :: Int -> StartMedicalTranscriptionJobResponse -> ShowS
$cshowsPrec :: Int -> StartMedicalTranscriptionJobResponse -> ShowS
Prelude.Show, forall x.
Rep StartMedicalTranscriptionJobResponse x
-> StartMedicalTranscriptionJobResponse
forall x.
StartMedicalTranscriptionJobResponse
-> Rep StartMedicalTranscriptionJobResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep StartMedicalTranscriptionJobResponse x
-> StartMedicalTranscriptionJobResponse
$cfrom :: forall x.
StartMedicalTranscriptionJobResponse
-> Rep StartMedicalTranscriptionJobResponse x
Prelude.Generic)
newStartMedicalTranscriptionJobResponse ::
Prelude.Int ->
StartMedicalTranscriptionJobResponse
newStartMedicalTranscriptionJobResponse :: Int -> StartMedicalTranscriptionJobResponse
newStartMedicalTranscriptionJobResponse Int
pHttpStatus_ =
StartMedicalTranscriptionJobResponse'
{ $sel:medicalTranscriptionJob:StartMedicalTranscriptionJobResponse' :: Maybe MedicalTranscriptionJob
medicalTranscriptionJob =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:StartMedicalTranscriptionJobResponse' :: Int
httpStatus = Int
pHttpStatus_
}
startMedicalTranscriptionJobResponse_medicalTranscriptionJob :: Lens.Lens' StartMedicalTranscriptionJobResponse (Prelude.Maybe MedicalTranscriptionJob)
startMedicalTranscriptionJobResponse_medicalTranscriptionJob :: Lens'
StartMedicalTranscriptionJobResponse
(Maybe MedicalTranscriptionJob)
startMedicalTranscriptionJobResponse_medicalTranscriptionJob = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJobResponse' {Maybe MedicalTranscriptionJob
medicalTranscriptionJob :: Maybe MedicalTranscriptionJob
$sel:medicalTranscriptionJob:StartMedicalTranscriptionJobResponse' :: StartMedicalTranscriptionJobResponse
-> Maybe MedicalTranscriptionJob
medicalTranscriptionJob} -> Maybe MedicalTranscriptionJob
medicalTranscriptionJob) (\s :: StartMedicalTranscriptionJobResponse
s@StartMedicalTranscriptionJobResponse' {} Maybe MedicalTranscriptionJob
a -> StartMedicalTranscriptionJobResponse
s {$sel:medicalTranscriptionJob:StartMedicalTranscriptionJobResponse' :: Maybe MedicalTranscriptionJob
medicalTranscriptionJob = Maybe MedicalTranscriptionJob
a} :: StartMedicalTranscriptionJobResponse)
startMedicalTranscriptionJobResponse_httpStatus :: Lens.Lens' StartMedicalTranscriptionJobResponse Prelude.Int
startMedicalTranscriptionJobResponse_httpStatus :: Lens' StartMedicalTranscriptionJobResponse Int
startMedicalTranscriptionJobResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartMedicalTranscriptionJobResponse' {Int
httpStatus :: Int
$sel:httpStatus:StartMedicalTranscriptionJobResponse' :: StartMedicalTranscriptionJobResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: StartMedicalTranscriptionJobResponse
s@StartMedicalTranscriptionJobResponse' {} Int
a -> StartMedicalTranscriptionJobResponse
s {$sel:httpStatus:StartMedicalTranscriptionJobResponse' :: Int
httpStatus = Int
a} :: StartMedicalTranscriptionJobResponse)
instance
Prelude.NFData
StartMedicalTranscriptionJobResponse
where
rnf :: StartMedicalTranscriptionJobResponse -> ()
rnf StartMedicalTranscriptionJobResponse' {Int
Maybe MedicalTranscriptionJob
httpStatus :: Int
medicalTranscriptionJob :: Maybe MedicalTranscriptionJob
$sel:httpStatus:StartMedicalTranscriptionJobResponse' :: StartMedicalTranscriptionJobResponse -> Int
$sel:medicalTranscriptionJob:StartMedicalTranscriptionJobResponse' :: StartMedicalTranscriptionJobResponse
-> Maybe MedicalTranscriptionJob
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe MedicalTranscriptionJob
medicalTranscriptionJob
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus