1 2 3 4 5 6 7 8 9 10 11 12
| if(pk_gpi_method_comunes.check_bon_cmd_in(:BLOC_DIVERS.NUM_BON_CMD))then -- Vérifie sur le bon existe dans la base
set_item_property('BLOC_OPERATION.BOUTON_SUPPRIMER',ENABLED,PROPERTY_TRUE); -- Active le bouton de validation
go_block('CMD_INTERNE');
execute_query;
go_block('DETAIL_CMD_INTERNE');
execute_query;
else
set_item_property('BLOC_OPERATION.BOUTON_SUPPRIMER',ENABLED,PROPERTY_FALSE); -- Désactive le bouton
if(affiche_alerte('ALERT_OK','Erreur','Ce numéro de bon n''existe pas !')=ALERT_BUTTON1)then
clear_form;
end if;
end if; |
Partager