Thanks All. i could understand IF condition THEN . do nothing.
I never seen such syntax in my past experience. so i got confused when i see such a line in qad.
Yes Correct. This code snippet from QAD standard module and also i could see similiar logic in different manner in standard programs
Example1: disp skip(2) "End of Report" skip
"Selection Criteria: Ship Date Range From: " l_shpdt no-label " To: " .
if l_shpdt1 = hi_date then.
else disp l_shpdt1 no-label.
Example2:
Code:
DO:
OUTPUT TO "outputfile.txt".
put
"sampleprogram.p" at 1
"7.9.16.12 *Missing Shipper Report" at 20
"Date:" at 60 string(today) at 66
"Time:" at 75 string(Time,"hh:mm:ss") at 81 skip.
put "Missing Shipper(s) Last Shipper BOL Next Shipper BOL" skip.
put "-------------------- -------------------- -------- -------------------- --------" skip.
put "NO Missing Shippers" at 1.
put skip(2) "End of Report" skip.
put "Selection Criteria: Ship Date Range From: " l_shpdt " To: ".
if l_shpdt1 = hi_date then.
else put l_shpdt1.
OUTPUT CLOSE.
END.