Values.GetVaultLockOutputSourceContains the Amazon Glacier response to your request.
type nonrec t = {policy : String_.t option;The vault lock policy as a JSON string, which uses "\" as an escape character.
*)state : String_.t option;The state of the vault lock. InProgress or Locked.
*)expirationDate : String_.t option;The UTC date and time at which the lock ID expires. This value can be null if the vault lock is in a Locked state.
*)creationDate : String_.t option;The UTC date and time at which the vault lock was put into the InProgress state.
*)}type nonrec error = [ | `InvalidParameterValueException of InvalidParameterValueException.t| `MissingParameterValueException of MissingParameterValueException.t| `NoLongerSupportedException of NoLongerSupportedException.t| `ResourceNotFoundException of ResourceNotFoundException.t| `Unknown_operation_error of string * string option ]val error_of_json :
string ->
Yojson.Safe.t ->
[> `InvalidParameterValueException of InvalidParameterValueException.t
| `MissingParameterValueException of MissingParameterValueException.t
| `NoLongerSupportedException of NoLongerSupportedException.t
| `ResourceNotFoundException of ResourceNotFoundException.t
| `ServiceUnavailableException of ServiceUnavailableException.t
| `Unknown_operation_error of string * string option ]val error_of_xml :
string ->
Awso.Xml.t ->
[> `InvalidParameterValueException of InvalidParameterValueException.t
| `MissingParameterValueException of MissingParameterValueException.t
| `NoLongerSupportedException of NoLongerSupportedException.t
| `ResourceNotFoundException of ResourceNotFoundException.t
| `ServiceUnavailableException of ServiceUnavailableException.t
| `Unknown_operation_error of string * string option ]