Ticket #142: db.ads
| File db.ads, 393 bytes (added by , 9 years ago) |
|---|
| Line | |
|---|---|
| 1 | |
| 2 | package DB is |
| 3 | |
| 4 | procedure Open; |
| 5 | -- Connect to local storage |
| 6 | |
| 7 | procedure Close; |
| 8 | -- Close connection to local storage |
| 9 | |
| 10 | procedure Delete_Currency (Id : Integer); |
| 11 | |
| 12 | procedure Add_Currency |
| 13 | (Id : Integer; |
| 14 | Ratio : Integer; |
| 15 | Version : Integer); |
| 16 | |
| 17 | procedure Update_Currency |
| 18 | (Id : Integer; |
| 19 | Ratio : Integer; |
| 20 | Version : Integer); |
| 21 | |
| 22 | end DB; |
