*** Settings ***
Documentation  Actions dans un formulaire

*** Keywords ***
Form Value Should Contain
    [Tags]
    [Arguments]  ${champ}  ${valeurAttendue}
    ${valeurRecuperee} =  Get Value  ${champ}
    Should Contain  ${valeurRecuperee}  ${valeurAttendue}

Wait Until Form Value Should Be
    [Tags]
    [Arguments]  ${champ}  ${valeurAttendue}
    Wait Until Keyword Succeeds  ${TIMEOUT}  ${RETRY_INTERVAL}  Form Value Should Be  ${champ}  ${valeurAttendue}

Select From Chosen List For 'Type' By Name
    [Arguments]  ${field_id}  ${value}
    Select From Chosen List  css=#${field_id}  [${value}]

Select From Chosen List For 'Catégorie' By Name
    [Arguments]  ${field_id}  ${value}
    Select From Chosen List  css=#${field_id}  [${value}]

Selected Label From Chosen List Should Be
    [Arguments]  ${field_id}  ${value}
    ${label_selected} =  Get Text  ${field_id}_chosen span
    Should Be Equal As Strings  ${label_selected}  ${value}

Select From Chosen List
    [Arguments]  ${field_id}  ${value}
    Click Element  ${field_id}_chosen
    Input Text  css=#${field_id}_chosen input.chosen-search-input  ${value}
    Press Key  css=#${field_id}_chosen input.chosen-search-input  \\09

Select From Multiple Chosen List
    [Arguments]  ${field_id}  ${values}
    Click Element  ${field_id}_chosen
    :FOR  ${ELEMENT}  IN  @{values}
    \  Input Text  css=#${field_id}_chosen input.chosen-search-input  ${ELEMENT}
    \  Press Key  css=#${field_id}_chosen input.chosen-search-input  \\13
    Press Key  ${field_id}_chosen input.chosen-search-input  \\09

Unselect From Chosen List
    [Arguments]  ${field_id}
    Click Element  ${field_id}_chosen .search-choice-close

Unselect Multiple By Label
    [Tags]
    [Documentation]    Désélectionne une liste de libellés si non vide
    [Arguments]  ${champ}  ${list}
    ${length} =  Get Length  ${list}
    Run Keyword If  ${length} > 0  Unselect From List By Label  ${champ}  @{list}