Current section
Files
Jump to
Current section
Files
lib/generate/set_parameter_values.ex
defimpl CWMP.Protocol.Generate, for: CWMP.Protocol.Messages.SetParameterValues do
import XmlBuilder
def generate(req) do
params=for p <- req.parameters, do: parameterValueStruct(p)
element("cwmp:SetParameterValues", [
element(:ParameterList, %{"SOAP-ENC:arrayType": "cwmp:ParameterValueStruct[#{length(params)}]"}, params),
element(:ParameterKey,req.parameter_key)])
end
defp parameterValueStruct( param ) do
element(:ParameterValueStruct, [
element(:Name, param.name),
element(:Value, %{"xsi:type": param.type}, param.value)])
end
end