Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- IF lg-salva-xml-cte THEN DO:
- ASSIGN c-pasta-salva-cte = TRIM(ENTRY(2, c-param-salva-cte)).
- ASSIGN c-pasta-salva-cte = REPLACE(c-pasta-salva-cte, "/", "\").
- IF SUBSTRING(c-pasta-salva-cte, LENGTH(c-pasta-salva-cte), 1) <> "\" THEN
- ASSIGN c-pasta-salva-cte = TRIM(c-pasta-salva-cte) + "\".
- END.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement