This topic shows you how to create an ABL Procedure file using the New ABL Procedure wizard. This file will contain
1. Select File > New > ABL Procedure from the main menu.
2. The Container field specifies the currently open project or a folder within the project where the procedure file is to be created. Browse to the CustomerReport\AppServer project, if not already selected.
3. Enter the name of the procedure file as Client. The .p extension is appended automatically.
4. Click Finish.
5. In the Procedure file that opens in the Editor, copy and paste the following code in the file.
DEFINE VAR custNum AS INTEGER INIT 1.
DEFINE VAR custName AS CHARACTER.
DEFINE VARIABLE UserName AS CHARACTER.
DEFINE VARIABLE Pwd AS CHARACTER.
DEFINE VARIABLE happsrv AS HANDLE NO-UNDO.
CREATE SERVER happsrv.
IF happsrv:CONNECT("-H localhost -S 3090 -AppService asbroker1 -DirectConnect") THEN
DO :
RUN Server.p ON happsrv (INPUT custNum, OUTPUT custName).
MESSAGE custName VIEW-AS ALERT-BOX.
happsrv:DISCONNECT().
END.
DELETE OBJECT happsrv.
6. Save the changes. Right-click the editor and select Check Syntax. You see a message that says "Syntax Checked: OK".
