generar codigo .obp por .p