SAPFX en images : SAP GUI, SAP Fiori et API, montrés sur de vrais systèmes

6. Assertion reine : les trois canaux rendent le même prix
    # …
    ${prix}=    The Three Channels Should Agree On The Price
    ...    ${API_RECORD}    ${WEBGUI_RECORD}    ${RFC_RECORD}
    ...    ${DECIMAL_NOTATION}
    ${devise}=    The Three Channels Should Agree On The Currency
    ...    ${API_RECORD}    ${WEBGUI_RECORD}    ${RFC_RECORD}

Read Epm Products By Api
    # …
    ${projection}=    Set Variable
    ...    ${EPM_PRODUCT_API_ID_FIELD},${EPM_PRODUCT_API_PRICE_FIELD},${EPM_PRODUCT_API_CURRENCY_FIELD}
    ${chemin}=    Set Variable    ${EPM_PROD_MAN_SERVICE}/${EPM_PRODUCT_ENTITY_SET}
    IF    '${top}' == '${EMPTY}'
        ${entites}=    Get Odata Entities    ${chemin}    alias=${alias}
        ...    $filter=${critere}    $select=${projection}    $orderby=${EPM_PRODUCT_API_ID_FIELD}
# …
Read Epm Product By Webgui
    # …
    [Arguments]    ${product}    ${url}
    Open WebGui Data Browser    ${url}
    Display WebGui Table Contents With Filter    ${EPM_PRODUCT_TABLE}
    ...    ${EPM_PRODUCT_KEY_COLUMN}=${product}
    ${extrait}=    Extract Displayed WebGui Grid
    ...    key=${EPM_PRODUCT_KEY_COLUMN}
    ...    source=produits EPM (${EPM_PRODUCT_TABLE}) filtrés sur ${product}
    Table Extract Should Be Complete    ${extrait}
# …
Read Epm Product By Rfc
    # …
    [Arguments]    ${product}    ${alias}=${RFC_ALIAS}
    ${lignes}=    Read Business Records    ${EPM_PRODUCT_TABLE}
    ...    ${EPM_PRODUCT_COLUMNS}
    ...    filter=${EPM_PRODUCT_KEY_COLUMN} EQ '${product}'    alias=${alias}

1. Attribuer puis retirer le rôle Prospect par l'écran : la liaison apparaît puis disparaît
    # …
    Ouvrir Le Partenaire    ${CAMPAIGN_PARTNER}
    Passer Le Partenaire En Modification
    Choisir Le Role Par Sa Cle    ${ROLE_PROSPECT}
    La Combo Des Roles Devrait Porter    ${ROLE_PROSPECT}
    ${ajout}=    Sauvegarder Le Partenaire
    Le Message Devrait Etre    ${ajout}    ${MSG_SAVED}
    La Liaison De Role Devrait Etre Ouverte    ${CAMPAIGN_PARTNER}    ${ROLE_PROSPECT}
    ${document_ajout}=    Un Document Devrait Journaliser L Ajout Du Role
    ...    ${CAMPAIGN_PARTNER}    ${ROLE_PROSPECT}    ${depart}
    Retirer Le Role Par L Ecran    ${ROLE_PROSPECT}
    ${retrait}=    Sauvegarder Le Partenaire
    Le Message Devrait Etre    ${retrait}    ${MSG_SAVED}
    Aucune Liaison De Role Ne Devrait Exister    ${CAMPAIGN_PARTNER}    ${ROLE_PROSPECT}

Lire La Liaison De Role
    # …
    [Arguments]    ${numero}    ${role}
    ${lignes}=    Read Business Records    ${BP_ROLE_LINK_TABLE}    ${BP_ROLE_LINK_FIELDS}
    ...    filter=PARTNER EQ '${numero}' AND RLTYP EQ '${role}'    alias=${BP_RFC_ALIAS}
    RETURN    ${lignes}

1. Un IDoc sortant émis atteint le statut 03, jugé par son code, et son entrant n'est pas oublié
    # …
    Dispatch Idoc By Number    ${docnum}
    ${sortant}=    Wait For Idoc Status    ${docnum}    expected=success    timeout=${IDOC_WAIT}
    Should Be Equal    ${sortant}[status]    ${STATUS_OUTBOUND_PASSED_TO_PORT}
    Should Be Equal    ${sortant}[category]    success
    Idoc History Should Be    ${sortant}[history]    ${OUTBOUND_HISTORY}
    Should Not Be Empty    ${sortant}[history][-1][TID]
# …
2. L'entrant lié arrive à 53 et la valeur émise se retrouve dans la table métier
    # …
    ${sortant}=    Dispatch New Flight Customer Change    ${TEST_CUSTOMER}    ${email}
    ${tid}=    Set Variable    ${sortant}[history][-1][TID]
    Should Not Be Empty    ${tid}
    ${lien}=    Get Idoc Counterpart    ${sortant}[docnum]    timeout=${COUNTERPART_WAIT}
    Track Run Idoc    ${lien}[counterpart]
    Should Not Be Equal    ${lien}[counterpart]    ${sortant}[docnum]
    Should Be Equal    ${lien}[counterpart_direction]    ${DIRECTION_INBOUND}
    ${entrant}=    Wait For Idoc Status    ${lien}[counterpart]    expected=${STATUS_INBOUND_POSTED}
    ...    timeout=${IDOC_WAIT}
    Should Be Equal    ${entrant}[status]    ${STATUS_INBOUND_POSTED}
    Should Be Equal    ${entrant}[category]    success
    Idoc History Should Be    ${entrant}[history]    ${INBOUND_HISTORY}
    Should Be Equal    ${entrant}[history][0][TID]    ${tid}
# …
4. WE02 affiche, pour le sortant et pour l'entrant, les statuts que lit le RFC
    # …
    Open Idoc In Monitor    ${sortant}
    ${codes_sortant}=    Read Idoc Status Nodes
    Should Be Equal    ${codes_sortant}[0]    ${chaine}[outbound][status]
    Should Be Equal    ${codes_sortant}[0]    ${STATUS_OUTBOUND_PASSED_TO_PORT}

La Cible SAP GUI Devrait Etre
    # …
    [Arguments]    ${release}    ${kernel}    ${client}
    ${identite}=    Get System Identity
    System Identity Should Be    identity=${identite}    basis_release=${release}
    ...    kernel_release=${kernel}    client=${client}
    RETURN    ${identite}

Ouvrir L Application Par Intent
    # …
    [Arguments]    ${intent}
    Open Fiori App    ${intent}
    Attendre Le Fragment    ${intent}
    Wait For Ui5 Idle    settle=${ABAP_FLP_SETTLE}    timeout=${ABAP_FLP_IDLE_TIMEOUT}
    Wait Until Keyword Succeeds    60s    2s    L Application Ouverte Est    ${intent}

Lire Le Compteur Charge De La Tuile
    # …
    [Arguments]    ${intent}    ${budget}=${BUDGET_COMPTEUR_TUILE}
    ${tuile}=    Wait For Flp Tile Counter    ${intent}    timeout=${budget}
    RETURN    ${tuile}

La portee de frame est etanche entre le shell et l application
    # …
    ${apps}=    Inventorier Les Applications Du Catalogue
    Ouvrir L Application Par Intent    ${apps}[0][intent]
    Entrer Dans L Application
    ${dans_l_app}=    Compter Le Champ De Recherche Du Shell
    ${composition_app}=    Lire La Composition De La Portee Courante
    Sortir De L Application
    ${sur_le_shell}=    Compter Le Champ De Recherche Du Shell
    ${composition_shell}=    Lire La Composition De La Portee Courante
    Should Be Equal As Integers    ${dans_l_app}    0
    ...    msg=Le champ de recherche du shell est résolu depuis l'application : la portée fuit.
    Should Be Equal As Integers    ${sur_le_shell}    1
    ...    msg=Le champ de recherche du shell n'est plus résolu après le retour au shell.

Les Donnees De Test Creees Sont Retirees A La Fin
    # …
    ${entite}=    Create Test Entity    ${TRAVEL_ENTITIES}    ${{ {'Description': 'Recette du canal API'} }}
    ...    alias=cap    track=${False}
    ${chemin}=    Build Draft Entity Path    ${TRAVEL_ENTITIES}    ${TRAVEL_KEY_FIELD}
    ...    ${entite}[${TRAVEL_KEY_FIELD}]
    Track Created Entity    ${chemin}    alias=cap
    Patch Odata    ${chemin}    ${{ {'Description': 'Recette du canal API, modifiee'} }}    alias=cap
    ${relue}=    Get Odata    ${chemin}    alias=cap
    Should Be Equal    ${relue}[Description]    Recette du canal API, modifiee
    ...    msg=La modification n'est pas relue : l'écriture n'est pas confirmée.
    Remove Created Test Data    alias=cap
    ${apres}=    Run Keyword And Ignore Error    Get Odata    ${chemin}    alias=cap
    Should Be Equal    ${apres}[0]    FAIL
    ...    msg=L'entité de test répond encore après le nettoyage : donnée laissée derrière.