how to write a program which takes the value input in ABL La

Posted by Admin on 08-Jun-2011 06:32

I am a beginner in this language. I need the instruction on how to write a simple program which takes input from the user and display the  result as the program logic. Any logic is acceptable.

All Replies

Posted by rohit.ramak on 10-Jun-2011 01:08

DEFINE VARIABLE iOne    AS INTEGER  NO-UNDO.
DEFINE VARIABLE iTwo    AS INTEGER  NO-UNDO.
DEFINE VARIABLE iResult AS INTEGER  NO-UNDO.

UPDATE iOne SPACE(2) iTwo.

MESSAGE 'iResult : ' iOne + iTwo     VIEW-AS ALERT-BOX INFO BUTTONS OK.

You'll find useful information in Progress Handbook.

Posted by Admin on 13-Jun-2011 01:57

can you say me how to count the records on Table. i used the COUNT-OF Function but i can't get the solution.

Posted by rohit.ramak on 13-Jun-2011 03:03

I'm guessing you've used a break group w/ the COUNT-OF() to display count, but in this case it does not show the actual count of "all" records in that table.

I'm going to redirect you to another post on this topic:  http://www.progresstalk.com/showthread.php?117398-help-need-to-find-number-of-records-on-a-query.&highlight=count

You will have to write your own 4gl logic to get the count from a table or use SELECT stmt w/ COUNT (*) or use dbanalysis tool.

Posted by rohit.ramak on 13-Jun-2011 03:07

btw.. here's another solution :

DEF QUERY qry FOR FIELDS () SCROLLING.
OPEN QUERY qry PRESELECT
     EACH NO-LOCK.
DISPLAY NUM-RESULTS("qry").

This thread is closed