ContratLocation procedure added
Merge branch 'master' of github.com:baiche/Tauto