Create 3GL Procedures
The Create a languagename Procedure frame has similar fields for all 3GLs. The title of the frame specifies the language you are using to create the procedure. The language is a supported programming language, such as Ada, C, COBOL and Fortran.
An Ada procedure must be a library procedure.
The only difference between the fields on the Create a languagename Procedure frame for different languages is that the Pass Decimal Values As field only appears for COBOL procedures.
To define a 3GL host language procedure
1. The Procedure Name field contains the name you entered in the Create a Procedure frame.
2. (Optional) Enter a brief description in the Short Remark field.
3. In the Source Language field, enter the supported language in which you are writing this procedure.
4. In the Symbol field, enter the link symbol for ABF to use to link to the procedure.
5. In the Library field, enter yes or no to indicate whether this is a library procedure or not. If you enter yes, the Edit and Compile menu operations are not active.
6. In the Source File field, enter a source code file name with the extension of the selected language, as shown in the table "File Extensions".
7. For COBOL only: enter decimal or float in the Pass Decimal Values As field.
8. Choose Edit to open a file in the system editor. Enter the source code.
9. To select the Return Type from a pop-up list, choose ListChoices. Highlight the desired type, enter a length if required for the data type, and enter Select.
The Nullable field is display only.
10. Optionally choose LongRemark to display or add detailed information about the procedure on the LongRemark pop-up.
11. To test the procedure, choose Compile as described above for 4GL procedures.