Advertisement
Guest User

Untitled

a guest
Aug 7th, 2017
196
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. CHOOSE CASE anv_data.is_data_code
  2. CASE 'ODB_OP_PRED_POL'
  3.     IF as_type = 'R' THEN
  4.         // spuštění direktiv
  5.         IF anv_data.il_data_detail_type<>0 THEN
  6.             this.uf_oppp_edit_potvrzeno_check(anv_errs, anv_data)
  7.             this.uf_oppp_predplneni(anv_errs, anv_data)
  8.             IF anv_errs.if_is_error() THEN RETURN
  9.         END IF
  10.     END IF
  11.    
  12.     IF as_type = 'I' AND (as_item = 'sort_kod' OR as_item = 'por_mj_kod') THEN
  13.         gnv_main.inv_sortiment_s.if_detail_mj_koef(anv_errs, anv_data)
  14.         IF anv_errs.if_is_error() THEN RETURN      
  15.     END IF
  16.    
  17.     IF as_type = 'I' AND as_item = 'sort_kod' THEN
  18.         gnv_main.inv_sortiment_s.if_detail_sazba_get(anv_errs, anv_data)
  19.         IF anv_errs.if_is_error() THEN RETURN      
  20.     END IF
  21.    
  22.     IF as_type = 'I' AND as_item = 'sazba_kod' THEN
  23.         this.uf_oppp_sazba_dph(anv_errs, anv_data)
  24.         IF anv_errs.if_is_error() THEN RETURN      
  25.     END IF
  26.    
  27. CASE 'ODB_OP_PRED_ZAHL'
  28.     IF as_type = 'R' THEN
  29.         // spuštění direktiv
  30.         IF anv_data.il_data_detail_type<>0 THEN
  31.             this.uf_oppz_edit_potvrzeno_check(anv_errs, anv_data)
  32.             IF anv_errs.if_is_error() THEN RETURN
  33.         END IF
  34.     END IF
  35.  
  36. END CHOOSE
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement