On running this program with the website, the pointer goes here - on-error; and program ends.
So, please advise. -Parag
Code: Select all
50 /free
51 exec SQL set option naming=*SYS;
52 *inlr = *on;
53
54 monitor;
55 uri = %str(getenv('www.tiktok.com'));
56 on-error; <-- here
57 success = *off;
58 errmsg = 'invalid URI!';
59 exsr JSON_Start;
60 exsr JSON_Finish;
61 exsr JSON_Save;
62 return;