Advertisement
Guest User

Untitled

a guest
Jan 9th, 2018
339
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. EXECUTE proc_syntax ;
  2. IF NOT gnv_sql.uf_tra_execute(anv_errs, 'swag_kb_expert_wms_app-uf_balik_stit_tisk') THEN RETURN
  3. DO WHILE TRUE
  4.     FETCH proc_syntax INTO :ls_syntax_radek;
  5.     IF NOT gnv_sql.uf_tra_fetch( anv_errs, 'swag_kb_expert_wms_app-uf_balik_stit_tisk') THEN EXIT
  6.     IF SQLCA.sqlcode <> 0 THEN EXIT
  7.     ls_syntax_new = ls_syntax_new + ls_syntax_radek
  8. LOOP
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement