Information AboutSabretalk |
| CATEGORIES ABOUT SABRETALK | |
| legacy systems | |
| pl---i programming language family | |
| ibm software | |
|
SabreTalk programs are still running in the British Airways Flight Operations system ( FICO ), although a commercially available automatic converter is being used to translate Sabretalk programs to C programs. Because of the translator from SabreTalk to C and because it is no longer supported by the original developers, several companies are beginning the move away from SabreTalk to purely C-based programs. Code Sample: SAMPLE: PROCEDURE; DECLARE ARRAY(10) DECIMAL(5) BASED(POINTER); DECLARE COUNTER BINARY(15) ALIGNED; DECLARE TOTAL BINARY(31) ALIGNED; START(POINT=#RG1); TOTAL = 0; LOOP: DO COUNTER = 1 TO 10 BY 1;
END LOOP;
BACKC(#RAC= TOTAL); END SAMPLE; |
|
|