01-AUG-25 06.12.18.243746000 AM +00:00:Use rlog('your text'); function to log your comments in code.

01-AUG-25 06.12.18.244049000 AM +00:00:START PROGRAM

01-AUG-25 06.12.18.244083000 AM +00:00:PRE_ACTION
01-AUG-25 06.12.18.244264000 AM +00:00:END PRE_ACTION
01-AUG-25 06.12.18.244344000 AM +00:00:on_submit fields

01-AUG-25 06.12.18.244375000 AM +00:00:SHOWRASD *LIMIT to show in DEBUG 100 chars* =true;
01-AUG-25 06.12.18.244412000 AM +00:00:
on_submit organize records

01-AUG-25 06.12.18.244438000 AM +00:00:START organize B2
01-AUG-25 06.12.18.244550000 AM +00:00:END organize

01-AUG-25 06.12.18.244595000 AM +00:00:
on_submit init fields

01-AUG-25 06.12.18.244623000 AM +00:00:START init B1
01-AUG-25 06.12.18.244652000 AM +00:00:END init

01-AUG-25 06.12.18.244676000 AM +00:00:START init B2
01-AUG-25 06.12.18.244697000 AM +00:00:END init

01-AUG-25 06.12.18.244722000 AM +00:00:START init B3
01-AUG-25 06.12.18.244741000 AM +00:00:END init

01-AUG-25 06.12.18.244774000 AM +00:00:START on_session
01-AUG-25 06.12.18.244800000 AM +00:00:END on_session

01-AUG-25 06.12.18.244843000 AM +00:00:
START pselect_B2

01-AUG-25 06.12.18.249050000 AM +00:00:START pclear_B2
01-AUG-25 06.12.18.249091000 AM +00:00:END pclear

01-AUG-25 06.12.18.249159000 AM +00:00:Execution time for B2: +000000000 00:00:00.004251000ms.
01-AUG-25 06.12.18.249190000 AM +00:00:END pselect_B2

01-AUG-25 06.12.18.249302000 AM +00:00:START poutput
01-AUG-25 06.12.18.636319000 AM +00:00: B1 - prepare
01-AUG-25 06.12.18.636384000 AM +00:00: B1 - finish
01-AUG-25 06.12.18.636403000 AM +00:00: B2 - prepare
01-AUG-25 06.12.18.641167000 AM +00:00: B2 - finish
01-AUG-25 06.12.18.641197000 AM +00:00: B3 - prepare
01-AUG-25 06.12.18.641236000 AM +00:00: B3 - finish
01-AUG-25 06.12.18.641929000 AM +00:00:END poutput

01-AUG-25 06.12.18.641975000 AM +00:00:END PROGRAM