Action Principale : loadQKB
| 1 | DATA casuser.contacts; |
| 2 | LENGTH name $50 address $100; |
| 3 | INFILE DATALINES dlm=','; |
| 4 | INPUT name $ address $; |
| 5 | DATALINES; |
| 6 | John Doe,123 Main St Anytown |
| 7 | Jane Smith,456 Oak Avenue, Springfield |
| 8 | Sam Jones,789 Pine Ln. |
| 9 | ; |
| 10 | RUN; |