Dbase II ver 2.4 (F) (128K) (Face B) (1986) [Original] [UTILITAIRE].dsk
HexaDumpAscii only
000000:  45 58 54 45 4E 44 45 44 20 43 50 43 20 44 53 4B    EXTENDED CPC DSK
000010:  20 46 69 6C 65 0D 0A 44 69 73 6B 2D 49 6E 66 6F     File..Disk-Info
000020:  0D 0A 53 41 4D 64 69 73 6B 31 32 30 34 31 37 00    ..SAMdisk120417.
000030:  2A 01 00 00 13 13 13 13 13 13 13 13 13 13 13 13    *...............
000040:  13 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13    ................
000050:  13 13 13 13 13 13 13 13 13 13 13 13 00 00 00 00    ................
000060:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000070:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000080:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000090:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0000F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000100:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
000110:  00 00 00 00 02 09 50 E5 00 00 C1 02 00 00 00 02    ......P.........
000120:  00 00 C6 02 00 00 00 02 00 00 C2 02 00 00 00 02    ................
000130:  00 00 C7 02 00 00 00 02 00 00 C3 02 00 00 00 02    ................
000140:  00 00 C8 02 00 00 00 02 00 00 C4 02 00 00 00 02    ................
000150:  00 00 C9 02 00 00 00 02 00 00 C5 02 00 00 00 02    ................
000160:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000170:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000180:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000190:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0001F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000200:  E5 20 20 20 20 20 20 20 20 20 20 20 00 00 00 FF    .           ....
000210:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000220:  E5 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FE    ................
000230:  FF FF FF FF FF FF FF 01 F0 FF FF FF FF FF FF FF    ................
000240:  00 41 4A 44 41 20 20 20 20 43 4D 44 00 00 00 26    .AJDA    CMD...&
000250:  02 03 04 05 06 00 00 00 00 00 00 00 00 00 00 00    ................
000260:  00 41 4A 53 54 4F 43 4B 20 43 4D 44 00 00 00 1C    .AJSTOCK CMD....
000270:  07 08 09 0A 00 00 00 00 00 00 00 00 00 00 00 00    ................
000280:  00 43 44 45 44 41 20 20 20 43 4D 44 00 00 00 1C    .CDEDA   CMD....
000290:  0B 0C 0D 0E 00 00 00 00 00 00 00 00 00 00 00 00    ................
0002A0:  00 43 48 45 51 55 45 20 20 4D 45 4D 00 00 00 04    .CHEQUE  MEM....
0002B0:  0F 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0002C0:  00 43 48 51 4D 45 4E 55 20 43 4D 44 00 00 00 06    .CHQMENU CMD....
0002D0:  10 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0002E0:  00 43 52 45 41 2D 43 52 45 46 4D 54 00 00 00 04    .CREA-CREFMT....
0002F0:  11 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000300:  00 43 52 45 44 49 54 20 20 43 4D 44 00 00 00 18    .CREDIT  CMD....
000310:  12 13 14 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000320:  00 43 52 45 44 49 54 20 20 44 42 46 00 00 00 08    .CREDIT  DBF....
000330:  15 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000340:  00 44 41 20 20 20 20 20 20 44 42 46 00 00 00 4C    .DA      DBF...L
000350:  16 17 18 19 1A 1B 1C 1D 1E 1F 00 00 00 00 00 00    ................
000360:  00 44 41 20 20 20 20 20 20 4E 44 58 00 00 00 10    .DA      NDX....
000370:  20 21 00 00 00 00 00 00 00 00 00 00 00 00 00 00     !..............
000380:  00 44 41 44 41 54 45 20 20 46 52 4D 00 00 00 03    .DADATE  FRM....
000390:  22 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    "...............
0003A0:  00 44 41 53 43 52 20 20 20 43 4D 44 00 00 00 11    .DASCR   CMD....
0003B0:  23 24 25 00 00 00 00 00 00 00 00 00 00 00 00 00    #$%.............
0003C0:  00 44 41 54 45 2D 43 52 45 4E 44 58 00 00 00 08    .DATE-CRENDX....
0003D0:  26 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    &...............
0003E0:  00 44 41 54 45 2D 44 45 42 4E 44 58 00 00 00 08    .DATE-DEBNDX....
0003F0:  27 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    '...............
000400:  53 45 20 53 45 43 4F 4E 44 41 49 52 45 0D 0A 53    SE SECONDAIRE..S
000410:  45 4C 45 43 54 20 53 45 43 4F 4E 44 41 52 59 0D    ELECT SECONDARY.
000420:  0A 55 53 45 20 44 41 20 49 4E 44 45 58 20 44 41    .USE DA INDEX DA
000430:  0D 0A 53 54 4F 52 45 20 27 4F 27 20 54 4F 20 43    ..STORE 'O' TO C
000440:  4F 4E 54 41 4A 0D 0A 44 4F 20 57 48 49 4C 45 20    ONTAJ..DO WHILE 
000450:  43 4F 4E 54 41 4A 20 3D 20 27 4F 27 0D 0A 43 4C    CONTAJ = 'O'..CL
000460:  45 41 52 20 47 45 54 53 0D 0A 53 45 4C 45 43 54    EAR GETS..SELECT
000470:  20 53 45 43 4F 4E 44 41 52 59 0D 0A 53 54 4F 52     SECONDARY..STOR
000480:  45 20 27 20 20 20 20 20 20 20 20 20 20 27 20 54    E '          ' T
000490:  4F 20 4D 44 41 3A 4E 55 4D 0D 0A 53 54 4F 52 45    O MDA:NUM..STORE
0004A0:  20 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20     '              
0004B0:  27 20 54 4F 20 4D 50 49 45 43 45 0D 0A 2A 20 45    ' TO MPIECE..* E
0004C0:  46 46 41 43 45 4D 45 4E 54 20 44 45 53 20 44 49    FFACEMENT DES DI
0004D0:  46 46 45 52 45 4E 54 45 53 20 5A 4F 4E 45 53 20    FFERENTES ZONES 
0004E0:  44 45 20 53 41 49 53 49 45 20 41 20 4C 27 45 43    DE SAISIE A L'EC
0004F0:  52 41 4E 0D 0A 40 20 35 2C 32 37 20 53 41 59 20    RAN..@ 5,27 SAY 
000500:  20 27 20 20 20 20 20 20 20 20 20 20 27 20 0D 0A     '          ' ..
000510:  40 20 37 2C 31 31 20 53 41 59 20 20 27 20 20 20    @ 7,11 SAY  '   
000520:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
000530:  20 20 20 20 20 20 20 20 27 0D 0A 40 20 38 2C 34            '..@ 8,4
000540:  35 20 53 41 59 20 20 27 20 20 20 20 20 20 20 20    5 SAY  '        
000550:  20 20 20 20 20 20 20 20 20 27 20 0D 0A 40 20 39             ' ..@ 9
000560:  2C 31 31 20 53 41 59 20 20 27 20 20 20 20 20 20    ,11 SAY  '      
000570:  20 20 27 20 0D 0A 40 20 31 34 2C 32 20 53 41 59      ' ..@ 14,2 SAY
000580:  20 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20     '              
000590:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0005A0:  20 20 20 20 20 20 20 20 20 20 20 20 27 0D 0A 40                '..@
0005B0:  20 31 34 2C 34 36 20 53 41 59 20 27 20 20 20 20     14,46 SAY '    
0005C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0005D0:  20 20 20 20 20 27 0D 0A 40 20 31 38 2C 31 20 53         '..@ 18,1 S
0005E0:  41 59 20 20 27 20 20 20 20 20 20 20 20 20 20 20    AY  '           
0005F0:  20 27 20 0D 0A 40 20 31 38 2C 31 34 20 53 41 59     ' ..@ 18,14 SAY
000600:  00 44 42 41 53 45 4F 56 52 43 4F 4D 00 00 00 80    .DBASEOVRCOM....
000610:  28 29 2A 2B 2C 2D 2E 2F 30 31 32 33 34 35 36 37    ()*+,-./01234567
000620:  00 44 42 41 53 45 4F 56 52 43 4F 4D 01 00 00 80    .DBASEOVRCOM....
000630:  38 39 3A 3B 3C 3D 3E 3F 40 41 42 43 44 45 46 47    89:;<=>?@ABCDEFG
000640:  00 44 42 41 53 45 4F 56 52 43 4F 4D 02 00 00 3A    .DBASEOVRCOM...:
000650:  48 49 4A 4B 4C 4D 4E 4F 00 00 00 00 00 00 00 00    HIJKLMNO........
000660:  00 44 45 42 49 54 20 20 20 43 4D 44 00 00 00 37    .DEBIT   CMD...7
000670:  50 51 52 53 54 55 56 00 00 00 00 00 00 00 00 00    PQRSTUV.........
000680:  00 44 45 42 49 54 20 20 20 44 42 46 00 00 00 08    .DEBIT   DBF....
000690:  57 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    W...............
0006A0:  00 45 46 46 41 2D 43 52 45 46 4D 54 00 00 00 03    .EFFA-CREFMT....
0006B0:  58 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    X...............
0006C0:  00 45 4D 45 54 44 41 20 20 46 52 4D 00 00 00 03    .EMETDA  FRM....
0006D0:  59 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    Y...............
0006E0:  00 45 4E 54 53 4F 52 54 20 43 4D 44 00 00 00 33    .ENTSORT CMD...3
0006F0:  5A 5B 5C 5D 5E 5F 60 00 00 00 00 00 00 00 00 00    Z[\]^_`.........
000700:  00 45 54 41 54 20 20 20 20 43 4D 44 00 00 00 2F    .ETAT    CMD.../
000710:  61 62 63 64 65 66 00 00 00 00 00 00 00 00 00 00    abcdef..........
000720:  00 45 54 41 54 4D 49 4E 49 46 52 4D 00 00 00 03    .ETATMINIFRM....
000730:  67 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    g...............
000740:  00 49 4E 49 54 49 41 4C 20 43 4D 44 00 00 00 1C    .INITIAL CMD....
000750:  68 69 6A 6B 00 00 00 00 00 00 00 00 00 00 00 00    hijk............
000760:  00 4D 45 4E 55 32 20 20 20 43 4D 44 00 00 00 13    .MENU2   CMD....
000770:  6C 6D 6E 00 00 00 00 00 00 00 00 00 00 00 00 00    lmn.............
000780:  00 4D 4F 44 49 2D 43 52 45 46 4D 54 00 00 00 04    .MODI-CREFMT....
000790:  6F 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    o...............
0007A0:  00 4D 4F 44 49 46 44 41 20 43 4D 44 00 00 00 2F    .MODIFDA CMD.../
0007B0:  70 71 72 73 74 75 00 00 00 00 00 00 00 00 00 00    pqrstu..........
0007C0:  00 4D 4F 44 49 53 54 4F 43 43 4D 44 00 00 00 2A    .MODISTOCCMD...*
0007D0:  76 77 78 79 7A 7B 00 00 00 00 00 00 00 00 00 00    vwxyz{..........
0007E0:  00 4E 55 4D 45 52 4F 20 20 4E 44 58 00 00 00 08    .NUMERO  NDX....
0007F0:  7C 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    |...............
000800:  20 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20     '              
000810:  27 20 0D 0A 40 20 31 38 2C 33 31 20 53 41 59 20    ' ..@ 18,31 SAY 
000820:  27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    '               
000830:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
000840:  20 20 20 27 20 0D 0A 40 20 31 38 2C 36 37 20 53       ' ..@ 18,67 S
000850:  41 59 20 27 20 20 20 20 20 20 20 20 20 20 20 20    AY '            
000860:  27 20 0D 0A 40 20 32 30 2C 31 33 20 53 41 59 20    ' ..@ 20,13 SAY 
000870:  27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    '               
000880:  20 20 20 20 20 20 20 20 20 20 20 20 27 20 0D 0A                ' ..
000890:  40 20 32 30 2C 37 31 20 53 41 59 20 27 20 20 20    @ 20,71 SAY '   
0008A0:  20 20 27 0D 0A 40 20 32 32 2C 30 20 53 41 59 20      '..@ 22,0 SAY 
0008B0:  27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    '               
0008C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0008D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0008E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A                 ;..
0008F0:  20 20 20 20 20 20 20 20 20 27 0D 0A 2A 20 53 41             '..* SA
000900:  49 53 49 45 20 44 55 20 4E 55 4D 45 52 4F 20 44    ISIE DU NUMERO D
000910:  45 20 4C 41 20 44 45 4D 41 4E 44 45 20 44 27 41    E LA DEMANDE D'A
000920:  43 48 41 54 0D 0A 40 20 35 2C 31 30 20 47 45 54    CHAT..@ 5,10 GET
000930:  20 4D 44 41 3A 4E 55 4D 0D 0A 52 45 41 44 0D 0A     MDA:NUM..READ..
000940:  2A 20 53 49 20 41 55 43 55 4E 20 4E 55 4D 45 52    * SI AUCUN NUMER
000950:  4F 20 4E 27 45 53 54 20 53 41 49 53 49 45 20 2D    O N'EST SAISIE -
000960:  3E 20 52 45 54 4F 55 52 20 41 55 20 4D 45 4E 55    > RETOUR AU MENU
000970:  20 54 52 41 49 54 45 4D 45 4E 54 20 44 45 53 20     TRAITEMENT DES 
000980:  44 2E 41 2E 0D 0A 49 46 20 4D 44 41 3A 4E 55 4D    D.A...IF MDA:NUM
000990:  20 3D 20 27 20 27 0D 0A 53 45 54 20 45 58 41 43     = ' '..SET EXAC
0009A0:  54 20 4F 46 46 0D 0A 52 45 4C 45 41 53 45 20 4D    T OFF..RELEASE M
0009B0:  44 41 3A 4E 55 4D 2C 4D 44 41 3A 44 41 54 45 2C    DA:NUM,MDA:DATE,
0009C0:  4D 54 59 50 45 2C 4D 45 4D 45 54 54 45 55 52 2C    MTYPE,MEMETTEUR,
0009D0:  4D 53 45 43 54 49 4F 4E 2C 4D 46 4F 55 52 4E 49    MSECTION,MFOURNI
0009E0:  2C 4D 50 49 45 43 45 0D 0A 52 45 4C 45 41 53 45    ,MPIECE..RELEASE
0009F0:  20 4D 51 54 45 3A 43 4D 44 2C 4D 49 4D 50 55 54     MQTE:CMD,MIMPUT
000A00:  00 50 49 45 43 45 20 20 20 4E 44 58 00 00 00 18    .PIECE   NDX....
000A10:  7D 7E 7F 00 00 00 00 00 00 00 00 00 00 00 00 00    }~..............
000A20:  00 52 45 44 41 20 20 20 20 43 4D 44 00 00 00 1D    .REDA    CMD....
000A30:  80 81 82 83 00 00 00 00 00 00 00 00 00 00 00 00    ................
000A40:  00 52 45 53 54 4F 43 4B 20 43 4D 44 00 00 00 22    .RESTOCK CMD..."
000A50:  84 85 86 87 88 00 00 00 00 00 00 00 00 00 00 00    ................
000A60:  00 53 45 4C 45 43 54 44 41 46 52 4D 00 00 00 03    .SELECTDAFRM....
000A70:  89 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000A80:  00 53 45 4C 45 53 54 4F 43 46 52 4D 00 00 00 03    .SELESTOCFRM....
000A90:  8A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000AA0:  00 53 54 4F 43 4B 20 20 20 44 42 46 00 00 00 50    .STOCK   DBF...P
000AB0:  8B 8C 8D 8E 8F 90 91 92 93 94 00 00 00 00 00 00    ................
000AC0:  00 53 54 4F 43 4B 53 43 52 43 4D 44 00 00 00 11    .STOCKSCRCMD....
000AD0:  95 96 97 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
000AE0:  00 54 52 41 44 41 20 20 20 43 4D 44 00 00 00 1B    .TRADA   CMD....
000AF0:  98 99 9A 9B 00 00 00 00 00 00 00 00 00 00 00 00    ................
000B00:  00 54 52 41 53 54 4F 43 4B 43 4D 44 00 00 00 29    .TRASTOCKCMD...)
000B10:  9C 9D 9E 9F A0 A1 00 00 00 00 00 00 00 00 00 00    ................
000B20:  00 56 49 53 44 41 20 20 20 43 4D 44 00 00 00 18    .VISDA   CMD....
000B30:  A2 A3 A4 00 00 00 00 00 00 00 00 00 00 00 00 00    .£..............
000B40:  00 56 49 53 54 4F 43 4B 20 43 4D 44 00 00 00 1C    .VISTOCK CMD....
000B50:  A5 A6 A7 A8 00 00 00 00 00 00 00 00 00 00 00 00    ................
000B60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000B90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000BF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000C00:  41 54 49 4F 2C 4D 44 45 4C 41 49 2C 4D 50 52 49    ATIO,MDELAI,MPRI
000C10:  58 3A 55 48 54 0D 0A 52 45 54 55 52 4E 0D 0A 45    X:UHT..RETURN..E
000C20:  4C 53 45 0D 0A 2A 20 52 45 43 48 45 52 43 48 45    LSE..* RECHERCHE
000C30:  20 4C 27 45 58 49 53 54 45 4E 43 45 20 44 45 20     L'EXISTENCE DE 
000C40:  4C 41 20 44 45 4D 41 4E 44 45 20 44 27 41 43 48    LA DEMANDE D'ACH
000C50:  41 54 20 53 41 49 53 49 45 20 44 41 4E 53 20 4C    AT SAISIE DANS L
000C60:  41 20 42 41 53 45 20 53 45 43 4F 4E 44 41 49 52    A BASE SECONDAIR
000C70:  45 0D 0A 2A 20 42 41 53 45 20 53 45 43 4F 4E 44    E..* BASE SECOND
000C80:  41 49 52 45 20 3D 20 42 41 53 45 20 44 41 0D 0A    AIRE = BASE DA..
000C90:  53 45 4C 45 43 54 20 53 45 43 4F 4E 44 41 52 59    SELECT SECONDARY
000CA0:  0D 0A 46 49 4E 44 20 26 4D 44 41 3A 4E 55 4D 0D    ..FIND &MDA:NUM.
000CB0:  0A 09 49 46 20 23 20 3E 20 30 0D 0A 09 40 20 32    ..IF # > 0...@ 2
000CC0:  32 2C 30 20 53 41 59 20 27 4C 61 20 44 2E 41 2E    2,0 SAY 'La D.A.
000CD0:  20 27 0D 0A 09 40 20 32 32 2C 39 20 53 41 59 20     '...@ 22,9 SAY 
000CE0:  4D 44 41 3A 4E 55 4D 0D 0A 09 40 20 32 32 2C 32    MDA:NUM...@ 22,2
000CF0:  31 20 53 41 59 20 27 20 65 73 74 20 64 65 6A 61    1 SAY ' est deja
000D00:  20 65 6E 72 65 67 69 73 74 72 65 65 2C 20 56 41     enregistree, VA
000D10:  4C 49 44 45 5A 27 0D 0A 09 53 45 54 20 43 4F 4E    LIDEZ'...SET CON
000D20:  53 4F 4C 45 20 4F 46 46 0D 0A 09 57 41 49 54 0D    SOLE OFF...WAIT.
000D30:  0A 09 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 4E    ..SET CONSOLE ON
000D40:  0D 0A 20 20 20 20 20 20 20 20 45 4C 53 45 20 20    ..        ELSE  
000D50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
000D60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
000D70:  20 20 20 20 0D 0A 2A 20 53 49 20 4C 41 20 44 45        ..* SI LA DE
000D80:  4D 41 4E 44 45 20 44 27 41 43 48 41 54 20 4E 27    MANDE D'ACHAT N'
000D90:  45 58 49 53 54 45 20 50 41 53 20 44 45 4A 41 20    EXISTE PAS DEJA 
000DA0:  2D 3E 20 53 41 49 53 49 45 20 44 45 20 4C 41 20    -> SAISIE DE LA 
000DB0:  52 45 46 45 52 45 4E 43 45 0D 0A 2A 20 44 45 20    REFERENCE..* DE 
000DC0:  4C 41 20 50 49 45 43 45 20 41 20 43 4F 4D 4D 41    LA PIECE A COMMA
000DD0:  4E 44 45 52 20 0D 0A 09 53 54 4F 52 45 20 27 20    NDER ...STORE ' 
000DE0:  20 20 20 20 20 20 20 20 20 20 20 27 20 54 4F 20               ' TO 
000DF0:  4D 50 49 45 43 45 0D 0A 20 20 20 20 20 20 20 20    MPIECE..        
000E00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000E90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000EA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000EB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000EC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000ED0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000EE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000EF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000F90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
000FF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
001000:  40 20 31 38 2C 31 34 20 47 45 54 20 4D 50 49 45    @ 18,14 GET MPIE
001010:  43 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20    CE              
001020:  20 20 20 20 20 20 20 20 20 20 0D 0A 09 52 45 41              ...REA
001030:  44 0D 0A 2A 20 52 45 43 48 45 52 43 48 45 20 4C    D..* RECHERCHE L
001040:  27 45 58 49 53 54 45 4E 43 45 20 44 45 20 4C 41    'EXISTENCE DE LA
001050:  20 52 45 46 45 52 45 4E 43 45 20 53 41 49 53 49     REFERENCE SAISI
001060:  45 20 44 41 4E 53 20 4C 41 20 42 41 53 45 20 50    E DANS LA BASE P
001070:  52 49 4D 41 49 52 45 0D 0A 2A 20 42 41 53 45 20    RIMAIRE..* BASE 
001080:  50 52 49 4D 41 49 52 45 20 3D 20 42 41 53 45 20    PRIMAIRE = BASE 
001090:  53 54 4F 43 4B 0D 0A 09 53 45 4C 45 43 54 20 50    STOCK...SELECT P
0010A0:  52 49 4D 41 52 59 0D 0A 09 46 49 4E 44 20 26 4D    RIMARY...FIND &M
0010B0:  50 49 45 43 45 0D 0A 09 09 49 46 20 23 20 3D 20    PIECE....IF # = 
0010C0:  30 0D 0A 09 09 40 20 32 32 2C 30 20 53 41 59 20    0....@ 22,0 SAY 
0010D0:  22 4C 61 20 70 69 65 63 65 20 22 0D 0A 09 09 40    "La piece "....@
0010E0:  20 32 32 2C 20 39 20 53 41 59 20 4D 50 49 45 43     22, 9 SAY MPIEC
0010F0:  45 0D 0A 09 09 40 20 32 32 2C 32 31 20 53 41 59    E....@ 22,21 SAY
001100:  20 22 20 6E 27 61 20 70 61 73 20 65 74 65 20 65     " n'a pas ete e
001110:  6E 72 65 67 69 73 74 72 65 65 2C 20 65 6E 72 65    nregistree, enre
001120:  67 69 73 74 72 65 7A 20 6C 61 2C 20 3B 0D 0A 53    gistrez la, ;..S
001130:  2E 56 2E 50 2E 22 0D 0A 09 09 53 45 54 20 43 4F    .V.P."....SET CO
001140:  4E 53 4F 4C 45 20 4F 46 46 0D 0A 09 09 57 41 49    NSOLE OFF....WAI
001150:  54 0D 0A 09 09 53 45 54 20 43 4F 4E 53 4F 4C 45    T....SET CONSOLE
001160:  20 4F 4E 0D 0A 09 09 45 4C 53 45 0D 0A 2A 20 53     ON....ELSE..* S
001170:  49 20 43 45 54 54 45 20 52 45 46 45 52 45 4E 43    I CETTE REFERENC
001180:  45 20 45 58 49 53 54 45 20 2D 3E 20 53 41 49 53    E EXISTE -> SAIS
001190:  49 45 20 44 45 53 20 41 55 54 52 45 53 20 50 41    IE DES AUTRES PA
0011A0:  52 41 4D 45 54 52 45 53 0D 0A 09 09 53 54 4F 52    RAMETRES....STOR
0011B0:  45 20 27 20 20 20 20 20 20 20 20 27 20 54 4F 20    E '        ' TO 
0011C0:  4D 44 41 3A 44 41 54 45 0D 0A 09 09 53 54 4F 52    MDA:DATE....STOR
0011D0:  45 20 27 20 20 20 20 20 20 20 20 20 20 20 20 20    E '             
0011E0:  20 20 27 20 54 4F 20 4D 54 59 50 45 0D 0A 09 09      ' TO MTYPE....
0011F0:  53 54 4F 52 45 20 27 20 20 20 20 20 20 20 20 20    STORE '         
001200:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 43 52    ************* CR
001210:  45 41 54 49 4F 4E 20 44 45 20 4E 4F 55 56 45 41    EATION DE NOUVEA
001220:  55 58 20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E    UX ENREGISTREMEN
001230:  54 53 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    TS *************
001240:  2A 0D 0A 2A 20 43 45 20 46 49 43 48 49 45 52 20    *..* CE FICHIER 
001250:  44 45 20 43 4F 4D 4D 41 4E 44 45 20 56 4F 55 53    DE COMMANDE VOUS
001260:  20 50 45 52 4D 45 54 54 52 41 20 44 45 20 43 52     PERMETTRA DE CR
001270:  45 45 52 20 44 45 20 4E 4F 55 56 45 4C 4C 45 28    EER DE NOUVELLE(
001280:  53 29 20 2A 0D 0A 2A 20 44 45 4D 41 4E 44 45 28    S) *..* DEMANDE(
001290:  53 29 20 44 27 41 43 48 41 54 20 2D 20 44 41 4E    S) D'ACHAT - DAN
0012A0:  53 20 4C 41 20 4D 45 53 55 52 45 20 20 4F 55 20    S LA MESURE  OU 
0012B0:  20 45 4C 4C 45 28 53 29 20 4E 27 45 58 49 53 54     ELLE(S) N'EXIST
0012C0:  45 28 4E 54 29 20 2A 0D 0A 2A 20 50 41 53 20 2D    E(NT) *..* PAS -
0012D0:  20 45 54 20 44 45 20 4D 45 54 54 52 45 20 41 20     ET DE METTRE A 
0012E0:  4A 4F 55 52 20 20 53 49 4D 55 4C 54 41 4E 45 4D    JOUR  SIMULTANEM
0012F0:  45 4E 54 20 20 4C 27 45 4E 52 45 47 49 53 54 52    ENT  L'ENREGISTR
001300:  45 4D 45 4E 54 20 44 45 20 2A 0D 0A 2A 20 4C 41    EMENT DE *..* LA
001310:  20 50 49 45 43 45 20 43 4F 4E 43 45 52 4E 45 45     PIECE CONCERNEE
001320:  20 44 41 4E 53 20 4C 45 20 46 49 43 48 49 45 52     DANS LE FICHIER
001330:  20 53 54 4F 43 4B 2E 20 20 20 20 20 20 20 20 20     STOCK.         
001340:  20 20 20 20 20 20 20 20 20 20 20 20 2A 0D 0A 2A                *..*
001350:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
001360:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
001370:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
001380:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
001390:  0D 0A 0D 0A 53 45 54 20 45 58 41 43 54 20 4F 4E    ....SET EXACT ON
0013A0:  0D 0A 2A 20 44 45 46 49 4E 49 54 49 4F 4E 20 44    ..* DEFINITION D
0013B0:  45 20 4C 41 20 42 41 53 45 20 50 52 49 4D 41 49    E LA BASE PRIMAI
0013C0:  52 45 0D 0A 53 45 4C 45 43 54 20 50 52 49 4D 41    RE..SELECT PRIMA
0013D0:  52 59 0D 0A 55 53 45 20 53 54 4F 43 4B 20 49 4E    RY..USE STOCK IN
0013E0:  44 45 58 20 50 49 45 43 45 0D 0A 2A 20 44 45 46    DEX PIECE..* DEF
0013F0:  49 4E 49 54 49 4F 4E 20 44 45 20 4C 41 20 42 41    INITION DE LA BA
001400:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
001410:  01 00 00 00 02 09 50 E5 01 00 C1 02 00 00 00 02    ......P.........
001420:  01 00 C6 02 00 00 00 02 01 00 C2 02 00 00 00 02    ................
001430:  01 00 C7 02 00 00 00 02 01 00 C3 02 00 00 00 02    ................
001440:  01 00 C8 02 00 00 00 02 01 00 C4 02 00 00 00 02    ................
001450:  01 00 C9 02 00 00 00 02 01 00 C5 02 00 00 00 02    ................
001460:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
001470:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
001480:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
001490:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0014F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
001500:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
001510:  27 20 54 4F 20 4D 45 4D 45 54 54 45 55 52 0D 0A    ' TO MEMETTEUR..
001520:  09 09 53 54 4F 52 45 20 27 20 20 20 20 20 27 20    ..STORE '     ' 
001530:  54 4F 20 4D 53 45 43 54 49 4F 4E 0D 0A 09 09 53    TO MSECTION....S
001540:  54 4F 52 45 20 27 20 20 20 20 20 20 20 20 20 20    TORE '          
001550:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
001560:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 20                  ' 
001570:  54 4F 20 4D 46 4F 55 52 4E 49 0D 0A 09 09 53 54    TO MFOURNI....ST
001580:  4F 52 45 20 30 20 54 4F 20 4D 51 54 45 3A 43 4D    ORE 0 TO MQTE:CM
001590:  44 0D 0A 09 09 53 54 4F 52 45 20 27 20 20 20 20    D....STORE '    
0015A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0015B0:  20 20 20 20 20 27 20 54 4F 20 4D 49 4D 50 55 54         ' TO MIMPUT
0015C0:  41 54 49 4F 0D 0A 09 09 53 54 4F 52 45 20 27 30    ATIO....STORE '0
0015D0:  30 27 20 54 4F 20 4D 44 45 4C 41 49 20 20 20 20    0' TO MDELAI    
0015E0:  20 20 20 20 0D 0A 09 09 53 54 4F 52 45 20 50 52        ....STORE PR
0015F0:  49 58 3A 55 48 54 20 54 4F 20 4D 50 52 49 58 3A    IX:UHT TO MPRIX:
001600:  55 48 54 0D 0A 20 20 20 20 20 20 20 20 20 20 20    UHT..           
001610:  20 20 20 20 20 40 20 35 2C 32 37 20 47 45 54 20         @ 5,27 GET 
001620:  4D 44 41 3A 44 41 54 45 20 50 49 43 54 55 52 45    MDA:DATE PICTURE
001630:  20 22 39 39 2F 39 39 2F 39 39 22 0D 0A 20 20 20     "99/99/99"..   
001640:  20 20 20 20 20 20 20 20 20 20 20 20 20 40 20 37                 @ 7
001650:  2C 31 31 20 47 45 54 20 4D 45 4D 45 54 54 45 55    ,11 GET MEMETTEU
001660:  52 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20    R        ..     
001670:  20 20 20 20 20 20 20 20 20 20 20 40 20 39 2C 31               @ 9,1
001680:  31 20 47 45 54 20 4D 53 45 43 54 49 4F 4E 20 20    1 GET MSECTION  
001690:  20 20 20 20 20 20 20 0D 0A 20 20 20 20 20 20 20           ..       
0016A0:  20 20 20 20 20 20 20 20 20 40 20 38 2C 34 35 20             @ 8,45 
0016B0:  47 45 54 20 4D 54 59 50 45 20 20 20 20 20 20 20    GET MTYPE       
0016C0:  20 20 20 20 20 0D 0A 20 20 20 20 20 20 20 20 20         ..         
0016D0:  20 20 20 20 20 20 20 40 20 31 34 2C 32 20 47 45           @ 14,2 GE
0016E0:  54 20 4D 46 4F 55 52 4E 49 20 20 20 20 20 20 20    T MFOURNI       
0016F0:  20 20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20       ..           
001700:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
001710:  2A 20 43 52 45 41 54 49 4F 4E 20 44 45 20 4E 4F    * CREATION DE NO
001720:  55 56 45 41 55 58 20 45 4E 52 45 47 49 53 54 52    UVEAUX ENREGISTR
001730:  45 4D 45 4E 54 53 20 2A 2A 2A 2A 2A 2A 2A 2A 2A    EMENTS *********
001740:  2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 2A 20 4F 55 56 45    ********..* OUVE
001750:  52 54 55 52 45 20 44 45 20 4C 41 20 42 41 53 45    RTURE DE LA BASE
001760:  20 44 45 20 44 4F 4E 4E 45 45 53 20 44 45 53 20     DE DONNEES DES 
001770:  50 49 45 43 45 53 20 45 4E 20 53 54 4F 43 4B 2E    PIECES EN STOCK.
001780:  20 4E 4F 55 53 20 20 55 54 49 4C 49 53 4F 4E 53     NOUS  UTILISONS
001790:  20 2A 0D 0A 2A 20 55 4E 20 46 49 43 48 49 45 52     *..* UN FICHIER
0017A0:  20 49 4E 44 45 58 20 3A 20 22 50 49 45 43 45 22     INDEX : "PIECE"
0017B0:  2E 20 43 45 20 46 49 43 48 49 45 52 20 43 4F 4E    . CE FICHIER CON
0017C0:  54 49 45 4E 54 20 54 4F 55 53 20 4C 45 53 20 4E    TIENT TOUS LES N
0017D0:  55 4D 45 52 4F 53 20 20 44 45 20 2A 0D 0A 2A 20    UMEROS  DE *..* 
0017E0:  52 45 46 45 52 45 4E 43 45 20 4F 52 47 41 4E 49    REFERENCE ORGANI
0017F0:  53 45 53 20 44 41 4E 53 20 4C 27 4F 52 44 52 45    SES DANS L'ORDRE
001800:  20 43 52 4F 49 53 53 41 4E 54 20 41 49 4E 53 49     CROISSANT AINSI
001810:  20 51 55 45 20 4C 41 20 50 4F 53 49 54 49 4F 4E     QUE LA POSITION
001820:  20 20 44 45 20 2A 0D 0A 2A 20 4C 27 45 4E 52 45      DE *..* L'ENRE
001830:  47 49 53 54 52 45 4D 45 4E 54 20 43 4F 52 52 45    GISTREMENT CORRE
001840:  53 50 4F 4E 44 41 4E 54 20 44 41 4E 53 20 4C 45    SPONDANT DANS LE
001850:  20 46 49 43 48 49 45 52 20 50 52 49 4E 43 49 50     FICHIER PRINCIP
001860:  41 4C 2E 20 43 45 20 46 49 43 48 49 45 52 20 2A    AL. CE FICHIER *
001870:  0D 0A 2A 20 53 45 52 41 20 4D 49 53 20 41 20 4A    ..* SERA MIS A J
001880:  4F 55 52 20 41 55 54 4F 4D 41 54 49 51 55 45 4D    OUR AUTOMATIQUEM
001890:  45 4E 54 20 4C 4F 52 53 20 44 45 20 4C 27 41 4A    ENT LORS DE L'AJ
0018A0:  4F 55 54 20 44 45 20 4E 4F 55 56 45 41 55 58 20    OUT DE NOUVEAUX 
0018B0:  45 4E 52 45 47 49 53 2D 20 2A 0D 0A 2A 20 54 52    ENREGIS- *..* TR
0018C0:  45 4D 45 4E 54 53 2E 20 20 20 20 20 20 20 20 20    EMENTS.         
0018D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0018E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0018F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
001900:  20 20 20 20 20 40 20 31 34 2C 34 36 20 53 41 59         @ 14,46 SAY
001910:  20 4D 41 43 48 49 4E 45 20 20 20 20 20 20 20 20     MACHINE        
001920:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
001930:  20 20 40 20 31 38 2C 31 20 47 45 54 20 4D 51 54      @ 18,1 GET MQT
001940:  45 3A 43 4D 44 20 20 20 20 20 20 20 20 20 0D 0A    E:CMD         ..
001950:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
001960:  40 20 31 38 2C 33 31 20 53 41 59 20 4C 49 42 45    @ 18,31 SAY LIBE
001970:  4C 4C 45 20 20 20 20 20 20 20 20 0D 0A 20 20 20    LLE        ..   
001980:  20 20 20 20 20 20 20 20 20 20 20 20 20 40 20 31                 @ 1
001990:  38 2C 36 37 20 47 45 54 20 4D 50 52 49 58 3A 55    8,67 GET MPRIX:U
0019A0:  48 54 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20    HT       ..     
0019B0:  20 20 20 20 20 20 20 20 20 20 20 40 20 32 30 2C               @ 20,
0019C0:  31 33 20 47 45 54 20 4D 49 4D 50 55 54 41 54 49    13 GET MIMPUTATI
0019D0:  4F 20 20 20 20 20 20 0D 0A 20 20 20 20 20 20 20    O      ..       
0019E0:  20 20 20 20 20 20 20 20 20 40 20 32 30 2C 37 32             @ 20,72
0019F0:  20 47 45 54 20 4D 44 45 4C 41 49 20 50 49 43 54     GET MDELAI PICT
001A00:  55 52 45 20 22 39 39 22 0D 0A 20 20 20 20 20 20    URE "99"..      
001A10:  20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 20              READ  
001A20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
001A30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
001A40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D                   .
001A50:  0A 2A 20 4D 49 53 45 20 41 20 4A 4F 55 52 20 44    .* MISE A JOUR D
001A60:  45 20 4C 41 20 52 45 46 45 52 45 4E 43 45 20 43    E LA REFERENCE C
001A70:  4F 4E 43 45 52 4E 45 45 20 44 41 4E 53 20 4C 41    ONCERNEE DANS LA
001A80:  20 42 41 53 45 20 50 52 49 4D 41 49 52 45 0D 0A     BASE PRIMAIRE..
001A90:  2A 20 42 41 53 45 20 50 52 49 4D 41 49 52 45 20    * BASE PRIMAIRE 
001AA0:  3D 20 42 41 53 45 20 44 55 20 53 54 4F 43 4B 20    = BASE DU STOCK 
001AB0:  44 45 53 20 50 49 45 43 45 53 20 44 45 54 41 43    DES PIECES DETAC
001AC0:  48 45 45 53 0D 0A 20 20 20 20 20 20 20 20 20 20    HEES..          
001AD0:  20 20 20 20 20 20 52 45 50 4C 41 43 45 20 44 41          REPLACE DA
001AE0:  3A 4E 55 4D 20 57 49 54 48 20 4D 44 41 3A 4E 55    :NUM WITH MDA:NU
001AF0:  4D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    M               
001B00:  20 20 20 2A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A       *..**********
001B10:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
001B20:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
001B30:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
001B40:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A    **************..
001B50:  0D 0A 53 45 54 20 45 58 41 43 54 20 4F 4E 0D 0A    ..SET EXACT ON..
001B60:  55 53 45 20 53 54 4F 43 4B 20 49 4E 44 45 58 20    USE STOCK INDEX 
001B70:  50 49 45 43 45 0D 0A 53 54 4F 52 45 20 27 4F 27    PIECE..STORE 'O'
001B80:  20 54 4F 20 43 4F 4E 54 41 4A 0D 0A 44 4F 20 57     TO CONTAJ..DO W
001B90:  48 49 4C 45 20 43 4F 4E 54 41 4A 20 3D 20 27 4F    HILE CONTAJ = 'O
001BA0:  27 0D 0A 53 54 4F 52 45 20 27 20 20 20 20 20 20    '..STORE '      
001BB0:  20 20 20 20 20 20 27 20 54 4F 20 4D 50 49 45 43          ' TO MPIEC
001BC0:  45 0D 0A 2A 20 45 46 46 41 43 45 4D 45 4E 54 20    E..* EFFACEMENT 
001BD0:  44 45 53 20 44 49 46 46 45 52 45 4E 54 45 53 20    DES DIFFERENTES 
001BE0:  5A 4F 4E 45 53 20 44 45 20 53 41 49 53 49 45 20    ZONES DE SAISIE 
001BF0:  41 20 4C 27 45 43 52 41 4E 0D 0A 40 20 36 2C 31    A L'ECRAN..@ 6,1
001C00:  33 20 53 41 59 20 20 27 20 20 20 20 20 20 20 27    3 SAY  '       '
001C10:  20 0D 0A 40 20 36 2C 33 31 20 53 41 59 20 20 27     ..@ 6,31 SAY  '
001C20:  20 20 20 20 20 20 20 27 20 0D 0A 40 20 36 2C 34           ' ..@ 6,4
001C30:  37 20 53 41 59 20 20 27 20 20 20 20 20 20 20 20    7 SAY  '        
001C40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
001C50:  20 20 27 20 0D 0A 40 20 38 2C 31 37 20 53 41 59      ' ..@ 8,17 SAY
001C60:  20 20 27 20 20 20 20 20 20 20 20 20 20 20 20 20      '             
001C70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
001C80:  20 20 20 20 20 20 20 27 20 0D 0A 40 20 31 36 2C           ' ..@ 16,
001C90:  35 30 20 53 41 59 20 27 20 20 20 20 20 20 20 20    50 SAY '        
001CA0:  20 20 20 20 20 27 0D 0A 40 20 32 30 2C 33 20 20         '..@ 20,3  
001CB0:  53 41 59 20 27 20 20 20 20 20 20 20 20 20 20 20    SAY '           
001CC0:  20 27 20 0D 0A 40 20 32 30 2C 33 35 20 53 41 59     ' ..@ 20,35 SAY
001CD0:  20 27 20 20 20 20 20 20 20 20 20 20 20 20 27 20     '            ' 
001CE0:  0D 0A 40 20 32 30 2C 34 38 20 53 41 59 20 27 20    ..@ 20,48 SAY ' 
001CF0:  20 20 20 20 20 20 20 20 20 20 20 27 20 0D 0A 40               ' ..@
001D00:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20               ..   
001D10:  20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 50                 REP
001D20:  4C 41 43 45 20 51 54 45 3A 43 4D 44 20 57 49 54    LACE QTE:CMD WIT
001D30:  48 20 4D 51 54 45 3A 43 4D 44 20 20 20 20 20 20    H MQTE:CMD      
001D40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
001D50:  20 20 0D 0A 09 09 52 45 50 4C 41 43 45 20 51 54      ....REPLACE QT
001D60:  45 3A 52 45 53 54 45 20 57 49 54 48 20 50 2E 51    E:RESTE WITH P.Q
001D70:  54 45 3A 52 45 53 54 45 20 2B 20 4D 51 54 45 3A    TE:RESTE + MQTE:
001D80:  43 4D 44 20 0D 0A 20 20 20 20 20 20 20 20 20 20    CMD ..          
001D90:  20 20 20 20 20 20 52 45 50 4C 41 43 45 20 50 52          REPLACE PR
001DA0:  49 58 3A 55 48 54 20 57 49 54 48 20 4D 50 52 49    IX:UHT WITH MPRI
001DB0:  58 3A 55 48 54 20 20 20 20 20 20 20 20 20 20 20    X:UHT           
001DC0:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 2A 20 45               ..* E
001DD0:  4E 52 45 47 49 53 54 52 45 4D 45 4E 54 20 44 45    NREGISTREMENT DE
001DE0:  20 4C 41 20 44 45 4D 41 4E 44 45 20 44 27 41 43     LA DEMANDE D'AC
001DF0:  48 41 54 20 44 41 4E 53 20 4C 41 20 42 41 53 45    HAT DANS LA BASE
001E00:  20 53 45 43 4F 4E 44 41 49 52 45 0D 0A 2A 20 42     SECONDAIRE..* B
001E10:  41 53 45 20 53 45 43 4F 4E 44 41 49 52 45 20 3D    ASE SECONDAIRE =
001E20:  20 42 41 53 45 20 44 45 53 20 44 45 4D 41 4E 44     BASE DES DEMAND
001E30:  45 53 20 44 27 41 43 48 41 54 0D 0A 09 09 53 45    ES D'ACHAT....SE
001E40:  4C 45 43 54 20 53 45 43 4F 4E 44 41 52 59 0D 0A    LECT SECONDARY..
001E50:  09 09 41 50 50 45 4E 44 20 42 4C 41 4E 4B 0D 0A    ..APPEND BLANK..
001E60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
001E70:  52 45 50 4C 41 43 45 20 44 41 3A 4E 55 4D 20 57    REPLACE DA:NUM W
001E80:  49 54 48 20 4D 44 41 3A 4E 55 4D 20 20 20 20 20    ITH MDA:NUM     
001E90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
001EA0:  20 20 20 20 20 0D 0A 20 20 20 20 20 20 20 20 20         ..         
001EB0:  20 20 20 20 20 20 20 52 45 50 4C 41 43 45 20 44           REPLACE D
001EC0:  41 3A 44 41 54 45 20 57 49 54 48 20 4D 44 41 3A    A:DATE WITH MDA:
001ED0:  44 41 54 45 20 20 20 20 20 20 20 20 20 20 20 20    DATE            
001EE0:  20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20                ..  
001EF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45                  RE
001F00:  20 32 30 2C 36 31 20 53 41 59 20 27 20 20 20 20     20,61 SAY '    
001F10:  20 20 20 20 20 20 20 20 20 20 20 20 20 27 20 0D                 ' .
001F20:  0A 2A 20 53 41 49 53 49 45 20 44 55 20 4E 55 4D    .* SAISIE DU NUM
001F30:  45 52 4F 20 44 45 20 52 45 46 45 52 45 4E 43 45    ERO DE REFERENCE
001F40:  0D 0A 40 20 31 30 2C 31 31 20 47 45 54 20 4D 50    ..@ 10,11 GET MP
001F50:  49 45 43 45 0D 0A 52 45 41 44 0D 0A 43 4C 45 41    IECE..READ..CLEA
001F60:  52 20 47 45 54 53 0D 0A 2A 20 53 49 20 41 55 43    R GETS..* SI AUC
001F70:  55 4E 20 4E 55 4D 45 52 4F 20 44 45 20 52 45 46    UN NUMERO DE REF
001F80:  45 52 45 4E 43 45 20 4E 27 45 53 54 20 53 41 49    ERENCE N'EST SAI
001F90:  53 49 45 2C 20 3D 3D 3E 20 46 49 4E 20 44 45 20    SIE, ==> FIN DE 
001FA0:  53 41 49 53 49 45 0D 0A 49 46 20 4D 50 49 45 43    SAISIE..IF MPIEC
001FB0:  45 20 3D 20 27 20 27 0D 0A 52 45 4C 45 41 53 45    E = ' '..RELEASE
001FC0:  20 4D 50 49 45 43 45 2C 4D 41 54 45 4C 49 45 52     MPIECE,MATELIER
001FD0:  2C 4D 53 45 43 54 49 4F 4E 2C 4D 4D 41 43 48 49    ,MSECTION,MMACHI
001FE0:  4E 45 2C 4D 4C 49 42 45 4C 4C 45 0D 0A 52 45 4C    NE,MLIBELLE..REL
001FF0:  45 41 53 45 20 4D 51 54 45 3A 52 45 53 54 45 2C    EASE MQTE:RESTE,
002000:  4D 51 54 45 3A 53 54 4F 43 4B 2C 4D 50 52 49 58    MQTE:STOCK,MPRIX
002010:  3A 55 48 54 2C 4D 50 52 49 58 3A 54 48 54 0D 0A    :UHT,MPRIX:THT..
002020:  53 45 54 20 45 58 41 43 54 20 4F 46 46 0D 0A 52    SET EXACT OFF..R
002030:  45 54 55 52 4E 0D 0A 45 4C 53 45 0D 0A 2A 20 52    ETURN..ELSE..* R
002040:  45 43 48 45 52 43 48 45 20 44 45 20 4C 27 45 58    ECHERCHE DE L'EX
002050:  49 53 54 45 4E 43 45 20 44 55 20 4E 55 4D 45 52    ISTENCE DU NUMER
002060:  4F 20 44 45 20 52 45 46 45 52 45 4E 43 45 20 53    O DE REFERENCE S
002070:  41 49 53 49 45 20 44 41 4E 53 20 4C 45 20 46 49    AISIE DANS LE FI
002080:  43 48 49 45 52 0D 0A 20 20 46 49 4E 44 20 26 4D    CHIER..  FIND &M
002090:  50 49 45 43 45 0D 0A 2A 20 53 49 20 43 45 54 54    PIECE..* SI CETT
0020A0:  45 20 52 45 46 45 52 45 4E 43 45 20 45 58 49 53    E REFERENCE EXIS
0020B0:  54 45 20 4C 41 20 56 41 52 49 41 42 4C 45 20 49    TE LA VARIABLE I
0020C0:  4E 54 45 52 4E 45 20 3A 20 27 23 27 2C 20 43 4F    NTERNE : '#', CO
0020D0:  4E 54 45 4E 41 4E 54 20 4C 45 20 4E 55 4D 45 52    NTENANT LE NUMER
0020E0:  4F 0D 0A 2A 20 44 45 20 4C 27 45 4E 52 45 47 49    O..* DE L'ENREGI
0020F0:  53 54 52 45 4D 45 4E 54 20 45 4E 20 43 4F 55 52    STREMENT EN COUR
002100:  50 4C 41 43 45 20 45 4D 45 54 54 45 55 52 20 57    PLACE EMETTEUR W
002110:  49 54 48 20 4D 45 4D 45 54 54 45 55 52 20 20 20    ITH MEMETTEUR   
002120:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002130:  20 20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20       ..           
002140:  20 20 20 20 20 52 45 50 4C 41 43 45 20 53 45 43         REPLACE SEC
002150:  54 49 4F 4E 20 57 49 54 48 20 4D 53 45 43 54 49    TION WITH MSECTI
002160:  4F 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ON              
002170:  20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20              ..    
002180:  20 20 20 20 20 20 20 20 20 20 20 20 52 45 50 4C                REPL
002190:  41 43 45 20 54 59 50 45 20 57 49 54 48 20 4D 54    ACE TYPE WITH MT
0021A0:  59 50 45 20 20 20 20 20 20 20 20 20 20 20 20 20    YPE             
0021B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0021C0:  20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20     ..             
0021D0:  20 20 20 52 45 50 4C 41 43 45 20 46 4F 55 52 4E       REPLACE FOURN
0021E0:  49 20 57 49 54 48 20 4D 46 4F 55 52 4E 49 20 20    I WITH MFOURNI  
0021F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002200:  20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20 20            ..      
002210:  20 20 20 20 20 20 20 20 20 20 52 45 50 4C 41 43              REPLAC
002220:  45 20 51 54 45 3A 43 4D 44 20 57 49 54 48 20 4D    E QTE:CMD WITH M
002230:  51 54 45 3A 43 4D 44 20 20 20 20 20 20 20 20 20    QTE:CMD         
002240:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D                   .
002250:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
002260:  20 52 45 50 4C 41 43 45 20 50 49 45 43 45 20 57     REPLACE PIECE W
002270:  49 54 48 20 4D 50 49 45 43 45 20 20 20 20 20 20    ITH MPIECE      
002280:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002290:  20 20 20 20 20 20 0D 0A 20 20 20 20 20 20 20 20          ..        
0022A0:  20 20 20 20 20 20 20 20 52 45 50 4C 41 43 45 20            REPLACE 
0022B0:  50 52 49 58 3A 55 48 54 20 57 49 54 48 20 4D 50    PRIX:UHT WITH MP
0022C0:  52 49 58 3A 55 48 54 20 20 20 20 20 20 20 20 20    RIX:UHT         
0022D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20                 .. 
0022E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52                   R
0022F0:  45 50 4C 41 43 45 20 49 4D 50 55 54 41 54 49 4F    EPLACE IMPUTATIO
002300:  53 20 53 45 52 41 20 44 49 46 46 45 52 45 4E 54    S SERA DIFFERENT
002310:  45 20 44 45 20 5A 45 52 4F 0D 0A 20 20 49 46 20    E DE ZERO..  IF 
002320:  23 20 3E 20 30 0D 0A 20 20 40 20 32 32 2C 30 20    # > 0..  @ 22,0 
002330:  53 41 59 20 27 4C 61 20 70 69 65 63 65 20 27 0D    SAY 'La piece '.
002340:  0A 20 20 40 20 32 32 2C 39 20 53 41 59 20 4D 50    .  @ 22,9 SAY MP
002350:  49 45 43 45 0D 0A 20 20 40 20 32 32 2C 32 31 20    IECE..  @ 22,21 
002360:  53 41 59 20 27 20 65 73 74 20 64 65 6A 61 20 65    SAY ' est deja e
002370:  6E 72 65 67 69 73 74 72 65 65 2C 20 56 41 4C 49    nregistree, VALI
002380:  44 45 5A 27 0D 0A 20 20 53 45 54 20 43 4F 4E 53    DEZ'..  SET CONS
002390:  4F 4C 45 20 4F 46 46 0D 0A 20 20 57 41 49 54 0D    OLE OFF..  WAIT.
0023A0:  0A 20 20 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F    .  SET CONSOLE O
0023B0:  4E 0D 0A 20 20 40 20 32 32 2C 30 20 53 41 59 20    N..  @ 22,0 SAY 
0023C0:  27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    '               
0023D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0023E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0023F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 20                  ' 
002400:  0D 0A 20 20 45 4C 53 45 0D 0A 2A 20 53 49 20 43    ..  ELSE..* SI C
002410:  45 54 54 45 20 52 45 46 45 52 45 4E 43 45 20 4E    ETTE REFERENCE N
002420:  27 45 58 49 53 54 45 20 50 41 53 20 2D 2D 3E 20    'EXISTE PAS --> 
002430:  53 41 49 53 49 45 20 44 45 53 20 44 49 46 46 45    SAISIE DES DIFFE
002440:  52 45 4E 54 53 20 50 41 52 41 4D 45 54 52 45 53    RENTS PARAMETRES
002450:  0D 0A 20 20 53 54 4F 52 45 20 27 20 20 20 20 20    ..  STORE '     
002460:  27 20 54 4F 20 4D 41 54 45 4C 49 45 52 20 20 20    ' TO MATELIER   
002470:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002480:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002490:  20 0D 0A 20 20 53 54 4F 52 45 20 27 20 20 20 20     ..  STORE '    
0024A0:  20 27 20 54 4F 20 4D 53 45 43 54 49 4F 4E 20 20     ' TO MSECTION  
0024B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0024C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0024D0:  20 20 0D 0A 20 20 53 54 4F 52 45 20 27 20 20 20      ..  STORE '   
0024E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0024F0:  20 20 20 20 20 27 20 54 4F 20 4D 4D 41 43 48 49         ' TO MMACHI
002500:  4E 20 57 49 54 48 20 4D 49 4D 50 55 54 41 54 49    N WITH MIMPUTATI
002510:  4F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    O               
002520:  20 20 20 20 0D 0A 20 20 20 20 20 20 20 20 20 20        ..          
002530:  20 20 20 20 20 20 52 45 50 4C 41 43 45 20 44 45          REPLACE DE
002540:  4C 41 49 20 57 49 54 48 20 56 41 4C 28 4D 44 45    LAI WITH VAL(MDE
002550:  4C 41 49 29 0D 0A 09 09 52 45 50 4C 41 43 45 20    LAI)....REPLACE 
002560:  43 4D 44 3A 44 41 54 45 20 57 49 54 48 20 22 20    CMD:DATE WITH " 
002570:  20 2F 20 20 2F 20 20 22 0D 0A 20 20 20 20 20 20     /  /  "..      
002580:  20 20 09 45 4E 44 49 46 20 20 20 20 20 20 20 20      .ENDIF        
002590:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0025A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0025B0:  20 20 20 20 20 20 20 20 0D 0A 09 45 4E 44 49 46            ...ENDIF
0025C0:  0D 0A 45 4E 44 49 46 20 20 20 20 20 20 20 20 20    ..ENDIF         
0025D0:  20 20 20 20 20 20 20 0D 0A 45 4E 44 44 4F 20 41           ..ENDDO A
0025E0:  4A 44 41 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    JDA.............
0025F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
002600:  20 53 45 43 4F 4E 44 41 49 52 45 0D 0A 2A 20 42     SECONDAIRE..* B
002610:  41 53 45 20 53 45 43 4F 4E 44 41 49 52 45 20 3D    ASE SECONDAIRE =
002620:  20 42 41 53 45 20 44 45 53 20 44 45 4D 41 4E 44     BASE DES DEMAND
002630:  45 53 20 44 27 41 43 48 41 54 0D 0A 09 09 53 45    ES D'ACHAT....SE
002640:  4C 45 43 54 20 53 45 43 4F 4E 44 41 52 59 0D 0A    LECT SECONDARY..
002650:  09 09 41 50 50 45 4E 44 20 42 4C 41 4E 4B 0D 0A    ..APPEND BLANK..
002660:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002670:  52 45 50 4C 41 43 45 20 44 41 3A 4E 55 4D 20 57    REPLACE DA:NUM W
002680:  49 54 48 20 4D 44 41 3A 4E 55 4D 20 20 20 20 20    ITH MDA:NUM     
002690:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0026A0:  20 20 20 20 20 0D 0A 20 20 20 20 20 20 20 20 20         ..         
0026B0:  20 20 20 20 20 20 20 52 45 50 4C 41 43 45 20 44           REPLACE D
0026C0:  41 3A 44 41 54 45 20 57 49 54 48 20 4D 44 41 3A    A:DATE WITH MDA:
0026D0:  44 41 54 45 20 20 20 20 20 20 20 20 20 20 20 20    DATE            
0026E0:  20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20                ..  
0026F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45                  RE
002700:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
002710:  02 00 00 00 02 09 50 E5 02 00 C1 02 00 00 00 02    ......P.........
002720:  02 00 C6 02 00 00 00 02 02 00 C2 02 00 00 00 02    ................
002730:  02 00 C7 02 00 00 00 02 02 00 C3 02 00 00 00 02    ................
002740:  02 00 C8 02 00 00 00 02 02 00 C4 02 00 00 00 02    ................
002750:  02 00 C9 02 00 00 00 02 02 00 C5 02 00 00 00 02    ................
002760:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
002770:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
002780:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
002790:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0027F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
002800:  4E 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20    NE              
002810:  20 20 20 0D 0A 20 20 53 54 4F 52 45 20 27 20 20       ..  STORE '  
002820:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002830:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002840:  27 20 54 4F 20 4D 4C 49 42 45 4C 4C 45 20 20 20    ' TO MLIBELLE   
002850:  20 20 20 20 0D 0A 20 20 53 54 4F 52 45 20 30 20        ..  STORE 0 
002860:  54 4F 20 4D 51 54 45 3A 52 45 53 54 45 20 20 0D    TO MQTE:RESTE  .
002870:  0A 20 20 53 54 4F 52 45 20 30 20 54 4F 20 4D 51    .  STORE 0 TO MQ
002880:  54 45 3A 53 54 4F 43 4B 20 20 0D 0A 20 20 53 54    TE:STOCK  ..  ST
002890:  4F 52 45 20 30 2E 30 30 20 54 4F 20 4D 50 52 49    ORE 0.00 TO MPRI
0028A0:  58 3A 55 48 54 0D 0A 20 20 53 54 4F 52 45 20 30    X:UHT..  STORE 0
0028B0:  20 54 4F 20 4D 4D 49 4E 49 3A 53 54 4F 43 20 20     TO MMINI:STOC  
0028C0:  0D 0A 20 20 40 20 36 2C 31 33 20 47 45 54 20 4D    ..  @ 6,13 GET M
0028D0:  41 54 45 4C 49 45 52 20 20 20 20 0D 0A 20 20 40    ATELIER    ..  @
0028E0:  20 36 2C 33 31 20 47 45 54 20 4D 53 45 43 54 49     6,31 GET MSECTI
0028F0:  4F 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ON              
002900:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002910:  20 20 20 20 20 0D 0A 20 20 40 20 36 2C 34 37 20         ..  @ 6,47 
002920:  47 45 54 20 4D 4D 41 43 48 49 4E 45 20 20 20 20    GET MMACHINE    
002930:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002940:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D                   .
002950:  0A 20 20 40 20 38 2C 31 37 20 47 45 54 20 4D 4C    .  @ 8,17 GET ML
002960:  49 42 45 4C 4C 45 20 20 20 20 20 20 20 20 20 20    IBELLE          
002970:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002980:  20 20 20 20 20 20 20 20 20 0D 0A 20 20 40 20 31             ..  @ 1
002990:  36 2C 35 31 20 47 45 54 20 4D 51 54 45 3A 52 45    6,51 GET MQTE:RE
0029A0:  53 54 45 20 20 20 20 20 20 20 20 20 20 20 20 20    STE             
0029B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0029C0:  20 20 20 0D 0A 20 20 40 20 32 30 2C 33 20 20 47       ..  @ 20,3  G
0029D0:  45 54 20 4D 4D 49 4E 49 3A 53 54 4F 43 20 20 20    ET MMINI:STOC   
0029E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0029F0:  20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20                ..  
002A00:  2C 31 31 20 53 41 59 20 27 20 20 20 20 20 20 20    ,11 SAY '       
002A10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002A20:  20 20 20 20 27 20 0D 0A 40 20 39 2C 31 31 20 53        ' ..@ 9,11 S
002A30:  41 59 20 27 20 20 20 20 20 20 20 27 20 0D 0A 40    AY '       ' ..@
002A40:  20 35 2C 34 37 20 53 41 59 20 27 20 20 20 20 20     5,47 SAY '     
002A50:  20 20 20 20 20 20 20 20 20 27 20 0D 0A 40 20 35             ' ..@ 5
002A60:  2C 36 36 20 53 41 59 20 27 20 20 20 20 20 20 20    ,66 SAY '       
002A70:  20 20 20 27 20 0D 0A 40 20 38 2C 34 35 20 53 41       ' ..@ 8,45 SA
002A80:  59 20 27 20 20 20 20 20 20 20 20 20 20 20 20 20    Y '             
002A90:  20 20 20 20 27 20 0D 0A 40 20 31 34 2C 32 20 53        ' ..@ 14,2 S
002AA0:  41 59 20 27 20 20 20 20 20 20 20 20 20 20 20 20    AY '            
002AB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002AC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 20                  ' 
002AD0:  0D 0A 40 20 31 34 2C 34 36 20 53 41 59 20 27 20    ..@ 14,46 SAY ' 
002AE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002AF0:  20 20 20 20 20 20 20 20 20 20 27 20 0D 0A 40 20              ' ..@ 
002B00:  31 38 2C 31 20 53 41 59 20 27 20 20 20 20 20 20    18,1 SAY '      
002B10:  20 20 20 20 20 20 27 20 0D 0A 40 20 31 38 2C 31          ' ..@ 18,1
002B20:  34 20 53 41 59 20 27 20 20 20 20 20 20 20 20 20    4 SAY '         
002B30:  20 20 20 20 20 27 20 0D 0A 40 20 31 38 2C 33 31         ' ..@ 18,31
002B40:  20 53 41 59 20 27 20 20 20 20 20 20 20 20 20 20     SAY '          
002B50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002B60:  20 20 20 20 20 20 20 20 20 27 0D 0A 40 20 31 38             '..@ 18
002B70:  2C 36 37 20 53 41 59 20 27 20 20 20 20 20 20 20    ,67 SAY '       
002B80:  20 20 20 20 20 27 20 0D 0A 40 20 32 30 2C 31 33         ' ..@ 20,13
002B90:  20 53 41 59 20 27 20 20 20 20 20 20 20 20 20 20     SAY '          
002BA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002BB0:  20 27 20 0D 0A 40 20 32 30 2C 37 31 20 53 41 59     ' ..@ 20,71 SAY
002BC0:  20 27 20 20 20 20 27 20 0D 0A 53 54 4F 52 45 20     '    ' ..STORE 
002BD0:  27 20 20 20 20 20 20 20 20 20 20 27 20 54 4F 20    '          ' TO 
002BE0:  4D 44 41 3A 4E 55 4D 0D 0A 40 20 35 2C 31 30 20    MDA:NUM..@ 5,10 
002BF0:  47 45 54 20 4D 44 41 3A 4E 55 4D 0D 0A 52 45 41    GET MDA:NUM..REA
002C00:  40 20 32 30 2C 33 35 20 47 45 54 20 4D 51 54 45    @ 20,35 GET MQTE
002C10:  3A 53 54 4F 43 4B 20 20 20 20 20 20 20 20 20 20    :STOCK          
002C20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002C30:  20 20 20 20 20 20 0D 0A 20 20 40 20 32 30 2C 34          ..  @ 20,4
002C40:  38 20 47 45 54 20 4D 50 52 49 58 3A 55 48 54 20    8 GET MPRIX:UHT 
002C50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002C60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002C70:  0D 0A 20 20 52 45 41 44 0D 0A 20 20 43 4C 45 41    ..  READ..  CLEA
002C80:  52 20 47 45 54 53 20 20 20 20 20 20 20 20 20 20    R GETS          
002C90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002CA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002CB0:  20 20 20 20 20 20 20 20 0D 0A 2A 20 43 41 4C 43            ..* CALC
002CC0:  55 4C 20 44 55 20 4D 4F 4E 54 41 4E 54 20 54 4F    UL DU MONTANT TO
002CD0:  54 41 4C 20 44 55 20 53 54 4F 43 4B 20 50 4F 55    TAL DU STOCK POU
002CE0:  52 20 43 45 54 54 45 20 50 49 45 43 45 0D 0A 20    R CETTE PIECE.. 
002CF0:  20 53 54 4F 52 45 20 4D 50 52 49 58 3A 55 48 54     STORE MPRIX:UHT
002D00:  20 2A 20 4D 51 54 45 3A 53 54 4F 43 4B 20 54 4F     * MQTE:STOCK TO
002D10:  20 4D 50 52 49 58 3A 54 48 54 0D 0A 20 20 40 20     MPRIX:THT..  @ 
002D20:  32 30 2C 36 37 20 53 41 59 20 4D 50 52 49 58 3A    20,67 SAY MPRIX:
002D30:  54 48 54 0D 0A 2A 20 45 4E 52 45 47 49 53 54 52    THT..* ENREGISTR
002D40:  45 4D 45 4E 54 20 44 45 53 20 49 4E 46 4F 52 4D    EMENT DES INFORM
002D50:  41 54 49 4F 4E 53 20 53 41 49 53 49 45 53 0D 0A    ATIONS SAISIES..
002D60:  20 20 41 50 50 45 4E 44 20 42 4C 41 4E 4B 20 0D      APPEND BLANK .
002D70:  0A 20 20 52 45 50 4C 41 43 45 20 41 54 45 4C 49    .  REPLACE ATELI
002D80:  45 52 20 57 49 54 48 20 4D 41 54 45 4C 49 45 52    ER WITH MATELIER
002D90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002DA0:  20 20 20 20 20 20 20 20 20 0D 0A 20 20 52 45 50             ..  REP
002DB0:  4C 41 43 45 20 53 45 43 54 49 4F 4E 20 57 49 54    LACE SECTION WIT
002DC0:  48 20 4D 53 45 43 54 49 4F 4E 20 20 20 20 20 20    H MSECTION      
002DD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002DE0:  20 20 20 0D 0A 20 20 52 45 50 4C 41 43 45 20 4D       ..  REPLACE M
002DF0:  41 43 48 49 4E 45 20 57 49 54 48 20 4D 4D 41 43    ACHINE WITH MMAC
002E00:  44 0D 0A 49 46 20 4D 44 41 3A 4E 55 4D 20 3D 20    D..IF MDA:NUM = 
002E10:  27 20 27 0D 0A 53 45 54 20 45 58 41 43 54 20 4F    ' '..SET EXACT O
002E20:  46 46 0D 0A 52 45 4C 45 41 53 45 20 4D 44 41 3A    FF..RELEASE MDA:
002E30:  4E 55 4D 2C 4D 43 4D 44 3A 4E 55 4D 2C 4D 43 4D    NUM,MCMD:NUM,MCM
002E40:  44 3A 44 41 54 45 2C 43 4F 4E 54 43 44 45 0D 0A    D:DATE,CONTCDE..
002E50:  52 45 54 55 52 4E 0D 0A 45 4C 53 45 0D 0A 46 49    RETURN..ELSE..FI
002E60:  4E 44 20 26 4D 44 41 3A 4E 55 4D 0D 0A 09 49 46    ND &MDA:NUM...IF
002E70:  20 23 20 3D 20 30 0D 0A 09 40 20 32 32 2C 30 20     # = 0...@ 22,0 
002E80:  53 41 59 20 27 4C 61 20 44 2E 41 2E 20 27 0D 0A    SAY 'La D.A. '..
002E90:  09 40 20 32 32 2C 39 20 53 41 59 20 4D 44 41 3A    .@ 22,9 SAY MDA:
002EA0:  4E 55 4D 0D 0A 09 40 20 32 32 2C 32 31 20 53 41    NUM...@ 22,21 SA
002EB0:  59 20 22 20 6E 27 61 20 70 61 73 20 65 74 65 20    Y " n'a pas ete 
002EC0:  65 6E 72 65 67 69 73 74 72 65 65 2C 20 56 41 4C    enregistree, VAL
002ED0:  49 44 45 5A 22 0D 0A 09 53 45 54 20 43 4F 4E 53    IDEZ"...SET CONS
002EE0:  4F 4C 45 20 4F 46 46 0D 0A 09 57 41 49 54 0D 0A    OLE OFF...WAIT..
002EF0:  09 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 4E 0D    .SET CONSOLE ON.
002F00:  0A 09 45 4C 53 45 20 20 20 20 20 20 20 20 20 20    ..ELSE          
002F10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002F20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002F30:  20 20 20 20 20 20 20 09 0D 0A 09 53 54 4F 52 45           ....STORE
002F40:  20 22 20 20 20 20 20 20 20 20 20 20 20 20 22 20     "            " 
002F50:  54 4F 20 4D 43 4D 44 3A 4E 55 4D 20 20 20 20 20    TO MCMD:NUM     
002F60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002F70:  20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 09 53                ...S
002F80:  54 4F 52 45 20 22 20 20 20 20 20 20 20 20 22 20    TORE "        " 
002F90:  54 4F 20 4D 43 4D 44 3A 44 41 54 45 20 20 20 20    TO MCMD:DATE    
002FA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002FB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002FC0:  20 0D 0A 20 20 20 20 20 20 20 20 40 20 35 2C 32     ..        @ 5,2
002FD0:  37 20 53 41 59 20 44 41 3A 44 41 54 45 20 20 20    7 SAY DA:DATE   
002FE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
002FF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003000:  48 49 4E 45 20 20 20 20 20 20 20 20 20 20 20 20    HINE            
003010:  20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20                 .. 
003020:  20 52 45 50 4C 41 43 45 20 4C 49 42 45 4C 4C 45     REPLACE LIBELLE
003030:  20 57 49 54 48 20 4D 4C 49 42 45 4C 4C 45 20 20     WITH MLIBELLE  
003040:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003050:  20 20 20 20 20 20 20 0D 0A 20 20 52 45 50 4C 41           ..  REPLA
003060:  43 45 20 50 49 45 43 45 20 57 49 54 48 20 4D 50    CE PIECE WITH MP
003070:  49 45 43 45 20 20 20 20 20 20 20 20 20 20 20 20    IECE            
003080:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003090:  20 0D 0A 20 20 52 45 50 4C 41 43 45 20 51 54 45     ..  REPLACE QTE
0030A0:  3A 52 45 53 54 45 20 57 49 54 48 20 4D 51 54 45    :RESTE WITH MQTE
0030B0:  3A 52 45 53 54 45 20 20 20 20 20 20 20 20 20 20    :RESTE          
0030C0:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 52               ..  R
0030D0:  45 50 4C 41 43 45 20 51 54 45 3A 53 54 4F 43 4B    EPLACE QTE:STOCK
0030E0:  20 57 49 54 48 20 4D 51 54 45 3A 53 54 4F 43 4B     WITH MQTE:STOCK
0030F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003100:  20 20 20 20 20 0D 0A 20 20 52 45 50 4C 41 43 45         ..  REPLACE
003110:  20 50 52 49 58 3A 55 48 54 20 57 49 54 48 20 4D     PRIX:UHT WITH M
003120:  50 52 49 58 3A 55 48 54 20 20 20 20 20 20 20 20    PRIX:UHT        
003130:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D                   .
003140:  0A 20 20 52 45 50 4C 41 43 45 20 4D 49 4E 49 3A    .  REPLACE MINI:
003150:  53 54 4F 43 4B 20 57 49 54 48 20 4D 4D 49 4E 49    STOCK WITH MMINI
003160:  3A 53 54 4F 43 20 20 20 20 20 20 20 20 20 20 20    :STOC           
003170:  20 20 20 20 20 20 20 20 0D 0A 20 20 45 4E 44 49            ..  ENDI
003180:  46 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    F               
003190:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0031A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0031B0:  20 20 0D 0A 45 4E 44 49 46 0D 0A 45 4E 44 44 4F      ..ENDIF..ENDDO
0031C0:  20 41 4A 53 54 4F 43 4B 0D 0A 1A 1A 1A 1A 1A 1A     AJSTOCK........
0031D0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0031E0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0031F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
003200:  20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20                ..  
003210:  20 20 20 20 20 20 40 20 37 2C 31 31 20 53 41 59          @ 7,11 SAY
003220:  20 45 4D 45 54 54 45 55 52 20 20 20 20 20 20 20     EMETTEUR       
003230:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003240:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003250:  20 20 20 20 20 20 20 0D 0A 20 20 20 20 20 20 20           ..       
003260:  20 40 20 39 2C 31 31 20 53 41 59 20 53 45 43 54     @ 9,11 SAY SECT
003270:  49 4F 4E 20 20 20 20 20 20 20 20 20 20 20 20 20    ION             
003280:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003290:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0032A0:  20 20 0D 0A 20 20 20 20 20 20 20 20 40 20 38 2C      ..        @ 8,
0032B0:  34 35 20 53 41 59 20 54 59 50 45 20 20 20 20 20    45 SAY TYPE     
0032C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0032D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0032E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20                 .. 
0032F0:  20 20 20 20 20 20 20 40 20 31 34 2C 32 20 53 41           @ 14,2 SA
003300:  59 20 46 4F 55 52 4E 49 20 20 20 20 20 20 20 20    Y FOURNI        
003310:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003320:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003330:  20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20 20            ..      
003340:  20 20 40 20 31 34 2C 34 36 20 53 41 59 20 4D 41      @ 14,46 SAY MA
003350:  43 48 49 4E 45 20 20 20 20 20 20 20 20 20 20 20    CHINE           
003360:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003370:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003380:  20 20 20 0D 0A 20 20 20 20 20 20 20 20 40 20 31       ..        @ 1
003390:  38 2C 31 20 53 41 59 20 51 54 45 3A 43 4D 44 20    8,1 SAY QTE:CMD 
0033A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0033B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0033C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A                  ..
0033D0:  09 40 20 31 38 2C 31 36 20 53 41 59 20 50 49 45    .@ 18,16 SAY PIE
0033E0:  43 45 0D 0A 20 20 20 20 20 20 20 20 40 20 31 38    CE..        @ 18
0033F0:  2C 33 31 20 53 41 59 20 4C 49 42 45 4C 4C 45 20    ,31 SAY LIBELLE 
003400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0034A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0034B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0034C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0034D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0034E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0034F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003500:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003510:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003520:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003530:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003540:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003550:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003560:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003570:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003580:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003590:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0035A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0035B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0035C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0035D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0035E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0035F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
003600:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003610:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003620:  20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20                 .. 
003630:  20 20 20 20 20 20 20 40 20 31 38 2C 36 39 20 53           @ 18,69 S
003640:  41 59 20 50 52 49 58 3A 55 48 54 20 20 20 20 20    AY PRIX:UHT     
003650:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003660:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003670:  20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20 20            ..      
003680:  20 20 40 20 32 30 2C 31 33 20 53 41 59 20 49 4D      @ 20,13 SAY IM
003690:  50 55 54 41 54 49 4F 4E 20 20 20 20 20 20 20 20    PUTATION        
0036A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0036B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0036C0:  20 20 20 0D 0A 20 20 20 20 20 20 20 20 40 20 32       ..        @ 2
0036D0:  30 2C 37 31 20 53 41 59 20 44 45 4C 41 49 20 20    0,71 SAY DELAI  
0036E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0036F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003700:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A                  ..
003710:  09 09 49 46 20 43 4D 44 3A 4E 55 4D 20 23 20 22    ..IF CMD:NUM # "
003720:  20 22 0D 0A 09 09 40 20 35 2C 34 37 20 53 41 59     "....@ 5,47 SAY
003730:  20 43 4D 44 3A 4E 55 4D 20 0D 0A 09 09 40 20 35     CMD:NUM ....@ 5
003740:  2C 36 36 20 53 41 59 20 43 4D 44 3A 44 41 54 45    ,66 SAY CMD:DATE
003750:  0D 0A 09 09 40 20 32 32 2C 30 20 53 41 59 20 22    ....@ 22,0 SAY "
003760:  49 6C 20 65 78 69 73 74 65 20 64 65 6A 61 20 75    Il existe deja u
003770:  6E 20 6E 75 6D 65 72 6F 20 64 65 20 63 6F 6D 6D    n numero de comm
003780:  61 6E 64 65 20 70 6F 75 72 20 3B 0D 0A 6C 61 20    ande pour ;..la 
003790:  64 65 6D 61 6E 64 65 20 64 27 61 63 68 61 74 20    demande d'achat 
0037A0:  22 0D 0A 09 09 40 20 32 32 2C 36 32 20 53 41 59    "....@ 22,62 SAY
0037B0:  20 44 41 3A 4E 55 4D 0D 0A 09 09 53 45 54 20 43     DA:NUM....SET C
0037C0:  4F 4E 53 4F 4C 45 20 4F 46 46 0D 0A 09 09 57 41    ONSOLE OFF....WA
0037D0:  49 54 0D 0A 09 09 53 45 54 20 43 4F 4E 53 4F 4C    IT....SET CONSOL
0037E0:  45 20 4F 4E 0D 0A 09 09 40 20 32 32 2C 30 20 53    E ON....@ 22,0 S
0037F0:  41 59 20 27 20 20 20 20 20 20 20 20 20 20 20 20    AY '            
003800:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
003810:  2A 2A 2A 20 53 41 49 53 49 45 20 44 45 20 4E 55    *** SAISIE DE NU
003820:  4D 45 52 4F 28 53 29 20 44 45 20 43 4F 4D 4D 41    MERO(S) DE COMMA
003830:  4E 44 45 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    NDE ************
003840:  2A 2A 2A 2A 2A 0D 0A 2A 20 43 45 20 46 49 43 48    *****..* CE FICH
003850:  49 45 52 20 56 4F 55 53 20 50 45 52 4D 45 54 54    IER VOUS PERMETT
003860:  52 41 20 44 45 20 53 41 49 53 49 52 20 4C 45 20    RA DE SAISIR LE 
003870:  4E 55 4D 45 52 4F 20 44 45 20 43 4F 4D 4D 41 4E    NUMERO DE COMMAN
003880:  44 45 20 52 45 4C 41 54 49 46 20 2A 0D 0A 2A 20    DE RELATIF *..* 
003890:  41 20 55 4E 45 20 44 45 4D 41 4E 44 45 20 44 27    A UNE DEMANDE D'
0038A0:  41 43 48 41 54 20 20 20 20 20 20 20 20 20 20 20    ACHAT           
0038B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0038C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0038D0:  20 20 2A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A      *..***********
0038E0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
0038F0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
003900:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
003910:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 0D 0A 53 45    **********....SE
003920:  54 20 45 58 41 43 54 20 4F 4E 0D 0A 53 45 4C 45    T EXACT ON..SELE
003930:  43 54 20 50 52 49 4D 41 52 59 0D 0A 55 53 45 20    CT PRIMARY..USE 
003940:  53 54 4F 43 4B 20 49 4E 44 45 58 20 50 49 45 43    STOCK INDEX PIEC
003950:  45 0D 0A 53 45 4C 45 43 54 20 53 45 43 4F 4E 44    E..SELECT SECOND
003960:  41 52 59 0D 0A 55 53 45 20 44 41 20 49 4E 44 45    ARY..USE DA INDE
003970:  58 20 44 41 0D 0A 53 54 4F 52 45 20 27 4F 27 20    X DA..STORE 'O' 
003980:  54 4F 20 43 4F 4E 54 43 44 45 0D 0A 44 4F 20 57    TO CONTCDE..DO W
003990:  48 49 4C 45 20 43 4F 4E 54 43 44 45 20 3D 20 27    HILE CONTCDE = '
0039A0:  4F 27 0D 0A 43 4C 45 41 52 20 47 45 54 53 0D 0A    O'..CLEAR GETS..
0039B0:  53 45 4C 45 43 54 20 53 45 43 4F 4E 44 41 52 59    SELECT SECONDARY
0039C0:  0D 0A 40 20 35 2C 32 37 20 53 41 59 20 27 20 20    ..@ 5,27 SAY '  
0039D0:  20 20 20 20 20 20 20 20 27 20 20 20 20 20 20 20            '       
0039E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0039F0:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 40 20 37               ..@ 7
003A00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
003A10:  03 00 00 00 02 09 50 E5 03 00 C1 02 00 00 00 02    ......P.........
003A20:  03 00 C6 02 00 00 00 02 03 00 C2 02 00 00 00 02    ................
003A30:  03 00 C7 02 00 00 00 02 03 00 C3 02 00 00 00 02    ................
003A40:  03 00 C8 02 00 00 00 02 03 00 C4 02 00 00 00 02    ................
003A50:  03 00 C9 02 00 00 00 02 03 00 C5 02 00 00 00 02    ................
003A60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003A70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003A80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003A90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003AF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
003B00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003B10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D                  ;.
003B20:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
003B30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003B40:  20 20 20 27 0D 0A 09 09 45 4C 53 45 0D 0A 09 09       '....ELSE....
003B50:  53 45 4C 45 43 54 20 50 52 49 4D 41 52 59 0D 0A    SELECT PRIMARY..
003B60:  09 09 53 54 4F 52 45 20 53 2E 50 49 45 43 45 20    ..STORE S.PIECE 
003B70:  54 4F 20 52 45 43 48 45 52 43 48 45 0D 0A 09 09    TO RECHERCHE....
003B80:  46 49 4E 44 20 26 52 45 43 48 45 52 43 48 45 0D    FIND &RECHERCHE.
003B90:  0A 09 09 09 49 46 20 23 20 3D 20 30 0D 0A 09 09    ....IF # = 0....
003BA0:  09 40 20 32 32 2C 30 20 53 41 59 20 22 4C 61 20    .@ 22,0 SAY "La 
003BB0:  70 69 65 63 65 22 0D 0A 09 09 09 40 20 32 32 2C    piece".....@ 22,
003BC0:  39 20 53 41 59 20 53 2E 50 49 45 43 45 0D 0A 09    9 SAY S.PIECE...
003BD0:  09 09 40 20 32 32 2C 32 30 20 53 41 59 20 22 6E    ..@ 22,20 SAY "n
003BE0:  65 20 66 69 67 75 72 65 20 70 6C 75 73 20 64 61    e figure plus da
003BF0:  6E 73 20 6C 65 20 66 69 63 68 69 65 72 2C 20 3B    ns le fichier, ;
003C00:  0D 0A 65 6E 72 65 67 69 73 74 72 65 7A 20 6C 61    ..enregistrez la
003C10:  2C 22 0D 0A 09 09 09 40 20 32 32 2C 36 38 20 53    ,".....@ 22,68 S
003C20:  41 59 20 22 56 61 6C 69 64 65 7A 22 0D 0A 09 09    AY "Validez"....
003C30:  09 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 46 46    .SET CONSOLE OFF
003C40:  0D 0A 09 09 09 57 41 49 54 0D 0A 09 09 09 53 45    .....WAIT.....SE
003C50:  54 20 43 4F 4E 53 4F 4C 45 20 4F 4E 0D 0A 09 09    T CONSOLE ON....
003C60:  09 40 20 32 32 2C 30 20 53 41 59 20 22 20 20 20    .@ 22,0 SAY "   
003C70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003C80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D                  ;.
003C90:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
003CA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003CB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A                 "..
003CC0:  09 09 09 45 4C 53 45 0D 0A 20 20 20 20 20 20 20    ...ELSE..       
003CD0:  20 20 20 20 09 20 20 20 20 20 20 20 20 40 20 35        .        @ 5
003CE0:  2C 34 37 20 47 45 54 20 4D 43 4D 44 3A 4E 55 4D    ,47 GET MCMD:NUM
003CF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003D00:  73 65 74 20 74 61 6C 6B 20 6F 66 66 0D 0A 72 65    set talk off..re
003D10:  73 74 6F 72 65 20 66 72 6F 6D 20 63 68 65 71 75    store from chequ
003D20:  65 0D 0A 64 6F 20 77 68 69 6C 65 20 74 0D 0A 65    e..do while t..e
003D30:  72 61 73 65 0D 0A 0D 0A 40 20 35 2C 30 20 73 61    rase....@ 5,0 sa
003D40:  79 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20    y "             
003D50:  20 20 20 20 20 20 47 45 53 54 49 4F 4E 20 44 45          GESTION DE
003D60:  20 43 4F 4D 50 54 45 20 42 41 4E 43 41 49 52 45     COMPTE BANCAIRE
003D70:  22 0D 0A 40 20 37 2C 30 20 73 61 79 20 22 20 20    "..@ 7,0 say "  
003D80:  20 20 20 20 20 20 64 65 72 6E 69 65 72 20 63 68          dernier ch
003D90:  65 71 75 65 20 65 6D 69 73 20 3A 20 20 20 20 20    eque emis :     
003DA0:  20 20 20 20 20 20 53 6F 6C 64 65 20 3A 20 20 20          Solde :   
003DB0:  20 20 20 20 20 20 20 20 20 20 46 22 0D 0A 40 20              F"..@ 
003DC0:  24 2C 33 30 20 73 61 79 20 63 68 71 3A 64 65 72    $,30 say chq:der
003DD0:  0D 0A 40 20 24 2C 34 39 20 73 61 79 20 63 68 71    ..@ $,49 say chq
003DE0:  3A 73 6F 6C 64 65 0D 0A 40 20 39 2C 30 20 20 73    :solde..@ 9,0  s
003DF0:  61 79 22 20 20 20 20 20 20 20 20 28 44 29 65 62    ay"        (D)eb
003E00:  69 74 22 0D 0A 0D 0A 40 20 31 31 2C 30 20 73 61    it"....@ 11,0 sa
003E10:  79 22 20 20 20 20 20 20 20 20 28 43 29 72 65 64    y"        (C)red
003E20:  69 74 22 0D 0A 0D 0A 40 20 31 33 2C 30 20 73 61    it"....@ 13,0 sa
003E30:  79 22 20 20 20 20 20 20 20 20 28 47 29 65 6E 65    y"        (G)ene
003E40:  72 61 74 69 6F 6E 20 64 27 65 74 61 74 22 0D 0A    ration d'etat"..
003E50:  0D 0A 40 20 31 35 2C 30 20 73 61 79 22 20 20 20    ..@ 15,0 say"   
003E60:  20 20 20 20 20 28 52 29 65 74 6F 75 72 20 61 75         (R)etour au
003E70:  20 73 79 74 65 6D 65 22 0D 0A 77 61 69 74 20 74     syteme"..wait t
003E80:  6F 20 72 65 70 6F 6E 73 65 0D 0A 64 6F 20 63 61    o reponse..do ca
003E90:  73 65 0D 0A 63 61 73 65 20 21 28 72 65 70 6F 6E    se..case !(repon
003EA0:  73 65 29 3D 22 44 22 0D 0A 64 6F 20 64 65 62 69    se)="D"..do debi
003EB0:  74 0D 0A 63 61 73 65 20 21 28 72 65 70 6F 6E 73    t..case !(repons
003EC0:  65 29 3D 22 43 22 0D 0A 64 6F 20 63 72 65 64 69    e)="C"..do credi
003ED0:  74 0D 0A 63 61 73 65 20 21 28 72 65 70 6F 6E 73    t..case !(repons
003EE0:  65 29 3D 22 47 22 0D 0A 64 6F 20 65 74 61 74 0D    e)="G"..do etat.
003EF0:  0A 63 61 73 65 20 21 28 72 65 70 6F 6E 73 65 29    .case !(reponse)
003F00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003F10:  20 20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20       ..           
003F20:  20 20 20 20 20 20 20 20 20 20 20 20 20 40 20 35                 @ 5
003F30:  2C 36 36 20 47 45 54 20 4D 43 4D 44 3A 44 41 54    ,66 GET MCMD:DAT
003F40:  45 20 50 49 43 54 55 52 45 20 22 39 39 2F 39 39    E PICTURE "99/99
003F50:  2F 39 39 22 0D 0A 20 20 20 20 20 20 20 20 20 20    /99"..          
003F60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45                  RE
003F70:  41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20    AD              
003F80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003F90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003FA0:  20 20 20 20 0D 0A 09 09 09 53 45 4C 45 43 54 20        .....SELECT 
003FB0:  53 45 43 4F 4E 44 41 52 59 0D 0A 20 20 20 20 20    SECONDARY..     
003FC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
003FD0:  20 20 20 52 45 50 4C 41 43 45 20 43 4D 44 3A 4E       REPLACE CMD:N
003FE0:  55 4D 20 57 49 54 48 20 4D 43 4D 44 3A 4E 55 4D    UM WITH MCMD:NUM
003FF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004000:  20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20             ..     
004010:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004020:  20 20 20 52 45 50 4C 41 43 45 20 43 4D 44 3A 44       REPLACE CMD:D
004030:  41 54 45 20 57 49 54 48 20 4D 43 4D 44 3A 44 41    ATE WITH MCMD:DA
004040:  54 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20    TE              
004050:  20 20 20 20 20 20 20 20 20 0D 0A 09 09 09 45 4E             .....EN
004060:  44 49 46 0D 0A 09 09 45 4E 44 49 46 0D 0A 09 45    DIF....ENDIF...E
004070:  4E 44 49 46 0D 0A 45 4E 44 49 46 20 20 20 20 20    NDIF..ENDIF     
004080:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 45 4E 44               ..END
004090:  44 4F 20 53 41 49 53 49 45 20 4E 55 4D 45 52 4F    DO SAISIE NUMERO
0040A0:  20 44 45 20 43 4F 4D 4D 41 4E 44 45 0D 0A 1A 1A     DE COMMANDE....
0040B0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0040C0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0040D0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0040E0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0040F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
004100:  3D 22 52 22 0D 0A 73 61 76 65 20 74 6F 20 63 68    ="R"..save to ch
004110:  65 71 75 65 20 61 6C 6C 20 6C 69 6B 65 20 63 68    eque all like ch
004120:  71 3A 2A 0D 0A 72 65 6C 65 61 73 65 20 61 6C 6C    q:*..release all
004130:  0D 0A 71 75 69 74 0D 0A 6F 74 68 65 72 77 69 73    ..quit..otherwis
004140:  65 0D 0A 3F 20 63 68 72 28 37 29 0D 0A 3F 20 22    e..? chr(7)..? "
004150:  76 6F 74 72 65 20 73 65 6C 65 63 74 69 6F 6E 20    votre selection 
004160:  64 6F 69 74 20 65 74 72 65 20 44 2C 20 43 2C 20    doit etre D, C, 
004170:  47 20 6F 75 20 52 22 0D 0A 73 74 6F 72 65 20 30    G ou R"..store 0
004180:  20 74 6F 20 74 65 6D 70 6F 0D 0A 64 6F 20 77 68     to tempo..do wh
004190:  69 6C 65 20 74 65 6D 70 6F 23 35 30 0D 0A 73 74    ile tempo#50..st
0041A0:  6F 72 65 20 74 65 6D 70 6F 2B 31 20 74 6F 20 74    ore tempo+1 to t
0041B0:  65 6D 70 6F 0D 0A 65 6E 64 64 6F 20 74 65 6D 70    empo..enddo temp
0041C0:  6F 0D 0A 72 65 6C 65 61 73 65 20 74 65 6D 70 6F    o..release tempo
0041D0:  0D 0A 65 6E 64 63 61 73 65 0D 0A 65 6E 64 64 6F    ..endcase..enddo
0041E0:  20 63 68 65 71 75 65 0D 0A 1A 1A 1A 1A 1A 1A 1A     cheque.........
0041F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
004200:  0D 0A 65 6E 72 65 67 69 73 74 72 65 7A 20 6C 61    ..enregistrez la
004210:  2C 22 0D 0A 09 09 09 40 20 32 32 2C 36 38 20 53    ,".....@ 22,68 S
004220:  41 59 20 22 56 61 6C 69 64 65 7A 22 0D 0A 09 09    AY "Validez"....
004230:  09 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 46 46    .SET CONSOLE OFF
004240:  0D 0A 09 09 09 57 41 49 54 0D 0A 09 09 09 53 45    .....WAIT.....SE
004250:  54 20 43 4F 4E 53 4F 4C 45 20 4F 4E 0D 0A 09 09    T CONSOLE ON....
004260:  09 40 20 32 32 2C 30 20 53 41 59 20 22 20 20 20    .@ 22,0 SAY "   
004270:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004280:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D                  ;.
004290:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
0042A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0042B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A                 "..
0042C0:  09 09 09 45 4C 53 45 0D 0A 20 20 20 20 20 20 20    ...ELSE..       
0042D0:  20 20 20 20 09 20 20 20 20 20 20 20 20 40 20 35        .        @ 5
0042E0:  2C 34 37 20 47 45 54 20 4D 43 4D 44 3A 4E 55 4D    ,47 GET MCMD:NUM
0042F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
004300:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004310:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004320:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004330:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004340:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004350:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004360:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004370:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004380:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004390:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0043F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0044F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004500:  40 20 32 2C 30 20 73 61 79 20 22 20 20 20 20 20    @ 2,0 say "     
004510:  20 20 20 20 20 20 20 20 20 20 20 20 20 43 52 45                 CRE
004520:  41 54 49 4F 4E 20 44 27 55 4E 20 4E 4F 55 56 45    ATION D'UN NOUVE
004530:  41 55 20 43 52 45 44 49 54 22 0D 0A 40 20 34 2C    AU CREDIT"..@ 4,
004540:  30 20 73 61 79 20 22 64 61 74 65 20 3A 20 22 20    0 say "date : " 
004550:  67 65 74 20 64 61 74 65 3A 63 72 65 20 70 69 63    get date:cre pic
004560:  74 75 72 65 20 22 39 39 2F 39 39 2F 39 39 22 0D    ture "99/99/99".
004570:  0A 40 20 24 2C 32 30 20 73 61 79 20 22 63 72 65    .@ $,20 say "cre
004580:  64 69 74 65 75 72 20 3A 20 22 20 67 65 74 20 63    diteur : " get c
004590:  72 65 64 69 74 65 75 72 0D 0A 40 20 37 2C 30 20    rediteur..@ 7,0 
0045A0:  73 61 79 20 22 63 6F 6D 6D 65 6E 74 61 69 72 65    say "commentaire
0045B0:  20 3A 20 22 20 67 65 74 20 63 6F 6D 3A 63 72 65     : " get com:cre
0045C0:  0D 0A 40 20 37 2C 35 30 20 73 61 79 20 22 6D 6F    ..@ 7,50 say "mo
0045D0:  6E 74 61 6E 74 20 3A 20 20 20 20 20 20 20 20 20    ntant :         
0045E0:  20 20 20 46 22 0D 0A 40 20 37 2C 36 30 20 67 65       F"..@ 7,60 ge
0045F0:  74 20 6D 6F 6E 74 3A 63 72 65 0D 0A 40 20 31 35    t mont:cre..@ 15
004600:  2C 30 20 73 61 79 20 22 63 68 61 6D 70 20 20 20    ,0 say "champ   
004610:  20 20 20 20 20 20 3A 20 73 75 69 76 61 6E 74 20          : suivant 
004620:  20 20 20 5E 58 20 20 20 70 72 65 63 65 64 65 6E       ^X   preceden
004630:  74 20 5E 45 22 0D 0A 40 20 31 36 2C 30 20 73 61    t ^E"..@ 16,0 sa
004640:  79 20 22 63 61 72 61 63 74 65 72 65 20 20 20 20    y "caractere    
004650:  20 3A 20 73 75 69 76 61 6E 74 20 20 20 20 5E 44     : suivant    ^D
004660:  20 20 20 70 72 65 63 65 64 65 6E 74 20 5E 53 22       precedent ^S"
004670:  0D 0A 40 20 31 37 2C 30 20 73 61 79 20 22 66 69    ..@ 17,0 say "fi
004680:  6E 20 63 72 65 61 74 69 6F 6E 20 20 3A 20 3C 72    n creation  : <r
004690:  65 74 75 72 6E 3E 20 70 6F 75 72 20 6C 61 20 64    eturn> pour la d
0046A0:  61 74 65 22 0D 0A 1A 1A 28 4F 2F 4E 29 20 3F 20    ate"....(O/N) ? 
0046B0:  22 0D 0A 73 65 74 20 63 6F 6E 73 6F 6C 65 20 6F    "..set console o
0046C0:  66 66 0D 0A 77 61 69 74 20 74 6F 20 65 66 66 0D    ff..wait to eff.
0046D0:  0A 73 65 74 20 63 6F 6E 73 6F 6C 65 20 6F 6E 0D    .set console on.
0046E0:  0A 20 20 20 20 20 20 69 66 20 21 28 65 66 66 29    .      if !(eff)
0046F0:  3D 22 4F 22 0D 0A 20 20 20 20 20 20 73 74 6F 72    ="O"..      stor
004700:  43 48 51 3A 44 45 52 00 00 00 00 C3 07 02 64 00    CHQ:DER.......d.
004710:  07 30 30 30 30 30 30 30 43 48 51 3A 53 4F 4C 44    .0000000CHQ:SOLD
004720:  45 00 00 CE 0A 3C 64 02 00 00 00 00 00 00 1A 46    E....<d........F
004730:  45 45 53 20 27 0D 0A 20 20 20 20 20 20 20 20 20    EES '..         
004740:  20 20 20 40 20 32 31 2C 31 30 20 53 41 59 20 27       @ 21,10 SAY '
004750:  4C 41 53 54 20 31 32 20 44 45 50 4F 53 49 54 53    LAST 12 DEPOSITS
004760:  20 4C 49 53 54 45 44 20 48 45 52 45 20 27 0D 0A     LISTED HERE '..
004770:  20 20 20 20 20 20 20 20 20 20 20 20 55 53 45 20                USE 
004780:  44 45 50 4F 53 49 54 53 0D 0A 20 20 20 20 20 20    DEPOSITS..      
004790:  20 20 20 20 20 20 47 4F 20 42 4F 54 54 4F 4D 0D          GO BOTTOM.
0047A0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 53 4B 49    .            SKI
0047B0:  50 20 2D 31 31 0D 0A 20 20 20 20 20 20 20 20 20    P -11..         
0047C0:  20 20 20 4C 49 53 54 20 4F 46 46 20 4E 45 58 54       LIST OFF NEXT
0047D0:  20 31 32 20 44 41 54 45 2C 27 24 27 2C 53 54 52     12 DATE,'$',STR
0047E0:  28 41 4D 54 2C 38 2C 32 29 2C 50 41 49 44 46 52    (AMT,8,2),PAIDFR
0047F0:  4F 4D 0D 0A 20 20 20 20 20 20 20 20 45 4E 44 43    OM..        ENDC
004800:  41 53 45 0D 0A 20 20 20 20 20 20 20 20 52 45 4C    ASE..        REL
004810:  45 41 53 45 20 42 41 4E 4B 3A 42 41 4C 2C 20 4F    EASE BANK:BAL, O
004820:  55 54 53 54 41 4E 44 0D 0A 20 20 20 20 20 20 20    UTSTAND..       
004830:  20 55 53 45 0D 0A 20 20 20 20 20 20 20 20 3F 0D     USE..        ?.
004840:  0A 20 20 20 20 20 20 20 20 3F 20 27 20 20 20 20    .        ? '    
004850:  20 20 20 20 20 20 72 65 61 64 79 20 74 6F 20 72          ready to r
004860:  65 74 75 72 6E 20 74 6F 20 6D 61 69 6E 20 6D 65    eturn to main me
004870:  6E 75 20 27 0D 0A 20 20 20 20 20 20 20 20 57 41    nu '..        WA
004880:  49 54 0D 0A 20 20 20 20 20 20 20 2A 20 4E 4F 20    IT..       * NO 
004890:  56 41 52 49 41 42 4C 45 53 20 50 41 53 53 45 44    VARIABLES PASSED
0048A0:  20 42 41 43 4B 20 54 4F 20 43 48 58 4D 45 4E 55     BACK TO CHXMENU
0048B0:  2E 43 4D 44 0D 0A 0D 0A 20 20 2A 20 20 2D 20 6E    .CMD....  *  - n
0048C0:  6F 6E 2D 76 61 6C 69 64 20 65 6E 74 72 79 20 74    on-valid entry t
0048D0:  6F 20 74 68 65 20 6D 65 6E 75 20 61 6E 64 20 72    o the menu and r
0048E0:  69 6E 67 20 62 65 6C 6C 0D 0A 20 20 20 20 4F 54    ing bell..    OT
0048F0:  48 45 52 57 49 53 45 0D 0A 20 20 20 20 20 20 20    HERWISE..       
004900:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004910:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004920:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004930:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004940:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004950:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004960:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004970:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004980:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004990:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0049A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0049B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0049C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0049D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0049E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0049F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004A00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004A10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004A20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004A30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004A40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004A50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004A60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004A70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004A80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004A90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004AA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004AB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004AC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004AD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004AE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004AF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004B00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004B10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004B20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004B30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004B40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004B50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004B60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004B70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004B80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004B90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004BA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004BB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004BC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004BD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004BE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004BF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004C00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004C10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004C20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004C30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004C40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004C50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004C60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004C70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004C80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004C90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004CA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004CB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004CC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004CD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004CE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004CF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
004D00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
004D10:  04 00 00 00 02 09 50 E5 04 00 C1 02 00 00 00 02    ......P.........
004D20:  04 00 C6 02 00 00 00 02 04 00 C2 02 00 00 00 02    ................
004D30:  04 00 C7 02 00 00 00 02 04 00 C3 02 00 00 00 02    ................
004D40:  04 00 C8 02 00 00 00 02 04 00 C4 02 00 00 00 02    ................
004D50:  04 00 C9 02 00 00 00 02 04 00 C5 02 00 00 00 02    ................
004D60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004D70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004D80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004D90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004DF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
004E00:  64 6F 20 77 68 69 6C 65 20 74 0D 0A 75 73 65 20    do while t..use 
004E10:  63 72 65 64 69 74 0D 0A 67 6F 20 62 6F 74 74 6F    credit..go botto
004E20:  6D 0D 0A 73 74 6F 72 65 20 23 20 74 6F 20 65 6E    m..store # to en
004E30:  72 67 3A 64 65 72 0D 0A 73 65 74 20 69 6E 64 65    rg:der..set inde
004E40:  78 20 74 6F 20 64 61 74 65 2D 63 72 65 0D 0A 65    x to date-cre..e
004E50:  72 61 73 65 0D 0A 40 20 32 2C 30 20 73 61 79 20    rase..@ 2,0 say 
004E60:  22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    "               
004E70:  20 20 20 20 20 20 20 20 2A 2A 2A 20 43 20 52 20            *** C R 
004E80:  45 20 44 20 49 20 54 20 2A 2A 2A 22 0D 0A 40 20    E D I T ***"..@ 
004E90:  35 2C 30 20 73 61 79 20 22 20 20 20 20 20 20 20    5,0 say "       
004EA0:  20 28 43 29 72 65 61 74 69 6F 6E 22 0D 0A 40 20     (C)reation"..@ 
004EB0:  37 2C 30 20 73 61 79 20 22 20 20 20 20 20 20 20    7,0 say "       
004EC0:  20 28 4D 29 6F 64 69 66 69 63 61 74 69 6F 6E 20     (M)odification 
004ED0:  65 74 20 63 6F 6E 73 75 6C 74 61 74 69 6F 6E 22    et consultation"
004EE0:  0D 0A 40 20 39 2C 30 20 73 61 79 20 22 20 20 20    ..@ 9,0 say "   
004EF0:  20 20 20 20 20 28 45 29 66 66 61 63 65 6D 65 6E         (E)ffacemen
004F00:  74 22 0D 0A 40 20 31 31 2C 30 20 73 61 79 20 22    t"..@ 11,0 say "
004F10:  20 20 20 20 20 20 20 20 28 52 29 65 74 6F 75 72            (R)etour
004F20:  20 61 75 20 6D 65 6E 75 20 69 6E 69 74 69 61 6C     au menu initial
004F30:  22 0D 0A 77 61 69 74 20 74 6F 20 72 65 70 0D 0A    "..wait to rep..
004F40:  64 6F 20 63 61 73 65 0D 0A 2A 63 72 65 61 74 69    do case..*creati
004F50:  6F 6E 0D 0A 63 61 73 65 20 21 28 72 65 70 29 3D    on..case !(rep)=
004F60:  22 43 22 0D 0A 73 65 74 20 66 6F 72 6D 61 74 20    "C"..set format 
004F70:  74 6F 20 63 72 65 61 2D 63 72 65 0D 0A 61 70 70    to crea-cre..app
004F80:  65 0D 0A 73 65 74 20 66 6F 72 6D 61 74 20 74 6F    e..set format to
004F90:  0D 0A 73 65 74 20 69 6E 64 65 78 20 74 6F 0D 0A    ..set index to..
004FA0:  67 6F 20 62 6F 74 74 6F 6D 0D 0A 73 74 6F 72 65    go bottom..store
004FB0:  20 23 20 74 6F 20 64 65 72 6E 69 65 72 0D 0A 69     # to dernier..i
004FC0:  66 20 65 6E 72 67 3A 64 65 72 3D 30 0D 0A 73 75    f enrg:der=0..su
004FD0:  6D 20 6D 6F 6E 74 3A 63 72 65 20 74 6F 20 76 69    m mont:cre to vi
004FE0:  72 3A 63 72 65 0D 0A 73 74 6F 72 65 20 63 68 71    r:cre..store chq
004FF0:  3A 73 6F 6C 64 65 2B 76 69 72 3A 63 72 65 20 74    :solde+vir:cre t
005000:  73 74 6F 72 65 20 30 20 74 6F 20 74 65 6D 70 6F    store 0 to tempo
005010:  0D 0A 64 6F 20 77 68 69 6C 65 20 74 65 6D 70 6F    ..do while tempo
005020:  23 35 30 0D 0A 73 74 6F 72 65 20 74 65 6D 70 6F    #50..store tempo
005030:  2B 31 20 74 6F 20 74 65 6D 70 6F 0D 0A 65 6E 64    +1 to tempo..end
005040:  64 6F 20 74 65 6D 70 6F 0D 0A 72 65 6C 65 61 73    do tempo..releas
005050:  65 20 74 65 6D 70 6F 0D 0A 65 6E 64 69 66 0D 0A    e tempo..endif..
005060:  0D 0A 0D 0A 63 61 73 65 20 21 28 72 65 70 29 3D    ....case !(rep)=
005070:  22 52 22 0D 0A 72 65 6C 65 61 73 65 20 72 65 70    "R"..release rep
005080:  0D 0A 75 73 65 0D 0A 72 65 74 75 72 6E 0D 0A 6F    ..use..return..o
005090:  74 68 65 72 77 69 73 65 0D 0A 3F 20 63 68 72 28    therwise..? chr(
0050A0:  37 29 0D 0A 3F 20 22 76 6F 74 72 65 20 73 65 6C    7)..? "votre sel
0050B0:  65 63 74 69 6F 6E 20 64 6F 69 74 20 65 74 72 65    ection doit etre
0050C0:  20 43 2C 20 4D 2C 20 45 20 6F 75 20 52 22 0D 0A     C, M, E ou R"..
0050D0:  73 74 6F 72 65 20 30 20 74 6F 20 74 65 6D 70 6F    store 0 to tempo
0050E0:  0D 0A 64 6F 20 77 68 69 6C 65 20 74 65 6D 70 6F    ..do while tempo
0050F0:  23 35 30 0D 0A 73 74 6F 72 65 20 74 65 6D 70 6F    #50..store tempo
005100:  2B 31 20 74 6F 20 74 65 6D 70 6F 0D 0A 65 6E 64    +1 to tempo..end
005110:  64 6F 20 74 65 6D 70 6F 0D 0A 72 65 6C 65 61 73    do tempo..releas
005120:  65 20 74 65 6D 70 6F 0D 0A 65 6E 64 63 61 73 65    e tempo..endcase
005130:  0D 0A 65 6E 64 64 6F 20 63 72 65 64 69 74 1A 1A    ..enddo credit..
005140:  6E 74 20 6F 75 20 28 46 29 69 6E 20 22 0D 0A 73    nt ou (F)in "..s
005150:  65 74 20 63 6F 6E 73 6F 6C 65 20 6F 66 66 0D 0A    et console off..
005160:  77 61 69 74 20 74 6F 20 6F 75 69 0D 0A 73 65 74    wait to oui..set
005170:  20 63 6F 6E 73 6F 6C 65 20 6F 6E 0D 0A 20 20 20     console on..   
005180:  20 69 66 20 21 28 6F 75 69 29 3D 22 45 22 0D 0A     if !(oui)="E"..
005190:  40 20 32 30 2C 30 20 73 61 79 20 22 56 6F 75 6C    @ 20,0 say "Voul
0051A0:  65 7A 2D 76 6F 75 73 20 76 72 61 69 6D 65 6E 74    ez-vous vraiment
0051B0:  20 6C 27 65 66 66 61 63 65 72 20 28 4F 2F 4E 29     l'effacer (O/N)
0051C0:  20 3F 20 22 0D 0A 73 65 74 20 63 6F 6E 73 6F 6C     ? "..set consol
0051D0:  65 20 6F 66 66 0D 0A 77 61 69 74 20 74 6F 20 65    e off..wait to e
0051E0:  66 66 0D 0A 73 65 74 20 63 6F 6E 73 6F 6C 65 20    ff..set console 
0051F0:  6F 6E 0D 0A 20 20 20 20 20 20 69 66 20 21 28 65    on..      if !(e
005200:  6F 20 63 68 71 3A 73 6F 6C 64 65 0D 0A 65 6C 73    o chq:solde..els
005210:  65 0D 0A 67 6F 20 65 6E 72 67 3A 64 65 72 0D 0A    e..go enrg:der..
005220:  69 66 20 64 65 72 6E 69 65 72 20 23 20 65 6E 72    if dernier # enr
005230:  67 3A 64 65 72 0D 0A 73 6B 69 70 0D 0A 73 74 6F    g:der..skip..sto
005240:  72 65 20 73 74 72 28 64 65 72 6E 69 65 72 2D 65    re str(dernier-e
005250:  6E 72 67 3A 64 65 72 2C 35 29 20 74 6F 20 6E 6F    nrg:der,5) to no
005260:  6D 62 72 65 0D 0A 73 75 6D 20 6D 6F 6E 74 3A 63    mbre..sum mont:c
005270:  72 65 20 6E 65 78 74 20 26 6E 6F 6D 62 72 65 20    re next &nombre 
005280:  74 6F 20 76 69 72 3A 63 72 65 0D 0A 73 74 6F 72    to vir:cre..stor
005290:  65 20 76 69 72 3A 63 72 65 2B 63 68 71 3A 73 6F    e vir:cre+chq:so
0052A0:  6C 64 65 20 74 6F 20 63 68 71 3A 73 6F 6C 64 65    lde to chq:solde
0052B0:  0D 0A 65 6E 64 69 66 0D 0A 65 6E 64 69 66 0D 0A    ..endif..endif..
0052C0:  72 65 6C 65 61 73 65 20 64 65 72 6E 69 65 72 2C    release dernier,
0052D0:  6E 6F 6D 62 72 65 2C 76 69 72 3A 63 72 65 0D 0A    nombre,vir:cre..
0052E0:  73 65 74 20 69 6E 64 65 78 20 74 6F 20 64 61 74    set index to dat
0052F0:  65 2D 63 72 65 0D 0A 0D 0A 2A 6D 6F 64 69 66 69    e-cre....*modifi
005300:  63 61 74 69 6F 6E 0D 0A 63 61 73 65 20 21 28 72    cation..case !(r
005310:  65 70 29 3D 22 4D 22 0D 0A 73 74 6F 72 65 20 22    ep)="M"..store "
005320:  20 20 20 20 20 20 20 20 22 20 74 6F 20 64 61 74            " to dat
005330:  65 3A 72 65 63 0D 0A 40 20 31 38 2C 30 20 73 61    e:rec..@ 18,0 sa
005340:  79 20 22 44 6F 6E 6E 65 7A 20 6C 61 20 64 61 74    y "Donnez la dat
005350:  65 20 64 65 20 72 65 63 68 65 72 63 68 65 20 22    e de recherche "
005360:  20 67 65 74 20 64 61 74 65 3A 72 65 63 20 70 69     get date:rec pi
005370:  63 74 75 72 65 20 22 39 39 2F 39 39 2F 39 39 22    cture "99/99/99"
005380:  0D 0A 72 65 61 64 0D 0A 73 74 6F 72 65 20 24 28    ..read..store $(
005390:  64 61 74 65 3A 72 65 63 2C 37 2C 32 29 2B 24 28    date:rec,7,2)+$(
0053A0:  64 61 74 65 3A 72 65 63 2C 34 2C 32 29 2B 24 28    date:rec,4,2)+$(
0053B0:  64 61 74 65 3A 72 65 63 2C 31 2C 32 29 20 74 6F    date:rec,1,2) to
0053C0:  20 64 61 74 65 3A 72 65 63 0D 0A 66 69 6E 64 20     date:rec..find 
0053D0:  26 64 61 74 65 3A 72 65 63 0D 0A 69 66 20 23 23    &date:rec..if ##
0053E0:  30 0D 0A 73 65 74 20 66 6F 72 6D 61 74 20 74 6F    0..set format to
0053F0:  20 6D 6F 64 69 2D 63 72 65 0D 0A 65 64 69 74 20     modi-cre..edit 
005400:  02 00 00 00 00 00 45 00 44 41 54 45 3A 43 52 45    ......E.DATE:CRE
005410:  00 00 00 43 08 B9 70 00 43 52 45 44 49 54 45 55    ...C..p.CREDITEU
005420:  52 00 00 43 14 C1 70 00 43 4F 4D 3A 43 52 45 00    R..C..p.COM:CRE.
005430:  00 00 00 43 1E D5 70 00 4D 4F 4E 54 3A 43 52 45    ...C..p.MONT:CRE
005440:  00 00 00 4E 0A F3 70 02 0D 00 00 00 00 00 00 00    ...N..p.........
005450:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005460:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005470:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005480:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005490:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0054A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0054B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0054C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0054D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0054E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0054F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005500:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005510:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005520:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005530:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005540:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005550:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005560:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005570:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005580:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005590:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0055A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0055B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0055C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0055D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0055E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0055F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005600:  23 0D 0A 73 65 74 20 66 6F 72 6D 61 74 20 74 6F    #..set format to
005610:  0D 0A 65 6C 73 65 0D 0A 40 20 31 39 2C 30 20 73    ..else..@ 19,0 s
005620:  61 79 20 22 61 75 63 75 6E 20 63 72 65 64 69 74    ay "aucun credit
005630:  20 6E 27 61 20 65 74 65 20 65 66 66 65 63 74 75     n'a ete effectu
005640:  65 20 61 20 63 65 74 74 65 20 64 61 74 65 22 0D    e a cette date".
005650:  0A 73 74 6F 72 65 20 30 20 74 6F 20 74 65 6D 70    .store 0 to temp
005660:  6F 0D 0A 64 6F 20 77 68 69 6C 65 20 74 65 6D 70    o..do while temp
005670:  6F 23 35 30 0D 0A 73 74 6F 72 65 20 74 65 6D 70    o#50..store temp
005680:  6F 2B 31 20 74 6F 20 74 65 6D 70 6F 0D 0A 65 6E    o+1 to tempo..en
005690:  64 64 6F 20 74 65 6D 70 6F 0D 0A 72 65 6C 65 61    ddo tempo..relea
0056A0:  73 65 20 74 65 6D 70 6F 0D 0A 72 65 6C 65 61 73    se tempo..releas
0056B0:  65 20 64 61 74 65 3A 72 65 63 0D 0A 65 6E 64 69    e date:rec..endi
0056C0:  66 0D 0A 0D 0A 2A 65 66 66 61 63 65 6D 65 6E 74    f....*effacement
0056D0:  0D 0A 63 61 73 65 20 21 28 72 65 70 29 3D 22 45    ..case !(rep)="E
0056E0:  22 0D 0A 73 74 6F 72 65 20 22 20 20 20 20 20 20    "..store "      
0056F0:  20 20 22 20 74 6F 20 64 61 74 65 3A 72 65 63 0D      " to date:rec.
005700:  0A 40 20 31 38 2C 30 20 73 61 79 20 22 44 6F 6E    .@ 18,0 say "Don
005710:  6E 65 7A 20 6C 61 20 64 61 74 65 20 64 65 20 72    nez la date de r
005720:  65 63 68 65 72 63 68 65 20 22 20 67 65 74 20 64    echerche " get d
005730:  61 74 65 3A 72 65 63 20 70 69 63 74 75 72 65 20    ate:rec picture 
005740:  22 39 39 2F 39 39 2F 39 39 22 0D 0A 72 65 61 64    "99/99/99"..read
005750:  0D 0A 73 74 6F 72 65 20 24 28 64 61 74 65 3A 72    ..store $(date:r
005760:  65 63 2C 37 2C 32 29 2B 24 28 64 61 74 65 3A 72    ec,7,2)+$(date:r
005770:  65 63 2C 34 2C 32 29 2B 24 28 64 61 74 65 3A 72    ec,4,2)+$(date:r
005780:  65 63 2C 31 2C 32 29 20 74 6F 20 64 61 74 65 3A    ec,1,2) to date:
005790:  72 65 63 0D 0A 66 69 6E 64 20 26 64 61 74 65 3A    rec..find &date:
0057A0:  72 65 63 0D 0A 69 66 20 23 23 30 0D 0A 73 74 6F    rec..if ##0..sto
0057B0:  72 65 20 30 20 74 6F 20 6D 6F 6E 74 3A 64 65 74    re 0 to mont:det
0057C0:  0D 0A 73 65 74 20 66 6F 72 6D 61 74 20 74 6F 20    ..set format to 
0057D0:  65 66 66 61 2D 63 72 65 0D 0A 73 74 6F 72 65 20    effa-cre..store 
0057E0:  22 53 22 20 74 6F 20 6F 75 69 0D 0A 20 73 74 6F    "S" to oui.. sto
0057F0:  72 65 20 22 4E 22 20 74 6F 20 6D 6F 64 69 66 0D    re "N" to modif.
005800:  00 00 00 00 00 00 00 00 00 1A 00 C3 07 02 64 00    ..............d.
005810:  07 30 30 30 30 30 30 30 43 48 51 3A 53 4F 4C 44    .0000000CHQ:SOLD
005820:  45 00 00 CE 0A 3C 64 02 00 00 00 00 00 00 1A 46    E....<d........F
005830:  45 45 53 20 27 0D 0A 20 20 20 20 20 20 20 20 20    EES '..         
005840:  20 20 20 40 20 32 31 2C 31 30 20 53 41 59 20 27       @ 21,10 SAY '
005850:  4C 41 53 54 20 31 32 20 44 45 50 4F 53 49 54 53    LAST 12 DEPOSITS
005860:  20 4C 49 53 54 45 44 20 48 45 52 45 20 27 0D 0A     LISTED HERE '..
005870:  20 20 20 20 20 20 20 20 20 20 20 20 55 53 45 20                USE 
005880:  44 45 50 4F 53 49 54 53 0D 0A 20 20 20 20 20 20    DEPOSITS..      
005890:  20 20 20 20 20 20 47 4F 20 42 4F 54 54 4F 4D 0D          GO BOTTOM.
0058A0:  0A 20 20 20 20 20 20 20 20 20 20 20 20 53 4B 49    .            SKI
0058B0:  50 20 2D 31 31 0D 0A 20 20 20 20 20 20 20 20 20    P -11..         
0058C0:  20 20 20 4C 49 53 54 20 4F 46 46 20 4E 45 58 54       LIST OFF NEXT
0058D0:  20 31 32 20 44 41 54 45 2C 27 24 27 2C 53 54 52     12 DATE,'$',STR
0058E0:  28 41 4D 54 2C 38 2C 32 29 2C 50 41 49 44 46 52    (AMT,8,2),PAIDFR
0058F0:  4F 4D 0D 0A 20 20 20 20 20 20 20 20 45 4E 44 43    OM..        ENDC
005900:  41 53 45 0D 0A 20 20 20 20 20 20 20 20 52 45 4C    ASE..        REL
005910:  45 41 53 45 20 42 41 4E 4B 3A 42 41 4C 2C 20 4F    EASE BANK:BAL, O
005920:  55 54 53 54 41 4E 44 0D 0A 20 20 20 20 20 20 20    UTSTAND..       
005930:  20 55 53 45 0D 0A 20 20 20 20 20 20 20 20 3F 0D     USE..        ?.
005940:  0A 20 20 20 20 20 20 20 20 3F 20 27 20 20 20 20    .        ? '    
005950:  20 20 20 20 20 20 72 65 61 64 79 20 74 6F 20 72          ready to r
005960:  65 74 75 72 6E 20 74 6F 20 6D 61 69 6E 20 6D 65    eturn to main me
005970:  6E 75 20 27 0D 0A 20 20 20 20 20 20 20 20 57 41    nu '..        WA
005980:  49 54 0D 0A 20 20 20 20 20 20 20 2A 20 4E 4F 20    IT..       * NO 
005990:  56 41 52 49 41 42 4C 45 53 20 50 41 53 53 45 44    VARIABLES PASSED
0059A0:  20 42 41 43 4B 20 54 4F 20 43 48 58 4D 45 4E 55     BACK TO CHXMENU
0059B0:  2E 43 4D 44 0D 0A 0D 0A 20 20 2A 20 20 2D 20 6E    .CMD....  *  - n
0059C0:  6F 6E 2D 76 61 6C 69 64 20 65 6E 74 72 79 20 74    on-valid entry t
0059D0:  6F 20 74 68 65 20 6D 65 6E 75 20 61 6E 64 20 72    o the menu and r
0059E0:  69 6E 67 20 62 65 6C 6C 0D 0A 20 20 20 20 4F 54    ing bell..    OT
0059F0:  48 45 52 57 49 53 45 0D 0A 20 20 20 20 20 20 20    HERWISE..       
005A00:  0A 20 64 6F 20 77 68 69 6C 65 20 21 28 6F 75 69    . do while !(oui
005A10:  29 23 22 46 22 0D 0A 20 73 74 6F 72 65 20 22 53    )#"F".. store "S
005A20:  22 20 74 6F 20 6F 75 69 0D 0A 72 65 61 64 0D 0A    " to oui..read..
005A30:  69 66 20 2A 0D 0A 40 20 32 30 2C 30 20 73 61 79    if *..@ 20,0 say
005A40:  20 22 63 65 74 20 65 6E 72 65 67 69 73 74 72 65     "cet enregistre
005A50:  6D 65 6E 74 20 61 20 65 74 65 20 72 65 70 65 72    ment a ete reper
005A60:  65 20 70 6F 75 72 20 65 66 66 61 63 65 6D 65 6E    e pour effacemen
005A70:  74 2E 20 3B 0D 0A 52 61 70 70 65 6C 20 28 4F 2F    t. ;..Rappel (O/
005A80:  4E 29 20 3F 22 0D 0A 73 65 74 20 63 6F 6E 73 6F    N) ?"..set conso
005A90:  6C 65 20 6F 66 66 0D 0A 77 61 69 74 20 74 6F 20    le off..wait to 
005AA0:  72 61 70 70 65 6C 0D 0A 73 65 74 20 63 6F 6E 73    rappel..set cons
005AB0:  6F 6C 65 20 6F 6E 0D 0A 40 20 32 30 2C 30 0D 0A    ole on..@ 20,0..
005AC0:  20 69 66 20 21 28 72 61 70 70 65 6C 29 3D 22 4F     if !(rappel)="O
005AD0:  22 0D 0A 20 72 65 63 61 6C 6C 0D 0A 20 73 74 6F    ".. recall.. sto
005AE0:  72 65 20 6D 6F 6E 74 3A 64 65 74 2D 6D 6F 6E 74    re mont:det-mont
005AF0:  3A 63 72 65 20 74 6F 20 6D 6F 6E 74 3A 64 65 74    :cre to mont:det
005B00:  0D 0A 20 65 6E 64 69 66 0D 0A 65 6E 64 69 66 0D    .. endif..endif.
005B10:  0A 40 20 31 37 2C 30 20 73 61 79 20 22 28 45 29    .@ 17,0 say "(E)
005B20:  66 66 61 63 65 6D 65 6E 74 20 2C 20 28 53 29 75    ffacement , (S)u
005B30:  69 76 61 6E 74 2C 20 28 50 29 72 65 63 65 64 65    ivant, (P)recede
005B40:  6E 74 20 6F 75 20 28 46 29 69 6E 20 22 0D 0A 73    nt ou (F)in "..s
005B50:  65 74 20 63 6F 6E 73 6F 6C 65 20 6F 66 66 0D 0A    et console off..
005B60:  77 61 69 74 20 74 6F 20 6F 75 69 0D 0A 73 65 74    wait to oui..set
005B70:  20 63 6F 6E 73 6F 6C 65 20 6F 6E 0D 0A 20 20 20     console on..   
005B80:  20 69 66 20 21 28 6F 75 69 29 3D 22 45 22 20 2E     if !(oui)="E" .
005B90:  61 6E 64 2E 20 2E 6E 6F 74 2E 20 2A 0D 0A 40 20    and. .not. *..@ 
005BA0:  32 30 2C 30 20 73 61 79 20 22 56 6F 75 6C 65 7A    20,0 say "Voulez
005BB0:  2D 76 6F 75 73 20 76 72 61 69 6D 65 6E 74 20 6C    -vous vraiment l
005BC0:  27 65 66 66 61 63 65 72 20 28 4F 2F 4E 29 20 3F    'effacer (O/N) ?
005BD0:  20 22 0D 0A 73 65 74 20 63 6F 6E 73 6F 6C 65 20     "..set console 
005BE0:  6F 66 66 0D 0A 77 61 69 74 20 74 6F 20 65 66 66    off..wait to eff
005BF0:  0D 0A 73 65 74 20 63 6F 6E 73 6F 6C 65 20 6F 6E    ..set console on
005C00:  02 04 00 00 00 00 B1 00 44 41 3A 4E 55 4D 00 00    ........DA:NUM..
005C10:  00 00 00 43 0A C2 72 00 44 41 3A 44 41 54 45 00    ...C..r.DA:DATE.
005C20:  00 00 00 43 08 CC 72 00 43 4D 44 3A 4E 55 4D 00    ...C..r.CMD:NUM.
005C30:  00 00 00 43 0C D4 72 00 43 4D 44 3A 44 41 54 45    ...C..r.CMD:DATE
005C40:  00 00 00 43 08 E0 72 00 54 59 50 45 00 00 00 00    ...C..r.TYPE....
005C50:  00 00 00 43 0F E8 72 00 45 4D 45 54 54 45 55 52    ...C..r.EMETTEUR
005C60:  00 00 00 43 19 F7 72 00 53 45 43 54 49 4F 4E 00    ...C..r.SECTION.
005C70:  00 00 00 43 05 10 73 00 46 4F 55 52 4E 49 00 00    ...C..s.FOURNI..
005C80:  00 00 00 43 28 15 73 00 50 49 45 43 45 00 00 00    ...C(.s.PIECE...
005C90:  00 00 00 43 0C 3D 73 00 51 54 45 3A 43 4D 44 00    ...C.=s.QTE:CMD.
005CA0:  00 00 00 4E 05 49 73 00 49 4D 50 55 54 41 54 49    ...N.Is.IMPUTATI
005CB0:  4F 4E 00 43 19 4E 73 00 44 45 4C 41 49 00 00 00    ON.C.Ns.DELAI...
005CC0:  00 00 00 4E 02 67 73 00 50 52 49 58 3A 55 48 54    ...N.gs.PRIX:UHT
005CD0:  00 00 00 4E 09 69 73 02 0D 00 00 00 00 00 00 00    ...N.is.........
005CE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005CF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005D00:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005D10:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005D20:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005D30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005D40:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005D50:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005D60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005D70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005D80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005D90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005DA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005DB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005DC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005DD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005DE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005DF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
005E00:  0D 0A 20 20 20 20 20 20 69 66 20 21 28 65 66 66    ..      if !(eff
005E10:  29 3D 22 4F 22 0D 0A 20 20 20 20 20 20 73 74 6F    )="O"..      sto
005E20:  72 65 20 22 4F 22 20 74 6F 20 6D 6F 64 69 66 0D    re "O" to modif.
005E30:  0A 20 20 20 20 20 20 73 74 6F 72 65 20 6D 6F 6E    .      store mon
005E40:  74 3A 64 65 74 2B 6D 6F 6E 74 3A 63 72 65 20 74    t:det+mont:cre t
005E50:  6F 20 6D 6F 6E 74 3A 64 65 74 0D 0A 20 20 20 20    o mont:det..    
005E60:  20 20 64 65 6C 65 74 65 0D 0A 20 20 20 20 20 20      delete..      
005E70:  73 6B 69 70 0D 0A 20 20 20 20 20 20 65 6E 64 69    skip..      endi
005E80:  66 0D 0A 20 20 20 20 72 65 6C 65 61 73 65 20 65    f..    release e
005E90:  66 66 0D 0A 20 20 20 20 65 6E 64 69 66 0D 0A 20    ff..    endif.. 
005EA0:  20 69 66 20 21 28 6F 75 69 29 3D 22 53 22 0D 0A     if !(oui)="S"..
005EB0:  20 20 73 6B 69 70 0D 0A 20 20 65 6E 64 69 66 0D      skip..  endif.
005EC0:  0A 20 20 69 66 20 21 28 6F 75 69 29 3D 22 50 22    .  if !(oui)="P"
005ED0:  0D 0A 20 20 73 6B 69 70 20 2D 31 0D 0A 20 20 65    ..  skip -1..  e
005EE0:  6E 64 69 66 0D 0A 20 65 6E 64 64 6F 20 6F 75 69    ndif.. enddo oui
005EF0:  0D 0A 73 65 74 20 66 6F 72 6D 61 74 20 74 6F 0D    ..set format to.
005F00:  0A 20 20 69 66 20 6D 6F 64 69 66 3D 22 4F 22 0D    .  if modif="O".
005F10:  0A 20 20 65 72 61 73 65 0D 0A 20 20 3F 0D 0A 20    .  erase..  ?.. 
005F20:  20 3F 20 22 70 72 69 73 65 20 65 6E 20 63 6F 6D     ? "prise en com
005F30:  70 74 65 20 64 65 73 20 6D 6F 64 69 66 69 63 61    pte des modifica
005F40:  74 69 6F 6E 20 2E 2E 2E 22 0D 0A 20 20 73 74 6F    tion ..."..  sto
005F50:  72 65 20 63 68 71 3A 73 6F 6C 64 65 2D 6D 6F 6E    re chq:solde-mon
005F60:  74 3A 64 65 74 20 74 6F 20 63 68 71 3A 73 6F 6C    t:det to chq:sol
005F70:  64 65 0D 0A 20 20 72 65 6C 65 61 73 65 20 6D 6F    de..  release mo
005F80:  6E 74 3A 64 65 74 0D 0A 20 20 73 65 74 20 69 6E    nt:det..  set in
005F90:  64 65 78 20 74 6F 20 64 61 74 65 2D 63 72 65 0D    dex to date-cre.
005FA0:  0A 20 20 70 61 63 6B 0D 0A 20 20 65 6E 64 69 66    .  pack..  endif
005FB0:  0D 0A 72 65 6C 65 61 73 65 20 6D 6F 64 69 66 0D    ..release modif.
005FC0:  0A 65 6C 73 65 0D 0A 40 20 31 39 2C 30 20 73 61    .else..@ 19,0 sa
005FD0:  79 20 22 61 75 63 75 6E 20 63 72 65 64 69 74 20    y "aucun credit 
005FE0:  6E 27 61 20 65 74 65 20 65 66 66 65 63 74 75 65    n'a ete effectue
005FF0:  20 61 20 63 65 74 74 65 20 64 61 74 65 22 0D 0A     a cette date"..
006000:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
006010:  05 00 00 00 02 09 48 E5 05 00 C1 02 00 00 00 02    ......H.........
006020:  05 00 C6 02 00 00 00 02 05 00 C2 02 00 00 00 02    ................
006030:  05 00 C7 02 00 00 00 02 05 00 C3 02 00 00 00 02    ................
006040:  05 00 C8 02 00 00 00 02 05 00 C4 02 00 00 00 02    ................
006050:  05 00 C9 02 00 00 00 02 05 00 C5 02 00 00 00 02    ................
006060:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
006070:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
006080:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
006090:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0060F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
006100:  00 00 00 00 00 00 00 00 00 20 39 38 37 36 35 34    ......... 987654
006110:  33 32 31 39 32 33 2F 30 32 2F 38 33 20 20 20 20    321923/02/83    
006120:  20 20 20 20 20 20 20 20 20 20 2F 20 20 2F 20 20              /  /  
006130:  52 45 47 55 4C 41 52 49 53 41 54 49 4F 4E 20 44    REGULARISATION D
006140:  55 50 4F 4E 54 20 20 20 20 20 20 20 20 20 20 20    UPONT           
006150:  20 20 20 20 20 20 20 20 30 32 31 34 35 4D 45 43            02145MEC
006160:  41 4E 4F 55 54 49 4C 20 20 20 20 20 20 20 20 20    ANOUTIL         
006170:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006180:  20 20 20 20 20 31 32 33 34 35 36 37 38 39 31 32         12345678912
006190:  33 20 20 20 31 30 41 54 45 4C 49 45 52 20 32 34    3   10ATELIER 24
0061A0:  35 31 20 20 20 20 20 20 20 20 20 20 20 20 20 31    51             1
0061B0:  35 20 20 20 20 20 32 2E 35 30 20 39 38 37 36 35    5     2.50 98765
0061C0:  34 33 32 31 38 32 32 2F 30 32 2F 38 33 20 20 20    4321822/02/83   
0061D0:  20 20 20 20 20 20 20 20 20 20 20 2F 20 20 2F 20               /  / 
0061E0:  20 4D 41 49 4E 54 45 4E 41 4E 43 45 20 20 20 20     MAINTENANCE    
0061F0:  44 55 52 41 4E 44 20 20 20 20 20 20 20 20 20 20    DURAND          
006200:  20 20 20 20 20 20 20 20 20 30 32 31 34 35 4D 45             02145ME
006210:  43 41 4E 4F 55 54 49 4C 20 20 20 20 20 20 20 20    CANOUTIL        
006220:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006230:  20 20 20 20 20 20 31 32 33 34 35 36 37 38 39 31          1234567891
006240:  32 34 20 20 20 20 35 41 54 45 4C 49 45 52 20 32    24    5ATELIER 2
006250:  31 34 33 20 20 20 20 20 20 20 20 20 20 20 20 20    143             
006260:  32 30 20 20 20 20 20 32 2E 37 35 20 39 38 37 36    20     2.75 9876
006270:  35 34 33 32 31 37 31 35 2F 30 32 2F 38 33 20 20    54321715/02/83  
006280:  20 20 20 20 20 20 20 20 20 20 20 20 2F 20 20 2F                /  /
006290:  20 20 52 45 47 55 4C 41 52 49 53 41 54 49 4F 4E      REGULARISATION
0062A0:  20 44 55 52 41 4E 44 20 20 20 20 20 20 20 20 20     DURAND         
0062B0:  20 20 20 20 20 20 20 20 20 20 30 32 31 34 33 4D              02143M
0062C0:  45 43 41 4E 4F 55 54 49 4C 20 20 20 20 20 20 20    ECANOUTIL       
0062D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0062E0:  20 20 20 20 20 20 20 31 32 33 34 35 36 37 38 39           123456789
0062F0:  31 32 35 20 20 20 20 34 41 54 45 4C 49 45 52 20    125    4ATELIER 
006300:  20 20 20 20 20 20 30 32 31 34 35 20 20 20 20 20          02145     
006310:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006320:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006330:  20 20 20 31 32 35 34 20 20 20 20 20 20 20 20 20       1254         
006340:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006350:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006360:  20 20 20 20 31 2E 37 35 2A 33 32 31 33 32 31 34        1.75*3213214
006370:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006380:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006390:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0063A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0063B0:  20 20 20 20 20 20 20 30 32 36 35 32 20 20 20 20           02652    
0063C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0063D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0063E0:  20 20 20 20 32 31 30 31 38 33 20 20 20 20 20 20        210183      
0063F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006400:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006410:  20 20 20 20 20 33 2E 31 30 2A 32 31 34 35 20 20         3.10*2145  
006420:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006430:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006440:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006450:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006460:  20 20 20 20 20 20 20 20 30 33 32 35 33 20 20 20            03253   
006470:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006480:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006490:  20 20 20 20 20 32 35 33 20 20 20 20 20 20 20 20         253        
0064A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0064B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0064C0:  20 20 20 20 32 35 31 2E 32 35 2A 39 38 37 36 35        251.25*98765
0064D0:  34 36 35 34 20 20 20 20 20 20 20 20 20 20 20 20    4654            
0064E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0064F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006500:  4C 28 4D 44 45 4C 41 49 29 3D 44 45 4C 41 49 00    L(MDELAI)=DELAI.
006510:  20 31 35 20 20 20 20 20 37 2E 35 30 20 39 38 37     15     7.50 987
006520:  36 35 34 33 32 31 36 31 34 2F 30 32 2F 38 33 20    654321614/02/83 
006530:  20 20 20 20 20 20 20 20 20 20 20 20 20 2F 20 20                 /  
006540:  2F 20 20 4D 41 49 4E 54 45 4E 41 4E 43 45 20 20    /  MAINTENANCE  
006550:  20 20 44 55 52 41 4E 44 20 20 20 20 20 20 20 20      DURAND        
006560:  20 20 20 20 20 20 20 20 20 20 20 30 32 31 34 37               02147
006570:  53 43 4F 50 45 58 20 20 20 20 20 20 20 20 20 20    SCOPEX          
006580:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006590:  20 20 20 20 20 20 20 20 31 32 33 34 35 36 37 38            12345678
0065A0:  39 31 32 39 20 20 20 20 35 41 54 45 4C 49 45 52    9129    5ATELIER
0065B0:  20 31 32 34 20 20 20 20 20 20 20 20 20 20 20 20     124            
0065C0:  20 20 32 30 20 20 20 20 20 32 2E 30 30 1A 39 38      20     2.00.98
0065D0:  37 36 35 34 33 32 31 36 31 34 2F 30 32 2F 38 33    7654321614/02/83
0065E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 2F 20                  / 
0065F0:  20 2F 20 20 4D 41 49 4E 54 45 4E 41 4E 43 45 20     /  MAINTENANCE 
006600:  20 20 20 44 55 52 41 4E 44 20 20 20 20 20 20 20       DURAND       
006610:  20 20 20 20 20 20 20 20 20 20 20 20 30 32 31 34                0214
006620:  37 53 43 4F 50 45 58 20 20 20 20 20 20 20 20 20    7SCOPEX         
006630:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006640:  20 20 20 20 20 20 20 20 20 31 32 33 34 35 36 37             1234567
006650:  38 39 31 32 39 20 20 20 20 35 41 54 45 4C 49 45    89129    5ATELIE
006660:  52 20 31 32 34 20 20 20 20 20 20 20 20 20 20 20    R 124           
006670:  20 20 20 32 30 20 20 20 20 20 32 2E 30 30 1A 31       20     2.00.1
006680:  32 33 31 32 33 31 32 33 33 32 33 2F 30 33 2F 38    23123123323/03/8
006690:  33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2F    3              /
0066A0:  20 20 2F 20 20 52 45 47 55 4C 41 52 49 53 41 54      /  REGULARISAT
0066B0:  49 4F 4E 20 44 55 50 4F 4E 44 20 20 20 20 20 20    ION DUPOND      
0066C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 30 32 31                 021
0066D0:  34 35 53 43 4F 50 45 58 20 20 20 20 20 20 20 20    45SCOPEX        
0066E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0066F0:  20 20 20 20 20 20 20 20 20 20 31 32 33 31 32 33              123123
006700:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006710:  20 20 20 20 20 20 20 20 20 30 32 31 34 35 20 20             02145  
006720:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006730:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006740:  20 20 20 20 20 20 39 38 37 39 38 37 36 35 34 36          9879876546
006750:  35 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20    54              
006760:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006770:  20 20 20 20 20 20 20 33 2E 30 30 1A 20 20 20 20           3.00.    
006780:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006790:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0067A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0067B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0067C0:  20 20 20 20 20 20 20 20 20 20 30 31 32 35 34 20              01254 
0067D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0067E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0067F0:  20 20 20 20 20 20 20 31 31 30 31 38 33 20 20 20           110183   
006800:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006810:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006820:  20 20 20 20 20 20 20 20 32 2E 35 33 20 33 32 31            2.53 321
006830:  33 32 31 34 20 20 20 20 20 20 20 20 20 20 20 20    3214            
006840:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006850:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006860:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006870:  20 20 20 20 20 20 20 20 20 20 20 30 32 36 35 32               02652
006880:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006890:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0068A0:  20 20 20 20 20 20 20 20 32 31 30 31 38 33 20 20            210183  
0068B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0068C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0068D0:  20 20 20 20 20 20 20 20 20 33 2E 31 30 20 32 31             3.10 21
0068E0:  34 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20    45              
0068F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006900:  4C 28 4D 44 45 4C 41 49 29 3D 44 45 4C 41 49 00    L(MDELAI)=DELAI.
006910:  45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ER              
006920:  20 20 20 20 31 30 20 20 20 20 31 30 2E 30 30 2A        10    10.00*
006930:  31 32 34 35 20 20 20 20 20 20 20 20 2F 20 20 2F    1245        /  /
006940:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006950:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006960:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006970:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006980:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006990:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0069A0:  20 20 20 20 20 20 20 20 20 20 20 31 32 33 31 32               12312
0069B0:  33 31 32 33 33 32 31 20 20 20 32 30 20 20 20 20    3123321   20    
0069C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0069D0:  20 20 20 20 20 20 30 20 20 20 20 31 30 2E 30 30          0    10.00
0069E0:  2A 54 45 53 54 20 20 20 20 20 20 32 33 2F 30 33    *TEST      23/03
0069F0:  2F 38 33 20 20 20 20 20 20 20 20 20 20 20 20 20    /83             
006A00:  20 2F 20 20 2F 20 20 54 45 53 54 20 20 20 20 20     /  /  TEST     
006A10:  20 20 20 20 20 20 52 4F 43 48 45 52 45 41 55 20          ROCHEREAU 
006A20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30                   0
006A30:  31 32 33 34 4C 43 45 20 20 20 20 20 20 20 20 20    1234LCE         
006A40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006A50:  20 20 20 20 20 20 20 20 20 20 20 20 31 32 33 31                1231
006A60:  32 33 31 32 33 31 32 33 20 20 20 31 30 41 54 45    23123123   10ATE
006A70:  4C 49 45 52 20 53 41 56 20 20 20 20 20 20 20 20    LIER SAV        
006A80:  20 20 20 20 20 20 32 36 20 20 20 20 20 35 2E 30          26     5.0
006A90:  30 1A 31 32 33 31 32 33 20 20 20 20 20 20 20 20    0.123123        
006AA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006AB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006AC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006AD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006AE0:  30 34 32 35 38 20 20 20 20 20 20 20 20 20 20 20    04258           
006AF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006B00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006B10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006B20:  20 20 20 20 20 20 20 20 20 20 20 20 30 33 32 35                0325
006B30:  33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    3               
006B40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006B50:  20 20 20 20 20 20 20 20 20 32 35 33 20 20 20 20             253    
006B60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006B70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006B80:  20 20 20 20 20 20 20 20 32 35 31 2E 32 35 20 39            251.25 9
006B90:  38 37 36 35 34 36 35 34 20 20 20 20 20 20 20 20    87654654        
006BA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006BB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006BC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006BD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 30 32 31                 021
006BE0:  34 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20    45              
006BF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006C00:  20 20 20 20 20 20 20 20 20 20 39 38 37 39 38 37              987987
006C10:  36 35 34 36 35 34 20 20 20 20 20 20 20 20 20 20    654654          
006C20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006C30:  20 20 20 20 20 20 20 20 20 20 20 33 2E 30 30 1A               3.00.
006C40:  31 32 33 20 20 20 20 20 20 20 31 36 31 32 38 32    123       161282
006C50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006C60:  20 20 20 20 20 20 52 45 47 55 4C 41 52 49 53 41          REGULARISA
006C70:  54 49 4F 4E 20 4D 41 52 54 49 4E 20 20 20 20 20    TION MARTIN     
006C80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 32                  02
006C90:  31 34 35 46 52 45 49 4E 20 20 20 20 20 20 20 20    145FREIN        
006CA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006CB0:  20 20 20 20 20 20 20 20 20 20 20 31 32 33 34 35               12345
006CC0:  36 37 38 39 31 32 20 20 20 20 20 35 32 35 34 32    678912     52542
006CD0:  34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    4               
006CE0:  20 20 20 20 20 34 35 20 20 20 20 31 35 2E 30 30         45    15.00
006CF0:  2A 31 32 33 34 35 32 20 20 20 20 32 33 31 32 38    *123452    23128
006D00:  20 20 20 20 20 20 20 20 20 20 20 20 20 37 38 39                 789
006D10:  34 35 36 31 32 33 34 35 36 20 20 20 20 20 20 20    456123456       
006D20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006D30:  20 20 20 20 20 20 20 20 20 20 20 20 37 30 30 2E                700.
006D40:  30 30 2A 31 32 35 33 36 35 20 20 20 20 20 20 20    00*125365       
006D50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006D60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006D70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006D80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006D90:  20 30 32 31 35 34 20 20 20 20 20 20 20 20 20 20     02154          
006DA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006DB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 32                  12
006DC0:  33 31 32 33 31 32 33 31 32 33 20 20 20 20 20 20    3123123123      
006DD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006DE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 34 35 32                 452
006DF0:  2E 32 35 2A 37 38 35 34 36 39 20 20 20 20 20 20    .25*785469      
006E00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006E10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006E20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006E30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006E40:  20 20 30 31 32 35 34 20 20 20 20 20 20 20 20 20      01254         
006E50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006E60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 34                   4
006E70:  35 36 34 33 34 35 32 33 39 38 34 20 20 20 20 20    56434523984     
006E80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006E90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 35                  15
006EA0:  32 2E 30 30 2A 31 32 33 34 35 36 20 20 20 20 20    2.00*123456     
006EB0:  20 2F 20 20 2F 20 20 20 20 20 20 20 20 20 20 20     /  /           
006EC0:  20 20 20 20 20 2F 20 20 2F 20 20 20 20 20 20 20         /  /       
006ED0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006EE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006EF0:  20 20 20 30 32 31 34 35 20 20 20 20 20 20 20 20       02145        
006F00:  32 20 20 31 32 33 34 35 36 20 20 20 20 20 20 30    2  123456      0
006F10:  31 30 31 38 33 20 20 52 45 47 55 4C 41 52 49 53    10183  REGULARIS
006F20:  41 54 49 4F 4E 20 4D 41 53 53 49 4F 55 20 20 20    ATION MASSIOU   
006F30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30                   0
006F40:  32 31 34 35 46 41 43 4F 4D 20 20 20 20 20 20 20    2145FACOM       
006F50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006F60:  20 20 20 20 20 20 20 20 20 20 20 20 31 32 35 34                1254
006F70:  20 20 20 20 20 20 20 20 20 20 20 31 35 33 32 35               15325
006F80:  34 35 33 34 20 20 20 20 20 20 20 20 20 20 20 20    4534            
006F90:  20 20 20 20 20 20 35 32 20 20 20 20 20 31 2E 37          52     1.7
006FA0:  35 2A 34 35 36 33 32 31 31 20 20 20 30 33 30 31    5*4563211   0301
006FB0:  38 33 20 20 31 32 33 34 35 36 20 20 20 20 20 20    83  123456      
006FC0:  30 31 30 32 38 33 20 20 52 45 47 55 20 20 20 20    010283  REGU    
006FD0:  20 20 20 20 20 20 20 44 55 52 41 4E 44 20 20 20           DURAND   
006FE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
006FF0:  30 32 31 34 35 44 55 50 4F 4E 54 20 20 20 20 20    02145DUPONT     
007000:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007010:  20 20 20 20 20 20 20 20 20 20 20 20 20 34 35 36                 456
007020:  33 32 31 31 20 20 20 20 20 20 20 20 20 32 36 32    3211         262
007030:  32 35 31 35 20 20 20 20 20 20 20 20 20 20 20 20    2515            
007040:  20 20 20 20 20 20 20 31 30 20 20 20 34 35 30 2E           10   450.
007050:  30 30 2A 39 38 37 36 35 34 20 20 20 20 30 33 30    00*987654    030
007060:  31 38 33 20 20 20 20 20 20 20 20 20 20 20 20 20    183             
007070:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007080:  20 20 20 20 20 20 20 20 44 55 50 4F 4E 54 20 20            DUPONT  
007090:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0070A0:  20 32 31 30 35 34 44 55 52 41 4E 44 20 20 20 20     21054DURAND    
0070B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0070C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 32                  12
0070D0:  33 32 33 31 20 20 20 20 20 20 20 20 20 20 35 35    3231          55
0070E0:  36 31 35 36 31 20 20 20 20 20 20 20 20 20 20 20    61561           
0070F0:  20 20 20 20 20 20 20 20 20 35 20 20 20 33 32 35             5   325
007100:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007110:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007120:  34 35 36 34 35 36 20 20 20 20 20 20 20 20 20 20    456456          
007130:  30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    0               
007140:  20 20 20 20 20 20 20 20 20 20 20 30 20 20 20 33               0   3
007150:  30 30 2E 30 30 2A 34 35 36 31 32 33 31 32 33 32    00.00*4561231232
007160:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007170:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007180:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007190:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0071A0:  20 20 20 20 30 34 32 35 38 20 20 20 20 20 20 20        04258       
0071B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0071C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0071D0:  20 34 35 36 31 32 33 31 32 33 31 32 33 20 20 20     456123123123   
0071E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0071F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007200:  35 30 30 2E 30 30 2A 31 32 33 20 20 20 20 20 20    500.00*123      
007210:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007220:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007230:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007240:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007250:  20 20 20 20 20 30 32 31 35 33 20 20 20 20 20 20         02153      
007260:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007270:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007280:  20 20 31 32 33 34 35 36 37 38 39 31 32 20 20 20      12345678912   
007290:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0072A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0072B0:  20 20 31 35 2E 30 30 2A 31 32 33 34 35 32 20 20      15.00*123452  
0072C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0072D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0072E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0072F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007300:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
007310:  06 00 00 00 02 09 48 E5 06 00 C1 02 00 00 00 02    ......H.........
007320:  06 00 C6 02 00 00 00 02 06 00 C2 02 00 00 00 02    ................
007330:  06 00 C7 02 00 00 00 02 06 00 C3 02 00 00 00 02    ................
007340:  06 00 C8 02 00 00 00 02 06 00 C4 02 00 00 00 02    ................
007350:  06 00 C9 02 00 00 00 02 06 00 C5 02 00 00 00 02    ................
007360:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
007370:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
007380:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
007390:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0073F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
007400:  2E 30 30 2A 31 32 33 34 35 36 33 20 20 20 31 31    .00*1234563   11
007410:  30 31 38 33 20 20 20 20 20 20 20 20 20 20 20 20    0183            
007420:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007430:  20 20 20 20 20 20 20 20 20 64 75 72 61 6E 64 20             durand 
007440:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007450:  20 20 6E 62 76 6E 62 76 63 62 62 76 6E 76 6E 62      nbvnbvcbbvnvnb
007460:  6E 6D 20 20 20 20 20 20 20 20 20 20 20 20 20 20    nm              
007470:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31                   1
007480:  32 30 31 38 33 20 20 20 20 20 20 20 20 20 20 35    20183          5
007490:  6A 68 6D 67 6A 68 6A 20 20 20 20 20 20 20 20 20    jhmgjhj         
0074A0:  20 20 20 20 20 20 20 20 20 34 35 20 20 20 20 20             45     
0074B0:  33 2E 35 30 2A 33 32 31 33 32 31 34 20 20 20 31    3.50*3213214   1
0074C0:  32 30 31 38 33 20 20 20 20 20 20 20 20 20 20 20    20183           
0074D0:  20 20 20 20 20 20 20 20 20 20 20 52 45 47 55 4C               REGUL
0074E0:  41 52 49 53 41 54 49 4F 4E 20 44 55 52 41 4E 44    ARISATION DURAND
0074F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007500:  20 20 20 30 32 31 34 35 44 55 50 4F 4E 44 20 20       02145DUPOND  
007510:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007520:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007530:  32 31 30 31 38 33 20 20 20 20 20 20 20 20 20 20    210183          
007540:  35 4A 48 47 4A 48 47 20 20 20 20 20 20 20 20 20    5JHGJHG         
007550:  20 20 20 20 20 20 20 20 20 20 31 32 20 20 20 20              12    
007560:  20 33 2E 31 30 2A 31 35 36 33 32 31 20 20 20 20     3.10*156321    
007570:  31 38 30 31 38 33 20 20 35 32 35 36 33 36 20 20    180183  525636  
007580:  20 20 20 20 32 30 30 31 38 33 20 20 20 20 20 20        200183      
007590:  20 20 20 20 20 20 20 20 20 20 20 44 55 52 41 4E               DURAN
0075A0:  44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    D               
0075B0:  20 20 20 20 30 32 31 35 36 46 41 43 4F 4D 20 20        02156FACOM  
0075C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0075D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0075E0:  20 31 38 30 31 38 33 20 20 20 20 20 20 20 20 20     180183         
0075F0:  20 35 41 54 45 4C 49 45 52 20 31 35 34 20 20 20     5ATELIER 154   
007600:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007610:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007620:  20 20 20 20 20 20 20 20 20 20 20 20 20 31 32 33                 123
007630:  34 35 36 20 20 20 20 20 20 20 20 20 20 30 20 20    456          0  
007640:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007650:  20 20 20 20 20 20 20 20 30 20 20 20 20 20 33 2E            0     3.
007660:  30 30 2A 31 37 20 20 20 20 20 20 20 20 32 32 2F    00*17        22/
007670:  32 32 2F 32 32 20 20 20 20 20 20 20 20 20 20 20    22/22           
007680:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007690:  20 20 20 20 20 20 20 20 32 20 20 20 20 20 20 20            2       
0076A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0076B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0076C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0076D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 32                  12
0076E0:  33 34 35 36 20 20 20 20 20 20 20 20 20 20 30 20    3456          0 
0076F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007700:  20 20 20 20 20 20 20 20 20 30 20 20 20 20 20 35             0     5
007710:  2E 30 30 2A 31 38 20 20 20 20 20 20 20 20 20 20    .00*18          
007720:  2F 20 20 2F 20 20 20 20 20 20 20 20 20 20 20 20    /  /            
007730:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007740:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007750:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007760:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007770:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007780:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31                   1
007790:  32 33 34 35 36 20 20 20 20 20 20 20 20 20 20 30    23456          0
0077A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0077B0:  20 20 20 20 20 20 20 20 20 20 30 20 20 20 20 20              0     
0077C0:  36 2E 30 30 2A 36 35 34 36 35 35 20 20 20 20 32    6.00*654655    2
0077D0:  35 2F 30 31 2F 38 33 36 39 33 35 38 32 20 20 20    5/01/83693582   
0077E0:  20 20 20 32 39 2F 30 31 2F 38 33 4D 41 49 4E 54       29/01/83MAINT
0077F0:  45 4E 41 4E 43 45 20 20 20 20 52 4F 43 48 45 52    ENANCE    ROCHER
007800:  20 20 20 20 20 20 20 20 20 20 20 31 32 20 20 20               12   
007810:  20 31 36 2E 35 30 2A 32 31 34 35 20 20 20 20 20     16.50*2145     
007820:  20 32 32 2F 30 31 2F 20 20 20 20 20 20 20 20 20     22/01/         
007830:  20 20 20 20 20 20 20 2F 20 20 2F 20 20 20 20 20           /  /     
007840:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007850:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007860:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007870:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007880:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007890:  20 20 32 35 33 20 20 20 20 20 20 20 20 20 20 20      253           
0078A0:  20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20      0             
0078B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 20                 0  
0078C0:  20 32 35 31 2E 32 35 2A 32 32 20 20 20 20 20 20     251.25*22      
0078D0:  20 20 20 20 2F 20 20 2F 20 20 20 20 20 20 20 20        /  /        
0078E0:  20 20 20 20 20 20 20 20 2F 20 20 2F 20 20 20 20            /  /    
0078F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007900:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007910:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007920:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007930:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007940:  20 20 20 31 32 33 34 35 36 20 20 20 20 20 20 20       123456       
007950:  20 20 20 30 20 20 20 20 20 20 20 20 20 20 20 20       0            
007960:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20                  0 
007970:  20 20 20 20 33 2E 30 30 2A 32 35 34 31 20 20 20        3.00*2541   
007980:  20 20 20 32 32 2F 30 31 2F 20 20 20 20 20 20 20       22/01/       
007990:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0079A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0079B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0079C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0079D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0079E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0079F0:  20 20 20 20 31 32 33 34 35 36 20 20 20 20 20 20        123456      
007A00:  4D 44 45 4C 41 49 29 3D 44 45 4C 41 49 00 20 20    MDELAI)=DELAI.  
007A10:  20 20 20 30 32 31 33 35 46 41 43 4F 4D 20 20 20       02135FACOM   
007A20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007A30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007A40:  34 35 36 31 32 33 20 20 20 20 20 20 20 20 20 20    456123          
007A50:  32 41 54 45 4C 49 45 52 20 31 32 35 20 20 20 20    2ATELIER 125    
007A60:  20 20 20 20 20 20 20 20 20 20 31 30 20 20 20 35              10   5
007A70:  32 35 2E 32 35 2A 31 34 37 32 35 38 20 20 20 20    25.25*147258    
007A80:  32 31 2F 30 31 2F 38 33 32 35 38 37 34 31 20 20    21/01/83258741  
007A90:  20 20 20 20 32 39 2F 30 31 2F 38 33 4D 41 49 4E        29/01/83MAIN
007AA0:  54 45 4E 41 4E 43 45 20 20 20 20 52 4F 43 48 45    TENANCE    ROCHE
007AB0:  52 45 41 55 20 20 20 20 20 20 20 20 20 20 20 20    REAU            
007AC0:  20 20 20 20 30 32 35 36 33 53 43 4F 50 45 58 20        02563SCOPEX 
007AD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007AE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007AF0:  20 31 32 33 34 35 36 20 20 20 20 20 20 20 20 20     123456         
007B00:  20 31 41 54 45 4C 49 45 52 20 31 32 34 20 20 20     1ATELIER 124   
007B10:  20 20 20 20 20 20 20 20 20 20 20 31 32 20 20 20               12   
007B20:  32 34 35 2E 32 35 2A 31 20 20 20 20 20 20 20 20    245.25*1        
007B30:  20 32 36 2F 30 31 2F 38 33 20 20 20 20 20 20 20     26/01/83       
007B40:  20 20 20 20 20 20 20 2F 20 20 2F 20 20 20 20 20           /  /     
007B50:  20 20 20 20 20 20 20 20 20 20 20 20 52 4F 43 48                ROCH
007B60:  45 52 45 41 55 20 20 20 20 20 20 20 20 20 20 20    EREAU           
007B70:  20 20 20 20 20 30 32 35 33 36 53 43 4F 50 45 58         02536SCOPEX
007B80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007B90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007BA0:  20 20 31 32 33 34 35 36 20 20 20 20 20 20 20 20      123456        
007BB0:  20 32 30 20 20 20 20 20 20 20 20 20 20 20 20 20     20             
007BC0:  20 20 20 20 20 20 20 20 20 20 20 20 31 30 20 20                10  
007BD0:  20 33 30 30 2E 30 30 2A 32 20 20 20 20 20 20 20     300.00*2       
007BE0:  20 20 32 35 2F 30 31 2F 38 33 20 20 20 20 20 20      25/01/83      
007BF0:  20 20 20 20 20 20 20 20 2F 20 20 2F 20 20 20 20            /  /    
007C00:  20 20 20 20 30 20 20 20 20 20 20 20 20 20 20 20        0           
007C10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32                   2
007C20:  20 20 20 20 20 33 2E 30 30 2A 32 35 36 33 20 20         3.00*2563  
007C30:  20 20 20 20 20 20 2F 20 20 2F 20 20 20 20 20 20          /  /      
007C40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007C50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007C60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007C70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007C80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007C90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007CA0:  20 20 20 20 20 31 32 33 34 35 36 20 20 20 20 20         123456     
007CB0:  20 20 20 20 20 30 20 20 20 20 20 20 20 20 20 20         0          
007CC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007CD0:  30 20 20 20 20 20 33 2E 30 30 2A 32 35 38 33 20    0     3.00*2583 
007CE0:  20 20 20 20 20 32 32 2F 30 31 2F 20 20 20 20 20         22/01/     
007CF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007D00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007D10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007D20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007D30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007D40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007D50:  20 20 20 20 20 20 31 32 33 34 35 36 20 20 20 20          123456    
007D60:  20 20 20 20 20 20 30 20 20 20 20 20 20 20 20 20          0         
007D70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007D80:  20 30 20 20 20 20 20 33 2E 30 30 2A 32 35 38 37     0     3.00*2587
007D90:  20 20 20 20 20 20 32 32 2F 32 32 2F 20 20 20 20          22/22/    
007DA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007DB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007DC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007DD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007DE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007DF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007E00:  20 20 20 20 20 20 20 20 20 20 20 20 20 52 4F 43                 ROC
007E10:  48 45 52 45 41 55 20 20 20 20 20 20 20 20 20 20    HEREAU          
007E20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007E30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007E40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007E50:  20 20 20 35 32 35 32 20 20 20 20 20 20 20 20 20       5252         
007E60:  20 20 31 35 20 20 20 20 20 20 20 20 20 20 20 20      15            
007E70:  20 20 20 20 20 20 20 20 20 20 20 20 20 31 32 20                 12 
007E80:  20 20 32 35 30 2E 30 30 2A 31 32 35 34 20 20 20      250.00*1254   
007E90:  20 20 20 32 35 2F 30 31 2F 38 33 35 32 34 31 20       25/01/835241 
007EA0:  20 20 20 20 20 20 20 32 35 2F 30 31 2F 38 33 20           25/01/83 
007EB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 79                  uy
007EC0:  67 67 79 75 67 76 79 20 20 20 20 20 20 20 20 20    ggyugvy         
007ED0:  20 20 20 20 20 20 20 20 20 20 20 20 68 67 79 75                hgyu
007EE0:  67 62 75 20 20 20 20 20 20 20 20 20 20 20 20 20    gbu             
007EF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007F00:  20 20 20 20 31 38 30 31 38 33 20 20 20 20 20 20        180183      
007F10:  20 20 20 31 30 20 20 20 20 20 20 20 20 20 20 20       10           
007F20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 30                  20
007F30:  20 20 20 20 32 35 2E 30 30 2A 39 38 37 36 35 34        25.00*987654
007F40:  36 35 34 20 31 36 2F 30 32 2F 38 33 31 32 33 34    654 16/02/831234
007F50:  35 36 20 20 20 20 20 20 32 30 2F 30 32 2F 38 33    56      20/02/83
007F60:  52 45 47 55 4C 41 52 49 53 41 54 49 4F 4E 20 44    REGULARISATION D
007F70:  55 50 4F 4E 54 20 20 20 20 20 20 20 20 20 20 20    UPONT           
007F80:  20 20 20 20 20 20 20 20 30 32 31 34 35 46 41 43            02145FAC
007F90:  4F 4D 20 20 20 20 20 20 20 20 20 20 20 20 20 20    OM              
007FA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
007FB0:  20 20 20 20 20 39 38 37 39 38 37 36 35 34 36 35         98798765465
007FC0:  34 20 20 20 35 30 41 54 45 4C 49 45 52 20 31 32    4   50ATELIER 12
007FD0:  35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32    5              2
007FE0:  30 20 20 20 20 20 33 2E 30 30 2A 31 32 33 34 35    0     3.00*12345
007FF0:  37 20 20 20 20 32 31 2F 30 32 2F 38 33 20 20 20    7    21/02/83   
008000:  20 20 20 20 20 20 20 31 32 33 34 35 36 20 20 20           123456   
008010:  20 20 20 20 20 20 20 30 20 20 20 20 20 20 20 20           0        
008020:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008030:  20 20 30 20 20 20 20 20 33 2E 30 30 2A 32 35 20      0     3.00*25 
008040:  20 20 20 20 20 20 20 20 20 2F 20 20 2F 20 20 20             /  /   
008050:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008060:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008070:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008080:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008090:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0080A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0080B0:  20 20 20 20 20 20 20 20 31 31 20 20 20 20 20 20            11      
0080C0:  20 20 20 20 20 20 20 20 30 20 20 20 20 20 20 20            0       
0080D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0080E0:  20 20 20 30 20 20 20 20 20 30 2E 30 30 2A 32 35       0     0.00*25
0080F0:  34 31 32 20 20 20 20 20 20 20 2F 20 20 2F 20 20    412       /  /  
008100:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008110:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008120:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008130:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008140:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008150:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008160:  20 20 20 20 20 20 20 20 20 31 31 20 20 20 20 20             11     
008170:  20 20 20 20 20 20 20 20 20 30 20 20 20 20 20 20             0      
008180:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008190:  20 20 20 20 30 20 20 20 20 20 30 2E 30 30 2A 31        0     0.00*1
0081A0:  31 32 20 20 20 20 20 20 20 20 20 2F 20 20 2F 20    12         /  / 
0081B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0081C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0081D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0081E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0081F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008200:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008210:  20 4E 4D 49 20 20 20 20 20 20 20 20 20 20 20 20     NMI            
008220:  55 48 4E 55 48 4E 20 20 20 20 20 20 20 20 20 20    UHNUHN          
008230:  20 20 20 20 20 20 20 20 20 49 55 4A 4E 49 20 20             IUJNI  
008240:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008250:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008260:  20 20 20 20 20 20 31 32 33 34 35 36 20 20 20 20          123456    
008270:  20 20 20 20 20 32 35 20 20 20 20 20 20 20 20 20         25         
008280:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008290:  31 35 20 20 20 33 30 30 2E 30 30 1A 2E 30 30 1A    15   300.00..00.
0082A0:  30 20 53 41 59 20 22 4C 61 20 70 69 65 63 65 20    0 SAY "La piece 
0082B0:  22 0D 0A 09 09 40 20 32 32 2C 20 39 20 53 41 59    "....@ 22, 9 SAY
0082C0:  20 4D 50 49 45 43 45 0D 0A 09 09 40 20 32 32 2C     MPIECE....@ 22,
0082D0:  32 31 20 53 41 59 20 22 20 6E 27 61 20 70 61 73    21 SAY " n'a pas
0082E0:  20 65 74 65 20 65 6E 72 65 67 69 73 74 72 65 65     ete enregistree
0082F0:  2C 20 65 6E 72 65 67 69 73 74 72 65 65 20 6C 61    , enregistree la
008300:  2C 20 53 2E 56 2E 50 2E 22 0D 0A 09 09 57 41 49    , S.V.P."....WAI
008310:  54 0D 0A 09 09 53 54 4F 52 45 20 27 20 20 20 20    T....STORE '    
008320:  20 20 20 20 20 20 20 20 20 20 20 27 20 54 4F 20               ' TO 
008330:  4D 50 49 45 43 45 0D 0A 09 09 40 20 31 38 2C 31    MPIECE....@ 18,1
008340:  34 20 53 41 59 20 4D 50 49 45 43 45 09 0D 0A 09    4 SAY MPIECE....
008350:  09 45 4C 53 45 0D 0A 09 09 53 54 4F 52 45 20 27    .ELSE....STORE '
008360:  20 20 20 20 20 20 20 20 27 20 54 4F 20 4D 44 41            ' TO MDA
008370:  3A 44 41 54 45 0D 0A 09 09 53 54 4F 52 45 20 27    :DATE....STORE '
008380:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27                   '
008390:  20 54 4F 20 4D 54 59 50 45 0D 0A 09 09 53 54 4F     TO MTYPE....STO
0083A0:  52 45 20 27 20 20 20 20 20 20 20 20 20 20 20 20    RE '            
0083B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 27 20 54                 ' T
0083C0:  4F 20 4D 45 4D 45 54 54 45 55 52 0D 0A 09 09 53    O MEMETTEUR....S
0083D0:  54 4F 52 45 20 27 20 20 20 20 20 27 20 54 4F 20    TORE '     ' TO 
0083E0:  4D 53 45 43 54 49 4F 4E 0D 0A 09 09 53 54 4F 52    MSECTION....STOR
0083F0:  45 20 27 20 20 20 20 20 20 20 20 20 20 20 20 20    E '             
008400:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008410:  20 20 20 20 20 20 20 20 20 20 31 31 20 20 20 20              11    
008420:  20 20 20 20 20 20 20 20 20 20 30 20 20 20 20 20              0     
008430:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008440:  20 20 20 20 20 30 20 20 20 20 20 30 2E 30 30 2A         0     0.00*
008450:  31 32 35 20 20 20 20 20 20 20 32 32 2F 30 31 2F    125       22/01/
008460:  38 33 32 35 34 36 33 35 32 31 34 35 38 35 32 35    8325463521458525
008470:  2F 30 31 2F 38 33 41 41 41 41 41 41 41 41 41 41    /01/83AAAAAAAAAA
008480:  41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41    AAAAAAAAAAAAAAAA
008490:  41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41    AAAAAAAAAAAAAAAA
0084A0:  41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41    AAAAAAAAAAAAAAAA
0084B0:  41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41    AAAAAAAAAAAAAAAA
0084C0:  41 41 41 41 41 41 41 41 41 41 41 31 32 20 20 20    AAAAAAAAAAA12   
0084D0:  20 20 20 20 20 20 20 20 20 20 20 31 20 20 20 20               1    
0084E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0084F0:  20 20 20 20 20 20 32 20 20 20 34 35 30 2E 30 30          2   450.00
008500:  2A 31 34 20 20 20 20 20 20 20 20 32 35 2F 30 31    *14        25/01
008510:  2F 38 33 20 20 20 20 20 20 20 20 20 20 20 20 20    /83             
008520:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008530:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008540:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008550:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008560:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008570:  20 20 20 20 20 20 20 20 20 20 20 20 31 34 20 20                14  
008580:  20 20 20 20 20 20 20 20 20 20 20 20 30 20 20 20                0   
008590:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0085A0:  20 20 20 20 20 20 20 30 20 20 20 20 32 35 2E 30           0    25.0
0085B0:  30 2A 32 36 20 20 20 20 20 20 20 20 32 32 2F 35    0*26        22/5
0085C0:  35 2F 36 36 32 35 20 20 20 20 20 20 20 20 20 20    5/6625          
0085D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0085E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0085F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
008600:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
008610:  07 00 00 00 02 09 47 E5 07 00 C1 02 00 00 00 02    ......G.........
008620:  07 00 C6 02 00 00 00 02 07 00 C2 02 00 00 00 02    ................
008630:  07 00 C7 02 00 00 00 02 07 00 C3 02 00 00 00 02    ................
008640:  07 00 C8 02 00 00 00 02 07 00 C4 02 00 00 00 02    ................
008650:  07 00 C9 02 00 00 00 02 07 00 C5 02 00 00 00 02    ................
008660:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
008670:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
008680:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
008690:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0086F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
008700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0087A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0087B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0087C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0087D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0087E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0087F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008800:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008810:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008820:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008830:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008840:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008850:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008860:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008870:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008880:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008890:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0088A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0088B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0088C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0088D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0088E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0088F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008900:  57 3D 35 30 2C 4D 3D 32 0D 0A 59 0D 0A 45 54 41    W=50,M=2..Y..ETA
008910:  54 20 44 45 53 20 44 45 4D 41 4E 44 45 53 20 44    T DES DEMANDES D
008920:  27 41 43 48 41 54 20 45 4D 49 53 45 53 20 44 41    'ACHAT EMISES DA
008930:  4E 53 20 55 4E 45 20 50 45 52 49 4F 44 45 20 44    NS UNE PERIODE D
008940:  4F 4E 4E 45 45 0D 0A 4E 0D 0A 59 0D 0A 4E 0D 0A    ONNEE..N..Y..N..
008950:  31 30 2C 44 41 3A 4E 55 4D 0D 0A 3C 4E 55 4D 45    10,DA:NUM..<NUME
008960:  52 4F 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 0D 0A 31    RO;__________..1
008970:  31 2C 44 41 3A 44 41 54 45 0D 0A 3C 44 41 54 45    1,DA:DATE..<DATE
008980:  20 45 4D 49 53 2E 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F     EMIS.;_________
008990:  5F 0D 0A 36 2C 51 54 45 3A 43 4D 44 0D 0A 3E 51    _..6,QTE:CMD..>Q
0089A0:  54 45 2E 3B 5F 5F 5F 5F 5F 5F 0D 0A 4E 0D 0A 31    TE.;______..N..1
0089B0:  30 2C 50 52 49 58 3A 55 48 54 0D 0A 3C 50 52 49    0,PRIX:UHT..<PRI
0089C0:  58 20 55 48 54 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F    X UHT;__________
0089D0:  0D 0A 4E 0D 0A 31 32 2C 51 54 45 3A 43 4D 44 20    ..N..12,QTE:CMD 
0089E0:  2A 20 50 52 49 58 3A 55 48 54 0D 0A 50 52 49 58    * PRIX:UHT..PRIX
0089F0:  20 54 48 54 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F     THT;___________
008A00:  5F 0D 0A 59 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    _..Y............
008A10:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
008A20:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
008A30:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
008A40:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
008A50:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
008A60:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
008A70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
008A80:  36 32 35 33 31 20 20 20 20 00 00 02 00 35 33 32    62531    ....532
008A90:  36 35 32 20 20 20 20 00 00 03 00 35 34 33 32 35    652    ....54325
008AA0:  31 20 20 20 20 00 00 09 00 35 34 35 35 34 35 20    1    ....545545 
008AB0:  20 20 20 00 00 0B 00 35 34 35 35 34 36 20 20 20       ....545546   
008AC0:  20 00 00 06 00 36 34 32 33 35 31 20 20 20 20 00     ....642351    .
008AD0:  00 13 00 36 35 34 33 32 31 20 20 20 20 00 00 01    ...654321    ...
008AE0:  00 36 38 35 32 33 31 20 20 20 20 00 00 15 00 37    .685231    ....7
008AF0:  38 35 34 36 39 20 20 20 20 00 00 1A 00 39 38 37    85469    ....987
008B00:  00 00 01 00 02 00 0C 0E 24 00 44 41 3A 4E 55 4D    ........$.DA:NUM
008B10:  00 4D 45 52 4F 20 44 45 20 4C 41 20 44 45 4D 41    .MERO DE LA DEMA
008B20:  4E 44 45 20 44 27 41 43 48 41 54 0D 0A 40 20 35    NDE D'ACHAT..@ 5
008B30:  2C 31 30 20 47 45 54 20 4D 44 41 3A 4E 55 4D 0D    ,10 GET MDA:NUM.
008B40:  0A 52 45 41 44 0D 0A 2A 20 53 49 20 41 55 43 55    .READ..* SI AUCU
008B50:  4E 20 4E 55 4D 45 52 4F 20 4E 27 45 53 54 20 53    N NUMERO N'EST S
008B60:  41 49 53 49 45 20 2D 3E 20 52 45 54 4F 55 00 00    AISIE -> RETOU..
008B70:  04 00 39 38 37 36 35 34 33 32 31 36 00 00 03 00    ..9876543216....
008B80:  39 38 37 36 35 34 33 32 31 37 00 00 02 00 39 38    9876543217....98
008B90:  37 36 35 34 33 32 31 38 00 00 01 00 39 38 37 36    76543218....9876
008BA0:  35 34 33 32 31 39 00 00 01 00 39 38 37 36 35 34    543219....987654
008BB0:  33 32 31 39 00 00 08 00 54 45 53 54 20 20 20 20    3219....TEST    
008BC0:  20 20 00 00 08 00 54 45 53 54 20 20 20 20 20 20      ....TEST      
008BD0:  00 00 08 00 54 45 53 54 20 20 20 20 20 20 00 00    ....TEST      ..
008BE0:  10 00 33 32 31 33 32 31 34 20 20 20 00 00 0D 00    ..3213214   ....
008BF0:  34 35 36 31 32 33 31 32 33 32 00 00 04 00 35 34    4561231232....54
008C00:  32 31 32 35 36 20 20 20 00 00 08 00 35 34 35 35    21256   ....5455
008C10:  34 35 20 20 20 20 00 00 05 00 35 35 33 32 36 35    45    ....553265
008C20:  32 20 20 20 00 00 03 00 35 35 34 33 32 35 31 20    2   ....5543251 
008C30:  20 20 00 00 06 00 35 36 34 32 33 35 31 20 20 20      ....5642351   
008C40:  00 00 01 00 35 36 38 35 32 33 31 20 20 20 00 00    ....5685231   ..
008C50:  0B 00 37 38 35 34 36 39 20 20 20 20 00 00 12 00    ..785469    ....
008C60:  39 38 37 36 35 34 36 35 34 20 00 00 20 20 00 00    987654654 ..  ..
008C70:  0A 00 33 34 35 36 37 38 39 31 32 33 34 35 00 00    ..345678912345..
008C80:  10 00 34 35 36 31 32 33 31 32 33 31 32 33 00 00    ..456123123123..
008C90:  0D 00 34 35 36 34 33 34 35 32 33 39 38 34 00 00    ..456434523984..
008CA0:  0E 00 34 35 36 34 35 36 20 20 20 20 20 20 00 00    ..456456      ..
008CB0:  0B 00 37 38 39 34 35 36 31 32 33 34 35 36 00 00    ..789456123456..
008CC0:  16 00 39 38 37 39 38 37 36 35 34 36 35 34 00 00    ..987987654654..
008CD0:  24 00 31 32 35 34 20 20 20 20 20 20 20 20 00 00    $.1254        ..
008CE0:  2D 00 31 32 35 34 32 33 20 20 20 20 20 20 00 00    -.125423      ..
008CF0:  34 00 31 32 35 34 33 20 20 20 20 20 20 20 00 00    4.12543       ..
008D00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008D10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008D20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008D30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008D40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008D50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008D60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008D70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008D80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008D90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008DA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008DB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008DC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008DD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008DE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008DF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008E00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008E10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008E20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008E30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008E40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008E50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008E60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008E70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008E80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008E90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008EA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008EB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008EC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008ED0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008EE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008EF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
008F00:  04 00 00 04 00 39 38 37 36 35 34 33 32 31 36 00    .....9876543216.
008F10:  00 03 00 39 38 37 36 35 34 33 32 31 37 00 00 02    ...9876543217...
008F20:  00 39 38 37 36 35 34 33 32 31 38 00 00 01 00 39    .9876543218....9
008F30:  38 37 36 35 34 33 32 31 39 00 00 37 38 39 31 32    876543219..78912
008F40:  35 00 00 04 00 31 32 33 34 35 36 37 38 39 31 32    5....12345678912
008F50:  36 00 00 05 00 31 32 33 34 35 36 37 38 39 31 32    6....12345678912
008F60:  37 00 00 06 00 31 32 33 34 35 36 37 38 39 31 32    7....12345678912
008F70:  39 00 00 07 00 31 32 33 34 35 36 37 38 39 31 34    9....12345678914
008F80:  37 00 00 08 00 31 32 33 34 35 36 37 38 39 31 34    7....12345678914
008F90:  37 00 00 32 31 32 35 36 20 20 20 00 00 08 00 35    7..21256   ....5
008FA0:  34 35 35 34 35 20 20 20 20 00 00 05 00 35 35 33    45545    ....553
008FB0:  32 36 35 32 20 20 20 00 00 03 00 35 35 34 33 32    2652   ....55432
008FC0:  35 31 20 20 20 00 00 06 00 35 36 34 32 33 35 31    51   ....5642351
008FD0:  20 20 20 00 00 01 00 35 36 38 35 32 33 31 20 20       ....5685231  
008FE0:  20 00 00 0B 00 37 38 35 34 36 39 20 20 20 20 00     ....785469    .
008FF0:  00 12 00 39 38 37 36 35 34 36 35 34 20 00 00 20    ...987654654 .. 
009000:  20 00 00 0A 00 33 34 35 36 37 38 39 31 32 33 34     ....34567891234
009010:  35 00 00 10 00 34 35 36 31 32 33 31 32 33 31 32    5....45612312312
009020:  33 00 00 0D 00 34 35 36 34 33 34 35 32 33 39 38    3....45643452398
009030:  34 00 00 0E 00 34 35 36 34 35 36 20 20 20 20 20    4....456456     
009040:  20 00 00 0B 00 37 38 39 34 35 36 31 32 33 34 35     ....78945612345
009050:  36 00 00 16 00 39 38 37 39 38 37 36 35 34 36 35    6....98798765465
009060:  34 00 00 24 00 31 32 35 34 20 20 20 20 20 20 20    4..$.1254       
009070:  20 00 00 2D 00 31 32 35 34 32 33 20 20 20 20 20     ..-.125423     
009080:  20 00 00 34 00 31 32 35 34 33 20 20 20 20 20 20     ..4.12543      
009090:  20 00 00 33 00 31 32 35 34 38 35 35 20 20 20 20     ..3.1254855    
0090A0:  20 00 00 2C 00 31 38 30 31 38 33 20 20 20 20 20     ..,.180183     
0090B0:  20 00 00 2A 00 32 31 20 20 20 20 20 20 20 20 20     ..*.21         
0090C0:  20 00 00 29 00 32 31 30 31 38 33 20 20 20 20 20     ..).210183     
0090D0:  20 00 00 2F 00 32 31 35 34 20 20 20 20 20 20 20     ../.2154       
0090E0:  20 00 00 09 00 32 32 32 32 32 32 32 32 32 32 32     ....22222222222
0090F0:  32 00 00 07 00 32 33 34 35 36 37 38 39 31 32 33    2....23456789123
009100:  45 52 41 53 45 0D 0A 40 20 20 31 2C 20 30 20 53    ERASE..@  1, 0 S
009110:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
009120:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009130:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009140:  20 20 20 20 20 20 20 20 20 20 20 20 20 2B 2D 2D                 +--
009150:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009160:  2D 2D 2D 2B 22 0D 0A 40 20 20 32 2C 20 30 20 53    ---+"..@  2, 0 S
009170:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
009180:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009190:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0091A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 49 20 4D                 I M
0091B0:  6F 64 65 20 3A 20 20 20 20 20 20 20 20 20 20 20    ode :           
0091C0:  20 20 20 49 22 0D 0A 40 20 20 32 2C 36 36 20 53       I"..@  2,66 S
0091D0:  41 59 20 4D 4F 44 45 44 41 0D 0A 40 20 20 33 2C    AY MODEDA..@  3,
0091E0:  20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D     0 SAY "+-------
0091F0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009200:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 2D    --------------+-
009210:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009220:  2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    -+--------------
009230:  2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 20 34 2C    -------+"..@  4,
009240:  20 30 20 53 41 59 20 22 49 20 20 20 20 20 20 20     0 SAY "I       
009250:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009260:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 20                  I 
009270:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009280:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009290:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 20 35 2C           I"..@  5,
0092A0:  20 30 20 53 41 59 20 22 49 20 4E 6F 20 44 2E 41     0 SAY "I No D.A
0092B0:  2E 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41    .             DA
0092C0:  54 45 20 20 20 20 20 20 20 20 20 20 20 20 49 20    TE            I 
0092D0:  4E 6F 20 43 44 45 20 20 20 20 20 20 20 20 20 20    No CDE          
0092E0:  20 20 20 20 20 44 41 54 45 20 20 20 20 20 20 20         DATE       
0092F0:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 20 36 2C           I"..@  6,
009300:  14 00 00 04 00 34 32 31 32 35 36 20 20 20 20 00    .....421256    .
009310:  00 05 00 34 32 31 34 32 33 20 20 20 20 00 00 0D    ...421423    ...
009320:  00 34 32 35 34 33 33 20 20 20 20 00 00 08 00 34    .425433    ....4
009330:  35 32 31 33 35 20 20 20 20 00 00 0A 00 34 35 32    52135    ....452
009340:  33 31 35 20 20 20 20 00 00 0F 00 34 35 36 31 32    315    ....45612
009350:  33 20 20 20 20 00 00 11 00 34 35 36 31 33 31 20    3    ....456131 
009360:  20 20 20 00 00 19 00 34 35 36 33 32 31 31 20 20       ....4563211  
009370:  20 00 00 14 00 34 36 32 35 33 31 20 20 20 20 00     ....462531    .
009380:  00 02 00 35 33 32 36 35 32 20 20 20 20 00 00 03    ...532652    ...
009390:  00 35 34 33 32 35 31 20 20 20 20 00 00 09 00 35    .543251    ....5
0093A0:  34 35 35 34 35 20 20 20 20 00 00 0B 00 35 34 35    45545    ....545
0093B0:  35 34 36 20 20 20 20 00 00 06 00 36 34 32 33 35    546    ....64235
0093C0:  31 20 20 20 20 00 00 13 00 36 35 34 33 32 31 20    1    ....654321 
0093D0:  20 20 20 00 00 2C 00 36 35 34 36 35 35 20 20 20       ..,.654655   
0093E0:  20 00 00 01 00 36 38 35 32 33 31 20 20 20 20 00     ....685231    .
0093F0:  00 15 00 37 38 35 34 36 39 20 20 20 20 00 00 1A    ...785469    ...
009400:  00 39 38 37 36 35 34 20 20 20 20 00 00 31 00 39    .987654    ..1.9
009410:  38 37 36 35 34 36 35 34 20 00 00 05 00 34 32 31    87654654 ....421
009420:  34 32 33 20 20 20 20 00 00 0D 00 34 32 35 34 33    423    ....42543
009430:  33 20 20 20 20 00 00 08 00 34 35 32 31 33 35 20    3    ....452135 
009440:  20 20 20 00 00 0A 00 34 35 32 33 31 35 20 20 20       ....452315   
009450:  20 00 00 0F 00 34 35 36 31 32 33 20 20 20 20 00     ....456123    .
009460:  00 11 00 34 35 36 31 33 31 20 20 20 20 00 00 19    ...456131    ...
009470:  00 34 35 36 33 32 31 31 20 20 20 00 00 14 00 34    .4563211   ....4
009480:  36 32 35 33 31 20 20 20 20 00 00 02 00 35 33 32    62531    ....532
009490:  36 35 32 20 20 20 20 00 00 03 00 35 34 33 32 35    652    ....54325
0094A0:  31 20 20 20 20 00 00 09 00 35 34 35 35 34 35 20    1    ....545545 
0094B0:  20 20 20 00 00 0B 00 35 34 35 35 34 36 20 20 20       ....545546   
0094C0:  20 00 00 06 00 36 34 32 33 35 31 20 20 20 20 00     ....642351    .
0094D0:  00 13 00 36 35 34 33 32 31 20 20 20 20 00 00 01    ...654321    ...
0094E0:  00 36 38 35 32 33 31 20 20 20 20 00 00 15 00 37    .685231    ....7
0094F0:  38 35 34 36 39 20 20 20 20 00 00 1A 00 39 38 37    85469    ....987
009500:  20 30 20 53 41 59 20 22 49 20 20 20 20 20 20 20     0 SAY "I       
009510:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009520:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 20                  I 
009530:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009540:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009550:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 20 37 2C           I"..@  7,
009560:  20 30 20 53 41 59 20 22 49 20 45 6D 65 74 74 65     0 SAY "I Emette
009570:  75 72 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ur              
009580:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 20                  I 
009590:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0095A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0095B0:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 20 38 2C           I"..@  8,
0095C0:  20 30 20 53 41 59 20 22 49 20 20 20 20 20 20 20     0 SAY "I       
0095D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0095E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 20                  I 
0095F0:  54 79 70 65 20 20 20 20 20 20 20 20 20 20 20 20    Type            
009600:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009610:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 20 39 2C           I"..@  9,
009620:  20 30 20 53 41 59 20 22 49 20 53 65 72 76 69 63     0 SAY "I Servic
009630:  65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    e               
009640:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 20                  I 
009650:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009660:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009670:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 30 2C           I"..@ 10,
009680:  20 30 20 53 41 59 20 22 49 20 20 20 20 20 20 20     0 SAY "I       
009690:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0096A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 20                  I 
0096B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0096C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0096D0:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 31 2C           I"..@ 11,
0096E0:  20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D     0 SAY "+-------
0096F0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009700:  01 01 00 1C 00 33 32 31 33 32 31 34 20 20 20 02    .....3213214   .
009710:  00 05 00 34 32 31 34 32 33 20 20 20 20 00 00 0D    ...421423    ...
009720:  00 34 32 35 34 33 33 20 20 20 20 00 00 08 00 34    .425433    ....4
009730:  35 32 31 33 35 20 20 20 20 00 00 0A 00 34 35 32    52135    ....452
009740:  33 31 35 20 20 20 20 00 00 0F 00 34 35 36 31 32    315    ....45612
009750:  33 20 20 20 20 00 00 11 00 34 35 36 31 33 31 20    3    ....456131 
009760:  20 20 20 00 00 19 00 34 35 36 33 32 31 31 20 20       ....4563211  
009770:  20 00 00 14 00 34 36 32 35 33 31 20 20 20 20 00     ....462531    .
009780:  00 02 00 35 33 32 36 35 32 20 20 20 20 00 00 03    ...532652    ...
009790:  00 35 34 33 32 35 31 20 20 20 20 00 00 09 00 35    .543251    ....5
0097A0:  34 35 35 34 35 20 20 20 20 00 00 0B 00 35 34 35    45545    ....545
0097B0:  35 34 36 20 20 20 20 00 00 06 00 36 34 32 33 35    546    ....64235
0097C0:  31 20 20 20 20 00 00 13 00 36 35 34 33 32 31 20    1    ....654321 
0097D0:  20 20 20 00 00 01 00 36 38 35 32 33 31 20 20 20       ....685231   
0097E0:  20 00 00 15 00 37 38 35 34 36 39 20 20 20 20 00     ....785469    .
0097F0:  00 1A 00 39 38 37 36 35 34 20 20 20 20 00 00 1C    ...987654    ...
009800:  00 33 32 31 33 32 31 34 20 20 20 00 00 04 00 34    .3213214   ....4
009810:  32 31 32 35 36 20 20 20 20 00 00 05 00 34 32 31    21256    ....421
009820:  34 32 33 20 20 20 20 00 00 0D 00 34 32 35 34 33    423    ....42543
009830:  33 20 20 20 20 00 00 08 00 34 35 32 31 33 35 20    3    ....452135 
009840:  20 20 20 00 00 0A 00 34 35 32 33 31 35 20 20 20       ....452315   
009850:  20 00 00 0F 00 34 35 36 31 32 33 20 20 20 20 00     ....456123    .
009860:  00 11 00 34 35 36 31 33 31 20 20 20 20 00 00 19    ...456131    ...
009870:  00 34 35 36 33 32 31 31 20 20 20 00 00 14 00 34    .4563211   ....4
009880:  36 32 35 33 31 20 20 20 20 00 00 02 00 35 33 32    62531    ....532
009890:  36 35 32 20 20 20 20 00 00 03 00 35 34 33 32 35    652    ....54325
0098A0:  31 20 20 20 20 00 00 09 00 35 34 35 35 34 35 20    1    ....545545 
0098B0:  20 20 20 00 00 0B 00 35 34 35 35 34 36 20 20 20       ....545546   
0098C0:  20 00 00 06 00 36 34 32 33 35 31 20 20 20 20 00     ....642351    .
0098D0:  00 13 00 36 35 34 33 32 31 20 20 20 20 00 00 01    ...654321    ...
0098E0:  00 36 38 35 32 33 31 20 20 20 20 00 00 15 00 37    .685231    ....7
0098F0:  38 35 34 36 39 20 20 20 20 00 00 1A 00 39 38 37    85469    ....987
009900:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
009910:  08 00 00 00 02 09 47 E5 08 00 C1 02 00 00 00 02    ......G.........
009920:  08 00 C6 02 00 00 00 02 08 00 C2 02 00 00 00 02    ................
009930:  08 00 C7 02 00 00 00 02 08 00 C3 02 00 00 00 02    ................
009940:  08 00 C8 02 00 00 00 02 08 00 C4 02 00 00 00 02    ................
009950:  08 00 C9 02 00 00 00 02 08 00 C5 02 00 00 00 02    ................
009960:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
009970:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
009980:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
009990:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0099F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
009A00:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 2D    --------------+-
009A10:  2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----+-----------
009A20:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009A30:  2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 31 32 2C    -------+"..@ 12,
009A40:  20 30 20 53 41 59 20 22 49 20 20 20 20 20 20 20     0 SAY "I       
009A50:  20 20 20 20 20 20 46 4F 55 52 4E 49 53 53 45 55          FOURNISSEU
009A60:  52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    R               
009A70:  20 20 20 20 49 20 20 20 20 20 20 20 20 20 20 20        I           
009A80:  4D 41 43 48 49 4E 45 20 20 20 20 20 20 20 20 20    MACHINE         
009A90:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 33 2C           I"..@ 13,
009AA0:  20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D     0 SAY "+-------
009AB0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009AC0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009AD0:  2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----+-----------
009AE0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009AF0:  2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 31 34 2C    -------+"..@ 14,
009B00:  20 30 20 53 41 59 20 22 49 20 20 20 20 20 20 20     0 SAY "I       
009B10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009B20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009B30:  20 20 20 20 49 20 20 20 20 20 20 20 20 20 20 20        I           
009B40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009B50:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 35 2C           I"..@ 15,
009B60:  20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D     0 SAY "+-------
009B70:  2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    -----+----------
009B80:  2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    -----+----------
009B90:  2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----+-----------
009BA0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D    ----------+-----
009BB0:  2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 31 36 2C    -------+"..@ 16,
009BC0:  20 30 20 53 41 59 20 22 49 20 20 51 74 65 20 43     0 SAY "I  Qte C
009BD0:  64 65 20 20 20 49 20 20 20 52 65 66 65 72 65 6E    de   I   Referen
009BE0:  63 65 20 20 20 49 20 20 20 20 20 20 20 20 20 20    ce   I          
009BF0:  44 65 73 69 67 6E 61 74 69 6F 6E 20 20 20 20 20    Designation     
009C00:  00 00 00 01 00 38 33 30 36 32 39 00 00 02 00 38    .....830629....8
009C10:  33 30 37 33 31 00 00 03 00 38 33 30 38 32 30 00    30731....830820.
009C20:  00 04 00 38 33 30 38 32 30 00 00 05 00 38 33 30    ...830820....830
009C30:  39 30 33 00 00 06 00 38 33 30 39 30 33 00 00 07    903....830903...
009C40:  00 38 33 30 39 30 33 00 00 08 00 38 33 30 39 30    .830903....83090
009C50:  37 00 00 09 00 38 33 30 39 31 35 00 00 03 00 38    7....830915....8
009C60:  34 30 31 30 31 00 00 0A 00 38 33 30 38 31 35 00    40101....830815.
009C70:  00 0C 00 38 33 30 38 31 35 00 00 0C 00 38 33 30    ...830815....830
009C80:  38 31 35 00 00 0E 00 38 33 30 38 31 35 00 00 0F    815....830815...
009C90:  00 38 33 30 38 31 35 00 00 0F 00 38 33 30 38 31    .830815....83081
009CA0:  35 00 00 11 00 38 33 30 38 31 35 00 00 12 00 38    5....830815....8
009CB0:  33 30 38 31 35 00 00 20 20 20 20 20 20 2D 20 20    30815..      -  
009CC0:  20 20 32 33 32 2D 33 32 33 32 20 31 32 2F 33 31      232-3232 12/31
009CD0:  2F 38 30 20 20 2F 20 20 2F 20 20 66 6F 74 31 32    /80  /  /  fot12
009CE0:  33 34 2E 30 30 30 31 32 33 34 2E 30 30 30 62 61    34.0001234.000ba
009CF0:  6C 20 40 20 31 34 2C 31 30 20 53 41 59 20 22 48    l @ 14,10 SAY "H
009D00:  69 72 65 20 64 61 74 65 22 0D 0A 20 20 20 20 20    ire date"..     
009D10:  20 20 20 20 20 40 20 31 34 2C 32 38 20 47 45 54         @ 14,28 GET
009D20:  20 4D 65 61 3A 64 61 74 65 20 50 49 43 54 55 52     Mea:date PICTUR
009D30:  45 20 27 39 39 2F 39 39 2F 39 39 27 0D 0A 20 20    E '99/99/99'..  
009D40:  20 20 20 20 20 20 20 20 52 45 41 44 0D 0A 20 20            READ..  
009D50:  20 20 20 20 20 20 20 20 53 54 4F 52 45 20 54 20            STORE T 
009D60:  54 4F 20 4D 65 61 3A 6E 6F 64 61 74 65 0D 0A 20    TO Mea:nodate.. 
009D70:  20 20 20 20 20 20 20 45 4E 44 49 46 0D 0A 20 20           ENDIF..  
009D80:  20 20 20 20 45 4E 44 44 4F 0D 0A 20 20 20 20 20        ENDDO..     
009D90:  20 53 45 54 20 63 6F 6C 6F 6E 20 4F 46 46 0D 0A     SET colon OFF..
009DA0:  20 20 20 20 20 20 40 20 32 32 2C 30 20 53 41 59          @ 22,0 SAY
009DB0:  20 22 49 73 20 74 68 65 20 65 6D 70 6C 6F 79 65     "Is the employe
009DC0:  65 20 64 61 74 61 20 63 6F 72 72 65 63 74 20 28    e data correct (
009DD0:  59 2F 4E 29 3F 20 22 20 47 45 54 20 4D 65 61 3A    Y/N)? " GET Mea:
009DE0:  6F 6B 0D 0A 20 20 20 20 20 20 52 45 41 44 0D 0A    ok..      READ..
009DF0:  20 20 20 20 20 20 53 45 54 20 63 6F 6C 6F 6E 20          SET colon 
009E00:  20 20 20 20 20 20 20 20 20 20 49 20 50 72 69 78              I Prix
009E10:  20 55 48 54 20 20 20 49 22 0D 0A 40 20 31 37 2C     UHT   I"..@ 17,
009E20:  20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D     0 SAY "+-------
009E30:  2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    -----+----------
009E40:  2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    -----+----------
009E50:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009E60:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D    ----------+-----
009E70:  2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 31 38 2C    -------+"..@ 18,
009E80:  20 30 20 53 41 59 20 22 49 20 20 20 20 20 20 20     0 SAY "I       
009E90:  20 20 20 20 20 49 20 20 20 20 20 20 20 20 20 20         I          
009EA0:  20 20 20 20 20 49 20 20 20 20 20 20 20 20 20 20         I          
009EB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009EC0:  20 20 20 20 20 20 20 20 20 20 49 20 20 20 20 20              I     
009ED0:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 39 2C           I"..@ 19,
009EE0:  20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D     0 SAY "+-------
009EF0:  2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    -----+----------
009F00:  2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    -----+----------
009F10:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009F20:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D    ----------+-----
009F30:  2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 32 30 2C    -------+"..@ 20,
009F40:  20 30 20 53 41 59 20 22 49 20 49 6D 70 75 74 61     0 SAY "I Imputa
009F50:  74 69 6F 6E 20 20 20 20 20 20 20 20 20 20 20 20    tion            
009F60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009F70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
009F80:  20 44 65 6C 61 69 20 73 65 6D 61 69 6E 65 20 20     Delai semaine  
009F90:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 32 31 2C           I"..@ 21,
009FA0:  20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D     0 SAY "+-------
009FB0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009FC0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009FD0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009FE0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
009FF0:  2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 52 45 54 55 52    -------+"..RETUR
00A000:  00 00 01 00 02 00 08 0A 32 00 24 28 64 61 74 65    ........2.$(date
00A010:  3A 64 65 62 2C 37 2C 32 29 2B 24 28 64 61 74 65    :deb,7,2)+$(date
00A020:  3A 64 65 62 2C 34 2C 32 29 2B 24 28 64 61 74 65    :deb,4,2)+$(date
00A030:  3A 64 65 62 2C 31 2C 32 29 00 20 6D 63 6F 6D 3A    :deb,1,2). mcom:
00A040:  64 65 62 0D 0A 73 74 6F 72 65 20 6D 6F 6E 74 3A    deb..store mont:
00A050:  64 65 62 20 74 6F 20 6D 6D 6F 6E 74 3A 64 65 62    deb to mmont:deb
00A060:  0D 0A 65 6C 73 65 0D 0A 61 70 70 65 6E 64 00 00    ..else..append..
00A070:  00 01 00 38 33 30 36 32 39 00 00 02 00 38 33 30    ...830629....830
00A080:  37 33 31 00 00 03 00 38 33 30 38 32 30 00 00 04    731....830820...
00A090:  00 38 33 30 38 32 30 00 00 05 00 38 33 30 39 30    .830820....83090
00A0A0:  33 00 00 06 00 38 33 30 39 30 33 00 00 07 00 38    3....830903....8
00A0B0:  33 30 39 30 33 00 00 08 00 38 33 30 39 30 37 00    30903....830907.
00A0C0:  00 09 00 38 33 30 39 31 35 00 00 03 00 38 34 30    ...830915....840
00A0D0:  31 30 31 00 00 0A 00 38 33 30 38 31 35 00 00 0C    101....830815...
00A0E0:  00 38 33 30 38 31 35 00 00 0C 00 38 33 30 38 31    .830815....83081
00A0F0:  35 00 00 0E 00 38 33 30 38 31 35 00 00 0F 00 38    5....830815....8
00A100:  33 30 38 31 35 00 00 0F 00 38 33 30 38 31 35 00    30815....830815.
00A110:  00 11 00 38 33 30 38 31 35 00 00 12 00 38 33 30    ...830815....830
00A120:  38 31 35 00 00 20 20 20 20 20 20 2D 20 20 20 20    815..      -    
00A130:  32 33 32 2D 33 32 33 32 20 31 32 2F 33 31 2F 38    232-3232 12/31/8
00A140:  30 20 20 2F 20 20 2F 20 20 66 6F 74 31 32 33 34    0  /  /  fot1234
00A150:  2E 30 30 30 31 32 33 34 2E 30 30 30 62 61 6C 20    .0001234.000bal 
00A160:  40 20 31 34 2C 31 30 20 53 41 59 20 22 48 69 72    @ 14,10 SAY "Hir
00A170:  65 20 64 61 74 65 22 0D 0A 20 20 20 20 20 20 20    e date"..       
00A180:  20 20 20 40 20 31 34 2C 32 38 20 47 45 54 20 4D       @ 14,28 GET M
00A190:  65 61 3A 64 61 74 65 20 50 49 43 54 55 52 45 20    ea:date PICTURE 
00A1A0:  27 39 39 2F 39 39 2F 39 39 27 0D 0A 20 20 20 20    '99/99/99'..    
00A1B0:  20 20 20 20 20 20 52 45 41 44 0D 0A 20 20 20 20          READ..    
00A1C0:  20 20 20 20 20 20 53 54 4F 52 45 20 54 20 54 4F          STORE T TO
00A1D0:  20 4D 65 61 3A 6E 6F 64 61 74 65 0D 0A 20 20 20     Mea:nodate..   
00A1E0:  20 20 20 20 20 45 4E 44 49 46 0D 0A 20 20 20 20         ENDIF..    
00A1F0:  20 20 45 4E 44 44 4F 0D 0A 20 20 20 20 20 20 53      ENDDO..      S
00A200:  4E 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    N...............
00A210:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00A220:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00A230:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00A240:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00A250:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00A260:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00A270:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
00A280:  4D 41 43 48 49 4E 45 20 20 20 20 20 20 20 20 20    MACHINE         
00A290:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 33 2C           I"..@ 13,
00A2A0:  20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D     0 SAY "+-------
00A2B0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
00A2C0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
00A2D0:  2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----+-----------
00A2E0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
00A2F0:  2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 31 34 2C    -------+"..@ 14,
00A300:  20 30 20 53 41 59 20 22 49 20 20 20 20 20 20 20     0 SAY "I       
00A310:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A320:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A330:  20 20 20 20 49 20 20 20 20 20 20 20 20 20 20 20        I           
00A340:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
00A350:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 35 2C           I"..@ 15,
00A360:  20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D     0 SAY "+-------
00A370:  2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    -----+----------
00A380:  2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    -----+----------
00A390:  2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----+-----------
00A3A0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D    ----------+-----
00A3B0:  2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 31 36 2C    -------+"..@ 16,
00A3C0:  20 30 20 53 41 59 20 22 49 20 20 51 74 65 20 43     0 SAY "I  Qte C
00A3D0:  64 65 20 20 20 49 20 20 20 52 65 66 65 72 65 6E    de   I   Referen
00A3E0:  63 65 20 20 20 49 20 20 20 20 20 20 20 20 20 20    ce   I          
00A3F0:  44 65 73 69 67 6E 61 74 69 6F 6E 20 20 20 20 20    Designation     
00A400:  00 00 00 01 00 31 32 33 34 35 36 37 00 00 02 00    .....1234567....
00A410:  31 33 36 32 30 36 32 00 00 03 00 31 33 36 32 30    1362062....13620
00A420:  36 33 00 00 04 00 31 33 36 32 30 36 34 00 00 05    63....1362064...
00A430:  00 31 33 36 32 30 36 35 00 00 06 00 31 33 36 32    .1362065....1362
00A440:  30 36 36 00 00 07 00 31 33 36 32 30 36 37 00 00    066....1362067..
00A450:  08 00 31 33 36 32 30 36 38 00 00 09 00 31 33 36    ..1362068....136
00A460:  32 30 36 39 00 00 0A 00 31 33 36 32 30 37 30 00    2069....1362070.
00A470:  00 0B 00 31 33 36 32 30 37 31 00 00 0C 00 31 33    ...1362071....13
00A480:  36 32 30 37 32 00 00 10 00 31 33 36 32 30 37 33    62072....1362073
00A490:  00 00 11 00 31 33 36 32 30 37 34 00 00 12 00 31    ....1362074....1
00A4A0:  33 36 32 30 37 35 00 00 13 00 31 33 36 32 30 37    362075....136207
00A4B0:  36 00 00 14 00 31 33 36 32 30 37 37 00 00 15 00    6....1362077....
00A4C0:  31 33 36 32 30 37 38 00 00 16 00 31 33 36 32 30    1362078....13620
00A4D0:  37 39 00 00 17 00 31 33 36 32 30 38 30 00 00 18    79....1362080...
00A4E0:  00 31 33 36 32 30 38 31 00 00 19 00 31 33 36 32    .1362081....1362
00A4F0:  30 38 32 00 00 1A 00 31 33 36 32 30 38 33 00 00    082....1362083..
00A500:  21 00 31 33 36 32 30 38 34 00 00 22 00 31 33 36    !.1362084..".136
00A510:  32 30 38 35 00 00 23 00 31 33 36 32 30 38 36 00    2085..#.1362086.
00A520:  00 0D 00 39 39 39 39 39 39 39 00 00 0E 00 39 39    ...9999999....99
00A530:  39 39 39 39 39 00 00 0F 00 39 39 39 39 39 39 39    99999....9999999
00A540:  00 00 1B 00 39 39 39 39 39 39 39 00 00 1C 00 39    ....9999999....9
00A550:  39 39 39 39 39 39 00 00 1D 00 39 39 39 39 39 39    999999....999999
00A560:  39 00 00 1E 00 39 39 39 39 39 39 39 00 00 1F 00    9....9999999....
00A570:  39 39 39 39 39 39 39 00 00 20 00 39 39 39 39 39    9999999.. .99999
00A580:  39 39 00 00 24 00 39 39 39 39 39 39 39 00 00 20    99..$.9999999.. 
00A590:  20 53 45 54 20 63 6F 6C 6F 6E 20 4F 46 46 0D 0A     SET colon OFF..
00A5A0:  20 20 20 20 20 20 40 20 32 32 2C 30 20 53 41 59          @ 22,0 SAY
00A5B0:  20 22 49 73 20 74 68 65 20 65 6D 70 6C 6F 79 65     "Is the employe
00A5C0:  65 20 64 61 74 61 20 63 6F 72 72 65 63 74 20 28    e data correct (
00A5D0:  59 2F 4E 29 3F 20 22 20 47 45 54 20 4D 65 61 3A    Y/N)? " GET Mea:
00A5E0:  6F 6B 0D 0A 20 20 20 20 20 20 52 45 41 44 0D 0A    ok..      READ..
00A5F0:  20 20 20 20 20 20 53 45 54 20 63 6F 6C 6F 6E 20          SET colon 
00A600:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A610:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A620:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A630:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A640:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A650:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A660:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A670:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A680:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A690:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A6A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A6B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A6C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A6D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A6E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A6F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A7A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A7B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A7C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A7D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A7E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A7F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
00A800:  01 1F 20 1B 3B 12 4D 12 5F 03 62 0D 6F 0D 7C 06    .. .;.M._.b.o.|.
00A810:  82 05 87 02 89 04 8D 04 91 05 96 07 00 00 00 00    ................
00A820:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00A830:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00A840:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00A850:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00A860:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00A870:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 0F 05    ................
00A880:  CD 1C 05 EB 79 C5 CD A0 13 C1 CD 40 04 F1 D8 E1    ....y......@....
00A890:  C9 21 37 19 09 7E 23 66 6F C9 21 17 19 C3 16 05    .!7..~#fo.!.....
00A8A0:  D5 CD 1C 05 CD 30 05 CD 49 05 EB D1 B5 C9 EB 21    .....0..I......!
00A8B0:  1F 19 CD 16 05 EB C9 D5 CD 13 05 CD 30 05 CD 49    ............0..I
00A8C0:  05 CD 1C 05 19 D1 C9 7D 93 5F 7C 9A 57 C9 3E 01    .......}._|.W.>.
00A8D0:  32 0B 19 2A 37 19 EB 2A 39 19 CD 49 05 DA 77 05    2..*7..*9..I..w.
00A8E0:  2A 17 19 19 EB 2A 23 19 3A 0C 19 B7 CA 77 05 CD    *....*#.:....w..
00A8F0:  07 0A D2 8B 05 2A 17 19 EB 2A 23 19 CD 49 05 1F    .....*...*#..I..
00A900:  1A 64 42 41 53 45 20 49 49 20 43 4F 50 59 52 49    .dBASE II COPYRI
00A910:  47 48 54 20 28 43 29 20 31 39 38 32 20 42 59 20    GHT (C) 1982 BY 
00A920:  52 41 54 4C 49 46 46 20 53 4F 46 54 57 41 52 45    RATLIFF SOFTWARE
00A930:  20 50 52 4F 44 55 43 54 49 4F 4E 2C 20 49 4E 43     PRODUCTION, INC
00A940:  4F 52 50 4F 52 41 54 45 44 20 28 52 53 50 2C 20    ORPORATED (RSP, 
00A950:  49 4E 43 2E 29 20 32 37 30 35 20 52 49 44 47 45    INC.) 2705 RIDGE
00A960:  50 49 4E 45 20 44 52 2C 20 4C 41 20 43 52 45 53    PINE DR, LA CRES
00A970:  43 45 4E 54 41 2C 20 43 41 20 39 31 32 31 34 E9    CENTA, CA 91214.
00A980:  0D 0A 2A 2A 2A 20 20 64 42 41 53 45 20 49 49 20    ..***  dBASE II 
00A990:  4C 43 45 20 56 65 72 20 32 2E 00 C5 00 00 00 00    LCE Ver 2.......
00A9A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00A9B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00A9C0:  0D 0A 2A 2A 2A 20 43 45 20 46 49 43 48 49 45 52    ..*** CE FICHIER
00A9D0:  20 45 53 54 20 44 45 4A 41 20 4F 55 56 45 52 54     EST DEJA OUVERT
00A9E0:  20 41 43 43 45 53 20 49 4D 50 4F 53 53 49 42 4C     ACCES IMPOSSIBL
00A9F0:  45 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00    E ***...........
00AA00:  00 00 01 00 02 00 08 0A 32 00 24 28 64 61 74 65    ........2.$(date
00AA10:  3A 63 72 65 2C 37 2C 32 29 2B 24 28 64 61 74 65    :cre,7,2)+$(date
00AA20:  3A 63 72 65 2C 34 2C 32 29 2B 24 28 64 61 74 65    :cre,4,2)+$(date
00AA30:  3A 63 72 65 2C 31 2C 32 29 00 74 20 74 68 65 20    :cre,1,2).t the 
00AA40:  68 69 72 65 20 64 61 74 65 20 66 6F 72 20 76 61    hire date for va
00AA50:  6C 69 64 69 74 79 0D 0A 20 20 20 20 20 20 53 54    lidity..      ST
00AA60:  4F 52 45 20 68 69 72 65 64 61 74 65 20 54 24 00    ORE hiredate T$.
00AA70:  00 01 00 31 33 36 32 30 36 31 00 00 02 00 31 33    ...1362061....13
00AA80:  36 32 30 36 32 00 00 03 00 31 33 36 32 30 36 33    62062....1362063
00AA90:  00 00 04 00 31 33 36 32 30 36 34 00 00 05 00 31    ....1362064....1
00AAA0:  33 36 32 30 36 35 00 00 06 00 31 33 36 32 30 36    362065....136206
00AAB0:  36 00 00 07 00 31 33 36 32 30 36 37 00 00 08 00    6....1362067....
00AAC0:  31 33 36 32 30 36 38 00 00 09 00 31 33 36 32 30    1362068....13620
00AAD0:  36 39 00 00 0A 00 31 33 36 32 30 37 30 00 00 0B    69....1362070...
00AAE0:  00 31 33 36 32 30 37 31 00 00 0C 00 31 33 36 32    .1362071....1362
00AAF0:  30 37 32 00 00 10 00 31 33 36 32 30 37 33 00 00    072....1362073..
00AB00:  11 00 31 33 36 32 30 37 34 00 00 12 00 31 33 36    ..1362074....136
00AB10:  32 30 37 35 00 00 13 00 31 33 36 32 30 37 36 00    2075....1362076.
00AB20:  00 14 00 31 33 36 32 30 37 37 00 00 15 00 31 33    ...1362077....13
00AB30:  36 32 30 37 38 00 00 16 00 31 33 36 32 30 37 39    62078....1362079
00AB40:  00 00 17 00 31 33 36 32 30 38 30 00 00 18 00 31    ....1362080....1
00AB50:  33 36 32 30 38 31 00 00 19 00 31 33 36 32 30 38    362081....136208
00AB60:  32 00 00 1A 00 31 33 36 32 30 38 33 00 00 21 00    2....1362083..!.
00AB70:  31 33 36 32 30 38 34 00 00 22 00 31 33 36 32 30    1362084..".13620
00AB80:  38 35 00 00 23 00 31 33 36 32 30 38 36 00 00 0D    85..#.1362086...
00AB90:  00 39 39 39 39 39 39 39 00 00 0E 00 39 39 39 39    .9999999....9999
00ABA0:  39 39 39 00 00 0F 00 39 39 39 39 39 39 39 00 00    999....9999999..
00ABB0:  1B 00 39 39 39 39 39 39 39 00 00 1C 00 39 39 39    ..9999999....999
00ABC0:  39 39 39 39 00 00 1D 00 39 39 39 39 39 39 39 00    9999....9999999.
00ABD0:  00 1E 00 39 39 39 39 39 39 39 00 00 1F 00 39 39    ...9999999....99
00ABE0:  39 39 39 39 39 00 00 20 00 39 39 39 39 39 39 39    99999.. .9999999
00ABF0:  00 00 24 00 39 39 39 39 39 39 39 00 00 20 20 53    ..$.9999999..  S
00AC00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
00AC10:  09 00 00 00 02 09 47 E5 09 00 C1 02 00 00 00 02    ......G.........
00AC20:  09 00 C6 02 00 00 00 02 09 00 C2 02 00 00 00 02    ................
00AC30:  09 00 C7 02 00 00 00 02 09 00 C3 02 00 00 00 02    ................
00AC40:  09 00 C8 02 00 00 00 02 09 00 C4 02 00 00 00 02    ................
00AC50:  09 00 C9 02 00 00 00 02 09 00 C5 02 00 00 00 02    ................
00AC60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AC70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AC80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AC90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ACF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AD00:  0D 0A 2A 2A 2A 20 43 45 20 46 49 43 48 49 45 52    ..*** CE FICHIER
00AD10:  20 4E 27 45 58 49 53 54 45 20 50 41 53 20 2A 2A     N'EXISTE PAS **
00AD20:  2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    *...............
00AD30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AD40:  0D 0A 2A 2A 2A 20 45 52 52 45 55 52 20 49 4E 54    ..*** ERREUR INT
00AD50:  45 52 4E 45 20 20 43 4F 4E 54 41 43 54 45 5A 20    ERNE  CONTACTEZ 
00AD60:  56 4F 54 52 45 20 46 4F 55 52 4E 49 53 53 45 55    VOTRE FOURNISSEU
00AD70:  52 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00    R ***...........
00AD80:  0D 0A 2A 2A 2A 20 46 49 43 48 49 45 52 20 45 4E    ..*** FICHIER EN
00AD90:  20 43 4F 55 52 53 20 44 27 55 54 49 4C 49 53 41     COURS D'UTILISA
00ADA0:  54 49 4F 4E 20 2A 2A 2A 00 00 00 00 00 00 00 00    TION ***........
00ADB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00ADC0:  0D 0A 2A 2A 2A 20 46 49 4E 20 44 45 20 46 49 43    ..*** FIN DE FIC
00ADD0:  48 49 45 52 20 49 4E 41 54 54 45 4E 44 55 45 20    HIER INATTENDUE 
00ADE0:  2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00    ***.............
00ADF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AE00:  0D 0A 2A 2A 2A 20 45 4E 52 45 47 49 53 54 52 45    ..*** ENREGISTRE
00AE10:  4D 45 4E 54 20 4E 4F 4E 20 53 49 54 55 45 20 2A    MENT NON SITUE *
00AE20:  2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00    **..............
00AE30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AE40:  0D 0A 2A 2A 2A 20 54 52 4F 50 20 44 45 20 46 49    ..*** TROP DE FI
00AE50:  43 48 49 45 52 53 20 53 4F 4E 54 20 4F 55 56 45    CHIERS SONT OUVE
00AE60:  52 54 53 20 2A 2A 2A 00 00 00 00 00 00 00 00 00    RTS ***.........
00AE70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AE80:  0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E    ..*** DEPASSEMEN
00AE90:  54 20 44 45 20 4C 41 20 43 41 50 41 43 49 54 45    T DE LA CAPACITE
00AEA0:  20 44 55 20 44 49 53 51 55 45 20 2A 2A 2A 00 00     DU DISQUE ***..
00AEB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AEC0:  0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E    ..*** DEPASSEMEN
00AED0:  54 20 44 55 20 4E 4F 4D 42 52 45 20 4D 41 58 49    T DU NOMBRE MAXI
00AEE0:  4D 55 4D 20 44 45 20 46 49 43 48 49 45 52 53 20    MUM DE FICHIERS 
00AEF0:  53 55 52 20 44 49 53 51 55 45 20 2A 2A 2A 00 00    SUR DISQUE ***..
00AF00:  0D 0A 4F 52 49 47 49 4E 45 20 44 45 20 4C 27 45    ..ORIGINE DE L'E
00AF10:  52 52 45 55 52 20 3A 20 00 00 00 00 00 00 00 00    RREUR : ........
00AF20:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AF30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AF40:  0D 0A 2A 2A 2A 20 44 45 53 49 52 45 5A 2D 56 4F    ..*** DESIREZ-VO
00AF50:  55 53 20 43 4F 52 52 49 47 45 52 20 45 54 20 52    US CORRIGER ET R
00AF60:  45 43 4F 4D 4D 45 4E 43 45 52 20 28 59 2F 4E 29    ECOMMENCER (Y/N)
00AF70:  20 3F 20 00 00 00 00 00 00 00 00 00 00 00 00 00     ? .............
00AF80:  0D 0A 2A 2A 2A 20 4C 45 20 46 49 43 48 49 45 52    ..*** LE FICHIER
00AF90:  20 41 20 45 54 45 20 45 46 46 41 43 45 20 20 2A     A ETE EFFACE  *
00AFA0:  2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00    **..............
00AFB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00AFC0:  0D 0A 2A 2A 2A 20 4E 55 4D 45 52 4F 20 44 27 45    ..*** NUMERO D'E
00AFD0:  4E 52 45 47 49 53 54 52 45 4D 45 4E 54 20 49 4E    NREGISTREMENT IN
00AFE0:  43 4F 52 52 45 43 54 20 2A 2A 2A 00 00 00 00 00    CORRECT ***.....
00AFF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B000:  0D 0A 2A 2A 2A 20 45 52 52 45 55 52 20 44 45 20    ..*** ERREUR DE 
00B010:  53 59 4E 54 41 58 45 20 20 56 45 55 49 4C 4C 45    SYNTAXE  VEUILLE
00B020:  5A 20 20 43 4F 52 52 49 47 45 52 20 2A 2A 2A 00    Z  CORRIGER ***.
00B030:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B040:  0D 0A 2A 2A 2A 20 46 49 43 48 49 45 52 20 56 49    ..*** FICHIER VI
00B050:  44 45 20 3A 20 49 4E 53 45 52 54 49 4F 4E 20 49    DE : INSERTION I
00B060:  4D 50 4F 53 53 49 42 4C 45 20 2A 2A 2A 00 00 00    MPOSSIBLE ***...
00B070:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B080:  0D 0A 2A 2A 2A 20 46 49 4E 20 44 45 20 46 49 43    ..*** FIN DE FIC
00B090:  48 49 45 52 20 2A 2A 2A 00 00 00 00 00 00 00 00    HIER ***........
00B0A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B0B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B0C0:  0D 0A 2A 2A 2A 20 46 49 4E 20 44 45 20 4C 4F 43    ..*** FIN DE LOC
00B0D0:  41 4C 49 53 41 54 49 4F 4E 20 2A 2A 2A 00 00 00    ALISATION ***...
00B0E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B0F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B100:  0D 0A 2A 2A 2A 20 43 45 20 46 49 43 48 49 45 52    ..*** CE FICHIER
00B110:  20 45 58 49 53 54 45 20 44 45 4A 41 20 2A 2A 2A     EXISTE DEJA ***
00B120:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B130:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B140:  0D 0A 2A 2A 2A 20 45 4E 52 45 47 49 53 54 52 45    ..*** ENREGISTRE
00B150:  4D 45 4E 54 20 4E 4F 4E 20 54 52 4F 55 56 45 20    MENT NON TROUVE 
00B160:  2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00    ***.............
00B170:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B180:  0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E    ..*** DEPASSEMEN
00B190:  54 20 44 55 20 4E 4F 4D 42 52 45 20 4D 41 58 49    T DU NOMBRE MAXI
00B1A0:  4D 55 4D 20 44 45 20 56 41 52 49 41 42 4C 45 53    MUM DE VARIABLES
00B1B0:  20 4D 45 4D 4F 49 52 45 20 2A 2A 2A 00 00 00 00     MEMOIRE ***....
00B1C0:  0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E    ..*** DEPASSEMEN
00B1D0:  54 20 44 45 20 4C 41 20 50 4C 41 43 45 20 41 4C    T DE LA PLACE AL
00B1E0:  4C 4F 55 45 45 20 41 55 58 20 56 41 52 49 41 42    LOUEE AUX VARIAB
00B1F0:  4C 45 53 20 4D 45 4D 4F 49 52 45 20 2A 2A 2A 00    LES MEMOIRE ***.
00B200:  0D 0A 2A 2A 2A 20 4E 4F 4D 20 44 45 20 56 41 52    ..*** NOM DE VAR
00B210:  49 41 42 4C 45 20 49 4E 43 4F 52 52 45 43 54 45    IABLE INCORRECTE
00B220:  20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00     ***............
00B230:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B240:  0D 0A 2A 2A 2A 20 54 52 4F 50 20 44 45 20 43 41    ..*** TROP DE CA
00B250:  52 41 43 54 45 52 45 53 20 2A 2A 2A 00 00 00 00    RACTERES ***....
00B260:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B270:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B280:  0D 0A 2A 2A 2A 20 41 55 43 55 4E 45 20 42 41 53    ..*** AUCUNE BAS
00B290:  45 20 4E 27 45 53 54 20 55 54 49 4C 49 53 45 45    E N'EST UTILISEE
00B2A0:  2C 20 44 4F 4E 4E 45 5A 20 53 4F 4E 20 4E 4F 4D    , DONNEZ SON NOM
00B2B0:  20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00 00     : .............
00B2C0:  0D 0A 2A 2A 2A 20 43 45 20 4E 27 45 53 54 20 50    ..*** CE N'EST P
00B2D0:  41 53 20 55 4E 45 20 42 41 53 45 20 44 45 20 44    AS UNE BASE DE D
00B2E0:  4F 4E 4E 45 45 20 44 45 20 44 42 41 53 45 49 49    ONNEE DE DBASEII
00B2F0:  20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00     ***............
00B300:  0D 0A 2A 2A 2A 20 4C 41 20 4D 41 43 52 4F 2D 49    ..*** LA MACRO-I
00B310:  4E 53 54 52 55 43 54 49 4F 4E 20 4E 27 45 58 49    NSTRUCTION N'EXI
00B320:  53 54 45 20 50 41 53 20 2A 2A 2A 00 00 00 00 00    STE PAS ***.....
00B330:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B340:  0D 0A 43 4F 4D 50 41 43 54 41 47 45 20 54 45 52    ..COMPACTAGE TER
00B350:  4D 49 4E 45 20 3A 20 00 00 00 00 00 00 00 00 00    MINE : .........
00B360:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B370:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B380:  20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 28     ENREGISTREMENT(
00B390:  53 29 20 20 54 52 41 4E 53 46 45 52 45 28 53 29    S)  TRANSFERE(S)
00B3A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B3B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20    ............... 
00B3C0:  20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 28     ENREGISTREMENT(
00B3D0:  53 29 20 52 45 53 54 49 54 55 45 28 53 29 00 00    S) RESTITUE(S)..
00B3E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B3F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20    ............... 
00B400:  0D 0A 43 4F 4C 4F 4E 4E 45 20 4C 4F 4E 47 55 45    ..COLONNE LONGUE
00B410:  55 52 2C 43 4F 4E 54 45 4E 55 00 00 00 00 00 00    UR,CONTENU......
00B420:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B430:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B440:  0D 0A 44 45 53 49 52 45 5A 2D 56 4F 55 53 20 55    ..DESIREZ-VOUS U
00B450:  4E 20 44 4F 55 42 4C 45 20 49 4E 54 45 52 4C 49    N DOUBLE INTERLI
00B460:  47 4E 45 20 28 59 2F 4E 29 20 3F 20 00 00 00 00    GNE (Y/N) ? ....
00B470:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B480:  20 52 45 4D 50 4C 41 43 45 4D 45 4E 54 28 53 29     REMPLACEMENT(S)
00B490:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B4A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B4B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20    ............... 
00B4C0:  0D 0A 44 4F 4E 4E 45 5A 20 4C 45 20 4E 4F 4D 20    ..DONNEZ LE NOM 
00B4D0:  44 55 20 46 49 43 48 49 45 52 20 44 45 20 47 45    DU FICHIER DE GE
00B4E0:  4E 45 52 41 54 49 4F 4E 20 44 27 45 54 41 54 20    NERATION D'ETAT 
00B4F0:  3A 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00    : ..............
00B500:  0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E    ..*** DEPASSEMEN
00B510:  54 20 44 55 20 4E 4F 4D 42 52 45 20 4D 41 58 49    T DU NOMBRE MAXI
00B520:  4D 55 4D 20 44 27 55 54 49 4C 49 53 41 54 45 55    MUM D'UTILISATEU
00B530:  52 53 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00    RS ***..........
00B540:  0D 0A 2A 2A 2A 20 45 52 52 45 55 52 20 53 59 53    ..*** ERREUR SYS
00B550:  54 45 4D 45 20 44 27 45 4E 54 52 45 45 2F 53 4F    TEME D'ENTREE/SO
00B560:  52 54 49 45 20 2A 2A 2A 00 00 00 00 00 00 00 00    RTIE ***........
00B570:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B580:  20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 28     ENREGISTREMENT(
00B590:  53 29 20 20 41 4A 4F 55 54 45 28 53 29 00 00 00    S)  AJOUTE(S)...
00B5A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B5B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20    ............... 
00B5C0:  0D 0A 2A 2A 2A 20 41 42 41 4E 44 4F 4E 20 44 55    ..*** ABANDON DU
00B5D0:  20 54 52 41 49 54 45 4D 45 4E 54 20 45 4E 20 43     TRAITEMENT EN C
00B5E0:  4F 55 52 53 20 2A 2A 2A 00 00 00 00 00 00 00 00    OURS ***........
00B5F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B600:  0D 0A 2A 2A 2A 20 44 45 46 49 4E 49 54 49 4F 4E    ..*** DEFINITION
00B610:  20 49 4E 43 4F 52 52 45 43 54 45 20 44 55 20 4E     INCORRECTE DU N
00B620:  4F 4D 20 44 55 20 43 48 41 4D 50 20 2A 2A 2A 00    OM DU CHAMP ***.
00B630:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B640:  0D 0A 2A 2A 2A 20 44 45 46 49 4E 49 54 49 4F 4E    ..*** DEFINITION
00B650:  20 49 4E 43 4F 52 52 45 43 54 45 20 44 55 20 54     INCORRECTE DU T
00B660:  59 50 45 20 44 45 20 43 48 41 4D 50 20 2A 2A 2A    YPE DE CHAMP ***
00B670:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B680:  0D 0A 2A 2A 2A 20 44 45 46 49 4E 49 54 49 4F 4E    ..*** DEFINITION
00B690:  20 49 4E 43 4F 52 52 45 43 54 45 20 44 55 20 4E     INCORRECTE DU N
00B6A0:  4F 4D 42 52 45 20 44 45 20 44 45 43 49 4D 41 4C    OMBRE DE DECIMAL
00B6B0:  45 28 53 29 20 2A 2A 2A 00 00 00 00 00 00 00 00    E(S) ***........
00B6C0:  0D 0A 2A 2A 2A 20 44 45 46 49 4E 49 54 49 4F 4E    ..*** DEFINITION
00B6D0:  20 49 4E 43 4F 52 52 45 43 54 45 20 44 45 20 4C     INCORRECTE DE L
00B6E0:  41 20 44 49 4D 45 4E 53 49 4F 4E 20 44 55 20 43    A DIMENSION DU C
00B6F0:  48 41 4D 50 20 2A 2A 2A 00 00 00 00 00 00 00 00    HAMP ***........
00B700:  0D 0A 44 4F 4E 4E 45 5A 20 4C 45 20 54 49 54 52    ..DONNEZ LE TITR
00B710:  45 20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00    E : ............
00B720:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B730:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B740:  0D 0A 2A 2A 2A 20 41 55 43 55 4E 20 45 4E 52 45    ..*** AUCUN ENRE
00B750:  47 49 53 54 52 45 4D 45 4E 54 20 4E 45 20 43 4F    GISTREMENT NE CO
00B760:  52 52 45 53 50 4F 4E 44 20 41 20 56 4F 54 52 45    RRESPOND A VOTRE
00B770:  20 53 45 4C 45 43 54 49 4F 4E 20 2A 2A 2A 00 00     SELECTION ***..
00B780:  0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43    ..*** PHRASE INC
00B790:  4F 4D 50 4C 45 54 45 20 3A 20 22 57 49 54 48 22    OMPLETE : "WITH"
00B7A0:  20 4D 41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00 00     MANQUANT ***...
00B7B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B7C0:  0D 0A 44 4F 4E 4E 45 5A 20 4C 45 20 43 48 41 4D    ..DONNEZ LE CHAM
00B7D0:  50 20 44 45 20 53 4F 55 53 2D 54 4F 54 41 4C 20    P DE SOUS-TOTAL 
00B7E0:  3A 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00    : ..............
00B7F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B800:  0D 0A 44 45 53 49 52 45 5A 2D 56 4F 55 53 20 44    ..DESIREZ-VOUS D
00B810:  45 53 20 53 4F 55 53 2D 54 4F 54 41 55 58 20 44    ES SOUS-TOTAUX D
00B820:  41 4E 53 20 56 4F 54 52 45 20 52 41 50 50 4F 52    ANS VOTRE RAPPOR
00B830:  54 20 28 59 2F 4E 29 20 3F 20 00 00 00 00 00 00    T (Y/N) ? ......
00B840:  0D 0A 44 45 53 49 52 45 5A 2D 56 4F 55 53 20 55    ..DESIREZ-VOUS U
00B850:  4E 20 45 4E 54 45 54 45 20 28 59 2F 4E 29 20 3F    N ENTETE (Y/N) ?
00B860:  20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00     ...............
00B870:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B880:  0D 0A 44 4F 4E 4E 45 5A 20 4C 27 45 4E 54 45 54    ..DONNEZ L'ENTET
00B890:  45 20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00    E : ............
00B8A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B8B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B8C0:  0D 0A 2A 2A 2A 20 54 52 49 20 54 45 52 4D 49 4E    ..*** TRI TERMIN
00B8D0:  45 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00    E ***...........
00B8E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B8F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B900:  0D 0A 2A 2A 2A 20 56 4F 55 4C 45 5A 2D 56 4F 55    ..*** VOULEZ-VOU
00B910:  53 20 45 46 46 41 43 45 52 20 4C 45 20 46 49 43    S EFFACER LE FIC
00B920:  48 49 45 52 20 45 58 49 53 54 41 4E 54 20 28 59    HIER EXISTANT (Y
00B930:  2F 4E 29 20 3F 20 00 00 00 00 00 00 00 00 00 00    /N) ? ..........
00B940:  0D 0A 2A 2A 2A 20 43 45 54 54 45 20 43 4F 4D 4D    ..*** CETTE COMM
00B950:  41 4E 44 45 20 4E 45 20 50 45 55 54 20 45 54 52    ANDE NE PEUT ETR
00B960:  45 20 55 54 49 4C 49 53 45 45 20 2A 2A 2A 00 00    E UTILISEE ***..
00B970:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B980:  0D 0A 2A 2A 20 43 4F 4D 50 54 45 55 52 20 3D 20    ..** COMPTEUR = 
00B990:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B9A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B9B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00B9C0:  0D 0A 44 4F 4E 4E 45 5A 20 4C 41 20 53 54 52 55    ..DONNEZ LA STRU
00B9D0:  43 54 55 52 45 20 44 45 20 4C 27 45 4E 52 45 47    CTURE DE L'ENREG
00B9E0:  49 53 54 52 45 4D 45 4E 54 20 53 45 4C 4F 4E 20    ISTREMENT SELON 
00B9F0:  4C 45 20 46 4F 52 4D 41 54 20 3A 20 00 00 00 00    LE FORMAT : ....
00BA00:  0D 0A 43 48 41 4D 50 20 20 20 20 4E 4F 4D 2C 54    ..CHAMP    NOM,T
00BA10:  59 50 45 2C 44 49 4D 45 4E 53 49 4F 4E 2C 44 45    YPE,DIMENSION,DE
00BA20:  43 49 4D 41 4C 45 28 53 29 00 00 00 00 00 00 00    CIMALE(S).......
00BA30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BA40:  0D 0A 2A 2A 2A 20 56 4F 55 4C 45 5A 2D 43 4F 4D    ..*** VOULEZ-COM
00BA50:  4D 45 4E 43 45 52 20 4C 41 20 53 41 49 53 49 45    MENCER LA SAISIE
00BA60:  20 28 59 2F 4E 29 20 3F 20 00 00 00 00 00 00 00     (Y/N) ? .......
00BA70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BA80:  0D 0A 2A 2A 2A 20 4C 41 20 4D 41 43 52 4F 2D 49    ..*** LA MACRO-I
00BA90:  4E 53 54 52 55 43 54 49 4F 4E 20 4E 27 45 53 54    NSTRUCTION N'EST
00BAA0:  20 50 41 53 20 55 4E 45 20 43 48 41 49 4E 45 20     PAS UNE CHAINE 
00BAB0:  44 45 20 43 41 52 41 43 54 45 52 45 53 20 2A 00    DE CARACTERES *.
00BAC0:  20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 28     ENREGISTREMENT(
00BAD0:  53 29 20 54 52 41 4E 53 46 45 52 45 28 53 29 00    S) TRANSFERE(S).
00BAE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BAF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20    ............... 
00BB00:  0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43    ..*** PHRASE INC
00BB10:  4F 4D 50 4C 45 54 45 20 3A 20 22 54 4F 22 20 4D    OMPLETE : "TO" M
00BB20:  41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00 00 00 00    ANQUANT ***.....
00BB30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BB40:  0D 0A 2A 2A 20 53 4F 55 53 2D 54 4F 54 41 4C 20    ..** SOUS-TOTAL 
00BB50:  2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00    **..............
00BB60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BB70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BB80:  0D 0A 2A 2A 2A 20 49 4E 45 58 49 53 54 41 4E 43    ..*** INEXISTANC
00BB90:  45 20 44 45 20 4C 27 45 58 50 52 45 53 53 49 4F    E DE L'EXPRESSIO
00BBA0:  4E 20 41 20 54 4F 54 41 4C 49 53 45 52 20 3A 20    N A TOTALISER : 
00BBB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BBC0:  0D 0A 2A 2A 2A 20 45 58 50 52 45 53 53 49 4F 4E    ..*** EXPRESSION
00BBD0:  20 4E 4F 4E 20 4E 55 4D 45 52 49 51 55 45 20 2A     NON NUMERIQUE *
00BBE0:  2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00    **..............
00BBF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BC00:  0D 0A 2A 2A 2A 20 45 52 52 45 55 52 20 3A 20 54    ..*** ERREUR : T
00BC10:  4F 54 41 4C 49 53 41 54 49 4F 4E 20 44 45 20 50    OTALISATION DE P
00BC20:  4C 55 53 20 44 45 20 35 20 43 48 41 4D 50 53 20    LUS DE 5 CHAMPS 
00BC30:  20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00     ***............
00BC40:  0D 0A 2A 2A 2A 20 45 52 52 45 55 52 20 44 45 20    ..*** ERREUR DE 
00BC50:  53 59 4E 54 41 58 45 20 2A 2A 2A 00 00 00 00 00    SYNTAXE ***.....
00BC60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BC70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BC80:  0D 0A 44 45 53 49 52 45 5A 2D 56 4F 55 53 20 44    ..DESIREZ-VOUS D
00BC90:  45 53 20 54 4F 54 41 55 58 20 28 59 2F 4E 29 20    ES TOTAUX (Y/N) 
00BCA0:  3F 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ? ..............
00BCB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BCC0:  0D 0A 2A 2A 2A 20 45 4E 52 45 47 49 53 54 52 45    ..*** ENREGISTRE
00BCD0:  4D 45 4E 54 20 45 4E 20 43 4F 55 52 53 20 44 27    MENT EN COURS D'
00BCE0:  55 54 49 4C 49 53 41 54 49 4F 4E 2E 20 56 45 55    UTILISATION. VEU
00BCF0:  49 4C 4C 45 5A 20 50 41 54 49 45 4E 54 45 52 00    ILLEZ PATIENTER.
00BD00:  0D 0A 2A 2A 2A 20 4E 4F 4D 20 44 45 20 46 49 43    ..*** NOM DE FIC
00BD10:  48 49 45 52 20 49 4E 43 4F 52 52 45 43 54 20 2A    HIER INCORRECT *
00BD20:  2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00    **..............
00BD30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BD40:  0D 0A 2A 2A 2A 20 43 45 20 46 49 43 48 49 45 52    ..*** CE FICHIER
00BD50:  20 44 45 20 43 4F 4D 4D 41 4E 44 45 20 4E 27 45     DE COMMANDE N'E
00BD60:  53 54 20 50 41 53 20 53 55 52 20 4C 27 55 4E 49    ST PAS SUR L'UNI
00BD70:  54 45 20 41 43 54 49 56 45 20 2A 2A 2A 00 00 00    TE ACTIVE ***...
00BD80:  0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E    ..*** DEPASSEMEN
00BD90:  54 20 44 55 20 4E 4F 4D 42 52 45 20 4D 41 58 49    T DU NOMBRE MAXI
00BDA0:  4D 55 4D 20 44 27 49 4D 42 52 49 43 41 54 49 4F    MUM D'IMBRICATIO
00BDB0:  4E 53 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00    NS ***..........
00BDC0:  20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 28     ENREGISTREMENT(
00BDD0:  53 29 20 45 46 46 41 43 45 28 53 29 00 00 00 00    S) EFFACE(S)....
00BDE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BDF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20    ............... 
00BE00:  0D 0A 2A 2A 2A 20 46 49 4E 20 44 55 20 54 52 41    ..*** FIN DU TRA
00BE10:  49 54 45 4D 45 4E 54 20 64 42 41 53 45 20 49 49    ITEMENT dBASE II
00BE20:  20 76 65 72 73 69 6F 6E 20 4C 2E 43 2E 45 20 2A     version L.C.E *
00BE30:  2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00    **..............
00BE40:  0D 0A 2A 2A 2A 20 54 52 4F 50 20 44 45 20 43 4F    ..*** TROP DE CO
00BE50:  4D 4D 41 4E 44 45 53 20 27 52 45 54 55 52 4E 27    MMANDES 'RETURN'
00BE60:  20 52 45 4E 43 4F 4E 54 52 45 45 53 20 2A 2A 2A     RENCONTREES ***
00BE70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BE80:  0D 0A 2A 2A 45 4E 54 52 45 5A 20 4E 55 4D 2E 20    ..**ENTREZ NUM. 
00BE90:  45 4E 52 45 2E 20 20 43 48 41 4D 50 28 4E 55 4D    ENRE.  CHAMP(NUM
00BEA0:  2E 20 4F 55 20 4E 4F 4D 29 20 20 4E 4F 55 56 45    . OU NOM)  NOUVE
00BEB0:  4C 4C 45 20 56 41 4C 45 55 52 20 2A 2A 00 00 00    LLE VALEUR **...
00BEC0:  0D 0A 2A 2A 2A 20 54 59 50 45 20 44 45 20 44 4F    ..*** TYPE DE DO
00BED0:  4E 4E 45 45 53 20 49 4E 43 4F 52 52 45 43 54 45    NNEES INCORRECTE
00BEE0:  20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00     ***............
00BEF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BF00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
00BF10:  0A 00 00 00 02 09 48 E5 0A 00 C1 02 00 00 00 02    ......H.........
00BF20:  0A 00 C6 02 00 00 00 02 0A 00 C2 02 00 00 00 02    ................
00BF30:  0A 00 C7 02 00 00 00 02 0A 00 C3 02 00 00 00 02    ................
00BF40:  0A 00 C8 02 00 00 00 02 0A 00 C4 02 00 00 00 02    ................
00BF50:  0A 00 C9 02 00 00 00 02 0A 00 C5 02 00 00 00 02    ................
00BF60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BF70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BF80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BF90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00BFF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C000:  0D 0A 44 45 53 49 52 45 5A 2D 56 4F 55 53 20 55    ..DESIREZ-VOUS U
00C010:  4E 49 51 55 45 4D 45 4E 54 20 55 4E 20 52 45 53    NIQUEMENT UN RES
00C020:  55 4D 45 20 44 55 20 52 41 50 50 4F 52 54 20 28    UME DU RAPPORT (
00C030:  59 2F 4E 29 20 3F 20 00 00 00 00 00 00 00 00 00    Y/N) ? .........
00C040:  0D 0A 2A 2A 2A 20 46 49 43 48 49 45 52 20 49 4E    ..*** FICHIER IN
00C050:  44 45 58 20 4E 4F 4E 20 54 52 4F 55 56 45 20 2A    DEX NON TROUVE *
00C060:  2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00    **..............
00C070:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C080:  0D 0A 2A 2A 2A 20 4C 41 20 56 41 52 49 41 42 4C    ..*** LA VARIABL
00C090:  45 20 45 53 54 20 49 4E 43 4F 52 52 45 43 54 45    E EST INCORRECTE
00C0A0:  20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00     ***............
00C0B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C0C0:  0D 0A 2A 2A 20 4F 52 49 47 49 4E 45 20 45 54 20    ..** ORIGINE ET 
00C0D0:  44 45 53 54 49 4E 41 54 49 4F 4E 20 44 45 53 20    DESTINATION DES 
00C0E0:  54 59 50 45 53 20 44 45 20 44 4F 4E 4E 45 45 53    TYPES DE DONNEES
00C0F0:  20 44 49 46 46 45 52 45 4E 54 45 53 20 2A 2A 00     DIFFERENTES **.
00C100:  0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43    ..*** PHRASE INC
00C110:  4F 4D 50 4C 45 54 45 20 3A 20 22 4F 4E 22 20 4D    OMPLETE : "ON" M
00C120:  41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00 00 00 00    ANQUANT ***.....
00C130:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C140:  0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E    ..*** DEPASSEMEN
00C150:  54 20 43 41 50 41 43 49 54 45 20 44 27 55 4E 20    T CAPACITE D'UN 
00C160:  43 48 41 4D 50 20 4E 55 4D 45 52 49 51 55 45 00    CHAMP NUMERIQUE.
00C170:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C180:  0D 0A 2A 2A 20 45 52 52 45 55 52 20 44 45 20 53    ..** ERREUR DE S
00C190:  59 4E 54 41 58 45 20 44 41 4E 53 20 4C 41 20 53    YNTAXE DANS LA S
00C1A0:  50 45 43 49 46 49 43 41 54 49 4F 4E 20 44 55 20    PECIFICATION DU 
00C1B0:  46 4F 52 4D 41 54 20 2A 2A 00 00 00 00 00 00 00    FORMAT **.......
00C1C0:  0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43    ..*** PHRASE INC
00C1D0:  4F 4D 50 4C 45 54 45 20 3A 20 22 46 49 45 4C 44    OMPLETE : "FIELD
00C1E0:  22 20 4D 41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00    " MANQUANT ***..
00C1F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C200:  20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54 53     ENREGISTREMENTS
00C210:  20 49 4E 44 45 58 45 53 00 00 00 00 00 00 00 00     INDEXES........
00C220:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C230:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20    ............... 
00C240:  0D 0A 2A 2A 2A 20 4C 41 20 44 49 4D 45 4E 53 49    ..*** LA DIMENSI
00C250:  4F 4E 20 44 45 20 4C 27 45 4E 52 45 47 49 53 54    ON DE L'ENREGIST
00C260:  52 45 4D 45 4E 54 20 44 45 50 41 53 53 45 20 31    REMENT DEPASSE 1
00C270:  30 30 30 20 43 41 52 41 43 54 45 52 45 53 00 00    000 CARACTERES..
00C280:  0D 0A 2A 2A 2A 20 44 49 56 49 53 49 4F 4E 20 50    ..*** DIVISION P
00C290:  41 52 20 5A 45 52 4F 20 49 4D 50 4F 53 53 49 42    AR ZERO IMPOSSIB
00C2A0:  4C 45 20 2A 2A 2A 00 00 00 00 00 00 00 00 00 00    LE ***..........
00C2B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C2C0:  0D 0A 2A 2A 2A 20 44 45 50 41 53 53 45 4D 45 4E    ..*** DEPASSEMEN
00C2D0:  54 20 43 48 41 49 4E 45 20 44 45 20 43 41 52 41    T CHAINE DE CARA
00C2E0:  43 54 45 52 45 53 20 2A 2A 2A 00 00 00 00 00 00    CTERES ***......
00C2F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C300:  0D 0A 4C 45 53 20 46 49 43 2E 20 4F 56 45 52 4C    ..LES FIC. OVERL
00C310:  41 59 20 28 2E 4F 56 52 29 20 4E 45 20 53 45 20    AY (.OVR) NE SE 
00C320:  54 52 4F 55 56 45 4E 54 20 50 41 53 20 53 55 52    TROUVENT PAS SUR
00C330:  20 4C 27 55 4E 49 54 45 20 41 43 54 49 56 45 00     L'UNITE ACTIVE.
00C340:  0D 0A 44 4F 4E 4E 45 5A 20 4C 45 20 4E 55 4D 45    ..DONNEZ LE NUME
00C350:  52 4F 20 44 45 20 4C 27 45 4E 52 45 47 49 53 54    RO DE L'ENREGIST
00C360:  52 45 4D 45 4E 54 20 3A 20 00 00 00 00 00 00 00    REMENT : .......
00C370:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C380:  0D 0A 2A 2A 2A 20 4C 27 45 4E 52 45 47 49 53 54    ..*** L'ENREGIST
00C390:  52 45 4D 45 4E 54 20 4E 27 45 53 54 20 50 41 53    REMENT N'EST PAS
00C3A0:  20 49 4E 44 45 58 45 20 2A 2A 2A 00 00 00 00 00     INDEXE ***.....
00C3B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C3C0:  0D 0A 2A 2A 2A 20 4C 27 20 49 4E 44 45 58 20 4E    ..*** L' INDEX N
00C3D0:  45 20 43 4F 52 52 45 53 50 4F 4E 44 20 50 41 53    E CORRESPOND PAS
00C3E0:  20 41 20 4C 41 20 42 41 53 45 20 44 45 20 44 4F     A LA BASE DE DO
00C3F0:  4E 4E 45 45 53 20 2A 2A 2A 00 00 00 00 00 00 00    NNEES ***.......
00C400:  0D 0A 2A 2A 2A 20 4C 45 20 46 49 43 48 49 45 52    ..*** LE FICHIER
00C410:  20 4E 45 20 50 45 55 54 20 45 54 52 45 20 4F 55     NE PEUT ETRE OU
00C420:  56 45 52 54 20 2A 2A 2A 00 00 00 00 00 00 00 00    VERT ***........
00C430:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C440:  0D 0A 2A 2A 2A 20 4C 45 20 46 49 43 48 49 45 52    ..*** LE FICHIER
00C450:  20 44 45 20 46 4F 52 4D 41 54 20 4E 45 20 50 45     DE FORMAT NE PE
00C460:  55 54 20 45 54 52 45 20 4F 55 56 45 52 54 20 2A    UT ETRE OUVERT *
00C470:  2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00 00    **..............
00C480:  0D 0A 2A 2A 20 43 4F 4F 52 44 20 3A 20 00 00 00    ..** COORD : ...
00C490:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C4A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C4B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C4C0:  0D 0A 2A 2A 2A 20 44 45 53 49 52 45 5A 2D 56 4F    ..*** DESIREZ-VO
00C4D0:  55 53 20 43 4F 52 52 49 47 45 52 20 45 54 20 52    US CORRIGER ET R
00C4E0:  45 43 4F 4D 4D 45 4E 43 45 52 20 28 59 2F 4E 29    ECOMMENCER (Y/N)
00C4F0:  20 3F 20 00 00 00 00 00 00 00 00 00 00 00 00 00     ? .............
00C500:  0D 0A 52 45 4D 50 4C 41 43 45 52 20 3A 20 00 00    ..REMPLACER : ..
00C510:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C520:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C530:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C540:  0D 0A 50 41 52 20 20 20 20 20 20 20 3A 20 00 00    ..PAR       : ..
00C550:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C560:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C570:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C580:  0D 0A 2A 2A 2A 20 44 45 53 49 52 45 5A 2D 56 4F    ..*** DESIREZ-VO
00C590:  55 53 20 44 27 41 55 54 52 45 53 20 43 4F 52 52    US D'AUTRES CORR
00C5A0:  45 43 54 49 4F 4E 53 20 28 59 2F 4E 2F 29 20 3F    ECTIONS (Y/N/) ?
00C5B0:  20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00     ...............
00C5C0:  0D 0A 2A 2A 2A 20 44 4F 4E 4E 45 5A 20 4C 45 20    ..*** DONNEZ LE 
00C5D0:  4E 4F 4D 20 44 55 20 46 49 43 48 49 45 52 20 3A    NOM DU FICHIER :
00C5E0:  20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00     ...............
00C5F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C600:  31 BC 96 3A 6F 44 B7 C2 0C 5B AF 32 DB 5F 3A 5C    1..:oD...[.2._:\
00C610:  44 B7 CA 88 45 CD 3B 3A CA 22 45 3A 70 44 B7 C2    D...E.;:."E:pD..
00C620:  7E 44 3A 7B 44 B7 CA 68 45 3A 59 44 B7 CA 45 45    ~D:{D..hE:YD..EE
00C630:  CD 68 3B 32 E5 5F 3E FF CD 6C 3B CD 59 3B 32 D3    .h;2._>..l;.Y;2.
00C640:  5F AF CD 55 3B 3E 64 CD 70 3B CD 42 38 F5 3A 59    _..U;>d.p;.B8.:Y
00C650:  44 B7 CA 61 45 3A E5 5F CD 6C 3B 3A D3 5F CD 55    D..aE:._.l;:._.U
00C660:  3B F1 DA 7E 44 CA 88 45 3A 5C 44 CD 40 2F 3A 5C    ;..~D..E:\D.@/:\
00C670:  44 CD CA 39 DA 70 56 CD 63 39 F2 96 45 23 7E B7    D..9.pV.c9..E#~.
00C680:  CA 96 45 2F 77 C3 7D 45 CD 1B 36 3E 2E CD E8 35    ..E/w.}E..6>...5
00C690:  CD 7E 36 CD 99 39 CD 92 39 CD 73 39 CA 00 45 FE    .~6..9..9.s9..E.
00C6A0:  1B CA 00 45 FE 2A CA 00 45 3A 74 44 B7 CA 0D 46    ...E.*..E:tD...F
00C6B0:  CD 63 39 FE 80 CA C1 45 11 41 5E CD B1 37 C2 C8    .c9....E.A^..7..
00C6C0:  45 21 DC 5F 34 C3 00 45 CD 63 39 FE 81 CA D9 45    E!._4..E.c9....E
00C6D0:  11 12 5E CD B1 37 C2 E7 45 3A DC 5F B7 C2 00 45    ..^..7..E:._...E
00C6E0:  AF 32 74 44 C3 00 45 CD 63 39 FE 82 CA F8 45 11    .2tD..E.c9....E.
00C6F0:  BB 5E CD B1 37 C2 00 45 3A DC 5F B7 C2 06 46 AF    .^..7..E:._...F.
00C700:  32 74 44 C3 00 45 3D 32 DC 5F C3 00 45 3A 5C 01    2tD..E=2._..E:\.
00C710:  47 CD 73 39 B7 CA 8A 46 B8 CA 21 46 23 7E C3 14    G.s9...F..!F#~..
00C720:  46 E5 21 7E 99 01 14 00 CD F8 36 21 C6 99 01 00    F.!~......6!....
00C730:  01 CD F8 36 11 7E 99 E1 E5 23 CD F1 2A 7E FE 2E    ...6.~...#..*~..
00C740:  C2 44 46 0C 0C E1 11 7E 99 CD 78 38 21 7F 99 CD    .DF....~..x8!...
00C750:  15 2A C2 84 46 11 0B 00 19 7E E6 7F FE 43 C2 37    .*..F....~...C.7
00C760:  48 23 23 CD DF 36 4E 23 11 C6 99 CD 78 38 11 7E    H##..6N#....x8.~
00C770:  99 01 C6 99 CD 92 39 CD A2 38 DA 41 48 AF 32 55    ......9..8.AH.2U
00C780:  83 C3 0D 46 CD 69 39 C3 0D 46 CD 92 39 CD 73 39    ...F.i9..F..9.s9
00C790:  3A 55 44 B7 CA 3D 47 CD 63 39 FE 89 CA B7 46 11    :UD..=G.c9....F.
00C7A0:  0F 5E CD B1 37 C2 BE 46 CD 8E 39 CD 73 39 11 C1    .^..7..F..9.s9..
00C7B0:  5E CD B1 37 C2 BE 46 21 D0 5F 34 C3 00 45 3A D0    ^..7..F!._4..E:.
00C7C0:  5F B7 C2 25 47 3A 55 44 FE 02 CA 0D 47 CD 63 39    _..%G:UD....G.c9
00C7D0:  FE 85 CA E1 46 11 C1 5E CD B1 37 C2 FC 46 CD 8E    ....F..^..7..F..
00C7E0:  39 CD 69 39 CD 1D 2E DA 14 5B F5 CD 73 39 C2 14    9.i9.....[..s9..
00C7F0:  5B F1 CA 00 45 AF 32 55 44 C3 00 45 CD 63 39 FE    [...E.2UD..E.c9.
00C800:  0D 0A 2A 2A 20 54 4F 54 41 4C 20 2A 2A 00 00 00    ..** TOTAL **...
00C810:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C820:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C830:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C840:  0D 0A 2A 2A 2A 20 45 4E 52 45 47 49 53 54 52 45    ..*** ENREGISTRE
00C850:  4D 45 4E 54 20 3A 20 00 00 00 00 00 00 00 00 00    MENT : .........
00C860:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C870:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C880:  0D 0A 2A 2A 2A 20 45 4E 52 45 47 49 53 54 52 45    ..*** ENREGISTRE
00C890:  4D 45 4E 54 20 4E 4F 4E 20 54 52 4F 55 56 45 20    MENT NON TROUVE 
00C8A0:  2A 2A 2A 00 00 00 00 00 00 00 00 00 00 00 00 00    ***.............
00C8B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C8C0:  20 50 41 47 45 20 4E 2E 20 00 00 00 00 00 00 00     PAGE N. .......
00C8D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C8E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C8F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20    ............... 
00C900:  0D 0A 45 54 41 50 45 20 53 55 49 56 41 4E 54 45    ..ETAPE SUIVANTE
00C910:  20 2D 2D 3E 20 59 3D 4F 55 49 20 3A 20 4E 3D 43     --> Y=OUI : N=C
00C920:  4D 44 45 20 43 4C 41 56 49 45 52 20 3A 20 45 53    MDE CLAVIER : ES
00C930:  43 3D 41 4E 4E 55 4C 41 54 49 4F 4E 20 3F 20 00    C=ANNULATION ? .
00C940:  0D 0A 2D 3E 20 00 00 00 00 00 00 00 00 00 00 00    ..-> ...........
00C950:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C960:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C970:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C980:  0D 0A 43 48 41 4D 50 20 20 20 4E 4F 4D 20 20 20    ..CHAMP   NOM   
00C990:  20 20 20 20 20 20 54 59 50 20 20 20 44 49 4D 20          TYP   DIM 
00C9A0:  20 20 20 44 45 43 49 4D 41 4C 45 28 53 29 00 00       DECIMALE(S)..
00C9B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00C9C0:  0D 0A 53 54 52 55 43 54 55 52 45 20 44 55 20 46    ..STRUCTURE DU F
00C9D0:  49 43 48 49 45 52 20 20 20 20 20 20 20 20 20 20    ICHIER          
00C9E0:  20 20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00      : ............
00C9F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00CA00:  86 CA 1E 47 11 CE 5E CD B1 37 CA 1E 47 CD 63 39    ...G..^..7..G.c9
00CA10:  FE 87 CA 1E 47 11 C6 5E CD B1 37 C2 00 45 AF 32    ....G..^..7..E.2
00CA20:  55 44 C3 00 45 CD 63 39 FE 87 CA 36 47 11 C6 5E    UD..E.c9...6G..^
00CA30:  CD B1 37 C2 00 45 21 D0 5F 35 C3 00 45 CD 63 39    ..7..E!._5..E.c9
00CA40:  B7 FA 7D 47 3A 6E 44 B7 CA 7D 47 3A 59 44 B7 CA    ..}G:nD..}G:YD..
00CA50:  67 47 CD 68 3B 32 E5 5F 3E FF CD 6C 3B CD 59 3B    gG.h;2._>..l;.Y;
00CA60:  32 D3 5F AF CD 55 3B CD 0B 3A 3A 59 44 B7 CA 7D    2._..U;..::YD..}
00CA70:  47 3A E5 5F CD 6C 3B 3A D3 5F CD 55 3B CD 92 39    G:._.l;:._.U;..9
00CA80:  CD 73 39 B7 FA A2 47 11 E9 5B CD 32 2E C2 95 47    .s9...G..[.2...G
00CA90:  CD 8E 39 EB E9 7E CD AB 36 DA 32 48 CD 3C 29 C3    ..9..~..6.2H.<).
00CAA0:  14 51 F5 CD 69 39 F1 E6 7F CD B2 36 92 51 6F 50    .Q..i9.....6.QoP
00CAB0:  00 45 92 4F 82 50 85 4C 85 4C 7B 50 F9 4F 5C 50    .E.O.P.L.L{P.O\P
00CAC0:  90 59 2D 53 12 56 70 56 C3 56 29 49 46 48 E0 48    .Y-S.VpV.V)IFH.H
00CAD0:  4D 4C 5F 4C 7D 4C 8D 4C 98 4C ED 4C F8 4C 03 4D    ML_L}L.L.L.L.L.M
00CAE0:  0B 4D AF 4D DB 52 64 50 93 50 AE 50 11 51 B4 50    .M.M.RdP.P.P.Q.P
00CAF0:  8A 51 AF 51 C9 51 3A 52 45 52 4D 52 59 52 61 52    .Q.Q.Q:RERMRYRaR
00CB00:  82 50 F3 52 FB 52 03 53 A0 53 D1 53 62 54 7F 54    .P.R.R.S.S.SbT.T
00CB10:  8A 54 93 54 BF 54 02 56 63 56 0A 56 BB 56 E7 56    .T.T.T.VcV.V.V.V
00CB20:  89 58 88 59 22 5A 2A 5A 55 5A 5D 5A 60 5A 68 5A    .X.Y"Z*ZUZ]Z`ZhZ
00CB30:  FE 5A 3E 21 C3 06 5B 3E 26 C3 06 5B 3E 0C C3 06    .Z>!..[>&..[>...
00CB40:  5B 3E 38 C3 06 5B CD A1 48 E5 3E 3A CD E8 35 CD    [>8..[..H.>:..5.
00CB50:  99 39 CD 63 39 FE 1B C2 67 48 3A 70 44 B7 C2 7E    .9.c9...gH:pD..~
00CB60:  44 CD 1B 36 C3 4A 48 11 80 97 AF CD 20 37 C2 76    D..6.JH..... 7.v
00CB70:  48 3E 20 12 3E 01 4F 11 7F 97 12 21 7E 97 36 2B    H> .>.O....!~.6+
00CB80:  23 23 79 CD BB 36 36 2F D1 23 CD E4 36 36 35 EB    ##y..66/.#..665.
00CB90:  06 00 CD 88 29 DA 00 45 21 7E 97 CD 20 0B C3 00    ....)..E!~.. ...
00CBA0:  45 CD 1B 36 CD 73 39 CD 9E 36 C2 CC 48 CD 69 39    E..6.s9..6..H.i9
00CBB0:  E5 7E B7 CA 14 5B 23 B8 C2 B1 48 CD 8E 39 D1 CD    .~...[#...H..9..
00CBC0:  D8 36 44 4D 0B EB CD 13 2C CD 73 39 11 9D 5E CD    .6DM....,.s9..^.
00CBD0:  B1 37 C2 27 52 23 CD 8E 39 CD 73 39 CD 9A 2A C9    .7.'R#..9.s9..*.
00CBE0:  CD 3C 29 CD 73 39 11 02 5E CD B1 37 CA F7 48 3E    .<).s9..^..7..H>
00CBF0:  02 21 00 45 C3 C7 3B CD 2A 2C 7C B5 CA 02 49 CD    .!.E..;.*,|...I.
00CC00:  0D 0A 4F 50 54 49 4F 4E 53 20 20 4D 3D 4D 41 52    ..OPTIONS  M=MAR
00CC10:  47 45 20 47 41 55 43 48 45 2C 20 4C 3D 4C 49 47    GE GAUCHE, L=LIG
00CC20:  4E 45 53 2F 50 41 47 45 2C 20 57 3D 4C 41 52 47    NES/PAGE, W=LARG
00CC30:  45 55 52 20 44 45 20 50 41 47 45 20 00 00 00 00    EUR DE PAGE ....
00CC40:  0D 0A 45 4E 54 52 45 5A 20 4C 45 20 54 49 54 52    ..ENTREZ LE TITR
00CC50:  45 20 50 4F 55 52 20 4C 45 53 20 53 4F 55 53 2D    E POUR LES SOUS-
00CC60:  54 4F 54 41 55 58 20 3A 20 00 00 00 00 00 00 00    TOTAUX : .......
00CC70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00CC80:  0D 0A 45 4E 54 52 45 5A 20 4C 45 20 53 4F 55 53    ..ENTREZ LE SOUS
00CC90:  2D 54 49 54 52 45 20 50 4F 55 52 20 4C 45 53 20    -TITRE POUR LES 
00CCA0:  53 4F 55 53 2D 54 4F 54 41 55 58 20 3A 20 00 00    SOUS-TOTAUX : ..
00CCB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00CCC0:  0D 0A 43 48 41 4E 47 45 4D 45 4E 54 20 44 45 20    ..CHANGEMENT DE 
00CCD0:  50 41 47 45 20 41 50 52 45 53 20 4C 45 53 20 53    PAGE APRES LES S
00CCE0:  4F 55 53 2D 54 4F 54 41 55 58 20 28 59 2F 4E 29    OUS-TOTAUX (Y/N)
00CCF0:  20 3F 20 00 00 00 00 00 00 00 00 00 00 00 00 00     ? .............
00CD00:  0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43    ..*** PHRASE INC
00CD10:  4F 4D 50 4C 45 54 45 20 3A 20 22 46 4F 52 22 20    OMPLETE : "FOR" 
00CD20:  4D 41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00 00 00    MANQUANT ***....
00CD30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00CD40:  0D 0A 2A 2A 2A 20 43 4F 4D 4D 41 4E 44 45 20 27    ..*** COMMANDE '
00CD50:  4A 4F 49 4E 27 20 4E 45 20 50 45 55 54 20 47 45    JOIN' NE PEUT GE
00CD60:  4E 45 52 45 52 20 50 4C 55 53 20 44 45 20 36 35    NERER PLUS DE 65
00CD70:  20 35 33 34 20 45 4E 52 45 47 2E 20 2A 2A 2A 00     534 ENREG. ***.
00CD80:  0D 0A 2A 2A 2A 20 50 48 52 41 53 45 20 49 4E 43    ..*** PHRASE INC
00CD90:  4F 4D 50 4C 45 54 45 20 3A 20 22 46 52 4F 4D 22    OMPLETE : "FROM"
00CDA0:  20 4D 41 4E 51 55 41 4E 54 20 2A 2A 2A 00 00 00     MANQUANT ***...
00CDB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00CDC0:  0D 0A 2A 2A 2A 20 4C 45 53 20 43 4C 45 53 20 4E    ..*** LES CLES N
00CDD0:  27 4F 4E 54 20 50 41 53 20 4C 41 20 4D 45 4D 45    'ONT PAS LA MEME
00CDE0:  20 44 49 4D 45 4E 53 49 4F 4E 20 2A 2A 2A 00 00     DIMENSION ***..
00CDF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00CE00:  9D 27 CD 37 2C D2 02 49 CD 07 2E CD D3 2E CD D4    .'.7,..I........
00CE10:  26 CD 43 21 CD 61 1D CD 99 2C CD 2E 2C CD 2A 2C    &.C!.a...,..,.*,
00CE20:  CD 9D 27 CD 37 2C C3 00 45 CD A3 49 3A 7C 44 B7    ..'.7,..E.£I:|D.
00CE30:  CA 91 49 CD 68 3B 32 E5 5F 3E FF CD 6C 3B CD 59    ..I.h;2._>..l;.Y
00CE40:  3B 32 D3 5F AF CD 55 3B 2A EA 5F 44 4D CD 4D 3B    ;2._..U;*._DM.M;
00CE50:  90 2F 3C F2 5C 49 C5 CD 30 3B C1 78 B7 CA 69 49    ./<.\I..0;.x..iI
00CE60:  F5 CD 1B 36 F1 3D C3 5C 49 CD 51 3B 91 2F 3C B7    ...6.=.\I.Q;./<.
00CE70:  CA 7C 49 F5 CD 7E 36 F1 3D C3 6F 49 2A CA 5F CD    .|I..~6.=.oI*._.
00CE80:  2B 36 3A E5 5F CD 6C 3B 3A D3 5F CD 55 3B C3 00    +6:._.l;:._.U;..
00CE90:  45 2A EA 5F 44 4D 2A CA 5F EB 21 CC 5F CD 72 06    E*._DM*._.!._.r.
00CEA0:  C3 00 45 AF 32 D1 5F 32 D4 5F 3A 7C 44 B7 C2 B9    ..E.2._2._:|D...
00CEB0:  49 3A 09 01 B7 C2 B9 49 C9 21 00 00 22 CC 5F 21    I:.....I.!.."._!
00CEC0:  00 00 22 CE 5F 0E 00 CD 73 39 FE 24 C2 DB 49 0E    .."._...s9.$..I.
00CED0:  80 CD 69 39 FE 2C 2E 00 CA E1 49 CD C2 2B DA 14    ..i9.,....I..+..
00CEE0:  5B 7D B1 32 EB 5F CD 92 36 DA 48 4C 0E 00 CD 73    [}.2._..6.HL...s
00CEF0:  39 FE 24 C2 02 4A 0E 80 CD 69 39 FE 20 2E 00 CA    9.$..J...i9. ...
00CF00:  08 4A CD C2 2B DA 14 5B 7D B1 32 EA 5F AF 32 C6    .J..+..[}.2._.2.
00CF10:  9B 32 C7 9B 21 C7 9B 22 CA 5F CD 73 39 11 7E 5E    .2..!.."._.s9.~^
00CF20:  CD B1 37 C2 BB 4A CD 8E 39 3E FF 32 D4 5F CD 73    ..7..J..9>.2._.s
00CF30:  39 11 7E 97 CD F2 14 DA 14 5B EB 11 BA 5F 36 31    9.~......[..._61
00CF40:  23 4E 73 23 46 72 78 B7 CA 5A 4A 32 C6 5F 79 32    #Ns#Frx..ZJ2._y2
00CF50:  C9 5F 3E 4E 32 C5 5F C3 78 4A 32 C9 5F 79 B7 CA    ._>N2._.xJ2._y..
00CF60:  6E 4A 41 32 C6 5F 3E 43 32 C5 5F C3 78 4A 32 C6    nJA2._>C2._.xJ2.
00CF70:  5F 3E 4C 32 C5 5F 06 01 21 C7 9B 78 CD BB 36 36    _>L2._..!..x..66
00CF80:  00 CD 73 39 11 A4 5E CD B1 37 C2 BB 4A CD 8E 39    ..s9..^..7..J..9
00CF90:  CD 73 39 CD 9E 36 C2 14 5B CD 69 39 78 11 BB 9D    .s9..6..[.i9x...
00CFA0:  CD 20 37 CA 14 5B 23 CD 8E 39 21 BB 9D CD BB 36    . 7..[#..9!....6
00CFB0:  36 00 AF 32 BA 9D 3E FF 32 D1 5F CD 73 39 11 38    6..2..>.2._.s9.8
00CFC0:  5E CD B1 37 C2 26 4B CD 8E 39 CD 73 39 CA 48 4C    ^..7.&K..9.s9.HL
00CFD0:  E5 C5 CD F1 2A C1 CA 48 4C E3 CD CC 1C 22 CC 5F    ....*..HL...."._
00CFE0:  CA E8 4A 3E 52 C3 06 5B E1 CD 8E 39 CD 73 39 CA    ..J>R..[...9.s9.
00CFF0:  26 4B 11 61 5E CD B1 37 C2 48 4C CD 8E 39 CD 73    &K.a^..7.HL..9.s
00D000:  0D 0A 42 41 53 45 20 44 45 20 44 4F 4E 4E 45 45    ..BASE DE DONNEE
00D010:  53 20 50 52 49 4D 41 49 52 45 20 45 4E 20 43 4F    S PRIMAIRE EN CO
00D020:  55 52 53 20 44 27 55 54 49 4C 49 53 41 54 49 4F    URS D'UTILISATIO
00D030:  4E 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    N...............
00D040:  0D 0A 42 41 53 45 20 44 45 20 44 4F 4E 4E 45 45    ..BASE DE DONNEE
00D050:  53 20 53 45 43 4F 4E 44 41 49 52 45 20 45 4E 20    S SECONDAIRE EN 
00D060:  43 4F 55 52 53 20 44 27 55 54 49 4C 49 53 41 54    COURS D'UTILISAT
00D070:  49 4F 4E 00 00 00 00 00 00 00 00 00 00 00 00 00    ION.............
00D080:  0D 0A 4E 4F 4D 42 52 45 20 44 27 45 4E 52 45 47    ..NOMBRE D'ENREG
00D090:  49 53 54 52 45 4D 45 4E 54 53 20 20 20 20 20 20    ISTREMENTS      
00D0A0:  20 20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00      : ............
00D0B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D0C0:  0D 0A 2A 20 4C 41 20 42 41 53 45 20 44 45 20 44    ..* LA BASE DE D
00D0D0:  4F 4E 4E 45 45 53 20 4E 27 55 54 49 4C 49 53 45    ONNEES N'UTILISE
00D0E0:  20 50 41 53 20 44 45 20 46 49 43 48 49 45 52 20     PAS DE FICHIER 
00D0F0:  49 4E 44 45 58 20 2A 00 00 00 00 00 00 00 00 00    INDEX *.........
00D100:  0D 0A 2A 20 41 55 20 4D 41 58 49 4D 55 4D 20 37    ..* AU MAXIMUM 7
00D110:  20 46 49 43 48 2E 20 49 4E 44 45 58 20 50 45 55     FICH. INDEX PEU
00D120:  56 45 4E 54 20 45 54 52 45 20 4F 55 56 45 52 54    VENT ETRE OUVERT
00D130:  53 20 53 49 4D 55 4C 54 41 4E 45 4D 45 4E 54 00    S SIMULTANEMENT.
00D140:  0D 0A 4C 41 20 43 4F 4D 4D 41 4E 44 45 20 22 4D    ..LA COMMANDE "M
00D150:  4F 44 49 46 59 22 20 44 45 54 52 55 49 52 41 20    ODIFY" DETRUIRA 
00D160:  54 4F 55 54 45 53 20 56 4F 53 20 44 4F 4E 4E 45    TOUTES VOS DONNE
00D170:  45 53 20 28 59 2F 4E 29 20 3F 20 00 00 00 00 00    ES (Y/N) ? .....
00D180:  0D 0A 2A 20 45 4E 54 52 45 5A 20 4C 41 20 44 41    ..* ENTREZ LA DA
00D190:  54 45 20 53 4F 55 53 20 4C 41 20 46 4F 52 4D 45    TE SOUS LA FORME
00D1A0:  20 53 55 49 56 41 4E 54 45 20 28 53 49 4E 4F 4E     SUIVANTE (SINON
00D1B0:  20 52 45 54 55 52 4E 29 20 20 00 00 00 00 00 00     RETURN)  ......
00D1C0:  0D 0A 44 41 54 45 20 44 45 20 4C 41 20 44 45 52    ..DATE DE LA DER
00D1D0:  4E 49 45 52 45 20 4D 49 53 45 20 41 20 4A 4F 55    NIERE MISE A JOU
00D1E0:  52 20 3A 20 00 00 00 00 00 00 00 00 00 00 00 00    R : ............
00D1F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D200:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
00D210:  0B 00 00 00 02 09 48 E5 0B 00 C1 02 00 00 00 02    ......H.........
00D220:  0B 00 C6 02 00 00 00 02 0B 00 C2 02 00 00 00 02    ................
00D230:  0B 00 C7 02 00 00 00 02 0B 00 C3 02 00 00 00 02    ................
00D240:  0B 00 C8 02 00 00 00 02 0B 00 C4 02 00 00 00 02    ................
00D250:  0B 00 C9 02 00 00 00 02 0B 00 C5 02 00 00 00 02    ................
00D260:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D270:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D280:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D290:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D2F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00D300:  39 CD 9E 36 C2 14 5B CD 69 39 78 11 1F 9E CD 20    9..6..[.i9x.... 
00D310:  37 CA 14 5B CD 8E 39 21 1F 9E 22 CE 5F CD BB 36    7..[..9!.."._..6
00D320:  36 00 AF 32 1E 9E 3A D4 5F B7 C8 21 7E 97 CD 20    6..2..:._..!~.. 
00D330:  0B 3A D1 5F B7 C8 21 BB 9D 3A C5 5F FE 4E C2 09    .:._..!..:._.N..
00D340:  4C 7E B7 CA 4F 4B FE 2E CA 4F 4B 23 C3 41 4B 22    L~..OK...OK#.AK"
00D350:  E6 5F 21 C7 9B 7E B7 CA 63 4B FE 2E CA 63 4B 23    ._!..~..cK...cK#
00D360:  C3 55 4B 22 E8 5F EB 2A E6 5F 1B 2B 7E B7 CA C4    .UK"._.*._.+~...
00D370:  4B FE 24 CA AC 4B FE 2A CA AC 4B FE 23 CA B6 4B    K.$..K.*..K.#..K
00D380:  FE 39 CA B6 4B FE 2C C2 6B 4B 1A B7 CA 99 4B FE    .9..K.,.kK....K.
00D390:  2D CA B6 4B FE 20 C2 6B 4B 2B 7E FE 24 CA A7 4B    -..K. .kK+~.$..K
00D3A0:  FE 2A CA A7 4B 3E 20 23 77 C3 6B 4B 1A B7 CA 6B    .*..K> #w.kK...k
00D3B0:  4B FE 20 CA 6B 4B 1A B7 CA BF 4B 77 C3 6A 4B 36    K. .kK....Kw.jK6
00D3C0:  20 C3 6B 4B 2A E8 5F EB 2A E6 5F 7E B7 CA 41 4C     .kK*._.*._~..AL
00D3D0:  1A B7 CA F0 4B 13 23 1A B7 CA F0 4B 7E B7 CA 41    ....K.#....K~..A
00D3E0:  4C FE 23 CA EB 4B FE 39 C2 D6 4B 1A 77 C3 D5 4B    L.#..K.9..K.w..K
00D3F0:  7E B7 CA 41 4C FE 23 CA 03 4C FE 39 CA 03 4C 23    ~..AL.#..L.9..L#
00D400:  C3 F0 4B 36 30 23 C3 F0 4B 21 BB 9D 11 C7 9B 7E    ..K60#..K!.....~
00D410:  B7 CA 41 4C FE 58 C2 24 4C 1A B7 CA 3B 4C 77 13    ..AL.X.$L...;Lw.
00D420:  23 C3 0F 4C FE 39 CA 2E 4C FE 23 C2 36 4C 1A CD    #..L.9..L.#.6L..
00D430:  AB 36 DA 3B 4C 77 13 23 C3 0F 4C 36 20 23 C3 0F    .6.;Lw.#..L6 #..
00D440:  4C 21 BB 9D 22 CA 5F C9 3E 56 C3 06 5B 3A 09 01    L!.."._.>V..[:..
00D450:  B7 CA 00 45 CD 3C 29 3E 0D 21 00 45 C3 C7 3B CD    ...E.<)>.!.E..;.
00D460:  73 39 CA 72 4C CD 15 2A C2 14 5B 11 0D 00 19 CD    s9.rL..*..[.....
00D470:  DF 36 EB 21 00 45 E5 2A 52 44 E5 EB C9 3E 1B CD    .6.!.E.*RD...>..
00D480:  70 3B C3 7E 44 3E 02 32 55 44 C3 00 45 CD 3C 29    p;.~D>.2UD..E.<)
00D490:  3E 02 21 03 45 C3 C7 3B CD 73 39 C2 D5 4C CD 45    >.!.E..;.s9..L.E
00D4A0:  25 CD 44 27 CD 8C 23 CD 83 2E CD 45 25 CD 44 27    %.D'..#....E%.D'
00D4B0:  CD 8C 23 CD 83 2E 3A 4C 44 CD 40 27 CD D4 26 CD    ..#...:LD.@'..&.
00D4C0:  45 25 CD 20 29 AF 32 41 97 32 4C 44 32 56 44 CD    E%. ).2A.2LD2VD.
00D4D0:  89 2E C3 00 45 11 38 5E CD B1 37 CA E7 4C 11 3C    ....E.8^..7..L.<
00D4E0:  5E CD B1 37 C2 14 5B CD B5 06 C3 00 45 CD 3C 29    ^..7..[.....E.<)
00D4F0:  3E 03 21 00 45 C3 C7 3B CD 3C 29 3E 03 21 18 45    >.!.E..;.<)>.!.E
00D500:  CD 63 39 CA 99 55 CD 73 39 CD F1 2A C2 14 55 3E    .c9..U.s9..*..U>
00D510:  14 C3 06 5B CD 63 39 CD 92 28 C2 F8 55 22 E3 5F    ...[.c9..(..U"._
00D520:  11 B0 5E CD 63 39 79 CD BB 36 CD 8E 39 CD 73 39    ..^.c9y..6..9.s9
00D530:  CD B1 37 C2 FD 55 CD 8E 39 2A DF 5F EB CD F2 14    ..7..U..9*._....
00D540:  DA 14 5B 06 4E D5 EB 23 23 7E B7 C2 58 55 06 43    ..[.N..##~..XU.C
00D550:  2B 7E B7 C2 58 55 06 4C 2A E3 5F 11 0B 00 19 7E    +~..XU.L*._....~
00D560:  B8 D1 CA 6A 55 3E 53 C3 06 5B 2A E3 5F EB 36 31    ...jU>S..[*._.61
00D570:  23 CD E4 36 36 35 22 DF 5F 3E FF 32 DB 5F CD 92    #..665"._>.2._..
00D580:  36 CA 99 55 DA 8A 55 C3 06 55 11 FE 5D CD B1 37    6..U..U..U..]..7
00D590:  C2 E0 54 CD 8E 39 C3 06 55 3A DB 5F B7 CA F8 55    ..T..9..U:._...U
00D5A0:  21 01 00 CD 5B 26 01 00 00 DA E1 55 CD 78 27 CA    !...[&.....U.x'.
00D5B0:  D8 55 DA E1 55 CD DC 1C CA D8 55 21 C7 9B CD 20    .U..U.....U!... 
00D5C0:  0B CD E1 26 CD E7 1C CD D3 2E 3A D2 5F B7 C2 D4    ...&......:._...
00D5D0:  55 CD 83 21 CD E8 26 03 CD 47 2B CA E1 55 D2 AC    U..!..&..G+..U..
00D5E0:  55 3A 7D 44 B7 CA 00 45 60 69 CD 1B 36 CD 35 36    U:}D...E`i..6.56
00D5F0:  3E 3E CD 70 3B C3 00 45 3E 41 C3 06 5B 3E 42 C3    >>.p;..E>A..[>B.
00D600:  06 5B 3E 05 21 00 45 C3 C7 3B 3E 03 21 0F 45 C3    .[>.!.E..;>.!.E.
00D610:  C7 3B CD 73 39 11 FA 5D CD B1 37 C2 35 56 CD 8E    .;.s9..]..7.5V..
00D620:  39 CD 73 39 CA 2F 56 3E 03 21 15 45 C3 C7 3B CD    9.s9./V>.!.E..;.
00D630:  20 29 C3 00 45 CD 73 39 CA 00 45 CD F1 2A C2 46     )..E.s9..E..*.F
00D640:  56 3E 14 C3 37 5B E5 CD 63 39 CD 15 2A C2 53 56    V>..7[..c9..*.SV
00D650:  CD 79 2A E1 CD 8E 39 CD 92 36 CA 00 45 DA 14 5B    .y*...9..6..E..[
00D660:  C3 35 56 CD 73 39 C2 6A 56 AF CD 71 2E C3 00 45    .5V.s9.jV..q...E
00D670:  3A 5C 44 B7 CA 00 45 CD 40 27 CD 45 25 CD 61 27    :\D...E.@'.E%.a'
00D680:  CD 6F 2F 3A 5D 44 B7 CA B3 56 3D FA B3 56 CA A6    .o/:]D...V=..V..
00D690:  56 32 5D 44 3D 21 5E 44 CD BB 36 7E 32 5C 44 AF    V2]D=!^D..6~2\D.
00D6A0:  32 74 44 C3 00 45 AF 32 5C 44 32 5D 44 32 74 44    2tD..E.2\D2]D2tD
00D6B0:  C3 00 45 3E 2D CD 70 3B C3 00 45 3E 03 21 12 45    ..E>-.p;..E>.!.E
00D6C0:  C3 C7 3B CD 73 39 11 69 5E CD B1 37 C2 D6 56 AF    ..;.s9.i^..7..V.
00D6D0:  CD 89 2E C3 00 45 11 82 5E CD B1 37 C2 14 5B 3E    .....E..^..7..[>
00D6E0:  01 CD 89 2E C3 00 45 CD 73 39 11 D8 5E CD 32 2E    ......E.s9..^.2.
00D6F0:  C2 FF 56 D5 CD 8E 39 CD 6E 58 E1 77 C3 00 45 11    ..V...9.nX.w..E.
00D700:  C3 C7 3B 3E 02 21 06 45 C3 C7 3B CD DD 25 CD 73    ..;>.!.E..;..%.s
00D710:  39 11 26 5E CD B1 37 C2 42 4D CD 8E 39 AF CD AD    9.&^..7.BM..9...
00D720:  27 CD 03 27 DA 39 4D CD 61 27 3A 7D 44 B7 CA 00    '..'.9M.a':}D...
00D730:  45 3E 32 CD 70 3B C3 00 45 CD 70 3B CD 61 27 C3    E>2.p;..E.p;.a'.
00D740:  00 45 CD 3C 29 3E 2A 32 D9 5F CD 5C 4D 3A 7D 44    .E.<)>*2._.\M:}D
00D750:  B7 CA 00 45 3E 2B CD 70 3B C3 00 45 CD E9 25 DA    ...E>+.p;..E..%.
00D760:  14 5B CD 73 39 C2 14 5B 21 01 00 CD 5B 26 01 00    .[.s9..[!...[&..
00D770:  00 DA A1 4D 3A D9 5F 57 CD 2A 2C 7C B5 CA A1 4D    ...M:._W.*,|...M
00D780:  CD 78 27 CA 98 4D DA A1 4D CD DC 1C BA CA 98 4D    .x'..M..M......M
00D790:  72 CD E7 1C CD D3 2E 03 CD 47 2B CA A1 4D D2 80    r........G+..M..
00D7A0:  4D 60 69 3A 7D 44 B7 C8 CD 1B 36 CD 35 36 C9 21    M`i:}D....6.56.!
00D7B0:  10 00 22 D5 5F 21 01 00 22 D7 5F 11 93 5E CD 73    .."._!.."._..^.s
00D7C0:  39 CD B1 37 C2 D2 4D CD 3C 29 3E 03 21 1B 45 C3    9..7..M.<)>.!.E.
00D7D0:  C7 3B CD 8E 39 11 4A 5E CD B1 37 CA 74 4F 11 2B    .;..9.J^..7.tO.+
00D7E0:  5E CD B1 37 CA 7C 4F 11 8C 5E CD B1 37 CA 87 4F    ^..7.|O..^..7..O
00D7F0:  CD 3C 29 AF 32 DB 5F 32 D2 5F CD DD 25 21 7E 97    .<).2._2._..%!~.
00D800:  22 DF 5F CD 73 39 CA 81 4E CD E9 25 DA 14 5B CD    "._.s9..N..%..[.
00D810:  73 39 CA 81 4E 11 5A 5E CD B1 37 C2 29 4E 3E FF    s9..N.Z^..7.)N>.
00D820:  32 D2 5F CD 8E 39 C3 03 4E 11 1F 5E CD B1 37 C2    2._..9..N..^..7.
00D830:  35 4E CD 8E 39 2A DF 5F EB CD F2 14 DA 14 5B 3E    5N..9*._......[>
00D840:  FF 32 DB 5F EB 3A 79 44 B7 C2 6B 4E 36 32 23 CD    .2._.:yD..kN62#.
00D850:  F3 36 78 B7 C2 66 4E 79 B7 C2 61 4E 36 03 C3 67    .6x..fNy..aN6..g
00D860:  4E 36 00 C3 6F 4E 70 34 C3 6F 4E 36 2E 23 23 23    N6..oNp4.oN6.###
00D870:  36 00 23 36 35 22 DF 5F CD 92 36 CA 81 4E C3 03    6.#65"._..6..N..
00D880:  4E 3A 79 44 B7 C2 F2 4E 3A DB 5F B7 C2 F2 4E CD    N:yD...N:._...N.
00D890:  E3 1C 22 E6 5F 2A E6 5F 7E FE 0D CA F2 4E EB 2A    .."._*._~....N.*
00D8A0:  DF 5F 36 29 23 CD E4 36 36 32 23 EB 01 0B 00 09    ._6)#..662#.....
00D8B0:  7E 23 4E 23 23 23 46 EB FE 4E CA D6 4E FE 43 CA    ~#N###F..N..N.C.
00D8C0:  CD 4E 36 00 23 36 00 23 36 03 C3 DB 4E 71 23 70    .N6.#6.#6...Nq#p
00D8D0:  23 36 00 C3 DC 4E 70 23 71 23 71 34 23 36 00 23    #6...Np#q#q4#6.#
00D8E0:  36 35 22 DF 5F 2A E6 5F 11 10 00 19 22 E6 5F C3    65"._*._...."._.
00D8F0:  95 4E 2A D7 5F CD 5B 26 DA 00 45 CD 99 2C 7C B5    .N*._.[&..E..,|.
00D900:  5F 5F CD 32 2E C2 14 5B CD 8E 39 EB E9 CD 6E 58    __.2...[..9...nX
00D910:  CD 55 3B C3 00 45 CD 73 39 11 9D 5E CD B1 37 C2    .U;..E.s9..^..7.
00D920:  58 57 CD 8E 39 3A 4C 44 B7 CA 38 57 CD 40 27 CD    XW..9:LD..8W.@'.
00D930:  D4 26 CD 45 25 CD 61 27 AF 32 4C 44 CD 73 39 CA    .&.E%.a'.2LD.s9.
00D940:  00 45 3E 04 CD AD 27 3E 81 CD F0 2B CD 3C 27 32    .E>...'>...+.<'2
00D950:  4C 44 CD 61 27 C3 00 45 CD 6E 58 CA 61 57 3A 4C    LD.a'..E.nX.aW:L
00D960:  44 32 56 44 C3 00 45 CD 6E 58 CD 6C 3B C3 00 45    D2VD..E.nX.l;..E
00D970:  CD 73 39 11 9D 5E CD B1 37 C2 7F 57 CD 8E 39 01    .s9..^..7..W..9.
00D980:  3C 00 21 41 97 CD F8 36 CD 63 39 11 41 97 AF CD    <.!A...6.c9.A...
00D990:  20 37 AF 32 7D 97 C3 00 45 CD 5B 58 CD C2 2B DA     7.2}...E.[X..+.
00D9A0:  14 5B 22 52 44 C3 00 45 3A 72 44 B7 CA BC 57 CD    .["RD..E:rD...W.
00D9B0:  40 27 CD 45 25 AF 32 72 44 CD 61 27 CD 5B 58 CA    @'.E%.2rD.a'.[X.
00D9C0:  F2 57 11 71 5E CD B1 37 CA F9 57 11 31 5E CD B1    .W.q^..7..W.1^..
00D9D0:  37 CA F2 57 3E 06 CD AD 27 3E 02 CD F0 2B D2 E6    7..W>...'>...+..
00D9E0:  57 3E 59 C3 06 5B CD 3C 27 32 72 44 CD 61 27 C3    W>Y..[.<'2rD.a'.
00D9F0:  00 45 AF 32 7C 44 C3 00 45 3E FF 32 7C 44 C3 00    .E.2|D..E>.2|D..
00DA00:  45 CD 5B 58 CA 14 5B 7E E6 5F D6 40 32 5A 44 C3    E.[X..[~._.@2ZD.
00DA10:  00 45 CD 5B 58 CD FF 37 7B 32 4E 44 CD 8E 39 CD    .E.[X..7{2ND..9.
00DA20:  69 39 CD FF 37 7B 32 4F 44 CD 8E 39 CD 69 39 CD    i9..7{2OD..9.i9.
00DA30:  FF 37 7B 32 50 44 C3 00 45 CD 5B 58 CD C2 2B DA    .7{2PD..E.[X..+.
00DA40:  14 5B 7D 32 61 01 C3 00 45 CD 5B 58 CD 8C 23 CD    .[}2a...E.[X..#.
00DA50:  63 39 CA 00 45 CD AD 5A C3 00 45 CD 73 39 11 9D    c9..E..Z..E.s9..
00DA60:  5E CD B1 37 C2 14 5B CD 8E 39 CD 73 39 C9 CD 73    ^..7..[..9.s9..s
00DA70:  39 11 5E 5E CD B1 37 CA 85 58 11 5A 5E CD B1 37    9.^^..7..X.Z^..7
00DA80:  C2 37 5B AF C9 3E FF B7 C9 CD 3C 29 0E 00 11 01    .7[..>....<)....
00DA90:  00 CD 73 39 CA 14 59 FE 2D C2 A4 58 0E 01 CD 69    ..s9..Y.-..X...i
00DAA0:  39 C3 AC 58 FE 2B C2 AC 58 CD 69 39 11 FA 5D CD    9..X.+..X.i9..].
00DAB0:  B1 37 CA 75 59 CD C2 2B DA 14 5B 7C B5 CA 00 45    .7.uY..+..[|...E
00DAC0:  EB 79 B7 CA 14 59 CD 9F 24 CA F9 58 CD 99 2C 22    .y...Y..$..X..,"
00DAD0:  E8 5F CD 5A 22 DA F0 58 1B 22 E8 5F 7A B3 C2 D2    ._.Z"..X."._z...
00DAE0:  58 2A E8 5F CD 9D 27 CD 7B 59 CA D2 58 C3 60 59    X*._..'.{Y..X.`Y
00DAF0:  CD 01 23 CD 9D 27 C3 60 59 CD 99 2C CD D8 36 DA    ..#..'.`Y..,..6.
00DB00:  CA 00 45 CD 78 27 CA 68 4F DA 00 45 2A D5 5F 2B    ..E.x'.hO..E*._+
00DB10:  22 D5 5F 7C B5 C2 2B 4F 21 0F 00 22 D5 5F 3E 65    "._|..+O!.."._>e
00DB20:  CD 70 3B CD 8E 3A FE 1B CA 00 45 CD 1B 36 3A D2    .p;..:....E..6:.
00DB30:  5F B7 C2 44 4F CD 99 2C CD 35 36 CD 7E 36 CD DC    _..DO..,.56.~6..
00DB40:  1C CD E8 35 3A DB 5F B7 C2 62 4F 3A 79 44 B7 CA    ...5:._..bO:yD..
00DB50:  62 4F CD 84 29 44 4D CD DC 1C 0B 23 CD 13 2C C3    bO..)DM....#..,.
00DB60:  68 4F 21 7E 97 CD 20 0B CD 47 2B CA 00 45 D2 03    hO!~.. ..G+..E..
00DB70:  4F C3 00 45 3E 03 21 0C 45 C3 C7 3B CD 8E 39 3E    O..E>.!.E..;..9>
00DB80:  03 21 09 45 C3 C7 3B CD 8E 39 3E 08 21 00 45 C3    .!.E..;..9>.!.E.
00DB90:  C7 3B CD 73 39 11 C1 5E CD B1 37 CA 5C 50 11 AA    .;.s9..^..7.\P..
00DBA0:  5E CD B1 37 CA EF 4F CD 63 39 3E 01 CD AD 27 DA    ^..7..O.c9>...'.
00DBB0:  E2 4F CD 73 39 C2 14 5B 3E 42 CD F0 2B DA E2 4F    .O.s9..[>B..+..O
00DBC0:  3A 5D 44 FE 10 D2 E7 4F 21 5E 44 CD BB 36 CD 3C    :]D....O!^D..6.<
00DBD0:  27 77 32 5C 44 21 5D 44 34 CD 36 2F CD 61 27 C3    'w2\D!]D4.6/.a'.
00DBE0:  00 45 3E 29 C3 E9 4F 3E 2A CD 70 3B C3 7D 4C 3A    .E>)..O>*.p;.}L:
00DBF0:  5C 44 B7 CA 54 50 CD 8E 39 CD 1D 2E DA 14 5B C2    \D..TP..9.....[.
00DC00:  4E 50 AF 32 DA 5F 3A 5C 44 CD CA 39 CD 73 39 FE    NP.2._:\D..9.s9.
00DC10:  88 CA 2C 50 11 0F 5E CD B1 37 C2 33 50 CD 8E 39    ..,P..^..7.3P..9
00DC20:  CD 73 39 11 AA 5E CD B1 37 C2 06 50 21 DA 5F 34    .s9..^..7..P!._4
00DC30:  C3 06 50 CD 63 39 FE 84 CA 44 50 11 B5 5E CD B1    ..P.c9...DP..^..
00DC40:  37 C2 06 50 21 DA 5F 35 F2 06 50 C3 00 45 CD 54    7..P!._5..P..E.T
00DC50:  2F C3 00 45 3E 29 CD 70 3B C3 00 45 3E 01 32 55    /..E>).p;..E>.2U
00DC60:  44 C3 00 45 CD 3C 29 3E 02 21 09 45 C3 C7 3B 3E    D..E.<)>.!.E..;>
00DC70:  FF 32 74 44 AF 32 DC 5F C3 00 45 AF 32 55 44 C3    .2tD.2._..E.2UD.
00DC80:  00 45 AF 32 DA 5F 3A 5C 44 B7 CA 00 45 CD 7D 2F    .E.2._:\D...E.}/
00DC90:  C3 00 45 CD 68 3B F5 47 3A 7C 44 B0 CA A7 50 3E    ..E.h;.G:|D...P>
00DCA0:  FF CD 6C 3B CD 30 3B F1 CD 6C 3B C3 00 45 CD AC    ..l;.0;..l;..E..
00DCB0:  06 C3 00 45 CD 3C 29 CD 9F 24 CA 0C 51 CD 73 39    ...E.<)..$..Q.s9
00DCC0:  CD 9E 36 CA CB 50 06 00 C3 CE 50 CD 69 39 78 11    ..6..P....P.i9x.
00DCD0:  C7 9B CD 20 37 4F CD 63 39 79 CD B1 20 E5 CD 9D    ... 7O.c9y.. ...
00DCE0:  27 E1 7C B5 CA FD 50 3A 5B 44 B7 CA 00 45 CD DC    '.|...P:[D...E..
00DCF0:  1C C2 00 45 CD 63 39 CD C9 21 C3 DD 50 3A 7D 44    ...E.c9..!..P:}D
00DD00:  0E 59 CD 9D 27 CD 7B 59 CA F9 58 C3 60 59 CD D8    .Y..'.{Y..X.`Y..
00DD10:  2C C3 60 59 CD 9F 24 CA 4D 59 CD 99 2C 22 E8 5F    ,.`Y..$.MY..,"._
00DD20:  CD E9 21 DA 3E 59 1B 22 E8 5F 7A B3 C2 20 59 2A    ..!.>Y."._z.. Y*
00DD30:  E8 5F CD 9D 27 CD 7B 59 CA 20 59 C3 60 59 CD E1    ._..'.{Y. Y.`Y..
00DD40:  26 CD 41 23 CD 9D 27 CD E8 26 C3 60 59 CD 99 2C    &.A#..'..&.`Y..,
00DD50:  19 CD 9D 27 CD 7B 59 C2 60 59 CD 37 2C D2 54 59    ...'.{Y.`Y.7,.TY
00DD60:  3A 7D 44 B7 CA 00 45 3E 61 CD 70 3B CD 99 2C CD    :}D...E>a.p;..,.
00DD70:  35 36 C3 00 45 CD 47 2B C3 00 45 3A 5B 44 FE FF    56..E.G+..E:[D..
00DD80:  C0 11 01 00 CD DC 1C C9 3E 07 21 00 45 C3 C7 3B    ........>.!.E..;
00DD90:  11 7E 97 CD F2 14 DA 14 5B EB 22 DF 5F CD 73 39    .~......[."._.s9
00DDA0:  11 9D 5E CD B1 37 C2 1D 5A CD 8E 39 2A DF 5F 23    ..^..7..Z..9*._#
00DDB0:  4E 23 46 CD 73 39 CD 72 2A EB 2A DF 5F 36 2F 23    N#F.s9.r*.*._6/#
00DDC0:  CD E4 36 22 DF 5F EB 22 E3 5F CD 63 39 C5 CD F1    ..6"._."._.c9...
00DDD0:  2A C1 CD 8E 39 CD 92 36 CA F1 59 DA 14 5B 2A E3    *...9..6..Y..[*.
00DDE0:  5F EB 2A DF 5F 36 29 23 CD E4 36 22 DF 5F C3 B3    _.*._6)#..6"._..
00DDF0:  59 3A 7D 44 B7 CA 08 5A 2A E3 5F EB 2A DF 5F 36    Y:}D...Z*._.*._6
00DE00:  30 23 CD E4 36 22 DF 5F 2A DF 5F 36 35 3A 7D 44    0#..6"._*._65:}D
00DE10:  B7 C4 1B 36 21 7E 97 CD 20 0B C3 00 45 3E 48 C3    ...6!~.. ...E>H.
00DE20:  06 5B 3E 03 21 03 45 C3 C7 3B C3 3F 5A CD 73 39    .[>.!.E..;.?Z.s9
00DE30:  11 17 5E CD B1 37 CA 00 45 CD 92 39 CD 28 36 3A    ..^..7..E..9.(6:
00DE40:  5C 44 B7 CA 4F 5A CD CA 39 DA 70 56 C3 2D 5A CD    \D..OZ..9.pV.-Z.
00DE50:  99 39 C3 2D 5A 3E 0B 21 00 45 C3 C7 3B C3 00 45    .9.-Z>.!.E..;..E
00DE60:  3E 0C 21 00 45 C3 C7 3B CD 61 27 CD 45 25 CD 44    >.!.E..;.a'.E%.D
00DE70:  27 CD 8C 23 CD 73 39 CA 00 45 AF CD AD 27 DA EF    '..#.s9..E...'..
00DE80:  5A 3E 40 CD F0 2B DA EA 5A CD 44 27 CD B5 2D CD    Z>@..+..Z.D'..-.
00DE90:  D8 2C CD 73 39 CA 00 45 11 44 5E CD B1 37 C2 14    .,.s9..E.D^..7..
00DEA0:  5B CD 8E 39 CD 73 39 CD AD 5A C3 00 45 0E 07 3E    [..9.s9..Z..E..>
00DEB0:  05 CD AD 27 DA EF 5A 3E 40 CD F0 2B DA F4 5A CD    ...'..Z>@..+..Z.
00DEC0:  3C 27 CD A6 23 CD 92 36 CA D7 5A DA D7 5A 0D C2    <'..#..6..Z..Z..
00DED0:  AF 5A 3E 74 C3 06 5B CD B7 23 CD DF 22 CD 43 21    .Z>t..[..#..".C!
00DEE0:  DA F9 5A CD 61 27 CD D8 2C C9 3E 08 C3 06 5B 3E    ..Z.a'..,.>...[>
00DEF0:  28 C3 06 5B 3E 51 C3 06 5B 3E 7F C3 06 5B 3E 03    (..[>Q..[>...[>.
00DF00:  B7 CA 00 45 3E 11 CD 70 3B C3 00 45 3E 73 C3 06    ...E>..p;..E>s..
00DF10:  5B CD 3C 29 11 77 5E CD 73 39 CD B1 37 C2 29 51    [.<).w^.s9..7.)Q
00DF20:  CD 8E 39 CD 73 39 C3 59 51 11 A0 5E CD B1 37 C2    ..9.s9.YQ..^..7.
00DF30:  38 51 CD D8 2C C3 00 45 11 08 5E CD B1 37 C2 59    8Q..,..E..^..7.Y
00DF40:  51 CD 9F 24 C2 50 51 CD 2A 2C CD 9D 27 C3 00 45    Q..$.PQ.*,..'..E
00DF50:  CD 41 23 CD 9D 27 C3 00 45 CD C2 2B DA 14 5B 7C    .A#..'..E..+..[|
00DF60:  B5 CA 80 51 EB CD 2A 2C EB CD C0 36 DA 3C 48 54    ...Q..*,...6.<HT
00DF70:  5D CD 9D 27 EB CD DE 1F 7C B5 CA 85 51 C3 00 45    ]..'....|...Q..E
00DF80:  3E 33 C3 06 5B 3E 7E C3 06 5B 3E 09 21 00 45 C3    >3..[>~..[>.!.E.
00DF90:  C7 3B CD 1D 2E DA 14 5B F5 CD 73 39 C2 14 5B F1    .;.....[..s9..[.
00DFA0:  C2 00 45 3E FF 32 74 44 AF 32 DC 5F C3 00 45 CD    ..E>.2tD.2._..E.
00DFB0:  3C 29 CD 73 39 CA C0 51 3E 04 21 00 45 C3 C7 3B    <).s9..Q>.!.E..;
00DFC0:  CD 43 21 CD 61 1D C3 00 45 CD A1 48 E5 3E 3A CD    .C!.a...E..H.>:.
00DFD0:  E8 35 CD 99 39 CD 63 39 FE 1B C2 EA 51 3A 70 44    .5..9.c9....Q:pD
00DFE0:  B7 C2 7E 44 CD 1B 36 C3 CD 51 11 7E 97 CD F2 14    ..~D..6..Q.~....
00DFF0:  DA 2F 52 EB 36 2F 23 CD F3 36 2B 2B D1 D5 CD E4    ./R.6/#..6++....
00E000:  36 EB E1 E5 CD 88 29 DA 2C 52 EB D1 3A 7D 44 B7    6.....).,R..:}D.
00E010:  CA 1E 52 36 30 23 CD E4 36 36 35 CD 1B 36 21 7E    ..R60#..665..6!~
00E020:  97 CD 20 0B C3 00 45 3E 48 C3 06 5B C3 00 45 3E    .. ...E>H..[..E>
00E030:  34 CD 70 3B CD 1B 36 C3 CD 51 CD 3C 29 3E 02 21    4.p;..6..Q.<)>.!
00E040:  0C 45 C3 C7 3B 3E 0A 21 00 45 C3 C7 3B 21 FF FF    .E..;>.!.E..;!..
00E050:  22 D5 5F 22 D7 5F C3 BB 4D 3E 03 21 21 45 C3 C7    "._"._..M>.!!E..
00E060:  3B CD 3C 29 CD 63 39 11 BC 96 7E 12 B7 CA 75 52    ;.<).c9...~...uR
00E070:  13 23 C3 6A 52 21 BC 96 CD 8E 39 CD DD 25 CD E9    .#.jR!....9..%..
00E080:  25 DA 14 5B CD 63 39 C2 14 5B 21 FF FF CD 5B 26    %..[.c9..[!...[&
00E090:  DA B7 52 CD 7C 29 22 76 44 CD 78 27 C2 C6 52 CD    ..R.|)"vD.x'..R.
00E0A0:  47 2B CA B7 52 D2 93 52 3A 7D 44 B7 CA 00 45 3E    G+..R..R:}D...E>
00E0B0:  36 CD 70 3B C3 00 45 3A 7D 44 B7 CA 00 45 3E 37    6.p;..E:}D...E>7
00E0C0:  CD 70 3B C3 00 45 3A 7D 44 B7 CA 00 45 3E 61 CD    .p;..E:}D...E>a.
00E0D0:  70 3B CD 99 2C CD 35 36 C3 00 45 21 BC 96 CD 8E    p;..,.56..E!....
00E0E0:  39 CD DD 25 CD E9 25 DA 14 5B 2A 76 44 CD 80 29    9..%..%..[*vD..)
00E0F0:  C3 9F 52 3E 06 21 00 45 C3 C7 3B 3E 04 21 06 45    ..R>.!.E..;>.!.E
00E100:  21 1E 45 C3 C7 3B CD 70 3B C3 37 5B 3A 6F 44 FE    !.E..;.p;.7[:oD.
00E110:  01 CA 37 5B 3E 4D CD 70 3B CD 1B 36 CD 63 39 EB    ..7[>M.p;..6.c9.
00E120:  CD 92 39 EB CD D8 36 4D 0D FA 32 5B CD 7E 36 C3    ..9...6M..2[.~6.
00E130:  28 5B 3E 3F CD E8 35 CD 61 27 AF 32 6F 44 CD 92    ([>?..5.a'.2oD..
00E140:  39 CD 73 39 B7 FA 7D 4C CD 0B 3A 3A 5C 44 B7 CA    9.s9..}L..::\D..
00E150:  74 5B 3A 5D 44 32 DA 5F 21 DA 5F 35 FA 74 5B 3E    t[:]D2._!._5.t[>
00E160:  30 CD 70 3B 3A DA 5F 21 5E 44 CD BB 36 7E CD C4    0.p;:._!^D..6~..
00E170:  25 C3 58 5B 3A 5D 01 B7 CA 7E 44 3E 5B CD 70 3B    %.X[:]...~D>[.p;
00E180:  CD 42 38 DA 7E 44 CA 00 45 3E 5C CD 70 3B 21 7E    .B8.~D..E>\.p;!~
00E190:  99 CD 78 35 CA 00 45 3E 5D CD 70 3B 21 C6 99 CD    ..x5..E>].p;!...
00E1A0:  78 35 CD 92 39 11 7E 99 01 C6 99 CD A2 38 DA 89    x5..9.~......8..
00E1B0:  5B CD 0B 3A 3E 5E CD 70 3B CD 42 38 DA 7E 44 C2    [..:>^.p;.B8.~D.
00E1C0:  89 5B 31 BC 96 CD 92 39 C3 96 45 04 02 01 13 05    .[1....9..E.....
00E1D0:  E0 E8 03 E9 E0 F1 F9 F8 F1 E0 13 03 04 10 E0 00    ................
00E1E0:  00 00 00 00 00 00 00 00 00 53 54 4F 52 45 00 90    .........STORE..
00E1F0:  59 3F 00 2D 53 45 4C 53 45 00 6F 50 45 4E 44 44    Y?.-SELSE.oPENDD
00E200:  4F 00 82 50 45 4E 44 49 46 00 00 45 44 4F 00 92    O..PENDIF..EDO..
00E210:  4F 4E 4F 54 45 00 00 45 4C 4F 4F 50 00 82 50 52    ONOTE..ELOOP..PR
00E220:  45 4C 45 41 53 45 00 12 56 52 45 54 55 52 4E 00    ELEASE..VRETURN.
00E230:  70 56 53 45 4C 45 43 54 00 C3 56 40 00 29 49 41    pVSELECT..V@.)IA
00E240:  43 43 45 50 54 00 46 48 41 50 50 45 4E 44 00 E0    CCEPT.FHAPPEND..
00E250:  48 43 41 4C 4C 00 5F 4C 43 41 4E 43 45 4C 00 7D    HCALL._LCANCEL.}
00E260:  4C 43 48 41 4E 47 45 00 8D 4C 43 4C 45 41 52 00    LCHANGE..LCLEAR.
00E270:  98 4C 43 4F 50 59 00 ED 4C 43 4F 55 4E 54 00 F8    .LCOPY..LCOUNT..
00E280:  4C 43 52 45 41 54 45 00 03 4D 44 45 4C 45 54 45    LCREATE..MDELETE
00E290:  00 0B 4D 44 49 53 50 4C 41 59 00 AF 4D 43 4F 4E    ..MDISPLAY..MCON
00E2A0:  54 49 4E 55 45 00 DB 52 45 44 49 54 00 64 50 45    TINUE..REDIT.dPE
00E2B0:  4A 45 43 54 00 93 50 45 52 41 53 45 00 AE 50 47    JECT..PERASE..PG
00E2C0:  4F 54 4F 00 11 51 47 4F 00 11 51 48 45 4C 50 00    OTO..QGO..QHELP.
00E2D0:  8A 51 49 46 00 92 51 46 49 4E 44 00 B4 50 49 4E    .QIF..QFIND..PIN
00E2E0:  44 45 58 00 AF 51 49 4E 50 55 54 00 C9 51 49 4E    DEX..QINPUT..QIN
00E2F0:  53 45 52 54 00 3A 52 4C 49 53 54 00 4D 52 4C 4F    SERT.:RLIST.MRLO
00E300:  C3 C7 3B CD C2 2B DA 14 5B 22 E6 5F CD 92 36 DA    ..;..+..["._..6.
00E310:  14 5B CD C2 2B DA 14 5B 7D 2A E6 5F 77 23 22 E6    .[..+..[}*._w#".
00E320:  5F CD 92 36 CA 00 45 D2 12 53 C3 00 45 21 7E 97    _..6..E..S..E!~.
00E330:  22 DF 5F CD 73 39 CA 9A 53 FE 3F CA 44 53 CD 1B    "._.s9..S.?.DS..
00E340:  36 C3 47 53 CD 69 39 2A DF 5F EB CD F2 14 DA 14    6.GS.i9*._......
00E350:  5B EB 3A 79 44 B7 C2 78 53 36 32 23 CD F3 36 78    [.:yD..xS62#..6x
00E360:  B7 C2 73 53 79 B7 C2 6E 53 36 03 C3 74 53 36 00    ..sSy..nS6..tS6.
00E370:  C3 7C 53 70 34 C3 7C 53 36 2E 23 23 23 36 00 23    .|Sp4.|S6.###6.#
00E380:  36 35 22 DF 5F CD 92 36 CA 91 53 DA 14 5B C3 47    65"._..6..S..[.G
00E390:  53 21 7E 97 CD 20 0B C3 00 45 CD 1B 36 C3 00 45    S!~.. ...E..6..E
00E3A0:  CD 45 25 CD 8C 23 CD 83 2E CD 45 25 CD 8C 23 3E    .E%..#....E%..#>
00E3B0:  2C CD 70 3B 3A 4C 44 CD 40 27 CD D4 26 CD 45 25    ,.p;:LD.@'..&.E%
00E3C0:  CD 73 39 00 00 00 CA 00 27 3E 03 21 06 45 C3 C7    .s9.....'>.!.E..
00E3D0:  3B AF 32 D2 5F CD 73 39 CA E9 53 11 51 5E CD B1    ;.2._.s9..S.Q^..
00E3E0:  37 C2 14 5B 3E FF 32 D2 5F 3A 09 01 B7 CA 00 45    7..[>.2._:.....E
00E3F0:  3A 72 44 B7 CA 33 54 CD 40 27 CD A8 2D CD 61 27    :rD..3T.@'..-.a'
00E400:  CD AC 06 3A 72 44 CD CA 39 DA 33 54 CD 73 39 CA    ...:rD..9.3T.s9.
00E410:  03 54 FE 2A CA 03 54 FE 40 CC 69 39 CD A3 49 3E    .T.*..T.@.i9.£I>
00E420:  FF 2A EA 5F 44 4D 2A CA 5F EB 21 CC 5F CD 72 06    .*._DM*._.!._.r.
00E430:  C3 03 54 3E 04 CD 1D 02 B7 FA 00 45 0F D2 00 45    ..T>.......E...E
00E440:  CD 3C 27 B7 CA 00 45 CD 99 2C 7C B5 CA 00 45 CD    .<'...E..,|...E.
00E450:  E7 1C CD D3 2E 3A D2 5F B7 C2 00 45 CD 83 21 C3    .....:._...E..!.
00E460:  00 45 CD 3C 29 CD DD 25 3E 20 32 D9 5F CD 5C 4D    .E.<)..%> 2._.\M
00E470:  3A 7D 44 B7 CA 00 45 3E 3B CD 70 3B C3 00 45 CD    :}D...E>;.p;..E.
00E480:  3C 29 3E 04 21 03 45 C3 C7 3B CD 63 39 CD 28 36    <)>.!.E..;.c9.(6
00E490:  C3 00 45 CD 73 39 CA 14 5B AF CD AD 27 CD A1 2C    ..E.s9..[...'..,
00E4A0:  CD 73 39 CA 14 5B 11 9D 5E CD B1 37 C2 14 5B CD    .s9..[..^..7..[.
00E4B0:  8E 39 CD 73 39 AF CD AD 27 CD B2 2C C3 00 45 CD    .9.s9...'..,..E.
00E4C0:  3C 29 AF 32 D2 5F 01 00 00 CD 99 2C 7C B5 CA E1    <).2._.....,|...
00E4D0:  55 CD DD 25 21 C7 9B 22 DF 5F 21 8F 9C 22 DD 5F    U..%!.."._!.."._
00E4E0:  CD 73 39 CA 99 55 11 51 5E CD B1 37 C2 FA 54 CD    .s9..U.Q^..7..T.
00E4F0:  8E 39 3E FF 32 D2 5F C3 E0 54 CD E9 25 DA 14 5B    .9>.2._..T..%..[
00E500:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
00E510:  0C 00 00 00 02 09 49 E5 0C 00 C1 02 00 00 00 02    ......I.........
00E520:  0C 00 C6 02 00 00 00 02 0C 00 C2 02 00 00 00 02    ................
00E530:  0C 00 C7 02 00 00 00 02 0C 00 C3 02 00 00 00 02    ................
00E540:  0C 00 C8 02 00 00 00 02 0C 00 C4 02 00 00 00 02    ................
00E550:  0C 00 C9 02 00 00 00 02 0C 00 C5 02 00 00 00 02    ................
00E560:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E570:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E580:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E590:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E5F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00E600:  41 44 00 59 52 4C 4F 43 41 54 45 00 61 52 55 4E    AD.YRLOCATE.aRUN
00E610:  4C 4F 43 4B 00 5D 5A 4D 4F 44 49 46 59 00 F3 52    LOCK.]ZMODIFY..R
00E620:  50 41 43 4B 00 FB 52 50 4F 4B 45 00 03 53 51 55    PACK..RPOKE..SQU
00E630:  49 54 00 A0 53 52 45 41 44 00 D1 53 52 45 43 41    IT..SREAD..SRECA
00E640:  4C 4C 00 62 54 52 45 49 4E 44 45 58 00 7F 54 52    LL.bTREINDEX..TR
00E650:  45 4D 41 52 4B 00 8A 54 52 45 4E 41 4D 45 00 93    EMARK..TRENAME..
00E660:  54 52 45 50 4C 41 43 45 00 BF 54 52 45 50 4F 52    TREPLACE..TREPOR
00E670:  54 00 02 56 52 45 53 45 54 00 63 56 52 45 53 54    T..VRESET.cVREST
00E680:  4F 52 45 00 0A 56 53 41 56 45 00 BB 56 53 45 54    ORE..VSAVE..VSET
00E690:  00 E7 56 53 4B 49 50 00 89 58 53 4F 52 54 00 88    ..VSKIP..XSORT..
00E6A0:  59 53 55 4D 00 22 5A 54 45 58 54 00 2A 5A 55 53    YSUM."ZTEXT.*ZUS
00E6B0:  45 00 68 5A 57 41 49 54 00 FE 5A 43 41 53 45 00    E.hZWAIT..ZCASE.
00E6C0:  85 4C 45 4E 44 43 41 53 45 00 7B 50 4F 54 48 45    .LENDCASE.{POTHE
00E6D0:  52 57 49 53 45 00 85 4C 42 52 4F 57 53 45 00 4D    RWISE..LBROWSE.M
00E6E0:  4C 4A 4F 49 4E 00 45 52 54 4F 54 41 4C 00 55 5A    LJOIN.ERTOTAL.UZ
00E6F0:  55 50 44 41 54 45 00 60 5A FF 41 4C 4C 00 41 4E    UPDATE.`Z.ALL.AN
00E700:  44 00 42 4C 41 4E 4B 00 42 4F 54 54 4F 4D 00 44    D.BLANK.BOTTOM.D
00E710:  4F 00 45 4C 53 45 00 45 4E 44 54 45 58 54 00 46    O.ELSE.ENDTEXT.F
00E720:  49 45 4C 44 53 00 46 49 4C 45 00 46 49 4C 45 53    IELDS.FILE.FILES
00E730:  00 53 43 52 45 45 4E 00 47 45 54 00 47 45 54 53    .SCREEN.GET.GETS
00E740:  00 49 46 00 49 4E 44 45 58 00 4D 45 4D 4F 52 59    .IF.INDEX.MEMORY
00E750:  00 4E 4F 55 50 44 41 54 45 00 4F 46 46 00 4F 4E    .NOUPDATE.OFF.ON
00E760:  00 50 49 43 54 55 52 45 00 50 52 49 4D 41 52 59    .PICTURE.PRIMARY
00E770:  00 50 52 49 4E 54 00 52 45 43 4F 52 44 00 53 41    .PRINT.RECORD.SA
00E780:  59 00 53 45 43 4F 4E 44 41 52 59 00 53 54 41 54    Y.SECONDARY.STAT
00E790:  55 53 00 53 54 52 55 43 54 55 52 45 00 54 4F 00    US.STRUCTURE.TO.
00E7A0:  54 4F 50 00 55 53 49 4E 47 00 57 48 49 4C 45 00    TOP.USING.WHILE.
00E7B0:  57 49 54 48 00 45 4E 44 44 4F 00 45 4E 44 49 46    WITH.ENDDO.ENDIF
00E7C0:  00 43 41 53 45 00 45 4E 44 43 41 53 45 00 4F 54    .CASE.ENDCASE.OT
00E7D0:  48 45 52 57 49 53 45 00 42 45 4C 4C 00 51 44 43    HERWISE.BELL.QDC
00E7E0:  41 52 52 59 00 54 44 43 4F 4C 4F 4E 00 57 44 43    ARRY.TDCOLON.WDC
00E7F0:  4F 4E 46 49 52 4D 00 58 44 44 45 42 55 47 00 59    ONFIRM.XDDEBUG.Y
00E800:  CD FF 37 DA C3 4C 7B B7 CA 95 4C 7A B7 C2 95 4C    ..7..L{...Lz...L
00E810:  7B D1 12 13 13 13 CD 63 39 D5 11 C8 56 0E 03 CD    {......c9...V...
00E820:  78 38 CD 8E 39 21 C8 56 CD FF 37 DA BB 4C 7B D1    x8..9!.V..7..L{.
00E830:  12 1B 1B 1B 1A 2A 04 57 CD BB 36 11 E8 03 CD C0    .....*.W..6.....
00E840:  36 DA CB 4C 22 04 57 11 10 00 2A EE 56 19 22 EE    6..L".W...*.V.".
00E850:  56 C3 97 4B CD 45 25 2A EE 56 36 0D 21 00 00 CD    V..K.E%*.V6.!...
00E860:  2E 2C 3A D6 56 CD 40 27 CD A8 2D CD FF 2E CD D4    .,:.V.@'..-.....
00E870:  26 CD 44 27 CD B5 2D CD D8 2C C3 D0 55 3E 1C CD    &.D'..-..,..U>..
00E880:  70 3B C3 06 4A 3E 1D CD 70 3B C3 06 4A 3E 1F CD    p;..J>..p;..J>..
00E890:  70 3B C3 06 4A 3E 1E CD 70 3B C3 06 4A 3E 79 CD    p;..J>..p;..J>y.
00E8A0:  70 3B C3 06 4A CD 45 25 CD 03 27 3E 32 CD 70 3B    p;..J.E%..'>2.p;
00E8B0:  C3 D0 55 3E 1D CD 70 3B C3 C0 55 3E 1F CD 70 3B    ..U>..p;..U>..p;
00E8C0:  C3 C0 55 3E 1E CD 70 3B C3 C0 55 3E 79 CD 70 3B    ..U>..p;..U>y.p;
00E8D0:  C3 C0 55 3E 28 CD 70 3B C3 C0 55 CD 3C 29 21 00    ..U>(.p;..U.<)!.
00E8E0:  00 22 F7 56 CD 99 2C 7C B5 CA D0 55 22 E6 56 CD    .".V..,|...U".V.
00E8F0:  E3 1C 22 E3 56 3E FF 32 DE 56 CD 73 39 C2 37 4D    ..".V>.2.V.s9.7M
00E900:  AF 32 DE 56 3A 09 01 B7 C2 10 4D 3E 2E CD 70 3B    .2.V:.....M>..p;
00E910:  3A DE 56 B7 C2 D0 55 3A 09 01 B7 C2 26 4D 3E 5A    :.V...U:....&M>Z
00E920:  CD 70 3B C3 2B 4D 3E 7D CD 70 3B CD 99 39 C2 37    .p;.+M>}.p;..9.7
00E930:  4D CD B5 06 C3 D0 55 CD 63 39 FE 20 DA D0 55 CD    M.....U.c9. ..U.
00E940:  FF 37 CD 8E 39 CD 2A 2C EB CD C0 36 DA E4 4E EB    .7..9.*,...6..N.
00E950:  CD 73 39 EB 7C B5 C2 5C 4D 2A E6 56 22 E6 56 CD    .s9.|..\M*.V".V.
00E960:  9D 27 2A E6 56 CD DE 1F 3A 09 01 B7 CA 44 4E CD    .'*.V...:....DN.
00E970:  E3 1C 22 FC 56 3A 72 44 B7 CA 9F 4D CD 47 52 AF    ..".V:rD...M.GR.
00E980:  47 CD 1D 02 B7 FA 10 4D 47 0F D2 90 4D CD 3A 4E    G......MG...M.:N
00E990:  78 E6 04 CA 10 4D 78 E6 02 CA EC 4D C3 CE 4D 2A    x....Mx....M..M*
00E9A0:  E6 56 EB 2A FC 56 CD 39 55 3E 01 06 00 CD 1D 02    .V.*.V.9U>......
00E9B0:  B7 FA 10 4D 47 0F D2 BC 4D CD 3A 4E 78 E6 04 CA    ...MG...M.:Nx...
00E9C0:  10 4D 78 E6 08 CA FB 4D 78 E6 02 CA EC 4D CD 9F    .Mx....Mx....M..
00E9D0:  24 CA DD 4D CD 5A 22 DA 10 4D C3 5C 4D 2A E6 56    $..M.Z"..M.\M*.V
00E9E0:  2B 22 E6 56 7C B5 CA 10 4D C3 5C 4D CD 9F 24 CA    +".V|...M.\M..$.
00E9F0:  2A 4E CD E9 21 DA 10 4D C3 5C 4D 78 E6 02 CA 18    *N..!..M.\Mx....
00EA00:  44 44 45 4C 45 54 45 44 00 5B 44 45 43 48 4F 00    DDELETED.[DECHO.
00EA10:  6E 44 45 4A 45 43 54 00 7A 44 45 53 43 41 50 45    nDEJECT.zDESCAPE
00EA20:  00 70 44 45 58 41 43 54 00 71 44 49 4E 54 45 4E    .pDEXACT.qDINTEN
00EA30:  53 49 54 59 00 75 44 4C 49 4E 4B 41 47 45 00 78    SITY.uDLINKAGE.x
00EA40:  44 52 41 57 00 79 44 53 54 45 50 00 7B 44 53 43    DRAW.yDSTEP.{DSC
00EA50:  52 45 45 4E 00 09 01 54 41 4C 4B 00 7D 44 FF 41    REEN...TALK.}D.A
00EA60:  4C 54 45 52 4E 41 54 45 00 16 57 43 41 4C 4C 00    LTERNATE..WCALL.
00EA70:  99 57 43 4F 4E 53 4F 4C 45 00 0D 57 44 41 54 45    .WCONSOLE..WDATE
00EA80:  00 12 58 44 45 46 41 55 4C 54 00 01 58 46 4F 52    ..XDEFAULT..XFOR
00EA90:  4D 41 54 00 A8 57 48 45 41 44 49 4E 47 00 70 57    MAT..WHEADING.pW
00EAA0:  49 4E 44 45 58 00 49 58 4D 41 52 47 49 4E 00 39    INDEX.IXMARGIN.9
00EAB0:  58 50 52 49 4E 54 00 67 57 FF 00 00 00 00 00 00    XPRINT.gW.......
00EAC0:  00 01 01 00 00 00 00 C7 9B 00 00 00 F3 56 35 8E    .............V5.
00EAD0:  00 00 00 00 00 00 00 00 05 D4 51 41 07 51 42 00    ..........QA.QB.
00EAE0:  51 43 01 51 44 02 51 45 03 51 00 00 41 4C 4C 00    QC.QD.QE.Q..ALL.
00EAF0:  99 57 43 4F 4E 53 4F 4C 45 00 0D 57 44 41 54 45    .WCONSOLE..WDATE
00EB00:  C3 0F 45 C3 A6 48 C3 A5 49 C3 DB 4C C3 EC 4E CD    ..E..H..I..L..N.
00EB10:  3C 29 AF 32 DD 56 32 D9 56 32 DA 56 CD DD 25 CD    <).2.V2.V2.V..%.
00EB20:  73 39 CA 7A 45 CD E9 25 DA C8 55 CD 73 39 CA 7A    s9.zE..%..U.s9.z
00EB30:  45 11 7E 56 CD B1 37 C2 4F 45 CD 8E 39 22 EB 56    E.~V..7.OE..9".V
00EB40:  AF CD AD 27 DA 8C 48 3E FF 32 DD 56 C3 1F 45 11    ...'..H>.2.V..E.
00EB50:  9B 56 CD B1 37 C2 63 45 CD 8E 39 3E FF 32 D9 56    .V..7.cE..9>.2.V
00EB60:  C3 1F 45 11 65 56 CD B1 37 C2 C8 55 CD 8E 39 3E    ..E.eV..7..U..9>
00EB70:  FF 32 D9 56 32 DA 56 C3 1F 45 CD 2A 2C 22 F5 56    .2.V2.V..E.*,".V
00EB80:  7C B5 CA 88 45 CD 9D 27 CD 37 2C D2 88 45 3A DD    |...E..'.7,..E:.
00EB90:  56 B7 CA F3 46 21 00 00 22 04 57 21 64 00 22 FE    V...F!..".W!d.".
00EBA0:  56 CD 43 21 3A D9 56 B7 CA 18 47 2A EB 56 CD 8E    V.C!:.V...G*.V..
00EBB0:  39 3E 04 CD AD 27 3E 41 CD F0 2B DA 8C 48 CD 3C    9>...'>A..+..H.<
00EBC0:  27 32 D6 56 CD 61 27 CD 07 2E 3A DA 56 B7 CA 95    '2.V.a'...:.V...
00EBD0:  46 21 C8 9B CD 8E 39 EB 01 E8 03 3A D6 56 CD 40    F!....9....:.V.@
00EBE0:  27 CD B2 25 DA 5C 48 AF 12 CD E3 1C 22 00 57 2A    '..%.\H.....".W*
00EBF0:  00 57 7E FE 0D CA A9 46 11 0B 00 19 7E FE 4E CA    .W~....F....~.N.
00EC00:  4E CD E3 1C EB 2A FC 56 CD C0 36 D2 CE 4D 11 F0    N....*.V..6..M..
00EC10:  FF 19 22 FC 56 C3 75 4D 2A C4 56 7E FE 0D CA EC    ..".V.uM*.V~....
00EC20:  4D 2A C4 56 22 FC 56 C3 75 4D CD 37 2C DA 10 4D    M*.V".V.uM.7,..M
00EC30:  2A E6 56 23 22 E6 56 C3 5C 4D CD E7 1C CD D3 2E    *.V#".V.\M......
00EC40:  CD 83 21 C9 CD 63 39 CA CF 4E FE 2C C2 10 4D CD    ..!..c9..N.,..M.
00EC50:  69 39 FE 2C CA AA 4E FE 3A D2 90 4E FE 30 DA AA    i9.,..N.:..N.0..
00EC60:  4E CD FF 37 CD 8E 39 DA 10 4D 7A B7 C2 10 4D 7B    N..7..9..Mz...M{
00EC70:  FE 21 D2 10 4D EB 2B 29 29 29 29 EB CD E3 1C 19    .!..M.+)))).....
00EC80:  7E B7 CA 10 4D FE 0D CA 10 4D 22 E3 56 C3 AA 4E    ~...M....M".V..N
00EC90:  CD 63 39 CD F1 2A CA 10 4D E5 CD 63 39 CD 92 28    .c9..*..M..c9..(
00ECA0:  22 E3 56 E1 C2 10 4D CD 8E 39 CD 63 39 CA CF 4E    ".V...M..9.c9..N
00ECB0:  CD 69 39 E5 0E FF AF CD 13 37 D1 CD D8 36 4D CD    .i9......7...6M.
00ECC0:  63 39 EB 2A E3 56 CD AC 4F DA 10 4D C3 DB 4E 2A    c9.*.V..O..M..N*
00ECD0:  E3 56 CD F5 4F DA D0 55 CA 10 4D CD E7 1C CD D3    .V..O..U..M.....
00ECE0:  2E C3 10 4D 3E 0C CD 70 3B C3 D0 55 CD 3C 29 AF    ...M>..p;..U.<).
00ECF0:  32 D8 56 32 D7 56 CD 73 39 CA 24 4F 11 4F 56 CD    2.V2.V.s9.$O.OV.
00ED00:  B1 37 C2 10 4F 3E FF 32 D7 56 CD 8E 39 C3 F6 4E    .7..O>.2.V..9..N
00ED10:  11 56 56 CD B1 37 C2 C8 55 3E FF 32 D8 56 CD 8E    .VV..7..U>.2.V..
00ED20:  39 C3 F6 4E CD 9F 24 B7 C2 0F 45 CD 99 2C 3A D7    9..N..$...E..,:.
00ED30:  56 B7 C2 36 4F 23 22 06 57 22 04 57 CD 0C 2C CD    V..6O#".W".W..,.
00ED40:  84 29 44 4D 11 C7 9B CD 7A 2C DA A1 4F 2A 06 57    .)DM....z,..O*.W
00ED50:  CD 0C 2C 3A D8 56 B7 CA 63 4F CD 07 2E CD D3 2E    ..,:.V..cO......
00ED60:  C3 69 4F CD 16 51 DA D0 55 11 C7 9B CD DC 1C EB    .iO..Q..U.......
00ED70:  CD 7E 38 11 C7 9B CD 7A 2C F5 2A 06 57 23 22 06    .~8....z,.*.W#".
00ED80:  57 CD 0C 2C CD D3 2E F1 D2 69 4F CD 2A 2C 23 CD    W..,.....iO.*,#.
00ED90:  2E 2C CD D4 26 CD D8 2C 2A 04 57 CD 9D 27 C3 D0    .,..&..,*.W..'..
00EDA0:  55 3E 35 CD 70 3B CD D8 2C C3 D0 55 C5 D5 11 0B    U>5.p;..,..U....
00EDB0:  00 19 7E FE 4E CA D8 4F 23 79 3D BE D2 EC 4F C5    ..~.N..O#y=...O.
00EDC0:  4E 23 CD DF 36 54 5D 06 00 3E 20 CD FA 36 C1 E1    N#..6T]..> ..6..
00EDD0:  D5 CD 78 38 D1 C1 B7 C9 E3 CD 9F 32 E3 23 46 23    ..x8.......2.#F#
00EDE0:  CD E9 36 4E EB CD 4D 33 B7 D1 C1 C9 3E 15 CD 70    ..6N..M3....>..p
00EDF0:  3B 37 D1 C1 C9 C5 D5 22 E9 56 11 0B 00 19 56 23    ;7.....".V....V#
00EE00:  51 46 23 46 23 CD E9 36 CD 63 39 0E 00 FE 27 C2    QF#F#..6.c9...'.
00EE10:  15 46 C3 1A 46 FE 22 C2 25 46 4F CD 69 39 B9 CA    .F..F.".%FO.i9..
00EE20:  71 46 C3 2C 46 FE 2C CA 82 46 0E 2C 12 13 05 CA    qF.,F.,..F.,....
00EE30:  3F 46 CD 69 39 CA A9 46 B9 C2 2C 46 C3 71 46 CD    ?F.i9..F..,F.qF.
00EE40:  69 39 CA A9 46 B9 CA 71 46 FE 2C C2 3F 46 C3 82    i9..F..qF.,.?F..
00EE50:  46 23 46 23 CD E9 36 4E C5 CD 63 39 0E 64 CD 9F    F#F#..6N..c9.d..
00EE60:  32 CD 8E 39 EB C1 CD 4D 33 CD 63 39 FE 2C CA 82    2..9...M3.c9.,..
00EE70:  46 79 FE 2C CA 82 46 CD 69 39 CA A9 46 FE 2C C2    Fy.,..F.i9..F.,.
00EE80:  77 46 CD 69 39 CA A9 46 2A 00 57 11 10 00 19 22    wF.i9..F*.W...."
00EE90:  00 57 C3 EF 45 CD DC 1C 23 EB 01 E7 03 3A D6 56    .W..E...#....:.V
00EEA0:  CD 40 27 CD B2 25 DA 5C 48 CD 78 27 CA C7 45 DA    .@'..%.\H.x'..E.
00EEB0:  5C 48 CD 61 27 CD D3 2E CD 61 1D 2A 04 57 23 22    \H.a'....a.*.W#"
00EEC0:  04 57 2A F5 56 23 22 F5 56 2A FE 56 2B 22 FE 56    .W*.V#".V*.V+".V
00EED0:  7C B5 C2 C7 45 3A 7D 44 B7 CA C7 45 2A 04 57 CD    |...E:}D...E*.W.
00EEE0:  1B 36 CD 35 36 3E 1A CD 70 3B 21 64 00 22 FE 56    .6.56>..p;!d.".V
00EEF0:  C3 C7 45 CD 16 51 DA 09 47 CD 43 21 CD 61 1D 2A    ..E..Q..G.C!.a.*
00EF00:  F5 56 23 22 F5 56 C3 F3 46 CD D4 26 CD 2A 2C CD    .V#".V..F..&.*,.
00EF10:  9D 27 CD 37 2C C3 83 48 3E 41 CD F0 2B DA 8C 48    .'.7,..H>A..+..H
00EF20:  CD 3C 27 32 D6 56 01 09 02 11 BE 99 CD 7A 2C 3A    .<'2.V.......z,:
00EF30:  BE 99 FE 02 C2 99 48 01 C7 9B 21 C6 99 CD 75 25    ......H...!...u%
00EF40:  21 AF 9F 22 F0 56 21 C6 99 22 00 57 7E FE 0D CA    !..".V!..".W~...
00EF50:  E5 47 22 CC 56 CD 92 28 C2 D8 47 22 D4 56 11 0B    .G".V..(..G".V..
00EF60:  00 19 7E FE 4E CA 86 47 2A F0 56 36 2D 23 EB 2A    ..~.N..G*.V6-#.*
00EF70:  CC 56 EB CD E4 36 EB 2A D4 56 EB CD E4 36 36 35    .V...6.*.V...665
00EF80:  22 F0 56 C3 D8 47 2A CC 56 11 0B 00 19 7E FE 4E    ".V..G*.V....~.N
00EF90:  CA B7 47 2A F0 56 36 29 23 EB 2A CC 56 EB CD E4    ..G*.V6)#.*.V...
00EFA0:  36 36 19 23 36 31 23 EB 2A D4 56 EB CD E4 36 36    66.#61#.*.V...66
00EFB0:  35 22 F0 56 C3 D8 47 2A F0 56 36 29 23 EB 2A CC    5".V..G*.V6)#.*.
00EFC0:  56 EB CD E4 36 36 31 23 EB 2A D4 56 EB CD E4 36    V...661#.*.V...6
00EFD0:  36 35 22 F0 56 C3 D8 47 2A 00 57 11 10 00 19 22    65".V..G*.W...."
00EFE0:  00 57 C3 4C 47 CD 07 2E CD 43 21 11 C7 9B 2A C4    .W.LG....C!...*.
00EFF0:  99 44 4D 3A D6 56 CD 40 27 CD 7A 2C DA 5C 48 3A    .DM:.V.@'.z,.\H:
00F000:  7E 32 E8 56 23 CD DF 36 22 F2 56 7A FE 43 CA 31    ~2.V#..6".Vz.C.1
00F010:  50 CD DB 50 21 6F 56 CD 28 36 CD 99 39 CA 0A 51    P..P!oV.(6..9..Q
00F020:  4F CD 63 39 EB 2A E9 56 CD AC 4F DA 11 50 C3 04    O.c9.*.V..O..P..
00F030:  51 E5 01 00 01 21 C7 9B CD F8 36 AF 32 E5 56 E1    Q....!....6.2.V.
00F040:  E5 3A E8 56 47 11 C7 9B CD 71 38 21 C7 9B 22 F2    .:.VG....q8!..".
00F050:  56 CD DB 50 21 5C 56 CD 28 36 21 C6 99 CD 78 35    V..P!\V.(6!...x5
00F060:  CA B3 50 3A C6 99 FE 1B CA FF 50 FE 19 CA 93 50    ..P:......P....P
00F070:  21 A9 56 CD 28 36 21 F3 9C CD 78 35 21 C7 9B 11    !.V.(6!...x5!...
00F080:  C6 99 01 F3 9C CD A2 38 DA 0E 51 3E FF 32 E5 56    .......8..Q>.2.V
00F090:  C3 51 50 01 00 01 21 C7 9B CD F8 36 21 A9 56 CD    .QP...!....6!.V.
00F0A0:  28 36 21 C7 9B CD 78 35 CA B3 50 3E FF 32 E5 56    (6!...x5..P>.2.V
00F0B0:  C3 51 50 E1 3A E5 56 B7 CA 0A 51 3A E8 56 47 11    .QP.:.V...Q:.VG.
00F0C0:  C7 9B 1A B7 CA D1 50 77 23 13 05 C2 C2 50 C3 04    ......Pw#....P..
00F0D0:  51 36 20 23 05 C2 D1 50 C3 04 51 2A E9 56 CD 1B    Q6 #...P..Q*.V..
00F0E0:  36 CD 28 36 3E 3A CD E8 35 CD 7E 36 2A F2 56 3A    6.(6>:..5.~6*.V:
00F0F0:  E8 56 5F 7E B7 C8 CD E8 35 23 1D C2 F3 50 C9 E1    .V_~....5#...P..
00F100:  D1 C1 37 C9 3E 01 B7 D1 C1 C9 AF D1 C1 C9 3E 11    ..7.>.........>.
00F110:  CD 70 3B C3 51 50 C5 D5 CD E3 1C 22 F9 56 CD 99    .p;.QP.....".V..
00F120:  2C 7C B5 CA 2D 51 3A 54 44 B7 C2 30 51 CD 07 2E    ,|..-Q:TD..0Q...
00F130:  3A 09 01 B7 CA DE 51 3E 83 32 F4 56 AF 32 ED 56    :.....Q>.2.V.2.V
00F140:  CD E3 1C 22 FC 56 3A 72 44 B7 CA 66 51 CD 47 52    ...".V:rD..fQ.GR
00F150:  3E 80 06 00 CD 1D 02 B7 FA 43 52 0F D2 43 52 CD    >........CR..CR.
00F160:  D3 2E D1 C1 B7 C9 CD 99 2C 23 EB 2A FC 56 CD 39    ........,#.*.V.9
00F170:  55 3A F4 56 06 00 CD 1D 02 B7 FA 43 52 47 E6 01    U:.V.......CRG..
00F180:  4F 3A ED 56 B1 32 ED 56 78 E6 08 C2 CC 51 78 E6    O:.V.2.Vx....Qx.
00F190:  02 CA B0 51 CD E3 1C EB 2A FC 56 CD C0 36 D2 CC    ...Q....*.V..6..
00F1A0:  51 11 F0 FF 19 22 FC 56 3E 03 32 F4 56 C3 66 51    Q....".V>.2.V.fQ
00F1B0:  78 0F D2 CC 51 2A C4 56 7E FE 0D CA CC 51 2A C4    x...Q*.V~....Q*.
00F1C0:  56 22 FC 56 3E 03 32 F4 56 C3 66 51 3A ED 56 0F    V".V>.2.V.fQ:.V.
00F1D0:  D2 DA 51 CD D3 2E D1 C1 B7 C9 D1 C1 37 C9 CD 1B    ..Q.........7...
00F1E0:  36 21 8F 56 CD 28 36 CD 99 2C 23 CD 35 36 CD 1B    6!.V.(6..,#.56..
00F1F0:  36 06 00 2A F9 56 CD 1B 36 C5 01 0A 00 CD 13 2C    6..*.V..6......,
00F200:  C7 9B FE 20 C2 EB 47 CD DC 1C 36 20 21 AF 9F CD    ... ..G...6 !...
00F210:  20 0B CD 78 27 CA EB 47 DA 5C 48 CD 61 27 CD D3     ..x'..G.\H.a'..
00F220:  2E CD 61 1D 2A 04 57 23 22 04 57 2A F5 56 23 22    ..a.*.W#".W*.V#"
00F230:  F5 56 2A FE 56 2B 22 FE 56 7C B5 C2 EB 47 3A 7D    .V*.V+".V|...G:}
00F240:  44 B7 CA EB 47 2A 04 57 CD 1B 36 CD 35 36 3E 1A    D...G*.W..6.56>.
00F250:  CD 70 3B 21 64 00 22 FE 56 C3 EB 47 CD 45 25 3A    .p;!d.".V..G.E%:
00F260:  7D 44 B7 CA 74 48 2A 04 57 CD 1B 36 CD 35 36 3E    }D..tH*.W..6.56>
00F270:  1A CD 70 3B CD 61 27 CD D4 26 CD 2A 2C CD 9D 27    ..p;.a'..&.*,..'
00F280:  CD 37 2C 2A F5 56 CD 2E 2C C3 D0 55 3E 08 CD 70    .7,*.V..,..U>..p
00F290:  3B 3E 01 32 6F 44 C3 D0 55 3E 17 CD 70 3B 3E 01    ;>.2oD..U>..p;>.
00F2A0:  32 6F 44 C3 D0 55 CD 3C 29 CD DD 25 AF 32 DB 56    2oD..U.<)..%.2.V
00F2B0:  CD 73 39 CA 3B 49 CD E9 25 DA C8 55 CD 73 39 CA    .s9.;I..%..U.s9.
00F2C0:  3B 49 11 78 56 CD B1 37 CA D8 48 3E 57 CD 70 3B    ;I.xV..7..H>W.p;
00F2D0:  3E 01 32 6F 44 C3 D0 55 3E FF 32 DB 56 CD 8E 39    >.2oD..U>.2.V..9
00F2E0:  21 BB 9D 22 04 57 11 00 00 CD E4 36 CD 73 39 CD    !..".W.....6.s9.
00F2F0:  F1 2A C2 02 49 3E 14 CD 70 3B 3E 01 32 6F 44 C3    .*..I>..p;>.2oD.
00F300:  D0 55 E5 CD 63 39 CD 92 28 CA 19 49 3E 52 CD 70    .U..c9..(..I>R.p
00F310:  3B 3E 01 32 6F 44 C3 D0 55 EB 2A 04 57 CD E4 36    ;>.2oD..U.*.W..6
00F320:  22 04 57 11 00 00 CD E4 36 E1 CD 8E 39 CD 73 39    ".W.....6...9.s9
00F330:  FE 2C C2 B0 48 CD 69 39 C3 EC 48 3A DB 56 B7 C2    .,..H.i9..H:.V..
00F340:  4F 49 3E 57 CD 70 3B 3E 01 32 6F 44 C3 D0 55 21    OI>W.p;>.2oD..U!
00F350:  01 00 CD 5B 26 CD 78 27 CA 99 49 DA A2 49 CD DC    ...[&.x'..I..I..
00F360:  1C CA 99 49 CD 1B 36 3E 61 CD 70 3B CD 99 2C CD    ...I..6>a.p;..,.
00F370:  35 36 CD 1B 36 21 BB 9D 22 04 57 2A 04 57 CD E9    56..6!..".W*.W..
00F380:  36 22 04 57 7A B3 CA 93 49 EB CD F5 4F DA A2 49    6".Wz...I...O..I
00F390:  C3 7B 49 CD E7 1C CD D3 2E CD 47 2B CA A2 49 D2    .{I.......G+..I.
00F3A0:  55 49 C3 D0 55 CD 45 25 CD 44 27 CD 8C 23 CD 44    UI..U.E%.D'..#.D
00F3B0:  27 CD 73 39 C2 C2 49 3E 5F CD 70 3B CD 99 39 CA    '.s9..I>_.p;..9.
00F3C0:  D0 55 AF CD AD 27 3E C1 CD F0 2B 32 D6 56 CD 73    .U...'>...+2.V.s
00F3D0:  39 CA E0 49 11 7E 56 CD B1 37 C2 C8 55 C3 62 4B    9..I.~V..7..U.bK
00F3E0:  3E 23 CD 70 3B 3E 24 CD 70 3B CD E3 1C 01 01 02    >#.p;>$.p;......
00F3F0:  CD F8 36 21 00 00 22 04 57 21 00 00 22 00 57 2A    ..6!..".W!..".W*
00F400:  C1 3E 3A CD E8 35 CD 7E 36 CD 99 39 4F CD 63 39    .>:..5.~6..9O.c9
00F410:  FE 1B CA 18 51 B7 C2 21 52 78 B7 CA 43 52 C3 2C    ....Q..!Rx..CR.,
00F420:  52 04 EB 2A F9 56 CD AC 4F DA F3 51 2A F9 56 11    R..*.V..O..Q*.V.
00F430:  10 00 19 22 F9 56 7E FE 0D C2 F6 51 CD D3 2E D1    ...".V~....Q....
00F440:  C1 B7 C9 37 D1 C1 C9 CD 40 27 CD A8 2D CD AC 06    ...7....@'..-...
00F450:  3A 72 44 CD CA 39 DA 7B 52 CD 73 39 FE 40 C2 50    :rD..9.{R.s9.@.P
00F460:  52 CD 69 39 CD 7F 52 3E FF 2A 06 57 44 4D 2A CE    R.i9..R>.*.WDM*.
00F470:  56 EB 21 D0 56 CD 72 06 C3 50 52 CD 61 27 C9 AF    V.!.V.r..PR.a'..
00F480:  32 DC 56 32 E0 56 3A 7C 44 B7 C2 95 52 3A 09 01    2.V2.V:|D...R:..
00F490:  B7 C2 95 52 C9 21 00 00 22 D0 56 21 00 00 22 D2    ...R.!..".V!..".
00F4A0:  56 0E 00 CD 73 39 FE 24 C2 B7 52 0E 80 CD 69 39    V...s9.$..R...i9
00F4B0:  FE 2C 2E 00 CA BD 52 CD C2 2B DA C8 55 7D B1 32    .,....R..+..U}.2
00F4C0:  07 57 CD 92 36 DA 2C 55 0E 00 CD 73 39 FE 24 C2    .W..6.,U...s9.$.
00F4D0:  DE 52 0E 80 CD 69 39 FE 20 2E 00 CA E4 52 CD C2    .R...i9. ....R..
00F4E0:  2B DA C8 55 7D B1 32 06 57 AF 32 C6 9B 32 C7 9B    +..U}.2.W.2..2..
00F4F0:  21 C7 9B 22 CE 56 CD 73 39 11 97 56 CD B1 37 C2    !..".V.s9..V..7.
00F500:  97 53 CD 8E 39 3E FF 32 E0 56 CD 73 39 11 7E 97    .S..9>.2.V.s9.~.
00F510:  CD F2 14 DA C8 55 EB 11 3F 56 36 31 23 4E 73 23    .....U..?V61#Ns#
00F520:  46 72 78 B7 CA 36 53 32 4B 56 79 32 4E 56 3E 4E    Frx..6S2KVy2NV>N
00F530:  32 4A 56 C3 54 53 32 4E 56 79 B7 CA 4A 53 41 32    2JV.TS2NVy..JSA2
00F540:  4B 56 3E 43 32 4A 56 C3 54 53 32 4B 56 3E 4C 32    KV>C2JV.TS2KV>L2
00F550:  4A 56 06 03 21 C7 9B 78 CD BB 36 36 00 CD 73 39    JV..!..x..66..s9
00F560:  11 B3 56 CD B1 37 C2 97 53 CD 8E 39 CD 73 39 CD    ..V..7..S..9.s9.
00F570:  9E 36 C2 C8 55 CD 69 39 78 11 BB 9D CD 20 37 CA    .6..U.i9x.... 7.
00F580:  C8 55 23 CD 8E 39 21 BB 9D CD BB 36 36 00 AF 32    .U#..9!....66..2
00F590:  BA 9D 3E FF 32 DC 56 CD 73 39 11 83 56 CD B1 37    ..>.2.V.s9..V..7
00F5A0:  C2 0A 54 CD 8E 39 CD 73 39 CA 2C 55 E5 C5 CD F1    ..T..9.s9.,U....
00F5B0:  2A C1 CA 2C 55 E3 CD CC 1C 22 D0 56 CA CC 53 3E    *..,U....".V..S>
00F5C0:  52 CD 70 3B 3E 01 32 6F 44 C3 D0 55 E1 CD 8E 39    R.p;>.2oD..U...9
00F5D0:  CD 73 39 CA 0A 54 11 87 56 CD B1 37 C2 2C 55 CD    .s9..T..V..7.,U.
00F5E0:  8E 39 CD 73 39 CD 9E 36 C2 C8 55 CD 69 39 78 11    .9.s9..6..U.i9x.
00F5F0:  1F 9E CD 20 37 CA C8 55 CD 8E 39 21 1F 9E 22 D2    ... 7..U..9!..".
00F600:  00 57 23 22 00 57 CD 1B 36 CD 7E 36 2A 00 57 2B    .W#".W..6.~6*.W+
00F610:  29 29 29 29 EB CD E3 1C 19 22 02 57 EB 3A 00 57    )))).....".W.:.W
00F620:  FE 21 D2 19 4B CD 42 36 CD 72 36 CD 99 39 CD 63    .!..K.B6.r6..9.c
00F630:  39 CA 19 4B 01 10 00 62 6B CD F8 36 36 0D CD 63    9..K...bk..66..c
00F640:  39 CD F1 2A 7E FE 2C C2 7D 4C CD E3 1C EB CD 63    9..*~.,.}L.....c
00F650:  39 CD 11 27 CA 7D 4C 2A 02 57 EB CD 63 39 0E 00    9..'.}L*.W..c9..
00F660:  D5 7E FE 2C CA 76 4A CD 84 36 DA 6F 4A E6 5F 12    .~.,.vJ..6.oJ._.
00F670:  0C 13 23 C3 61 4A D1 79 B7 CA 7D 4C CA 7D 4C FE    ..#.aJ.y..}L.}L.
00F680:  0B D2 7D 4C CD 8E 39 21 0B 00 19 EB CD 69 39 E6    ..}L..9!.....i9.
00F690:  5F 32 DF 56 FE 43 CA B0 4A FE 4E CA B0 4A FE 4C    _2.V.C..J.N..J.L
00F6A0:  C2 85 4C 12 13 3E 01 12 13 13 13 AF 12 C3 00 4B    ..L..>.........K
00F6B0:  12 13 D5 CD 69 39 CD 69 39 CD FF 37 DA 8D 4C 7B    ....i9.i9..7..L{
00F6C0:  B7 CA 8D 4C 7A B7 C2 8D 4C 7B 3C CA 8D 4C 3D D1    ...Lz...L{<..L=.
00F6D0:  12 13 13 13 3A DF 56 FE 4E C2 00 4B CD 8E 39 CD    ....:.V.N..K..9.
00F6E0:  63 39 CA 00 4B FE 2C C2 95 4C CD 69 39 D5 CD FF    c9..K.,..L.i9...
00F6F0:  37 DA 95 4C CD 8E 39 CD 63 39 C2 95 4C 7B D1 12    7..L..9.c9..L{..
00F700:  1B 1B 1B 1A 2A 04 57 CD BB 36 11 E8 03 CD C0 36    ....*.W..6.....6
00F710:  DA 9D 4C 22 04 57 C3 FF 49 3E 0D 12 2A 00 57 2B    ..L".W..I>..*.W+
00F720:  7C B5 CA A5 4C 21 00 00 CD 2E 2C CD FF 2E CD D4    |...L!....,.....
00F730:  26 CD 45 25 3E 25 CD 70 3B CD 42 38 CA D0 55 3E    &.E%>%.p;.B8..U>
00F740:  41 CD F0 2B CD B5 2D CD D4 26 CD D8 2C CD 07 2E    A..+..-..&..,...
00F750:  CD 16 51 D2 50 4B CD D4 26 CD FF 2E CD 45 25 C3    ..Q.PK..&....E%.
00F760:  D0 55 CD 8E 39 CD 73 39 AF CD AD 27 DA D3 4C AF    .U..9.s9...'..L.
00F770:  CD F0 2B DA D3 4C CD B5 2D CD E3 1C 11 C6 99 01    ..+..L..-.......
00F780:  01 02 CD 7E 38 CD E3 1C 22 EE 56 01 09 02 CD F8    ...~8...".V.....
00F790:  36 21 00 00 22 04 57 2A EE 56 EB CD 37 2C DA 54    6!..".W*.V..7,.T
00F7A0:  4C CD DC 1C 7E FE 20 C2 97 4B 23 CD 8E 39 CD 63    L...~. ..K#..9.c
00F7B0:  39 CD F1 2A 0E 0A CD 63 39 FE 20 C2 BF 4B AF 12    9..*...c9. ..K..
00F7C0:  13 CD 69 39 0D C2 B9 4B AF 12 13 CD 63 39 E6 5F    ..i9...K....c9._
00F7D0:  FE 43 CA EC 4B FE 4E CA EC 4B FE 4C C2 B3 4C 12    .C..K.N..K.L..L.
00F7E0:  13 3E 01 12 13 13 13 AF 12 C3 31 4C 12 13 D5 CD    .>........1L....
00F7F0:  69 39 11 C8 56 0E 03 CD 78 38 CD 8E 39 21 C8 56    i9..V...x8..9!.V
00F800:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
00F810:  0D 00 00 00 02 09 48 E5 0D 00 C1 02 00 00 00 02    ......H.........
00F820:  0D 00 C6 02 00 00 00 02 0D 00 C2 02 00 00 00 02    ................
00F830:  0D 00 C7 02 00 00 00 02 0D 00 C3 02 00 00 00 02    ................
00F840:  0D 00 C8 02 00 00 00 02 0D 00 C4 02 00 00 00 02    ................
00F850:  0D 00 C9 02 00 00 00 02 0D 00 C5 02 00 00 00 02    ................
00F860:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F870:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F880:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F890:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F8F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00F900:  56 CD BB 36 36 00 AF 32 1E 9E 3A E0 56 B7 C8 21    V..66..2..:.V..!
00F910:  7E 97 CD 20 0B 3A DC 56 B7 C8 21 BB 9D 3A 4A 56    ~.. .:.V..!..:JV
00F920:  FE 4E C2 ED 54 7E B7 CA 33 54 FE 2E CA 33 54 23    .N..T~..3T...3T#
00F930:  C3 25 54 22 00 57 21 C7 9B 7E B7 CA 47 54 FE 2E    .%T".W!..~..GT..
00F940:  CA 47 54 23 C3 39 54 22 04 57 EB 2A 00 57 1B 2B    .GT#.9T".W.*.W.+
00F950:  7E B7 CA A8 54 FE 24 CA 90 54 FE 2A CA 90 54 FE    ~...T.$..T.*..T.
00F960:  23 CA 9A 54 FE 39 CA 9A 54 FE 2C C2 4F 54 1A B7    #..T.9..T.,.OT..
00F970:  CA 7D 54 FE 2D CA 9A 54 FE 20 C2 4F 54 2B 7E FE    .}T.-..T. .OT+~.
00F980:  24 CA 8B 54 FE 2A CA 8B 54 3E 20 23 77 C3 4F 54    $..T.*..T> #w.OT
00F990:  1A B7 CA 4F 54 FE 20 CA 4F 54 1A B7 CA A3 54 77    ...OT. .OT...£Tw
00F9A0:  C3 4E 54 36 20 C3 4F 54 2A 04 57 EB 2A 00 57 7E    .NT6 .OT*.W.*.W~
00F9B0:  B7 CA 25 55 1A B7 CA D4 54 13 23 1A B7 CA D4 54    ..%U....T.#....T
00F9C0:  7E B7 CA 25 55 FE 23 CA CF 54 FE 39 C2 BA 54 1A    ~..%U.#..T.9..T.
00F9D0:  77 C3 B9 54 7E B7 CA 25 55 FE 23 CA E7 54 FE 39    w..T~..%U.#..T.9
00F9E0:  CA E7 54 23 C3 D4 54 36 30 23 C3 D4 54 21 BB 9D    ..T#..T60#..T!..
00F9F0:  11 C7 9B 7E B7 CA 25 55 FE 58 C2 08 55 1A B7 CA    ...~..%U.X..U...
00FA00:  1F 55 77 13 23 C3 F3 54 FE 39 CA 12 55 FE 23 C2    .Uw.#..T.9..U.#.
00FA10:  1A 55 1A CD AB 36 DA 1F 55 77 13 23 C3 F3 54 36    .U...6..Uw.#..T6
00FA20:  20 23 C3 F3 54 21 BB 9D 22 CE 56 C9 3E 56 CD 70     #..T!..".V.>V.p
00FA30:  3B 3E 01 32 6F 44 C3 D0 55 22 C4 56 CD AC 06 21    ;>.2oD..U".V...!
00FA40:  9F 56 CD 2B 36 EB CD 35 36 21 00 01 22 E1 56 2A    .V.+6..56!..".V*
00FA50:  C4 56 11 0C 00 19 4E 06 00 21 0C 00 09 3A 54 01    .V....N..!...:T.
00FA60:  5F 16 00 0E 00 0C CD D8 36 D2 65 55 79 32 FB 56    _.......6.eUy2.V
00FA70:  2A E1 56 84 4F 3A 55 01 B9 D8 21 B9 56 01 0A 00    *.V.O:U...!.V...
00FA80:  3E 20 CD FA 36 2A C4 56 11 B9 56 7E B7 CA 96 55    > ..6*.V..V~...U
00FA90:  12 13 23 C3 8B 55 11 B9 56 2A E1 56 44 4D 21 C4    ..#..U..V*.VDM!.
00FAA0:  56 CD 72 06 2A E1 56 3A FB 56 84 67 22 E1 56 2A    V.r.*.V:.V.g".V*
00FAB0:  C4 56 11 10 00 19 22 C4 56 7E FE 0D C2 4F 55 C9    .V....".V~...OU.
00FAC0:  3E 01 32 6F 44 C3 D0 55 3E FF 32 6F 44 C3 D0 55    >.2oD..U>.2oD..U
00FAD0:  CD B5 06 3E 01 21 00 45 C3 C7 3B 54 54 54 40 40    ...>.!.E..;TTT@@
00FAE0:  C8 84 82 A6 8A 40 92 92 40 40 50 86 52 40 62 72    .....@..@@P.R@br
00FAF0:  70 62 40 40 A6 86 88 A0 40 40 40 40 AC CA E4 40    pb@@....@@@@...@
00FB00:  73 56 2B 2B 22 73 56 11 C6 99 CD C0 36 CA 13 4C    sV++"sV.....6..L
00FB10:  D2 34 4C CD E9 36 1A CD 9E 36 13 2A 77 56 EB 7E    .4L..6...6.*wV.~
00FB20:  B8 CA 2A 4C 12 23 13 C3 1F 4C EB 36 00 23 22 77    ..*L.#...L.6.#"w
00FB30:  56 C3 FF 4B 2A 77 56 36 00 21 C7 9B CD 42 4C CD    V..K*wV6.!...BL.
00FB40:  00 27 C5 D5 E5 0E 0C CD 05 00 7C B7 CA 59 4C 0E    .'........|..YL.
00FB50:  99 CD 05 00 C6 30 32 30 56 11 80 00 0E 1A CD 05    .....020V.......
00FB60:  00 11 2E 56 0E 16 CD 05 00 11 2E 56 0E 0F CD 05    ...V.......V....
00FB70:  00 E1 0E 00 11 81 00 7E B7 CA 83 4C 12 0C 13 23    .......~...L...#
00FB80:  C3 77 4C AF 12 79 32 80 00 E5 11 2E 56 0E 15 CD    .wL..y2.....V...
00FB90:  05 00 E1 23 7E B7 C2 72 4C 11 2E 56 0E 10 CD 05    ...#~..rL..V....
00FBA0:  00 0E 0C CD 05 00 7C B7 CA C9 4C 0E 9A CD 05 00    ......|...L.....
00FBB0:  11 80 00 19 E5 0E 99 CD 05 00 4F 06 00 E1 09 36    ..........O....6
00FBC0:  01 11 00 00 0E 8F CD 05 00 C3 00 00 3A 5A 44 32    ............:ZD2
00FBD0:  5C 00 AF 32 59 56 CD 73 39 CA 94 4D 11 9F 55 CD    \..2YV.s9..M..U.
00FBE0:  B1 37 C2 03 4D CD 8E 39 CD 73 39 CA 48 54 E6 5F    .7..M..9.s9.HT._
00FBF0:  D6 40 32 5C 00 CD 69 39 FE 3A C2 D6 4C CD 69 39    .@2\..i9.:..L.i9
00FC00:  C3 D6 4C 11 6E 55 CD B1 37 C2 48 54 CD 8E 39 CD    ..L.nU..7.HT..9.
00FC10:  73 39 CA 48 54 21 16 56 3E 20 01 0B 00 CD FA 36    s9.HT!.V> .....6
00FC20:  11 16 56 06 08 CD 63 39 B7 CA 8C 4D FE 20 CA 8C    ..V...c9...M. ..
00FC30:  4D FE 2E CA 5B 4D FE 2A CA 4B 4D FE 61 DA 42 4D    M...[M.*.KM.a.BM
00FC40:  E6 5F 12 13 CD 69 39 05 C3 28 4D EB 36 3F 23 05    ._...i9..(M.6?#.
00FC50:  C2 4C 4D CD 69 39 FE 2E C2 8C 4D CD 69 39 11 1E    .LM.i9....M.i9..
00FC60:  56 06 03 B7 CA 8C 4D FE 20 CA 8C 4D FE 2A CA 81    V.....M. ..M.*..
00FC70:  4D FE 61 DA 78 4D E6 5F 12 13 CD 69 39 05 C3 63    M.a.xM._...i9..c
00FC80:  4D EB 36 3F 23 05 C2 82 4D CD 69 39 3E FF 32 59    M.6?#...M.i9>.2Y
00FC90:  56 C3 D6 4C CD 1B 36 3A 59 56 B7 C2 B9 4D 21 73    V..L..6:YV...M!s
00FCA0:  55 CD 28 36 21 22 56 11 5D 00 01 0C 00 CD 7E 38    U.(6!"V.].....~8
00FCB0:  CD CE 4D CD 1B 36 C3 5B 54 21 16 56 11 5D 00 01    ..M..6.[T!.V.]..
00FCC0:  0C 00 CD 7E 38 CD CE 4D CD 1B 36 C3 5B 54 21 AD    ...~8..M..6.[T!.
00FCD0:  56 22 AB 56 36 0D 11 80 00 0E 1A CD 05 00 11 5C    V".V6..........\
00FCE0:  00 CD FD 4E D2 EE 4D 21 9A 55 CD 28 36 C9 EB 2A    ...N..M!.U.(6..*
00FCF0:  AB 56 EB 01 08 00 3A 59 56 B7 CA 00 4E 01 0B 00    .V....:YV...N...
00FD00:  64 5C 2C 00 00 00 00 00 00 00 00 00 00 00 00 00    d\,.............
00FD10:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00FD20:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
00FD30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 46    ...............F
00FD40:  56 3E 14 C3 37 5B E5 CD 63 39 CD 15 C7 9B 53 42    V>..7[..c9....SB
00FD50:  45 46 4F 52 45 00 42 4C 41 4E 4B 00 43 48 41 4E    EFORE.BLANK.CHAN
00FD60:  47 45 3F 20 00 44 45 4C 49 4D 49 54 45 44 00 54    GE? .DELIMITED.T
00FD70:  4F 3A 20 20 20 20 20 00 46 49 45 4C 44 00 46 52    O:     .FIELD.FR
00FD80:  4F 4D 00 47 45 54 00 50 49 43 54 55 52 45 00 52    OM.GET.PICTURE.R
00FD90:  45 43 4F 52 44 20 00 53 41 59 00 53 44 46 00 52    ECORD .SAY.SDF.R
00FDA0:  45 43 4F 52 44 20 23 20 00 54 4F 20 20 20 20 20    ECORD # .TO     
00FDB0:  20 20 00 55 53 49 4E 47 00 00 45 3E 03 21 12 45      .USING..E>.!.E
00FDC0:  C3 C7 3B 00 73 39 00 00 00 00 00 00 C2 D6 56 AF    ..;.s9........V.
00FDD0:  CD 89 2E C3 00 45 11 82 5E CD B1 37 00 14 5B 3E    .....E..^..7..[>
00FDE0:  00 CD 89 2E C3 00 45 CD 73 39 11 D8 5E 01 32 54    ......E.s9..^.2T
00FDF0:  4F 3A 20 20 20 20 20 00 46 49 45 4C 44 00 46 52    O:     .FIELD.FR
00FE00:  C3 24 45 C3 38 4A C3 B4 4B C3 CC 4C C3 27 4F C3    .$E.8J..K..L.'O.
00FE10:  D9 4F C3 A0 50 C3 8E 51 C3 FA 51 C3 8F 52 C3 59    .O..P..Q..Q..R.Y
00FE20:  53 C3 B9 53 CD DD 25 AF 32 5F 56 32 5D 56 32 5E    S..S..%.2_V2]V2^
00FE30:  56 32 5A 56 32 5B 56 32 5C 56 CD E3 1C 11 C6 99    V2ZV2[V2\V......
00FE40:  01 01 02 CD 7E 38 21 7E 97 22 71 56 CD 73 39 CA    ....~8!~."qV.s9.
00FE50:  5B 46 CD E9 25 DA 48 54 CD 73 39 CA 5B 46 11 AC    [F..%.HT.s9.[F..
00FE60:  55 CD B1 37 C2 7C 45 22 61 56 CD 8E 39 AF CD AD    U..7.|E"aV..9...
00FE70:  27 DA 23 4A 3E FF 32 5F 56 C3 4C 45 11 62 55 CD    '.#J>.2_V.LE.bU.
00FE80:  B1 37 C2 ED 45 3E FF 32 5D 56 CD 8E 39 21 C6 99    .7..E>.2]V..9!..
00FE90:  36 0D 22 73 56 CD 73 39 CD F1 2A C2 A3 45 3E 14    6."sV.s9..*.£E>.
00FEA0:  C3 2A 4A E5 CD 63 39 CD 92 28 E5 CA B3 45 3E 52    .*J..c9..(...E>R
00FEB0:  C3 2A 4A 0E 10 EB 2A 73 56 EB CD 78 38 21 10 00    .*J...*sV..x8!..
00FEC0:  19 36 0D 22 73 56 E1 D5 EB 2A 71 56 36 2D 23 CD    .6."sV...*qV6-#.
00FED0:  E4 36 D1 CD E4 36 36 35 22 71 56 E1 CD 8E 39 CD    .6...665"qV...9.
00FEE0:  73 39 FE 2C C2 4C 45 CD 69 39 C3 95 45 11 A2 55    s9.,.LE.i9..E..U
00FEF0:  CD B1 37 C2 15 46 3E FF 32 5E 56 CD 8E 39 CD 73    ..7..F>.2^V..9.s
00FF00:  CD 7E 38 EB 09 22 AB 56 36 0D CD 04 4F D2 EE 4D    .~8..".V6...O..M
00FF10:  21 AD 56 22 AB 56 CD 1B 36 1E 04 2A AB 56 7E FE    !.V".V..6..*.V~.
00FF20:  0D C8 3A 59 56 B7 C2 D4 4E 01 08 00 11 5D 00 CD    ..:YV...N....]..
00FF30:  7E 38 22 AB 56 AF 32 68 00 21 5D 00 CD 13 2C CD    ~8".V.2h.!]...,.
00FF40:  7E 36 01 03 00 CD 13 2C CD 72 36 AF 32 7C 00 11    ~6.....,.r6.2|..
00FF50:  80 00 0E 1A CD 05 00 0E 0F 11 5C 00 CD 05 00 B7    ..........\.....
00FF60:  FA C8 4E 11 5C 00 0E 14 CD 05 00 11 80 00 1A FE    ..N.\...........
00FF70:  02 C2 AE 4E 13 1A 6F 13 1A 67 CD 35 36 CD 72 36    ...N..o..g.56.r6
00FF80:  13 1A CD 3A 36 3E 2F CD E8 35 13 1A CD 3A 36 3E    ...:6>/..5...:6>
00FF90:  2F CD E8 35 13 1A CD 3A 36 CD 1B 36 3A 5F 01 B7    /..5...:6..6:_..
00FFA0:  CA 1B 4E 11 5C 00 0E 10 CD 05 00 C3 1B 4E 3E 17    ..N.\........N>.
00FFB0:  CD 70 3B CD 1B 36 3A 5F 01 B7 CA 1B 4E 11 5C 00    .p;..6:_....N.\.
00FFC0:  0E 10 CD 05 00 C3 1B 4E 21 AF 55 CD 2B 36 CD 1B    .......N!.U.+6..
00FFD0:  36 C3 1B 4E 01 08 00 CD 13 2C 3E 2E CD E8 35 01    6..N.....,>...5.
00FFE0:  03 00 CD 13 2C 22 AB 56 1D CA F5 4E CD 72 36 CD    ....,".V...N.r6.
00FFF0:  78 36 C3 1B 4E CD 1B 36 1E 04 C3 1B 4E C5 D5 0E    x6..N..6....N...
010000:  11 C3 08 4F C5 D5 0E 12 11 5C 00 CD 05 00 FE FF    ...O.....\......
010010:  C2 17 4F 37 D1 C1 C9 E6 03 06 00 0F 0F 0F 3C 4F    ..O7..........<O
010020:  21 80 00 09 D1 C1 C9 AF 32 69 56 21 00 00 22 6A    !.......2iV!.."j
010030:  56 CD D8 1C 7E B7 CA A9 4F 22 51 56 E5 CD 1B 36    V...~...O"QV...6
010040:  01 0A 00 CD 13 2C CD 7B 36 21 69 56 34 E1 E5 3E    .....,.{6!iV4..>
010050:  28 CD E8 35 11 0B 00 19 7E E6 7F E5 CD E8 35 3E    (..5....~.....5>
010060:  29 CD E8 35 CD 7B 36 E1 7E E6 7F FE 4E CA 84 4F    )..5.{6.~...N..O
010070:  23 7E 32 54 56 B7 C2 7A 4F 3C 32 66 56 AF 32 55    #~2TV..zO<2fV.2U
010080:  56 C3 95 4F 23 7E 32 55 56 23 23 23 7E 32 54 56    V..O#~2UV###~2TV
010090:  3E 06 32 66 56 21 50 56 CD 20 0B 3A 66 56 2A 6A    >.2fV!PV. .:fV*j
0100A0:  56 CD BB 36 23 22 6A 56 E1 11 10 00 19 7E FE 0D    V..6#"jV.....~..
0100B0:  C2 34 4F CD 1B 36 3E 60 CD 70 3B CD 72 36 3A 69    .4O..6>`.p;.r6:i
0100C0:  56 CD 3A 36 21 34 55 CD 2B 36 2A 6A 56 CD 35 36    V.:6!4U.+6*jV.56
0100D0:  21 46 55 CD 2B 36 C3 5B 54 AF 32 5D 56 32 5B 56    !FU.+6.[T.2]V2[V
0100E0:  CD 73 39 CA 1D 50 11 69 55 CD B1 37 C2 09 50 CD    .s9..P.iU..7..P.
0100F0:  8E 39 3E 03 CD AD 27 3E FF 32 5D 56 3E 01 CD F0    .9>...'>.2]V>...
010100:  39 11 59 55 CD B1 37 C2 4C 45 3E FF 32 5C 56 CD    9.YU..7.LE>.2\V.
010110:  8E 39 C3 4C 45 11 12 56 CD B1 37 C2 29 46 3E FF    .9.LE..V..7.)F>.
010120:  32 5A 56 CD 8E 39 C3 4C 45 11 2A 55 CD B1 37 C2    2ZV..9.LE.*U..7.
010130:  48 54 3E FF 32 5A 56 32 5B 56 CD 8E 39 CD 73 39    HT>.2ZV2[V..9.s9
010140:  11 C0 55 CD B1 37 C2 4C 45 CD 8E 39 CD 73 39 CA    ..U..7.LE..9.s9.
010150:  48 54 32 4F 56 CD 69 39 C3 4C 45 3A 5F 56 B7 CA    HT2OV.i9.LE:_V..
010160:  28 4A 2A 61 56 CD 8E 39 3A 5A 56 B7 C2 73 46 AF    (J*aV..9:ZV..sF.
010170:  C3 75 46 3E 04 CD AD 27 3E C1 CD F0 2B CD 3C 27    .uF>...'>...+.<'
010180:  32 4D 44 3A 5A 56 B7 C2 BA 46 21 BE 99 AF 36 02    2MD:ZV...F!...6.
010190:  23 77 23 77 23 EB CD E3 1C 2B 2B 2B 2B 2B 0E 03    #w#w#....+++++..
0101A0:  CD 78 38 3A 5C 56 B7 C2 5C 49 01 09 02 11 BE 99    .x8:\V..\I......
0101B0:  CD C4 2E 3A 5E 56 B7 C2 DF 49 CD 61 27 01 C7 9B    ...:^V...I.a'...
0101C0:  21 C6 99 CD 75 25 21 FF FF CD 5B 26 21 00 00 22    !...u%!...[&!.."
0101D0:  73 56 DA CA 49 21 64 00 22 6F 56 CD 99 2C 7C B5    sV..I!d."oV..,|.
0101E0:  CA CA 49 CD 78 27 CA 50 49 DA CA 49 CD DC 1C CA    ..I.x'.PI..I....
0101F0:  50 49 2A 73 56 23 22 73 56 2A 6F 56 2B 22 6F 56    PI*sV#"sV*oV+"oV
010200:  7C B5 C2 20 47 3A 7D 44 B7 CA 20 47 2A 73 56 CD    |.. G:}D.. G*sV.
010210:  1B 36 CD 35 36 3E 27 CD 70 3B 21 64 00 22 6F 56    .6.56>'.p;!d."oV
010220:  3A 5D 56 B7 CA 2D 48 3A 5B 56 B7 C2 47 47 2A C4    :]V..-H:[V..GG*.
010230:  99 44 4D 21 C7 9B 3E 20 CD FA 36 21 7E 97 CD 20    .DM!..> ..6!~.. 
010240:  0B 11 C7 9B C3 31 48 21 7E 97 22 6C 56 21 C7 9B    .....1H!~."lV!..
010250:  22 77 56 0E 00 2A 6C 56 7E FE 35 CA 13 48 23 CD    "wV..*lV~.5..H#.
010260:  E9 36 23 23 22 6C 56 EB 11 0B 00 19 7E FE 4E CA    .6##"lV.....~.N.
010270:  C5 47 23 46 23 CD E9 36 2A 77 56 79 B7 CA 83 47    .G#F#..6*wVy...G
010280:  36 2C 23 3A 4F 56 FE 2C CA 8D 47 77 23 EB CD 71    6,#:OV.,..Gw#..q
010290:  38 EB 78 CD BB 36 2B 7E FE 20 C2 A1 47 05 C2 96    8.x..6+~. ..G...
0102A0:  47 23 3A 4F 56 FE 2C CA B2 47 77 23 22 77 56 C3    G#:OV.,..Gw#"wV.
0102B0:  0F 48 2B 7E FE 20 C2 BE 47 2B 05 C2 B3 47 23 22    .H+~. ..G+...G#"
0102C0:  77 56 C3 0F 48 23 46 23 CD E9 36 2A 77 56 79 B7    wV..H#F#..6*wVy.
0102D0:  CA D6 47 36 2C 23 EB 3A 4F 56 FE 2C CA ED 47 CD    ..G6,#.:OV.,..G.
0102E0:  71 38 EB 78 CD BB 36 22 77 56 C3 0F 48 7E 23 FE    q8.x..6"wV..H~#.
0102F0:  20 C2 FB 47 05 CA 08 48 C3 ED 47 12 13 05 C2 ED     ..G...H..G.....
010300:  2B D2 E0 4F 3E 58 C3 53 54 11 1D 55 CD B1 37 C2    +..O>X.ST..U..7.
010310:  48 54 CD 8E 39 3E FF 32 5B 56 C3 E0 4F 3A 5D 56    HT..9>.2[V..O:]V
010320:  B7 CA 48 54 3A 5B 56 B7 C2 2E 50 CD 20 29 11 79    ..HT:[V...P. ).y
010330:  56 01 10 00 CD 7A 2C DA 97 50 21 0B 00 19 7E FE    V....z,..P!...~.
010340:  CE CA 55 50 FE CC CA 63 50 06 00 23 4E 79 3C 32    ..UP...cP..#Ny<2
010350:  6E 56 C3 6B 50 23 46 23 23 23 4E 3E 06 32 6E 56    nV.kP#F###N>.2nV
010360:  C3 6B 50 01 00 00 3E 01 32 6E 56 21 79 56 CD 72    .kP...>.2nV!yV.r
010370:  2A 22 57 56 3A 6E 56 4F 06 00 11 AD 56 CD 7A 2C    *"WV:nVO....V.z,
010380:  2A 57 56 11 0D 00 19 CD E9 36 3A 6E 56 4F 21 AD    *WV......6:nVO!.
010390:  56 CD 78 38 C3 2E 50 CD 45 25 CD 61 27 C3 5B 54    V.x8..P.E%.a'.[T
0103A0:  AF 32 5D 56 32 5B 56 CD 73 39 CA 18 51 11 AC 55    .2]V2[V.s9..Q..U
0103B0:  CD B1 37 C2 DD 50 CD 8E 39 3E 03 CD AD 27 DA 89    ..7..P..9>...'..
0103C0:  51 3E 81 CD F0 2B DA 89 51 CD 3C 27 32 4D 44 CD    Q>...+..Q.<'2MD.
0103D0:  D8 1C 22 67 56 3E FF 32 5D 56 C3 A7 50 11 26 55    .."gV>.2]V..P.&U
0103E0:  CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 11    ..7.HT..9.s9.HT.
0103F0:  6E 55 CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48    nU..7.HT..9.s9.H
010400:  54 22 73 56 CD 69 39 FE 20 CA 10 51 B7 C2 04 51    T"sV.i9. ..Q...Q
010410:  3E FF 32 5B 56 C3 A7 50 3A 5D 56 B7 CA 84 51 2A    >.2[V..P:]V...Q*
010420:  67 56 7E B7 CA 64 51 EB 3A 5B 56 B7 CA 38 51 2A    gV~..dQ.:[V..8Q*
010430:  73 56 CD 8E 54 C2 64 51 01 10 00 CD C4 2E 21 0B    sV..T.dQ......!.
010440:  00 19 46 23 4E 23 CD E9 36 78 FE CE CA 58 51 FE    ..F#N#..6x...XQ.
010450:  CC CA 5D 51 0C C3 5F 51 0E 06 C3 5F 51 0E 01 06    ..]Q.._Q..._Q...
010460:  00 CD C4 2E 2A 67 56 11 10 00 19 22 67 56 7E FE    ....*gV...."gV~.
010470:  0D C2 1F 51 CD D4 26 CD 45 25 AF 32 4D 44 CD 61    ...Q..&.E%.2MD.a
010480:  27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32    '.[T>H.ST>(.ST.2
010490:  5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF    [V.c9.nU..7..Q>.
0104A0:  32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD    2[V.c9.RU..7.HT.
0104B0:  8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67    .9.s9.HT"qV..."g
0104C0:  56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56    V*gV~...Q.*qV:[V
0104D0:  B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54    ...Q..T..Q..Q..T
0104E0:  C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67    ..Q..y**gV...."g
0104F0:  56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F    V~....Q.[T..%.2_
010500:  47 EB 22 77 56 C3 0F 48 EB 36 30 23 22 77 56 0C    G."wV..H.60#"wV.
010510:  C3 55 47 11 C7 9B 2A 77 56 36 0D 23 36 0A 23 CD    .UG...*wV6.#6.#.
010520:  D8 36 44 4D 3A 4D 44 CD D1 25 C3 50 49 CD DC 1C    .6DM:MD..%.PI...
010530:  EB 3A 5A 56 B7 C2 4C 48 2A C4 99 44 4D 3A 4D 44    .:ZV..LH*..DM:MD
010540:  CD 40 27 CD C4 2E CD 61 27 C3 50 49 3A 5B 56 B7    .@'....a'.PI:[V.
010550:  C2 6D 48 2A C4 99 19 36 0D 23 36 0A 3A 4D 44 2A    .mH*...6.#6.:MD*
010560:  C4 99 44 4D 03 03 13 CD D1 25 C3 50 49 21 C7 9B    ..DM.....%.PI!..
010570:  22 77 56 CD E3 1C 22 71 56 0E 00 2A 71 56 7E FE    "wV..."qV..*qV~.
010580:  0D CA 39 49 11 0B 00 19 7E FE 4E CA E1 48 23 46    ..9I....~.N..H#F
010590:  23 CD E9 36 2A 77 56 79 B7 CA 9F 48 36 2C 23 3A    #..6*wVy...H6,#:
0105A0:  4F 56 FE 2C CA A9 48 77 23 EB CD 71 38 EB 78 CD    OV.,..Hw#..q8.x.
0105B0:  BB 36 2B 7E FE 20 C2 BD 48 05 C2 B2 48 23 3A 4F    .6+~. ..H...H#:O
0105C0:  56 FE 2C CA CE 48 77 23 22 77 56 C3 2B 49 2B 7E    V.,..Hw#"wV.+I+~
0105D0:  FE 20 C2 DA 48 2B 05 C2 CF 48 23 22 77 56 C3 2B    . ..H+...H#"wV.+
0105E0:  49 23 46 23 CD E9 36 2A 77 56 79 B7 CA F2 48 36    I#F#..6*wVy...H6
0105F0:  2C 23 EB 3A 4F 56 FE 2C CA 09 49 CD 71 38 EB 78    ,#.:OV.,..I.q8.x
010600:  CD BB 36 22 77 56 C3 2B 49 7E 23 FE 20 C2 17 49    ..6"wV.+I~#. ..I
010610:  05 CA 24 49 C3 09 49 12 13 05 C2 09 49 EB 22 77    ..$I..I.....I."w
010620:  56 C3 2B 49 EB 36 30 23 22 77 56 2A 71 56 11 10    V.+I.60#"wV*qV..
010630:  00 19 22 71 56 0C C3 7B 48 11 C7 9B 2A 77 56 36    .."qV..{H...*wV6
010640:  0D 23 36 0A 23 CD D8 36 44 4D 3A 4D 44 CD D1 25    .#6.#..6DM:MD..%
010650:  CD 47 2B CA CA 49 D2 E3 46 C3 CA 49 21 C5 55 11    .G+..I..F..I!.U.
010660:  C6 99 01 41 00 CD 7E 38 01 09 02 11 BE 99 CD C4    ...A..~8........
010670:  2E CD E3 1C 22 67 56 21 00 00 22 73 56 2A 67 56    ...."gV!.."sV*gV
010680:  7E FE 0D CA CA 49 11 C7 9B 3E 20 12 13 06 0A 7E    ~....I...> ....~
010690:  B7 C2 96 49 3E 20 12 23 13 05 C2 8F 49 23 7E 12    ...I> .#....I#~.
0106A0:  13 23 7E CD 63 54 23 23 23 7E CD 63 54 11 10 00    .#~.cT###~.cT...
0106B0:  2A 67 56 19 22 67 56 01 12 00 11 C7 9B CD C4 2E    *gV."gV.........
0106C0:  2A 73 56 23 22 73 56 C3 7D 49 3A 7D 44 B7 CA DF    *sV#"sV.}I:}D...
0106D0:  49 2A 73 56 CD 1B 36 CD 35 36 3E 27 CD 70 3B 3A    I*sV..6.56>'.p;:
0106E0:  4D 44 CD 40 27 CD D4 26 3A 5C 56 B7 C2 FD 49 3A    MD.@'..&:\V...I:
0106F0:  5E 56 B7 C2 16 4A 3A 5A 56 B7 C2 16 4A CD A8 2D    ^V...J:ZV...J..-
010700:  56 CD E9 25 DA 48 54 CD 73 39 CA 3B 52 11 AC 55    V..%.HT.s9.;R..U
010710:  CD B1 37 C2 48 54 CD 8E 39 CD 73 39 CA 48 54 01    ..7.HT..9.s9.HT.
010720:  00 05 CD 72 2A 22 73 56 3E FF 32 5F 56 CD 69 39    ...r*"sV>.2_V.i9
010730:  CA 3B 52 FE 20 C2 2D 52 C3 01 52 01 00 00 CD 2A    .;R. .-R..R....*
010740:  2C 7C B5 CA 62 52 21 FF FF CD 5B 26 DA 62 52 CD    ,|..bR!...[&.bR.
010750:  78 27 CA 59 52 DA 62 52 03 CD 47 2B CA 62 52 D2    x'.YR.bR..G+.bR.
010760:  4F 52 3A 7D 44 B7 CA 73 52 3E 22 CD 70 3B 60 69    OR:}D..sR>".p;`i
010770:  CD 35 36 3A 5F 56 B7 CA 5B 54 60 69 CD 18 34 2A    .56:_V..[T`i..4*
010780:  73 56 11 0D 00 19 CD E9 36 CD E5 34 C3 5B 54 3E    sV......6..4.[T>
010790:  67 CD 70 3B CD 61 27 CD 3C 27 CD C4 25 3E 72 CD    g.p;.a'.<'..%>r.
0107A0:  70 3B CD 2A 2C CD 35 36 3E 77 CD 70 3B CD E3 1C    p;.*,.56>w.p;...
0107B0:  2B 2B 2B 2B 2B EB 1A CD 3A 36 3E 2F CD E8 35 13    +++++...:6>/..5.
0107C0:  1A CD 3A 36 3E 2F CD E8 35 13 1A CD 3A 36 CD 7F    ..:6>/..5...:6..
0107D0:  2E FE 01 CA DE 52 3E 70 CD 70 3B C3 E3 52 3E 71    .....R>p.p;..R>q
0107E0:  CD 70 3B 3E 66 CD 70 3B CD E3 1C 0E 00 7E FE 0D    .p;>f.p;.....~..
0107F0:  CA 3F 53 0C CD 1B 36 79 E5 CD 42 36 CD 72 36 E1    .?S...6y..B6.r6.
010800:  C5 E5 01 0A 00 CD 13 2C CD 78 36 E1 C1 11 0B 00    .......,.x6.....
010810:  E5 19 7E CD E8 35 CD 75 36 23 7E E5 CD 42 36 E1    ..~..5.u6#~..B6.
010820:  CD 75 36 23 23 23 46 7E B7 CC 78 36 78 B7 CA 34    .u6###F~..x6x..4
010830:  53 CD 42 36 CD 78 36 E1 11 10 00 19 C3 ED 52 CD    S.B6.x6.......R.
010840:  1B 36 3E 60 CD 70 3B CD 72 36 CD 72 36 CD 78 36    .6>`.p;.r6.r6.x6
010850:  CD 84 29 CD 35 36 C3 5B 54 3E 65 CD 70 3B CD 8E    ..).56.[T>e.p;..
010860:  3A FE 1B C2 6D 53 3A 70 44 B7 C2 7E 44 F5 CD 73    :...mS:pD..~D..s
010870:  39 CA B5 53 11 AC 55 CD B1 37 C2 48 54 CD 8E 39    9..S..U..7.HT..9
010880:  CD 73 39 CA 48 54 E5 CD 15 2A C2 90 53 CD 79 2A    .s9.HT...*..S.y*
010890:  E1 01 01 00 CD 72 2A 11 0D 00 19 CD DF 36 36 01    .....r*......66.
0108A0:  23 F1 FE 20 D2 A9 53 3E 20 77 CD E8 35 3E 0D CD    #.. ..S> w..5>..
0108B0:  E8 35 C3 5B 54 F1 C3 5B 54 CD 73 39 3E 08 CD AD    .5.[T..[T.s9>...
0108C0:  27 3E 01 CD F0 2B DA 17 54 32 4D 44 3A 4D 44 11    '>...+..T2MD:MD.
0108D0:  C7 9B CD B2 25 DA 0A 54 11 C8 9B 0E 02 CD 1C 54    ....%..T.......T
0108E0:  7D 32 65 56 B7 CA 0A 54 0E 04 CD 1C 54 22 63 56    }2eV...T....T"cV
0108F0:  13 13 0E 02 CD 1C 54 7D 2A 63 56 77 23 22 63 56    ......T}*cVw#"cV
010900:  01 08 00 2A 73 56 EB 21 BE 99 36 02 23 CD E4 36    ...*sV.!..6.#..6
010910:  11 BE 99 CD C4 2E CD 45 25 AF 32 4D 44 CD 61 27    .......E%.2MD.a'
010920:  C3 5B 54 3E 28 C3 2A 4A 3E 48 CD 70 3B CD 61 27    .[T>(.*J>H.p;.a'
010930:  3E 01 32 6F 44 C3 5B 54 CD 3C 29 CD DD 25 21 7E    >.2oD.[T.<)..%!~
010940:  97 22 6C 56 3E 41 32 07 56 AF 32 76 56 32 75 56    ."lV>A2.V.2vV2uV
010950:  32 60 56 32 79 56 21 79 56 22 71 56 CD 73 39 CD    2`V2yV!yV"qV.s9.
010960:  E9 25 DA 48 54 CD 73 39 CA 46 4B 11 AC 55 CD B1    .%.HT.s9.FK..U..
010970:  37 CA E8 4A 3A 75 56 3C 32 75 56 FE 06 D2 AF 4B    7..J:uV<2uV....K
010980:  EB 2A 6C 56 EB CD F2 14 DA 48 54 3E FF 32 60 56    .*lV.....HT>.2`V
010990:  EB 22 6C 56 23 CD F3 36 78 B7 CA AA 4B 21 07 56    ."lV#..6x...K!.V
0109A0:  34 CD 72 2A EB 21 0D 00 19 CD DF 36 01 06 00 CD    4.r*.!.....6....
0109B0:  F8 36 2A 6C 56 36 29 23 CD E4 36 36 05 23 36 2F    .6*lV6)#..66.#6/
0109C0:  23 CD E4 36 36 35 22 6C 56 2A 71 56 36 30 23 CD    #..665"lV*qV60#.
0109D0:  E4 36 36 35 22 71 56 CD 63 39 CA 46 4B FE 2C C2    .665"qV.c9.FK.,.
0109E0:  5C 4A CD 69 39 C3 5C 4A CD 8E 39 3E FF 32 76 56    \J.i9.\J..9>.2vV
0109F0:  21 79 56 22 71 56 CD 73 39 CA 46 4B CD 15 2A C2    !yV"qV.s9.FK..*.
010A00:  05 4B CD 79 2A 2A 71 56 7E B7 CA A5 4B 23 CD E9    .K.y**qV~...K#..
010A10:  36 22 71 56 62 6B 01 0A 00 CD F8 36 CD 73 39 CD    6"qVbk.....6.s9.
010A20:  F1 2A CD 63 39 7E CD 84 36 DA 2E 4B E6 5F 12 13    .*.c9~..6..K._..
010A30:  23 0D C2 25 4B CD 8E 39 CD 73 39 FE 2C C2 5C 4A    #..%K..9.s9.,.\J
010A40:  CD 69 39 C2 FC 4A 3A 60 56 B7 CA A5 4B 21 FF FF    .i9..J:`V...K!..
010A50:  CD 5B 26 DA 74 4B CD 78 27 CA 6B 4B DA 74 4B CD    .[&.tK.x'.kK.tK.
010A60:  DC 1C CA 6B 4B 21 7E 97 CD 20 0B CD 47 2B CA 74    ...kK!~.. ..G+.t
010A70:  4B D2 56 4B 3A 7D 44 B7 CA 84 4B 21 79 56 CD 1B    K.VK:}D...K!yV..
010A80:  36 CD 20 0B 3E 41 32 07 56 3A 76 56 B7 C2 5B 54    6. .>A2.V:vV..[T
010A90:  21 79 56 7E FE 35 CA 5B 54 23 CD E9 36 EB CD 79    !yV~.5.[T#..6..y
010AA0:  2A EB C3 93 4B 3E 4A C3 2A 4A 3E 4B C3 2A 4A 3E    *...K>J.*J>K.*J>
010AB0:  4C C3 2A 4A CD 63 39 11 AC 55 CD B1 37 C2 48 54    L.*J.c9..U..7.HT
010AC0:  CD 8E 39 CD 73 39 11 C6 99 CD 9E 36 C2 48 54 EB    ..9.s9.....6.HT.
010AD0:  CD E4 36 EB CD 69 39 CA 48 54 B8 C2 D4 4B CD 69    ..6..i9.HT...K.i
010AE0:  39 CD 73 39 CA F5 4B FE 2C C2 48 54 CD 69 39 CD    9.s9..K.,.HT.i9.
010AF0:  73 39 C2 C9 4B EB 22 73 56 21 C7 9B 22 77 56 2A    s9..K."sV!.."wV*
010B00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
010B10:  0E 00 00 00 02 09 47 E5 0E 00 C1 02 00 00 00 02    ......G.........
010B20:  0E 00 C6 02 00 00 00 02 0E 00 C2 02 00 00 00 02    ................
010B30:  0E 00 C7 02 00 00 00 02 0E 00 C3 02 00 00 00 02    ................
010B40:  0E 00 C8 02 00 00 00 02 0E 00 C4 02 00 00 00 02    ................
010B50:  0E 00 C9 02 00 00 00 02 0E 00 C5 02 00 00 00 02    ................
010B60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010B70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010B80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010B90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010BF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010C00:  21 65 56 35 C2 F2 53 C3 CC 53 CD 45 25 AF 32 4D    !eV5..S..S.E%.2M
010C10:  44 CD 61 27 C3 5B 54 3E 58 C3 53 54 21 00 00 1A    D.a'.[T>X.ST!...
010C20:  FE 47 DA 27 54 E6 5F D6 30 D8 C6 E9 D8 C6 06 F2    .G.'T._.0.......
010C30:  35 54 C6 07 D8 C6 0A B7 C5 4F 06 00 29 29 29 29    5T.......O..))))
010C40:  09 C1 13 0D C8 C3 1F 54 CD 61 27 3E FF 32 6F 44    .......T.a'>.2oD
010C50:  C3 5B 54 CD 70 3B 3E 01 32 6F 44 3E 01 21 00 45    .[T.p;>.2oD>.!.E
010C60:  C3 C7 3B E5 26 00 6F 01 64 00 CD 7B 54 01 0A 00    ..;.&.o.d..{T...
010C70:  CD 7B 54 01 01 00 CD 7B 54 E1 C9 D5 16 2F 14 7D    .{T....{T..../.}
010C80:  91 6F 7C 98 67 D2 7E 54 09 7A D1 12 13 C9 D5 EB    .o|.g.~T.z......
010C90:  1A B7 CA B5 54 FE 20 CA B5 54 FE 2A CA B7 54 FE    ....T. ..T.*..T.
010CA0:  3F CA B0 54 CD 84 36 DA AC 54 E6 5F BE C2 B7 54    ?..T..6..T._...T
010CB0:  13 23 C3 90 54 7E B7 D1 C9 54 54 54 40 40 C8 84    .#..T~...TTT@@..
010CC0:  82 A6 8A 40 92 92 40 40 50 86 52 40 62 72 70 62    ...@..@@P.R@brpb
010CD0:  40 40 A6 86 88 A0 40 40 40 40 AC CA E4 40 64 5C    @@....@@@@...@d\
010CE0:  2C 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ,...............
010CF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010D00:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
010D10:  00 00 00 00 00 00 00 00 00 00 00 00 00 41 44 44    .............ADD
010D20:  49 54 49 56 45 00 41 4C 4C 00 44 45 4C 49 4D 49    ITIVE.ALL.DELIMI
010D30:  54 45 44 00 20 56 41 52 49 41 42 4C 45 53 20 20    TED. VARIABLES  
010D40:  20 20 20 20 20 00 20 4F 43 54 45 54 53 20 20 20         . OCTETS   
010D50:  20 00 45 58 43 45 50 54 00 45 58 54 45 4E 44 45     .EXCEPT.EXTENDE
010D60:  44 00 46 49 45 4C 44 53 00 46 52 4F 4D 00 4C 49    D.FIELDS.FROM.LI
010D70:  4B 45 00 4E 4F 4D 53 20 46 49 43 48 49 45 52 53    KE.NOMS FICHIERS
010D80:  20 20 20 20 45 4E 52 45 47 2E 20 20 20 20 4D 49        ENREG.    MI
010D90:  53 20 41 20 4A 4F 55 52 20 00 52 69 65 6E 00 4F    S A JOUR .Rien.O
010DA0:  4E 00 53 54 52 55 43 54 55 52 45 00 54 4F 00 46    N.STRUCTURE.TO.F
010DB0:  49 4C 45 20 55 4E 41 56 41 49 4C 41 42 4C 45 00    ILE UNAVAILABLE.
010DC0:  57 49 54 48 00 46 49 45 4C 44 3A 4E 41 4D 45 00    WITH.FIELD:NAME.
010DD0:  43 0A 01 00 00 46 49 45 4C 44 3A 54 59 50 45 00    C....FIELD:TYPE.
010DE0:  43 01 0B 00 00 46 49 45 4C 44 3A 4C 45 4E 00 00    C....FIELD:LEN..
010DF0:  4E 03 0C 00 00 46 49 45 4C 44 3A 44 45 43 00 00    N....FIELD:DEC..
010E00:  33 51 B7 C2 0B 49 3E 40 CD 70 3B 2A 39 51 36 2B    3Q...I>@.p;*9Q6+
010E10:  23 22 39 51 CD 48 4D FE 0D CA 20 49 B7 C2 31 49    #"9Q.HM... I..1I
010E20:  2A 39 51 EB 13 3E 20 12 AF 32 3B 51 3E 01 C3 5E    *9Q..> ..2;Q>..^
010E30:  49 2A 39 51 23 EB CD 63 39 FE 3C CA 47 49 FE 3E    I*9Q#..c9.<.GI.>
010E40:  CA 4F 49 AF C3 54 49 CD 69 39 3E 80 C3 54 49 CD    .OI..TI.i9>..TI.
010E50:  69 39 3E 40 32 3B 51 AF CD 20 37 CA FF 48 4F CD    i9>@2;Q.. 7..HO.
010E60:  80 4D 2A 39 51 71 79 CD BB 36 23 36 32 23 71 23    .M*9Qqy..6#62#q#
010E70:  3A 3B 51 77 23 3A 4F 51 77 23 3A 40 51 77 23 36    :;Qw#:OQw#:@Qw#6
010E80:  35 22 39 51 C1 78 B7 CA B8 4A 3A 59 51 B7 CA B8    5"9Q.x...J:YQ...
010E90:  4A 3A 33 51 B7 C2 9D 49 3E 4E CD 70 3B CD 48 4D    J:3Q...I>N.p;.HM
010EA0:  CD 80 4D CD 73 39 E6 5F FE 59 C2 B8 4A 2A 41 51    ..M.s9._.Y..J*AQ
010EB0:  EB E1 36 2F 23 CD E4 36 3A 51 51 B7 C2 D5 49 36    ..6/#..6:QQ...I6
010EC0:  29 23 CD E4 36 36 32 23 CD EE 36 3A 4F 51 77 23    )#..662#..6:OQw#
010ED0:  3A 40 51 77 23 36 29 23 CD E4 36 E5 2A 30 4E 22    :@Qw#6)#..6.*0N"
010EE0:  57 51 EB 21 10 00 19 22 30 4E 21 0C 00 19 70 21    WQ.!..."0N!...p!
010EF0:  0F 00 19 71 E1 36 29 23 CD E4 36 36 05 23 36 2F    ...q.6)#..66.#6/
010F00:  23 CD E4 36 3A 4A 51 B7 CA 3F 4A EB 2A 41 51 EB    #..6:JQ..?J.*AQ.
010F10:  36 29 23 CD E4 36 E5 2A 30 4E 22 4C 51 EB 21 10    6)#..6.*0N"LQ.!.
010F20:  00 19 22 30 4E 21 0C 00 19 70 21 0F 00 19 71 E1    .."0N!...p!...q.
010F30:  36 29 23 CD E4 36 36 05 23 36 2F 23 CD E4 36 36    6)#..66.#6/#..66
010F40:  35 22 35 51 2A 57 51 EB 2A 5A 51 36 29 23 CD E4    5"5Q*WQ.*ZQ6)#..
010F50:  36 36 32 23 CD EE 36 3A 4B 51 5F 3A 4F 51 83 77    662#..6:KQ_:OQ.w
010F60:  23 36 00 23 36 35 22 5A 51 3A 4A 51 B7 CA 9E 4A    #6.#65"ZQ:JQ...J
010F70:  2A 4C 51 EB 2A 53 51 36 29 23 CD E4 36 36 32 23    *LQ.*SQ6)#..662#
010F80:  CD EE 36 3A 4B 51 47 3A 4F 51 80 77 23 36 00 23    ..6:KQG:OQ.w#6.#
010F90:  36 00 23 36 2F 23 CD E4 36 36 35 22 53 51 AF 32    6.#6/#..665"SQ.2
010FA0:  4B 51 3A 50 51 3C 32 50 51 3A 4F 51 5F 3A 40 51    KQ:PQ<2PQ:OQ_:@Q
010FB0:  83 3C 32 40 51 C3 89 48 E1 3A 4F 51 5F 3A 4B 51    .<2@Q..H.:OQ_:KQ
010FC0:  83 3C 32 4B 51 3A 40 51 83 3C 32 40 51 3A 50 51    .<2KQ:@Q.<2@Q:PQ
010FD0:  3C 32 50 51 C3 89 48 3A 33 51 B7 C2 E7 4A 3A 73    <2PQ..H:3Q...J:s
010FE0:  44 CD 40 27 CD D4 26 3A 73 44 CD 40 27 CD 45 25    D.@'..&:sD.@'.E%
010FF0:  AF 32 73 44 CD 61 27 3A 44 51 CD 6C 3B 21 00 00    .2sD.a':DQ.l;!..
011000:  4E 03 0F 00 00 0D 0D 41 3A 3A 3A 3A 3A 3A 3A 3A    N......A::::::::
011010:  41 00 53 44 46 00 20 20 20 20 20 20 20 20 20 20    A.SDF.          
011020:  20 00 3F 3F 3F 3F 3F 3F 3F 3F 44 42 46 00 01 24     .????????DBF..$
011030:  24 24 20 20 20 20 20 53 55 42 00 00 00 00 00 00    $$     SUB......
011040:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 27    ...............'
011050:  29 46 4F 2E 45 00 35 00 00 4E 3A 54 59 50 45 00    )FO.E.5..N:TYPE.
011060:  43 01 0B 00 00 46 49 45 4C 44 3A 4C 45 4E 00 00    C....FIELD:LEN..
011070:  4E 03 0C 00 00 46 49 45 4C 44 3A 44 45 43 00 00    N....FIELD:DEC..
011080:  4F 4D 00 47 45 54 00 50 49 43 54 55 52 45 00 52    OM.GET.PICTURE.R
011090:  45 43 4F 52 44 20 00 53 41 59 00 53 44 46 00 52    ECORD .SAY.SDF.R
0110A0:  45 43 4F 52 44 20 23 20 00 54 4F 20 20 20 20 20    ECORD # .TO     
0110B0:  20 20 00 55 53 49 4E 47 00 00 45 3E 03 21 12 45      .USING..E>.!.E
0110C0:  C3 C7 3B 00 73 39 00 00 00 00 00 00 C2 D6 56 AF    ..;.s9........V.
0110D0:  CD 89 2E C3 00 45 11 82 5E CD B1 37 00 14 5B 3E    .....E..^..7..[>
0110E0:  00 CD 89 2E C3 00 45 CD 73 39 11 D8 5E 01 32 54    ......E.s9..^.2T
0110F0:  4F 3A 20 20 20 20 20 00 46 49 45 4C 44 00 46 52    O:     .FIELD.FR
011100:  C3 09 45 C3 B0 45 C3 FF 45 CD 73 39 CA 13 47 AF    ..E..E..E.s9..G.
011110:  32 B2 47 32 B1 47 CD 73 39 CA 7D 45 11 92 47 CD    2.G2.G.s9.}E..G.
011120:  B1 37 C2 53 45 CD 8E 39 CD 73 39 22 B6 47 11 7E    .7.SE..9.s9".G.~
011130:  97 CD F2 14 DA 13 47 CD 63 39 7E B7 CA 40 45 2B    ......G.c9~..@E+
011140:  22 BE 47 EB 23 7E C6 02 4F 23 46 3E FF 32 B1 47    ".G.#~..O#F>.2.G
011150:  C3 16 45 11 AE 47 CD B1 37 C2 13 47 CD 8C 23 CD    ..E..G..7..G..#.
011160:  8E 39 CD 73 39 3E 05 CD AD 27 D2 75 45 3E 28 CD    .9.s9>...'.uE>(.
011170:  70 3B C3 21 47 3E FF 32 B2 47 C3 16 45 3A B1 47    p;.!G>.2.G..E:.G
011180:  B7 3E 54 CA 1E 47 3A B2 47 B7 3E 48 CA 1E 47 3E    .>T..G:.G.>H..G>
011190:  81 CD F0 2B CD 3C 27 CD A6 23 2A B6 47 EB 2A BE    ...+.<'..#*.G.*.
0111A0:  47 CD 3C 27 CD FC 1C CD 61 27 CD AE 46 C3 26 47    G.<'....a'..F.&G
0111B0:  CD 9F 24 CA 26 47 CD A4 24 22 B4 47 2A B4 47 7E    ..$.&G..$".G*.G~
0111C0:  B7 CA F3 45 32 B3 47 CD DF 22 3A 7D 44 B7 CA E0    ...E2.G..":}D...
0111D0:  45 CD 1B 36 21 95 47 CD 28 36 3A B3 47 CD C4 25    E..6!.G.(6:.G..%
0111E0:  CD BB 23 CD 45 1D CD AE 46 2A B4 47 23 22 B4 47    ..#.E...F*.G#".G
0111F0:  C3 BC 45 CD B7 23 CD DF 22 CD 43 21 C3 26 47 CD    ..E..#..".C!.&G.
011200:  22 3E 51 21 FF FF CD 5B 26 3A 4A 51 B7 CA 86 4B    ">Q!...[&:JQ...K
011210:  21 5C 51 11 E5 52 7E FE 35 CA 22 4B 12 13 23 C3    !\Q..R~.5."K..#.
011220:  16 4B D5 E5 23 4E 23 46 21 11 4E 34 CD 72 2A 22    .K..#N#F!.N4.r*"
011230:  45 51 EB E1 36 2F 23 CD E4 36 36 35 D1 EB 36 29    EQ..6/#..665..6)
011240:  23 EB 2A 45 51 EB CD E4 36 36 0F 78 B7 CA 52 4B    #.*EQ...66.x..RK
011250:  36 07 23 36 35 21 17 53 36 30 23 EB 2A 45 51 EB    6.#65!.S60#.*EQ.
011260:  CD E4 36 36 35 CD DC 1C CA 74 4B CD 78 27 C2 80    ..665....tK.x'..
011270:  4B DA BD 4C CD 47 2B CA BD 4C DA BD 4C C3 65 4B    K..L.G+..L..L.eK
011280:  21 5C 51 CD 20 0B CD 45 3B 3A 7A 44 B7 CA 9F 4B    !\Q. ..E;:zD...K
011290:  CD 1B 36 CD 30 3B C3 9F 4B CD 1B 36 CD 30 3B AF    ..6.0;..K..6.0;.
0112A0:  32 32 51 3A 34 51 B7 C2 EE 4B CD 1B 36 CD 8C 4D    22Q:4Q...K..6..M
0112B0:  3E 63 CD 70 3B 2A 3E 51 23 22 3E 51 CD 35 36 CD    >c.p;*>Q#">Q.56.
0112C0:  72 36 21 41 97 CD 2B 36 CD 8C 4D 3A 4E 44 B7 CA    r6!A..+6..M:ND..
0112D0:  EE 4B CD 3A 36 3E 2F CD E8 35 3A 4F 44 CD 3A 36    .K.:6>/..5:OD.:6
0112E0:  3E 2F CD E8 35 3A 50 44 CD 3A 36 CD 1B 36 CD 8C    >/..5:PD.:6..6..
0112F0:  4D 3A 4E 51 B7 CA FE 4B 21 6A 54 CD 20 0B CD 1B    M:NQ...K!jT. ...
011300:  36 CD 8C 4D 21 73 55 CD 20 0B CD 8C 4D 3A 4A 51    6..M!sU. ...M:JQ
011310:  B7 CA 2B 4C CD 8C 4D 3E 2A CD E8 35 CD 7E 36 21    ..+L..M>*..5.~6!
011320:  04 59 CD 20 0B 21 17 53 CD 20 0B CD DC 1C CA 63    .Y. .!.S. .....c
011330:  4C 3A 32 51 B7 C2 99 4B CD 4D 3B 4F 3A 3C 51 B9    L:2Q...K.M;O:<Q.
011340:  DA 99 4B CD 78 27 CA 63 4C DA BD 4C 3A 51 51 B7    ..K.x'.cL..L:QQ.
011350:  CC 8C 4D 21 92 5A CD 20 0B 3A 37 51 B7 CA 63 4C    ..M!.Z. .:7Q..cL
011360:  CD 8C 4D CD 47 2B CA BD 4C DA BD 4C CD DC 1C CA    ..M.G+..L..L....
011370:  63 4C CD 78 27 CA 63 4C 3A 4A 51 B7 CA 2B 4C 21    cL.x'.cL:JQ..+L!
011380:  E5 52 CD 20 0B B7 CA 2B 4C CD 13 4D 3A 32 51 B7    .R. ...+L..M:2Q.
011390:  C2 2B 4C CD 4D 3B 4F 3A 3C 51 D6 04 B9 DA 99 4B    .+L.M;O:<Q.....K
0113A0:  CD 1B 36 CD 8C 4D 3E 2A CD E8 35 CD 7E 36 21 04    ..6..M>*..5.~6!.
0113B0:  59 CD 20 0B 21 17 53 CD 20 0B C3 2B 4C CD 13 4D    Y. .!.S. ..+L..M
0113C0:  3A 59 51 B7 CA F8 4C 3A 24 52 FE 35 CA F8 4C CD    :YQ...L:$R.5..L.
0113D0:  8C 4D 3E 60 CD 70 3B CD 8C 4D 21 24 52 CD 20 0B    .M>`.p;..M!$R. .
0113E0:  21 11 4E CD 15 2A C2 EC 4C CD 79 2A 21 11 4E 35    !.N..*..L.y*!.N5
0113F0:  7E FE 41 D2 E3 4C 36 41 CD 1B 36 3A 43 51 CD 6C    ~.A..L6A..6:CQ.l
011400:  3C 29 21 01 00 22 B8 47 22 BA 47 CD 2A 2C 21 64    <)!..".G".G.*,!d
011410:  00 22 BC 47 21 FF FF CD 2E 2C 2A B8 47 CD 0C 2C    .".G!....,*.G..,
011420:  CD 37 2C DA 71 46 2A B8 47 23 22 B8 47 CD DC 1C    .7,.qF*.G#".G...
011430:  CA 1A 46 2A BA 47 CD 0C 2C CD D3 2E 2A BA 47 2A    ..F*.G..,...*.G*
011440:  BA 47 23 22 BA 47 3A 7D 44 B7 CA 1A 46 2A BC 47    .G#".G:}D...F*.G
011450:  2B 22 BC 47 7C B5 C2 1A 46 CD 1B 36 2A BA 47 2B    +".G|...F..6*.G+
011460:  CD 35 36 3E 3A CD 70 3B 21 64 00 22 BC 47 C3 1A    .56>:.p;!d.".G..
011470:  46 2A BA 47 CD 0C 2C CD D4 26 CD D8 2C 3A 7D 44    F*.G..,..&..,:}D
011480:  B7 CA 89 46 3E 39 CD 70 3B 2A BA 47 2B 22 BA 47    ...F>9.p;*.G+".G
011490:  CD 2E 2C 3A 7D 44 B7 CA A5 46 2A BA 47 CD 35 36    ..,:}D...F*.G.56
0114A0:  3E 3A CD 70 3B CD 9F 24 CA 26 47 C3 B0 45 21 01    >:.p;..$.&G..E!.
0114B0:  00 CD 9D 27 DA 12 47 CD 43 21 21 00 00 22 BE 47    ...'..G.C!!..".G
0114C0:  21 64 00 22 BC 47 CD 8D 1D 2A BE 47 23 22 BE 47    !d.".G...*.G#".G
0114D0:  2A BC 47 2B 22 BC 47 7C B5 C2 F7 46 3A 7D 44 B7    *.G+".G|...F:}D.
0114E0:  CA F7 46 2A BE 47 CD 1B 36 CD 35 36 3E 78 CD 70    ..F*.G..6.56>x.p
0114F0:  3B 21 64 00 22 BC 47 CD 37 2C D2 C6 46 3A 7D 44    ;!d.".G.7,..F:}D
011500:  B7 CA 12 47 2A BE 47 CD 1B 36 CD 35 36 3E 78 CD    ...G*.G..6.56>x.
011510:  70 3B C9 CD 61 27 3E FF 32 6F 44 C3 26 47 CD 70    p;..a'>.2oD.&G.p
011520:  3B 3E 01 32 6F 44 3E 01 21 00 45 C3 C7 3B 54 54    ;>.2oD>.!.E..;TT
011530:  54 40 40 C8 84 82 A6 8A 40 92 92 40 40 50 86 52    T@@.....@..@@P.R
011540:  40 62 72 70 62 40 40 A6 86 88 A0 40 40 40 40 AC    @brpb@@....@@@@.
011550:  CA E4 40 64 5C 2C 00 00 00 00 00 00 00 00 00 00    ..@d\,..........
011560:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011570:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011580:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011590:  00 00 4F 4E 00 4D 49 53 45 20 41 20 4A 4F 55 52    ..ON.MISE A JOUR
0115A0:  20 44 45 20 4C 27 49 4E 44 45 58 3A 20 00 54 4F     DE L'INDEX: .TO
0115B0:  00 00 00 C8 84 82 A6 8A 40 92 92 40 40 50 86 52    ........@..@@P.R
0115C0:  40 62 72 70 62 40 40 A6 86 88 A0 40 40 40 40 AC    @brpb@@....@@@@.
0115D0:  CA E4 40 64 5C 2C 00 00 00 00 00 00 00 00 00 00    ..@d\,..........
0115E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0115F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011600:  3B C3 9D 4D 3A 33 51 B7 C2 A5 4D 3E 34 CD 70 3B    ;..M:3Q...M>4.p;
011610:  C3 89 48 3A 4A 51 B7 C8 3A 49 53 FE 35 CA 31 4D    ..H:JQ..:IS.5.1M
011620:  CD 8C 4D 3E 49 CD 70 3B CD 8C 4D 21 49 53 CD 20    ..M>I.p;..M!IS. 
011630:  0B 21 5C 51 CD 20 0B 3A 52 51 B7 CA 44 4D 3E FF    .!\Q. .:RQ..DM>.
011640:  32 32 51 C9 CD 1B 36 C9 3A 33 51 B7 C2 67 4D CD    22Q...6.:3Q..gM.
011650:  99 39 CD 63 39 FE 1B C0 3A 73 44 CD 40 27 CD 45    .9.c9...:sD.@'.E
011660:  25 CD 61 27 C3 9D 4D 3A 73 44 CD CA 39 CD 63 39    %.a'..M:sD..9.c9
011670:  E6 7F 77 CD 69 39 C2 70 4D CD 92 39 CD 63 39 C9    ..w.i9.pM..9.c9.
011680:  3A 33 51 B7 C0 3A 73 44 CD 12 3A C9 CD 1B 36 3A    :3Q..:sD..:...6:
011690:  3D 51 4F 79 B7 C8 CD 7E 36 0D C3 93 4D 3E 01 21    =QOy...~6...M>.!
0116A0:  00 45 C3 C7 3B 3E FF 32 6F 44 C3 9D 4D 54 54 54    .E..;>.2oD..MTTT
0116B0:  40 40 C8 84 82 A6 8A 40 92 92 40 40 50 86 52 40    @@.....@..@@P.R@
0116C0:  62 72 70 62 40 40 A6 86 88 A0 40 40 40 40 AC CA    brpb@@....@@@@..
0116D0:  E4 40 64 5C 2C 00 00 00 00 00 00 00 00 00 00 00    .@d\,...........
0116E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0116F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011700:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011710:  00 41 3A 3A 3A 3A 3A 3A 3A 3A 41 00 46 4F 52 4D    .A::::::::A.FORM
011720:  00 50 4C 41 49 4E 00 50 52 49 4E 54 00 54 4F 00    .PLAIN.PRINT.TO.
011730:  32 4E CD 8E 39 2A DF 5F EB CD F2 14 DA CE 00 72    2N..9*._.......r
011740:  59 00 DB 5F EB 3A 79 44 B7 C2 6B 4E 36 CE 00 78    Y.._.:yD..kN6..x
011750:  59 00 78 B7 C2 66 4E 79 B7 C2 61 4E 36 CE 00 7E    Y.x..fNy..aN6..~
011760:  59 00 00 C3 6F 4E 70 34 C3 6F 4E 36 2E CE 00 84    Y...oNp4.oN6....
011770:  59 00 23 36 35 22 DF 5F CD 92 36 CA 81 CE 00 8A    Y.#65"._..6.....
011780:  59 00 79 44 B7 C2 F2 4E 3A DB 5F B7 C2 CE 00 90    Y.yD...N:._.....
011790:  59 00 22 E6 5F 2A E6 5F 7E FE 0D CA F2 CE 00 96    Y."._*._~.......
0117A0:  59 00 36 29 23 CD E4 36 36 32 23 EB 01 CE 00 9C    Y.6)#..662#.....
0117B0:  59 00 4E 23 23 23 46 EB FE 4E CA D6 4E CE 00 A2    Y.N###F..N..N...
0117C0:  59 00 36 00 23 36 00 23 36 03 C3 DB 4E CE 00 A8    Y.6.#6.#6...N...
0117D0:  59 00 00 C3 DC 4E 70 23 71 23 71 34 23 CE 00 AE    Y....Np#q#q4#...
0117E0:  59 00 22 DF 5F 2A E6 5F 11 10 00 19 22 CE 00 B4    Y."._*._...."...
0117F0:  59 00 2A D7 5F CD 5B 26 DA 00 45 CD 99 CE 00 BA    Y.*._.[&..E.....
011800:  CD 3C 29 AF 32 38 51 32 51 51 32 32 51 32 4A 51    .<).28Q2QQ22Q2JQ
011810:  32 34 51 21 72 59 01 20 01 CD F8 36 3E 08 32 3D    24Q!rY. ...6>.2=
011820:  51 32 40 51 3E 39 32 3C 51 3E 50 32 47 51 CD 68    Q2@Q>92<Q>P2GQ.h
011830:  3B 32 43 51 32 44 51 CD DD 25 CD 73 39 CA 9F 45    ;2CQ2DQ..%.s9..E
011840:  CD E9 25 DA A5 4D CD 73 39 CA 9F 45 11 1C 4E CD    ..%..M.s9..E..N.
011850:  B1 37 C2 65 45 CD 8E 39 3E 02 CD AD 27 3E FF 32    .7.eE..9>...'>.2
011860:  38 51 C3 3A 45 11 2D 4E CD B1 37 C2 8B 45 CD 8E    8Q.:E.-N..7..E..
011870:  39 CD 73 39 CA A5 4D 11 27 4E CD B1 37 C2 A5 4D    9.s9..M.'N..7..M
011880:  CD 8E 39 3E FF 32 44 51 C3 3A 45 11 21 4E CD B1    ..9>.2DQ.:E.!N..
011890:  37 C2 A5 4D CD 8E 39 3E FF 32 34 51 C3 3A 45 3A    7..M..9>.24Q.:E:
0118A0:  38 51 B7 C2 BE 45 3E 3F CD 70 3B CD 99 39 CD 63    8Q...E>?.p;..9.c
0118B0:  39 CA 9D 4D FE 1B CA 9D 4D 3E 02 CD AD 27 3E FF    9..M....M>...'>.
0118C0:  32 33 51 3E 02 CD F0 2B D2 D4 45 3E 81 CD F0 2B    23Q>...+..E>...+
0118D0:  AF 32 33 51 CD 3C 27 32 73 44 AF 32 4E 51 3A 33    .23Q.<'2sD.2NQ:3
0118E0:  51 B7 C2 EA 45 3E 68 CD 70 3B CD 48 4D CD 80 4D    Q...E>h.p;.HM..M
0118F0:  CD 73 39 CA 65 46 FE 0D CA 65 46 E6 5F FE 4D C2    .s9.eF...eF._.M.
011900:  1D 46 CD 69 39 FE 3D C2 A5 4D CD 69 39 CD FF 37    .F.i9.=..M.i9..7
011910:  7B 32 40 51 32 3D 51 CD 8E 39 C3 57 46 FE 4C C2    {2@Q2=Q..9.WF.L.
011920:  3A 46 CD 69 39 FE 3D C2 A5 4D CD 69 39 CD FF 37    :F.i9.=..M.i9..7
011930:  7B 32 3C 51 CD 8E 39 C3 57 46 FE 57 C2 65 46 CD    {2<Q..9.WF.W.eF.
011940:  69 39 FE 3D C2 A5 4D CD 69 39 CD FF 37 7B 32 47    i9.=..M.i9..7{2G
011950:  51 CD 8E 39 C3 57 46 CD 63 39 FE 2C C2 65 46 CD    Q..9.WF.c9.,.eF.
011960:  69 39 C3 F0 45 3A 33 51 B7 C2 71 46 3E 45 CD 70    i9..E:3Q..qF>E.p
011970:  3B CD 48 4D CD 80 4D CD 73 39 E6 5F FE 59 C2 EB    ;.HM..M.s9._.Y..
011980:  46 3E FF 32 4E 51 3A 33 51 B7 C2 92 46 3E 46 CD    F>.2NQ:3Q...F>F.
011990:  70 3B 21 6A 54 36 2B CD 48 4D 11 6C 54 CD 63 39    p;!jT6+.HM.lT.c9
0119A0:  FE 3C CA AE 46 FE 3E CA B6 46 AF C3 BB 46 CD 69    .<..F.>..F...F.i
0119B0:  39 3E 80 C3 BB 46 CD 69 39 3E 40 32 3B 51 AF CD    9>...F.i9>@2;Q..
0119C0:  20 37 CA 86 46 32 6B 54 4F CD 80 4D 21 6C 54 79     7..F2kTO..M!lTy
0119D0:  CD BB 36 36 32 23 71 23 3A 3B 51 77 23 3A 40 51    ..662#q#:;Qw#:@Q
0119E0:  47 3A 47 51 90 77 23 70 23 36 35 AF 32 37 51 3A    G:GQ.w#p#65.27Q:
0119F0:  33 51 B7 C2 FB 46 3E 3D CD 70 3B CD 48 4D CD 73    3Q...F>=.p;.HM.s
011A00:  59 00 45 CD 78 27 CA 68 4F DA 00 45 2A CE 00 C0    Y.E.x'.hO..E*...
011A10:  59 00 5F 7C B5 C2 2B 4F 21 0F 00 22 D5 CE 00 C6    Y._|..+O!.."....
011A20:  59 00 3B CD 8E 3A FE 1B CA 00 45 CD 1B CE 00 CC    Y.;..:....E.....
011A30:  59 00 C2 44 4F CD 99 2C CD 35 36 CD 7E CE 00 D2    Y..DO..,.56.~...
011A40:  59 00 E8 35 3A DB 5F B7 C2 62 4F 3A 79 CE 00 D8    Y..5:._..bO:y...
011A50:  59 00 CD 84 29 44 4D CD DC 1C 0B 23 CD CE 00 DE    Y...)DM....#....
011A60:  59 00 21 7E 97 CD 20 0B CD 47 2B CA 00 CE 00 E4    Y.!~.. ..G+.....
011A70:  59 00 00 45 3E 03 21 0C 45 C3 C7 3B CD CE 00 EA    Y..E>.!.E..;....
011A80:  59 00 09 45 C3 C7 3B CD 8E 39 3E 08 21 CE 00 F0    Y..E..;..9>.!...
011A90:  59 00 CD 73 39 11 C1 5E CD B1 37 CA 5C CE 00 F6    Y..s9..^..7.\...
011AA0:  59 00 B1 37 CA EF 4F CD 63 39 3E 01 CD CE 00 FC    Y..7..O.c9>.....
011AB0:  59 00 CD 73 39 C2 14 5B 3E 42 CD F0 2B CE 00 02    Y..s9..[>B..+...
011AC0:  5A 00 44 FE 10 D2 E7 4F 21 5E 44 CD BB CE 00 08    Z.D....O!^D.....
011AD0:  5A 00 32 5C 44 21 5D 44 34 CD 36 2F CD CE 00 0E    Z.2\D!]D4.6/....
011AE0:  5A 00 3E 29 C3 E9 4F 3E 2A CD 70 3B C3 CE 00 14    Z.>)..O>*.p;....
011AF0:  5A 00 B7 CA 54 50 CD 8E 39 CD 1D 2E DA CE 00 1A    Z...TP..9.......
011B00:  5A 00 AF 32 DA 5F 3A 5C 44 CD CA 39 CD CE 00 20    Z..2._:\D..9... 
011B10:  5A 00 2C 50 11 0F 5E CD B1 37 C2 33 50 CE 00 26    Z.,P..^..7.3P..&
011B20:  5A 00 39 11 AA 5E CD B1 37 C2 06 50 21 CE 00 2C    Z.9..^..7..P!..,
011B30:  5A 00 50 CD 63 39 FE 84 CA 44 50 11 B5 CE 00 32    Z.P.c9...DP....2
011B40:  5A 00 06 50 21 DA 5F 35 F2 06 50 C3 00 CE 00 38    Z..P!._5..P....8
011B50:  5A 00 00 45 3E 29 CD 70 3B C3 00 45 3E CE 00 3E    Z..E>).p;..E>..>
011B60:  5A 00 00 45 CD 3C 29 3E 02 21 09 45 C3 CE 00 44    Z..E.<)>.!.E...D
011B70:  5A 00 74 44 AF 32 DC 5F C3 00 45 AF 32 CE 00 4A    Z.tD.2._..E.2..J
011B80:  5A 00 AF 32 DA 5F 3A 5C 44 B7 CA 00 45 CE 00 50    Z..2._:\D...E..P
011B90:  5A 00 45 CD 68 3B F5 47 3A 7C 44 B0 CA CE 00 56    Z.E.h;.G:|D....V
011BA0:  5A 00 6C 3B CD 30 3B F1 CD 6C 3B C3 00 CE 00 5C    Z.l;.0;..l;....\
011BB0:  5A 00 00 45 CD 3C 29 CD 9F 24 CA 0C 51 CE 00 62    Z..E.<)..$..Q..b
011BC0:  5A 00 36 CA CB 50 06 00 C3 CE 50 CD 69 CE 00 68    Z.6..P....P.i..h
011BD0:  5A 00 CD 20 37 4F CD 63 39 79 CD B1 20 CE 00 6E    Z.. 7O.c9y.. ..n
011BE0:  5A 00 7C B5 CA FD 50 3A 5B 44 B7 CA 00 CE 00 74    Z.|...P:[D.....t
011BF0:  5A 00 00 45 CD 63 39 CD C9 21 C3 DD 50 CE 00 7A    Z..E.c9..!..P..z
011C00:  39 E6 5F FE 59 C2 0D 47 3E FF 32 37 51 CD 80 4D    9._.Y..G>.27Q..M
011C10:  AF 32 59 51 3A 33 51 B7 C2 20 47 3E 4E CD 70 3B    .2YQ:3Q.. G>N.p;
011C20:  CD 48 4D CD 73 39 E6 5F FE 59 C2 42 47 3E FF 32    .HM.s9._.Y.BG>.2
011C30:  59 51 21 11 4E 01 01 01 CD 72 2A 22 41 51 AF 32    YQ!.N....r*"AQ.2
011C40:  4B 51 CD 80 4D 3A 59 51 B7 CA 58 48 3A 33 51 B7    KQ..M:YQ..XH:3Q.
011C50:  C2 58 47 3E 44 CD 70 3B CD 48 4D CD 73 39 E6 5F    .XG>D.p;.HM.s9._
011C60:  FE 59 C2 6A 47 3E FF 32 4A 51 CD 80 4D 3A 4A 51    .Y.jG>.2JQ..M:JQ
011C70:  B7 CA 58 48 3A 33 51 B7 C2 80 47 3E 43 CD 70 3B    ..XH:3Q...G>C.p;
011C80:  CD 48 4D 11 5C 51 CD F2 14 D2 9B 47 3A 33 51 B7    .HM.\Q.....G:3Q.
011C90:  C2 A5 4D 3E 34 CD 70 3B C3 7B 47 CD 80 4D 3A 33    ..M>4.p;.{G..M:3
011CA0:  51 B7 C2 AA 47 3E 50 CD 70 3B CD 48 4D CD 73 39    Q...G>P.p;.HM.s9
011CB0:  E6 5F FE 59 C2 BC 47 3E FF 32 51 51 CD 80 4D AF    ._.Y..G>.2QQ..M.
011CC0:  32 52 51 3A 33 51 B7 C2 CF 47 3E 6B CD 70 3B CD    2RQ:3Q...G>k.p;.
011CD0:  48 4D CD 73 39 E6 5F FE 59 C2 E1 47 3E FF 32 52    HM.s9._.Y..G>.2R
011CE0:  51 CD 80 4D 3A 33 51 B7 C2 F0 47 3E 69 CD 70 3B    Q..M:3Q...G>i.p;
011CF0:  21 04 59 36 2B CD 48 4D FE 0D CA 01 48 B7 C2 0C    !.Y6+.HM....H...
011D00:  48 11 06 59 3E 20 12 3E 01 C3 37 48 11 06 59 CD    H..Y> .>..7H..Y.
011D10:  63 39 FE 3C CA 20 48 FE 3E CA 28 48 AF C3 2D 48    c9.<. H.>.(H..-H
011D20:  CD 69 39 3E 80 C3 2D 48 CD 69 39 3E 40 32 3B 51    .i9>..-H.i9>@2;Q
011D30:  AF CD 20 37 CA E4 47 4F 32 05 59 CD 80 4D 21 06    .. 7..GO2.Y..M!.
011D40:  59 79 CD BB 36 36 32 23 71 23 3A 3B 51 77 23 71    Yy..662#q#:;Qw#q
011D50:  23 3A 40 51 77 23 36 35 3A 33 51 B7 C2 64 48 3E    #:@Qw#65:3Q..dH>
011D60:  3C CD 70 3B 21 92 5A 22 35 51 36 35 21 24 52 22    <.p;!.Z"5Q65!$R"
011D70:  5A 51 36 35 21 73 55 22 39 51 36 35 21 49 53 22    ZQ65!sU"9Q65!IS"
011D80:  53 51 36 35 3E 01 32 50 51 3A 33 51 B7 C2 9C 48    SQ65>.2PQ:3Q...H
011D90:  CD 1B 36 3A 50 51 CD 42 36 CD 72 36 CD 48 4D CD    ..6:PQ.B6.r6.HM.
011DA0:  73 39 CA D7 4A CD FF 37 7B 32 4F 51 CD 8E 39 7E    s9..J..7{2OQ..9~
011DB0:  FE 2C C2 04 4D CD 69 39 D5 EB 2A 35 51 EB CD F2    .,..M.i9..*5Q...
011DC0:  14 DA 04 4D CD 73 39 C2 04 4D EB E5 3A 51 51 B7    ...M.s9..M..:QQ.
011DD0:  C2 F4 48 36 32 23 4E 23 46 78 B7 C2 E1 48 F6 80    ..H62#N#Fx...H..
011DE0:  77 23 3A 4F 51 77 23 3A 40 51 77 23 36 35 22 35    w#:OQw#:@Qw#65"5
011DF0:  51 C3 FB 48 22 35 51 23 CD F3 36 C5 CD 80 4D 3A    Q..H"5Q#..6...M:
011E00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
011E10:  0F 00 00 00 02 09 46 E5 0F 00 C1 02 00 00 00 02    ......F.........
011E20:  0F 00 C6 02 00 00 00 02 0F 00 C2 02 00 00 00 02    ................
011E30:  0F 00 C7 02 00 00 00 02 0F 00 C3 02 00 00 00 02    ................
011E40:  0F 00 C8 02 00 00 00 02 0F 00 C4 02 00 00 00 02    ................
011E50:  0F 00 C9 02 00 00 00 02 0F 00 C5 02 00 00 00 02    ................
011E60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011E70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011E80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011E90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011EA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011EB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011EC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011ED0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011EE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011EF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
011F00:  5A 00 00 45 3E 11 CD 70 3B C3 00 45 3E CE 00 80    Z..E>..p;..E>...
011F10:  5A 00 3C 29 11 77 5E CD 73 39 CD B1 37 CE 00 86    Z.<).w^.s9..7...
011F20:  5A 00 39 CD 73 39 C3 59 51 11 A0 5E CD CE 00 8C    Z.9.s9.YQ..^....
011F30:  5A 00 CD 45 CD 3C 29 CD 9F 24 CA 0C 51 CE 00 62    Z..E.<)..$..Q..b
011F40:  5A 00 36 CA CB 50 06 00 C3 CE 50 CD 69 CE 00 68    Z.6..P....P.i..h
011F50:  5A 00 CD 20 37 4F CD 63 39 79 CD B1 20 CE 00 6E    Z.. 7O.c9y.. ..n
011F60:  5A 00 7C B5 CA FD 50 3A 5B 44 B7 CA 00 CE 00 74    Z.|...P:[D.....t
011F70:  5A 00 00 45 CD 63 39 CD C9 21 C3 DD 50 CE 00 7A    Z..E.c9..!..P..z
011F80:  27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32    '.[T>H.ST>(.ST.2
011F90:  5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF    [V.c9.nU..7..Q>.
011FA0:  32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD    2[V.c9.RU..7.HT.
011FB0:  8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67    .9.s9.HT"qV..."g
011FC0:  56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56    V*gV~...Q.*qV:[V
011FD0:  B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54    ...Q..T..Q..Q..T
011FE0:  C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67    ..Q..y**gV...."g
011FF0:  56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F    V~....Q.[T..%.2_
012000:  CD 73 39 11 DC 4E CD B1 37 CA 1B 45 11 6E 4E CD    .s9..N..7..E.nN.
012010:  B1 37 C2 34 4E CD 8E 39 C3 54 48 3E 75 CD 70 3B    .7.4N..9.TH>u.p;
012020:  CD 42 38 DA 2C 4E CA 2C 4E CD 3C 29 21 1D 51 01    .B8.,N.,N.<)!.Q.
012030:  20 03 3E 20 CD FA 36 21 35 51 11 19 00 0E 20 AF     .> ..6!5Q.... .
012040:  77 19 0D C2 40 45 CD E3 1C 11 C6 99 01 01 02 CD    w...@E..........
012050:  7E 38 21 C6 99 22 1A 4F 21 1C 4F 22 12 4F 21 00    ~8!..".O!.O".O!.
012060:  00 22 18 4F 2A 1A 4F 7E FE 0D CA AA 45 EB 2A 12    .".O*.O~....E.*.
012070:  4F 01 0D 00 09 CD DF 36 EB 06 0C 7E B7 CA 81 45    O......6...~...E
012080:  12 23 13 05 C2 7B 45 13 13 7E CD 01 4E 13 13 23    .#...{E..~..N..#
012090:  23 23 7E CD 01 4E 11 10 00 2A 12 4F 19 22 12 4F    ##~..N...*.O.".O
0120A0:  2A 1A 4F 19 22 1A 4F C3 64 45 21 1C 4F 22 12 4F    *.O.".O.dE!.O".O
0120B0:  CD AC 06 21 00 00 22 16 4F 01 0B 01 11 76 4E 21    ...!..".O....vN!
0120C0:  16 4F CD 72 06 2A 12 4F 22 14 4F 21 00 02 22 FB    .O.r.*.O".O!..".
0120D0:  4E 2A FB 4E 44 4D 2A 14 4F 22 16 4F EB 21 16 4F    N*.NDM*.O".O.!.O
0120E0:  CD 72 06 2A 14 4F 11 10 00 19 22 14 4F 7E FE 0D    .r.*.O....".O~..
0120F0:  CA 02 46 2A FB 4E 24 22 FB 4E 3A 55 01 3D BC D2    ..F*.N$".N:U.=..
012100:  45 E5 26 00 6F 01 64 00 CD 19 4E 01 0A 00 CD 19    E.&.o.d...N.....
012110:  4E 01 01 00 CD 19 4E E1 C9 D5 16 2F 14 7D 91 6F    N.....N..../.}.o
012120:  7C 98 67 D2 1C 4E 09 7A D1 12 13 C9 3E 01 21 00    |.g..N.z....>.!.
012130:  45 C3 C7 3B 3E FF 32 6F 44 C3 2C 4E 04 02 01 13    E..;>.2oD.,N....
012140:  05 E0 E8 03 E9 E0 F1 F9 F8 F1 E0 13 03 04 10 E0    ................
012150:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
012160:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 43 4F    ..............CO
012170:  4D 4D 41 4E 44 00 4E 4F 4D 20 20 20 20 20 20 20    MMAND.NOM       
012180:  54 59 50 20 44 49 4D 20 20 44 45 43 00 41 42 41    TYP DIM  DEC.ABA
012190:  4E 44 4F 4E 20 4D 4F 44 49 46 2E 20 20 28 59 2F    NDON MODIF.  (Y/
0121A0:  4E 29 00 0D 0A 20 20 43 52 45 41 54 49 4F 4E 20    N)...  CREATION 
0121B0:  00 42 55 46 46 45 52 20 50 4C 45 49 4E 2E 20 59    .BUFFER PLEIN. Y
0121C0:  20 3D 20 53 41 55 56 45 47 41 52 44 45 2C 20 4E     = SAUVEGARDE, N
0121D0:  20 3D 20 41 42 41 4E 44 4F 4E 20 00 53 54 52 55     = ABANDON .STRU
0121E0:  43 54 55 52 45 00 24 24 24 42 41 4B 00 00 00 CD    CTURE.$$$BAK....
0121F0:  78 36 C3 1B 4E CD 1B 36 1E 04 C3 1B 4E C5 D5 0E    x6..N..6....N...
012200:  11 C3 08 4F C5 D5 0E 12 11 5C 00 CD 05 00 FE 16    ...O.....\......
012210:  C2 17 4F 37 D1 C1 C9 E6 03 06 00 0F 43 48 41 4D    ..O7........CHAM
012220:  50 20 30 31 20 20 00 43 18 1D 51 00 43 48 41 4D    P 01  .C..Q.CHAM
012230:  50 20 30 32 20 20 00 43 18 36 51 00 43 48 41 4D    P 02  .C.6Q.CHAM
012240:  50 20 30 33 20 20 00 43 18 4F 51 00 43 48 41 4D    P 03  .C.OQ.CHAM
012250:  50 20 30 34 20 20 00 43 18 68 51 00 43 48 41 4D    P 04  .C.hQ.CHAM
012260:  50 20 30 35 20 20 00 43 18 81 51 00 43 48 41 4D    P 05  .C..Q.CHAM
012270:  50 20 30 36 20 20 00 43 18 9A 51 00 43 48 41 4D    P 06  .C..Q.CHAM
012280:  50 20 30 37 20 20 00 43 18 B3 51 00 43 48 41 4D    P 07  .C..Q.CHAM
012290:  50 20 30 38 20 20 00 43 18 CC 51 00 43 48 41 4D    P 08  .C..Q.CHAM
0122A0:  50 20 30 39 20 20 00 43 18 E5 51 00 43 48 41 4D    P 09  .C..Q.CHAM
0122B0:  50 20 31 30 20 20 00 43 18 FE 51 00 43 48 41 4D    P 10  .C..Q.CHAM
0122C0:  50 20 31 31 20 20 00 43 18 17 52 00 43 48 41 4D    P 11  .C..R.CHAM
0122D0:  50 20 31 32 20 20 00 43 18 30 52 00 43 48 41 4D    P 12  .C.0R.CHAM
0122E0:  50 20 31 33 20 20 00 43 18 49 52 00 43 48 41 4D    P 13  .C.IR.CHAM
0122F0:  50 20 31 34 20 20 00 43 18 62 52 00 43 48 41 4D    P 14  .C.bR.CHAM
012300:  D1 45 3A EC 4E 47 3E 08 CD 1D 02 F5 78 32 EC 4E    .E:.NG>.....x2.N
012310:  F1 47 E6 C0 CA 6A 46 FE 80 CA 2C 4E FE C0 CA C6    .G...jF...,N....
012320:  46 3A EC 4E 5F 3A ED 4E 83 21 1D 51 11 19 00 B7    F:.N_:.N.!.Q....
012330:  CA 38 46 19 3D C2 33 46 22 FB 4E EB 21 24 54 CD    .8F.=.3F".N.!$T.
012340:  D8 36 7C B5 CA 59 46 44 4D 11 3C 54 21 23 54 7E    .6|..YFDM.<T!#T~
012350:  12 2B 1B 0B 78 B1 C2 4F 46 2A FB 4E 01 19 00 3E    .+..x..OF*.N...>
012360:  20 CD FA 36 2B 36 00 C3 B0 45 78 E6 04 CA 0A 47     ..6+6...Ex....G
012370:  AF 32 EC 4E 78 E6 02 CA A5 46 2A 12 4F 11 80 FF    .2.Nx....F*.O...
012380:  19 22 12 4F 11 1C 4F CD C0 36 DA 9A 46 21 1C 4F    .".O..O..6..F!.O
012390:  22 12 4F AF 32 ED 4E C3 B0 45 3A ED 4E D6 08 32    ".O.2.N..E:.N..2
0123A0:  ED 4E C3 B0 45 2A 12 4F 11 80 00 19 22 12 4F 11    .N..E*.O....".O.
0123B0:  9C 50 CD C0 36 D2 BB 46 C3 0A 47 3A ED 4E C6 08    .P..6..F..G:.N..
0123C0:  32 ED 4E C3 B0 45 3A EC 4E 5F 3A ED 4E 83 21 1D    2.N..E:.N_:.N.!.
0123D0:  51 11 19 00 B7 CA DD 46 19 3D C2 D8 46 22 FB 4E    Q......F.=..F".N
0123E0:  EB 21 24 54 CD D8 36 7C B5 CA F9 46 44 4D 2A FB    .!$T..6|...FDM*.
0123F0:  4E EB 21 19 00 19 CD 7E 38 21 24 54 01 19 00 3E    N.!....~8!$T...>
012400:  20 CD FA 36 2B 36 00 C3 B0 45 21 C6 99 01 01 02     ..6+6...E!.....
012410:  CD F8 36 21 00 00 22 EF 4E 21 C6 99 22 1A 4F 21    ..6!..".N!..".O!
012420:  1C 4F 22 12 4F 2A 12 4F 7E FE 0D CA 05 48 11 0D    .O".O*.O~....H..
012430:  00 19 CD DF 36 CD 8E 39 CD 73 39 CA F8 47 2A 1A    ....6..9.s9..G*.
012440:  4F EB CD 63 39 CD F1 2A 7E FE 20 C2 2C 48 CD 63    O..c9..*~. .,H.c
012450:  39 0E 00 D5 7E FE 20 CA 69 47 CD 84 36 DA 62 47    9...~. .iG..6.bG
012460:  E6 5F 12 0C 13 23 C3 54 47 D1 79 B7 CA 2C 48 FE    ._...#.TG.y..,H.
012470:  0B D2 2C 48 CD 8E 39 21 0B 00 19 EB CD 73 39 E6    ..,H..9!.....s9.
012480:  5F FE 43 CA 9D 47 FE 4E CA 9D 47 FE 4C C2 34 48    _.C..G.N..G.L.4H
012490:  12 13 3E 01 12 13 13 13 AF 12 C3 D8 47 12 13 D5    ..>.........G...
0124A0:  CD 69 39 CD 73 39 CD FF 37 DA 44 48 7B B7 CA 44    .i9.s9..7.DH{..D
0124B0:  48 7A B7 C2 44 48 7B D1 12 13 13 13 CD 8E 39 CD    Hz..DH{.......9.
0124C0:  73 39 CA D8 47 D5 CD FF 37 DA 3C 48 CD 8E 39 CD    s9..G...7.<H..9.
0124D0:  73 39 C2 3C 48 7B D1 12 1B 1B 1B 1A 2A EF 4E CD    s9.<H{......*.N.
0124E0:  BB 36 11 E8 03 CD C0 36 DA 4C 48 22 EF 4E 11 10    .6.....6.LH".N..
0124F0:  00 2A 1A 4F 19 22 1A 4F 11 10 00 2A 12 4F 19 22    .*.O.".O...*.O."
012500:  50 20 31 35 20 20 00 43 18 7B 52 00 43 48 41 4D    P 15  .C.{R.CHAM
012510:  50 20 31 36 20 20 00 43 18 94 52 00 43 48 41 4D    P 16  .C..R.CHAM
012520:  50 20 31 37 20 20 00 43 18 AD 52 00 43 48 41 4D    P 17  .C..R.CHAM
012530:  50 20 31 38 20 20 00 43 18 C6 52 00 43 48 41 4D    P 18  .C..R.CHAM
012540:  50 20 31 39 20 20 00 43 18 DF 52 00 43 48 41 4D    P 19  .C..R.CHAM
012550:  50 20 32 30 20 20 00 43 18 F8 52 00 43 48 41 4D    P 20  .C..R.CHAM
012560:  50 20 32 31 20 20 00 43 18 11 53 00 43 48 41 4D    P 21  .C..S.CHAM
012570:  50 20 32 32 20 20 00 43 18 2A 53 00 43 48 41 4D    P 22  .C.*S.CHAM
012580:  50 20 32 33 20 20 00 43 18 43 53 00 43 48 41 4D    P 23  .C.CS.CHAM
012590:  50 20 32 34 20 20 00 43 18 5C 53 00 43 48 41 4D    P 24  .C.\S.CHAM
0125A0:  50 20 32 35 20 20 00 43 18 75 53 00 43 48 41 4D    P 25  .C.uS.CHAM
0125B0:  50 20 32 36 20 20 00 43 18 8E 53 00 43 48 41 4D    P 26  .C..S.CHAM
0125C0:  50 20 32 37 20 20 00 43 18 A7 53 00 43 48 41 4D    P 27  .C..S.CHAM
0125D0:  50 20 32 38 20 20 00 43 18 C0 53 00 43 48 41 4D    P 28  .C..S.CHAM
0125E0:  50 20 32 39 20 20 00 43 18 D9 53 00 43 48 41 4D    P 29  .C..S.CHAM
0125F0:  50 20 33 30 20 20 00 43 18 F2 53 00 43 48 41 4D    P 30  .C..S.CHAM
012600:  50 20 33 31 20 20 00 43 18 0B 54 00 43 48 41 4D    P 31  .C..T.CHAM
012610:  50 20 33 32 20 20 00 43 18 24 54 00 0D 84 45 4C    P 32  .C.$T...EL
012620:  44 20 32 35 20 20 00 43 18 75 53 00 46 49 45 4C    D 25  .C.uS.FIEL
012630:  44 20 32 36 20 20 00 43 18 8E 53 00 46 49 45 4C    D 26  .C..S.FIEL
012640:  44 20 32 37 20 20 00 43 18 A7 53 00 46 49 45 4C    D 27  .C..S.FIEL
012650:  44 20 32 38 20 20 00 43 18 C0 53 00 46 49 45 4C    D 28  .C..S.FIEL
012660:  44 20 32 39 20 20 00 43 18 D9 53 00 46 49 45 4C    D 29  .C..S.FIEL
012670:  44 20 33 30 20 20 00 43 18 F2 53 00 46 49 45 4C    D 30  .C..S.FIEL
012680:  27 C3 5B 54 3E 48 C3 53 54 3E 28 C3 53 54 AF 32    '.[T>H.ST>(.ST.2
012690:  5B 56 CD 63 39 11 6E 55 CD B1 37 CA AF 51 3E FF    [V.c9.nU..7..Q>.
0126A0:  32 5B 56 CD 63 39 11 52 55 CD B1 37 C2 48 54 CD    2[V.c9.RU..7.HT.
0126B0:  8E 39 CD 73 39 CA 48 54 22 71 56 CD D8 1C 22 67    .9.s9.HT"qV..."g
0126C0:  56 2A 67 56 7E B7 CA E7 51 EB 2A 71 56 3A 5B 56    V*gV~...Q.*qV:[V
0126D0:  B7 CA DD 51 CD 8E 54 CA E7 51 C3 E3 51 CD 8E 54    ...Q..T..Q..Q..T
0126E0:  C2 E7 51 EB CD 79 2A 2A 67 56 11 10 00 19 22 67    ..Q..y**gV...."g
0126F0:  56 7E FE 0D C2 C1 51 C3 5B 54 CD DD 25 AF 32 5F    V~....Q.[T..%.2_
012700:  12 4F C3 25 47 2A 1A 4F 36 0D CD E3 1C EB 21 C6    .O.%G*.O6.....!.
012710:  99 01 01 02 CD 7E 38 21 00 00 CD 2E 2C CD FF 2E    .....~8!....,...
012720:  CD D4 26 CD B5 2D CD D8 2C C3 2C 4E 3E 1C CD 70    ..&..-..,.,N>..p
012730:  3B C3 F6 4D 3E 1D CD 70 3B C3 F6 4D 3E 1F CD 70    ;..M>..p;..M>..p
012740:  3B C3 F6 4D 3E 1E CD 70 3B C3 F6 4D 3E 79 CD 70    ;..M>..p;..M>y.p
012750:  3B C3 F6 4D AF 32 0A 4F CD 73 39 C2 69 48 3E 5F    ;..M.2.O.s9.iH>_
012760:  CD 70 3B CD 99 39 CA 2C 4E 3E 01 CD AD 27 CD DE    .p;..9.,N>...'..
012770:  4B 3E 41 CD F0 2B D2 87 48 21 A3 4E CD 28 36 3E    K>A..+..H!£N.(6>
012780:  FF 32 F1 4E C3 8D 48 CD 3C 27 32 F1 4E 11 E6 4E    .2.N..H.<'2.N..N
012790:  CD 08 4D 3E 81 CD F0 2B CD 3C 27 32 10 4F 3A 57    ..M>...+.<'2.O:W
0127A0:  44 32 FA 4E AF 32 57 44 3A 54 01 3D 32 0B 4F 3A    D2.N.2WD:T.=2.O:
0127B0:  54 01 FE 40 D2 C7 48 3A 55 01 0F 3D 32 0F 4F 3A    T..@..H:U..=2.O:
0127C0:  0B 4F 87 3D 32 0B 4F 21 28 4F 3A 0B 4F 77 23 11    .O.=2.O!(O:.Ow#.
0127D0:  7E 97 CD E4 36 21 2C 4F 36 0D 23 36 0A 23 22 F2    ~...6!,O6.#6.#".
0127E0:  4E 22 F4 4E 22 F6 4E 22 FD 4E 23 22 F8 4E AF 32    N".N".N".N#".N.2
0127F0:  01 4F 2A F2 4E EB 21 00 60 CD D8 36 44 4D 2A F2    .O*.N.!.`..6DM*.
012800:  4E 3E 1A CD FA 36 CD 12 4D CD AC 06 21 00 00 22    N>...6..M...!.."
012810:  16 4F 21 00 00 22 18 4F 2A F6 4E 22 FB 4E 01 00    .O!..".O*.N".N..
012820:  01 2A FB 4E CD F5 4B DA 6B 49 C5 4F 7E FE 0D C2    .*.N..K.kI.O~...
012830:  3A 49 23 7E FE 0A C2 3A 49 23 79 C1 22 FB 4E 26    :I#~...:I#y.".N&
012840:  00 6F 19 36 00 21 7E 97 3A 0B 4F CD BB 36 36 00    .o.6.!~.:.O..66.
012850:  21 16 4F C5 CD 72 06 C1 04 3A 0F 4F FE 0C D2 62    !.O..r...:.O...b
012860:  49 04 3A 55 01 3D 3D B8 D2 21 49 CD B5 06 21 1C    I.:U.==..!I...!.
012870:  4F 22 16 4F 2A FD 4E CD F5 4B 22 FF 4E 3A 01 4F    O".O*.N..K".N:.O
012880:  47 04 0E 00 11 EE 4E 21 16 4F CD 72 06 06 00 3E    G.....N!.O.r...>
012890:  08 CD 1D 02 47 E6 C0 CA 1A 4A FE 80 C2 AE 49 21    ....G....J....I!
0128A0:  8D 4E CD 28 36 CD 42 38 C2 A0 4B C3 09 49 FE C0    .N.(6.B8..K..I..
0128B0:  CA E3 49 CD 4F 4C CD 6A 4C 2A FD 4E EB 2A F8 4E    ..I.OL.jL*.N.*.N
0128C0:  CD D8 36 44 4D 2A F8 4E 2B 54 5D 13 13 CD 90 38    ..6DM*.N+T]....8
0128D0:  EB 23 22 F8 4E 2A FD 4E 36 0D 23 36 0A CD 76 4D    .#".N*.N6.#6..vM
0128E0:  C3 09 49 2A FF 4E 23 23 EB 2A F8 4E CD D8 36 44    ..I*.N##.*.N..6D
0128F0:  4D 2A FD 4E EB 2A FF 4E 23 23 CD 7E 38 EB 09 22    M*.N.*.N##.~8.."
012900:  CD 3C 29 3E 0B 32 49 4A 32 98 4A 3E 09 32 4A 4A    .<)>.2IJ2.J>.2JJ
012910:  21 00 00 22 46 4A AF 32 43 4A CD 73 39 CA 99 45    !.."FJ.2CJ.s9..E
012920:  11 27 4A CD B1 37 C2 47 45 CD 8E 39 CD 73 39 E5    .'J..7.GE..9.s9.
012930:  CD F1 2A CA 80 49 E3 CD 92 28 C2 88 49 22 46 4A    ..*..I...(..I"FJ
012940:  E1 CD 8E 39 C3 1A 45 11 2A 4A E5 CD B1 37 CA 55    ...9..E.*J...7.U
012950:  45 E1 C3 5C 45 CD 8E 39 E1 C3 1A 45 11 34 4A E5    E..\E..9...E.4J.
012960:  CD B1 37 CA 6A 45 E1 C3 7E 45 CD 8E 39 E1 3E 0A    ..7.jE..~E..9.>.
012970:  32 49 4A 32 98 4A 3E 08 32 4A 4A C3 1A 45 11 3F    2IJ2.J>.2JJ..E.?
012980:  4A CD B1 37 C2 90 49 CD 8E 39 AF CD AD 27 DA 98    J..7..I..9...'..
012990:  49 3E FF 32 43 4A C3 1A 45 2A 46 4A 7C B5 CA A8    I>.2CJ..E*FJ|...
0129A0:  49 3A 43 4A B7 CA 90 49 2A 06 00 2B 11 C7 9B EB    I:CJ...I*..+....
0129B0:  CD D8 36 EB CD 84 29 01 00 00 EB 19 03 7C B7 FA    ..6...)......|..
0129C0:  BB 45 B5 CA C7 45 0B 78 B7 C2 D0 45 B1 F2 D2 45    .E...E.x...E...E
0129D0:  3E 80 32 51 4A 2A 46 4A 11 0B 00 19 7E FE 4C CA    >.2QJ*FJ....~.L.
0129E0:  78 49 32 6D 4A 32 7D 4A 32 8D 4A FE 43 C2 03 46    xI2mJ2}J2.J.C..F
0129F0:  3A 49 4A C6 08 32 49 4A 32 98 4A 3A 4A 4A C6 08    :IJ..2IJ2.J:JJ..
012A00:  32 4A 4A 23 7E 32 6E 4A 32 7E 4A 32 8E 4A 23 CD    2JJ#~2nJ2~J2.J#.
012A10:  E9 36 7E 32 71 4A 32 81 4A 32 91 4A CD DC 1C EB    .6~2qJ2.J2.J....
012A20:  CD D8 36 22 56 4A 3A 6E 4A 47 3A 71 4A 4F 3A 6D    ..6"VJ:nJG:qJO:m
012A30:  4A FE 4E CA 39 46 78 41 4F 21 1C 4A CD 72 2A 22    J.N.9FxAO!.J.r*"
012A40:  93 4A 22 9E 4A CD D8 2C CD EF 26 CD 3C 27 32 58    .J".J..,..&.<'2X
012A50:  4A 3E C0 CD F0 2B CD 3C 27 32 42 4A AF CD FF 2E    J>...+.<'2BJ....
012A60:  21 00 00 22 4E 4A 3E FF 32 61 4A 32 52 4A CD 2A    !.."NJ>.2aJ2RJ.*
012A70:  2C 7C B5 C2 BF 46 CD D4 26 AF 32 58 4A C3 8A 48    ,|...F..&.2XJ..H
012A80:  AF 32 52 4A 3A 42 4A CD 40 27 CD D4 26 CD EF 26    .2RJ:BJ.@'..&..&
012A90:  2A 4E 4A CD 2E 2C CD FF 2E CD B5 2D AF CD F0 2B    *NJ..,.....-...+
012AA0:  CD 3C 27 32 58 4A 3E FF 32 61 4A 3A 51 4A 16 00    .<'2XJ>.2aJ:QJ..
012AB0:  5F 2A 4E 4A CD D8 36 22 4E 4A 7C B5 CA 8A 48 3A    _*NJ..6"NJ|...H:
012AC0:  61 4A B7 CA 8A 48 AF 32 61 4A 3A 52 4A B7 C2 E5    aJ...H.2aJ:RJ...
012AD0:  46 2A 4E 4A EB 26 00 3A 51 4A 6F CD D8 36 DA E5    F*NJ.&.:QJo..6..
012AE0:  46 7B 32 51 4A AF 32 50 4A 32 53 4A 11 C7 9B CD    F{2QJ.2PJ2SJ....
012AF0:  84 29 44 4D 21 C6 99 22 54 4A 3A 42 4A CD 40 27    .)DM!.."TJ:BJ.@'
012B00:  F8 4E 2A FD 4E 7E FE 1A C2 09 49 36 0D 23 36 0A    .N*.N~....I6.#6.
012B10:  23 36 1A 23 22 F8 4E C3 09 49 78 E6 04 CA 32 4B    #6.#".N..Ix...2K
012B20:  78 E6 02 CA 92 4A CD 4F 4C CD 6A 4C 2A F4 4E EB    x....J.OL.jL*.N.
012B30:  2A FD 4E CD C0 36 D2 6B 49 CD C8 4B 22 FD 4E 21    *.N..6.kI..K".N!
012B40:  01 4F 35 3A 0F 4F FE 0C D2 4C 4A 35 7E B7 F2 6B    .O5:.O...LJ5~..k
012B50:  49 AF 32 01 4F 2A FD 4E 22 FB 4E 2A F4 4E EB 2A    I.2.O*.N".N*.N.*
012B60:  FB 4E CD C0 36 D2 89 4A CD C8 4B 22 FB 4E 3A 01    .N..6..J..K".N:.
012B70:  4F 3C 32 01 4F 47 3A 0F 4F FE 0C D2 83 4A 04 78    O<2.OG:.O....J.x
012B80:  32 01 4F 78 FE 0A DA 5B 4A 2A FB 4E 22 F6 4E C3    2.Ox...[J*.N".N.
012B90:  09 49 78 E6 08 C2 F2 4A CD 4F 4C CD 6A 4C 2A FD    .Ix....J.OL.jL*.
012BA0:  4E CD F5 4B 7E FE 1A C2 B4 4A 36 0D 23 36 0A 23    N..K~....J6.#6.#
012BB0:  36 1A 2B 2B 23 23 22 FD 4E 7E FE 1A C2 CE 4A 36    6.++##".N~....J6
012BC0:  0D 23 36 0A 23 36 1A 23 22 F8 4E CD 76 4D 21 01    .#6.#6.#".N.vM!.
012BD0:  4F 34 3A 0F 4F FE 0C D2 DB 4A 34 3A 55 01 3D 3D    O4:.O....J4:U.==
012BE0:  3D BE D2 6B 49 AF 32 01 4F 2A FD 4E 22 F6 4E C3    =..kI.2.O*.N".N.
012BF0:  09 49 CD 6A 4C 3A 0F 4F FE 0C 3E 0C D2 01 4B 3E    .I.jL:.O..>...K>
012C00:  06 32 11 4F 2A F6 4E CD F5 4B 7E FE 1A CA 25 4B    .2.O*.N..K~...%K
012C10:  23 23 7E FE 1A CA 25 4B 22 F6 4E 3A 11 4F 3D 32    ##~...%K".N:.O=2
012C20:  11 4F C2 04 4B 2A F6 4E 22 FD 4E AF 32 01 4F C3    .O..K*.N".N.2.O.
012C30:  09 49 CD 6A 4C 3A F1 4E B7 FA 48 4B 2A F8 4E 22    .I.jL:.N..HK*.N"
012C40:  F6 4E CD 12 4D D2 35 4B 2A F2 4E EB 2A F8 4E CD    .N..M.5K*.N.*.N.
012C50:  D8 36 44 4D 3A 10 4F CD 40 27 CD C4 2E CD D4 26    .6DM:.O.@'.....&
012C60:  CD 45 25 3A F1 4E B7 FA 8B 4B CD 40 27 CD 45 25    .E%:.N...K.@'.E%
012C70:  11 E9 4E CD 08 4D CD 03 27 11 07 4F CD 08 4D CD    ..N..M..'..O..M.
012C80:  A1 2C 11 E9 4E CD 08 4D CD B2 2C 11 E6 4E CD 08    .,..N..M..,..N..
012C90:  4D CD A1 2C 11 07 4F CD 08 4D CD B2 2C C3 B9 4B    M..,..O..M..,..K
012CA0:  3A F1 4E B7 FA AD 4B CD 40 27 CD 45 25 3A 10 4F    :.N...K.@'.E%:.O
012CB0:  CD 40 27 CD 45 25 CD 03 27 CD 61 27 3A FA 4E 32    .@'.E%..'.a':.N2
012CC0:  57 44 CD AC 06 C3 2C 4E 2B 7E FE 0A C2 D0 4B 2B    WD....,N+~....K+
012CD0:  2B 7E FE 0D C2 D0 4B 23 7E FE 0A C0 23 C9 CD 68    +~....K#~...#..h
012CE0:  27 0E 0C 3E 2E CD 13 37 23 22 05 4F 11 07 4F 0E    '..>...7#".O..O.
012CF0:  03 CD 78 38 C9 C5 E5 3A 0B 4F 4F 06 00 3E 20 21    ..x8...:.OO..> !
012D00:  CD CA 2C 3A 58 4A CD 40 27 CD CA 2C 3A 52 4A B7    ..,:XJ.@'..,:RJ.
012D10:  CA 29 47 CD 7A 2C DA 88 47 1A FE 20 C2 13 47 2A    .)G.z,..G.. ..G*
012D20:  4E 4A 23 22 4E 4A C3 2F 47 CD 7A 2C DA 70 49 D5    NJ#"NJ./G.z,.pI.
012D30:  2A 56 4A 19 EB 2A 54 4A CD E4 36 22 54 4A D1 60    *VJ..*TJ..6"TJ.`
012D40:  69 19 EB 21 50 4A 34 3A 51 4A BE C2 0C 47 CD C6    i..!PJ4:QJ...G..
012D50:  48 2A C6 99 22 7F 4A 21 72 4A 22 5D 4A 2A 46 4A    H*..".J!rJ"]J*FJ
012D60:  22 5A 4A 3A 52 4A B7 C2 94 47 3A 51 4A 16 00 5F    "ZJ:RJ...G:QJ.._
012D70:  2A 4E 4A CD D8 36 7C B7 FA 70 49 B5 CA 4F 48 22    *NJ..6|..pI..OH"
012D80:  4E 4A 22 4C 4A C3 94 47 3A 50 4A 32 51 4A CD C6    NJ"LJ..G:PJ2QJ..
012D90:  48 C3 4F 48 3A 58 4A CD 40 27 3A 52 4A B7 CA B7    H.OH:XJ.@':RJ...
012DA0:  47 CD 37 2C DA 4F 48 CD DC 1C CA A1 47 2A 4E 4A    G.7,.OH.....G*NJ
012DB0:  23 22 4E 4A C3 BD 47 CD 37 2C DA 70 49 3A 4A 4A    #"NJ..G.7,.pI:JJ
012DC0:  32 5F 4A 21 59 4A CD 20 0B B7 CA E6 47 3A 42 4A    2_J!YJ. ....G:BJ
012DD0:  CD 40 27 CD D3 2E 2A 46 4A 11 0D 00 19 CD DF 36    .@'...*FJ......6
012DE0:  CD 45 49 C3 3C 48 3A 42 4A CD 40 27 2A 56 4A EB    .EI.<H:BJ.@'*VJ.
012DF0:  2A C6 99 CD D8 36 EB CD 84 29 44 4D CD C4 2E 2A    *....6...)DM...*
012E00:  7F 4A CD 45 49 CD DC 1C CD 7E 38 2A C6 99 E5 11    .J.EI....~8*....
012E10:  C6 99 21 C8 99 3A 51 4A 3D 87 4F CD 78 38 79 21    ..!..:QJ=.O.x8y!
012E20:  C6 99 CD BB 36 D1 CD E4 36 3A 51 4A 4F CD D2 48    ....6...6:QJO..H
012E30:  2A C6 99 22 7F 4A 2A 46 4A 22 5A 4A 3A 52 4A B7    *..".J*FJ"ZJ:RJ.
012E40:  C2 94 47 2A 4C 4A 2B 22 4C 4A 7C B5 C2 94 47 3A    ..G*LJ+"LJ|...G:
012E50:  42 4A CD 40 27 CD 84 29 44 4D 21 C6 99 22 54 4A    BJ.@'..)DM!.."TJ
012E60:  3A 51 4A F5 2A 54 4A CD E9 36 22 54 4A 2A 56 4A    :QJ.*TJ..6"TJ*VJ
012E70:  EB CD D8 36 EB CD C4 2E F1 3D C2 63 48 3A 52 4A    ...6.....=.cH:RJ
012E80:  B7 C2 80 46 CD EF 26 C3 BF 46 3A 42 4A CD 40 27    ...F..&..F:BJ.@'
012E90:  CD 45 25 3A 58 4A CD 40 27 CD 45 25 CD 61 27 CD    .E%:XJ.@'.E%.a'.
012EA0:  B5 2D 2A 93 4A CD 79 2A 3A 7D 44 B7 CA B0 49 21    .-*.J.y*:}D...I!
012EB0:  B8 48 CD 28 36 C3 B0 49 54 52 49 20 54 45 52 4D    .H.(6..ITRI TERM
012EC0:  49 4E 45 20 20 00 3A 51 4A 4F CD D2 48 C8 0D C3    INE  .:QJO..H...
012ED0:  CA 48 C5 D5 3A 49 4A 32 5F 4A 3A 51 4A 91 47 79    .H..:IJ2_J:QJ.Gy
012EE0:  48 06 00 3D 3D FA 40 49 21 72 4A 22 5D 4A 21 62    H..==.@I!rJ"]J!b
012EF0:  4A 22 5A 4A F5 21 C6 99 81 87 CD BB 36 E5 CD E9    J"ZJ.!......6...
012F00:  7E 97 CD FA 36 36 00 E1 3A 0A 4F B7 CA 15 4C 7E    ~...66..:.O...L~
012F10:  FE 1A CA 46 4C 11 7E 97 0E 00 22 02 4F D5 EB 2A    ...FL.~...".O..*
012F20:  F8 4E 2B CD C0 36 D4 12 4D D1 2A 02 4F 7E FE 1A    .N+..6..M.*.O~..
012F30:  CA 49 4C FE 0D CA 49 4C FE 09 C2 3F 4C 3E 20 12    .IL...IL...?L> .
012F40:  23 13 0C C3 1A 4C C1 37 C9 11 7E 97 79 C1 C9 C5    #....L.7..~.y...
012F50:  D5 21 00 00 22 16 4F 11 7E 97 3A 01 4F 47 04 0E    .!..".O.~.:.OG..
012F60:  00 21 16 4F CD 72 06 D1 C1 C9 C5 D5 2A FD 4E 06    .!.O.r......*.N.
012F70:  00 7E FE 0D CA 81 4C FE 1A CA 81 4C 04 23 C3 71    .~....L....L.#.q
012F80:  4C 3A 0B 4F 4F 0C 21 7E 97 CD BB 36 0D CA 9B 4C    L:.OO.!~...6...L
012F90:  2B 7E B7 CA 8C 4C FE 20 CA 8C 4C 79 32 0E 4F 90    +~...L. ..Ly2.O.
012FA0:  32 04 4F CA F4 4C F5 2A FF 4E EB 2A F8 4E CD D8    2.O..L.*.N.*.N..
012FB0:  36 22 0C 4F F1 D2 DB 4C 79 2A FD 4E CD BB 36 EB    6".O...Ly*.N..6.
012FC0:  2A 0C 4F 44 4D 2A FF 4E CD 7E 38 3A 04 4F 5F 16    *.ODM*.N.~8:.O_.
012FD0:  FF 2A F8 4E 19 22 F8 4E C3 F4 4C 2A F8 4E 2B CD    .*.N.".N..L*.N+.
012FE0:  BB 36 EB 2A 0C 4F 44 4D 2A F8 4E 2B CD 90 38 EB    .6.*.ODM*.N+..8.
012FF0:  23 22 F8 4E 2A FD 4E 11 7E 97 EB 3A 0E 4F 4F CD    #".N*.N.~..:.OO.
013000:  78 38 CD 76 4D D1 C1 C9 2A 05 4F EB 0E 03 CD 78    x8.vM...*.O....x
013010:  38 C9 C5 D5 3A F1 4E B7 FA 5E 4D 2A F8 4E 11 00    8...:.N..^M*.N..
013020:  5E CD C0 36 D2 2D 4D CD 80 4D C3 1B 4D 54 5D 1B    ^..6.-M..M..MT].
013030:  01 00 02 09 22 F8 4E 3A F1 4E CD 40 27 CD 7A 2C    ....".N:.N.@'.z,
013040:  F5 78 B1 CA 5A 4D 1A E6 7F 12 0B 13 FE 1A C2 41    .x..ZM.........A
013050:  4D EB 22 F8 4E 3E FF 32 0A 4F F1 D1 C1 C9 2A F8    M.".N>.2.O....*.
013060:  4E 2B 36 0D 23 36 0A 23 36 1A 23 22 F8 4E 3E FF    N+6.#6.#6.#".N>.
013070:  32 0A 4F D1 C1 C9 2A F8 4E 11 9C 5F CD C0 36 D0    2.O...*.N.._..6.
013080:  2A F2 4E EB 2A F6 4E CD D8 36 11 00 02 CD C0 36    *.N.*.N..6.....6
013090:  D2 E7 4D 2A F2 4E EB 01 00 02 3A 10 4F CD 40 27    ..M*.N....:.O.@'
0130A0:  CD C4 2E 2A F2 4E 54 5D 09 D5 E5 EB 2A F8 4E CD    ...*.NT]....*.N.
0130B0:  D8 36 44 4D E1 D1 CD 7E 38 11 00 FE 2A F6 4E 19    .6DM...~8...*.N.
0130C0:  22 F6 4E 2A F8 4E 19 22 F8 4E 2A FD 4E 19 22 FD    ".N*.N.".N*.N.".
0130D0:  4E 2A 02 4F 19 22 02 4F 2A F2 4E 3E 0A 0E FF CD    N*.O.".O*.N>....
0130E0:  13 37 23 22 F4 4E C9 21 B1 4E CD 28 36 CD 42 38    .7#".N.!.N.(6.B8
0130F0:  CA A0 4B C3 35 4B 3E 65 CD 70 3B CD 8E 3A C3 AA    ..K.5K>e.p;..:..
013100:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
013110:  10 00 00 00 02 09 46 E5 10 00 C1 02 00 00 00 02    ......F.........
013120:  10 00 C6 02 00 00 00 02 10 00 C2 02 00 00 00 02    ................
013130:  10 00 C7 02 00 00 00 02 10 00 C3 02 00 00 00 02    ................
013140:  10 00 C8 02 00 00 00 02 10 00 C4 02 00 00 00 02    ................
013150:  10 00 C9 02 00 00 00 02 10 00 C5 02 00 00 00 02    ................
013160:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013170:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013180:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013190:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0131F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013200:  36 D5 CD DF 36 22 7F 4A E1 22 6F 4A 21 59 4A CD    6...6".J."oJ!YJ.
013210:  20 0B B7 E1 C2 2C 49 EB 2A 7F 4A EB CD E4 36 EB     ....,I.*.J...6.
013220:  2A 6F 4A EB CD E4 36 06 01 C3 37 49 3A 53 4A B7    *oJ...6...7I:SJ.
013230:  CA 37 49 F1 C3 40 49 F1 B7 CA 40 49 3D C3 F4 48    .7I..@I...@I=..H
013240:  D1 78 C1 B7 C9 3A 61 4A B7 C0 D5 22 8F 4A 3A 53    .x...:aJ...".J:S
013250:  4A B7 CA 63 49 21 92 4A CD 20 0B C2 63 49 3E FF    J..cI!.J. ..cI>.
013260:  32 61 4A 21 9A 4A CD 20 0B 3E 01 32 53 4A D1 C9    2aJ!.J. .>.2SJ..
013270:  3E 19 CD 70 3B C3 7E 44 3E 2F CD 70 3B C3 A0 49    >..p;.~D>/.p;..I
013280:  3E 14 CD 70 3B C3 A0 49 3E 52 CD 70 3B C3 A0 49    >..p;..I>R.p;..I
013290:  3E 48 CD 70 3B C3 A0 49 3E 28 CD 70 3B C3 A0 49    >H.p;..I>(.p;..I
0132A0:  3E 01 32 6F 44 C3 B0 49 3E FF 32 6F 44 C3 B0 49    >.2oD..I>.2oD..I
0132B0:  3E 01 21 00 45 C3 C7 3B 54 54 54 40 40 C8 84 82    >.!.E..;TTT@@...
0132C0:  A6 8A 40 92 92 40 40 50 86 52 40 62 72 70 64 40    ..@..@@P.R@brpd@
0132D0:  40 A4 A6 A0 58 92 9C 86 40 AC CA E4 40 64 5C 2C    @...X...@...@d\,
0132E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0132F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013300:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013310:  00 00 00 00 00 00 00 00 00 00 00 00 41 3A 3A 3A    ............A:::
013320:  3A 3A 3A 3A 3A 41 00 4F 4E 00 41 53 43 45 4E 44    :::::A.ON.ASCEND
013330:  49 4E 47 00 44 45 53 43 45 4E 44 49 4E 47 00 54    ING.DESCENDING.T
013340:  4F 00 00 3A 0F 4F FE 0C D2 4C 4A 35 7E B7 F2 6B    O..:.O...LJ5~..k
013350:  49 AF 32 01 4F 2A FD 4E 22 29 00 00 29 00 00 0B    I.2.O*.N")..)...
013360:  35 4E 43 4F 50 59 52 49 47 48 54 20 20 4E 3A 01    5NCOPYRIGHT  N:.
013370:  4F 3C 28 43 29 20 31 39 38 32 20 20 20 4A 04 78    O<(C) 1982   J.x
013380:  32 01 52 53 50 2C 20 49 4E 43 20 20 20 F6 4E C3    2.RSP, INC   .N.
013390:  09 49 29 02 00 29 82 4A 0B 35 29 82 4A 2F 02 00    .I)..).J.5).J/..
0133A0:  35 CD 3A 3A 3A 41 00 4F 4E 00 41 53 43 45 4E 44    5.:::A.ON.ASCEND
0133B0:  49 4E 47 00 44 45 53 43 45 4E 44 49 4E 47 00 54    ING.DESCENDING.T
0133C0:  4F 00 00 3A 0F 4F FE 0C D2 4C 4A 35 7E B7 F2 6B    O..:.O...LJ5~..k
0133D0:  49 AF 32 01 4F 2A FD 4E 22 29 00 00 29 00 00 0B    I.2.O*.N")..)...
0133E0:  35 4E 43 4F 50 59 52 49 47 48 54 20 20 4E 3A 01    5NCOPYRIGHT  N:.
0133F0:  4F 3C 28 43 29 20 31 39 38 32 20 20 20 4A 04 78    O<(C) 1982   J.x
013400:  2A 5E 48 EB CD E4 36 36 35 22 60 48 01 10 00 2A    *^H...665"`H...*
013410:  5C 48 09 22 5C 48 2A 5E 48 09 22 5E 48 C3 DD 45    \H."\H*^H."^H..E
013420:  3E 01 CD 89 2E CD E3 1C 22 5C 48 2A 5C 48 7E FE    >......."\H*\H~.
013430:  0D CA F0 46 11 C6 99 CD 11 27 CA 78 46 2A 5E 48    ...F.....'.xF*^H
013440:  EB 2A 5C 48 01 10 00 CD 7E 38 2A 60 48 36 2D 23    .*\H....~8*`H6-#
013450:  EB 2A 5C 48 EB CD E4 36 EB 2A 5E 48 EB CD E4 36    .*\H...6.*^H...6
013460:  36 35 22 60 48 01 10 00 2A 5E 48 09 22 5E 48 11    65"`H...*^H."^H.
013470:  C6 9B CD C0 36 DA F0 46 01 10 00 2A 5C 48 09 22    ....6..F...*\H."
013480:  5C 48 C3 2B 46 21 C6 99 22 5E 48 21 64 48 22 60    \H.+F!.."^H!dH"`
013490:  48 2A 5A 48 CD 8E 39 CD 73 39 CD F1 2A 22 62 48    H*ZH..9.s9..*"bH
0134A0:  CD 63 39 CD 92 28 C2 BE 47 22 5C 48 EB 2A 5E 48    .c9..(..G"\H.*^H
0134B0:  EB 01 10 00 CD 7E 38 2A 60 48 36 2D 23 EB 2A 5C    .....~8*`H6-#.*\
0134C0:  48 EB CD E4 36 EB 2A 5E 48 EB CD E4 36 36 35 22    H...6.*^H...665"
0134D0:  60 48 2A 5E 48 11 10 00 19 22 5E 48 2A 62 48 CD    `H*^H...."^H*bH.
0134E0:  8E 39 CD 73 39 FE 2C C2 F0 46 CD 69 39 C3 97 46    .9.s9.,..F.i9..F
0134F0:  2A 5E 48 36 0D 21 C6 99 01 C7 9B CD 75 25 3E 20    *^H6.!......u%> 
013500:  32 C7 9B 3A 56 48 CD 40 27 11 BE 99 01 09 02 CD    2..:VH.@'.......
013510:  C4 2E CD 61 27 3E 01 CD 89 2E CD D8 2C AF CD 89    ...a'>......,...
013520:  2E CD D8 2C 21 00 00 22 BF 99 AF CD 89 2E 21 7E    ...,!.."......!~
013530:  97 CD 20 0B B7 CA 5F 47 21 64 48 CD 20 0B 3A 56    .. ..._G!dH. .:V
013540:  48 CD 40 27 2A C4 99 44 4D 11 C7 9B CD C4 2E CD    H.@'*..DM.......
013550:  61 27 2A BF 99 23 22 BF 99 7C A5 3C CA B6 47 3E    a'*..#"..|.<..G>
013560:  01 CD 89 2E CD 47 2B DA 6D 47 C3 2A 47 CD D8 2C    .....G+.mG.*G..,
013570:  AF CD 89 2E CD 47 2B DA 7D 47 C3 2A 47 3A 56 48    .....G+.}G.*G:VH
013580:  CD 40 27 CD D4 26 CD A8 2D 3E 02 01 09 02 11 BE    .@'..&..->......
013590:  99 12 CD C4 2E CD 45 25 CD 61 27 C3 DC 47 3E 28    ......E%.a'..G>(
0135A0:  CD 70 3B C3 C6 47 3E 48 CD 70 3B C3 C6 47 3E 6C    .p;..G>H.p;..G>l
0135B0:  CD 70 3B C3 C6 47 3E 6D CD 70 3B C3 C6 47 3E 14    .p;..G>m.p;..G>.
0135C0:  CD 70 3B C3 D1 47 CD 61 27 3E 01 32 6F 44 C3 DC    .p;..G.a'>.2oD..
0135D0:  47 CD 61 27 3E FF 32 6F 44 C3 DC 47 3E 01 21 00    G.a'>.2oD..G>.!.
0135E0:  45 C3 C7 3B 54 54 54 40 40 C8 84 82 A6 8A 40 92    E..;TTT@@.....@.
0135F0:  92 40 40 50 86 52 40 62 72 70 62 40 40 A6 86 88    .@@P.R@brpb@@...
013600:  CD 3C 27 B7 CA 77 45 3E FF 32 DB 47 CD 1B 36 21    .<'..wE>.2.G..6!
013610:  12 49 CD 28 36 CD 3C 27 CD C4 25 CD 7F 2E FE 01    .I.(6.<'..%.....
013620:  CA 2B 45 3E 70 CD 70 3B C3 30 45 3E 71 CD 70 3B    .+E>p.p;.0E>q.p;
013630:  CD 1B 36 CD A4 24 7E B7 CA 77 45 22 60 49 21 27    ..6..$~..wE"`I!'
013640:  49 CD 28 36 CD 1B 36 CD 7E 36 2A 60 49 7E B7 CA    I.(6..6.~6*`I~..
013650:  77 45 23 22 60 49 CD 40 27 CD C4 25 CD 78 36 CD    wE#"`I.@'..%.x6.
013660:  A8 2D 01 6E 00 11 FF 49 CD 7A 2C 21 09 4A CD 2B    .-.n...I.z,!.J.+
013670:  36 CD 1B 36 C3 47 45 CD 61 27 CD 83 2E CD 3C 27    6..6.GE.a'....<'
013680:  B7 CA F4 45 3E FF 32 DB 47 CD 1B 36 21 49 49 CD    ...E>.2.G..6!II.
013690:  28 36 CD 3C 27 CD C4 25 CD 7F 2E FE 01 CA A8 45    (6.<'..%.......E
0136A0:  3E 70 CD 70 3B C3 AD 45 3E 71 CD 70 3B CD 1B 36    >p.p;..E>q.p;..6
0136B0:  CD A4 24 7E B7 CA F4 45 22 60 49 21 27 49 CD 28    ..$~...E"`I!'I.(
0136C0:  36 CD 1B 36 CD 7E 36 2A 60 49 7E B7 CA F4 45 23    6..6.~6*`I~...E#
0136D0:  22 60 49 CD 40 27 CD C4 25 CD 78 36 CD A8 2D 01    "`I.@'..%.x6..-.
0136E0:  6E 00 11 FF 49 CD 7A 2C 21 09 4A CD 2B 36 CD 1B    n...I.z,!.J.+6..
0136F0:  36 C3 C4 45 CD 83 2E CD 1B 36 3A DB 47 B7 CA 1A    6..E.....6:.G...
013700:  46 CD 1B 36 CD 1B 36 CD 1B 36 3E 65 CD 70 3B CD    F..6..6..6>e.p;.
013710:  8E 3A FE 1A CA 6C 47 CD 1B 36 21 FC 47 CD 28 36    .:...lG..6!.G.(6
013720:  3A 4E 44 CD 3A 36 3E 2F CD E8 35 3A 4F 44 CD 3A    :ND.:6>/..5:OD.:
013730:  36 3E 2F CD E8 35 3A 50 44 CD 3A 36 21 12 48 CD    6>/..5:PD.:6!.H.
013740:  28 36 3A 5A 44 C6 40 CD E8 35 3E 3A CD E8 35 3A    (6:ZD.@..5>:..5:
013750:  4C 44 B7 CA 65 46 21 E6 47 CD 28 36 3A 4C 44 CD    LD..eF!.G.(6:LD.
013760:  C4 25 CD 1B 36 21 28 48 CD 28 36 3A 56 44 CD 5B    .%..6!(H.(6:VD.[
013770:  47 CD 78 36 21 35 48 CD 2B 36 3A 51 44 CD 5B 47    G.x6!5H.+6:QD.[G
013780:  21 42 48 CD 28 36 3A 54 44 CD 5B 47 CD 78 36 21    !BH.(6:TD.[G.x6!
013790:  4F 48 CD 2B 36 3A 57 44 CD 5B 47 21 69 48 CD 28    OH.+6:WD.[G!iH.(
0137A0:  36 3A 58 44 CD 5B 47 CD 78 36 21 5C 48 CD 2B 36    6:XD.[G.x6!\H.+6
0137B0:  CD 59 3B CD 5B 47 21 76 48 CD 28 36 3A 59 44 CD    .Y;.[G!vH.(6:YD.
0137C0:  5B 47 CD 78 36 21 83 48 CD 2B 36 3A 5B 44 CD 5B    [G.x6!.H.+6:[D.[
0137D0:  47 21 90 48 CD 28 36 3A 6E 44 CD 5B 47 CD 78 36    G!.H.(6:nD.[G.x6
0137E0:  21 9D 48 CD 2B 36 3A 7A 44 CD 5B 47 21 AA 48 CD    !.H.+6:zD.[G!.H.
0137F0:  28 36 3A 70 44 CD 5B 47 CD 78 36 21 B7 48 CD 2B    (6:pD.[G.x6!.H.+
013800:  A0 40 40 40 40 AC CA E4 40 64 5C 2C 00 00 00 00    .@@@@...@d\,....
013810:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013820:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013830:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013840:  00 00 00 00 00 00 00 00 46 49 45 4C 44 53 00 46    ........FIELDS.F
013850:  4F 52 00 54 4F 00 32 6F 44 C3 DC 47 3E 01 21 00    OR.TO.2oD..G>.!.
013860:  45 C3 C7 3B 54 54 54 40 40 C8 84 82 A6 8A 40 92    E..;TTT@@.....@.
013870:  92 40 40 50 86 52 40 62 72 70 62 40 40 A6 86 88    .@@P.R@brpb@@...
013880:  2D 20 00 44 45 4C 45 54 45 20 20 20 20 2D 20 00    - .DELETE    - .
013890:  45 43 48 4F 20 20 20 20 20 20 2D 20 00 45 4A 45    ECHO      - .EJE
0138A0:  43 54 20 20 20 20 20 2D 20 00 45 53 43 41 50 45    CT     - .ESCAPE
0138B0:  20 20 20 20 2D 20 00 45 58 41 43 54 20 20 20 20        - .EXACT    
0138C0:  20 2D 20 00 49 4E 54 45 4E 53 49 54 59 20 2D 20     - .INTENSITY - 
0138D0:  00 4C 49 4E 4B 41 47 45 20 20 20 2D 20 00 50 52    .LINKAGE   - .PR
0138E0:  49 4E 54 20 20 20 20 20 2D 20 00 52 41 57 20 20    INT     - .RAW  
0138F0:  20 20 20 20 20 2D 20 00 53 54 45 50 20 20 20 20         - .STEP    
013900:  CD 3C 29 CD DD 25 AF 32 F8 48 32 F9 48 32 F7 48    .<)..%.2.H2.H2.H
013910:  CD 73 39 CA B7 45 CD E9 25 DA 70 48 CD 73 39 CA    .s9..E..%.pH.s9.
013920:  B7 45 3A F9 48 B7 C2 44 45 11 F1 48 CD B1 37 C2    .E:.H..DE..H..7.
013930:  44 45 CD 8E 39 AF CD AD 27 DA 34 48 3E FF 32 F9    DE..9...'.4H>.2.
013940:  48 C3 10 45 3A F7 48 B7 C2 79 45 11 E7 48 CD B1    H..E:.H..yE..H..
013950:  37 C2 79 45 3E FF 32 F7 48 CD 8E 39 22 FA 48 CD    7.yE>.2.H..9".H.
013960:  73 39 CD F1 2A CA 3C 48 CD 8E 39 CD 73 39 FE 2C    s9..*.<H..9.s9.,
013970:  C2 10 45 CD 69 39 C3 5F 45 3A F8 48 B7 C2 70 48    ..E.i9._E:.H..pH
013980:  11 EE 48 CD B1 37 C2 70 48 3E FF 32 F8 48 CD 8E    ..H..7.pH>.2.H..
013990:  39 CD 73 39 CA 44 48 22 01 49 CD F1 2A CA 44 48    9.s9.DH".I..*.DH
0139A0:  32 FE 48 E5 CD 63 39 CD 92 28 C2 44 48 22 FF 48    2.H..c9..(.DH".H
0139B0:  E1 CD 8E 39 C3 10 45 3A F9 48 B7 CA 4C 48 3E 01    ...9..E:.H..LH>.
0139C0:  CD F0 2B DA D8 45 CD 3C 27 32 F6 48 11 BE 99 01    ..+..E.<'2.H....
0139D0:  09 02 CD 7A 2C C3 F6 45 3E 81 CD F0 2B CD 3C 27    ...z,..E>...+.<'
0139E0:  32 F6 48 CD E3 1C 11 F8 FF 19 11 BE 99 01 09 02    2.H.............
0139F0:  CD 7E 38 CD C4 2E CD 61 27 01 C7 9B 21 C6 99 CD    .~8....a'...!...
013A00:  36 3A 71 44 CD 5B 47 21 C4 48 CD 28 36 3A 75 44    6:qD.[G!.H.(6:uD
013A10:  CD 5B 47 CD 78 36 21 D1 48 CD 2B 36 3A 78 44 CD    .[G.x6!.H.+6:xD.
013A20:  5B 47 21 DE 48 CD 28 36 CD 68 3B CD 5B 47 CD 78    [G!.H.(6.h;.[G.x
013A30:  36 21 EB 48 CD 2B 36 3A 79 44 CD 5B 47 21 F8 48    6!.H.+6:yD.[G!.H
013A40:  CD 28 36 3A 7B 44 CD 5B 47 CD 78 36 21 05 49 CD    .(6:{D.[G.x6!.I.
013A50:  2B 36 3A 7D 44 CD 5B 47 C3 6C 47 B7 CA 65 47 21    +6:}D.[G.lG..eG!
013A60:  E1 47 C3 68 47 21 DC 47 CD 2B 36 C9 CD 61 27 3E    .G.hG!.G.+6..a'>
013A70:  01 21 00 45 C3 C7 3B 54 54 54 40 40 C8 84 82 A6    .!.E..;TTT@@....
013A80:  8A 40 92 92 40 40 50 86 52 40 62 72 70 62 40 40    .@..@@P.R@brpb@@
013A90:  A6 86 88 A0 40 40 40 40 AC CA E4 40 64 5C 2C 00    ....@@@@...@d\,.
013AA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013AB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013AC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
013AD0:  00 00 00 00 00 00 00 00 00 00 00 00 4F 46 46 20    ............OFF 
013AE0:  00 4F 4E 20 20 00 46 49 43 48 49 45 52 20 41 4C    .ON  .FICHIER AL
013AF0:  54 45 52 4E 41 4E 54 20 20 2D 20 00 44 41 54 45    TERNANT  - .DATE
013B00:  20 44 55 20 4A 4F 55 52 20 20 20 20 20 20 20 2D     DU JOUR       -
013B10:  20 00 55 4E 49 54 45 20 44 45 20 44 45 46 41 55     .UNITE DE DEFAU
013B20:  54 20 20 20 20 2D 20 00 41 4C 54 45 52 4E 41 54    T    - .ALTERNAT
013B30:  45 20 2D 20 00 42 45 4C 4C 20 20 20 20 20 20 2D    E - .BELL      -
013B40:  20 00 43 41 52 52 59 20 20 20 20 20 2D 20 00 43     .CARRY     - .C
013B50:  4F 4C 4F 4E 20 20 20 20 20 2D 20 00 43 4F 4E 53    OLON     - .CONS
013B60:  4F 4C 45 20 20 20 2D 20 00 43 4F 4E 46 49 52 4D    OLE   - .CONFIRM
013B70:  20 20 20 2D 20 00 44 45 42 55 47 20 20 20 20 20       - .DEBUG     
013B80:  2D 20 00 44 45 4C 45 54 45 20 20 20 20 2D 20 00    - .DELETE    - .
013B90:  45 43 48 4F 20 20 20 20 20 20 2D 20 00 45 4A 45    ECHO      - .EJE
013BA0:  43 54 20 20 20 20 20 2D 20 00 45 53 43 41 50 45    CT     - .ESCAPE
013BB0:  20 20 20 20 2D 20 00 45 58 41 43 54 20 20 20 20        - .EXACT    
013BC0:  20 2D 20 00 49 4E 54 45 4E 53 49 54 59 20 2D 20     - .INTENSITY - 
013BD0:  00 4C 49 4E 4B 41 47 45 20 20 20 2D 20 00 50 52    .LINKAGE   - .PR
013BE0:  49 4E 54 20 20 20 20 20 2D 20 00 52 41 57 20 20    INT     - .RAW  
013BF0:  20 20 20 20 20 2D 20 00 53 54 45 50 20 20 20 20         - .STEP    
013C00:  75 25 21 7E 97 22 03 49 36 35 3A F7 48 B7 CA 78    u%!~.".I65:.H..x
013C10:  46 2A FA 48 CD 8E 39 CD 73 39 CD F1 2A 22 FA 48    F*.H..9.s9..*".H
013C20:  CD 63 39 CD 92 28 C2 54 48 EB 21 0B 00 19 7E FE    .c9..(.TH.!...~.
013C30:  4E C2 64 46 2A 03 49 36 29 23 CD E4 36 22 03 49    N.dF*.I6)#..6".I
013C40:  CD 63 39 11 C6 99 CD 11 27 C2 54 48 EB 2A 03 49    .c9.....'.TH.*.I
013C50:  36 29 23 CD E4 36 36 05 23 36 31 23 CD E4 36 36    6)#..66.#61#..66
013C60:  35 22 03 49 2A FA 48 CD 8E 39 CD 73 39 FE 2C C2    5".I*.H..9.s9.,.
013C70:  CA 46 CD 69 39 C3 17 46 21 C6 99 22 07 49 2A 07    .F.i9..F!..".I*.
013C80:  49 7E FE 0D CA CA 46 11 0B 00 19 7E FE 4E C2 BD    I~....F....~.N..
013C90:  46 2A 07 49 CD 92 28 C2 54 48 EB 2A 03 49 36 29    F*.I..(.TH.*.I6)
013CA0:  23 CD E4 36 EB 2A 07 49 EB 36 29 23 CD E4 36 36    #..6.*.I.6)#..66
013CB0:  05 23 36 31 23 CD E4 36 36 35 22 03 49 2A 07 49    .#61#..665".I*.I
013CC0:  11 10 00 19 22 07 49 C3 7E 46 3A F8 48 B7 CA 1A    ....".I.~F:.H...
013CD0:  47 2A 03 49 23 22 03 49 22 FC 48 2A FF 48 EB 21    G*.I#".I".H*.H.!
013CE0:  0B 00 19 7E 06 06 FE 4E CA ED 46 06 0E 2A 03 49    ...~...N..F..*.I
013CF0:  36 29 23 CD E4 36 22 03 49 3A FE 48 4F 2A 01 49    6)#..6".I:.HO*.I
013D00:  11 C6 99 CD 11 27 C2 44 48 EB 2A 03 49 36 29 23    .....'.DH.*.I6)#
013D10:  CD E4 36 70 23 36 35 22 03 49 2A 03 49 23 22 03    ..6p#65".I*.I#".
013D20:  49 22 05 49 21 C6 99 22 07 49 2A 07 49 7E FE 0D    I".I!..".I*.I~..
013D30:  CA 5D 47 CD 92 28 C2 50 47 EB 2A 03 49 36 2D 23    .]G..(.PG.*.I6-#
013D40:  CD E4 36 EB 2A 07 49 EB CD E4 36 36 35 22 03 49    ..6.*.I...665".I
013D50:  2A 07 49 11 10 00 19 22 07 49 C3 2A 47 21 FF FF    *.I....".I.*G!..
013D60:  CD 5B 26 2A C4 99 44 4D 21 C7 9B 3E 20 CD FA 36    .[&*..DM!..> ..6
013D70:  CD D8 2C CD DC 1C 7E FE 2A CA 82 47 CD 78 27 C2    ..,...~.*..G.x'.
013D80:  8E 47 CD 47 2B DA EA 47 C2 73 47 C3 EA 47 2A 05    .G.G+..G.sG..G*.
013D90:  49 CD 20 0B 21 01 00 22 F4 48 C3 D8 47 3A F8 48    I. .!..".H..G:.H
013DA0:  B7 CA AE 47 2A FC 48 CD 20 0B B7 CA B7 47 21 7E    ...G*.H. ....G!~
013DB0:  97 CD 20 0B C3 D8 47 3A F6 48 CD 40 27 11 C7 9B    .. ...G:.H.@'...
013DC0:  2A C4 99 44 4D CD C4 2E CD 61 27 2A F4 48 23 22    *..DM....a'*.H#"
013DD0:  F4 48 2A 05 49 CD 20 0B CD 47 2B DA EA 47 CA EA    .H*.I. ..G+..G..
013DE0:  47 CD 78 27 CA D8 47 C3 9D 47 2A F4 48 22 BF 99    G.x'..G..G*.H"..
013DF0:  3A F6 48 CD 40 27 11 C7 9B 2A C4 99 44 4D CD C4    :.H.@'...*..DM..
013E00:  20 20 2D 20 00 54 41 4C 4B 20 20 20 20 20 20 2D      - .TALK      -
013E10:  20 00 42 41 53 45 20 41 43 54 49 56 45 20 20 20     .BASE ACTIVE   
013E20:  20 20 20 20 2D 20 00 20 49 4E 44 45 58 3A 20 20        - . INDEX:  
013E30:  20 20 20 20 20 20 20 20 20 45 58 50 52 45 53 53             EXPRESS
013E40:  49 4F 4E 20 43 4C 45 3A 00 42 41 53 45 20 49 4E    ION CLE:.BASE IN
013E50:  41 43 54 49 56 45 20 20 20 20 20 20 20 2D 20 00    ACTIVE       - .
013E60:  F1 C9 3A 54 01 4F 06 00 11 0C 00 19 7E B9 D2 79    ..:T.O......~..y
013E70:  49 3A 0E 4B 86 B9 DA 9E 49 3A 10 4B B7 CA 82 49    I:.K....I:.K...I
013E80:  37 C9 E5 3E 2D 21 21 4B CD FA 36 21 21 4B 79 CD    7..>-!!K..6!!Ky.
013E90:  BB 36 36 00 E1 37 F5 7E 32 15 4B C3 B1 49 3F F5    .66..7.~2.K..I?.
013EA0:  E5 7E 32 15 4B 4F 06 00 3E 2D 21 21 4B CD FA 36    .~2.KO..>-!!K..6
013EB0:  E1 11 F4 FF 19 11 21 4B 7E B7 CA C3 49 12 23 13    ......!K~...I.#.
013EC0:  C3 B8 49 21 21 4B 3A 15 4B CD BB 36 36 00 2A 0E    ..I!!K:.K..66.*.
013ED0:  4B 44 4D 11 21 4B 21 C5 4A CD 72 06 2A 0E 4B 3A    KDM.!K!.J.r.*.K:
013EE0:  15 4B 85 3C 6F 22 0E 4B F1 C9 D5 3A 11 4B 6F 26    .K.<o".K...:.Ko&
013EF0:  00 29 29 29 29 EB 3A 14 4B B7 C2 03 4A CD 00 1C    .)))).:.K...J...
013F00:  AF 32 C4 46 CD 73 39 CA 17 45 11 94 46 AF CD 20    .2.F.s9..E..F.. 
013F10:  37 6F 26 00 19 36 00 21 69 46 CD 8E 39 3A 5A 44    7o&..6.!iF..9:ZD
013F20:  32 C3 46 AF 32 5A 44 3E 04 CD AD 27 3E 02 CD F0    2.F.2ZD>...'>...
013F30:  2B 32 C1 46 3A C3 46 32 5A 44 3A 55 01 D6 04 32    +2.F:.F2ZD:U...2
013F40:  C2 46 CD D9 45 3A C1 46 CD CA 39 DA E1 45 CD 63    .F..E:.F..9..E.c
013F50:  39 FE 2A C2 42 45 23 11 94 46 EB CD B1 37 C2 42    9.*.BE#..F...7.B
013F60:  45 3E FF 32 C4 46 CD 1B 36 CD D9 45 3A C1 46 CD    E>.2.F..6..E:.F.
013F70:  CA 39 DA E1 45 CD 63 39 7E FE 2A CA 69 45 C3 AE    .9..E.c9~.*.iE..
013F80:  45 CD D9 45 3A C1 46 CD CA 39 DA E1 45 CD 63 39    E..E:.F..9..E.c9
013F90:  11 77 46 CD B1 37 CA EE 45 CD 63 39 11 72 46 CD    .wF..7..E.c9.rF.
013FA0:  B1 37 CA 42 45 7E FE 2A CA BB 45 CD 92 39 CD 28    .7.BE~.*..E..9.(
013FB0:  36 3A C2 46 3D 32 C2 46 C2 81 45 CD 1B 36 3E 65    6:.F=2.F..E..6>e
013FC0:  CD 70 3B CD 8E 3A FE 1B CA FD 45 CD 1B 36 3A 55    .p;..:....E..6:U
013FD0:  01 D6 04 32 C2 46 C3 81 45 CD 3B 3A C8 3A 70 44    ...2.F..E.;:.:pD
013FE0:  C8 3A C4 46 B7 C2 EE 45 21 7D 46 CD 28 36 3A C1    .:.F...E!}F.(6:.
013FF0:  46 CD 40 27 CD 45 25 CD 61 27 C3 FD 45 3E 01 21    F.@'.E%.a'..E>.!
014000:  2E 3A F6 48 CD 40 27 CD D4 26 CD A8 2D 01 09 02    .:.H.@'..&..-...
014010:  11 BE 99 CD C4 2E CD 45 25 CD 61 27 3A 7D 44 B7    .......E%.a':}D.
014020:  CA 7B 48 2A F4 48 CD 1B 36 CD 35 36 3E 27 CD 70    .{H*.H..6.56>'.p
014030:  3B C3 7B 48 3E 28 CD 70 3B C3 5C 48 3E 52 CD 70    ;.{H>(.p;.\H>R.p
014040:  3B C3 5C 48 3E 1C CD 70 3B C3 5C 48 3E 48 CD 70    ;.\H>..p;.\H>H.p
014050:  3B C3 5C 48 3E 52 CD 70 3B C3 5C 48 3A F6 48 CD    ;.\H>R.p;.\H:.H.
014060:  40 27 CD 45 25 CD 61 27 3E 01 32 6F 44 C3 7B 48    @'.E%.a'>.2oD.{H
014070:  CD 61 27 3E FF 32 6F 44 C3 7B 48 3E 01 21 00 45    .a'>.2oD.{H>.!.E
014080:  C3 C7 3B 54 54 54 40 40 C8 84 82 A6 8A 40 92 92    ..;TTT@@.....@..
014090:  40 40 50 86 52 40 62 72 70 62 40 40 A6 86 88 A0    @@P.R@brpb@@....
0140A0:  40 40 40 40 AC CA E4 40 64 5C 2C 00 00 00 00 00    @@@@...@d\,.....
0140B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0140C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0140D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0140E0:  00 00 00 00 00 00 00 46 49 45 4C 44 53 00 4F 4E    .......FIELDS.ON
0140F0:  00 54 4F 00 00 00 00 44 C3 7B 48 3E 01 21 00 45    .TO....D.{H>.!.E
014100:  CD 3C 29 AF 32 AC 49 32 AD 49 32 AB 49 32 AF 49    .<).2.I2.I2.I2.I
014110:  32 AE 49 CD 73 39 CA 2B 46 3A AC 49 B7 C2 3E 45    2.I.s9.+F:.I..>E
014120:  11 8C 49 CD B1 37 C2 3E 45 CD 8E 39 CD 73 39 AF    ..I..7.>E..9.s9.
014130:  CD AD 27 DA B7 48 3E FF 32 AC 49 C3 13 45 3A AD    ..'..H>.2.I..E:.
014140:  49 B7 C2 6B 45 11 91 49 CD B1 37 C2 6B 45 CD 8E    I..kE..I..7.kE..
014150:  39 CD 73 39 22 C4 49 CD F1 2A CA BF 48 32 B0 49    9.s9".I..*..H2.I
014160:  CD 8E 39 3E FF 32 AD 49 C3 13 45 3A AB 49 B7 C2    ..9>.2.I..E:.I..
014170:  A6 45 11 88 49 CD B1 37 C2 A6 45 CD 8E 39 CD 73    .E..I..7..E..9.s
014180:  39 CA 0B 49 22 C2 49 CD 73 39 CD F1 2A CA BF 48    9..I".I.s9..*..H
014190:  CD 8E 39 3E FF 32 AB 49 CD 73 39 FE 2C C2 13 45    ..9>.2.I.s9.,..E
0141A0:  CD 69 39 C3 87 45 3A AF 49 B7 C2 0A 46 11 9B 49    .i9..E:.I...F..I
0141B0:  CD B1 37 C2 0A 46 CD 8E 39 CD 73 39 CA 0B 49 22    ..7..F..9.s9..I"
0141C0:  C6 49 CD 73 39 CD F1 2A CA BF 48 CD 8E 39 3E FF    .I.s9..*..H..9>.
0141D0:  32 AF 49 CD 73 39 FE 2C C2 E1 45 CD 69 39 C3 C2    2.I.s9.,..E.i9..
0141E0:  45 CD 73 39 11 A3 49 CD B1 37 C2 13 45 CD 8E 39    E.s9.£I..7..E..9
0141F0:  CD 73 39 CD F1 2A CA BF 48 CD 8E 39 CD 73 39 FE    .s9..*..H..9.s9.
014200:  00 45 C3 C7 3B 1F 7A FE 07 CA A1 1F FE 08 CA 3C    .E..;.z........<
014210:  1E FE 15 CA A1 1F FE 16 CA A1 1F FE 09 C4 98 04    ................
014220:  3E 17 47 C5 CD 04 1F 47 C3 3C 1E E1 22 96 38 D1    >.G....G.<..".8.
014230:  7A B7 D5 C2 BD 1F 11 00 00 D5 11 20 01 D5 CD 10    z.......... ....
014240:  20 22 BD 37 EB 22 92 38 EB 79 32 91 38 CD 0F 1F     ".7.".8.y2.8...
014250:  FA 07 20 D6 02 CA 07 20 32 95 38 FE 05 CA F1 1F    .. .... 2.8.....
014260:  FE 14 CA F1 1F FE 13 CA F1 44 42 41 53 45 4D 53    .........DBASEMS
014270:  47 00 2A 45 4E 44 00 2A 45 58 49 54 00 41 55 43    G.*END.*EXIT.AUC
014280:  55 4E 20 54 45 58 54 45 20 44 27 41 49 44 45 20    UN TEXTE D'AIDE 
014290:  20 20 20 00 48 45 4C 50 00 A1 1F FE 09 C4 98 04       .HELP........
0142A0:  3E 17 47 C5 CD 04 1F 47 C3 3C 1E E1 22 96 38 D1    >.G....G.<..".8.
0142B0:  7A B7 D5 C2 BD 1F 11 00 00 D5 11 20 01 D5 CD 10    z.......... ....
0142C0:  20 22 BD 37 EB 22 92 38 EB 79 32 91 38 CD 0F 1F     ".7.".8.y2.8...
0142D0:  FA 07 20 D6 02 CA 07 20 32 95 38 FE 05 CA F1 1F    .. .... 2.8.....
0142E0:  FE 14 CA F1 1F FE 13 CA F1 44 42 41 53 45 4D 53    .........DBASEMS
0142F0:  47 00 2A 45 4E 44 00 2A 45 58 49 54 00 4E 4F 20    G.*END.*EXIT.NO 
014300:  CD 3C 29 CD 83 2E CD 3C 29 AF CD 89 2E AF 32 59    .<)....<).....2Y
014310:  48 32 58 48 32 57 48 CD 73 39 CA A4 45 3A 59 48    H2XH2WH.s9..E:YH
014320:  B7 C2 42 45 11 53 48 CD B1 37 C2 42 45 CD 8E 39    ..BE.SH..7.BE..9
014330:  CD 73 39 AF CD AD 27 DA 9E 47 3E FF 32 59 48 C3    .s9...'..G>.2YH.
014340:  17 45 3A 58 48 B7 C2 69 45 11 4F 48 CD B1 37 C2    .E:XH..iE.OH..7.
014350:  69 45 CD 8E 39 CD 73 39 11 7E 97 CD F2 14 DA D1    iE..9.s9.~......
014360:  47 3E FF 32 58 48 C3 17 45 3A 57 48 B7 C2 D1 47    G>.2XH..E:WH...G
014370:  11 48 48 CD B1 37 C2 D1 47 CD 8E 39 3E FF 32 57    .HH..7..G..9>.2W
014380:  48 CD 73 39 CA D1 47 22 5A 48 CD 73 39 CD F1 2A    H.s9..G"ZH.s9..*
014390:  CA BE 47 CD 8E 39 CD 73 39 FE 2C C2 17 45 CD 69    ..G..9.s9.,..E.i
0143A0:  39 C3 8A 45 3A 59 48 B7 CA A6 47 3A 58 48 B7 CA    9..E:YH...G:XH..
0143B0:  AE 47 3E 81 CD F0 2B CD 3C 27 32 56 48 CD 61 27    .G>...+.<'2VH.a'
0143C0:  AF CD 89 2E 3A 57 48 B7 C2 85 46 CD E3 1C 22 5C    ....:WH...F..."\
0143D0:  48 21 C6 99 22 5E 48 21 64 48 22 60 48 2A 5C 48    H!.."^H!dH"`H*\H
0143E0:  7E FE 0D CA 20 46 EB 2A 5E 48 EB 01 10 00 CD 7E    ~... F.*^H.....~
0143F0:  38 2A 60 48 36 2D 23 EB 2A 5C 48 EB CD E4 36 EB    8*`H6-#.*\H...6.
014400:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
014410:  11 00 00 00 02 09 46 E5 11 00 C1 02 00 00 00 02    ......F.........
014420:  11 00 C6 02 00 00 00 02 11 00 C2 02 00 00 00 02    ................
014430:  11 00 C7 02 00 00 00 02 11 00 C3 02 00 00 00 02    ................
014440:  11 00 C8 02 00 00 00 02 11 00 C4 02 00 00 00 02    ................
014450:  11 00 C9 02 00 00 00 02 11 00 C5 02 00 00 00 02    ................
014460:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014470:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014480:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014490:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0144F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014500:  2C C2 13 45 CD 69 39 C3 C2 45 3A AE 49 B7 C2 0B    ,..E.i9..E:.I...
014510:  49 11 94 49 CD B1 37 C2 0B 49 CD 8E 39 3E FF 32    I..I..7..I..9>.2
014520:  AE 49 CD 9F 24 CA E7 48 C3 13 45 3A AC 49 B7 CA    .I..$..H..E:.I..
014530:  C7 48 3A AD 49 B7 CA CF 48 3E 01 CD F0 2B DA B7    .H:.I...H>...+..
014540:  48 CD 3C 27 32 AA 49 01 09 02 11 BE 99 CD 7A 2C    H.<'2.I.......z,
014550:  01 C7 9B 21 C6 99 CD 75 25 3A AE 49 B7 C2 9C 46    ...!...u%:.I...F
014560:  2A C4 49 CD 92 28 C2 D7 48 11 0C 00 19 46 23 CD    *.I..(..H....F#.
014570:  DF 36 22 B4 49 2A C4 49 11 C6 99 3A B0 49 4F CD    .6".I*.I...:.IO.
014580:  11 27 C2 D7 48 11 0C 00 19 4E 23 CD DF 36 22 B2    .'..H....N#..6".
014590:  49 78 B9 C2 DF 48 32 B0 49 C3 BB 46 2A C4 49 11    Ix...H2.I..F*.I.
0145A0:  C6 99 3A B0 49 4F CD 11 27 C2 D7 48 11 0C 00 19    ..:.IO..'..H....
0145B0:  7E 32 B0 49 23 CD DF 36 22 B2 49 21 7E 97 22 B8    ~2.I#..6".I!~.".
0145C0:  49 22 BE 49 3A AB 49 B7 CA 42 47 2A B8 49 22 BC    I".I:.I..BG*.I".
0145D0:  49 2A C2 49 CD 8E 39 CD 73 39 22 C2 49 CD 92 28    I*.I..9.s9".I..(
0145E0:  C2 D7 48 22 A8 49 2A C2 49 CD F1 2A 22 B6 49 2A    ..H".I*.I..*".I*
0145F0:  C2 49 11 C6 99 CD 11 27 C2 D7 48 EB 2A BC 49 36    .I.....'..H.*.I6
014600:  29 23 CD E4 36 36 29 23 EB 2A A8 49 EB CD E4 36    )#..66)#.*.I...6
014610:  36 05 23 36 31 23 EB 2A A8 49 EB CD E4 36 22 BC    6.#61#.*.I...6".
014620:  49 2A B6 49 CD 8E 39 CD 73 39 7E FE 2C C2 39 47    I*.I..9.s9~.,.9G
014630:  CD 69 39 22 C2 49 C3 D1 46 2A BC 49 36 35 23 22    .i9".I..F*.I65#"
014640:  BE 49 3A AF 49 B7 CA C9 47 2A BE 49 22 BC 49 2A    .I:.I...G*.I".I*
014650:  C6 49 CD 8E 39 CD 73 39 22 C6 49 CD 92 28 C2 D7    .I..9.s9".I..(..
014660:  48 22 C0 49 2A C6 49 CD F1 2A 22 B6 49 CD 8E 39    H".I*.I..*".I..9
014670:  CD 73 39 11 A3 49 CD B1 37 C2 8B 47 CD 8E 39 CD    .s9.£I..7..G..9.
014680:  73 39 22 C6 49 CD F1 2A 22 B6 49 2A C6 49 11 C6    s9".I..*".I*.I..
014690:  99 CD 11 27 C2 D7 48 EB 2A BC 49 36 2D 23 CD E4    ...'..H.*.I6-#..
0146A0:  36 EB 2A C0 49 EB CD E4 36 22 BC 49 2A B6 49 CD    6.*.I...6".I*.I.
0146B0:  8E 39 CD 73 39 7E FE 2C C2 C4 47 CD 69 39 22 C6    .9.s9~.,..G.i9".
0146C0:  49 C3 4F 47 2A BC 49 36 35 3A AE 49 B7 C2 4A 48    I.OG*.I65:.I..JH
0146D0:  CD 61 27 21 FF FF CD 5B 26 DA A8 48 3A AA 49 CD    .a'!...[&..H:.I.
0146E0:  40 27 2A C4 99 44 4D 11 C7 9B CD 7A 2C 2A B4 49    @'*..DM....z,*.I
0146F0:  EB 2A B2 49 3A B0 49 4F CD 3D 37 DA 3E 48 CA 04    .*.I:.IO.=7.>H..
014700:  23 20 3A 30 30 30 30 30 00 43 20 20 20 F6 4E C3    # :00000.C   .N.
014710:  09 49 29 02 00 29 82 4A 0B 35 29 82 4A 2F 02 00    .I)..).J.5).J/..
014720:  35 CD F5 4B 7E FE 1A C2 B4 4A 36 0D 23 36 0A 23    5..K~....J6.#6.#
014730:  36 1A 2B 2B 23 23 22 FD 4E 7E FE 1A C2 CE 4A 36    6.++##".N~....J6
014740:  0D 23 36 00 00 00 00 00 00 20 00 20 20 20 20 20    .#6...... .     
014750:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
014760:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
014770:  20 00 46 49 45 4C 44 53 00 52 45 43 4F 52 44 20     .FIELDS.RECORD 
014780:  A1 2C 11 E9 4E CD 08 4D CD B2 2C 11 E6 4E CD 08    .,..N..M..,..N..
014790:  4D CD A1 2C 11 07 4F CD 08 4D CD B2 2C C3 B9 4B    M..,..O..M..,..K
0147A0:  3A F1 4E B7 FA AD 4B CD 40 27 CD 45 25 3A 10 4F    :.N...K.@'.E%:.O
0147B0:  CD 40 27 CD 45 25 CD 03 27 CD 61 27 3A FA 4E 32    .@'.E%..'.a':.N2
0147C0:  57 44 CD AC 06 C3 2C 4E 2B 7E FE 0A C2 D0 4B 2B    WD....,N+~....K+
0147D0:  2B 7E FE 0D C2 D0 4B 23 7E FE 0A C0 23 C9 CD 68    +~....K#~...#..h
0147E0:  27 0E 0C 3E 2E CD 13 37 23 22 05 4F 11 07 4F 0E    '..>...7#".O..O.
0147F0:  03 CD 78 38 C9 C5 E5 3A 0B 4F 4F 06 00 3E 20 21    ..x8...:.OO..> !
014800:  47 3A 18 4B 4F 3A 17 4B 81 32 18 4B B8 D2 48 48    G:.KO:.K.2.K..HH
014810:  C3 6D 46 CD 9F 24 CA 25 48 CD E9 21 DA 48 48 CD    .mF..$.%H..!.HH.
014820:  9D 27 C3 2B 48 CD 37 2C DA 48 48 2A 0B 4B 23 22    .'.+H.7,.HH*.K#"
014830:  0B 4B 3A 1A 4B 47 3A 18 4B 4F 3A 17 4B 81 32 18    .K:.KG:.KO:.K.2.
014840:  4B B8 D2 48 48 C3 6D 46 2A 0B 4B 22 1F 4B AF 32    K..HH.mF*.K".K.2
014850:  0D 4B C3 9C 45 3A 12 4B E6 30 CA 9E 48 E6 10 CA    .K..E:.K.0..H...
014860:  73 48 3A 11 4B 3D FA 91 48 32 11 4B 21 13 4B 34    sH:.K=..H2.K!.K4
014870:  C3 91 48 CD EA 49 11 10 00 19 7E FE 0D CA 91 48    ..H..I....~....H
014880:  3A 11 4B 3C 32 11 4B 3A 13 4B 3D FA 91 48 32 13    :.K<2.K:.K=..H2.
014890:  4B 2A 0B 4B 22 1F 4B AF 32 0D 4B C3 9C 45 C3 4C    K*.K".K.2.K..E.L
0148A0:  4A 3A 54 01 4F 11 0C 00 19 7E B9 D2 B6 48 3A 0E    J:T.O....~...H:.
0148B0:  4B 86 B9 DA DF 48 3A 10 4B B7 CA BF 48 37 C9 E5    K....H:.K...H7..
0148C0:  0E 00 7E 2F 3C 6F 26 FF 3A 54 01 5F 16 00 0C 19    ..~/<o&.:T._....
0148D0:  7C B7 FA CE 48 E1 79 32 17 4B 37 F5 C3 E1 48 3F    |...H.y2.K7...H?
0148E0:  F5 4E 79 32 15 4B 23 CD DF 36 11 21 4B CD 78 38    .Ny2.K#..6.!K.x8
0148F0:  EB 3A 15 4B CD BB 36 36 00 2A 0E 4B 44 4D 11 21    .:.K..66.*.KDM.!
014900:  48 C3 27 48 3A AB 49 B7 CA 11 48 2A B8 49 CD 20    H.'H:.I...H*.I. 
014910:  0B 3A AF 49 B7 CA 1E 48 2A BE 49 CD 20 0B CD 61    .:.I...H*.I. ..a
014920:  27 CD E7 1C CD D3 2E 3A AA 49 CD 40 27 2A C4 99    '......:.I.@'*..
014930:  44 4D 11 C7 9B CD 7A 2C DA A8 48 C3 ED 47 CD 61    DM....z,..H..G.a
014940:  27 CD 47 2B DA A8 48 C3 ED 47 3A AA 49 CD 40 27    '.G+..H..G:.I.@'
014950:  2A C4 99 44 4D 11 C7 9B CD 7A 2C CD 61 27 2A B2    *..DM....z,.a'*.
014960:  49 3A B0 49 CD B1 20 E5 CD 9D 27 E1 7C B5 CA 91    I:.I.. ...'.|...
014970:  48 3A AB 49 B7 CA 7E 48 2A B8 49 CD 20 0B 3A AF    H:.I..~H*.I. .:.
014980:  49 B7 CA 8B 48 2A BE 49 CD 20 0B CD E7 1C CD D3    I...H*.I. ......
014990:  2E 3A AA 49 CD 40 27 2A C4 99 44 4D 11 C7 9B CD    .:.I.@'*..DM....
0149A0:  7A 2C DA A8 48 C3 5B 48 3A AA 49 CD 40 27 CD 45    z,..H.[H:.I.@'.E
0149B0:  25 CD 61 27 C3 1C 49 3E 28 CD 70 3B C3 F7 48 3E    %.a'..I>(.p;..H>
0149C0:  1C CD 70 3B C3 0B 49 3E 6E CD 70 3B C3 F7 48 3E    ..p;..I>n.p;..H>
0149D0:  54 CD 70 3B C3 F7 48 3E 52 CD 70 3B C3 0B 49 3E    T.p;..H>R.p;..I>
0149E0:  6F CD 70 3B C3 F7 48 3E 73 CD 70 3B C3 F7 48 3E    o.p;..H>s.p;..H>
0149F0:  53 CD 70 3B C3 F7 48 3A AA 49 CD 40 27 CD 45 25    S.p;..H:.I.@'.E%
014A00:  CD 61 27 3E 01 32 6F 44 C3 1C 49 3A AA 49 CD 40    .a'>.2oD..I:.I.@
014A10:  27 CD 45 25 3E FF 32 6F 44 C3 1C 49 3E 01 21 00    '.E%>.2oD..I>.!.
014A20:  45 C3 C7 3B 54 54 54 40 40 C8 84 82 A6 8A 40 92    E..;TTT@@.....@.
014A30:  92 40 40 50 86 52 40 62 72 70 62 40 40 A6 86 88    .@@P.R@brpb@@...
014A40:  A0 40 40 40 40 AC CA E4 40 64 5C 2C 00 00 00 00    .@@@@...@d\,....
014A50:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014A60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014A70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014A80:  00 00 00 00 00 00 00 00 41 44 44 00 46 52 4F 4D    ........ADD.FROM
014A90:  00 4F 4E 00 52 41 4E 44 4F 4D 00 52 45 50 4C 41    .ON.RANDOM.REPLA
014AA0:  43 45 00 57 49 54 48 00 C2 A0 00 C3 A6 8A 40 92    CE.WITH.......@.
014AB0:  92 40 40 50 86 52 40 62 72 70 62 40 40 A6 86 88    .@@P.R@brpb@@...
014AC0:  A0 40 40 40 40 AC CA E4 40 64 5C 2C 00 00 00 00    .@@@@...@d\,....
014AD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014AE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014AF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
014B00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014B10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014B20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014B30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014B40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014B50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014B60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014B70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014B80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014B90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014BA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014BB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014BC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014BD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014BE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014BF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014C00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014C10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014C20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014C30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014C40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014C50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014C60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014C70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014C80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014C90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014CA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014CB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014CC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014CD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014CE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014CF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
014D00:  CD 99 2C 7C B5 CA 55 4A AF 32 14 4B 21 20 4C 22    ..,|..UJ.2.K! L"
014D10:  1D 4B CD 73 39 CA 72 45 11 F2 4A CD B1 37 C2 3F    .K.s9.rE..J..7.?
014D20:  4A CD 8E 39 3E FF 32 14 4B CD 73 39 CD F1 2A C2    J..9>.2.K.s9..*.
014D30:  3A 45 3E 14 CD 70 3B C3 47 4A E5 CD 63 39 CD 92    :E>..p;.GJ..c9..
014D40:  28 CA 4C 45 3E 52 CD 70 3B C3 47 4A EB 2A 1D 4B    (.LE>R.p;.GJ.*.K
014D50:  EB 01 10 00 CD 7E 38 21 10 00 19 22 1D 4B 36 0D    .....~8!...".K6.
014D60:  E1 CD 8E 39 CD 73 39 FE 2C C2 72 45 CD 69 39 C3    ...9.s9.,.rE.i9.
014D70:  29 45 CD DD 25 21 FE FF CD 5B 26 CD 99 2C 22 0B    )E..%!...[&..,".
014D80:  4B 22 1F 4B AF 32 0D 4B CD DE 1F 3A 57 44 32 0A    K".K.2.K...:WD2.
014D90:  4B AF 32 57 44 AF 32 11 4B 32 13 4B AF 32 18 4B    K.2WD.2.K2.K.2.K
014DA0:  AF 32 1A 4B 32 19 4B CD AC 06 21 00 02 22 0E 4B    .2.K2.K...!..".K
014DB0:  2A 1F 4B CD 9D 27 CD EA 49 22 1D 4B AF 32 10 4B    *.K..'..I".K.2.K
014DC0:  3E 01 32 17 4B 2A 1D 4B 7E FE 0D CA E5 45 CD A1    >.2.K*.K~....E..
014DD0:  48 DA E5 45 21 10 4B 34 2A 1D 4B 11 10 00 19 22    H..E!.K4*.K...."
014DE0:  1D 4B C3 C5 45 3A 55 01 D6 05 4F 3A 1A 4B 47 3A    .K..E:U...O:.KG:
014DF0:  17 4B 80 32 1A 4B B9 D2 23 46 2A 0E 4B 3A 17 4B    .K.2.K..#F*.K:.K
014E00:  84 67 2E 00 22 0E 4B 21 19 4B 34 CD 9F 24 CA 1D    .g..".K!.K4..$..
014E10:  46 CD E9 21 DA 23 46 CD 9D 27 C3 B6 45 CD 37 2C    F..!.#F..'..E.7,
014E20:  D2 B6 45 21 00 01 22 0E 4B CD EA 49 22 1D 4B AF    ..E!..".K..I".K.
014E30:  32 10 4B 2A 1D 4B 7E FE 0D CA 53 46 CD 62 49 DA    2.K*.K~...SF.bI.
014E40:  53 46 21 10 4B 34 2A 1D 4B 11 10 00 19 22 1D 4B    SF!.K4*.K....".K
014E50:  C3 33 46 3A 0D 4B 4F 3A 17 4B 47 21 00 02 79 3D    .3F:.KO:.KG!..y=
014E60:  FA 6A 46 4F 78 84 67 C3 5E 46 22 0E 4B 2A 0B 4B    .jFOx.g.^F".K*.K
014E70:  11 03 4B CD 09 4A 11 F9 4A 21 C5 4A 01 00 00 CD    ..K..J..J!.J....
014E80:  72 06 2A 0B 4B CD 9D 27 CD DE 1F CD EA 49 22 1D    r.*.K..'.....I".
014E90:  4B AF 32 10 4B 2A 1D 4B 7E FE 0D CA B5 46 CD 15    K.2.K*.K~....F..
014EA0:  49 DA B5 46 21 10 4B 34 2A 1D 4B 11 10 00 19 22    I..F!.K4*.K...."
014EB0:  1D 4B C3 95 46 3A 13 4B 21 10 4B BE DA C4 46 7E    .K..F:.K!.K...F~
014EC0:  3D 32 13 4B 3A 13 4B 47 3E 03 CD 1D 02 32 12 4B    =2.K:.KG>....2.K
014ED0:  78 32 13 4B CD B5 06 AF 32 0E 4B CD EA 49 22 1D    x2.K....2.K..I".
014EE0:  4B AF 32 10 4B 2A 1D 4B 7E FE 0D CA 05 47 CD A1    K.2.K*.K~....G..
014EF0:  48 DA 05 47 21 10 4B 34 2A 1D 4B 11 10 00 19 22    H..G!.K4*.K...."
014F00:  64 6F 20 77 68 69 6C 65 20 74 0D 0A 75 73 65 20    do while t..use 
014F10:  64 65 62 69 74 0D 0A 73 65 74 20 69 6E 64 65 78    debit..set index
014F20:  20 74 6F 20 6E 75 6D 65 72 6F 2C 64 61 74 65 2D     to numero,date-
014F30:  64 65 62 0D 0A 65 72 61 73 65 0D 0A 40 20 32 2C    deb..erase..@ 2,
014F40:  30 20 73 61 79 20 22 20 20 20 20 20 20 20 20 20    0 say "         
014F50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A                   *
014F60:  2A 2A 20 44 20 45 20 42 20 49 20 54 20 2A 2A 2A    ** D E B I T ***
014F70:  22 0D 0A 40 20 35 2C 30 20 73 61 79 20 22 20 20    "..@ 5,0 say "  
014F80:  20 20 20 20 20 20 28 43 29 72 65 61 74 69 6F 6E          (C)reation
014F90:  22 0D 0A 40 20 37 2C 30 20 73 61 79 20 22 20 20    "..@ 7,0 say "  
014FA0:  20 20 20 20 20 20 28 4D 29 6F 64 69 66 69 63 61          (M)odifica
014FB0:  74 69 6F 6E 20 65 74 20 63 6F 6E 73 75 6C 74 61    tion et consulta
014FC0:  74 69 6F 6E 22 0D 0A 40 20 39 2C 30 20 73 61 79    tion"..@ 9,0 say
014FD0:  20 22 20 20 20 20 20 20 20 20 28 45 29 66 66 61     "        (E)ffa
014FE0:  63 65 6D 65 6E 74 22 0D 0A 40 20 31 31 2C 30 20    cement"..@ 11,0 
014FF0:  73 61 79 20 22 20 20 20 20 20 20 20 20 28 52 29    say "        (R)
015000:  65 74 6F 75 72 20 61 75 20 6D 65 6E 75 20 69 6E    etour au menu in
015010:  69 74 69 61 6C 22 0D 0A 77 61 69 74 20 74 6F 20    itial"..wait to 
015020:  72 65 70 0D 0A 64 6F 20 63 61 73 65 0D 0A 2A 63    rep..do case..*c
015030:  72 65 61 74 69 6F 6E 0D 0A 63 61 73 65 20 21 28    reation..case !(
015040:  72 65 70 29 3D 22 43 22 0D 0A 65 72 61 73 65 0D    rep)="C"..erase.
015050:  0A 40 20 32 2C 30 20 73 61 79 20 22 20 20 20 20    .@ 2,0 say "    
015060:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
015070:  20 54 52 41 49 54 45 4D 45 4E 54 20 44 45 53 20     TRAITEMENT DES 
015080:  43 48 45 51 55 45 53 20 20 20 20 20 20 20 20 20    CHEQUES         
015090:  20 20 20 20 20 20 20 43 52 45 41 54 49 4F 4E 22           CREATION"
0150A0:  0D 0A 40 20 35 2C 30 20 73 61 79 20 22 4E 75 6D    ..@ 5,0 say "Num
0150B0:  65 72 6F 20 20 20 20 20 20 20 20 20 20 20 64 75    ero           du
0150C0:  20 20 20 20 20 20 20 20 20 20 20 20 64 27 75 6E                d'un
0150D0:  20 6D 6F 6E 74 61 6E 74 20 64 65 22 0D 0A 40 20     montant de"..@ 
0150E0:  38 2C 30 20 73 61 79 20 22 61 20 6C 27 6F 72 64    8,0 say "a l'ord
0150F0:  72 65 20 64 65 20 22 0D 0A 73 74 6F 72 65 20 22    re de "..store "
015100:  1D 4B C3 E5 46 3A 12 4B E6 C0 CA 10 47 C3 4C 4A    .K..F:.K....G.LJ
015110:  AF 32 09 4B 3A 12 4B E6 01 CA 42 47 CD E7 1C CD    .2.K:.K...BG....
015120:  D3 2E CD 9F 24 CA 42 47 CD 83 21 32 09 4B B7 CA    ....$.BG..!2.K..
015130:  42 47 CD 99 2C 22 0B 4B 22 1F 4B CD DE 1F AF 32    BG..,".K".K....2
015140:  0D 4B 3A 12 4B E6 04 CA 55 48 3A 12 4B E6 02 CA    .K:.K...UH:.K...
015150:  DC 47 21 0E 4B 36 00 23 3A 17 4B 96 2F 3C 77 CD    .G!.K6.#:.K./<w.
015160:  9F 24 CA 86 47 CD 5A 22 DA C6 47 22 0B 4B 3A 09    .$..G.Z"..G".K:.
015170:  4B B7 C2 CF 47 3A 17 4B 47 3A 18 4B 90 32 18 4B    K...G:.KG:.K.2.K
015180:  FA CF 47 C3 6D 46 2A 0B 4B 2B 22 0B 4B 7C B5 CA    ..G.mF*.K+".K|..
015190:  C6 47 3A 17 4B 47 3A 18 4B 90 32 18 4B FA A3 47    .G:.KG:.K.2.K.£G
0151A0:  C3 6D 46 2A 0B 4B 11 04 00 CD C0 36 D2 CF 47 11    .mF*.K.....6..G.
0151B0:  FC FF 19 22 1F 4B 3E 04 32 0D 4B 3A 17 4B 87 87    ...".K>.2.K:.K..
0151C0:  32 18 4B C3 A0 45 CD D8 2C CD 99 2C 22 0B 4B 2A    2.K..E..,..,".K*
0151D0:  0B 4B 22 1F 4B AF 32 0D 4B C3 9C 45 21 0E 4B 36    .K".K.2.K..E!.K6
0151E0:  00 23 3A 17 4B 86 77 CD 9F 24 CA 13 48 CD E9 21    .#:.K.w..$..H..!
0151F0:  DA 48 48 22 0B 4B 3A 09 4B B7 C2 48 48 3A 1A 4B    .HH".K:.K..HH:.K
015200:  47 3A 18 4B 4F 3A 17 4B 81 32 18 4B B8 D2 48 48    G:.KO:.K.2.K..HH
015210:  C3 6D 46 CD 9F 24 CA 25 48 CD E9 21 DA 48 48 CD    .mF..$.%H..!.HH.
015220:  9D 27 C3 2B 48 CD 37 2C DA 48 48 2A 0B 4B 23 22    .'.+H.7,.HH*.K#"
015230:  0B 4B 3A 1A 4B 47 3A 18 4B 4F 3A 17 4B 81 32 18    .K:.KG:.KO:.K.2.
015240:  4B B8 D2 48 48 C3 6D 46 2A 0B 4B 22 1F 4B AF 32    K..HH.mF*.K".K.2
015250:  0D 4B C3 9C 45 3A 12 4B E6 30 CA 9E 48 E6 10 CA    .K..E:.K.0..H...
015260:  73 48 3A 11 4B 3D FA 91 48 32 11 4B 21 13 4B 34    sH:.K=..H2.K!.K4
015270:  C3 91 48 CD EA 49 11 10 00 19 7E FE 0D CA 91 48    ..H..I....~....H
015280:  3A 11 4B 3C 32 11 4B 3A 13 4B 3D FA 91 48 32 13    :.K<2.K:.K=..H2.
015290:  4B 2A 0B 4B 22 1F 4B AF 32 0D 4B C3 9C 45 C3 4C    K*.K".K.2.K..E.L
0152A0:  4A 3A 54 01 4F 11 0C 00 19 7E B9 D2 B6 48 3A 0E    J:T.O....~...H:.
0152B0:  4B 86 B9 DA DF 48 3A 10 4B B7 CA BF 48 37 C9 E5    K....H:.K...H7..
0152C0:  0E 00 7E 2F 3C 6F 26 FF 3A 54 01 5F 16 00 0C 19    ..~/<o&.:T._....
0152D0:  7C B7 FA CE 48 E1 79 32 17 4B 37 F5 C3 E1 48 3F    |...H.y2.K7...H?
0152E0:  F5 4E 79 32 15 4B 23 CD DF 36 11 21 4B CD 78 38    .Ny2.K#..6.!K.x8
0152F0:  EB 3A 15 4B CD BB 36 36 00 2A 0E 4B 44 4D 11 21    .:.K..66.*.KDM.!
015300:  4E 22 20 74 6F 20 66 69 6E 0D 0A 64 6F 20 77 68    N" to fin..do wh
015310:  69 6C 65 20 66 69 6E 20 23 20 22 4F 22 0D 0A 73    ile fin # "O"..s
015320:  74 6F 72 65 20 22 4E 22 20 74 6F 20 63 6F 6E 74    tore "N" to cont
015330:  69 6E 75 0D 0A 73 74 6F 72 65 20 22 20 20 20 20    inu..store "    
015340:  20 20 20 22 20 74 6F 20 6D 6E 75 6D 65 72 6F 0D       " to mnumero.
015350:  0A 73 74 6F 72 65 20 22 20 20 20 20 20 20 20 20    .store "        
015360:  22 20 74 6F 20 6D 64 61 74 65 3A 64 65 62 0D 0A    " to mdate:deb..
015370:  73 74 6F 72 65 20 22 20 20 20 20 20 20 20 20 20    store "         
015380:  20 20 20 20 20 20 20 20 20 20 20 22 20 74 6F 20               " to 
015390:  6D 64 65 62 69 74 65 75 72 0D 0A 73 74 6F 72 65    mdebiteur..store
0153A0:  20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20     "              
0153B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0153C0:  22 20 74 6F 20 6D 63 6F 6D 3A 64 65 62 0D 0A 73    " to mcom:deb..s
0153D0:  74 6F 72 65 20 30 2E 30 30 20 74 6F 20 6D 6D 6F    tore 0.00 to mmo
0153E0:  6E 74 3A 64 65 62 0D 0A 40 20 35 2C 37 20 67 65    nt:deb..@ 5,7 ge
0153F0:  74 20 6D 6E 75 6D 65 72 6F 20 70 69 63 74 75 72    t mnumero pictur
015400:  65 20 22 39 39 39 39 39 39 39 22 0D 0A 72 65 61    e "9999999"..rea
015410:  64 0D 0A 69 66 20 6D 6E 75 6D 65 72 6F 3D 22 20    d..if mnumero=" 
015420:  22 0D 0A 73 74 6F 72 65 20 22 4F 22 20 74 6F 20    "..store "O" to 
015430:  66 69 6E 0D 0A 65 6C 73 65 0D 0A 69 66 20 6D 6E    fin..else..if mn
015440:  75 6D 65 72 6F 3D 22 39 39 39 39 39 39 39 22 0D    umero="9999999".
015450:  0A 61 70 70 65 6E 64 20 62 6C 61 6E 6B 0D 0A 65    .append blank..e
015460:  6C 73 65 0D 0A 66 69 6E 64 20 26 6D 6E 75 6D 65    lse..find &mnume
015470:  72 6F 0D 0A 69 66 20 23 23 30 0D 0A 40 20 32 32    ro..if ##0..@ 22
015480:  2C 30 20 73 61 79 20 63 68 72 28 37 29 2B 22 43    ,0 say chr(7)+"C
015490:  65 20 63 68 65 71 75 65 20 65 73 74 20 64 65 6A    e cheque est dej
0154A0:  61 20 65 6E 72 65 67 69 73 74 72 65 22 2B 63 68    a enregistre"+ch
0154B0:  72 28 37 29 0D 0A 73 74 6F 72 65 20 30 20 74 6F    r(7)..store 0 to
0154C0:  20 74 65 6D 70 6F 0D 0A 64 6F 20 77 68 69 6C 65     tempo..do while
0154D0:  20 74 65 6D 70 6F 23 35 30 0D 0A 73 74 6F 72 65     tempo#50..store
0154E0:  20 74 65 6D 70 6F 2B 31 20 74 6F 20 74 65 6D 70     tempo+1 to temp
0154F0:  6F 0D 0A 65 6E 64 64 6F 20 74 65 6D 70 6F 0D 0A    o..enddo tempo..
015500:  4B 21 C5 4A CD 72 06 2A 0E 4B 3A 15 4B 85 3C 6F    K!.J.r.*.K:.K.<o
015510:  22 0E 4B F1 C9 3A 54 01 4F 22 C1 4A 11 0C 00 19    ".K..:T.O".J....
015520:  7E B9 D2 2D 49 3A 0E 4B 86 B9 DA 40 49 3A 10 4B    ~..-I:.K...@I:.K
015530:  B7 CA 36 49 37 C9 3E 01 32 10 4B 37 F5 C3 42 49    ..6I7.>.2.K7..BI
015540:  3F F5 7E 32 15 4B 2A 0E 4B 44 4D 11 C5 4A 21 C1    ?.~2.K*.KDM..J!.
015550:  4A CD 72 06 2A 0E 4B 3A 15 4B 85 3C 6F 22 0E 4B    J.r.*.K:.K.<o".K
015560:  F1 C9 3A 54 01 4F 06 00 11 0C 00 19 7E B9 D2 79    ..:T.O......~..y
015570:  49 3A 0E 4B 86 B9 DA 9E 49 3A 10 4B B7 CA 82 49    I:.K....I:.K...I
015580:  37 C9 E5 3E 2D 21 21 4B CD FA 36 21 21 4B 79 CD    7..>-!!K..6!!Ky.
015590:  BB 36 36 00 E1 37 F5 7E 32 15 4B C3 B1 49 3F F5    .66..7.~2.K..I?.
0155A0:  E5 7E 32 15 4B 4F 06 00 3E 2D 21 21 4B CD FA 36    .~2.KO..>-!!K..6
0155B0:  E1 11 F4 FF 19 11 21 4B 7E B7 CA C3 49 12 23 13    ......!K~...I.#.
0155C0:  C3 B8 49 21 21 4B 3A 15 4B CD BB 36 36 00 2A 0E    ..I!!K:.K..66.*.
0155D0:  4B 44 4D 11 21 4B 21 C5 4A CD 72 06 2A 0E 4B 3A    KDM.!K!.J.r.*.K:
0155E0:  15 4B 85 3C 6F 22 0E 4B F1 C9 D5 3A 11 4B 6F 26    .K.<o".K...:.Ko&
0155F0:  00 29 29 29 29 EB 3A 14 4B B7 C2 03 4A CD E3 1C    .)))).:.K...J...
015600:  C3 06 4A 21 20 4C 19 D1 C9 C5 D5 01 10 27 CD 2C    ..J! L.......'.,
015610:  4A 01 E8 03 CD 2C 4A 01 64 00 CD 2C 4A 01 0A 00    J....,J.d..,J...
015620:  CD 2C 4A 01 01 00 CD 2C 4A D1 C1 C9 D5 16 2F 14    .,J....,J...../.
015630:  7D 91 6F 7C 98 67 D2 2F 4A 09 7A D1 12 13 C9 3E    }.o|.g./J.z....>
015640:  FF 32 6F 44 C3 4C 4A 3E 01 C3 4F 4A CD AC 06 3A    .2oD.LJ>..OJ...:
015650:  0A 4B 32 57 44 3E 01 21 00 45 C3 C7 3B 00 00 0B    .K2WD>.!.E..;...
015660:  35 4E 43 4F 50 59 52 49 47 48 54 20 20 4E 3A 01    5NCOPYRIGHT  N:.
015670:  4F 3C 28 43 29 20 31 39 38 32 20 20 20 4A 04 78    O<(C) 1982   J.x
015680:  32 01 52 53 50 2C 20 49 4E 43 20 20 20 F6 4E C3    2.RSP, INC   .N.
015690:  09 49 29 02 00 29 82 4A 0B 35 29 82 4A 2F 02 00    .I)..).J.5).J/..
0156A0:  35 CD F5 4B 7E FE 1A C2 B4 4A 36 0D 23 36 0A 23    5..K~....J6.#6.#
0156B0:  36 1A 2B 2B 23 23 22 FD 4E 7E FE 1A C2 CE 4A 36    6.++##".N~....J6
0156C0:  0D 23 36 00 00 00 00 00 00 20 00 20 20 20 20 20    .#6...... .     
0156D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0156E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0156F0:  20 00 46 49 45 4C 44 53 00 52 45 43 4F 52 44 20     .FIELDS.RECORD 
015700:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
015710:  12 00 00 00 02 09 46 E5 12 00 C1 02 00 00 00 02    ......F.........
015720:  12 00 C6 02 00 00 00 02 12 00 C2 02 00 00 00 02    ................
015730:  12 00 C7 02 00 00 00 02 12 00 C3 02 00 00 00 02    ................
015740:  12 00 C8 02 00 00 00 02 12 00 C4 02 00 00 00 02    ................
015750:  12 00 C9 02 00 00 00 02 12 00 C5 02 00 00 00 02    ................
015760:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
015770:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
015780:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
015790:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0157F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
015800:  72 65 6C 65 61 73 65 20 74 65 6D 70 6F 0D 0A 40    release tempo..@
015810:  20 32 32 2C 30 0D 0A 73 74 6F 72 65 20 22 4F 22     22,0..store "O"
015820:  20 74 6F 20 63 6F 6E 74 69 6E 75 0D 0A 73 74 6F     to continu..sto
015830:  72 65 20 64 61 74 65 3A 64 65 62 20 74 6F 20 6D    re date:deb to m
015840:  64 61 74 65 3A 64 65 62 0D 0A 73 74 6F 72 65 20    date:deb..store 
015850:  64 65 62 69 74 65 75 72 20 74 6F 20 6D 64 65 62    debiteur to mdeb
015860:  69 74 65 75 72 0D 0A 73 74 6F 72 65 20 63 6F 6D    iteur..store com
015870:  3A 64 65 62 20 74 6F 20 6D 63 6F 6D 3A 64 65 62    :deb to mcom:deb
015880:  0D 0A 73 74 6F 72 65 20 6D 6F 6E 74 3A 64 65 62    ..store mont:deb
015890:  20 74 6F 20 6D 6D 6F 6E 74 3A 64 65 62 0D 0A 65     to mmont:deb..e
0158A0:  6C 73 65 0D 0A 61 70 70 65 6E 64 20 62 6C 61 6E    lse..append blan
0158B0:  6B 0D 0A 65 6E 64 69 66 0D 0A 65 6E 64 69 66 0D    k..endif..endif.
0158C0:  0A 40 20 35 2C 32 30 20 67 65 74 20 6D 64 61 74    .@ 5,20 get mdat
0158D0:  65 3A 64 65 62 20 70 69 63 74 75 72 65 20 22 39    e:deb picture "9
0158E0:  39 2F 39 39 2F 39 39 22 0D 0A 40 20 35 2C 34 37    9/99/99"..@ 5,47
0158F0:  20 67 65 74 20 6D 6D 6F 6E 74 3A 64 65 62 0D 0A     get mmont:deb..
015900:  40 20 38 2C 31 33 20 67 65 74 20 6D 64 65 62 69    @ 8,13 get mdebi
015910:  74 65 75 72 0D 0A 40 20 31 30 2C 31 33 20 67 65    teur..@ 10,13 ge
015920:  74 20 6D 63 6F 6D 3A 64 65 62 0D 0A 72 65 61 64    t mcom:deb..read
015930:  0D 0A 69 66 20 6D 64 61 74 65 3A 64 65 62 23 64    ..if mdate:deb#d
015940:  61 74 65 3A 64 65 62 20 2E 6F 72 2E 20 6D 64 65    ate:deb .or. mde
015950:  62 69 74 65 75 72 23 64 65 62 69 74 65 75 72 20    biteur#debiteur 
015960:  2E 6F 72 2E 20 6D 63 6F 6D 3A 64 65 62 23 63 6F    .or. mcom:deb#co
015970:  6D 3A 64 65 62 20 3B 0D 0A 2E 6F 72 2E 20 6D 6D    m:deb ;...or. mm
015980:  6F 6E 74 3A 64 65 62 23 6D 6F 6E 74 3A 64 65 62    ont:deb#mont:deb
015990:  0D 0A 69 66 20 21 28 63 6F 6E 74 69 6E 75 29 3D    ..if !(continu)=
0159A0:  22 4F 22 0D 0A 73 74 6F 72 65 20 63 68 71 3A 73    "O"..store chq:s
0159B0:  6F 6C 64 65 2D 6D 6D 6F 6E 74 3A 64 65 62 2B 6D    olde-mmont:deb+m
0159C0:  6F 6E 74 3A 64 65 62 20 74 6F 20 63 68 71 3A 73    ont:deb to chq:s
0159D0:  6F 6C 64 65 0D 0A 65 6C 73 65 0D 0A 73 74 6F 72    olde..else..stor
0159E0:  65 20 63 68 71 3A 73 6F 6C 64 65 2D 6D 6D 6F 6E    e chq:solde-mmon
0159F0:  74 3A 64 65 62 20 74 6F 20 63 68 71 3A 73 6F 6C    t:deb to chq:sol
015A00:  20 67 65 74 20 6D 63 6F 6D 3A 64 65 62 0D 0A 20     get mcom:deb.. 
015A10:  20 20 20 20 20 72 65 61 64 0D 0A 20 20 20 20 20         read..     
015A20:  20 20 20 69 66 20 6D 64 61 74 65 3A 64 65 62 23       if mdate:deb#
015A30:  64 61 74 65 3A 64 65 62 20 2E 6F 72 2E 20 6D 64    date:deb .or. md
015A40:  65 62 69 74 65 75 72 23 64 65 62 69 74 65 75 72    ebiteur#debiteur
015A50:  20 2E 6F 72 2E 20 6D 63 6F 6D 3A 64 65 62 23 63     .or. mcom:deb#c
015A60:  6F 6D 3A 64 65 62 20 3B 0D 0A 2E 6F 72 2E 20 6D    om:deb ;...or. m
015A70:  6D 6F 6E 74 3A 64 65 62 23 6D 6F 6E 74 3A 64 65    mont:deb#mont:de
015A80:  62 0D 0A 20 20 20 20 20 20 20 20 20 20 69 66 20    b..          if 
015A90:  21 28 63 6F 6E 74 69 6E 75 29 3D 22 4F 22 0D 0A    !(continu)="O"..
015AA0:  20 20 20 20 20 20 20 20 20 20 73 74 6F 72 65 20              store 
015AB0:  63 68 71 3A 73 6F 6C 64 65 2D 6D 6D 6F 6E 74 3A    chq:solde-mmont:
015AC0:  64 65 62 20 74 6F 20 63 68 71 3A 73 6F 6C 64 65    deb to chq:solde
015AD0:  0D 0A 20 20 20 20 20 20 20 20 20 20 65 6C 73 65    ..          else
015AE0:  0D 0A 20 20 20 20 20 20 20 20 20 20 73 74 6F 72    ..          stor
015AF0:  65 20 63 68 71 3A 73 6F 6C 64 65 2B 6D 6F 6E 74    e chq:solde+mont
015B00:  3A 64 65 62 2D 6D 6D 6F 6E 74 3A 64 65 62 20 74    :deb-mmont:deb t
015B10:  6F 20 63 68 71 3A 73 6F 6C 64 65 0D 0A 20 20 20    o chq:solde..   
015B20:  20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20           endif..  
015B30:  20 20 20 20 20 20 72 65 70 6C 61 63 65 20 6E 75          replace nu
015B40:  6D 65 72 6F 20 77 69 74 68 20 6D 6E 75 6D 65 72    mero with mnumer
015B50:  6F 0D 0A 20 20 20 20 20 20 20 20 72 65 70 6C 61    o..        repla
015B60:  63 65 20 64 61 74 65 3A 64 65 62 20 77 69 74 68    ce date:deb with
015B70:  20 6D 64 61 74 65 3A 64 65 62 0D 0A 20 20 20 20     mdate:deb..    
015B80:  20 20 20 20 72 65 70 6C 61 63 65 20 64 65 62 69        replace debi
015B90:  74 65 75 72 20 77 69 74 68 20 6D 64 65 62 69 74    teur with mdebit
015BA0:  65 75 72 0D 0A 20 20 20 20 20 20 20 20 72 65 70    eur..        rep
015BB0:  6C 61 63 65 20 63 6F 6D 3A 64 65 62 20 77 69 74    lace com:deb wit
015BC0:  68 20 6D 63 6F 6D 3A 64 65 62 0D 0A 20 20 20 20    h mcom:deb..    
015BD0:  20 20 20 20 72 65 70 6C 61 63 65 20 6D 6F 6E 74        replace mont
015BE0:  3A 64 65 62 20 77 69 74 68 20 6D 6D 6F 6E 74 3A    :deb with mmont:
015BF0:  64 65 62 0D 0A 20 20 20 20 20 20 20 20 73 74 6F    deb..        sto
015C00:  64 65 0D 0A 65 6E 64 69 66 0D 0A 72 65 70 6C 61    de..endif..repla
015C10:  63 65 20 6E 75 6D 65 72 6F 20 77 69 74 68 20 6D    ce numero with m
015C20:  6E 75 6D 65 72 6F 0D 0A 72 65 70 6C 61 63 65 20    numero..replace 
015C30:  64 61 74 65 3A 64 65 62 20 77 69 74 68 20 6D 64    date:deb with md
015C40:  61 74 65 3A 64 65 62 0D 0A 72 65 70 6C 61 63 65    ate:deb..replace
015C50:  20 64 65 62 69 74 65 75 72 20 77 69 74 68 20 6D     debiteur with m
015C60:  64 65 62 69 74 65 75 72 0D 0A 72 65 70 6C 61 63    debiteur..replac
015C70:  65 20 63 6F 6D 3A 64 65 62 20 77 69 74 68 20 6D    e com:deb with m
015C80:  63 6F 6D 3A 64 65 62 0D 0A 72 65 70 6C 61 63 65    com:deb..replace
015C90:  20 6D 6F 6E 74 3A 64 65 62 20 77 69 74 68 20 6D     mont:deb with m
015CA0:  6D 6F 6E 74 3A 64 65 62 0D 0A 73 74 6F 72 65 20    mont:deb..store 
015CB0:  6D 6E 75 6D 65 72 6F 20 74 6F 20 63 68 71 3A 64    mnumero to chq:d
015CC0:  65 72 0D 0A 65 6E 64 69 66 0D 0A 65 6E 64 69 66    er..endif..endif
015CD0:  0D 0A 40 20 35 2C 32 30 20 73 61 79 20 22 20 20    ..@ 5,20 say "  
015CE0:  20 20 20 20 20 20 20 20 22 0D 0A 40 20 35 2C 34            "..@ 5,4
015CF0:  37 20 73 61 79 20 22 20 20 20 20 20 20 20 20 20    7 say "         
015D00:  20 20 20 22 0D 0A 40 20 38 2C 31 33 20 73 61 79       "..@ 8,13 say
015D10:  20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20     "              
015D20:  20 20 20 20 20 20 20 20 22 0D 0A 40 20 31 30 2C            "..@ 10,
015D30:  31 33 20 73 61 79 20 22 20 20 20 20 20 20 20 20    13 say "        
015D40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
015D50:  20 20 20 20 20 20 20 20 22 0D 0A 63 6C 65 61 72            "..clear
015D60:  20 67 65 74 73 0D 0A 65 6E 64 64 6F 0D 0A 72 65     gets..enddo..re
015D70:  6C 65 61 73 65 20 66 69 6E 2C 6D 6E 75 6D 65 72    lease fin,mnumer
015D80:  6F 2C 6D 64 61 74 65 3A 64 65 62 2C 6D 64 65 62    o,mdate:deb,mdeb
015D90:  69 74 65 75 72 2C 6D 63 6F 6D 3A 64 65 62 2C 6D    iteur,mcom:deb,m
015DA0:  6D 6F 6E 74 3A 64 65 62 2C 63 6F 6E 74 69 6E 75    mont:deb,continu
015DB0:  0D 0A 0D 0A 2A 6D 6F 64 69 66 69 63 61 74 69 6F    ....*modificatio
015DC0:  6E 0D 0A 63 61 73 65 20 21 28 72 65 70 29 3D 22    n..case !(rep)="
015DD0:  4D 22 0D 0A 65 72 61 73 65 0D 0A 40 20 32 2C 30    M"..erase..@ 2,0
015DE0:  20 73 61 79 20 22 20 20 20 20 20 20 20 20 20 20     say "          
015DF0:  20 20 20 20 20 20 20 20 20 20 20 54 52 41 49 54               TRAIT
015E00:  72 65 20 6D 6E 75 6D 65 72 6F 20 74 6F 20 63 68    re mnumero to ch
015E10:  71 3A 64 65 72 0D 0A 20 20 20 20 20 20 20 20 65    q:der..        e
015E20:  6E 64 69 66 0D 0A 20 20 20 20 20 20 63 6C 65 61    ndif..      clea
015E30:  72 20 67 65 74 73 0D 0A 20 20 20 20 20 20 40 20    r gets..      @ 
015E40:  32 30 2C 30 20 73 61 79 20 22 28 53 29 75 69 76    20,0 say "(S)uiv
015E50:  61 6E 74 2C 20 28 50 29 72 65 63 65 64 65 6E 74    ant, (P)recedent
015E60:  2C 20 28 4E 29 6F 75 76 65 61 75 20 6E 75 6D 65    , (N)ouveau nume
015E70:  72 6F 20 22 20 67 65 74 20 72 65 63 68 65 72 63    ro " get recherc
015E80:  68 65 20 70 69 63 74 20 22 21 22 0D 0A 20 20 20    he pict "!"..   
015E90:  20 20 20 72 65 61 64 0D 0A 20 20 20 20 20 20 40       read..      @
015EA0:  20 32 30 2C 30 0D 0A 20 20 20 20 20 20 20 20 69     20,0..        i
015EB0:  66 20 72 65 63 68 65 72 63 68 65 3D 22 53 22 0D    f recherche="S".
015EC0:  0A 20 20 20 20 20 20 20 20 73 6B 69 70 20 2B 20    .        skip + 
015ED0:  31 0D 0A 20 20 20 20 20 20 20 20 65 6E 64 69 66    1..        endif
015EE0:  0D 0A 20 20 20 20 20 20 20 20 69 66 20 72 65 63    ..        if rec
015EF0:  68 65 72 63 68 65 3D 22 50 22 0D 0A 20 20 20 20    herche="P"..    
015F00:  20 20 20 20 73 6B 69 70 20 2D 20 31 0D 0A 20 20        skip - 1..  
015F10:  20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20 20 20          endif..   
015F20:  20 20 20 73 74 6F 72 65 20 6E 75 6D 65 72 6F 20       store numero 
015F30:  74 6F 20 6D 6E 75 6D 65 72 6F 0D 0A 20 20 20 20    to mnumero..    
015F40:  20 20 65 6E 64 64 6F 20 72 65 63 68 65 72 63 68      enddo recherch
015F50:  65 0D 0A 20 20 20 20 65 6E 64 69 66 0D 0A 20 20    e..    endif..  
015F60:  40 20 35 2C 32 30 20 73 61 79 20 22 20 20 20 20    @ 5,20 say "    
015F70:  20 20 20 20 20 20 22 0D 0A 20 20 40 20 35 2C 34          "..  @ 5,4
015F80:  37 20 73 61 79 20 22 20 20 20 20 20 20 20 20 20    7 say "         
015F90:  20 20 20 22 0D 0A 20 20 40 20 38 2C 31 33 20 73       "..  @ 8,13 s
015FA0:  61 79 20 22 20 20 20 20 20 20 20 20 20 20 20 20    ay "            
015FB0:  20 20 20 20 20 20 20 20 20 20 22 0D 0A 20 20 40              "..  @
015FC0:  20 31 30 2C 31 33 20 73 61 79 20 22 20 20 20 20     10,13 say "    
015FD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
015FE0:  20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A 20                ".. 
015FF0:  20 65 6E 64 64 6F 0D 0A 72 65 6C 65 61 73 65 20     enddo..release 
016000:  45 4D 45 4E 54 20 44 45 53 20 43 48 45 51 55 45    EMENT DES CHEQUE
016010:  53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    S               
016020:  20 3B 0D 0A 4D 4F 44 49 46 49 43 41 54 49 4F 4E     ;..MODIFICATION
016030:  22 0D 0A 40 20 35 2C 30 20 73 61 79 20 22 4E 75    "..@ 5,0 say "Nu
016040:  6D 65 72 6F 20 20 20 20 20 20 20 20 20 20 20 64    mero           d
016050:  75 20 20 20 20 20 20 20 20 20 20 20 20 64 27 75    u            d'u
016060:  6E 20 6D 6F 6E 74 61 6E 74 20 64 65 22 0D 0A 40    n montant de"..@
016070:  20 38 2C 30 20 73 61 79 20 22 61 20 6C 27 6F 72     8,0 say "a l'or
016080:  64 72 65 20 64 65 20 22 0D 0A 73 74 6F 72 65 20    dre de "..store 
016090:  22 4E 22 20 74 6F 20 66 69 6E 0D 0A 20 20 64 6F    "N" to fin..  do
0160A0:  20 77 68 69 6C 65 20 66 69 6E 20 23 20 22 4F 22     while fin # "O"
0160B0:  0D 0A 20 20 73 74 6F 72 65 20 22 53 22 20 74 6F    ..  store "S" to
0160C0:  20 72 65 63 68 65 72 63 68 65 0D 0A 20 20 73 74     recherche..  st
0160D0:  6F 72 65 20 22 4E 22 20 74 6F 20 63 6F 6E 74 69    ore "N" to conti
0160E0:  6E 75 0D 0A 20 20 73 74 6F 72 65 20 22 20 20 20    nu..  store "   
0160F0:  20 20 20 20 22 20 74 6F 20 6D 6E 75 6D 65 72 6F        " to mnumero
016100:  0D 0A 20 20 73 74 6F 72 65 20 22 20 20 20 20 20    ..  store "     
016110:  20 20 20 22 20 74 6F 20 6D 64 61 74 65 3A 64 65       " to mdate:de
016120:  62 0D 0A 20 20 73 74 6F 72 65 20 22 20 20 20 20    b..  store "    
016130:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
016140:  22 20 74 6F 20 6D 64 65 62 69 74 65 75 72 0D 0A    " to mdebiteur..
016150:  20 20 73 74 6F 72 65 20 22 20 20 20 20 20 20 20      store "       
016160:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
016170:  20 20 20 20 20 20 20 22 20 74 6F 20 6D 63 6F 6D           " to mcom
016180:  3A 64 65 62 0D 0A 20 20 73 74 6F 72 65 20 30 2E    :deb..  store 0.
016190:  30 30 20 74 6F 20 6D 6D 6F 6E 74 3A 64 65 62 0D    00 to mmont:deb.
0161A0:  0A 20 20 40 20 35 2C 37 20 67 65 74 20 6D 6E 75    .  @ 5,7 get mnu
0161B0:  6D 65 72 6F 20 70 69 63 74 75 72 65 20 22 39 39    mero picture "99
0161C0:  39 39 39 39 39 22 0D 0A 20 20 72 65 61 64 0D 0A    99999"..  read..
0161D0:  20 20 20 20 69 66 20 6D 6E 75 6D 65 72 6F 3D 22        if mnumero="
0161E0:  20 22 0D 0A 20 20 20 20 73 74 6F 72 65 20 22 4F     "..    store "O
0161F0:  22 20 74 6F 20 66 69 6E 0D 0A 20 20 20 20 65 6C    " to fin..    el
016200:  66 69 6E 2C 6D 6E 75 6D 65 72 6F 2C 6D 64 61 74    fin,mnumero,mdat
016210:  65 3A 64 65 62 2C 6D 64 65 62 69 74 65 75 72 2C    e:deb,mdebiteur,
016220:  6D 63 6F 6D 3A 64 65 62 2C 6D 6D 6F 6E 74 3A 64    mcom:deb,mmont:d
016230:  65 62 2C 63 6F 6E 74 69 6E 75 2C 72 65 63 68 65    eb,continu,reche
016240:  72 63 68 65 0D 0A 0D 0A 2A 65 66 66 61 63 65 6D    rche....*effacem
016250:  65 6E 74 0D 0A 63 61 73 65 20 21 28 72 65 70 29    ent..case !(rep)
016260:  3D 22 45 22 0D 0A 73 74 6F 72 65 20 30 20 74 6F    ="E"..store 0 to
016270:  20 65 66 66 61 63 65 6D 65 6E 74 0D 0A 65 72 61     effacement..era
016280:  73 65 0D 0A 40 20 32 2C 30 20 73 61 79 20 22 20    se..@ 2,0 say " 
016290:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0162A0:  20 20 20 20 54 52 41 49 54 45 4D 45 4E 54 20 44        TRAITEMENT D
0162B0:  45 53 20 43 48 45 51 55 45 53 20 20 20 20 20 20    ES CHEQUES      
0162C0:  20 20 20 20 20 20 20 20 20 20 3B 0D 0A 45 46 46              ;..EFF
0162D0:  41 43 45 4D 45 4E 54 22 0D 0A 40 20 35 2C 30 20    ACEMENT"..@ 5,0 
0162E0:  73 61 79 20 22 4E 75 6D 65 72 6F 20 20 20 20 20    say "Numero     
0162F0:  20 20 20 20 20 20 64 75 20 20 20 20 20 20 20 20          du        
016300:  20 20 20 20 64 27 75 6E 20 6D 6F 6E 74 61 6E 74        d'un montant
016310:  20 64 65 22 0D 0A 40 20 38 2C 30 20 73 61 79 20     de"..@ 8,0 say 
016320:  22 61 20 6C 27 6F 72 64 72 65 20 64 65 20 22 0D    "a l'ordre de ".
016330:  0A 73 74 6F 72 65 20 22 4E 22 20 74 6F 20 66 69    .store "N" to fi
016340:  6E 0D 0A 64 6F 20 77 68 69 6C 65 20 66 69 6E 20    n..do while fin 
016350:  23 20 22 4F 22 0D 0A 73 74 6F 72 65 20 22 53 22    # "O"..store "S"
016360:  20 74 6F 20 72 65 63 68 65 72 63 68 65 0D 0A 73     to recherche..s
016370:  74 6F 72 65 20 22 20 20 20 20 20 20 20 22 20 74    tore "       " t
016380:  6F 20 6D 6E 75 6D 65 72 6F 0D 0A 40 20 35 2C 37    o mnumero..@ 5,7
016390:  20 67 65 74 20 6D 6E 75 6D 65 72 6F 20 70 69 63     get mnumero pic
0163A0:  74 75 72 65 20 22 39 39 39 39 39 39 39 22 0D 0A    ture "9999999"..
0163B0:  72 65 61 64 0D 0A 69 66 20 6D 6E 75 6D 65 72 6F    read..if mnumero
0163C0:  3D 22 20 22 0D 0A 73 74 6F 72 65 20 22 4F 22 20    =" "..store "O" 
0163D0:  74 6F 20 66 69 6E 0D 0A 65 6C 73 65 0D 0A 66 69    to fin..else..fi
0163E0:  6E 64 20 26 6D 6E 75 6D 65 72 6F 0D 0A 20 69 66    nd &mnumero.. if
0163F0:  20 23 3D 30 0D 0A 20 40 20 32 32 2C 30 20 73 61     #=0.. @ 22,0 sa
016400:  73 65 0D 0A 20 20 20 20 66 69 6E 64 20 26 6D 6E    se..    find &mn
016410:  75 6D 65 72 6F 0D 0A 20 20 20 20 20 20 69 66 20    umero..      if 
016420:  23 3D 30 0D 0A 20 20 20 20 20 20 2A 20 54 45 53    #=0..      * TES
016430:  54 20 50 4F 55 52 20 43 52 45 41 54 49 4F 4E 20    T POUR CREATION 
016440:  4F 2F 4E 0D 0A 20 20 20 20 20 20 40 20 32 32 2C    O/N..      @ 22,
016450:  30 20 73 61 79 20 63 68 72 28 37 29 2B 22 43 65    0 say chr(7)+"Ce
016460:  20 63 68 65 71 75 65 20 6E 27 65 73 74 20 70 61     cheque n'est pa
016470:  73 20 65 6E 72 65 67 69 73 74 72 65 22 2B 63 68    s enregistre"+ch
016480:  72 28 37 29 0D 0A 20 20 20 20 20 20 73 74 6F 72    r(7)..      stor
016490:  65 20 30 20 74 6F 20 74 65 6D 70 6F 0D 0A 20 20    e 0 to tempo..  
0164A0:  20 20 20 20 20 20 64 6F 20 77 68 69 6C 65 20 74          do while t
0164B0:  65 6D 70 6F 23 35 30 0D 0A 20 20 20 20 20 20 20    empo#50..       
0164C0:  20 73 74 6F 72 65 20 74 65 6D 70 6F 2B 31 20 74     store tempo+1 t
0164D0:  6F 20 74 65 6D 70 6F 0D 0A 20 20 20 20 20 20 20    o tempo..       
0164E0:  20 65 6E 64 64 6F 20 74 65 6D 70 6F 0D 0A 20 20     enddo tempo..  
0164F0:  20 20 20 20 72 65 6C 65 61 73 65 20 74 65 6D 70        release temp
016500:  6F 0D 0A 20 20 20 20 20 20 40 20 32 32 2C 30 0D    o..      @ 22,0.
016510:  0A 20 20 20 20 20 20 40 20 32 32 2C 30 20 73 61    .      @ 22,0 sa
016520:  79 20 22 63 72 65 61 74 69 6F 6E 20 28 4F 2F 4E    y "creation (O/N
016530:  29 20 3F 20 22 20 67 65 74 20 63 6F 6E 74 69 6E    ) ? " get contin
016540:  75 0D 0A 20 20 20 20 20 20 72 65 61 64 0D 0A 20    u..      read.. 
016550:  20 20 20 20 20 40 20 32 32 2C 30 0D 0A 20 20 20         @ 22,0..   
016560:  20 20 20 20 20 69 66 20 21 28 63 6F 6E 74 69 6E         if !(contin
016570:  75 29 3D 22 4F 22 0D 0A 20 20 20 20 20 20 20 20    u)="O"..        
016580:  61 70 70 65 6E 64 20 62 6C 61 6E 6B 0D 0A 20 20    append blank..  
016590:  20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20          else..    
0165A0:  20 20 20 20 40 20 35 2C 32 30 20 73 61 79 20 22        @ 5,20 say "
0165B0:  20 20 20 20 20 20 20 20 20 20 22 0D 0A 20 20 20              "..   
0165C0:  20 20 20 20 20 40 20 35 2C 34 37 20 73 61 79 20         @ 5,47 say 
0165D0:  22 20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A    "            "..
0165E0:  20 20 20 20 20 20 20 20 40 20 38 2C 31 33 20 73            @ 8,13 s
0165F0:  61 79 20 22 20 20 20 20 20 20 20 20 20 20 20 20    ay "            
016600:  79 20 63 68 72 28 37 29 2B 22 43 65 20 63 68 65    y chr(7)+"Ce che
016610:  71 75 65 20 6E 27 65 73 74 20 70 61 73 20 65 6E    que n'est pas en
016620:  72 65 67 69 73 74 72 65 22 2B 63 68 72 28 37 29    registre"+chr(7)
016630:  0D 0A 20 73 74 6F 72 65 20 30 20 74 6F 20 74 65    .. store 0 to te
016640:  6D 70 6F 0D 0A 20 64 6F 20 77 68 69 6C 65 20 74    mpo.. do while t
016650:  65 6D 70 6F 23 35 30 0D 0A 20 73 74 6F 72 65 20    empo#50.. store 
016660:  74 65 6D 70 6F 2B 31 20 74 6F 20 74 65 6D 70 6F    tempo+1 to tempo
016670:  0D 0A 20 65 6E 64 64 6F 20 74 65 6D 70 6F 0D 0A    .. enddo tempo..
016680:  20 72 65 6C 65 61 73 65 20 74 65 6D 70 6F 0D 0A     release tempo..
016690:  20 40 20 32 32 2C 30 0D 0A 20 65 6C 73 65 0D 0A     @ 22,0.. else..
0166A0:  20 20 64 6F 20 77 68 69 6C 65 20 21 28 72 65 63      do while !(rec
0166B0:  68 65 72 63 68 65 29 23 22 4E 22 20 2E 61 6E 64    herche)#"N" .and
0166C0:  2E 20 66 69 6E 23 22 4F 22 0D 0A 20 20 73 74 6F    . fin#"O"..  sto
0166D0:  72 65 20 22 4F 22 20 74 6F 20 65 66 66 61 63 65    re "O" to efface
0166E0:  0D 0A 20 20 73 74 6F 72 65 20 22 53 22 20 74 6F    ..  store "S" to
0166F0:  20 72 65 63 68 65 72 63 68 65 0D 0A 20 20 40 20     recherche..  @ 
016700:  35 2C 37 20 20 67 65 74 20 6E 75 6D 65 72 6F 0D    5,7  get numero.
016710:  0A 20 20 40 20 35 2C 32 30 20 67 65 74 20 64 61    .  @ 5,20 get da
016720:  74 65 3A 64 65 62 20 0D 0A 20 20 40 20 35 2C 34    te:deb ..  @ 5,4
016730:  37 20 67 65 74 20 6D 6F 6E 74 3A 64 65 62 0D 0A    7 get mont:deb..
016740:  20 20 40 20 38 2C 31 33 20 67 65 74 20 64 65 62      @ 8,13 get deb
016750:  69 74 65 75 72 0D 0A 20 20 40 20 31 30 2C 31 33    iteur..  @ 10,13
016760:  20 67 65 74 20 63 6F 6D 3A 64 65 62 0D 0A 20 20     get com:deb..  
016770:  63 6C 65 61 72 20 67 65 74 73 0D 0A 20 20 69 66    clear gets..  if
016780:  20 2A 20 2E 61 6E 64 2E 20 2E 6E 6F 74 2E 20 65     * .and. .not. e
016790:  6F 66 0D 0A 20 20 73 74 6F 72 65 20 22 4E 22 20    of..  store "N" 
0167A0:  74 6F 20 72 61 70 70 65 6C 0D 0A 20 20 40 20 32    to rappel..  @ 2
0167B0:  32 2C 30 20 73 61 79 20 22 63 65 20 63 68 65 71    2,0 say "ce cheq
0167C0:  75 65 20 76 69 65 6E 74 20 64 27 65 74 72 65 20    ue vient d'etre 
0167D0:  65 66 66 61 63 65 2C 20 72 61 70 70 65 6C 20 28    efface, rappel (
0167E0:  4F 2F 4E 29 20 3F 20 22 20 67 65 74 20 72 61 70    O/N) ? " get rap
0167F0:  70 65 6C 20 3B 0D 0A 20 20 70 69 63 74 75 72 65    pel ;..  picture
016800:  20 20 20 20 20 20 20 20 20 20 22 0D 0A 20 20 20              "..   
016810:  20 20 20 20 20 40 20 31 30 2C 31 33 20 73 61 79         @ 10,13 say
016820:  20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20     "              
016830:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
016840:  20 20 22 0D 0A 20 20 20 20 20 20 20 20 63 6C 65      "..        cle
016850:  61 72 20 67 65 74 73 0D 0A 20 20 20 20 20 20 20    ar gets..       
016860:  20 6C 6F 6F 70 0D 0A 20 20 20 20 20 20 20 20 65     loop..        e
016870:  6E 64 69 66 0D 0A 20 20 20 20 20 20 65 6E 64 69    ndif..      endi
016880:  66 0D 0A 20 20 20 20 0D 0A 20 20 20 20 20 20 64    f..    ..      d
016890:  6F 20 77 68 69 6C 65 20 21 28 72 65 63 68 65 72    o while !(recher
0168A0:  63 68 65 29 23 22 4E 22 20 2E 61 6E 64 2E 20 66    che)#"N" .and. f
0168B0:  69 6E 23 22 4F 22 0D 0A 20 20 20 20 20 20 73 74    in#"O"..      st
0168C0:  6F 72 65 20 22 53 22 20 74 6F 20 72 65 63 68 65    ore "S" to reche
0168D0:  72 63 68 65 0D 0A 20 20 20 20 20 20 73 74 6F 72    rche..      stor
0168E0:  65 20 64 61 74 65 3A 64 65 62 20 74 6F 20 6D 64    e date:deb to md
0168F0:  61 74 65 3A 64 65 62 0D 0A 20 20 20 20 20 20 73    ate:deb..      s
016900:  74 6F 72 65 20 64 65 62 69 74 65 75 72 20 74 6F    tore debiteur to
016910:  20 6D 64 65 62 69 74 65 75 72 0D 0A 20 20 20 20     mdebiteur..    
016920:  20 20 73 74 6F 72 65 20 63 6F 6D 3A 64 65 62 20      store com:deb 
016930:  74 6F 20 6D 63 6F 6D 3A 64 65 62 0D 0A 20 20 20    to mcom:deb..   
016940:  20 20 20 73 74 6F 72 65 20 6D 6F 6E 74 3A 64 65       store mont:de
016950:  62 20 74 6F 20 6D 6D 6F 6E 74 3A 64 65 62 0D 0A    b to mmont:deb..
016960:  20 20 20 20 20 20 40 20 35 2C 37 20 20 67 65 74          @ 5,7  get
016970:  20 6D 6E 75 6D 65 72 6F 0D 0A 20 20 20 20 20 20     mnumero..      
016980:  63 6C 65 61 72 20 67 65 74 73 0D 0A 20 20 20 20    clear gets..    
016990:  20 20 40 20 35 2C 32 30 20 67 65 74 20 6D 64 61      @ 5,20 get mda
0169A0:  74 65 3A 64 65 62 20 70 69 63 74 75 72 65 20 22    te:deb picture "
0169B0:  39 39 2F 39 39 2F 39 39 22 0D 0A 20 20 20 20 20    99/99/99"..     
0169C0:  20 40 20 35 2C 34 37 20 67 65 74 20 6D 6D 6F 6E     @ 5,47 get mmon
0169D0:  74 3A 64 65 62 0D 0A 20 20 20 20 20 20 40 20 38    t:deb..      @ 8
0169E0:  2C 31 33 20 67 65 74 20 6D 64 65 62 69 74 65 75    ,13 get mdebiteu
0169F0:  72 0D 0A 20 20 20 20 20 20 40 20 31 30 2C 31 33    r..      @ 10,13
016A00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
016A10:  13 00 00 00 02 09 45 E5 13 00 C1 02 00 00 00 02    ......E.........
016A20:  13 00 C6 02 00 00 00 02 13 00 C2 02 00 00 00 02    ................
016A30:  13 00 C7 02 00 00 00 02 13 00 C3 02 00 00 00 02    ................
016A40:  13 00 C8 02 00 00 00 02 13 00 C4 02 00 00 00 02    ................
016A50:  13 00 C9 02 00 00 00 02 13 00 C5 02 00 00 00 02    ................
016A60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016A70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016A80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016A90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016AF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016B00:  20 22 21 22 0D 0A 20 20 72 65 61 64 0D 0A 20 20     "!"..  read..  
016B10:  40 20 32 32 2C 30 0D 0A 20 20 63 6C 65 61 72 20    @ 22,0..  clear 
016B20:  67 65 74 73 0D 0A 20 20 20 69 66 20 21 28 72 61    gets..   if !(ra
016B30:  70 70 65 6C 29 3D 22 4F 22 0D 0A 20 20 20 72 65    ppel)="O"..   re
016B40:  63 61 6C 6C 0D 0A 20 20 20 73 74 6F 72 65 20 65    call..   store e
016B50:  66 66 61 63 65 6D 65 6E 74 2D 31 20 74 6F 20 65    ffacement-1 to e
016B60:  66 66 61 63 65 6D 65 6E 74 0D 0A 20 20 20 73 74    ffacement..   st
016B70:  6F 72 65 20 63 68 71 3A 73 6F 6C 64 65 2D 6D 6F    ore chq:solde-mo
016B80:  6E 74 3A 64 65 62 20 74 6F 20 63 68 71 3A 73 6F    nt:deb to chq:so
016B90:  6C 64 65 0D 0A 20 20 20 65 6E 64 69 66 0D 0A 20    lde..   endif.. 
016BA0:  20 65 6C 73 65 0D 0A 20 20 40 20 32 32 2C 30 20     else..  @ 22,0 
016BB0:  73 61 79 20 22 76 6F 75 6C 65 7A 2D 76 6F 75 73    say "voulez-vous
016BC0:  20 76 72 61 69 6D 65 6E 74 20 6C 27 65 66 66 61     vraiment l'effa
016BD0:  63 65 72 20 28 4F 2F 4E 29 20 3F 20 22 20 67 65    cer (O/N) ? " ge
016BE0:  74 20 65 66 66 61 63 65 20 70 69 63 74 75 72 65    t efface picture
016BF0:  20 22 21 22 0D 0A 20 20 72 65 61 64 0D 0A 20 20     "!"..  read..  
016C00:  40 20 32 32 2C 30 0D 0A 20 20 20 20 69 66 20 21    @ 22,0..    if !
016C10:  28 65 66 66 61 63 65 29 3D 22 4F 22 0D 0A 20 20    (efface)="O"..  
016C20:  20 20 20 20 20 20 20 69 66 20 2E 6E 6F 74 2E 20           if .not. 
016C30:  2A 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72    *..         stor
016C40:  65 20 63 68 71 3A 73 6F 6C 64 65 2B 6D 6F 6E 74    e chq:solde+mont
016C50:  3A 64 65 62 20 74 6F 20 63 68 71 3A 73 6F 6C 64    :deb to chq:sold
016C60:  65 0D 0A 20 20 20 20 20 20 20 20 20 73 74 6F 72    e..         stor
016C70:  65 20 65 66 66 61 63 65 6D 65 6E 74 2B 31 20 74    e effacement+1 t
016C80:  6F 20 65 66 66 61 63 65 6D 65 6E 74 0D 0A 20 20    o effacement..  
016C90:  20 20 20 20 20 20 20 64 65 6C 65 74 65 0D 0A 20           delete.. 
016CA0:  20 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20            endif.. 
016CB0:  20 20 20 65 6E 64 69 66 0D 0A 20 20 65 6E 64 69       endif..  endi
016CC0:  66 0D 0A 20 20 40 20 32 32 2C 30 20 73 61 79 20    f..  @ 22,0 say 
016CD0:  22 28 53 29 75 69 76 61 6E 74 2C 20 28 50 29 72    "(S)uivant, (P)r
016CE0:  65 63 65 64 65 6E 74 2C 20 28 4E 29 6F 75 76 65    ecedent, (N)ouve
016CF0:  61 75 20 6E 75 6D 65 72 6F 20 22 20 67 65 74 20    au numero " get 
016D00:  40 20 32 2C 30 20 73 61 79 20 22 20 20 20 20 20    @ 2,0 say "     
016D10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
016D20:  45 46 46 41 43 45 4D 45 4E 54 20 44 27 55 4E 20    EFFACEMENT D'UN 
016D30:  43 52 45 44 49 54 22 0D 0A 40 20 34 2C 30 20 73    CREDIT"..@ 4,0 s
016D40:  61 79 20 22 64 61 74 65 20 3A 20 22 20 0D 0A 40    ay "date : " ..@
016D50:  20 24 2C 37 20 73 61 79 20 64 61 74 65 3A 63 72     $,7 say date:cr
016D60:  65 20 70 69 63 74 75 72 65 20 22 39 39 2F 39 39    e picture "99/99
016D70:  2F 39 39 22 0D 0A 40 20 24 2C 32 30 20 73 61 79    /99"..@ $,20 say
016D80:  20 22 63 72 65 64 69 74 65 75 72 20 3A 20 22 20     "crediteur : " 
016D90:  0D 0A 40 20 24 2C 33 32 20 73 61 79 20 63 72 65    ..@ $,32 say cre
016DA0:  64 69 74 65 75 72 0D 0A 40 20 37 2C 30 20 73 61    diteur..@ 7,0 sa
016DB0:  79 20 22 63 6F 6D 6D 65 6E 74 61 69 72 65 20 3A    y "commentaire :
016DC0:  20 22 20 0D 0A 40 20 24 2C 31 34 20 73 61 79 20     " ..@ $,14 say 
016DD0:  63 6F 6D 3A 63 72 65 0D 0A 40 20 37 2C 35 30 20    com:cre..@ 7,50 
016DE0:  73 61 79 20 22 6D 6F 6E 74 61 6E 74 20 3A 20 20    say "montant :  
016DF0:  20 20 20 20 20 20 20 20 20 20 46 22 0D 0A 40 20              F"..@ 
016E00:  37 2C 36 30 20 73 61 79 20 6D 6F 6E 74 3A 63 72    7,60 say mont:cr
016E10:  65 20 75 73 69 6E 67 20 22 2A 2A 2A 2A 2A 2A 2E    e using "******.
016E20:  39 39 22 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    99".............
016E30:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
016E40:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
016E50:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
016E60:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
016E70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
016E80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016E90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016EA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016EB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016EC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016ED0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016EE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016EF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
016F00:  72 65 63 68 65 72 63 68 65 20 3B 0D 0A 70 69 63    recherche ;..pic
016F10:  74 75 72 65 20 22 21 22 0D 0A 20 20 72 65 61 64    ture "!"..  read
016F20:  0D 0A 20 20 40 20 32 32 2C 30 0D 0A 20 20 69 66    ..  @ 22,0..  if
016F30:  20 72 65 63 68 65 72 63 68 65 3D 22 53 22 0D 0A     recherche="S"..
016F40:  20 20 73 6B 69 70 20 2B 20 31 0D 0A 20 20 65 6E      skip + 1..  en
016F50:  64 69 66 0D 0A 20 20 69 66 20 72 65 63 68 65 72    dif..  if recher
016F60:  63 68 65 3D 22 50 22 0D 0A 20 20 73 6B 69 70 20    che="P"..  skip 
016F70:  2D 20 31 0D 0A 20 20 65 6E 64 69 66 0D 0A 20 20    - 1..  endif..  
016F80:  65 6E 64 64 6F 20 72 65 63 68 65 72 63 68 65 0D    enddo recherche.
016F90:  0A 20 65 6E 64 69 66 20 0D 0A 65 6E 64 69 66 0D    . endif ..endif.
016FA0:  0A 63 6C 65 61 72 20 67 65 74 73 0D 0A 40 20 35    .clear gets..@ 5
016FB0:  2C 32 30 20 73 61 79 20 22 20 20 20 20 20 20 20    ,20 say "       
016FC0:  20 20 20 22 0D 0A 40 20 35 2C 34 37 20 73 61 79       "..@ 5,47 say
016FD0:  20 22 20 20 20 20 20 20 20 20 20 20 20 20 22 0D     "            ".
016FE0:  0A 40 20 38 2C 31 33 20 73 61 79 20 22 20 20 20    .@ 8,13 say "   
016FF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017000:  20 20 20 22 0D 0A 40 20 31 30 2C 31 33 20 73 61       "..@ 10,13 sa
017010:  79 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20    y "             
017020:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017030:  20 20 20 22 0D 0A 65 6E 64 64 6F 0D 0A 69 66 20       "..enddo..if 
017040:  65 66 66 61 63 65 6D 65 6E 74 20 23 20 30 0D 0A    effacement # 0..
017050:  65 72 61 73 65 0D 0A 3F 20 22 70 72 69 73 65 20    erase..? "prise 
017060:  65 6E 20 63 6F 6D 70 74 65 20 64 65 73 20 6D 6F    en compte des mo
017070:  64 69 66 69 63 61 74 69 6F 6E 73 20 2E 2E 2E 22    difications ..."
017080:  0D 0A 70 61 63 6B 0D 0A 73 65 74 20 69 6E 64 65    ..pack..set inde
017090:  78 20 74 6F 0D 0A 67 6F 20 62 6F 74 74 6F 6D 0D    x to..go bottom.
0170A0:  0A 20 20 20 69 66 20 23 23 30 0D 0A 20 20 20 73    .   if ##0..   s
0170B0:  74 6F 72 65 20 6E 75 6D 65 72 6F 20 74 6F 20 63    tore numero to c
0170C0:  68 71 3A 64 65 72 0D 0A 20 20 20 65 6C 73 65 0D    hq:der..   else.
0170D0:  0A 20 20 20 73 74 6F 72 65 20 22 30 30 30 30 30    .   store "00000
0170E0:  30 30 22 20 74 6F 20 63 68 71 3A 64 65 72 0D 0A    00" to chq:der..
0170F0:  20 20 20 65 6E 64 69 66 0D 0A 73 65 74 20 69 6E       endif..set in
017100:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017110:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017120:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017130:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017140:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017150:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017160:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017170:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017180:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017190:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0171A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0171B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0171C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0171D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0171E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0171F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017200:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017210:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017220:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017230:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017240:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017250:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017260:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017270:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017280:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017290:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0172A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0172B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0172C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0172D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0172E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0172F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017300:  64 65 78 20 74 6F 20 6E 75 6D 65 72 6F 2C 64 61    dex to numero,da
017310:  74 65 2D 64 65 62 0D 0A 65 6E 64 69 66 0D 0A 72    te-deb..endif..r
017320:  65 6C 65 61 73 65 20 66 69 6E 2C 6D 6E 75 6D 65    elease fin,mnume
017330:  72 6F 2C 65 66 66 61 63 65 2C 65 66 66 61 63 65    ro,efface,efface
017340:  6D 65 6E 74 2C 72 65 63 68 65 72 63 68 65 0D 0A    ment,recherche..
017350:  0D 0A 0D 0A 63 61 73 65 20 21 28 72 65 70 29 3D    ....case !(rep)=
017360:  22 52 22 0D 0A 72 65 6C 65 61 73 65 20 72 65 70    "R"..release rep
017370:  0D 0A 75 73 65 0D 0A 72 65 74 75 72 6E 0D 0A 6F    ..use..return..o
017380:  74 68 65 72 77 69 73 65 0D 0A 3F 20 63 68 72 28    therwise..? chr(
017390:  37 29 0D 0A 3F 20 22 76 6F 74 72 65 20 73 65 6C    7)..? "votre sel
0173A0:  65 63 74 69 6F 6E 20 64 6F 69 74 20 65 74 72 65    ection doit etre
0173B0:  20 43 2C 20 4D 2C 20 45 20 6F 75 20 52 22 0D 0A     C, M, E ou R"..
0173C0:  73 74 6F 72 65 20 30 20 74 6F 20 74 65 6D 70 6F    store 0 to tempo
0173D0:  0D 0A 64 6F 20 77 68 69 6C 65 20 74 65 6D 70 6F    ..do while tempo
0173E0:  23 35 30 0D 0A 73 74 6F 72 65 20 74 65 6D 70 6F    #50..store tempo
0173F0:  2B 31 20 74 6F 20 74 65 6D 70 6F 0D 0A 65 6E 64    +1 to tempo..end
017400:  64 6F 20 74 65 6D 70 6F 0D 0A 72 65 6C 65 61 73    do tempo..releas
017410:  65 20 74 65 6D 70 6F 0D 0A 65 6E 64 63 61 73 65    e tempo..endcase
017420:  0D 0A 65 6E 64 64 6F 20 64 65 62 69 74 0D 0A 1A    ..enddo debit...
017430:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017440:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017450:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017460:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017470:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017480:  6F 20 65 66 66 61 63 65 6D 65 6E 74 0D 0A 20 20    o effacement..  
017490:  20 20 20 20 20 20 20 64 65 6C 65 74 65 0D 0A 20           delete.. 
0174A0:  20 20 20 20 20 20 20 20 65 6E 64 69 66 0D 0A 20            endif.. 
0174B0:  20 20 20 65 6E 64 69 66 0D 0A 20 20 65 6E 64 69       endif..  endi
0174C0:  66 0D 0A 20 20 40 20 32 32 2C 30 20 73 61 79 20    f..  @ 22,0 say 
0174D0:  22 28 53 29 75 69 76 61 6E 74 2C 20 28 50 29 72    "(S)uivant, (P)r
0174E0:  65 63 65 64 65 6E 74 2C 20 28 4E 29 6F 75 76 65    ecedent, (N)ouve
0174F0:  61 75 20 6E 75 6D 65 72 6F 20 22 20 67 65 74 20    au numero " get 
017500:  4D 3D 30 2C 57 3D 37 32 0D 0A 59 0D 0A 4C 49 53    M=0,W=72..Y..LIS
017510:  54 45 20 4E 4F 4D 49 4E 41 54 49 56 45 20 44 45    TE NOMINATIVE DE
017520:  20 44 45 4D 41 4E 44 45 53 20 44 27 41 43 48 41     DEMANDES D'ACHA
017530:  54 0D 0A 4E 0D 0A 59 0D 0A 4E 0D 0A 31 32 2C 44    T..N..Y..N..12,D
017540:  41 3A 4E 55 4D 0D 0A 3C 4E 55 4D 45 52 4F 20 44    A:NUM..<NUMERO D
017550:  2E 41 2E 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F    .A.;____________
017560:  0D 0A 39 2C 44 41 3A 44 41 54 45 0D 0A 3C 44 41    ..9,DA:DATE..<DA
017570:  54 45 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 0D 0A 31 33    TE;_________..13
017580:  2C 50 49 45 43 45 0D 0A 3C 52 45 46 45 52 45 4E    ,PIECE..<REFEREN
017590:  43 45 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F    CE;_____________
0175A0:  0D 0A 35 2C 51 54 45 3A 43 4D 44 0D 0A 3E 51 54    ..5,QTE:CMD..>QT
0175B0:  45 3B 5F 5F 5F 5F 5F 0D 0A 4E 0D 0A 39 2C 50 52    E;_____..N..9,PR
0175C0:  49 58 3A 55 48 54 0D 0A 3E 50 52 49 58 3A 55 48    IX:UHT..>PRIX:UH
0175D0:  54 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 0D 0A 4E 0D 0A    T;_________..N..
0175E0:  31 31 2C 50 52 49 58 3A 55 48 54 20 2A 20 51 54    11,PRIX:UHT * QT
0175F0:  45 3A 43 4D 44 0D 0A 3E 50 52 49 58 20 54 48 54    E:CMD..>PRIX THT
017600:  3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 0D 0A 59 0D    ;___________..Y.
017610:  0A 31 32 2C 45 4D 45 54 54 45 55 52 0D 0A 3C 45    .12,EMETTEUR..<E
017620:  4D 45 54 54 45 55 52 3B 5F 5F 5F 5F 5F 5F 5F 5F    METTEUR;________
017630:  5F 5F 5F 5F 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ____............
017640:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017650:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017660:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017670:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017680:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017690:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0176A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0176B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0176C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0176D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0176E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0176F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017700:  02 00 00 00 00 00 4C 00 4E 55 4D 45 52 4F 00 00    ......L.NUMERO..
017710:  00 00 00 43 07 B9 70 00 44 41 54 45 3A 44 45 42    ...C..p.DATE:DEB
017720:  00 00 00 43 08 C0 70 00 44 45 42 49 54 45 55 52    ...C..p.DEBITEUR
017730:  00 00 00 43 14 C8 70 00 43 4F 4D 3A 44 45 42 00    ...C..p.COM:DEB.
017740:  00 00 00 43 1E DC 70 00 4D 4F 4E 54 3A 44 45 42    ...C..p.MONT:DEB
017750:  00 00 00 4E 0A FA 70 02 0D 00 00 00 00 00 00 00    ...N..p.........
017760:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017770:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017780:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017790:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0177A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0177B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0177C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0177D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0177E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0177F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017800:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017810:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017820:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017830:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017840:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017850:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017860:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017870:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017880:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017890:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0178A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0178B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0178C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0178D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0178E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0178F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017900:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017910:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017920:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017930:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017940:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017950:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017960:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017970:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017980:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017990:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0179A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0179B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0179C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0179D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0179E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0179F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017A00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017A10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017A20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017A30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017A40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017A50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017A60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017A70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017A80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017A90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017AA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017AB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017AC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017AD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017AE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017AF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
017B00:  00 00 00 00 00 00 00 00 00 1A 65 72 6F 2C 64 61    ..........ero,da
017B10:  74 65 2D 64 65 62 0D 0A 65 6E 64 69 66 0D 0A 72    te-deb..endif..r
017B20:  65 6C 65 61 73 65 20 66 69 6E 2C 6D 6E 75 6D 65    elease fin,mnume
017B30:  72 6F 2C 65 66 66 61 63 65 2C 65 66 66 61 63 65    ro,efface,efface
017B40:  6D 65 6E 74 2C 72 65 63 68 65 72 63 68 65 0D 0A    ment,recherche..
017B50:  0D 0A 0D 0A 63 61 73 65 20 21 28 72 65 70 29 3D    ....case !(rep)=
017B60:  22 52 22 0D 0A 72 65 6C 65 61 73 65 20 72 65 70    "R"..release rep
017B70:  0D 0A 75 73 65 0D 0A 72 65 74 75 72 6E 0D 0A 6F    ..use..return..o
017B80:  74 68 65 72 77 69 73 65 0D 0A 3F 20 63 68 72 28    therwise..? chr(
017B90:  37 29 0D 0A 3F 20 22 76 6F 74 72 65 20 73 65 6C    7)..? "votre sel
017BA0:  65 63 74 69 6F 6E 20 64 6F 69 74 20 65 74 72 65    ection doit etre
017BB0:  20 43 2C 20 4D 2C 20 45 20 6F 75 20 52 22 0D 0A     C, M, E ou R"..
017BC0:  73 74 6F 72 65 20 30 20 74 6F 20 74 65 6D 70 6F    store 0 to tempo
017BD0:  0D 0A 64 6F 20 77 68 69 6C 65 20 74 65 6D 70 6F    ..do while tempo
017BE0:  23 35 30 0D 0A 73 74 6F 72 65 20 74 65 6D 70 6F    #50..store tempo
017BF0:  2B 31 20 74 6F 20 74 65 6D 70 6F 0D 0A 65 6E 64    +1 to tempo..end
017C00:  64 6F 20 74 65 6D 70 6F 0D 0A 72 65 6C 65 61 73    do tempo..releas
017C10:  65 20 74 65 6D 70 6F 0D 0A 65 6E 64 63 61 73 65    e tempo..endcase
017C20:  0D 0A 65 6E 64 64 6F 20 64 65 62 69 74 0D 0A 1A    ..enddo debit...
017C30:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017C40:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017C50:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017C60:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017C70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
017C80:  61 70 70 65 6E 64 20 62 6C 61 6E 6B 0D 0A 20 20    append blank..  
017C90:  20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20          else..    
017CA0:  20 20 20 20 40 20 35 2C 32 30 20 73 61 79 20 22        @ 5,20 say "
017CB0:  20 20 20 20 20 20 20 20 20 20 22 0D 0A 20 20 20              "..   
017CC0:  20 20 20 20 20 40 20 35 2C 34 37 20 73 61 79 20         @ 5,47 say 
017CD0:  22 20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A    "            "..
017CE0:  20 20 20 20 20 20 20 20 40 20 38 2C 31 33 20 73            @ 8,13 s
017CF0:  61 79 20 22 20 20 20 20 20 20 20 20 20 20 20 20    ay "            
017D00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
017D10:  14 00 00 00 02 09 46 E5 14 00 C1 02 00 00 00 02    ......F.........
017D20:  14 00 C6 02 00 00 00 02 14 00 C2 02 00 00 00 02    ................
017D30:  14 00 C7 02 00 00 00 02 14 00 C3 02 00 00 00 02    ................
017D40:  14 00 C8 02 00 00 00 02 14 00 C4 02 00 00 00 02    ................
017D50:  14 00 C9 02 00 00 00 02 14 00 C5 02 00 00 00 02    ................
017D60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017D70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017D80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017D90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017DF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
017E00:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
017E10:  2A 20 45 4E 54 52 45 45 20 4F 55 20 53 4F 52 54    * ENTREE OU SORT
017E20:  49 45 20 44 45 20 50 49 45 43 45 53 20 44 55 20    IE DE PIECES DU 
017E30:  53 54 4F 43 4B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    STOCK **********
017E40:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 2A 20 43 45    **********..* CE
017E50:  20 46 49 43 48 49 45 52 20 50 45 52 4D 45 54 20     FICHIER PERMET 
017E60:  44 45 20 50 52 45 4E 44 52 45 20 45 4E 20 43 4F    DE PRENDRE EN CO
017E70:  4D 50 54 45 20 4C 27 45 4E 54 52 45 45 20 4F 55    MPTE L'ENTREE OU
017E80:  20 4C 41 20 53 4F 52 54 49 45 20 44 45 20 50 49     LA SORTIE DE PI
017E90:  45 43 45 53 20 2A 0D 0A 2A 20 44 55 20 53 54 4F    ECES *..* DU STO
017EA0:  43 4B 2C 20 4D 41 49 53 20 53 41 4E 53 20 43 52    CK, MAIS SANS CR
017EB0:  45 45 52 20 41 55 43 55 4E 20 44 4F 43 55 4D 45    EER AUCUN DOCUME
017EC0:  4E 54 2E 20 20 20 20 20 20 20 20 20 20 20 20 20    NT.             
017ED0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
017EE0:  20 2A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A     *..************
017EF0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
017F00:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
017F10:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
017F20:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A    **************..
017F30:  0D 0A 53 45 54 20 45 58 41 43 54 20 4F 4E 0D 0A    ..SET EXACT ON..
017F40:  40 20 30 2C 30 20 53 41 59 20 20 22 46 49 4E 20    @ 0,0 SAY  "FIN 
017F50:  3D 20 56 41 4C 49 44 45 5A 22 0D 0A 2A 20 44 45    = VALIDEZ"..* DE
017F60:  46 49 4E 49 54 49 4F 4E 20 44 45 20 4C 41 20 42    FINITION DE LA B
017F70:  41 53 45 20 50 52 49 4D 41 49 52 45 0D 0A 53 45    ASE PRIMAIRE..SE
017F80:  4C 45 43 54 20 50 52 49 4D 41 52 59 0D 0A 55 53    LECT PRIMARY..US
017F90:  45 20 44 41 20 49 4E 44 45 58 20 44 41 0D 0A 0D    E DA INDEX DA...
017FA0:  0A 2A 20 44 45 46 49 4E 49 54 49 4F 4E 20 44 45    .* DEFINITION DE
017FB0:  20 4C 41 20 42 41 53 45 20 53 45 43 4F 4E 44 41     LA BASE SECONDA
017FC0:  49 52 45 0D 0A 53 45 4C 45 43 54 20 53 45 43 4F    IRE..SELECT SECO
017FD0:  4E 44 41 52 59 0D 0A 55 53 45 20 53 54 4F 43 4B    NDARY..USE STOCK
017FE0:  20 49 4E 44 45 58 20 50 49 45 43 45 0D 0A 0D 0A     INDEX PIECE....
017FF0:  53 54 4F 52 45 20 22 4F 22 20 54 4F 20 43 4F 4E    STORE "O" TO CON
018000:  20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20             ..     
018010:  40 20 38 2C 31 37 20 53 41 59 20 53 2E 4C 49 42    @ 8,17 SAY S.LIB
018020:  45 4C 4C 45 20 20 20 20 20 20 20 20 20 20 20 20    ELLE            
018030:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D                   .
018040:  0A 20 20 20 20 20 40 20 31 34 2C 31 33 20 53 41    .     @ 14,13 SA
018050:  59 20 53 2E 44 41 3A 4E 55 4D 20 20 20 20 20 20    Y S.DA:NUM      
018060:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018070:  20 20 20 20 20 0D 0A 20 20 20 20 20 40 20 31 36         ..     @ 16
018080:  2C 35 31 20 53 41 59 20 53 2E 51 54 45 3A 52 45    ,51 SAY S.QTE:RE
018090:  53 54 45 20 20 20 20 20 20 20 20 20 20 20 20 20    STE             
0180A0:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20               ..   
0180B0:  20 20 40 20 32 30 2C 33 20 20 53 41 59 20 53 2E      @ 20,3  SAY S.
0180C0:  4D 49 4E 49 3A 53 54 4F 43 4B 20 20 20 20 20 20    MINI:STOCK      
0180D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0180E0:  20 0D 0A 20 20 20 20 20 40 20 32 30 2C 33 35 20     ..     @ 20,35 
0180F0:  53 41 59 20 53 2E 51 54 45 3A 53 54 4F 43 4B 20    SAY S.QTE:STOCK 
018100:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018110:  20 20 20 20 20 20 20 0D 0A 20 20 20 20 20 40 20           ..     @ 
018120:  32 30 2C 35 31 20 53 41 59 20 53 2E 50 52 49 58    20,51 SAY S.PRIX
018130:  3A 55 48 54 20 20 20 20 20 20 20 20 20 20 20 20    :UHT            
018140:  20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20                 .. 
018150:  20 20 20 20 53 54 4F 52 45 20 53 2E 50 52 49 58        STORE S.PRIX
018160:  3A 55 48 54 20 2A 20 53 2E 51 54 45 3A 53 54 4F    :UHT * S.QTE:STO
018170:  43 4B 20 54 4F 20 50 52 49 58 3A 54 48 54 0D 0A    CK TO PRIX:THT..
018180:  20 20 20 20 20 40 20 32 30 2C 36 37 20 53 41 59         @ 20,67 SAY
018190:  20 50 52 49 58 3A 54 48 54 0D 0A 0D 0A 2A 20 50     PRIX:THT....* P
0181A0:  52 49 53 45 20 45 4E 20 43 4F 4D 50 54 45 20 44    RISE EN COMPTE D
0181B0:  45 53 20 45 4E 54 52 45 45 53 20 4F 55 20 53 4F    ES ENTREES OU SO
0181C0:  52 54 49 45 53 20 44 45 20 50 49 45 43 45 53 20    RTIES DE PIECES 
0181D0:  44 55 20 53 54 4F 43 4B 20 54 41 4E 54 0D 0A 2A    DU STOCK TANT..*
0181E0:  20 51 55 45 20 4C 41 20 46 49 4E 20 44 45 20 54     QUE LA FIN DE T
0181F0:  52 41 49 54 45 4D 45 4E 54 20 4E 27 45 53 54 20    RAITEMENT N'EST 
018200:  54 45 4E 54 53 4F 52 0D 0A 44 4F 20 57 48 49 4C    TENTSOR..DO WHIL
018210:  45 20 43 4F 4E 54 45 4E 54 53 4F 52 20 3D 20 22    E CONTENTSOR = "
018220:  4F 22 0D 0A 43 4C 45 41 52 20 47 45 54 53 0D 0A    O"..CLEAR GETS..
018230:  53 45 4C 45 43 54 20 53 45 43 4F 4E 44 41 52 59    SELECT SECONDARY
018240:  0D 0A 53 54 4F 52 45 20 22 20 20 20 20 20 20 20    ..STORE "       
018250:  20 20 20 20 20 22 20 54 4F 20 4D 50 49 45 43 45         " TO MPIECE
018260:  0D 0A 40 20 31 30 2C 31 31 20 47 45 54 20 4D 50    ..@ 10,11 GET MP
018270:  49 45 43 45 0D 0A 52 45 41 44 0D 0A 0D 0A 2A 20    IECE..READ....* 
018280:  53 49 20 41 55 43 55 4E 20 4E 55 4D 45 52 4F 20    SI AUCUN NUMERO 
018290:  44 45 20 52 45 46 45 52 45 4E 43 45 20 4E 27 45    DE REFERENCE N'E
0182A0:  53 54 20 53 41 49 53 49 45 20 2D 2D 3E 20 52 45    ST SAISIE --> RE
0182B0:  54 4F 55 52 20 41 55 20 4D 45 4E 55 20 54 52 41    TOUR AU MENU TRA
0182C0:  53 54 4F 43 4B 0D 0A 49 46 20 4D 50 49 45 43 45    STOCK..IF MPIECE
0182D0:  20 3D 20 22 20 22 20 0D 0A 52 45 4C 45 41 53 45     = " " ..RELEASE
0182E0:  20 43 4F 4E 54 45 4E 54 53 4F 52 0D 0A 53 45 54     CONTENTSOR..SET
0182F0:  20 45 58 41 43 54 20 4F 46 46 0D 0A 52 45 54 55     EXACT OFF..RETU
018300:  52 4E 0D 0A 45 4C 53 45 0D 0A 53 45 4C 45 43 54    RN..ELSE..SELECT
018310:  20 53 45 43 4F 4E 44 41 52 59 0D 0A 46 49 4E 44     SECONDARY..FIND
018320:  20 26 4D 50 49 45 43 45 0D 0A 0D 0A 2A 20 53 49     &MPIECE....* SI
018330:  20 4C 41 20 52 45 46 45 52 45 4E 43 45 20 53 41     LA REFERENCE SA
018340:  49 53 49 45 20 4E 27 45 58 49 53 54 45 20 50 41    ISIE N'EXISTE PA
018350:  53 20 2D 2D 3E 20 45 46 46 41 43 45 4D 45 4E 54    S --> EFFACEMENT
018360:  20 44 45 20 54 4F 55 54 45 53 20 4C 45 53 20 5A     DE TOUTES LES Z
018370:  4F 4E 45 53 0D 0A 2A 20 44 45 20 4D 4F 44 49 46    ONES..* DE MODIF
018380:  49 43 41 54 49 4F 4E 53 20 44 45 20 4C 41 20 52    ICATIONS DE LA R
018390:  45 46 45 52 45 4E 43 45 20 50 52 45 43 45 44 45    EFERENCE PRECEDE
0183A0:  4E 54 45 2C 20 45 54 20 41 46 46 49 43 48 41 47    NTE, ET AFFICHAG
0183B0:  45 20 44 27 55 4E 20 4D 45 53 53 41 47 45 0D 0A    E D'UN MESSAGE..
0183C0:  2A 20 44 27 45 52 52 45 55 52 0D 0A 20 20 20 20    * D'ERREUR..    
0183D0:  20 49 46 20 23 20 3D 20 30 0D 0A 20 20 20 20 20     IF # = 0..     
0183E0:  40 20 36 2C 31 33 20 53 41 59 20 22 20 20 20 20    @ 6,13 SAY "    
0183F0:  20 22 0D 0A 20 20 20 20 20 40 20 36 2C 33 31 20     "..     @ 6,31 
018400:  50 41 53 20 44 45 4D 41 4E 44 45 45 0D 0A 53 54    PAS DEMANDEE..ST
018410:  4F 52 45 20 22 4F 22 20 54 4F 20 43 4F 4E 54 49    ORE "O" TO CONTI
018420:  4E 55 0D 0A 44 4F 20 57 48 49 4C 45 20 43 4F 4E    NU..DO WHILE CON
018430:  54 49 4E 55 20 3D 20 22 4F 22 20 0D 0A 53 54 4F    TINU = "O" ..STO
018440:  52 45 20 22 20 20 20 20 22 20 54 4F 20 51 54 45    RE "    " TO QTE
018450:  0D 0A 53 54 4F 52 45 20 22 46 22 20 54 4F 20 52    ..STORE "F" TO R
018460:  45 50 4F 4E 53 45 0D 0A 40 20 32 32 2C 30 20 53    EPONSE..@ 22,0 S
018470:  41 59 20 22 45 73 74 2D 63 65 20 75 6E 65 20 52    AY "Est-ce une R
018480:  65 63 65 70 74 69 6F 6E 2C 20 75 6E 65 20 53 6F    eception, une So
018490:  72 74 69 65 2C 20 6C 61 20 46 69 6E 20 74 72 61    rtie, la Fin tra
0184A0:  69 74 65 6D 65 6E 74 20 28 52 2F 53 2F 46 29 20    itement (R/S/F) 
0184B0:  22 20 3B 0D 0A 47 45 54 20 52 45 50 4F 4E 53 45    " ;..GET REPONSE
0184C0:  0D 0A 52 45 41 44 0D 0A 40 20 32 32 2C 30 20 53    ..READ..@ 22,0 S
0184D0:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
0184E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0184F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018500:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018510:  20 20 3B 0D 0A 20 20 20 20 22 0D 0A 53 45 4C 45      ;..    "..SELE
018520:  43 54 20 53 45 43 4F 4E 44 41 52 59 0D 0A 49 46    CT SECONDARY..IF
018530:  20 21 28 52 45 50 4F 4E 53 45 29 20 3D 20 22 53     !(REPONSE) = "S
018540:  22 0D 0A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    "....***********
018550:  2A 2A 2A 2A 2A 2A 2A 20 53 4F 52 54 49 45 20 44    ******* SORTIE D
018560:  45 20 50 49 45 43 45 28 53 29 20 44 55 20 53 54    E PIECE(S) DU ST
018570:  4F 43 4B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    OCK ************
018580:  2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 2A 20 43 45 54 54    ********..* CETT
018590:  45 20 4F 50 54 49 4F 4E 20 56 4F 55 53 20 50 45    E OPTION VOUS PE
0185A0:  52 4D 45 54 54 52 41 20 44 45 20 44 45 43 52 45    RMETTRA DE DECRE
0185B0:  4D 45 4E 54 45 52 20 4C 41 20 51 55 41 4E 54 49    MENTER LA QUANTI
0185C0:  54 45 20 45 4E 20 53 54 4F 43 4B 20 2A 0D 0A 2A    TE EN STOCK *..*
0185D0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
0185E0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
0185F0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
018600:  53 41 59 20 22 20 20 20 20 20 22 0D 0A 20 20 20    SAY "     "..   
018610:  20 20 40 20 36 2C 34 37 20 53 41 59 20 22 20 20      @ 6,47 SAY "  
018620:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018630:  20 20 20 20 20 20 20 22 0D 0A 20 20 20 20 20 40           "..     @
018640:  20 38 2C 31 37 20 53 41 59 20 22 20 20 20 20 20     8,17 SAY "     
018650:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018660:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 0D                  ".
018670:  0A 20 20 20 20 20 40 20 31 34 2C 31 33 20 53 41    .     @ 14,13 SA
018680:  59 20 22 20 20 20 20 20 20 20 20 20 20 22 0D 0A    Y "          "..
018690:  20 20 20 20 20 40 20 31 34 2C 33 36 20 53 41 59         @ 14,36 SAY
0186A0:  20 22 20 20 20 20 20 20 20 20 22 0D 0A 20 20 20     "        "..   
0186B0:  20 20 40 20 31 34 2C 35 33 20 53 41 59 20 22 20      @ 14,53 SAY " 
0186C0:  20 20 20 20 20 20 20 20 20 20 20 22 0D 0A 20 20               "..  
0186D0:  20 20 20 40 20 31 34 2C 37 31 20 53 41 59 20 22       @ 14,71 SAY "
0186E0:  20 20 20 20 20 20 20 20 22 0D 0A 20 20 20 20 20            "..     
0186F0:  40 20 31 36 2C 32 30 20 53 41 59 20 22 20 20 20    @ 16,20 SAY "   
018700:  20 20 20 20 20 20 20 22 0D 0A 20 20 20 20 20 40           "..     @
018710:  20 31 36 2C 35 31 20 53 41 59 20 22 20 20 20 20     16,51 SAY "    
018720:  20 20 20 20 20 20 22 0D 0A 20 20 20 20 20 40 20          "..     @ 
018730:  32 30 2C 33 20 20 53 41 59 20 22 20 20 20 20 20    20,3  SAY "     
018740:  20 20 20 20 20 22 0D 0A 20 20 20 20 20 40 20 32         "..     @ 2
018750:  30 2C 33 35 20 53 41 59 20 22 20 20 20 20 20 20    0,35 SAY "      
018760:  20 20 20 20 22 0D 0A 20 20 20 20 20 40 20 32 30        "..     @ 20
018770:  2C 34 38 20 53 41 59 20 22 20 20 20 20 20 20 20    ,48 SAY "       
018780:  20 20 20 20 20 22 0D 0A 20 20 20 20 20 40 20 32         "..     @ 2
018790:  30 2C 36 34 20 53 41 59 20 22 20 20 20 20 20 20    0,64 SAY "      
0187A0:  20 20 20 20 20 20 20 22 0D 0A 20 20 20 20 20 40           "..     @
0187B0:  20 32 32 2C 30 20 53 41 59 20 20 22 43 45 54 54     22,0 SAY  "CETT
0187C0:  45 20 50 49 45 43 45 20 4E 45 20 46 49 47 55 52    E PIECE NE FIGUR
0187D0:  45 20 50 41 53 20 44 41 4E 53 20 4C 45 20 46 49    E PAS DANS LE FI
0187E0:  43 48 49 45 52 2C 20 56 61 6C 69 64 65 7A 22 0D    CHIER, Validez".
0187F0:  0A 20 20 20 20 20 53 45 54 20 43 4F 4E 53 4F 4C    .     SET CONSOL
018800:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
018810:  2A 2A 0D 0A 0D 0A 40 20 32 32 2C 30 20 53 41 59    **....@ 22,0 SAY
018820:  20 22 44 6F 6E 6E 65 7A 20 6C 61 20 71 75 61 6E     "Donnez la quan
018830:  74 69 74 65 20 61 20 73 6F 72 74 69 72 20 64 75    tite a sortir du
018840:  20 73 74 6F 63 6B 20 22 20 47 45 54 20 51 54 45     stock " GET QTE
018850:  20 50 49 43 54 55 52 45 20 3B 0D 0A 22 39 39 39     PICTURE ;.."999
018860:  39 22 0D 0A 52 45 41 44 0D 0A 53 54 4F 52 45 20    9"..READ..STORE 
018870:  56 41 4C 28 51 54 45 29 20 54 4F 20 51 55 41 4E    VAL(QTE) TO QUAN
018880:  54 49 54 45 0D 0A 2A 20 53 49 20 4C 41 20 51 55    TITE..* SI LA QU
018890:  41 4E 54 49 54 45 20 41 20 44 45 44 55 49 52 45    ANTITE A DEDUIRE
0188A0:  20 45 53 54 20 53 55 50 45 52 49 45 55 52 45 20     EST SUPERIEURE 
0188B0:  41 20 43 45 4C 4C 45 20 45 4E 20 53 54 4F 43 4B    A CELLE EN STOCK
0188C0:  0D 0A 2A 20 55 4E 20 4D 45 53 53 41 47 45 20 44    ..* UN MESSAGE D
0188D0:  27 45 52 52 45 55 52 20 53 45 52 41 20 41 46 46    'ERREUR SERA AFF
0188E0:  49 43 48 45 2C 20 45 54 20 41 55 43 55 4E 20 54    ICHE, ET AUCUN T
0188F0:  52 41 49 54 45 4D 45 4E 54 20 4E 45 0D 0A 2A 20    RAITEMENT NE..* 
018900:  53 45 52 41 20 45 46 46 45 43 54 55 45 2E 0D 0A    SERA EFFECTUE...
018910:  20 20 20 20 49 46 20 51 55 41 4E 54 49 54 45 20        IF QUANTITE 
018920:  3E 20 53 2E 51 54 45 3A 53 54 4F 43 4B 0D 0A 20    > S.QTE:STOCK.. 
018930:  20 20 20 40 20 32 33 2C 30 20 53 41 59 20 22 54       @ 23,0 SAY "T
018940:  72 61 6E 73 61 63 74 69 6F 6E 20 69 6D 70 6F 73    ransaction impos
018950:  73 69 62 6C 65 2C 20 56 61 6C 69 64 65 7A 22 0D    sible, Validez".
018960:  0A 20 20 20 20 53 45 54 20 43 4F 4E 53 4F 4C 45    .    SET CONSOLE
018970:  20 4F 46 46 0D 0A 20 20 20 20 57 41 49 54 0D 0A     OFF..    WAIT..
018980:  20 20 20 20 53 45 54 20 43 4F 4E 53 4F 4C 45 20        SET CONSOLE 
018990:  4F 4E 0D 0A 20 20 20 20 40 20 32 33 2C 30 20 53    ON..    @ 23,0 S
0189A0:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
0189B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0189C0:  20 20 20 20 22 0D 0A 0D 0A 2A 20 53 49 20 4C 41        "....* SI LA
0189D0:  20 51 55 41 4E 54 49 54 45 20 41 20 44 45 44 55     QUANTITE A DEDU
0189E0:  49 52 45 20 45 53 54 20 49 4E 46 45 52 49 45 55    IRE EST INFERIEU
0189F0:  52 45 20 4F 55 20 45 47 41 4C 45 20 41 20 43 45    RE OU EGALE A CE
018A00:  45 20 4F 46 46 0D 0A 20 20 20 20 20 57 41 49 54    E OFF..     WAIT
018A10:  0D 0A 20 20 20 20 20 53 45 54 20 43 4F 4E 53 4F    ..     SET CONSO
018A20:  4C 45 20 4F 4E 0D 0A 20 20 20 20 20 40 20 32 32    LE ON..     @ 22
018A30:  2C 30 20 53 41 59 20 22 20 20 20 20 20 20 20 20    ,0 SAY "        
018A40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018A50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018A60:  20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A 0D                "...
018A70:  0A 0D 0A 20 20 20 20 20 45 4C 53 45 0D 0A 2A 20    ...     ELSE..* 
018A80:  53 49 20 4C 41 20 52 45 46 45 52 45 4E 43 45 20    SI LA REFERENCE 
018A90:  53 41 49 53 49 45 20 45 58 49 53 54 45 20 2D 2D    SAISIE EXISTE --
018AA0:  3E 20 52 45 43 48 45 52 43 48 45 20 44 45 20 4C    > RECHERCHE DE L
018AB0:  41 20 44 45 4D 41 4E 44 45 20 44 27 41 43 48 41    A DEMANDE D'ACHA
018AC0:  54 0D 0A 2A 20 43 4F 52 52 45 53 50 4F 4E 44 41    T..* CORRESPONDA
018AD0:  4E 54 45 20 44 41 4E 53 20 4C 45 20 46 49 43 48    NTE DANS LE FICH
018AE0:  49 45 52 20 3A 20 44 41 20 28 20 42 41 53 45 20    IER : DA ( BASE 
018AF0:  50 52 49 4D 41 49 52 45 20 29 0D 0A 20 20 20 20    PRIMAIRE )..    
018B00:  20 53 45 4C 45 43 54 20 50 52 49 4D 41 52 59 0D     SELECT PRIMARY.
018B10:  0A 20 20 20 20 20 53 54 4F 52 45 20 53 2E 44 41    .     STORE S.DA
018B20:  3A 4E 55 4D 20 54 4F 20 4D 44 41 3A 4E 55 4D 0D    :NUM TO MDA:NUM.
018B30:  0A 20 20 20 20 20 46 49 4E 44 20 26 4D 44 41 3A    .     FIND &MDA:
018B40:  4E 55 4D 0D 0A 0D 0A 2A 20 53 49 20 4C 41 20 44    NUM....* SI LA D
018B50:  45 4D 41 4E 44 45 20 44 27 41 43 48 41 54 20 4E    EMANDE D'ACHAT N
018B60:  27 45 58 49 53 54 45 20 50 41 53 20 2D 2D 3E 20    'EXISTE PAS --> 
018B70:  41 46 46 49 43 48 41 47 45 20 44 45 53 20 44 41    AFFICHAGE DES DA
018B80:  54 45 53 20 53 4F 55 53 0D 0A 2A 20 4C 41 20 46    TES SOUS..* LA F
018B90:  4F 52 4D 45 20 3A 20 22 20 20 2F 20 20 2F 20 20    ORME : "  /  /  
018BA0:  22 0D 0A 09 49 46 20 23 20 3D 20 30 0D 0A 09 40    "...IF # = 0...@
018BB0:  20 31 34 2C 33 36 20 53 41 59 20 22 20 20 2F 20     14,36 SAY "  / 
018BC0:  20 2F 20 20 22 0D 0A 09 40 20 31 34 2C 37 31 20     /  "...@ 14,71 
018BD0:  53 41 59 20 22 20 20 2F 20 20 2F 20 20 22 0D 0A    SAY "  /  /  "..
018BE0:  0D 0A 2A 20 53 49 20 4C 41 20 44 45 4D 41 4E 44    ..* SI LA DEMAND
018BF0:  45 20 44 27 41 43 48 41 54 20 45 58 49 53 54 45    E D'ACHAT EXISTE
018C00:  4C 4C 45 0D 0A 2A 20 45 4E 20 53 54 4F 43 4B 20    LLE..* EN STOCK 
018C10:  2D 2D 3E 20 4D 4F 44 49 46 49 43 41 54 49 4F 4E    --> MODIFICATION
018C20:  20 44 45 20 4C 41 20 51 55 41 4E 54 49 54 45 20     DE LA QUANTITE 
018C30:  45 4E 20 53 54 4F 43 4B 2C 20 20 50 55 49 53 0D    EN STOCK,  PUIS.
018C40:  0A 2A 20 41 46 46 49 43 48 41 47 45 20 44 45 20    .* AFFICHAGE DE 
018C50:  4C 41 20 20 4E 4F 55 56 45 4C 4C 45 20 20 51 55    LA  NOUVELLE  QU
018C60:  41 4E 54 49 54 45 20 20 45 54 20 20 44 55 20 20    ANTITE  ET  DU  
018C70:  50 52 49 58 20 20 54 4F 54 41 4C 0D 0A 2A 20 43    PRIX  TOTAL..* C
018C80:  4F 52 52 45 53 50 4F 4E 44 41 4E 54 0D 0A 20 20    ORRESPONDANT..  
018C90:  20 20 45 4C 53 45 0D 0A 20 20 20 20 52 45 50 4C      ELSE..    REPL
018CA0:  41 43 45 20 53 2E 51 54 45 3A 53 54 4F 43 4B 20    ACE S.QTE:STOCK 
018CB0:  57 49 54 48 20 53 2E 51 54 45 3A 53 54 4F 43 4B    WITH S.QTE:STOCK
018CC0:  20 2D 20 51 55 41 4E 54 49 54 45 0D 0A 20 20 20     - QUANTITE..   
018CD0:  20 53 54 4F 52 45 20 53 2E 51 54 45 3A 53 54 4F     STORE S.QTE:STO
018CE0:  43 4B 20 2A 20 53 2E 50 52 49 58 3A 55 48 54 20    CK * S.PRIX:UHT 
018CF0:  54 4F 20 50 52 49 58 3A 54 48 54 0D 0A 20 20 20    TO PRIX:THT..   
018D00:  20 40 20 32 30 2C 36 37 20 53 41 59 20 50 52 49     @ 20,67 SAY PRI
018D10:  58 3A 54 48 54 0D 0A 20 20 20 20 40 20 32 30 2C    X:THT..    @ 20,
018D20:  33 35 20 53 41 59 20 22 20 20 20 20 20 20 20 20    35 SAY "        
018D30:  22 0D 0A 20 20 20 20 40 20 32 30 2C 33 35 20 53    "..    @ 20,35 S
018D40:  41 59 20 53 2E 51 54 45 3A 53 54 4F 43 4B 0D 0A    AY S.QTE:STOCK..
018D50:  20 20 20 20 45 4E 44 49 46 0D 0A 45 4C 53 45 0D        ENDIF..ELSE.
018D60:  0A 20 20 20 20 53 45 4C 45 43 54 20 53 45 43 4F    .    SELECT SECO
018D70:  4E 44 41 52 59 0D 0A 20 20 20 20 49 46 20 21 28    NDARY..    IF !(
018D80:  52 45 50 4F 4E 53 45 29 20 3D 20 22 52 22 0D 0A    REPONSE) = "R"..
018D90:  0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ..**************
018DA0:  2A 2A 2A 2A 2A 2A 2A 2A 20 52 45 43 45 50 54 49    ******** RECEPTI
018DB0:  4F 4E 20 44 45 20 50 49 45 43 45 28 53 29 20 2A    ON DE PIECE(S) *
018DC0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
018DD0:  2A 2A 2A 2A 2A 2A 0D 0A 2A 20 43 45 54 54 45 20    ******..* CETTE 
018DE0:  4F 50 54 49 4F 4E 20 56 4F 55 53 20 50 45 52 4D    OPTION VOUS PERM
018DF0:  45 54 54 52 41 20 44 45 20 44 45 43 52 45 4D 45    ETTRA DE DECREME
018E00:  20 2D 2D 3E 20 41 46 46 49 43 48 41 47 45 20 44     --> AFFICHAGE D
018E10:  45 53 20 52 45 4E 53 45 49 47 4E 45 4D 45 4E 54    ES RENSEIGNEMENT
018E20:  53 0D 0A 2A 20 43 4F 4D 50 4C 45 4D 45 4E 54 41    S..* COMPLEMENTA
018E30:  49 52 45 53 20 43 4F 52 52 45 53 50 4F 4E 44 41    IRES CORRESPONDA
018E40:  4E 54 20 41 20 43 45 54 54 45 20 44 45 4D 41 4E    NT A CETTE DEMAN
018E50:  44 45 20 44 27 41 43 48 41 54 2E 0D 0A 09 45 4C    DE D'ACHAT....EL
018E60:  53 45 0D 0A 20 20 20 20 20 20 20 20 40 20 31 34    SE..        @ 14
018E70:  2C 33 36 20 53 41 59 20 44 41 3A 44 41 54 45 20    ,36 SAY DA:DATE 
018E80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018E90:  20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20             ..     
018EA0:  20 20 20 40 20 31 34 2C 35 33 20 53 41 59 20 43       @ 14,53 SAY C
018EB0:  4D 44 3A 4E 55 4D 20 20 20 20 20 20 20 20 20 20    MD:NUM          
018EC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018ED0:  0D 0A 20 20 20 20 20 20 20 20 40 20 31 34 2C 37    ..        @ 14,7
018EE0:  31 20 53 41 59 20 43 4D 44 3A 44 41 54 45 20 20    1 SAY CMD:DATE  
018EF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018F00:  20 20 20 20 20 20 20 0D 0A 20 20 20 20 20 20 20           ..       
018F10:  20 40 20 31 36 2C 32 30 20 53 41 59 20 51 54 45     @ 16,20 SAY QTE
018F20:  3A 43 4D 44 20 20 20 20 20 20 20 20 20 20 20 20    :CMD            
018F30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A                  ..
018F40:  09 45 4E 44 49 46 0D 0A 0D 0A 2A 20 41 46 46 49    .ENDIF....* AFFI
018F50:  43 48 41 47 45 20 44 45 53 20 44 49 46 46 45 52    CHAGE DES DIFFER
018F60:  45 4E 54 45 53 20 43 41 52 41 43 54 45 52 49 53    ENTES CARACTERIS
018F70:  54 49 51 55 45 53 20 44 45 20 4C 41 20 50 49 45    TIQUES DE LA PIE
018F80:  43 45 0D 0A 20 20 20 20 20 40 20 36 2C 31 33 20    CE..     @ 6,13 
018F90:  53 41 59 20 53 2E 41 54 45 4C 49 45 52 0D 0A 20    SAY S.ATELIER.. 
018FA0:  20 20 20 20 40 20 36 2C 33 31 20 53 41 59 20 53        @ 6,31 SAY S
018FB0:  2E 53 45 43 54 49 4F 4E 20 20 20 20 20 20 20 20    .SECTION        
018FC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
018FD0:  20 20 20 0D 0A 20 20 20 20 20 40 20 36 2C 34 37       ..     @ 6,47
018FE0:  20 53 41 59 20 53 2E 4D 41 43 48 49 4E 45 20 20     SAY S.MACHINE  
018FF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
019000:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
019010:  15 00 00 00 02 09 50 E5 15 00 C1 02 00 00 00 02    ......P.........
019020:  15 00 C6 02 00 00 00 02 15 00 C2 02 00 00 00 02    ................
019030:  15 00 C7 02 00 00 00 02 15 00 C3 02 00 00 00 02    ................
019040:  15 00 C8 02 00 00 00 02 15 00 C4 02 00 00 00 02    ................
019050:  15 00 C9 02 00 00 00 02 15 00 C5 02 00 00 00 02    ................
019060:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
019070:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
019080:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
019090:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0190F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
019100:  4E 54 45 52 20 4C 41 20 51 55 41 4E 54 49 54 45    NTER LA QUANTITE
019110:  20 52 45 53 54 41 4E 54 20 41 20 2A 0D 0A 2A 20     RESTANT A *..* 
019120:  4C 49 56 52 45 52 20 45 54 20 49 4E 43 52 45 4D    LIVRER ET INCREM
019130:  45 4E 54 45 52 20 53 49 4D 55 4C 54 41 4E 45 4D    ENTER SIMULTANEM
019140:  45 4E 54 20 4C 41 20 51 55 41 4E 54 49 54 45 20    ENT LA QUANTITE 
019150:  45 4E 20 53 54 4F 43 4B 2E 20 20 20 20 20 20 20    EN STOCK.       
019160:  20 2A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A     *..************
019170:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
019180:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
019190:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
0191A0:  2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 0D 0A 20 20 20 20    ********....    
0191B0:  40 20 32 32 2C 30 20 53 41 59 20 22 44 6F 6E 6E    @ 22,0 SAY "Donn
0191C0:  65 7A 20 6C 61 20 71 75 61 6E 74 69 74 65 20 61    ez la quantite a
0191D0:  20 65 6E 74 72 65 72 20 65 6E 20 73 74 6F 63 6B     entrer en stock
0191E0:  20 22 20 47 45 54 20 51 54 45 20 3B 0D 0A 50 49     " GET QTE ;..PI
0191F0:  43 54 55 52 45 20 22 39 39 39 39 22 0D 0A 20 20    CTURE "9999"..  
019200:  20 20 52 45 41 44 0D 0A 53 54 4F 52 45 20 56 41      READ..STORE VA
019210:  4C 28 51 54 45 29 20 54 4F 20 51 55 41 4E 54 49    L(QTE) TO QUANTI
019220:  54 45 0D 0A 0D 0A 2A 20 53 49 20 4C 41 20 51 55    TE....* SI LA QU
019230:  41 4E 54 49 54 45 20 53 41 49 53 49 45 20 45 53    ANTITE SAISIE ES
019240:  54 20 53 55 50 45 52 49 45 55 52 45 20 41 20 43    T SUPERIEURE A C
019250:  45 4C 4C 45 20 52 45 53 54 41 4E 54 20 41 20 4C    ELLE RESTANT A L
019260:  49 56 52 45 52 0D 0A 2A 20 55 4E 20 4D 45 53 53    IVRER..* UN MESS
019270:  41 47 45 20 44 27 45 52 52 45 55 52 20 53 45 52    AGE D'ERREUR SER
019280:  41 20 41 46 46 49 43 48 45 2C 20 45 54 20 41 55    A AFFICHE, ET AU
019290:  43 55 4E 20 54 52 41 49 54 45 4D 45 4E 54 20 4E    CUN TRAITEMENT N
0192A0:  45 20 53 45 52 41 0D 0A 2A 20 45 46 46 45 43 54    E SERA..* EFFECT
0192B0:  55 45 2E 0D 0A 09 49 46 20 51 55 41 4E 54 49 54    UE....IF QUANTIT
0192C0:  45 20 3E 20 53 2E 51 54 45 3A 52 45 53 54 45 0D    E > S.QTE:RESTE.
0192D0:  0A 09 40 20 32 33 2C 30 20 53 41 59 20 22 54 72    ..@ 23,0 SAY "Tr
0192E0:  61 6E 73 61 63 74 69 6F 6E 20 69 6D 70 6F 73 73    ansaction imposs
0192F0:  69 62 6C 65 2C 20 56 61 6C 69 64 65 7A 22 0D 0A    ible, Validez"..
019300:  64 6F 20 77 68 69 6C 65 20 74 0D 0A 65 72 61 73    do while t..eras
019310:  65 0D 0A 73 74 6F 72 65 20 22 20 20 20 20 20 22    e..store "     "
019320:  20 74 6F 20 6D 6F 69 73 3A 6D 69 6E 0D 0A 73 74     to mois:min..st
019330:  6F 72 65 20 22 20 20 20 20 20 22 20 74 6F 20 6D    ore "     " to m
019340:  6F 69 73 3A 6D 61 78 0D 0A 40 20 32 2C 30 20 73    ois:max..@ 2,0 s
019350:  61 79 22 20 20 20 20 20 20 20 20 20 20 20 52 45    ay"           RE
019360:  4C 45 56 45 28 53 29 20 4D 45 4E 53 55 45 4C 28    LEVE(S) MENSUEL(
019370:  53 29 20 44 45 53 20 44 45 42 49 54 53 20 45 54    S) DES DEBITS ET
019380:  20 43 52 45 44 49 54 53 22 0D 0A 40 20 34 2C 30     CREDITS"..@ 4,0
019390:  20 73 61 79 20 22 70 65 72 69 6F 64 65 20 64 65     say "periode de
0193A0:  20 64 65 62 75 74 20 64 65 20 72 65 6C 65 76 65     debut de releve
0193B0:  20 4D 4D 2F 41 41 20 22 20 67 65 74 20 6D 6F 69     MM/AA " get moi
0193C0:  73 3A 6D 69 6E 20 70 69 63 74 75 72 65 20 22 39    s:min picture "9
0193D0:  39 2F 39 39 22 0D 0A 40 20 36 2C 30 20 73 61 79    9/99"..@ 6,0 say
0193E0:  20 22 70 65 72 69 6F 64 65 20 64 65 20 66 69 6E     "periode de fin
0193F0:  20 20 20 64 65 20 72 65 6C 65 76 65 20 4D 4D 2F       de releve MM/
019400:  41 41 20 22 20 67 65 74 20 6D 6F 69 73 3A 6D 61    AA " get mois:ma
019410:  78 20 70 69 63 74 75 72 65 20 22 39 39 2F 39 39    x picture "99/99
019420:  22 0D 0A 72 65 61 64 0D 0A 73 74 6F 72 65 20 24    "..read..store $
019430:  28 6D 6F 69 73 3A 6D 69 6E 2C 34 2C 32 29 20 2B    (mois:min,4,2) +
019440:  20 24 28 6D 6F 69 73 3A 6D 69 6E 2C 31 2C 32 29     $(mois:min,1,2)
019450:  20 74 6F 20 6D 6F 69 73 3A 6D 69 6E 0D 0A 73 74     to mois:min..st
019460:  6F 72 65 20 6D 6F 69 73 3A 6D 69 6E 20 74 6F 20    ore mois:min to 
019470:  6D 69 6E 69 0D 0A 73 74 6F 72 65 20 24 28 6D 6F    mini..store $(mo
019480:  69 73 3A 6D 61 78 2C 34 2C 32 29 20 2B 20 24 28    is:max,4,2) + $(
019490:  6D 6F 69 73 3A 6D 61 78 2C 31 2C 32 29 20 74 6F    mois:max,1,2) to
0194A0:  20 6D 6F 69 73 3A 6D 61 78 0D 0A 69 66 20 6D 6F     mois:max..if mo
0194B0:  69 73 3A 6D 69 6E 3D 22 20 22 20 2E 61 6E 64 2E    is:min=" " .and.
0194C0:  20 6D 6F 69 73 3A 6D 61 78 3D 22 20 22 0D 0A 72     mois:max=" "..r
0194D0:  65 6C 65 61 73 65 20 6D 6F 69 73 3A 6D 69 6E 2C    elease mois:min,
0194E0:  6D 6F 69 73 3A 6D 61 78 2C 6D 69 6E 69 0D 0A 73    mois:max,mini..s
0194F0:  65 6C 65 63 74 20 70 72 69 6D 61 72 79 0D 0A 75    elect primary..u
019500:  09 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 46 46    .SET CONSOLE OFF
019510:  0D 0A 09 57 41 49 54 0D 0A 09 53 45 54 20 43 4F    ...WAIT...SET CO
019520:  4E 53 4F 4C 45 20 4F 4E 0D 0A 09 40 20 32 33 2C    NSOLE ON...@ 23,
019530:  30 20 53 41 59 20 22 20 20 20 20 20 20 20 20 20    0 SAY "         
019540:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
019550:  20 20 20 20 20 20 20 22 0D 0A 0D 0A 2A 20 53 49           "....* SI
019560:  20 4C 41 20 20 51 55 41 4E 54 49 54 45 20 41 20     LA  QUANTITE A 
019570:  20 44 45 44 55 49 52 45 20 45 53 54 20 49 4E 46     DEDUIRE EST INF
019580:  45 52 49 45 55 52 45 20 4F 55 20 45 47 41 4C 45    ERIEURE OU EGALE
019590:  20 41 20 43 45 4C 4C 45 0D 0A 2A 20 52 45 53 54     A CELLE..* REST
0195A0:  41 4E 54 20 41 20 4C 49 56 52 45 52 20 2D 2D 3E    ANT A LIVRER -->
0195B0:  20 4D 4F 44 49 46 49 43 41 54 49 4F 4E 20 44 45     MODIFICATION DE
0195C0:  20 4C 41 20 51 55 41 4E 54 49 54 45 20 45 4E 20     LA QUANTITE EN 
0195D0:  53 54 4F 43 4B 2C 0D 0A 2A 20 50 55 49 53 20 41    STOCK,..* PUIS A
0195E0:  46 46 49 43 48 41 47 45 20 44 45 20 4C 41 20 4E    FFICHAGE DE LA N
0195F0:  4F 55 56 45 4C 4C 45 20 51 55 41 4E 54 49 54 45    OUVELLE QUANTITE
019600:  20 45 4E 20 53 54 4F 43 4B 20 45 54 20 44 55 20     EN STOCK ET DU 
019610:  50 52 49 58 0D 0A 2A 20 54 4F 54 41 4C 20 43 4F    PRIX..* TOTAL CO
019620:  52 52 45 53 50 4F 4E 44 41 4E 54 0D 0A 09 45 4C    RRESPONDANT...EL
019630:  53 45 0D 0A 09 52 45 50 4C 41 43 45 20 53 2E 51    SE...REPLACE S.Q
019640:  54 45 3A 52 45 53 54 45 20 57 49 54 48 20 53 2E    TE:RESTE WITH S.
019650:  51 54 45 3A 52 45 53 54 45 20 2D 20 51 55 41 4E    QTE:RESTE - QUAN
019660:  54 49 54 45 0D 0A 09 52 45 50 4C 41 43 45 20 53    TITE...REPLACE S
019670:  2E 51 54 45 3A 53 54 4F 43 4B 20 57 49 54 48 20    .QTE:STOCK WITH 
019680:  53 2E 51 54 45 3A 53 54 4F 43 4B 20 2B 20 51 55    S.QTE:STOCK + QU
019690:  41 4E 54 49 54 45 0D 0A 09 53 54 4F 52 45 20 53    ANTITE...STORE S
0196A0:  2E 51 54 45 3A 53 54 4F 43 4B 20 2A 20 53 2E 50    .QTE:STOCK * S.P
0196B0:  52 49 58 3A 55 48 54 20 54 4F 20 50 52 49 58 3A    RIX:UHT TO PRIX:
0196C0:  54 48 54 0D 0A 09 40 20 32 30 2C 36 37 20 53 41    THT...@ 20,67 SA
0196D0:  59 20 50 52 49 58 3A 54 48 54 0D 0A 09 40 20 32    Y PRIX:THT...@ 2
0196E0:  30 2C 33 35 20 53 41 59 20 53 2E 51 54 45 3A 53    0,35 SAY S.QTE:S
0196F0:  54 4F 43 4B 0D 0A 09 40 20 31 36 2C 35 31 20 53    TOCK...@ 16,51 S
019700:  73 65 0D 0A 73 65 6C 65 63 74 20 73 65 63 6F 6E    se..select secon
019710:  64 61 72 79 0D 0A 75 73 65 0D 0A 72 65 74 75 72    dary..use..retur
019720:  6E 0D 0A 65 6E 64 69 66 0D 0A 0D 0A 69 66 20 6D    n..endif....if m
019730:  6F 69 73 3A 6D 61 78 20 3C 20 6D 6F 69 73 3A 6D    ois:max < mois:m
019740:  69 6E 0D 0A 40 20 32 30 2C 30 20 73 61 79 20 22    in..@ 20,0 say "
019750:  76 6F 74 72 65 20 73 65 6C 65 63 74 69 6F 6E 20    votre selection 
019760:  65 73 74 20 69 6E 63 6F 68 65 72 65 6E 74 65 2C    est incoherente,
019770:  20 65 64 69 74 69 6F 6E 20 64 75 20 72 65 6C 65     edition du rele
019780:  76 65 20 69 6D 70 6F 73 73 69 62 6C 65 20 2E 2E    ve impossible ..
019790:  22 0D 0A 73 74 6F 72 65 20 30 20 74 6F 20 74 65    "..store 0 to te
0197A0:  6D 70 6F 0D 0A 64 6F 20 77 68 69 6C 65 20 74 65    mpo..do while te
0197B0:  6D 70 6F 23 35 30 0D 0A 73 74 6F 72 65 20 74 65    mpo#50..store te
0197C0:  6D 70 6F 2B 31 20 74 6F 20 74 65 6D 70 6F 0D 0A    mpo+1 to tempo..
0197D0:  65 6E 64 64 6F 20 74 65 6D 70 6F 0D 0A 72 65 6C    enddo tempo..rel
0197E0:  65 61 73 65 20 74 65 6D 70 6F 0D 0A 6C 6F 6F 70    ease tempo..loop
0197F0:  0D 0A 65 6E 64 69 66 0D 0A 0D 0A 73 65 74 20 65    ..endif....set e
019800:  78 61 63 74 20 6F 66 66 0D 0A 73 65 6C 65 63 74    xact off..select
019810:  20 70 72 69 6D 61 72 79 0D 0A 75 73 65 20 63 72     primary..use cr
019820:  65 64 69 74 20 69 6E 64 65 78 20 64 61 74 65 2D    edit index date-
019830:  63 72 65 0D 0A 73 65 6C 65 63 74 20 73 65 63 6F    cre..select seco
019840:  6E 64 61 72 79 0D 0A 75 73 65 20 64 65 62 69 74    ndary..use debit
019850:  20 69 6E 64 65 78 20 64 61 74 65 2D 64 65 62 0D     index date-deb.
019860:  0A 0D 0A 2A 20 70 6F 73 69 74 69 6F 6E 6E 65 6D    ...* positionnem
019870:  65 6E 74 20 64 75 20 70 6F 69 6E 74 65 75 72 20    ent du pointeur 
019880:  64 27 65 6E 72 65 67 69 73 74 72 65 6D 65 6E 74    d'enregistrement
019890:  20 73 75 72 20 6C 65 20 70 72 65 6D 69 65 72 20     sur le premier 
0198A0:  64 65 62 69 74 20 0D 0A 2A 20 65 74 20 73 75 72    debit ..* et sur
0198B0:  20 6C 65 20 70 72 65 6D 69 65 72 20 63 72 65 64     le premier cred
0198C0:  69 74 20 64 61 6E 73 20 6C 61 20 70 65 72 69 6F    it dans la perio
0198D0:  64 65 20 64 6F 6E 6E 65 65 0D 0A 73 74 6F 72 65    de donnee..store
0198E0:  20 22 4E 22 20 74 6F 20 66 69 6E 31 0D 0A 73 74     "N" to fin1..st
0198F0:  6F 72 65 20 22 4E 22 20 74 6F 20 66 69 6E 32 0D    ore "N" to fin2.
019900:  41 59 20 22 20 20 20 20 20 22 0D 0A 09 40 20 31    AY "     "...@ 1
019910:  36 2C 35 31 20 53 41 59 20 53 2E 51 54 45 3A 52    6,51 SAY S.QTE:R
019920:  45 53 54 45 0D 0A 09 45 4E 44 49 46 0D 0A 20 20    ESTE...ENDIF..  
019930:  20 20 45 4C 53 45 0D 0A 0D 0A 2A 2A 2A 2A 2A 2A      ELSE....******
019940:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
019950:  2A 2A 20 46 49 4E 20 44 45 20 54 52 41 49 54 45    ** FIN DE TRAITE
019960:  4D 45 4E 54 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    MENT ***********
019970:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 2A 20    ************..* 
019980:  43 45 54 54 45 20 4F 50 54 49 4F 4E 20 54 45 52    CETTE OPTION TER
019990:  4D 49 4E 45 20 4C 41 20 4D 4F 44 49 46 49 43 41    MINE LA MODIFICA
0199A0:  54 49 4F 4E 20 28 20 52 45 43 45 50 54 49 4F 4E    TION ( RECEPTION
0199B0:  20 4F 55 20 53 4F 52 54 49 45 20 20 44 45 20 2A     OU SORTIE  DE *
0199C0:  0D 0A 2A 20 50 49 45 43 45 28 53 29 20 44 55 20    ..* PIECE(S) DU 
0199D0:  53 54 4F 43 4B 20 29 2C 20 45 54 20 56 4F 55 53    STOCK ), ET VOUS
0199E0:  20 50 45 52 4D 45 54 20 44 45 20 50 52 4F 43 45     PERMET DE PROCE
0199F0:  44 45 52 20 41 20 4C 27 45 56 45 4E 54 55 45 4C    DER A L'EVENTUEL
019A00:  4C 45 20 2A 0D 0A 2A 20 4D 4F 44 49 46 49 43 41    LE *..* MODIFICA
019A10:  54 49 4F 4E 20 44 27 55 4E 45 20 41 55 54 52 45    TION D'UNE AUTRE
019A20:  20 52 45 46 45 52 45 4E 43 45 2E 20 20 20 20 20     REFERENCE.     
019A30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
019A40:  20 20 20 20 20 20 20 2A 0D 0A 2A 2A 2A 2A 2A 2A           *..******
019A50:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
019A60:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
019A70:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
019A80:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 0D 0A    ************....
019A90:  09 49 46 20 21 28 52 45 50 4F 4E 53 45 29 20 3D    .IF !(REPONSE) =
019AA0:  20 22 46 22 0D 0A 09 53 54 4F 52 45 20 22 4E 22     "F"...STORE "N"
019AB0:  20 54 4F 20 43 4F 4E 54 49 4E 55 0D 0A 0D 0A 2A     TO CONTINU....*
019AC0:  20 53 49 20 4C 41 20 52 45 50 4F 4E 53 45 20 45     SI LA REPONSE E
019AD0:  53 54 20 44 49 46 46 45 52 45 4E 54 45 20 44 45    ST DIFFERENTE DE
019AE0:  20 3A 20 22 52 22 2C 22 53 22 20 4F 55 20 22 46     : "R","S" OU "F
019AF0:  22 20 2D 2D 3E 20 41 46 46 49 43 48 41 47 45 0D    " --> AFFICHAGE.
019B00:  0A 64 6F 20 77 68 69 6C 65 20 28 66 69 6E 31 3D    .do while (fin1=
019B10:  22 4E 22 20 2E 6F 72 2E 20 66 69 6E 32 3D 22 4E    "N" .or. fin2="N
019B20:  22 29 20 2E 61 6E 64 2E 20 6D 6F 69 73 3A 6D 69    ") .and. mois:mi
019B30:  6E 3C 3D 6D 6F 69 73 3A 6D 61 78 0D 0A 73 65 6C    n<=mois:max..sel
019B40:  65 63 74 20 70 72 69 6D 61 72 79 0D 0A 69 66 20    ect primary..if 
019B50:  66 69 6E 31 3D 22 4E 22 0D 0A 66 69 6E 64 20 26    fin1="N"..find &
019B60:  6D 6F 69 73 3A 6D 69 6E 0D 0A 69 66 20 23 23 30    mois:min..if ##0
019B70:  0D 0A 73 74 6F 72 65 20 22 4F 22 20 74 6F 20 66    ..store "O" to f
019B80:  69 6E 31 0D 0A 65 6E 64 69 66 0D 0A 65 6E 64 69    in1..endif..endi
019B90:  66 0D 0A 73 65 6C 65 63 74 20 73 65 63 6F 6E 64    f..select second
019BA0:  61 72 79 0D 0A 69 66 20 66 69 6E 32 3D 22 4E 22    ary..if fin2="N"
019BB0:  0D 0A 66 69 6E 64 20 26 6D 6F 69 73 3A 6D 69 6E    ..find &mois:min
019BC0:  0D 0A 69 66 20 23 23 30 0D 0A 73 74 6F 72 65 20    ..if ##0..store 
019BD0:  22 4F 22 20 74 6F 20 66 69 6E 32 0D 0A 65 6E 64    "O" to fin2..end
019BE0:  69 66 0D 0A 65 6E 64 69 66 0D 0A 73 74 6F 72 65    if..endif..store
019BF0:  20 24 28 6D 6F 69 73 3A 6D 69 6E 2C 33 2C 32 29     $(mois:min,3,2)
019C00:  20 74 6F 20 6D 6F 69 73 0D 0A 73 74 6F 72 65 20     to mois..store 
019C10:  76 61 6C 28 6D 6F 69 73 29 20 74 6F 20 6D 6F 69    val(mois) to moi
019C20:  73 31 0D 0A 69 66 20 6D 6F 69 73 31 3C 31 32 0D    s1..if mois1<12.
019C30:  0A 73 74 6F 72 65 20 73 74 72 28 76 61 6C 28 6D    .store str(val(m
019C40:  6F 69 73 3A 6D 69 6E 29 2B 31 2C 34 29 20 74 6F    ois:min)+1,4) to
019C50:  20 6D 6F 69 73 3A 6D 69 6E 0D 0A 65 6C 73 65 0D     mois:min..else.
019C60:  0A 2A 20 6A 61 6E 76 69 65 72 20 61 6E 6E 65 65    .* janvier annee
019C70:  20 73 75 69 76 61 6E 74 65 0D 0A 73 74 6F 72 65     suivante..store
019C80:  20 73 74 72 28 76 61 6C 28 6D 6F 69 73 3A 6D 69     str(val(mois:mi
019C90:  6E 29 2B 38 39 2C 34 29 20 74 6F 20 6D 6F 69 73    n)+89,4) to mois
019CA0:  3A 6D 69 6E 0D 0A 65 6E 64 69 66 0D 0A 65 6E 64    :min..endif..end
019CB0:  64 6F 0D 0A 72 65 6C 65 61 73 65 20 66 69 6E 2C    do..release fin,
019CC0:  6D 6F 69 73 2C 6D 6F 69 73 31 0D 0A 69 66 20 66    mois,mois1..if f
019CD0:  69 6E 31 3D 22 4E 22 20 2E 61 6E 64 2E 20 66 69    in1="N" .and. fi
019CE0:  6E 32 3D 22 4E 22 0D 0A 40 20 32 30 2C 30 20 73    n2="N"..@ 20,0 s
019CF0:  61 79 20 22 61 75 63 75 6E 20 63 72 65 64 69 74    ay "aucun credit
019D00:  0A 2A 20 44 27 55 4E 20 4D 45 53 53 41 47 45 20    .* D'UN MESSAGE 
019D10:  44 27 45 52 52 45 55 52 2E 0D 0A 09 45 4C 53 45    D'ERREUR....ELSE
019D20:  0D 0A 09 40 20 32 32 2C 30 20 53 41 59 20 22 41    ...@ 22,0 SAY "A
019D30:  55 43 55 4E 20 54 52 41 49 54 45 4D 45 4E 54 20    UCUN TRAITEMENT 
019D40:  4E 45 20 43 4F 52 52 45 53 50 4F 4E 44 20 41 20    NE CORRESPOND A 
019D50:  56 4F 54 52 45 20 53 45 4C 45 43 54 49 4F 4E 20    VOTRE SELECTION 
019D60:  20 20 22 0D 0A 09 53 45 54 20 43 4F 4E 53 4F 4C      "...SET CONSOL
019D70:  45 20 4F 46 46 0D 0A 09 57 41 49 54 0D 0A 09 53    E OFF...WAIT...S
019D80:  45 54 20 43 4F 4E 53 4F 4C 45 20 4F 4E 0D 0A 09    ET CONSOLE ON...
019D90:  45 4E 44 49 46 20 46 49 4E 20 54 52 41 49 54 45    ENDIF FIN TRAITE
019DA0:  4D 45 4E 54 20 44 27 55 4E 45 20 50 49 45 43 45    MENT D'UNE PIECE
019DB0:  0D 0A 20 20 20 20 45 4E 44 49 46 20 52 45 43 45    ..    ENDIF RECE
019DC0:  50 54 49 4F 4E 0D 0A 45 4E 44 49 46 20 53 4F 52    PTION..ENDIF SOR
019DD0:  54 49 45 0D 0A 45 4E 44 44 4F 20 43 4F 4E 54 49    TIE..ENDDO CONTI
019DE0:  4E 55 0D 0A 20 20 20 20 45 4E 44 49 46 20 45 58    NU..    ENDIF EX
019DF0:  49 53 54 45 4E 43 45 20 44 27 55 4E 45 20 50 49    ISTENCE D'UNE PI
019E00:  45 43 45 0D 0A 45 4E 44 49 46 20 53 41 49 53 49    ECE..ENDIF SAISI
019E10:  45 20 4E 55 4D 45 52 4F 20 44 45 20 52 45 46 45    E NUMERO DE REFE
019E20:  52 45 4E 43 45 0D 0A 45 4E 44 44 4F 20 43 4F 4E    RENCE..ENDDO CON
019E30:  54 45 4E 54 53 4F 52 0D 0A 45 4E 44 44 4F 0D 0A    TENTSOR..ENDDO..
019E40:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
019E50:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
019E60:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
019E70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
019E80:  53 2E 51 54 45 3A 53 54 4F 43 4B 20 2B 20 51 55    S.QTE:STOCK + QU
019E90:  41 4E 54 49 54 45 0D 0A 09 53 54 4F 52 45 20 53    ANTITE...STORE S
019EA0:  2E 51 54 45 3A 53 54 4F 43 4B 20 2A 20 53 2E 50    .QTE:STOCK * S.P
019EB0:  52 49 58 3A 55 48 54 20 54 4F 20 50 52 49 58 3A    RIX:UHT TO PRIX:
019EC0:  54 48 54 0D 0A 09 40 20 32 30 2C 36 37 20 53 41    THT...@ 20,67 SA
019ED0:  59 20 50 52 49 58 3A 54 48 54 0D 0A 09 40 20 32    Y PRIX:THT...@ 2
019EE0:  30 2C 33 35 20 53 41 59 20 53 2E 51 54 45 3A 53    0,35 SAY S.QTE:S
019EF0:  54 4F 43 4B 0D 0A 09 40 20 31 36 2C 35 31 20 53    TOCK...@ 16,51 S
019F00:  20 6E 69 20 64 65 62 69 74 20 6E 27 61 20 65 74     ni debit n'a et
019F10:  65 20 65 66 66 65 63 74 75 65 20 64 61 6E 73 20    e effectue dans 
019F20:  63 65 74 74 65 20 70 65 72 69 6F 64 65 22 0D 0A    cette periode"..
019F30:  73 74 6F 72 65 20 30 20 74 6F 20 74 65 6D 70 6F    store 0 to tempo
019F40:  0D 0A 64 6F 20 77 68 69 6C 65 20 74 65 6D 70 6F    ..do while tempo
019F50:  23 35 30 0D 0A 73 74 6F 72 65 20 74 65 6D 70 6F    #50..store tempo
019F60:  2B 31 20 74 6F 20 74 65 6D 70 6F 0D 0A 65 6E 64    +1 to tempo..end
019F70:  64 6F 20 74 65 6D 70 6F 0D 0A 72 65 6C 65 61 73    do tempo..releas
019F80:  65 20 74 65 6D 70 6F 0D 0A 6C 6F 6F 70 0D 0A 65    e tempo..loop..e
019F90:  6E 64 69 66 0D 0A 0D 0A 2A 20 43 41 4C 43 55 4C    ndif....* CALCUL
019FA0:  20 44 55 20 53 4F 4C 44 45 20 41 4E 54 45 52 49     DU SOLDE ANTERI
019FB0:  45 55 52 45 20 41 20 4C 41 20 50 45 52 49 4F 44    EURE A LA PERIOD
019FC0:  45 20 44 4F 4E 4E 45 45 0D 0A 73 65 6C 65 63 74    E DONNEE..select
019FD0:  20 70 72 69 6D 61 72 79 0D 0A 73 74 6F 72 65 20     primary..store 
019FE0:  23 20 74 6F 20 65 6E 72 67 3A 70 72 69 6D 0D 0A    # to enrg:prim..
019FF0:  73 75 6D 20 6D 6F 6E 74 3A 63 72 65 20 74 6F 20    sum mont:cre to 
01A000:  74 6F 74 61 6C 3A 63 72 65 20 66 6F 72 20 24 28    total:cre for $(
01A010:  64 61 74 65 3A 63 72 65 2C 37 2C 32 29 2B 24 28    date:cre,7,2)+$(
01A020:  64 61 74 65 3A 63 72 65 2C 34 2C 32 29 3C 6D 69    date:cre,4,2)<mi
01A030:  6E 69 0D 0A 69 66 20 65 6E 72 67 3A 70 72 69 6D    ni..if enrg:prim
01A040:  20 23 20 30 0D 0A 67 6F 74 6F 20 65 6E 72 67 3A     # 0..goto enrg:
01A050:  70 72 69 6D 0D 0A 65 6E 64 69 66 0D 0A 73 65 6C    prim..endif..sel
01A060:  65 63 74 20 73 65 63 6F 6E 64 61 72 79 0D 0A 73    ect secondary..s
01A070:  74 6F 72 65 20 23 20 74 6F 20 65 6E 72 67 3A 73    tore # to enrg:s
01A080:  65 63 6F 0D 0A 73 75 6D 20 6D 6F 6E 74 3A 64 65    eco..sum mont:de
01A090:  62 20 74 6F 20 74 6F 74 61 6C 3A 64 65 62 20 66    b to total:deb f
01A0A0:  6F 72 20 24 28 64 61 74 65 3A 64 65 62 2C 37 2C    or $(date:deb,7,
01A0B0:  32 29 2B 24 28 64 61 74 65 3A 64 65 62 2C 34 2C    2)+$(date:deb,4,
01A0C0:  32 29 3C 6D 69 6E 69 0D 0A 69 66 20 65 6E 72 67    2)<mini..if enrg
01A0D0:  3A 73 65 63 6F 20 23 20 30 0D 0A 67 6F 74 6F 20    :seco # 0..goto 
01A0E0:  65 6E 72 67 3A 73 65 63 6F 0D 0A 65 6E 64 69 66    enrg:seco..endif
01A0F0:  0D 0A 72 65 6C 65 61 73 65 20 61 6C 6C 20 6C 69    ..release all li
01A100:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A110:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A120:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A130:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A140:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A150:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A160:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A170:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A180:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A190:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A1A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A1B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A1C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A1D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A1E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A1F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A200:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A210:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A220:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A230:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A240:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A250:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A260:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A270:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A280:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A290:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A2A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A2B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A2C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A2D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A2E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A2F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01A300:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
01A310:  16 00 00 00 02 09 47 E5 16 00 C1 02 00 00 00 02    ......G.........
01A320:  16 00 C6 02 00 00 00 02 16 00 C2 02 00 00 00 02    ................
01A330:  16 00 C7 02 00 00 00 02 16 00 C3 02 00 00 00 02    ................
01A340:  16 00 C8 02 00 00 00 02 16 00 C4 02 00 00 00 02    ................
01A350:  16 00 C9 02 00 00 00 02 16 00 C5 02 00 00 00 02    ................
01A360:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A370:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A380:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A390:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A3F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01A400:  6B 65 20 65 6E 72 67 3A 2A 0D 0A 0D 0A 73 74 6F    ke enrg:*....sto
01A410:  72 65 20 22 4E 22 20 74 6F 20 66 69 6E 0D 0A 73    re "N" to fin..s
01A420:  74 6F 72 65 20 22 4E 22 20 74 6F 20 66 69 6E 31    tore "N" to fin1
01A430:  0D 0A 73 74 6F 72 65 20 22 4E 22 20 74 6F 20 66    ..store "N" to f
01A440:  69 6E 32 0D 0A 73 74 6F 72 65 20 74 6F 74 61 6C    in2..store total
01A450:  3A 63 72 65 2D 74 6F 74 61 6C 3A 64 65 62 20 74    :cre-total:deb t
01A460:  6F 20 73 6F 6C 64 65 0D 0A 73 74 6F 72 65 20 31    o solde..store 1
01A470:  20 74 6F 20 6C 69 67 6E 65 0D 0A 73 74 6F 72 65     to ligne..store
01A480:  20 31 20 74 6F 20 70 61 67 65 0D 0A 2A 20 65 6E     1 to page..* en
01A490:  74 72 65 7A 20 64 61 6E 73 20 6D 61 78 20 6C 65    trez dans max le
01A4A0:  20 6E 6F 6D 62 72 65 20 64 65 20 6C 69 67 6E 65     nombre de ligne
01A4B0:  73 20 70 61 72 20 70 61 67 65 20 64 69 6D 69 6E    s par page dimin
01A4C0:  75 65 20 64 65 20 38 0D 0A 73 74 6F 72 65 20 31    ue de 8..store 1
01A4D0:  35 20 74 6F 20 6D 61 78 0D 0A 65 72 61 73 65 0D    5 to max..erase.
01A4E0:  0A 3F 20 22 20 20 20 20 20 20 20 20 20 20 20 20    .? "            
01A4F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A500:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A510:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A520:  20 20 20 20 20 20 70 61 67 65 20 22 3B 0D 0A 2B          page ";..+
01A530:  73 74 72 28 70 61 67 65 2C 32 29 0D 0A 3F 0D 0A    str(page,2)..?..
01A540:  3F 20 22 64 61 74 65 20 20 20 20 20 20 6E 75 6D    ? "date      num
01A550:  65 72 6F 20 20 20 6C 69 62 65 6C 6C 65 20 20 20    ero   libelle   
01A560:  20 20 20 20 20 20 20 20 20 20 20 20 63 72 65 64                cred
01A570:  69 74 20 20 20 20 20 20 64 65 62 69 74 20 20 20    it      debit   
01A580:  20 20 20 20 73 6F 6C 64 65 22 0D 0A 3F 20 22 3D        solde"..? "=
01A590:  3D 3D 3D 3D 3D 3D 3D 20 20 3D 3D 3D 3D 3D 3D 3D    =======  =======
01A5A0:  20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D      ==============
01A5B0:  3D 3D 3D 3D 3D 20 20 20 3D 3D 3D 3D 3D 3D 3D 3D    =====   ========
01A5C0:  3D 3D 20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 20 20    ==  ==========  
01A5D0:  3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 0D 0A 3F 0D 0A    =========="..?..
01A5E0:  3F 20 22 2A 2A 2A 2A 2A 2A 2A 2A 20 20 2A 2A 2A    ? "********  ***
01A5F0:  2A 2A 2A 2A 20 20 61 6E 63 69 65 6E 20 73 6F 6C    ****  ancien sol
01A600:  65 2C 31 2C 32 29 3E 3D 24 28 64 61 74 65 3A 64    e,1,2)>=$(date:d
01A610:  65 62 2C 37 2C 32 29 2B 24 28 64 61 74 65 3A 64    eb,7,2)+$(date:d
01A620:  65 62 2C 34 2C 32 29 2B 3B 0D 0A 24 28 64 61 74    eb,4,2)+;..$(dat
01A630:  65 3A 64 65 62 2C 31 2C 32 29 29 20 2E 6F 72 2E    e:deb,1,2)) .or.
01A640:  20 66 69 6E 31 3D 22 4F 22 29 0D 0A 69 66 20 65     fin1="O")..if e
01A650:  6F 66 20 2E 6F 72 2E 20 23 3D 30 20 2E 6F 72 2E    of .or. #=0 .or.
01A660:  20 24 28 64 61 74 65 3A 64 65 62 2C 37 2C 32 29     $(date:deb,7,2)
01A670:  2B 24 28 64 61 74 65 3A 64 65 62 2C 34 2C 32 29    +$(date:deb,4,2)
01A680:  20 3E 20 6D 6F 69 73 3A 6D 61 78 0D 0A 73 74 6F     > mois:max..sto
01A690:  72 65 20 22 4F 22 20 74 6F 20 66 69 6E 32 0D 0A    re "O" to fin2..
01A6A0:  65 6C 73 65 0D 0A 69 66 20 6C 69 67 6E 65 3D 6D    else..if ligne=m
01A6B0:  61 78 0D 0A 73 74 6F 72 65 20 31 20 74 6F 20 6C    ax..store 1 to l
01A6C0:  69 67 6E 65 0D 0A 73 74 6F 72 65 20 70 61 67 65    igne..store page
01A6D0:  2B 31 20 74 6F 20 70 61 67 65 0D 0A 3F 20 22 20    +1 to page..? " 
01A6E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A6F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A700:  20 20 20 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D            --------
01A710:  2D 2D 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 20    --  ----------  
01A720:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 0D 0A 3F 20 22    ----------"..? "
01A730:  53 4F 55 53 2D 54 4F 54 41 4C 20 20 20 20 20 20    SOUS-TOTAL      
01A740:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A750:  20 20 20 20 20 20 20 20 20 22 2B 73 74 72 28 74             "+str(t
01A760:  6F 74 61 6C 3A 63 72 65 2C 31 30 2C 32 29 2B 22    otal:cre,10,2)+"
01A770:  20 20 22 2B 3B 0D 0A 73 74 72 28 74 6F 74 61 6C      "+;..str(total
01A780:  3A 64 65 62 2C 31 30 2C 32 29 2B 22 20 20 22 2B    :deb,10,2)+"  "+
01A790:  73 74 72 28 73 6F 6C 64 65 2C 31 30 2C 32 29 0D    str(solde,10,2).
01A7A0:  0A 77 61 69 74 0D 0A 65 72 61 73 65 0D 0A 3F 20    .wait..erase..? 
01A7B0:  22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    "               
01A7C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A7D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A7E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A7F0:  20 20 20 70 61 67 65 20 22 3B 0D 0A 2B 73 74 72       page ";..+str
01A800:  64 65 20 20 20 20 20 20 20 20 20 20 22 2B 73 74    de          "+st
01A810:  72 28 74 6F 74 61 6C 3A 63 72 65 2C 31 30 2C 32    r(total:cre,10,2
01A820:  29 2B 22 20 20 22 2B 3B 0D 0A 73 74 72 28 74 6F    )+"  "+;..str(to
01A830:  74 61 6C 3A 64 65 62 2C 31 30 2C 32 29 2B 22 20    tal:deb,10,2)+" 
01A840:  20 22 2B 73 74 72 28 73 6F 6C 64 65 2C 31 30 2C     "+str(solde,10,
01A850:  32 29 0D 0A 64 6F 20 77 68 69 6C 65 20 66 69 6E    2)..do while fin
01A860:  3D 22 4E 22 0D 0A 69 66 20 6C 69 67 6E 65 3D 6D    ="N"..if ligne=m
01A870:  61 78 0D 0A 73 74 6F 72 65 20 31 20 74 6F 20 6C    ax..store 1 to l
01A880:  69 67 6E 65 0D 0A 73 74 6F 72 65 20 70 61 67 65    igne..store page
01A890:  2B 31 20 74 6F 20 70 61 67 65 0D 0A 3F 20 22 20    +1 to page..? " 
01A8A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A8B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A8C0:  20 20 20 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D            --------
01A8D0:  2D 2D 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 20    --  ----------  
01A8E0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 0D 0A 3F 20 22    ----------"..? "
01A8F0:  53 4F 55 53 2D 54 4F 54 41 4C 20 20 20 20 20 20    SOUS-TOTAL      
01A900:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A910:  20 20 20 20 20 20 20 20 20 22 2B 73 74 72 28 74             "+str(t
01A920:  6F 74 61 6C 3A 63 72 65 2C 31 30 2C 32 29 2B 22    otal:cre,10,2)+"
01A930:  20 20 22 2B 3B 0D 0A 73 74 72 28 74 6F 74 61 6C      "+;..str(total
01A940:  3A 64 65 62 2C 31 30 2C 32 29 2B 22 20 20 22 2B    :deb,10,2)+"  "+
01A950:  73 74 72 28 73 6F 6C 64 65 2C 31 30 2C 32 29 0D    str(solde,10,2).
01A960:  0A 77 61 69 74 0D 0A 65 72 61 73 65 0D 0A 3F 20    .wait..erase..? 
01A970:  22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    "               
01A980:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A990:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A9A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01A9B0:  20 20 20 70 61 67 65 20 22 3B 0D 0A 2B 73 74 72       page ";..+str
01A9C0:  28 70 61 67 65 2C 32 29 0D 0A 3F 0D 0A 3F 20 22    (page,2)..?..? "
01A9D0:  64 61 74 65 20 20 20 20 20 20 6E 75 6D 65 72 6F    date      numero
01A9E0:  20 20 20 6C 69 62 65 6C 6C 65 20 20 20 20 20 20       libelle      
01A9F0:  20 20 20 20 20 20 20 20 20 63 72 65 64 69 74 20             credit 
01AA00:  28 70 61 67 65 2C 32 29 0D 0A 3F 0D 0A 3F 20 22    (page,2)..?..? "
01AA10:  64 61 74 65 20 20 20 20 20 20 6E 75 6D 65 72 6F    date      numero
01AA20:  20 20 20 6C 69 62 65 6C 6C 65 20 20 20 20 20 20       libelle      
01AA30:  20 20 20 20 20 20 20 20 20 63 72 65 64 69 74 20             credit 
01AA40:  20 20 20 20 20 64 65 62 69 74 20 20 20 20 20 20         debit      
01AA50:  20 73 6F 6C 64 65 22 0D 0A 3F 20 22 3D 3D 3D 3D     solde"..? "====
01AA60:  3D 3D 3D 3D 20 20 3D 3D 3D 3D 3D 3D 3D 20 20 3D    ====  =======  =
01AA70:  3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D    ================
01AA80:  3D 3D 20 20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 20    ==   ========== 
01AA90:  20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 20 20 3D 3D 3D     ==========  ===
01AAA0:  3D 3D 3D 3D 3D 3D 3D 22 0D 0A 3F 0D 0A 3F 20 22    ======="..?..? "
01AAB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01AAC0:  20 20 20 72 65 70 6F 72 74 20 20 20 20 20 20 20       report       
01AAD0:  20 20 20 20 20 20 20 20 20 22 2B 73 74 72 28 74             "+str(t
01AAE0:  6F 74 61 6C 3A 63 72 65 2C 31 30 2C 32 29 2B 22    otal:cre,10,2)+"
01AAF0:  20 20 22 2B 3B 0D 0A 73 74 72 28 74 6F 74 61 6C      "+;..str(total
01AB00:  3A 64 65 62 2C 31 30 2C 32 29 2B 22 20 20 22 2B    :deb,10,2)+"  "+
01AB10:  73 74 72 28 73 6F 6C 64 65 2C 31 30 2C 32 29 0D    str(solde,10,2).
01AB20:  0A 65 6E 64 69 66 0D 0A 73 74 6F 72 65 20 73 6F    .endif..store so
01AB30:  6C 64 65 2D 6D 6F 6E 74 3A 64 65 62 20 74 6F 20    lde-mont:deb to 
01AB40:  73 6F 6C 64 65 0D 0A 3F 20 64 61 74 65 3A 64 65    solde..? date:de
01AB50:  62 2B 22 20 20 22 2B 6E 75 6D 65 72 6F 2B 22 20    b+"  "+numero+" 
01AB60:  20 22 2B 64 65 62 69 74 65 75 72 2B 22 20 20 20     "+debiteur+"   
01AB70:  20 20 20 20 20 20 20 20 20 20 20 22 2B 73 74 72               "+str
01AB80:  28 6D 6F 6E 74 3A 64 65 62 2C 31 30 2C 32 29 3B    (mont:deb,10,2);
01AB90:  0D 0A 2B 22 20 20 22 2B 73 74 72 28 73 6F 6C 64    ..+"  "+str(sold
01ABA0:  65 2C 31 30 2C 32 29 0D 0A 73 74 6F 72 65 20 6C    e,10,2)..store l
01ABB0:  69 67 6E 65 20 2B 20 31 20 74 6F 20 6C 69 67 6E    igne + 1 to lign
01ABC0:  65 0D 0A 73 74 6F 72 65 20 74 6F 74 61 6C 3A 64    e..store total:d
01ABD0:  65 62 2B 6D 6F 6E 74 3A 64 65 62 20 74 6F 20 74    eb+mont:deb to t
01ABE0:  6F 74 61 6C 3A 64 65 62 0D 0A 73 6B 69 70 0D 0A    otal:deb..skip..
01ABF0:  65 6E 64 69 66 0D 0A 65 6E 64 64 6F 0D 0A 0D 0A    endif..enddo....
01AC00:  20 20 20 20 20 64 65 62 69 74 20 20 20 20 20 20         debit      
01AC10:  20 73 6F 6C 64 65 22 0D 0A 3F 20 22 3D 3D 3D 3D     solde"..? "====
01AC20:  3D 3D 3D 3D 20 20 3D 3D 3D 3D 3D 3D 3D 20 20 3D    ====  =======  =
01AC30:  3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D    ================
01AC40:  3D 3D 20 20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 20    ==   ========== 
01AC50:  20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 20 20 3D 3D 3D     ==========  ===
01AC60:  3D 3D 3D 3D 3D 3D 3D 22 0D 0A 3F 0D 0A 3F 20 22    ======="..?..? "
01AC70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01AC80:  20 20 20 72 65 70 6F 72 74 20 20 20 20 20 20 20       report       
01AC90:  20 20 20 20 20 20 20 20 20 22 2B 73 74 72 28 74             "+str(t
01ACA0:  6F 74 61 6C 3A 63 72 65 2C 31 30 2C 32 29 2B 22    otal:cre,10,2)+"
01ACB0:  20 20 22 2B 3B 0D 0A 73 74 72 28 74 6F 74 61 6C      "+;..str(total
01ACC0:  3A 64 65 62 2C 31 30 2C 32 29 2B 22 20 20 22 2B    :deb,10,2)+"  "+
01ACD0:  73 74 72 28 73 6F 6C 64 65 2C 31 30 2C 32 29 0D    str(solde,10,2).
01ACE0:  0A 65 6E 64 69 66 0D 0A 73 65 6C 65 63 74 20 70    .endif..select p
01ACF0:  72 69 6D 61 72 79 0D 0A 73 74 6F 72 65 20 64 61    rimary..store da
01AD00:  74 65 3A 63 72 65 20 74 6F 20 6D 64 61 74 65 3A    te:cre to mdate:
01AD10:  63 72 65 0D 0A 64 6F 20 77 68 69 6C 65 20 64 61    cre..do while da
01AD20:  74 65 3A 63 72 65 3D 6D 64 61 74 65 3A 63 72 65    te:cre=mdate:cre
01AD30:  20 2E 61 6E 64 2E 20 66 69 6E 31 3D 22 4E 22 20     .and. fin1="N" 
01AD40:  2E 61 6E 64 2E 20 28 28 24 28 64 61 74 65 3A 63    .and. (($(date:c
01AD50:  72 65 2C 37 2C 32 29 2B 3B 0D 0A 24 28 64 61 74    re,7,2)+;..$(dat
01AD60:  65 3A 63 72 65 2C 34 2C 32 29 2B 24 28 64 61 74    e:cre,4,2)+$(dat
01AD70:  65 3A 63 72 65 2C 31 2C 32 29 3C 3D 24 28 64 61    e:cre,1,2)<=$(da
01AD80:  74 65 3A 64 65 62 2C 37 2C 32 29 2B 24 28 64 61    te:deb,7,2)+$(da
01AD90:  74 65 3A 64 65 62 2C 34 2C 32 29 2B 3B 0D 0A 24    te:deb,4,2)+;..$
01ADA0:  28 64 61 74 65 3A 64 65 62 2C 31 2C 32 29 29 20    (date:deb,1,2)) 
01ADB0:  2E 6F 72 2E 20 66 69 6E 32 3D 22 4F 22 29 0D 0A    .or. fin2="O")..
01ADC0:  69 66 20 65 6F 66 20 2E 6F 72 2E 20 23 3D 30 20    if eof .or. #=0 
01ADD0:  2E 6F 72 2E 20 24 28 64 61 74 65 3A 63 72 65 2C    .or. $(date:cre,
01ADE0:  37 2C 32 29 2B 24 28 64 61 74 65 3A 63 72 65 2C    7,2)+$(date:cre,
01ADF0:  34 2C 32 29 20 3E 20 6D 6F 69 73 3A 6D 61 78 0D    4,2) > mois:max.
01AE00:  69 66 20 66 69 6E 31 3D 22 4F 22 20 2E 61 6E 64    if fin1="O" .and
01AE10:  2E 20 66 69 6E 32 3D 22 4F 22 0D 0A 73 74 6F 72    . fin2="O"..stor
01AE20:  65 20 22 4F 22 20 74 6F 20 66 69 6E 0D 0A 65 6E    e "O" to fin..en
01AE30:  64 69 66 0D 0A 65 6E 64 64 6F 0D 0A 3F 20 22 20    dif..enddo..? " 
01AE40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01AE50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01AE60:  20 20 20 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D            --------
01AE70:  2D 2D 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 20    --  ----------  
01AE80:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 0D 0A 3F 20 22    ----------"..? "
01AE90:  54 4F 54 41 4C 20 20 20 20 20 20 20 20 20 20 20    TOTAL           
01AEA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01AEB0:  20 20 20 20 20 20 20 20 20 22 2B 73 74 72 28 74             "+str(t
01AEC0:  6F 74 61 6C 3A 63 72 65 2C 31 30 2C 32 29 2B 22    otal:cre,10,2)+"
01AED0:  20 20 22 2B 3B 0D 0A 73 74 72 28 74 6F 74 61 6C      "+;..str(total
01AEE0:  3A 64 65 62 2C 31 30 2C 32 29 2B 22 20 20 22 2B    :deb,10,2)+"  "+
01AEF0:  73 74 72 28 73 6F 6C 64 65 2C 31 30 2C 32 29 0D    str(solde,10,2).
01AF00:  0A 72 65 6C 65 61 73 65 20 74 6F 74 61 6C 3A 63    .release total:c
01AF10:  72 65 2C 74 6F 74 61 6C 3A 64 65 62 2C 73 6F 6C    re,total:deb,sol
01AF20:  64 65 2C 66 69 6E 2C 66 69 6E 31 2C 66 69 6E 32    de,fin,fin1,fin2
01AF30:  0D 0A 77 61 69 74 0D 0A 65 6E 64 64 6F 0D 0A 1A    ..wait..enddo...
01AF40:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01AF50:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01AF60:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01AF70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01AF80:  3A 64 65 62 2C 31 30 2C 32 29 2B 22 20 20 22 2B    :deb,10,2)+"  "+
01AF90:  73 74 72 28 73 6F 6C 64 65 2C 31 30 2C 32 29 0D    str(solde,10,2).
01AFA0:  0A 77 61 69 74 0D 0A 65 72 61 73 65 0D 0A 3F 20    .wait..erase..? 
01AFB0:  22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    "               
01AFC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01AFD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01AFE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01AFF0:  20 20 20 70 61 67 65 20 22 3B 0D 0A 2B 73 74 72       page ";..+str
01B000:  0A 73 74 6F 72 65 20 22 4F 22 20 74 6F 20 66 69    .store "O" to fi
01B010:  6E 31 0D 0A 65 6C 73 65 0D 0A 69 66 20 6C 69 67    n1..else..if lig
01B020:  6E 65 3D 6D 61 78 0D 0A 73 74 6F 72 65 20 31 20    ne=max..store 1 
01B030:  74 6F 20 6C 69 67 6E 65 0D 0A 73 74 6F 72 65 20    to ligne..store 
01B040:  70 61 67 65 2B 31 20 74 6F 20 70 61 67 65 0D 0A    page+1 to page..
01B050:  3F 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20    ? "             
01B060:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01B070:  20 20 20 20 20 20 20 20 20 20 20 20 2D 2D 2D 2D                ----
01B080:  2D 2D 2D 2D 2D 2D 20 20 2D 2D 2D 2D 2D 2D 2D 2D    ------  --------
01B090:  2D 2D 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 0D    --  ----------".
01B0A0:  0A 3F 20 22 53 4F 55 53 2D 54 4F 54 41 4C 20 20    .? "SOUS-TOTAL  
01B0B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01B0C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 22 2B 73                 "+s
01B0D0:  74 72 28 74 6F 74 61 6C 3A 63 72 65 2C 31 30 2C    tr(total:cre,10,
01B0E0:  32 29 2B 22 20 20 22 2B 3B 0D 0A 73 74 72 28 74    2)+"  "+;..str(t
01B0F0:  6F 74 61 6C 3A 64 65 62 2C 31 30 2C 32 29 2B 22    otal:deb,10,2)+"
01B100:  20 20 22 2B 73 74 72 28 73 6F 6C 64 65 2C 31 30      "+str(solde,10
01B110:  2C 32 29 0D 0A 77 61 69 74 0D 0A 65 72 61 73 65    ,2)..wait..erase
01B120:  0D 0A 3F 20 22 20 20 20 20 20 20 20 20 20 20 20    ..? "           
01B130:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01B140:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01B150:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01B160:  20 20 20 20 20 20 20 70 61 67 65 20 22 3B 0D 0A           page ";..
01B170:  2B 73 74 72 28 70 61 67 65 2C 32 29 0D 0A 3F 0D    +str(page,2)..?.
01B180:  0A 3F 20 22 64 61 74 65 20 20 20 20 20 20 6E 75    .? "date      nu
01B190:  6D 65 72 6F 20 20 20 6C 69 62 65 6C 6C 65 20 20    mero   libelle  
01B1A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 63 72 65                 cre
01B1B0:  64 69 74 20 20 20 20 20 20 64 65 62 69 74 20 20    dit      debit  
01B1C0:  20 20 20 20 20 73 6F 6C 64 65 22 0D 0A 3F 20 22         solde"..? "
01B1D0:  3D 3D 3D 3D 3D 3D 3D 3D 20 20 3D 3D 3D 3D 3D 3D    ========  ======
01B1E0:  3D 20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D    =  =============
01B1F0:  3D 3D 3D 3D 3D 3D 20 20 20 3D 3D 3D 3D 3D 3D 3D    ======   =======
01B200:  4D 3D 30 2C 57 3D 37 31 0D 0A 59 0D 0A 50 49 45    M=0,W=71..Y..PIE
01B210:  43 45 53 20 4E 45 43 45 53 53 49 54 41 4E 54 20    CES NECESSITANT 
01B220:  55 4E 45 20 43 4F 4D 4D 41 4E 44 45 20 44 45 20    UNE COMMANDE DE 
01B230:  52 45 41 43 54 55 41 4C 49 53 41 54 49 4F 4E 20    REACTUALISATION 
01B240:  0D 0A 4E 0D 0A 59 0D 0A 4E 0D 0A 31 32 2C 50 49    ..N..Y..N..12,PI
01B250:  45 43 45 0D 0A 3C 52 45 46 45 52 45 4E 43 45 3B    ECE..<REFERENCE;
01B260:  5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 0D 0A 32 35    ____________..25
01B270:  2C 4C 49 42 45 4C 4C 45 0D 0A 3C 44 45 53 49 47    ,LIBELLE..<DESIG
01B280:  4E 41 54 49 4F 4E 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F    NATION;_________
01B290:  5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F    ________________
01B2A0:  0D 0A 38 2C 51 54 45 3A 53 54 4F 43 4B 0D 0A 3E    ..8,QTE:STOCK..>
01B2B0:  53 54 4F 43 4B 3B 5F 5F 5F 5F 5F 5F 5F 5F 0D 0A    STOCK;________..
01B2C0:  4E 0D 0A 38 2C 4D 49 4E 49 3A 53 54 4F 43 4B 0D    N..8,MINI:STOCK.
01B2D0:  0A 3E 4D 49 4E 49 4D 55 4D 3B 5F 5F 5F 5F 5F 5F    .>MINIMUM;______
01B2E0:  5F 5F 0D 0A 4E 0D 0A 37 2C 51 54 45 3A 52 45 53    __..N..7,QTE:RES
01B2F0:  54 45 0D 0A 3E 52 45 53 54 45 3B 5F 5F 5F 5F 5F    TE..>RESTE;_____
01B300:  5F 5F 0D 0A 4E 0D 0A 31 30 2C 28 4D 49 4E 49 3A    __..N..10,(MINI:
01B310:  53 54 4F 43 4B 2D 51 54 45 3A 53 54 4F 43 4B 2D    STOCK-QTE:STOCK-
01B320:  51 54 45 3A 52 45 53 54 45 29 2A 50 52 49 58 3A    QTE:RESTE)*PRIX:
01B330:  55 48 54 0D 0A 3E 43 4F 55 54 20 43 44 45 3B 5F    UHT..>COUT CDE;_
01B340:  5F 5F 5F 5F 5F 5F 5F 5F 5F 0D 0A 59 0D 0A 1A 1A    _________..Y....
01B350:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01B360:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01B370:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01B380:  28 6D 6F 6E 74 3A 64 65 62 2C 31 30 2C 32 29 3B    (mont:deb,10,2);
01B390:  0D 0A 2B 22 20 20 22 2B 73 74 72 28 73 6F 6C 64    ..+"  "+str(sold
01B3A0:  65 2C 31 30 2C 32 29 0D 0A 73 74 6F 72 65 20 6C    e,10,2)..store l
01B3B0:  69 67 6E 65 20 2B 20 31 20 74 6F 20 6C 69 67 6E    igne + 1 to lign
01B3C0:  65 0D 0A 73 74 6F 72 65 20 74 6F 74 61 6C 3A 64    e..store total:d
01B3D0:  65 62 2B 6D 6F 6E 74 3A 64 65 62 20 74 6F 20 74    eb+mont:deb to t
01B3E0:  6F 74 61 6C 3A 64 65 62 0D 0A 73 6B 69 70 0D 0A    otal:deb..skip..
01B3F0:  65 6E 64 69 66 0D 0A 65 6E 64 64 6F 0D 0A 0D 0A    endif..enddo....
01B400:  3D 3D 3D 20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 20    ===  ========== 
01B410:  20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 0D 0A 3F 0D     =========="..?.
01B420:  0A 3F 20 22 20 20 20 20 20 20 20 20 20 20 20 20    .? "            
01B430:  20 20 20 20 20 20 20 72 65 70 6F 72 74 20 20 20           report   
01B440:  20 20 20 20 20 20 20 20 20 20 20 20 20 22 2B 73                 "+s
01B450:  74 72 28 74 6F 74 61 6C 3A 63 72 65 2C 31 30 2C    tr(total:cre,10,
01B460:  32 29 2B 22 20 20 22 2B 3B 0D 0A 73 74 72 28 74    2)+"  "+;..str(t
01B470:  6F 74 61 6C 3A 64 65 62 2C 31 30 2C 32 29 2B 22    otal:deb,10,2)+"
01B480:  20 20 22 2B 73 74 72 28 73 6F 6C 64 65 2C 31 30      "+str(solde,10
01B490:  2C 32 29 0D 0A 65 6E 64 69 66 0D 0A 73 74 6F 72    ,2)..endif..stor
01B4A0:  65 20 73 6F 6C 64 65 2B 6D 6F 6E 74 3A 63 72 65    e solde+mont:cre
01B4B0:  20 74 6F 20 73 6F 6C 64 65 0D 0A 3F 20 64 61 74     to solde..? dat
01B4C0:  65 3A 63 72 65 2B 22 20 20 20 20 20 20 20 20 20    e:cre+"         
01B4D0:  20 20 22 2B 63 72 65 64 69 74 65 75 72 2B 22 20      "+crediteur+" 
01B4E0:  20 22 2B 73 74 72 28 6D 6F 6E 74 3A 63 72 65 2C     "+str(mont:cre,
01B4F0:  31 30 2C 32 29 3B 0D 0A 2B 22 20 20 20 20 20 20    10,2);..+"      
01B500:  20 20 20 20 20 20 20 20 22 2B 73 74 72 28 73 6F            "+str(so
01B510:  6C 64 65 2C 31 30 2C 32 29 0D 0A 73 74 6F 72 65    lde,10,2)..store
01B520:  20 6C 69 67 6E 65 20 2B 20 31 20 74 6F 20 6C 69     ligne + 1 to li
01B530:  67 6E 65 0D 0A 73 74 6F 72 65 20 74 6F 74 61 6C    gne..store total
01B540:  3A 63 72 65 2B 6D 6F 6E 74 3A 63 72 65 20 74 6F    :cre+mont:cre to
01B550:  20 74 6F 74 61 6C 3A 63 72 65 0D 0A 73 6B 69 70     total:cre..skip
01B560:  0D 0A 65 6E 64 69 66 0D 0A 65 6E 64 64 6F 0D 0A    ..endif..enddo..
01B570:  0D 0A 73 65 6C 65 63 74 20 73 65 63 6F 6E 64 61    ..select seconda
01B580:  72 79 0D 0A 73 74 6F 72 65 20 64 61 74 65 3A 64    ry..store date:d
01B590:  65 62 20 74 6F 20 6D 64 61 74 65 3A 64 65 62 0D    eb to mdate:deb.
01B5A0:  0A 64 6F 20 77 68 69 6C 65 20 64 61 74 65 3A 64    .do while date:d
01B5B0:  65 62 3D 6D 64 61 74 65 3A 64 65 62 20 2E 61 6E    eb=mdate:deb .an
01B5C0:  64 2E 20 66 69 6E 32 3D 22 4E 22 20 2E 61 6E 64    d. fin2="N" .and
01B5D0:  2E 20 28 28 24 28 64 61 74 65 3A 63 72 65 2C 37    . (($(date:cre,7
01B5E0:  2C 32 29 2B 3B 0D 0A 24 28 64 61 74 65 3A 63 72    ,2)+;..$(date:cr
01B5F0:  65 2C 34 2C 32 29 2B 24 28 64 61 74 65 3A 63 72    e,4,2)+$(date:cr
01B600:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
01B610:  17 00 00 00 02 09 50 E5 17 00 C1 02 00 00 00 02    ......P.........
01B620:  17 00 C6 02 00 00 00 02 17 00 C2 02 00 00 00 02    ................
01B630:  17 00 C7 02 00 00 00 02 17 00 C3 02 00 00 00 02    ................
01B640:  17 00 C8 02 00 00 00 02 17 00 C4 02 00 00 00 02    ................
01B650:  17 00 C9 02 00 00 00 02 17 00 C5 02 00 00 00 02    ................
01B660:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B670:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B680:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B690:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B6F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01B700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B7A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B7B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B7C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B7D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B7E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B7F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B800:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B810:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B820:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B830:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B840:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B850:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B860:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B870:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B880:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B890:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B8A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B8B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B8C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B8D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B8E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B8F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01B900:  20 53 41 59 20 22 20 20 20 20 20 20 20 20 20 20     SAY "          
01B910:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01B920:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 0D                  ".
01B930:  0A 45 4C 53 45 0D 0A 2A 20 43 41 4C 43 55 4C 20    .ELSE..* CALCUL 
01B940:  44 55 20 4E 55 4D 45 52 4F 20 44 45 20 53 45 4D    DU NUMERO DE SEM
01B950:  41 49 4E 45 0D 0A 53 54 4F 52 45 20 49 4E 54 28    AINE..STORE INT(
01B960:  28 28 4D 2D 31 29 2A 33 30 2B 4A 2B 36 29 2F 37    ((M-1)*30+J+6)/7
01B970:  29 20 54 4F 20 53 45 4D 41 49 4E 45 0D 0A 2A 20    ) TO SEMAINE..* 
01B980:  41 4E 4E 55 4C 41 54 49 4F 4E 20 44 45 53 20 56    ANNULATION DES V
01B990:  41 52 49 41 42 4C 45 53 20 4D 45 4D 4F 49 52 45    ARIABLES MEMOIRE
01B9A0:  20 49 4E 55 54 49 4C 45 53 0D 0A 52 45 4C 45 41     INUTILES..RELEA
01B9B0:  53 45 20 4A 2C 4D 2C 41 4E 2C 43 4F 4E 54 44 41    SE J,M,AN,CONTDA
01B9C0:  54 45 2C 42 49 53 53 45 58 54 49 4C 45 2C 43 41    TE,BISSEXTILE,CA
01B9D0:  4C 43 55 4C 0D 0A 2A 20 41 46 46 49 43 48 41 47    LCUL..* AFFICHAG
01B9E0:  45 20 44 55 20 44 45 55 58 49 45 4D 45 20 4D 45    E DU DEUXIEME ME
01B9F0:  4E 55 0D 0A 44 4F 20 4D 45 4E 55 32 0D 0A 45 4E    NU..DO MENU2..EN
01BA00:  44 49 46 0D 0A 2A 20 46 49 4E 20 44 55 20 4D 45    DIF..* FIN DU ME
01BA10:  4E 55 20 49 4E 49 54 49 41 4C 0D 0A 45 4E 44 44    NU INITIAL..ENDD
01BA20:  4F 20 49 4E 49 54 49 41 4C 0D 0A 1A 1A 1A 1A 1A    O INITIAL.......
01BA30:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BA40:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BA50:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BA60:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BA70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BA80:  1A 1A 61 6D 70 2E 20 20 43 65 74 20 0D 0A 20 20    ..amp.  Cet ..  
01BA90:  20 20 20 20 6F 72 64 72 65 20 20 6C 6F 67 69 71        ordre  logiq
01BAA0:  75 65 20 20 70 65 75 74 20 5E 08 65 74 72 65 20    ue  peut ^.etre 
01BAB0:  61 73 63 65 6E 64 61 6E 74 20 6F 75 20 64 65 73    ascendant ou des
01BAC0:  63 65 6E 64 61 6E 74 2E 20 20 41 75 63 75 6E 65    cendant.  Aucune
01BAD0:  20 20 6D 6F 64 69 66 69 63 61 74 69 6F 6E 20 0D      modification .
01BAE0:  0A 20 20 20 20 20 20 6E 27 65 73 74 20 20 65 66    .      n'est  ef
01BAF0:  66 65 63 74 75 7B 65 20 73 75 72 20 6C 65 20 66    fectu{e sur le f
01BB00:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01BB10:  2A 2A 2A 2A 20 46 49 43 48 49 45 52 20 44 45 20    **** FICHIER DE 
01BB20:  43 4F 4D 4D 41 4E 44 45 20 49 4E 49 54 49 41 4C    COMMANDE INITIAL
01BB30:  20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A     ***************
01BB40:  2A 2A 2A 0D 0A 2A 20 43 65 20 66 69 63 68 69 65    ***..* Ce fichie
01BB50:  72 20 64 65 20 63 6F 6D 6D 61 6E 64 65 20 65 73    r de commande es
01BB60:  74 20 6C 65 20 70 72 65 6D 69 65 72 20 61 20 65    t le premier a e
01BB70:  74 72 65 20 65 78 65 63 75 74 65 2E 20 49 6C 20    tre execute. Il 
01BB80:  70 65 72 6D 65 74 20 2A 0D 0A 2A 20 6C 61 20 73    permet *..* la s
01BB90:  61 69 73 69 65 20 65 74 20 6C 65 20 63 6F 6E 74    aisie et le cont
01BBA0:  72 6F 6C 65 20 64 65 20 20 6C 61 20 64 61 74 65    role de  la date
01BBB0:  20 20 64 75 20 6A 6F 75 72 20 61 76 61 6E 74 20      du jour avant 
01BBC0:  64 27 65 6E 63 68 61 69 6E 65 72 20 2A 0D 0A 2A    d'enchainer *..*
01BBD0:  20 6C 65 20 74 72 61 69 74 65 6D 65 6E 74 20 73     le traitement s
01BBE0:  75 72 20 6C 65 20 6D 65 6E 75 20 70 72 69 6E 63    ur le menu princ
01BBF0:  69 70 61 6C 20 3A 20 4D 45 4E 55 32 20 20 20 20    ipal : MENU2    
01BC00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01BC10:  20 2A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A     *..************
01BC20:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01BC30:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01BC40:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01BC50:  2A 2A 2A 2A 2A 2A 2A 0D 0A 0D 0A 2A 20 53 45 54    *******....* SET
01BC60:  20 54 41 4C 4B 20 4F 46 46 20 49 4E 54 45 52 44     TALK OFF INTERD
01BC70:  49 54 20 44 45 20 52 45 4E 56 4F 59 45 52 20 56    IT DE RENVOYER V
01BC80:  45 52 53 20 4C 27 45 43 52 41 4E 20 4C 45 53 20    ERS L'ECRAN LES 
01BC90:  44 49 46 46 45 52 45 4E 54 53 0D 0A 2A 20 4D 45    DIFFERENTS..* ME
01BCA0:  53 53 41 47 45 53 20 47 45 4E 45 52 45 53 20 50    SSAGES GENERES P
01BCB0:  41 52 20 44 42 41 53 45 20 49 49 20 4C 4F 52 53    AR DBASE II LORS
01BCC0:  20 44 27 55 4E 20 54 52 41 49 54 45 4D 45 4E 54     D'UN TRAITEMENT
01BCD0:  0D 0A 53 45 54 20 54 41 4C 4B 20 4F 46 46 0D 0A    ..SET TALK OFF..
01BCE0:  0D 0A 2A 20 53 45 54 20 43 4F 4C 4F 4E 20 4F 46    ..* SET COLON OF
01BCF0:  46 20 50 45 52 4D 45 54 20 44 45 20 4E 45 20 50    F PERMET DE NE P
01BD00:  69 63 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ic..............
01BD10:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BD20:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BD30:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BD40:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BD50:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BD60:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BD70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BD80:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BD90:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BDA0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BDB0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BDC0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BDD0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BDE0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BDF0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BE00:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BE10:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BE20:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BE30:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BE40:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BE50:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BE60:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BE70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BE80:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BE90:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BEA0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BEB0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BEC0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BED0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BEE0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BEF0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01BF00:  41 53 20 45 4E 43 41 44 52 45 52 20 50 41 52 20    AS ENCADRER PAR 
01BF10:  3A 20 22 3A 22 2C 20 4C 45 53 0D 0A 2A 20 5A 4F    : ":", LES..* ZO
01BF20:  4E 45 53 20 44 45 20 53 41 49 53 49 45 20 28 20    NES DE SAISIE ( 
01BF30:  49 4E 53 54 52 55 43 54 49 4F 4E 20 22 47 45 54    INSTRUCTION "GET
01BF40:  22 20 29 0D 0A 53 45 54 20 43 4F 4C 4F 4E 20 4F    " )..SET COLON O
01BF50:  46 46 0D 0A 2A 20 45 46 46 41 43 45 4D 45 4E 54    FF..* EFFACEMENT
01BF60:  20 44 45 20 4C 27 45 43 52 41 4E 20 20 0D 0A 45     DE L'ECRAN  ..E
01BF70:  52 41 53 45 0D 0A 40 20 31 30 2C 32 35 20 53 41    RASE..@ 10,25 SA
01BF80:  59 20 22 44 6F 6E 6E 65 7A 20 6C 61 20 64 61 74    Y "Donnez la dat
01BF90:  65 20 22 0D 0A 2A 20 41 46 46 45 43 54 41 54 49    e "..* AFFECTATI
01BFA0:  4F 4E 20 44 45 20 4C 41 20 56 41 52 49 41 42 4C    ON DE LA VARIABL
01BFB0:  45 20 3A 20 44 41 54 45 0D 0A 53 54 4F 52 45 20    E : DATE..STORE 
01BFC0:  22 20 20 20 20 20 20 20 20 22 20 54 4F 20 44 41    "        " TO DA
01BFD0:  54 45 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    TE..************
01BFE0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01BFF0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01C000:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01C010:  2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 2A 20 54 6F 75 74    ********..* Tout
01C020:  65 73 20 6C 65 73 20 69 6E 73 74 72 75 63 74 69    es les instructi
01C030:  6F 6E 73 20 73 69 74 75 65 65 73 20 65 6E 74 72    ons situees entr
01C040:  65 20 44 4F 20 57 48 49 4C 45 20 43 4F 4E 54 44    e DO WHILE CONTD
01C050:  41 54 45 20 3D 20 22 4F 22 20 65 74 20 2A 0D 0A    ATE = "O" et *..
01C060:  2A 20 45 4E 44 44 4F 20 73 65 72 6F 6E 74 20 65    * ENDDO seront e
01C070:  78 65 63 75 74 65 65 73 20 74 61 6E 74 20 71 75    xecutees tant qu
01C080:  65 20 6C 61 20 76 61 72 69 61 62 6C 65 20 43 4F    e la variable CO
01C090:  4E 54 44 41 54 45 20 20 73 65 72 61 20 65 67 61    NTDATE  sera ega
01C0A0:  6C 65 20 2A 0D 0A 2A 20 61 20 22 4F 22 2E 20 50    le *..* a "O". P
01C0B0:  6F 75 72 20 73 6F 72 74 69 72 20 64 27 75 6E 65    our sortir d'une
01C0C0:  20 62 6F 75 63 6C 65 20 64 65 20 63 65 20 74 79     boucle de ce ty
01C0D0:  70 65 20 69 6C 20 66 61 75 74 20 3A 20 73 6F 69    pe il faut : soi
01C0E0:  74 20 20 6D 6F 64 69 2D 20 2A 0D 0A 2A 20 66 69    t  modi- *..* fi
01C0F0:  65 72 20 6C 65 20 63 6F 6E 74 65 6E 75 20 64 65    er le contenu de
01C100:  1A 1A 1A 1A 52 49 46 49 43 41 54 49 4F 4E 20 44    ....RIFICATION D
01C110:  45 20 4C 41 20 44 41 54 45 20 53 41 49 53 49 45    E LA DATE SAISIE
01C120:  0D 0A 53 54 4F 52 45 20 56 41 4C 28 24 28 44 41    ..STORE VAL($(DA
01C130:  54 45 2C 31 2C 32 29 29 20 54 4F 20 4A 0D 0A 53    TE,1,2)) TO J..S
01C140:  54 4F 52 45 20 56 41 4C 28 24 28 44 41 54 45 2C    TORE VAL($(DATE,
01C150:  34 2C 32 29 29 20 54 4F 20 4D 0D 0A 53 54 4F 52    4,2)) TO M..STOR
01C160:  45 20 56 41 4C 28 24 28 44 41 54 45 2C 37 2C 32    E VAL($(DATE,7,2
01C170:  29 29 20 54 4F 20 41 4E 0D 0A 53 54 4F 52 45 20    )) TO AN..STORE 
01C180:  49 4E 54 28 41 4E 2F 34 29 20 54 4F 20 43 41 4C    INT(AN/4) TO CAL
01C190:  43 55 4C 0D 0A 49 46 20 28 41 4E 2F 34 29 2D 43    CUL..IF (AN/4)-C
01C1A0:  41 4C 43 55 4C 3D 30 0D 0A 53 54 4F 52 45 20 22    ALCUL=0..STORE "
01C1B0:  4F 55 49 22 20 54 4F 20 42 49 53 53 45 58 54 49    OUI" TO BISSEXTI
01C1C0:  4C 45 0D 0A 45 4C 53 45 0D 0A 53 54 4F 52 45 20    LE..ELSE..STORE 
01C1D0:  22 4E 4F 4E 22 20 54 4F 20 42 49 53 53 45 58 54    "NON" TO BISSEXT
01C1E0:  49 4C 45 0D 0A 45 4E 44 49 46 0D 0A 49 46 20 41    ILE..ENDIF..IF A
01C1F0:  4E 3C 38 31 20 2E 4F 52 2E 20 4D 3C 31 20 2E 4F    N<81 .OR. M<1 .O
01C200:  52 2E 20 4D 3E 31 32 20 2E 4F 52 2E 20 4A 3C 31    R. M>12 .OR. J<1
01C210:  20 2E 4F 52 2E 20 4A 3E 33 31 20 2E 4F 52 2E 20     .OR. J>31 .OR. 
01C220:  28 28 20 4D 3D 34 20 2E 4F 52 2E 20 4D 3D 36 20    (( M=4 .OR. M=6 
01C230:  2E 4F 52 2E 3B 0D 0A 4D 3D 39 20 2E 4F 52 2E 20    .OR.;..M=9 .OR. 
01C240:  4D 3D 31 31 29 20 2E 41 4E 44 2E 20 4A 3E 33 30    M=11) .AND. J>30
01C250:  20 29 20 2E 4F 52 2E 20 28 20 4D 3D 32 20 2E 41     ) .OR. ( M=2 .A
01C260:  4E 44 2E 20 4A 3E 32 39 29 20 2E 4F 52 2E 20 28    ND. J>29) .OR. (
01C270:  42 49 53 53 45 58 54 49 4C 45 3D 22 4E 4F 4E 22    BISSEXTILE="NON"
01C280:  3B 0D 0A 20 2E 41 4E 44 2E 20 4D 3D 32 20 2E 41    ;.. .AND. M=2 .A
01C290:  4E 44 2E 20 4A 3E 32 38 29 0D 0A 40 20 32 32 2C    ND. J>28)..@ 22,
01C2A0:  30 20 53 41 59 20 22 44 61 74 65 20 69 6E 63 6F    0 SAY "Date inco
01C2B0:  72 72 65 63 74 65 2C 20 61 70 70 75 79 65 7A 20    rrecte, appuyez 
01C2C0:  73 75 72 20 75 6E 65 20 74 6F 75 63 68 65 22 0D    sur une touche".
01C2D0:  0A 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 46 46    .SET CONSOLE OFF
01C2E0:  0D 0A 57 41 49 54 0D 0A 53 45 54 20 43 4F 4E 53    ..WAIT..SET CONS
01C2F0:  4F 4C 45 20 4F 4E 0D 0A 40 20 32 32 2C 30 20 53    OLE ON..@ 22,0 S
01C300:  20 6C 61 20 76 61 72 69 61 62 6C 65 20 20 2D 2D     la variable  --
01C310:  20 20 64 61 6E 73 20 6E 6F 74 72 65 20 63 61 73      dans notre cas
01C320:  2C 20 20 6D 6F 64 69 66 69 65 72 20 6C 65 20 2A    ,  modifier le *
01C330:  0D 0A 2A 20 63 6F 6E 74 65 6E 75 20 64 65 20 43    ..* contenu de C
01C340:  4F 4E 54 44 41 54 45 20 2D 2D 2C 20 20 73 6F 69    ONTDATE --,  soi
01C350:  74 20 20 75 74 69 6C 69 73 65 72 20 20 75 6E 65    t  utiliser  une
01C360:  20 20 63 6F 6D 6D 61 6E 64 65 20 64 65 20 73 6F      commande de so
01C370:  72 74 69 65 20 2A 0D 0A 2A 20 63 6F 6D 6D 65 20    rtie *..* comme 
01C380:  51 55 49 54 20 6F 75 20 52 45 54 55 52 4E 2C 20    QUIT ou RETURN, 
01C390:  20 73 6F 69 74 20 20 6C 61 6E 63 65 72 20 75 6E     soit  lancer un
01C3A0:  20 6E 6F 75 76 65 61 75 20 20 66 69 63 68 69 65     nouveau  fichie
01C3B0:  72 20 64 65 20 20 63 6F 6D 2D 20 2A 0D 0A 2A 20    r de  com- *..* 
01C3C0:  6D 61 6E 64 65 2E 20 43 65 20 73 65 72 61 20 63    mande. Ce sera c
01C3D0:  65 74 74 65 20 64 65 72 6E 69 65 72 65 20 70 6F    ette derniere po
01C3E0:  73 73 69 62 69 6C 69 74 65 20 71 75 65 20 20 6E    ssibilite que  n
01C3F0:  6F 75 73 20 20 75 74 69 6C 69 73 65 72 6F 6E 73    ous  utiliserons
01C400:  20 2A 0D 0A 2A 20 64 61 6E 73 20 6E 6F 74 72 65     *..* dans notre
01C410:  20 65 78 65 6D 70 6C 65 20 3A 20 44 4F 20 4D 45     exemple : DO ME
01C420:  4E 55 32 2E 20 20 20 20 20 20 20 20 20 20 20 20    NU2.            
01C430:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01C440:  20 20 20 20 20 20 20 2A 0D 0A 2A 2A 2A 2A 2A 2A           *..******
01C450:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01C460:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01C470:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01C480:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A    **************..
01C490:  0D 0A 53 54 4F 52 45 20 22 4F 22 20 54 4F 20 43    ..STORE "O" TO C
01C4A0:  4F 4E 54 44 41 54 45 0D 0A 44 4F 20 57 48 49 4C    ONTDATE..DO WHIL
01C4B0:  45 20 43 4F 4E 54 44 41 54 45 3D 22 4F 22 0D 0A    E CONTDATE="O"..
01C4C0:  2A 20 53 41 49 53 49 45 20 44 45 20 4C 41 20 44    * SAISIE DE LA D
01C4D0:  41 54 45 0D 0A 40 20 31 30 2C 34 30 20 47 45 54    ATE..@ 10,40 GET
01C4E0:  20 44 41 54 45 20 50 49 43 54 55 52 45 20 22 39     DATE PICTURE "9
01C4F0:  39 2F 39 39 2F 39 39 22 0D 0A 52 45 41 44 0D 0A    9/99/99"..READ..
01C500:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C510:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C520:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C530:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C540:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C550:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C560:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C570:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C580:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C590:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C5A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C5B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C5C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C5D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C5E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C5F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C600:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C610:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C620:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C630:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C640:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C650:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C660:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C670:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C680:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C690:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C6A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C6B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C6C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C6D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C6E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C6F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01C700:  2A 20 56 45 52 49 46 49 43 41 54 49 4F 4E 20 44    * VERIFICATION D
01C710:  45 20 4C 41 20 44 41 54 45 20 53 41 49 53 49 45    E LA DATE SAISIE
01C720:  0D 0A 53 54 4F 52 45 20 56 41 4C 28 24 28 44 41    ..STORE VAL($(DA
01C730:  54 45 2C 31 2C 32 29 29 20 54 4F 20 4A 0D 0A 53    TE,1,2)) TO J..S
01C740:  54 4F 52 45 20 56 41 4C 28 24 28 44 41 54 45 2C    TORE VAL($(DATE,
01C750:  34 2C 32 29 29 20 54 4F 20 4D 0D 0A 53 54 4F 52    4,2)) TO M..STOR
01C760:  45 20 56 41 4C 28 24 28 44 41 54 45 2C 37 2C 32    E VAL($(DATE,7,2
01C770:  29 29 20 54 4F 20 41 4E 0D 0A 53 54 4F 52 45 20    )) TO AN..STORE 
01C780:  49 4E 54 28 41 4E 2F 34 29 20 54 4F 20 43 41 4C    INT(AN/4) TO CAL
01C790:  43 55 4C 0D 0A 49 46 20 28 41 4E 2F 34 29 2D 43    CUL..IF (AN/4)-C
01C7A0:  41 4C 43 55 4C 3D 30 0D 0A 53 54 4F 52 45 20 22    ALCUL=0..STORE "
01C7B0:  4F 55 49 22 20 54 4F 20 42 49 53 53 45 58 54 49    OUI" TO BISSEXTI
01C7C0:  4C 45 0D 0A 45 4C 53 45 0D 0A 53 54 4F 52 45 20    LE..ELSE..STORE 
01C7D0:  22 4E 4F 4E 22 20 54 4F 20 42 49 53 53 45 58 54    "NON" TO BISSEXT
01C7E0:  49 4C 45 0D 0A 45 4E 44 49 46 0D 0A 49 46 20 41    ILE..ENDIF..IF A
01C7F0:  4E 20 3C 20 38 31 20 2E 4F 52 2E 20 4D 3C 31 20    N < 81 .OR. M<1 
01C800:  2E 4F 52 2E 20 4D 3E 31 32 20 2E 4F 52 2E 20 4A    .OR. M>12 .OR. J
01C810:  3C 31 20 2E 4F 52 2E 20 4A 3E 33 31 20 2E 4F 52    <1 .OR. J>31 .OR
01C820:  2E 20 28 28 20 4D 3D 34 20 2E 4F 52 2E 20 4D 3D    . (( M=4 .OR. M=
01C830:  36 20 2E 4F 52 2E 3B 0D 0A 4D 3D 39 20 2E 4F 52    6 .OR.;..M=9 .OR
01C840:  2E 20 4D 3D 31 31 29 20 2E 41 4E 44 2E 20 4A 3E    . M=11) .AND. J>
01C850:  33 30 20 29 20 2E 4F 52 2E 20 28 20 4D 3D 32 20    30 ) .OR. ( M=2 
01C860:  2E 41 4E 44 2E 20 4A 3E 32 39 29 20 2E 4F 52 2E    .AND. J>29) .OR.
01C870:  20 28 42 49 53 53 45 58 54 49 4C 45 3D 22 4E 4F     (BISSEXTILE="NO
01C880:  4E 22 3B 0D 0A 20 2E 41 4E 44 2E 20 4D 3D 32 20    N";.. .AND. M=2 
01C890:  2E 41 4E 44 2E 20 4A 3E 32 38 29 0D 0A 40 20 32    .AND. J>28)..@ 2
01C8A0:  32 2C 30 20 53 41 59 20 22 44 61 74 65 20 69 6E    2,0 SAY "Date in
01C8B0:  63 6F 72 72 65 63 74 65 2C 20 61 70 70 75 79 65    correcte, appuye
01C8C0:  7A 20 73 75 72 20 75 6E 65 20 74 6F 75 63 68 65    z sur une touche
01C8D0:  22 0D 0A 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F    "..SET CONSOLE O
01C8E0:  46 46 0D 0A 57 41 49 54 0D 0A 53 45 54 20 43 4F    FF..WAIT..SET CO
01C8F0:  4E 53 4F 4C 45 20 4F 4E 0D 0A 40 20 32 32 2C 30    NSOLE ON..@ 22,0
01C900:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
01C910:  18 00 00 00 02 09 50 E5 18 00 C1 02 00 00 00 02    ......P.........
01C920:  18 00 C6 02 00 00 00 02 18 00 C2 02 00 00 00 02    ................
01C930:  18 00 C7 02 00 00 00 02 18 00 C3 02 00 00 00 02    ................
01C940:  18 00 C8 02 00 00 00 02 18 00 C4 02 00 00 00 02    ................
01C950:  18 00 C9 02 00 00 00 02 18 00 C5 02 00 00 00 02    ................
01C960:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C970:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C980:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C990:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01C9F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01CA00:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01CA10:  2A 2A 2A 2A 2A 2A 2A 20 4D 45 4E 55 20 50 52 49    ******* MENU PRI
01CA20:  4E 43 49 50 41 4C 20 2A 2A 2A 2A 2A 2A 2A 2A 2A    NCIPAL *********
01CA30:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01CA40:  2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 2A 20 43 65 20 6D    ********..* Ce m
01CA50:  65 6E 75 20 65 73 74 20 6C 65 20 6D 65 6E 75 20    enu est le menu 
01CA60:  70 72 69 6E 63 69 70 61 6C 20 64 65 20 6C 27 61    principal de l'a
01CA70:  70 70 6C 69 63 61 74 69 6F 6E 2E 20 49 6C 20 76    pplication. Il v
01CA80:  6F 75 73 20 70 72 6F 70 6F 73 65 72 61 20 75 6E    ous proposera un
01CA90:  20 2A 0D 0A 2A 20 63 68 6F 69 78 20 64 65 20 74     *..* choix de t
01CAA0:  72 6F 69 73 20 73 65 6C 65 63 74 69 6F 6E 73 20    rois selections 
01CAB0:  70 72 69 6D 61 69 72 65 73 2E 20 53 65 6C 6F 6E    primaires. Selon
01CAC0:  20 76 6F 74 72 65 20 72 65 70 6F 6E 73 65 2C 20     votre reponse, 
01CAD0:  20 69 6C 20 65 78 65 63 75 2D 20 2A 0D 0A 2A 20     il execu- *..* 
01CAE0:  74 65 72 61 20 6C 65 20 74 72 61 69 74 65 6D 65    tera le traiteme
01CAF0:  6E 74 20 63 6F 72 72 65 73 70 6F 6E 64 61 6E 74    nt correspondant
01CB00:  20 65 6E 20 65 6E 63 68 61 69 6E 61 6E 74 20 64     en enchainant d
01CB10:  65 73 20 6D 65 6E 75 73 20 73 65 63 6F 6E 64 61    es menus seconda
01CB20:  69 72 65 73 20 2A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A    ires *..********
01CB30:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01CB40:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01CB50:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01CB60:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01CB70:  0D 0A 53 54 4F 52 45 20 27 4F 27 20 54 4F 20 43    ..STORE 'O' TO C
01CB80:  4F 4E 54 4D 45 4E 55 32 0D 0A 44 4F 20 57 48 49    ONTMENU2..DO WHI
01CB90:  4C 45 20 43 4F 4E 54 4D 45 4E 55 32 20 3D 20 27    LE CONTMENU2 = '
01CBA0:  4F 27 0D 0A 53 54 4F 52 45 20 27 46 27 20 54 4F    O'..STORE 'F' TO
01CBB0:  20 52 45 50 4F 4E 53 45 32 0D 0A 2A 20 45 46 46     REPONSE2..* EFF
01CBC0:  41 43 45 4D 45 4E 54 20 44 45 20 4C 27 45 43 52    ACEMENT DE L'ECR
01CBD0:  41 4E 2C 20 41 46 46 49 43 48 41 47 45 20 44 55    AN, AFFICHAGE DU
01CBE0:  20 4D 45 4E 55 2C 20 53 41 49 53 49 45 20 44 45     MENU, SAISIE DE
01CBF0:  20 4C 41 20 52 45 50 4F 4E 53 45 0D 0A 45 52 41     LA REPONSE..ERA
01CC00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CC10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CC20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CC30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CC40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CC50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CC60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CC70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CC80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CC90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CCA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CCB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CCC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CCD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CCE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CCF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CD00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CD10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CD20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CD30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CD40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CD50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CD60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CD70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CD80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CD90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CDA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CDB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CDC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CDD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CDE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CDF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01CE00:  53 45 0D 0A 40 20 20 36 2C 20 30 20 53 41 59 20    SE..@  6, 0 SAY 
01CE10:  22 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    "+--------------
01CE20:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
01CE30:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
01CE40:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 3B    ---------------;
01CE50:  0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ..--------------
01CE60:  2D 2D 2D 2B 22 0D 0A 40 20 20 37 2C 20 30 20 53    ---+"..@  7, 0 S
01CE70:  41 59 20 22 49 20 20 20 20 20 20 20 20 20 20 20    AY "I           
01CE80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01CE90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01CEA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01CEB0:  20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20      ;..           
01CEC0:  20 20 20 20 20 20 49 22 0D 0A 40 20 20 38 2C 20          I"..@  8, 
01CED0:  30 20 53 41 59 20 22 49 20 20 20 20 20 20 20 20    0 SAY "I        
01CEE0:  20 20 20 20 20 20 20 20 20 51 75 65 6C 20 74 72             Quel tr
01CEF0:  61 69 74 65 6D 65 6E 74 20 64 65 73 69 72 65 7A    aitement desirez
01CF00:  2D 76 6F 75 73 20 65 66 66 65 63 74 75 65 72 20    -vous effectuer 
01CF10:  3F 20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20    ?    ;..        
01CF20:  20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20 20             I"..@  
01CF30:  39 2C 20 30 20 53 41 59 20 22 49 20 20 20 20 20    9, 0 SAY "I     
01CF40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01CF50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01CF60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01CF70:  20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20            ;..     
01CF80:  20 20 20 20 20 20 20 20 20 20 20 20 49 22 0D 0A                I"..
01CF90:  40 20 31 30 2C 20 30 20 53 41 59 20 22 49 20 4D    @ 10, 0 SAY "I M
01CFA0:  6F 64 69 66 69 63 61 74 69 6F 6E 20 6F 75 20 63    odification ou c
01CFB0:  6F 6E 73 75 6C 74 61 74 69 6F 6E 20 64 65 73 20    onsultation des 
01CFC0:  70 69 65 63 65 73 20 64 65 74 61 63 68 65 65 73    pieces detachees
01CFD0:  20 3D 3D 3D 3D 3D 3D 3E 20 31 20 3B 0D 0A 20 20     ======> 1 ;..  
01CFE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49                   I
01CFF0:  22 0D 0A 40 20 31 31 2C 20 30 20 53 41 59 20 22    "..@ 11, 0 SAY "
01D000:  40 20 32 2C 30 20 73 61 79 20 22 20 20 20 20 20    @ 2,0 say "     
01D010:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4D                   M
01D020:  4F 44 49 46 49 43 41 54 49 4F 4E 20 44 27 55 4E    ODIFICATION D'UN
01D030:  20 43 52 45 44 49 54 22 0D 0A 40 20 34 2C 30 20     CREDIT"..@ 4,0 
01D040:  73 61 79 20 22 64 61 74 65 20 3A 20 22 20 67 65    say "date : " ge
01D050:  74 20 64 61 74 65 3A 63 72 65 20 70 69 63 74 75    t date:cre pictu
01D060:  72 65 20 22 39 39 2F 39 39 2F 39 39 22 0D 0A 40    re "99/99/99"..@
01D070:  20 24 2C 32 30 20 73 61 79 20 22 63 72 65 64 69     $,20 say "credi
01D080:  74 65 75 72 20 3A 20 22 20 67 65 74 20 63 72 65    teur : " get cre
01D090:  64 69 74 65 75 72 0D 0A 40 20 37 2C 30 20 73 61    diteur..@ 7,0 sa
01D0A0:  79 20 22 63 6F 6D 6D 65 6E 74 61 69 72 65 20 3A    y "commentaire :
01D0B0:  20 22 20 67 65 74 20 63 6F 6D 3A 63 72 65 0D 0A     " get com:cre..
01D0C0:  40 20 37 2C 35 30 20 73 61 79 20 22 6D 6F 6E 74    @ 7,50 say "mont
01D0D0:  61 6E 74 20 3A 20 20 20 20 20 20 20 20 20 20 20    ant :           
01D0E0:  20 46 22 0D 0A 40 20 37 2C 36 30 20 73 61 79 20     F"..@ 7,60 say 
01D0F0:  6D 6F 6E 74 3A 63 72 65 20 75 73 69 6E 67 20 22    mont:cre using "
01D100:  2A 2A 2A 2A 2A 2A 2E 39 39 22 0D 0A 40 20 31 35    ******.99"..@ 15
01D110:  2C 30 20 73 61 79 20 22 65 6E 72 65 67 69 73 74    ,0 say "enregist
01D120:  72 65 6D 65 6E 74 20 20 20 3A 20 73 75 69 76 61    rement   : suiva
01D130:  6E 74 20 20 20 20 5E 43 20 20 20 70 72 65 63 65    nt    ^C   prece
01D140:  64 65 6E 74 20 5E 52 22 0D 0A 40 20 31 36 2C 30    dent ^R"..@ 16,0
01D150:  20 73 61 79 20 22 63 68 61 6D 70 20 20 20 20 20     say "champ     
01D160:  20 20 20 20 20 20 20 3A 20 73 75 69 76 61 6E 74           : suivant
01D170:  20 20 20 20 5E 58 20 20 20 70 72 65 63 65 64 65        ^X   precede
01D180:  6E 74 20 5E 45 22 0D 0A 40 20 31 37 2C 30 20 73    nt ^E"..@ 17,0 s
01D190:  61 79 20 22 63 61 72 61 63 74 65 72 65 20 20 20    ay "caractere   
01D1A0:  20 20 20 20 20 3A 20 73 75 69 76 61 6E 74 20 20         : suivant  
01D1B0:  20 20 5E 44 20 20 20 70 72 65 63 65 64 65 6E 74      ^D   precedent
01D1C0:  20 5E 53 22 0D 0A 40 20 31 38 2C 30 20 73 61 79     ^S"..@ 18,0 say
01D1D0:  20 22 66 69 6E 20 6D 6F 64 69 66 69 63 61 74 69     "fin modificati
01D1E0:  6F 6E 20 3A 20 20 20 20 20 20 20 20 20 20 20 20    on :            
01D1F0:  5E 57 20 22 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ^W "............
01D200:  49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    I               
01D210:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01D220:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01D230:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D                  ;.
01D240:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
01D250:  20 20 49 22 0D 0A 40 20 31 32 2C 20 30 20 53 41      I"..@ 12, 0 SA
01D260:  59 20 22 49 20 4D 6F 64 69 66 69 63 61 74 69 6F    Y "I Modificatio
01D270:  6E 20 6F 75 20 63 6F 6E 73 75 6C 74 61 74 69 6F    n ou consultatio
01D280:  6E 20 64 65 73 20 64 65 6D 61 6E 64 65 73 20 64    n des demandes d
01D290:  27 61 63 68 61 74 20 3D 3D 3D 3D 3D 3D 3E 20 32    'achat ======> 2
01D2A0:  20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20     ;..            
01D2B0:  20 20 20 20 20 49 22 0D 0A 40 20 31 33 2C 20 30         I"..@ 13, 0
01D2C0:  20 53 41 59 20 22 49 20 20 20 20 20 20 20 20 20     SAY "I         
01D2D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01D2E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01D2F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01D300:  20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20        ;..         
01D310:  20 20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 34            I"..@ 14
01D320:  2C 20 30 20 53 41 59 20 22 49 20 46 69 6E 20 64    , 0 SAY "I Fin d
01D330:  65 20 74 72 61 69 74 65 6D 65 6E 74 20 20 20 20    e traitement    
01D340:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01D350:  20 20 20 20 20 20 20 20 20 20 20 20 20 3D 3D 3D                 ===
01D360:  3D 3D 3D 3E 20 46 20 3B 0D 0A 20 20 20 20 20 20    ===> F ;..      
01D370:  20 20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40               I"..@
01D380:  20 31 35 2C 20 30 20 53 41 59 20 22 49 20 20 20     15, 0 SAY "I   
01D390:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01D3A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01D3B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01D3C0:  20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20              ;..   
01D3D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 22                  I"
01D3E0:  0D 0A 40 20 31 36 2C 20 30 20 53 41 59 20 22 2B    ..@ 16, 0 SAY "+
01D3F0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
01D400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D4A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D4B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D4C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D4D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D4E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D4F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D500:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D510:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D520:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D530:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D540:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D550:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D560:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D570:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D580:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D590:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D5A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D5B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D5C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D5D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D5E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D5F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
01D600:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
01D610:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
01D620:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 3B 0D 0A    -------------;..
01D630:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
01D640:  2D 2B 22 0D 0A 40 20 31 37 2C 20 30 20 53 41 59    -+"..@ 17, 0 SAY
01D650:  20 22 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D     "+-------------
01D660:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 31    ---------+"..@ 1
01D670:  38 2C 20 30 20 53 41 59 20 22 49 20 52 65 70 6F    8, 0 SAY "I Repo
01D680:  6E 73 65 20 2D 2D 3E 20 20 20 20 20 20 20 20 20    nse -->         
01D690:  20 49 22 0D 0A 40 20 31 39 2C 20 30 20 53 41 59     I"..@ 19, 0 SAY
01D6A0:  20 22 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D     "+-------------
01D6B0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 31    ---------+"..@ 1
01D6C0:  38 2C 31 34 20 47 45 54 20 52 45 50 4F 4E 53 45    8,14 GET REPONSE
01D6D0:  32 0D 0A 52 45 41 44 0D 0A 2A 20 46 49 4E 20 44    2..READ..* FIN D
01D6E0:  55 20 54 52 41 49 54 45 4D 45 4E 54 20 53 49 20    U TRAITEMENT SI 
01D6F0:  4C 41 20 52 45 50 4F 4E 53 45 20 45 53 54 20 3A    LA REPONSE EST :
01D700:  20 22 46 22 0D 0A 49 46 20 21 28 52 45 50 4F 4E     "F"..IF !(REPON
01D710:  53 45 32 29 20 3D 20 27 46 27 0D 0A 51 55 49 54    SE2) = 'F'..QUIT
01D720:  0D 0A 45 4C 53 45 0D 0A 2A 20 54 52 41 49 54 45    ..ELSE..* TRAITE
01D730:  4D 45 4E 54 20 44 55 20 53 54 4F 43 4B 20 53 49    MENT DU STOCK SI
01D740:  20 4C 41 20 52 45 50 4F 4E 53 45 20 45 53 54 20     LA REPONSE EST 
01D750:  3A 20 22 31 22 0D 0A 09 49 46 20 52 45 50 4F 4E    : "1"...IF REPON
01D760:  53 45 32 20 3D 20 27 31 27 0D 0A 09 44 4F 20 54    SE2 = '1'...DO T
01D770:  52 41 53 54 4F 43 4B 0D 0A 09 45 4C 53 45 0D 0A    RASTOCK...ELSE..
01D780:  2A 20 54 52 41 49 54 45 4D 45 4E 54 20 44 45 53    * TRAITEMENT DES
01D790:  20 44 45 4D 41 4E 44 45 53 20 44 27 41 43 48 41     DEMANDES D'ACHA
01D7A0:  54 20 53 49 20 4C 41 20 52 45 50 4F 4E 53 45 20    T SI LA REPONSE 
01D7B0:  45 53 54 20 3A 20 22 32 22 0D 0A 09 09 49 46 20    EST : "2"....IF 
01D7C0:  52 45 50 4F 4E 53 45 32 20 3D 20 27 32 27 0D 0A    REPONSE2 = '2'..
01D7D0:  09 09 44 4F 20 54 52 41 44 41 0D 0A 09 09 45 4C    ..DO TRADA....EL
01D7E0:  53 45 0D 0A 2A 20 53 49 20 4C 41 20 52 45 50 4F    SE..* SI LA REPO
01D7F0:  4E 53 45 20 45 53 54 20 44 49 46 46 45 52 45 4E    NSE EST DIFFEREN
01D800:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01D810:  20 4D 4F 44 49 46 49 43 41 54 49 4F 4E 20 44 45     MODIFICATION DE
01D820:  20 44 45 4D 41 4E 44 45 53 20 44 27 41 43 48 41     DEMANDES D'ACHA
01D830:  54 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    T **************
01D840:  2A 0D 0A 0D 0A 53 45 54 20 45 58 41 43 54 20 4F    *....SET EXACT O
01D850:  4E 0D 0A 2A 20 44 45 46 49 4E 49 54 49 4F 4E 20    N..* DEFINITION 
01D860:  44 45 20 4C 41 20 42 41 53 45 20 50 52 49 4D 41    DE LA BASE PRIMA
01D870:  49 52 45 0D 0A 53 45 4C 45 43 54 20 50 52 49 4D    IRE..SELECT PRIM
01D880:  41 52 59 0D 0A 55 53 45 20 53 54 4F 43 4B 20 49    ARY..USE STOCK I
01D890:  4E 44 45 58 20 50 49 45 43 45 0D 0A 2A 20 44 45    NDEX PIECE..* DE
01D8A0:  46 49 4E 49 54 49 4F 4E 20 44 45 20 4C 41 20 42    FINITION DE LA B
01D8B0:  41 53 45 20 53 45 43 4F 4E 44 41 49 52 45 0D 0A    ASE SECONDAIRE..
01D8C0:  53 45 4C 45 43 54 20 53 45 43 4F 4E 44 41 52 59    SELECT SECONDARY
01D8D0:  0D 0A 55 53 45 20 44 41 20 49 4E 44 45 58 20 44    ..USE DA INDEX D
01D8E0:  41 0D 0A 53 54 4F 52 45 20 22 4E 4F 4E 22 20 54    A..STORE "NON" T
01D8F0:  4F 20 45 46 46 41 43 45 4D 45 4E 54 0D 0A 53 54    O EFFACEMENT..ST
01D900:  4F 52 45 20 27 4F 27 20 54 4F 20 43 4F 4E 54 41    ORE 'O' TO CONTA
01D910:  4A 0D 0A 44 4F 20 57 48 49 4C 45 20 43 4F 4E 54    J..DO WHILE CONT
01D920:  41 4A 20 3D 20 27 4F 27 0D 0A 43 4C 45 41 52 20    AJ = 'O'..CLEAR 
01D930:  47 45 54 53 0D 0A 53 45 4C 45 43 54 20 53 45 43    GETS..SELECT SEC
01D940:  4F 4E 44 41 52 59 0D 0A 53 54 4F 52 45 20 27 20    ONDARY..STORE ' 
01D950:  20 20 20 20 20 20 20 20 20 27 20 54 4F 20 4D 44             ' TO MD
01D960:  41 3A 4E 55 4D 0D 0A 2A 20 45 46 46 41 43 45 4D    A:NUM..* EFFACEM
01D970:  45 4E 54 20 44 45 53 20 44 49 46 46 45 52 45 4E    ENT DES DIFFEREN
01D980:  54 45 53 20 5A 4F 4E 45 53 20 44 45 20 53 41 49    TES ZONES DE SAI
01D990:  53 49 45 20 41 20 4C 27 45 43 52 41 4E 0D 0A 40    SIE A L'ECRAN..@
01D9A0:  20 35 2C 32 37 20 53 41 59 20 20 27 20 20 20 20     5,27 SAY  '    
01D9B0:  20 20 20 20 20 20 27 20 0D 0A 40 20 35 2C 34 37          ' ..@ 5,47
01D9C0:  20 53 41 59 20 22 20 20 20 20 20 20 20 20 20 20     SAY "          
01D9D0:  20 20 20 20 22 0D 0A 40 20 35 2C 36 36 20 53 41        "..@ 5,66 SA
01D9E0:  59 20 22 20 20 20 20 20 20 20 20 20 20 22 0D 0A    Y "          "..
01D9F0:  40 20 37 2C 31 31 20 53 41 59 20 20 27 20 20 20    @ 7,11 SAY  '   
01DA00:  54 45 20 44 45 20 22 31 22 2C 20 22 32 22 20 4F    TE DE "1", "2" O
01DA10:  55 20 22 46 22 20 2D 3E 20 4D 45 53 53 41 47 45    U "F" -> MESSAGE
01DA20:  20 44 27 45 52 52 45 55 52 0D 0A 09 09 09 40 20     D'ERREUR.....@ 
01DA30:  32 32 2C 30 20 53 41 59 20 27 56 4F 54 52 45 20    22,0 SAY 'VOTRE 
01DA40:  53 45 4C 45 43 54 49 4F 4E 20 45 53 54 20 49 4E    SELECTION EST IN
01DA50:  56 41 4C 49 44 45 2C 20 56 41 4C 49 44 45 5A 27    VALIDE, VALIDEZ'
01DA60:  0D 0A 2A 20 41 52 52 45 54 20 44 45 20 4C 27 41    ..* ARRET DE L'A
01DA70:  46 46 49 43 48 41 47 45 20 41 20 4C 27 45 43 52    FFICHAGE A L'ECR
01DA80:  41 4E 2C 20 50 4F 55 52 20 4E 45 20 50 41 53 20    AN, POUR NE PAS 
01DA90:  41 46 46 49 43 48 45 52 20 4C 45 20 4D 45 53 53    AFFICHER LE MESS
01DAA0:  41 47 45 0D 0A 2A 20 44 27 41 54 54 45 4E 54 45    AGE..* D'ATTENTE
01DAB0:  0D 0A 09 09 09 53 45 54 20 43 4F 4E 53 4F 4C 45    .....SET CONSOLE
01DAC0:  20 4F 46 46 0D 0A 09 09 09 57 41 49 54 0D 0A 2A     OFF.....WAIT..*
01DAD0:  20 41 4E 4E 55 4C 41 54 49 4F 4E 20 44 45 20 4C     ANNULATION DE L
01DAE0:  41 20 43 4F 4D 4D 41 4E 44 45 20 44 27 41 52 52    A COMMANDE D'ARR
01DAF0:  45 54 20 44 45 20 4C 27 41 46 46 49 43 48 41 47    ET DE L'AFFICHAG
01DB00:  45 2C 20 41 50 52 45 53 20 4C 41 20 53 41 49 53    E, APRES LA SAIS
01DB10:  49 45 0D 0A 2A 20 44 27 55 4E 20 43 41 52 41 43    IE..* D'UN CARAC
01DB20:  54 45 52 45 0D 0A 09 09 09 53 45 54 20 43 4F 4E    TERE.....SET CON
01DB30:  53 4F 4C 45 20 4F 4E 0D 0A 09 09 45 4E 44 49 46    SOLE ON....ENDIF
01DB40:  20 32 0D 0A 09 45 4E 44 49 46 20 31 0D 0A 45 4E     2...ENDIF 1..EN
01DB50:  44 49 46 20 46 0D 0A 45 4E 44 44 4F 20 4D 45 4E    DIF F..ENDDO MEN
01DB60:  55 32 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    U2..............
01DB70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01DB80:  20 31 35 2C 20 30 20 53 41 59 20 22 49 20 20 20     15, 0 SAY "I   
01DB90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DBA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DBB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DBC0:  20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20              ;..   
01DBD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 22                  I"
01DBE0:  0D 0A 40 20 31 36 2C 20 30 20 53 41 59 20 22 2B    ..@ 16, 0 SAY "+
01DBF0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
01DC00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
01DC10:  19 00 00 00 02 09 48 E5 19 00 C1 02 00 00 00 02    ......H.........
01DC20:  19 00 C6 02 00 00 00 02 19 00 C2 02 00 00 00 02    ................
01DC30:  19 00 C7 02 00 00 00 02 19 00 C3 02 00 00 00 02    ................
01DC40:  19 00 C8 02 00 00 00 02 19 00 C4 02 00 00 00 02    ................
01DC50:  19 00 C9 02 00 00 00 02 19 00 C5 02 00 00 00 02    ................
01DC60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DC70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DC80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DC90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DCF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01DD00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DD10:  20 20 20 20 20 20 20 20 27 0D 0A 40 20 38 2C 34            '..@ 8,4
01DD20:  35 20 53 41 59 20 20 27 20 20 20 20 20 20 20 20    5 SAY  '        
01DD30:  20 20 20 20 20 20 20 20 20 27 20 0D 0A 40 20 39             ' ..@ 9
01DD40:  2C 31 31 20 53 41 59 20 20 27 20 20 20 20 20 20    ,11 SAY  '      
01DD50:  20 20 27 20 0D 0A 40 20 31 34 2C 32 20 53 41 59      ' ..@ 14,2 SAY
01DD60:  20 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20     '              
01DD70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DD80:  20 20 20 20 20 20 20 20 20 20 20 20 27 0D 0A 40                '..@
01DD90:  20 31 34 2C 34 36 20 53 41 59 20 27 20 20 20 20     14,46 SAY '    
01DDA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DDB0:  20 20 20 20 20 27 0D 0A 40 20 31 38 2C 31 20 53         '..@ 18,1 S
01DDC0:  41 59 20 20 27 20 20 20 20 20 20 20 20 20 20 20    AY  '           
01DDD0:  20 27 20 0D 0A 40 20 31 38 2C 31 34 20 53 41 59     ' ..@ 18,14 SAY
01DDE0:  20 27 20 20 20 20 20 20 20 20 20 20 20 20 20 20     '              
01DDF0:  27 20 0D 0A 40 20 31 38 2C 33 31 20 53 41 59 20    ' ..@ 18,31 SAY 
01DE00:  27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    '               
01DE10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DE20:  20 20 20 27 20 0D 0A 40 20 31 38 2C 36 37 20 53       ' ..@ 18,67 S
01DE30:  41 59 20 27 20 20 20 20 20 20 20 20 20 20 20 20    AY '            
01DE40:  27 20 0D 0A 40 20 32 30 2C 31 33 20 53 41 59 20    ' ..@ 20,13 SAY 
01DE50:  27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    '               
01DE60:  20 20 20 20 20 20 20 20 20 20 20 20 27 20 0D 0A                ' ..
01DE70:  40 20 32 30 2C 37 31 20 53 41 59 20 27 20 20 20    @ 20,71 SAY '   
01DE80:  20 20 27 0D 0A 40 20 32 32 2C 30 20 53 41 59 20      '..@ 22,0 SAY 
01DE90:  27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    '               
01DEA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DEB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DEC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A                 ;..
01DED0:  20 20 20 20 20 20 20 20 20 27 0D 0A 40 20 32 33             '..@ 23
01DEE0:  2C 30 20 53 41 59 20 27 20 20 20 20 20 20 20 20    ,0 SAY '        
01DEF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DF00:  20 47 45 54 20 4D 50 52 49 58 3A 55 48 54 20 20     GET MPRIX:UHT  
01DF10:  20 20 20 20 20 0D 0A 20 20 20 20 20 20 20 20 20         ..         
01DF20:  20 20 20 20 20 20 20 40 20 32 30 2C 31 33 20 47           @ 20,13 G
01DF30:  45 54 20 4D 49 4D 50 55 54 41 54 49 4F 20 20 20    ET MIMPUTATIO   
01DF40:  20 20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20       ..           
01DF50:  20 20 20 20 20 40 20 32 30 2C 37 32 20 47 45 54         @ 20,72 GET
01DF60:  20 4D 44 45 4C 41 49 20 50 49 43 54 55 52 45 20     MDELAI PICTURE 
01DF70:  22 39 39 22 0D 0A 20 20 20 20 20 20 20 20 20 20    "99"..          
01DF80:  20 20 20 20 20 20 52 45 41 44 20 20 20 20 20 20          READ      
01DF90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DFA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01DFB0:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 0D 0A 0D               .....
01DFC0:  0A 2A 20 53 49 20 41 55 43 55 4E 45 20 4D 4F 44    .* SI AUCUNE MOD
01DFD0:  49 46 49 43 41 54 49 4F 4E 20 4E 27 41 20 45 54    IFICATION N'A ET
01DFE0:  45 20 45 46 46 45 43 54 55 45 45 20 2D 3E 20 45    E EFFECTUEE -> E
01DFF0:  46 46 41 43 45 4D 45 4E 54 20 4F 55 49 2F 4E 4F    FFACEMENT OUI/NO
01E000:  4E 20 3F 0D 0A 0D 0A 09 09 20 20 20 20 49 46 20    N ?......    IF 
01E010:  4D 44 41 3A 44 41 54 45 3D 53 2E 44 41 3A 44 41    MDA:DATE=S.DA:DA
01E020:  54 45 20 2E 41 4E 44 2E 20 4D 43 4D 44 3A 4E 55    TE .AND. MCMD:NU
01E030:  4D 3D 53 2E 43 4D 44 3A 4E 55 4D 20 2E 41 4E 44    M=S.CMD:NUM .AND
01E040:  2E 20 3B 0D 0A 4D 43 4D 44 3A 44 41 54 45 3D 53    . ;..MCMD:DATE=S
01E050:  2E 43 4D 44 3A 44 41 54 45 20 2E 41 4E 44 2E 20    .CMD:DATE .AND. 
01E060:  4D 45 4D 45 54 54 45 55 52 3D 53 2E 45 4D 45 54    MEMETTEUR=S.EMET
01E070:  54 45 55 52 20 2E 41 4E 44 2E 20 4D 53 45 43 54    TEUR .AND. MSECT
01E080:  49 4F 4E 3D 53 2E 53 45 43 54 49 4F 4E 20 3B 0D    ION=S.SECTION ;.
01E090:  0A 20 2E 41 4E 44 2E 20 4D 54 59 50 45 3D 53 2E    . .AND. MTYPE=S.
01E0A0:  54 59 50 45 20 2E 41 4E 44 2E 20 4D 46 4F 55 52    TYPE .AND. MFOUR
01E0B0:  4E 49 3D 53 2E 46 4F 55 52 4E 49 20 2E 41 4E 44    NI=S.FOURNI .AND
01E0C0:  2E 20 4D 51 54 45 3A 43 4D 44 3D 53 2E 51 54 45    . MQTE:CMD=S.QTE
01E0D0:  3A 43 4D 44 20 3B 0D 0A 20 2E 41 4E 44 2E 20 4D    :CMD ;.. .AND. M
01E0E0:  50 52 49 58 3A 55 48 54 3D 53 2E 50 52 49 58 3A    PRIX:UHT=S.PRIX:
01E0F0:  55 48 54 20 2E 41 4E 44 2E 20 4D 49 4D 50 55 54    UHT .AND. MIMPUT
01E100:  20 20 20 20 20 20 20 20 27 0D 0A 2A 20 53 41 49            '..* SAI
01E110:  53 49 45 20 44 55 20 4E 55 4D 45 52 4F 20 44 45    SIE DU NUMERO DE
01E120:  20 4C 41 20 44 45 4D 41 4E 44 45 20 44 27 41 43     LA DEMANDE D'AC
01E130:  48 41 54 0D 0A 40 20 35 2C 31 30 20 47 45 54 20    HAT..@ 5,10 GET 
01E140:  4D 44 41 3A 4E 55 4D 0D 0A 52 45 41 44 0D 0A 2A    MDA:NUM..READ..*
01E150:  20 53 49 20 41 55 43 55 4E 20 4E 55 4D 45 52 4F     SI AUCUN NUMERO
01E160:  20 4E 27 45 53 54 20 53 41 49 53 49 20 2D 3E 20     N'EST SAISI -> 
01E170:  52 45 54 4F 55 52 20 41 55 20 4D 45 4E 55 20 54    RETOUR AU MENU T
01E180:  52 41 49 54 45 4D 45 4E 54 20 44 45 53 20 44 2E    RAITEMENT DES D.
01E190:  41 2E 0D 0A 49 46 20 4D 44 41 3A 4E 55 4D 20 3D    A...IF MDA:NUM =
01E1A0:  20 27 20 27 0D 0A 53 45 54 20 45 58 41 43 54 20     ' '..SET EXACT 
01E1B0:  4F 46 46 0D 0A 49 46 20 45 46 46 41 43 45 4D 45    OFF..IF EFFACEME
01E1C0:  4E 54 3D 22 4F 55 49 22 0D 0A 40 20 32 32 2C 30    NT="OUI"..@ 22,0
01E1D0:  20 53 41 59 20 22 50 72 69 73 65 20 65 6E 20 63     SAY "Prise en c
01E1E0:  6F 6D 70 74 65 20 64 65 73 20 6D 6F 64 69 66 69    ompte des modifi
01E1F0:  63 61 74 69 6F 6E 73 20 65 6E 20 63 6F 75 72 73    cations en cours
01E200:  2E 22 0D 0A 40 20 32 33 2C 30 20 53 41 59 20 22    ."..@ 23,0 SAY "
01E210:  56 65 75 69 6C 6C 65 7A 20 70 61 74 69 65 6E 74    Veuillez patient
01E220:  65 72 20 71 75 65 6C 71 75 65 73 20 69 6E 73 74    er quelques inst
01E230:  61 6E 74 73 20 2E 2E 2E 2E 2E 2E 22 0D 0A 50 41    ants ......"..PA
01E240:  43 4B 0D 0A 45 4E 44 49 46 0D 0A 52 45 4C 45 41    CK..ENDIF..RELEA
01E250:  53 45 20 4D 44 41 3A 4E 55 4D 2C 4D 44 41 3A 44    SE MDA:NUM,MDA:D
01E260:  41 54 45 2C 4D 54 59 50 45 2C 4D 45 4D 45 54 54    ATE,MTYPE,MEMETT
01E270:  45 55 52 2C 4D 53 45 43 54 49 4F 4E 2C 4D 46 4F    EUR,MSECTION,MFO
01E280:  55 52 4E 49 2C 4D 50 49 45 43 45 0D 0A 52 45 4C    URNI,MPIECE..REL
01E290:  45 41 53 45 20 4D 51 54 45 3A 43 4D 44 2C 4D 49    EASE MQTE:CMD,MI
01E2A0:  4D 50 55 54 41 54 49 4F 2C 4D 44 45 4C 41 49 2C    MPUTATIO,MDELAI,
01E2B0:  4D 50 52 49 58 3A 55 48 54 2C 45 46 46 41 43 45    MPRIX:UHT,EFFACE
01E2C0:  4D 45 4E 54 0D 0A 52 45 4C 45 41 53 45 20 4D 43    MENT..RELEASE MC
01E2D0:  4D 44 3A 4E 55 4D 2C 4D 43 4D 44 3A 44 41 54 45    MD:NUM,MCMD:DATE
01E2E0:  2C 52 45 50 4F 4E 53 45 0D 0A 52 45 54 55 52 4E    ,REPONSE..RETURN
01E2F0:  0D 0A 45 4C 53 45 0D 0A 2A 20 52 45 43 48 45 52    ..ELSE..* RECHER
01E300:  41 54 49 4F 3D 53 2E 49 4D 50 55 54 41 54 49 4F    ATIO=S.IMPUTATIO
01E310:  4E 20 2E 41 4E 44 2E 20 3B 0D 0A 56 41 4C 28 4D    N .AND. ;..VAL(M
01E320:  44 45 4C 41 49 29 3D 44 45 4C 41 49 0D 0A 09 09    DELAI)=DELAI....
01E330:  20 20 20 20 53 54 4F 52 45 20 22 4E 22 20 54 4F        STORE "N" TO
01E340:  20 52 45 50 4F 4E 53 45 0D 0A 09 09 20 20 20 20     REPONSE....    
01E350:  40 20 32 32 2C 30 20 53 41 59 20 22 56 6F 75 6C    @ 22,0 SAY "Voul
01E360:  65 7A 2D 76 6F 75 73 20 6C 27 65 66 66 61 63 65    ez-vous l'efface
01E370:  72 20 3F 20 28 4F 2F 4E 29 20 22 20 47 45 54 20    r ? (O/N) " GET 
01E380:  52 45 50 4F 4E 53 45 0D 0A 09 09 20 20 20 20 52    REPONSE....    R
01E390:  45 41 44 0D 0A 09 09 09 49 46 20 52 45 50 4F 4E    EAD.....IF REPON
01E3A0:  53 45 20 3D 20 22 4F 22 0D 0A 09 09 09 09 49 46    SE = "O"......IF
01E3B0:  20 51 54 45 3A 52 45 53 54 45 2D 51 54 45 3A 43     QTE:RESTE-QTE:C
01E3C0:  4D 44 20 3C 20 30 0D 0A 09 09 09 09 40 20 32 32    MD < 0......@ 22
01E3D0:  2C 30 20 53 41 59 20 22 54 6F 75 74 65 20 6F 75    ,0 SAY "Toute ou
01E3E0:  20 70 61 72 74 69 65 20 64 65 20 63 65 74 74 65     partie de cette
01E3F0:  20 3B 0D 0A 63 6F 6D 6D 61 6E 64 65 20 65 73 74     ;..commande est
01E400:  20 6C 69 76 72 65 65 22 0D 0A 09 09 09 09 40 20     livree"......@ 
01E410:  32 33 2C 30 20 53 41 59 20 22 45 66 66 61 63 65    23,0 SAY "Efface
01E420:  6D 65 6E 74 20 69 6D 70 6F 73 73 69 62 6C 65 2C    ment impossible,
01E430:  20 56 61 6C 69 64 65 7A 20 2E 22 0D 0A 09 09 09     Validez .".....
01E440:  09 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 46 46    .SET CONSOLE OFF
01E450:  0D 0A 09 09 09 09 57 41 49 54 0D 0A 09 09 09 09    ......WAIT......
01E460:  53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 4E 0D 0A    SET CONSOLE ON..
01E470:  09 09 09 09 40 20 32 32 2C 30 20 53 41 59 20 22    ....@ 22,0 SAY "
01E480:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E490:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E4A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A                 "..
01E4B0:  09 09 09 09 40 20 32 33 2C 30 20 53 41 59 20 22    ....@ 23,0 SAY "
01E4C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E4D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E4E0:  20 20 22 0D 0A 09 09 09 09 45 4C 53 45 0D 0A 09      "......ELSE...
01E4F0:  09 09 09 53 45 4C 45 43 54 20 53 45 43 4F 4E 44    ...SELECT SECOND
01E500:  43 48 45 20 4C 27 45 58 49 53 54 45 4E 43 45 20    CHE L'EXISTENCE 
01E510:  44 45 20 4C 41 20 44 45 4D 41 4E 44 45 20 44 27    DE LA DEMANDE D'
01E520:  41 43 48 41 54 20 53 41 49 53 49 45 20 44 41 4E    ACHAT SAISIE DAN
01E530:  53 20 4C 41 20 42 41 53 45 20 53 45 43 4F 4E 44    S LA BASE SECOND
01E540:  41 49 52 45 0D 0A 53 45 4C 45 43 54 20 53 45 43    AIRE..SELECT SEC
01E550:  4F 4E 44 41 52 59 0D 0A 46 49 4E 44 20 26 4D 44    ONDARY..FIND &MD
01E560:  41 3A 4E 55 4D 0D 0A 09 49 46 20 23 20 3D 20 30    A:NUM...IF # = 0
01E570:  20 2E 4F 52 2E 20 2A 20 0D 0A 09 40 20 32 32 2C     .OR. * ...@ 22,
01E580:  30 20 53 41 59 20 27 4C 61 20 44 2E 41 2E 20 27    0 SAY 'La D.A. '
01E590:  0D 0A 09 40 20 32 32 2C 39 20 53 41 59 20 4D 44    ...@ 22,9 SAY MD
01E5A0:  41 3A 4E 55 4D 0D 0A 09 40 20 32 32 2C 32 31 20    A:NUM...@ 22,21 
01E5B0:  53 41 59 20 27 6E 65 20 66 69 67 75 72 65 20 70    SAY 'ne figure p
01E5C0:  61 73 20 64 61 6E 73 20 6C 65 20 66 69 63 68 69    as dans le fichi
01E5D0:  65 72 2C 20 56 61 6C 69 64 65 7A 27 0D 0A 09 53    er, Validez'...S
01E5E0:  45 54 20 43 4F 4E 53 4F 4C 45 20 4F 46 46 0D 0A    ET CONSOLE OFF..
01E5F0:  09 57 41 49 54 0D 0A 09 53 45 54 20 43 4F 4E 53    .WAIT...SET CONS
01E600:  4F 4C 45 20 4F 4E 0D 0A 20 20 20 20 20 20 20 20    OLE ON..        
01E610:  45 4C 53 45 20 20 20 20 20 20 20 20 20 20 20 20    ELSE            
01E620:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E630:  20 20 20 20 20 20 20 20 20 20 0D 0A 2A 20 52 45              ..* RE
01E640:  43 48 45 52 43 48 45 20 4C 27 45 58 49 53 54 45    CHERCHE L'EXISTE
01E650:  4E 43 45 20 44 45 20 4C 41 20 52 45 46 45 52 45    NCE DE LA REFERE
01E660:  4E 43 45 20 53 41 49 53 49 45 20 44 41 4E 53 20    NCE SAISIE DANS 
01E670:  4C 41 20 42 41 53 45 20 50 52 49 4D 41 49 52 45    LA BASE PRIMAIRE
01E680:  0D 0A 09 53 45 4C 45 43 54 20 50 52 49 4D 41 52    ...SELECT PRIMAR
01E690:  59 0D 0A 09 53 54 4F 52 45 20 53 2E 50 49 45 43    Y...STORE S.PIEC
01E6A0:  45 20 54 4F 20 4D 50 49 45 43 45 0D 0A 09 46 49    E TO MPIECE...FI
01E6B0:  4E 44 20 26 4D 50 49 45 43 45 0D 0A 09 09 49 46    ND &MPIECE....IF
01E6C0:  20 23 20 3D 20 30 0D 0A 09 09 40 20 31 38 2C 31     # = 0....@ 18,1
01E6D0:  34 20 53 41 59 20 4D 50 49 45 43 45 09 0D 0A 09    4 SAY MPIECE....
01E6E0:  09 40 20 32 32 2C 30 20 53 41 59 20 22 4C 61 20    .@ 22,0 SAY "La 
01E6F0:  70 69 65 63 65 20 22 0D 0A 09 09 40 20 32 32 2C    piece "....@ 22,
01E700:  41 52 59 0D 0A 09 09 09 09 53 54 4F 52 45 20 22    ARY......STORE "
01E710:  4F 55 49 22 20 54 4F 20 45 46 46 41 43 45 4D 45    OUI" TO EFFACEME
01E720:  4E 54 0D 0A 09 09 09 09 44 45 4C 45 54 45 0D 0A    NT......DELETE..
01E730:  09 09 09 09 53 45 4C 45 43 54 20 50 52 49 4D 41    ....SELECT PRIMA
01E740:  52 59 0D 0A 09 09 09 09 52 45 50 4C 41 43 45 20    RY......REPLACE 
01E750:  50 2E 44 41 3A 4E 55 4D 20 57 49 54 48 20 22 20    P.DA:NUM WITH " 
01E760:  20 20 20 20 20 20 20 20 20 22 0D 0A 09 09 09 09             "......
01E770:  52 45 50 4C 41 43 45 20 51 54 45 3A 52 45 53 54    REPLACE QTE:REST
01E780:  45 20 57 49 54 48 20 51 54 45 3A 52 45 53 54 45    E WITH QTE:RESTE
01E790:  20 2D 20 51 54 45 3A 43 4D 44 0D 0A 09 09 09 09     - QTE:CMD......
01E7A0:  45 4E 44 49 46 0D 0A 09 09 09 45 4E 44 49 46 0D    ENDIF.....ENDIF.
01E7B0:  0A 09 09 20 20 20 20 45 4C 53 45 0D 0A 09 09 20    ...    ELSE.... 
01E7C0:  20 20 20 20 49 46 20 51 54 45 3A 52 45 53 54 45        IF QTE:RESTE
01E7D0:  2D 51 54 45 3A 43 4D 44 20 3C 20 30 0D 0A 09 09    -QTE:CMD < 0....
01E7E0:  20 20 20 20 20 40 20 32 32 2C 30 20 53 41 59 20         @ 22,0 SAY 
01E7F0:  22 54 6F 75 74 65 20 6F 75 20 70 61 72 74 69 65    "Toute ou partie
01E800:  20 64 65 20 63 65 74 74 65 20 63 6F 6D 6D 61 6E     de cette comman
01E810:  64 65 20 65 73 74 20 6C 69 76 72 65 65 22 0D 0A    de est livree"..
01E820:  09 09 20 20 20 20 20 40 20 32 33 2C 30 20 53 41    ..     @ 23,0 SA
01E830:  59 20 22 4D 6F 64 69 66 69 63 61 74 69 6F 6E 20    Y "Modification 
01E840:  69 6D 70 6F 73 73 69 62 6C 65 2C 20 56 61 6C 69    impossible, Vali
01E850:  64 65 7A 20 2E 22 0D 0A 09 09 20 20 20 20 20 53    dez ."....     S
01E860:  45 54 20 43 4F 4E 53 4F 4C 45 20 4F 46 46 0D 0A    ET CONSOLE OFF..
01E870:  09 09 20 20 20 20 20 57 41 49 54 0D 0A 09 09 20    ..     WAIT.... 
01E880:  20 20 20 20 53 45 54 20 43 4F 4E 53 4F 4C 45 20        SET CONSOLE 
01E890:  4F 4E 0D 0A 09 09 20 20 20 20 20 40 20 32 32 2C    ON....     @ 22,
01E8A0:  30 20 53 41 59 20 22 20 20 20 20 20 20 20 20 20    0 SAY "         
01E8B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E8C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E8D0:  20 20 20 20 22 0D 0A 09 09 20 20 20 20 20 40 20        "....     @ 
01E8E0:  32 33 2C 30 20 53 41 59 20 22 20 20 20 20 20 20    23,0 SAY "      
01E8F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01E900:  20 39 20 53 41 59 20 4D 50 49 45 43 45 0D 0A 09     9 SAY MPIECE...
01E910:  09 40 20 32 32 2C 32 31 20 53 41 59 20 22 20 6E    .@ 22,21 SAY " n
01E920:  65 20 66 69 67 75 72 65 20 70 6C 75 73 20 64 61    e figure plus da
01E930:  6E 73 20 6C 65 20 66 69 63 68 69 65 72 22 0D 0A    ns le fichier"..
01E940:  09 09 40 20 32 33 2C 30 20 53 41 59 20 22 4D 6F    ..@ 23,0 SAY "Mo
01E950:  64 69 66 69 63 61 74 69 6F 6E 20 69 6D 70 6F 73    dification impos
01E960:  73 69 62 6C 65 22 0D 0A 09 09 53 45 54 20 43 4F    sible"....SET CO
01E970:  4E 53 4F 4C 45 20 4F 46 46 0D 0A 09 09 57 41 49    NSOLE OFF....WAI
01E980:  54 0D 0A 09 09 53 45 54 20 43 4F 4E 53 4F 4C 45    T....SET CONSOLE
01E990:  20 4F 4E 0D 0A 09 09 45 4C 53 45 0D 0A 20 20 20     ON....ELSE..   
01E9A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 40 20 31                 @ 1
01E9B0:  34 2C 34 36 20 53 41 59 20 50 2E 4D 41 43 48 49    4,46 SAY P.MACHI
01E9C0:  4E 45 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20    NE        ..    
01E9D0:  20 20 20 20 20 20 20 20 20 20 20 20 40 20 31 38                @ 18
01E9E0:  2C 33 31 20 53 41 59 20 50 2E 4C 49 42 45 4C 4C    ,31 SAY P.LIBELL
01E9F0:  45 20 20 20 20 20 20 20 20 0D 0A 09 09 53 45 4C    E        ....SEL
01EA00:  45 43 54 20 53 45 43 4F 4E 44 41 52 59 0D 0A 09    ECT SECONDARY...
01EA10:  09 53 54 4F 52 45 20 53 2E 44 41 3A 44 41 54 45    .STORE S.DA:DATE
01EA20:  20 54 4F 20 4D 44 41 3A 44 41 54 45 0D 0A 09 09     TO MDA:DATE....
01EA30:  53 54 4F 52 45 20 53 2E 43 4D 44 3A 4E 55 4D 20    STORE S.CMD:NUM 
01EA40:  54 4F 20 4D 43 4D 44 3A 4E 55 4D 0D 0A 09 09 53    TO MCMD:NUM....S
01EA50:  54 4F 52 45 20 53 2E 43 4D 44 3A 44 41 54 45 20    TORE S.CMD:DATE 
01EA60:  54 4F 20 4D 43 4D 44 3A 44 41 54 45 0D 0A 09 09    TO MCMD:DATE....
01EA70:  53 54 4F 52 45 20 53 2E 54 59 50 45 20 54 4F 20    STORE S.TYPE TO 
01EA80:  4D 54 59 50 45 0D 0A 09 09 53 54 4F 52 45 20 53    MTYPE....STORE S
01EA90:  2E 45 4D 45 54 54 45 55 52 20 54 4F 20 4D 45 4D    .EMETTEUR TO MEM
01EAA0:  45 54 54 45 55 52 0D 0A 09 09 53 54 4F 52 45 20    ETTEUR....STORE 
01EAB0:  53 2E 53 45 43 54 49 4F 4E 20 54 4F 20 4D 53 45    S.SECTION TO MSE
01EAC0:  43 54 49 4F 4E 0D 0A 09 09 53 54 4F 52 45 20 53    CTION....STORE S
01EAD0:  2E 46 4F 55 52 4E 49 20 54 4F 20 4D 46 4F 55 52    .FOURNI TO MFOUR
01EAE0:  4E 49 0D 0A 09 09 53 54 4F 52 45 20 53 2E 51 54    NI....STORE S.QT
01EAF0:  45 3A 43 4D 44 20 54 4F 20 4D 51 54 45 3A 43 4D    E:CMD TO MQTE:CM
01EB00:  20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A 09                "...
01EB10:  09 20 20 20 20 20 45 4C 53 45 0D 0A 0D 0A 2A 20    .     ELSE....* 
01EB20:  4D 49 53 45 20 41 20 4A 4F 55 52 20 44 45 20 4C    MISE A JOUR DE L
01EB30:  41 20 52 45 46 45 52 45 4E 43 45 20 43 4F 4E 43    A REFERENCE CONC
01EB40:  45 52 4E 45 45 20 44 41 4E 53 20 4C 41 20 42 41    ERNEE DANS LA BA
01EB50:  53 45 20 50 52 49 4D 41 49 52 45 0D 0A 2A 20 42    SE PRIMAIRE..* B
01EB60:  41 53 45 20 50 52 49 4D 41 49 52 45 20 3D 20 42    ASE PRIMAIRE = B
01EB70:  41 53 45 20 44 55 20 53 54 4F 43 4B 20 44 45 53    ASE DU STOCK DES
01EB80:  20 50 49 45 43 45 53 20 44 45 54 41 43 48 45 45     PIECES DETACHEE
01EB90:  53 0D 0A 09 09 20 20 20 20 53 45 4C 45 43 54 20    S....    SELECT 
01EBA0:  50 52 49 4D 41 52 59 0D 0A 09 09 20 20 20 20 52    PRIMARY....    R
01EBB0:  45 50 4C 41 43 45 20 51 54 45 3A 52 45 53 54 45    EPLACE QTE:RESTE
01EBC0:  20 57 49 54 48 20 50 2E 51 54 45 3A 52 45 53 54     WITH P.QTE:REST
01EBD0:  45 20 2B 20 28 4D 51 54 45 3A 43 4D 44 20 2D 20    E + (MQTE:CMD - 
01EBE0:  53 2E 51 54 45 3A 43 4D 44 29 0D 0A 20 20 20 20    S.QTE:CMD)..    
01EBF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01EC00:  52 45 50 4C 41 43 45 20 51 54 45 3A 43 4D 44 20    REPLACE QTE:CMD 
01EC10:  57 49 54 48 20 4D 51 54 45 3A 43 4D 44 20 20 20    WITH MQTE:CMD   
01EC20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01EC30:  20 20 20 20 20 0D 0A 20 20 20 20 20 20 20 20 20         ..         
01EC40:  20 20 20 20 20 20 20 20 20 20 20 52 45 50 4C 41               REPLA
01EC50:  43 45 20 50 52 49 58 3A 55 48 54 20 57 49 54 48    CE PRIX:UHT WITH
01EC60:  20 4D 50 52 49 58 3A 55 48 54 20 20 20 20 20 20     MPRIX:UHT      
01EC70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01EC80:  0D 0A 2A 20 45 4E 52 45 47 49 53 54 52 45 4D 45    ..* ENREGISTREME
01EC90:  4E 54 20 44 45 20 4C 41 20 44 45 4D 41 4E 44 45    NT DE LA DEMANDE
01ECA0:  20 44 27 41 43 48 41 54 20 44 41 4E 53 20 4C 41     D'ACHAT DANS LA
01ECB0:  20 42 41 53 45 20 53 45 43 4F 4E 44 41 49 52 45     BASE SECONDAIRE
01ECC0:  0D 0A 2A 20 42 41 53 45 20 53 45 43 4F 4E 44 41    ..* BASE SECONDA
01ECD0:  49 52 45 20 3D 20 42 41 53 45 20 44 45 53 20 44    IRE = BASE DES D
01ECE0:  45 4D 41 4E 44 45 53 20 44 27 41 43 48 41 54 0D    EMANDES D'ACHAT.
01ECF0:  0A 09 09 20 20 20 20 53 45 4C 45 43 54 20 53 45    ...    SELECT SE
01ED00:  44 0D 0A 09 09 53 54 4F 52 45 20 53 2E 49 4D 50    D....STORE S.IMP
01ED10:  55 54 41 54 49 4F 4E 20 54 4F 20 4D 49 4D 50 55    UTATION TO MIMPU
01ED20:  54 41 54 49 4F 0D 0A 09 09 53 54 4F 52 45 20 53    TATIO....STORE S
01ED30:  54 52 28 53 2E 44 45 4C 41 49 2C 32 29 20 54 4F    TR(S.DELAI,2) TO
01ED40:  20 4D 44 45 4C 41 49 20 20 20 20 20 20 20 20 0D     MDELAI        .
01ED50:  0A 09 09 53 54 4F 52 45 20 53 2E 50 52 49 58 3A    ...STORE S.PRIX:
01ED60:  55 48 54 20 54 4F 20 4D 50 52 49 58 3A 55 48 54    UHT TO MPRIX:UHT
01ED70:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
01ED80:  20 20 40 20 35 2C 32 37 20 47 45 54 20 4D 44 41      @ 5,27 GET MDA
01ED90:  3A 44 41 54 45 20 50 49 43 54 55 52 45 20 22 39    :DATE PICTURE "9
01EDA0:  39 2F 39 39 2F 39 39 22 0D 0A 09 09 40 20 35 2C    9/99/99"....@ 5,
01EDB0:  34 37 20 47 45 54 20 4D 43 4D 44 3A 4E 55 4D 0D    47 GET MCMD:NUM.
01EDC0:  0A 09 09 40 20 35 2C 36 36 20 47 45 54 20 4D 43    ...@ 5,66 GET MC
01EDD0:  4D 44 3A 44 41 54 45 20 50 49 43 54 55 52 45 20    MD:DATE PICTURE 
01EDE0:  22 39 39 2F 39 39 2F 39 39 22 0D 0A 20 20 20 20    "99/99/99"..    
01EDF0:  20 20 20 20 20 20 20 20 20 20 20 20 40 20 37 2C                @ 7,
01EE00:  31 31 20 47 45 54 20 4D 45 4D 45 54 54 45 55 52    11 GET MEMETTEUR
01EE10:  20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20 20            ..      
01EE20:  20 20 20 20 20 20 20 20 20 20 40 20 39 2C 31 31              @ 9,11
01EE30:  20 47 45 54 20 4D 53 45 43 54 49 4F 4E 20 20 20     GET MSECTION   
01EE40:  20 20 20 20 20 20 0D 0A 20 20 20 20 20 20 20 20          ..        
01EE50:  20 20 20 20 20 20 20 20 40 20 38 2C 34 35 20 47            @ 8,45 G
01EE60:  45 54 20 4D 54 59 50 45 20 20 20 20 20 20 20 20    ET MTYPE        
01EE70:  20 20 20 20 0D 0A 20 20 20 20 20 20 20 20 20 20        ..          
01EE80:  20 20 20 20 20 20 40 20 31 34 2C 32 20 47 45 54          @ 14,2 GET
01EE90:  20 4D 46 4F 55 52 4E 49 20 20 20 20 20 20 20 20     MFOURNI        
01EEA0:  20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20      ..            
01EEB0:  20 20 20 20 40 20 31 38 2C 31 20 47 45 54 20 4D        @ 18,1 GET M
01EEC0:  51 54 45 3A 43 4D 44 20 20 20 20 20 20 20 20 20    QTE:CMD         
01EED0:  0D 0A 09 09 40 20 31 38 2C 31 34 20 53 41 59 20    ....@ 18,14 SAY 
01EEE0:  4D 50 49 45 43 45 09 0D 0A 20 20 20 20 20 20 20    MPIECE...       
01EEF0:  20 20 20 20 20 20 20 20 20 40 20 31 38 2C 36 37             @ 18,67
01EF00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
01EF10:  1A 00 00 00 02 09 48 E5 1A 00 C1 02 00 00 00 02    ......H.........
01EF20:  1A 00 C6 02 00 00 00 02 1A 00 C2 02 00 00 00 02    ................
01EF30:  1A 00 C7 02 00 00 00 02 1A 00 C3 02 00 00 00 02    ................
01EF40:  1A 00 C8 02 00 00 00 02 1A 00 C4 02 00 00 00 02    ................
01EF50:  1A 00 C9 02 00 00 00 02 1A 00 C5 02 00 00 00 02    ................
01EF60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EF70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EF80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EF90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01EFF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
01F000:  43 4F 4E 44 41 52 59 0D 0A 20 20 20 20 20 20 20    CONDARY..       
01F010:  20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 50                 REP
01F020:  4C 41 43 45 20 44 41 3A 44 41 54 45 20 57 49 54    LACE DA:DATE WIT
01F030:  48 20 4D 44 41 3A 44 41 54 45 20 20 20 20 20 20    H MDA:DATE      
01F040:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F050:  20 20 0D 0A 09 09 20 20 20 20 52 45 50 4C 41 43      ....    REPLAC
01F060:  45 20 43 4D 44 3A 4E 55 4D 20 57 49 54 48 20 4D    E CMD:NUM WITH M
01F070:  43 4D 44 3A 4E 55 4D 0D 0A 09 09 20 20 20 20 52    CMD:NUM....    R
01F080:  45 50 4C 41 43 45 20 43 4D 44 3A 44 41 54 45 20    EPLACE CMD:DATE 
01F090:  57 49 54 48 20 4D 43 4D 44 3A 44 41 54 45 0D 0A    WITH MCMD:DATE..
01F0A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F0B0:  20 20 20 20 52 45 50 4C 41 43 45 20 45 4D 45 54        REPLACE EMET
01F0C0:  54 45 55 52 20 57 49 54 48 20 4D 45 4D 45 54 54    TEUR WITH MEMETT
01F0D0:  45 55 52 20 20 20 20 20 20 20 20 20 20 20 20 20    EUR             
01F0E0:  20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20             ..     
01F0F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52                   R
01F100:  45 50 4C 41 43 45 20 53 45 43 54 49 4F 4E 20 57    EPLACE SECTION W
01F110:  49 54 48 20 4D 53 45 43 54 49 4F 4E 20 20 20 20    ITH MSECTION    
01F120:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F130:  20 20 20 20 0D 0A 20 20 20 20 20 20 20 20 20 20        ..          
01F140:  20 20 20 20 20 20 20 20 20 20 52 45 50 4C 41 43              REPLAC
01F150:  45 20 54 59 50 45 20 57 49 54 48 20 4D 54 59 50    E TYPE WITH MTYP
01F160:  45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    E               
01F170:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D                   .
01F180:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
01F190:  20 20 20 20 20 52 45 50 4C 41 43 45 20 46 4F 55         REPLACE FOU
01F1A0:  52 4E 49 20 57 49 54 48 20 4D 46 4F 55 52 4E 49    RNI WITH MFOURNI
01F1B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F1C0:  20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20              ..    
01F1D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F1E0:  52 45 50 4C 41 43 45 20 51 54 45 3A 43 4D 44 20    REPLACE QTE:CMD 
01F1F0:  57 49 54 48 20 4D 51 54 45 3A 43 4D 44 20 20 20    WITH MQTE:CMD   
01F200:  4F 52 45 20 27 4F 27 20 54 4F 20 43 4F 4E 54 4D    ORE 'O' TO CONTM
01F210:  4F 44 49 46 0D 0A 44 4F 20 57 48 49 4C 45 20 43    ODIF..DO WHILE C
01F220:  4F 4E 54 4D 4F 44 49 46 20 3D 20 27 4F 27 0D 0A    ONTMODIF = 'O'..
01F230:  0D 0A 43 4C 45 41 52 20 47 45 54 53 0D 0A 2A 20    ..CLEAR GETS..* 
01F240:  53 45 4C 45 43 54 49 4F 4E 20 44 45 20 4C 41 20    SELECTION DE LA 
01F250:  42 41 53 45 20 53 45 43 4F 4E 44 41 49 52 45 20    BASE SECONDAIRE 
01F260:  2D 3E 20 53 54 4F 43 4B 0D 0A 53 45 4C 45 43 54    -> STOCK..SELECT
01F270:  20 53 45 43 4F 4E 44 41 52 59 0D 0A 53 54 4F 52     SECONDARY..STOR
01F280:  45 20 22 4E 22 20 54 4F 20 52 45 50 4F 4E 53 45    E "N" TO REPONSE
01F290:  0D 0A 53 54 4F 52 45 20 27 20 20 20 20 20 20 20    ..STORE '       
01F2A0:  20 20 20 20 20 27 20 54 4F 20 4D 50 49 45 43 45         ' TO MPIECE
01F2B0:  0D 0A 2A 20 45 46 46 41 43 45 4D 45 4E 54 20 44    ..* EFFACEMENT D
01F2C0:  45 53 20 44 49 46 46 45 52 45 4E 54 45 53 20 5A    ES DIFFERENTES Z
01F2D0:  4F 4E 45 53 20 44 45 20 53 41 49 53 49 45 20 41    ONES DE SAISIE A
01F2E0:  20 4C 27 45 43 52 41 4E 0D 0A 40 20 36 2C 31 33     L'ECRAN..@ 6,13
01F2F0:  20 53 41 59 20 20 27 20 20 20 20 20 20 20 27 20     SAY  '       ' 
01F300:  0D 0A 40 20 36 2C 33 31 20 53 41 59 20 20 27 20    ..@ 6,31 SAY  ' 
01F310:  20 20 20 20 20 20 27 20 0D 0A 40 20 36 2C 34 37          ' ..@ 6,47
01F320:  20 53 41 59 20 20 27 20 20 20 20 20 20 20 20 20     SAY  '         
01F330:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F340:  20 20 27 20 0D 0A 40 20 38 2C 31 37 20 53 41 59      ' ..@ 8,17 SAY
01F350:  20 20 27 20 20 20 20 20 20 20 20 20 20 20 20 20      '             
01F360:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F370:  20 20 20 20 20 20 20 20 27 20 0D 0A 40 20 31 34            ' ..@ 14
01F380:  2C 31 33 20 53 41 59 20 27 20 20 20 20 20 20 20    ,13 SAY '       
01F390:  20 20 20 27 20 20 20 20 20 20 20 20 20 20 20 20       '            
01F3A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D                   .
01F3B0:  0A 40 20 31 34 2C 33 36 20 53 41 59 20 27 20 20    .@ 14,36 SAY '  
01F3C0:  2F 20 20 2F 20 20 27 20 20 20 20 20 20 20 20 20    /  /  '         
01F3D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F3E0:  20 0D 0A 40 20 31 34 2C 35 33 20 53 41 59 20 27     ..@ 14,53 SAY '
01F3F0:  20 20 20 20 20 20 20 20 20 20 20 20 27 0D 0A 40                '..@
01F400:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F410:  20 20 20 20 20 0D 0A 20 20 20 20 20 20 20 20 20         ..         
01F420:  20 20 20 20 20 20 20 20 20 20 20 52 45 50 4C 41               REPLA
01F430:  43 45 20 50 52 49 58 3A 55 48 54 20 57 49 54 48    CE PRIX:UHT WITH
01F440:  20 4D 50 52 49 58 3A 55 48 54 20 20 20 20 20 20     MPRIX:UHT      
01F450:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F460:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
01F470:  20 20 20 20 20 20 52 45 50 4C 41 43 45 20 49 4D          REPLACE IM
01F480:  50 55 54 41 54 49 4F 4E 20 57 49 54 48 20 4D 49    PUTATION WITH MI
01F490:  4D 50 55 54 41 54 49 4F 20 20 20 20 20 20 20 20    MPUTATIO        
01F4A0:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20               ..   
01F4B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F4C0:  20 52 45 50 4C 41 43 45 20 44 45 4C 41 49 20 57     REPLACE DELAI W
01F4D0:  49 54 48 20 56 41 4C 28 4D 44 45 4C 41 49 29 0D    ITH VAL(MDELAI).
01F4E0:  0A 09 09 20 20 20 20 20 45 4E 44 49 46 0D 0A 09    ...     ENDIF...
01F4F0:  09 20 20 20 20 45 4E 44 49 46 0D 0A 09 09 45 4E    .    ENDIF....EN
01F500:  44 49 46 0D 0A 09 45 4E 44 49 46 20 20 20 20 20    DIF...ENDIF     
01F510:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F520:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F530:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 45 4E 44               ..END
01F540:  49 46 20 20 20 20 20 20 20 20 20 20 20 20 20 20    IF              
01F550:  20 20 0D 0A 45 4E 44 44 4F 20 4D 4F 44 49 46 44      ..ENDDO MODIFD
01F560:  41 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    A...............
01F570:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
01F580:  0D 0A 2A 20 45 4E 52 45 47 49 53 54 52 45 4D 45    ..* ENREGISTREME
01F590:  4E 54 20 44 45 20 4C 41 20 44 45 4D 41 4E 44 45    NT DE LA DEMANDE
01F5A0:  20 44 27 41 43 48 41 54 20 44 41 4E 53 20 4C 41     D'ACHAT DANS LA
01F5B0:  20 42 41 53 45 20 53 45 43 4F 4E 44 41 49 52 45     BASE SECONDAIRE
01F5C0:  0D 0A 2A 20 42 41 53 45 20 53 45 43 4F 4E 44 41    ..* BASE SECONDA
01F5D0:  49 52 45 20 3D 20 42 41 53 45 20 44 45 53 20 44    IRE = BASE DES D
01F5E0:  45 4D 41 4E 44 45 53 20 44 27 41 43 48 41 54 0D    EMANDES D'ACHAT.
01F5F0:  0A 09 09 20 20 20 20 53 45 4C 45 43 54 20 53 45    ...    SELECT SE
01F600:  20 31 34 2C 37 31 20 53 41 59 20 27 20 20 2F 20     14,71 SAY '  / 
01F610:  20 2F 20 20 27 20 20 20 20 20 20 20 20 20 20 20     /  '           
01F620:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A                  ..
01F630:  40 20 31 36 2C 32 30 20 53 41 59 20 27 20 20 20    @ 16,20 SAY '   
01F640:  20 20 20 20 27 0D 0A 40 20 31 36 2C 35 31 20 53        '..@ 16,51 S
01F650:  41 59 20 27 20 20 20 20 20 20 20 20 20 20 27 20    AY '          ' 
01F660:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F670:  20 20 20 20 20 20 20 0D 0A 40 20 32 30 2C 33 20           ..@ 20,3 
01F680:  20 53 41 59 20 27 20 20 20 20 20 20 20 20 20 20     SAY '          
01F690:  20 20 27 20 0D 0A 40 20 32 30 2C 33 39 20 53 41      ' ..@ 20,39 SA
01F6A0:  59 20 27 20 20 20 20 20 20 20 20 27 0D 0A 40 20    Y '        '..@ 
01F6B0:  32 30 2C 34 38 20 53 41 59 20 27 20 20 20 20 20    20,48 SAY '     
01F6C0:  20 20 20 20 20 20 20 27 20 0D 0A 40 20 32 30 2C           ' ..@ 20,
01F6D0:  36 31 20 53 41 59 20 27 20 20 20 20 20 20 20 20    61 SAY '        
01F6E0:  20 20 20 20 20 20 20 20 20 27 20 0D 0A 2A 20 53             ' ..* S
01F6F0:  41 49 53 49 45 20 44 55 20 4E 55 4D 45 52 4F 20    AISIE DU NUMERO 
01F700:  44 45 20 52 45 46 45 52 45 4E 43 45 0D 0A 40 20    DE REFERENCE..@ 
01F710:  31 30 2C 31 31 20 47 45 54 20 4D 50 49 45 43 45    10,11 GET MPIECE
01F720:  0D 0A 52 45 41 44 0D 0A 2A 20 53 49 20 41 55 43    ..READ..* SI AUC
01F730:  55 4E 20 4E 55 4D 45 52 4F 20 44 45 20 52 45 46    UN NUMERO DE REF
01F740:  45 52 45 4E 43 45 20 4E 27 45 53 54 20 53 41 49    ERENCE N'EST SAI
01F750:  53 49 45 2C 20 3D 3D 3E 20 46 49 4E 20 44 45 20    SIE, ==> FIN DE 
01F760:  4D 4F 44 49 46 49 43 41 54 49 4F 4E 0D 0A 49 46    MODIFICATION..IF
01F770:  20 4D 50 49 45 43 45 20 3D 20 27 20 27 0D 0A 52     MPIECE = ' '..R
01F780:  45 4C 45 41 53 45 20 4D 50 49 45 43 45 2C 52 45    ELEASE MPIECE,RE
01F790:  50 4F 4E 53 45 0D 0A 0D 0A 2A 20 53 49 20 55 4E    PONSE....* SI UN
01F7A0:  20 45 46 46 41 43 45 4D 45 4E 54 20 41 20 45 54     EFFACEMENT A ET
01F7B0:  45 20 45 58 45 43 55 54 45 20 4C 45 20 43 4F 4E    E EXECUTE LE CON
01F7C0:  54 45 4E 55 20 44 45 20 4C 41 20 56 41 52 49 41    TENU DE LA VARIA
01F7D0:  42 4C 45 20 45 46 46 41 43 45 4D 45 4E 54 20 0D    BLE EFFACEMENT .
01F7E0:  0A 2A 20 45 53 54 20 3A 20 22 4F 55 49 22 2E 20    .* EST : "OUI". 
01F7F0:  44 41 4E 53 20 43 45 20 43 41 53 20 4F 4E 20 44    DANS CE CAS ON D
01F800:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
01F810:  20 4D 4F 44 49 46 49 43 41 54 49 4F 4E 28 53 29     MODIFICATION(S)
01F820:  20 44 27 45 4E 52 45 47 49 53 54 52 45 4D 45 4E     D'ENREGISTREMEN
01F830:  54 28 53 29 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    T(S) ***********
01F840:  2A 2A 2A 2A 20 0D 0A 2A 20 43 45 20 46 49 43 48    **** ..* CE FICH
01F850:  49 45 52 20 44 45 20 43 4F 4D 4D 41 4E 44 45 20    IER DE COMMANDE 
01F860:  56 4F 55 53 20 20 50 45 52 4D 45 54 54 52 41 20    VOUS  PERMETTRA 
01F870:  20 44 45 20 20 4D 4F 44 49 46 49 45 52 20 20 43     DE  MODIFIER  C
01F880:  45 52 54 41 49 4E 45 53 20 20 2A 20 0D 0A 2A 20    ERTAINES  * ..* 
01F890:  44 45 53 20 52 55 42 52 49 51 55 45 53 20 43 4F    DES RUBRIQUES CO
01F8A0:  4E 53 54 49 54 55 41 4E 54 20 55 4E 45 20 50 49    NSTITUANT UNE PI
01F8B0:  45 43 45 2E 20 20 20 20 20 20 20 20 20 20 20 20    ECE.            
01F8C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01F8D0:  20 2A 20 0D 0A 2A 20 4C 45 53 20 52 55 42 52 49     * ..* LES RUBRI
01F8E0:  51 55 45 53 20 43 4F 4D 50 4C 45 4D 45 4E 54 41    QUES COMPLEMENTA
01F8F0:  49 52 45 53 20 41 20 55 4E 20 4E 55 4D 45 52 4F    IRES A UN NUMERO
01F900:  20 20 44 45 20 20 44 45 4D 41 4E 44 45 20 20 44      DE  DEMANDE  D
01F910:  27 41 43 48 41 54 20 20 2A 20 0D 0A 2A 20 28 20    'ACHAT  * ..* ( 
01F920:  44 41 54 45 20 44 45 20 4C 41 20 44 45 4D 41 4E    DATE DE LA DEMAN
01F930:  44 45 20 44 27 41 43 48 41 54 2C 20 44 41 54 45    DE D'ACHAT, DATE
01F940:  20 44 45 20 4C 41 20 20 43 4F 4D 4D 41 4E 44 45     DE LA  COMMANDE
01F950:  2C 20 20 4E 55 4D 45 52 4F 20 20 44 45 20 20 2A    ,  NUMERO  DE  *
01F960:  20 0D 0A 2A 20 4C 41 20 43 4F 4D 4D 41 4E 44 45     ..* LA COMMANDE
01F970:  2C 20 51 55 41 4E 54 49 54 45 20 43 4F 4D 4D 41    , QUANTITE COMMA
01F980:  4E 44 45 45 20 29 20 4E 45 20 46 49 47 55 52 41    NDEE ) NE FIGURA
01F990:  4E 54 20 50 41 53 20 2D 20 43 45 4C 41 20 53 45    NT PAS - CELA SE
01F9A0:  52 41 49 54 20 20 2A 20 0D 0A 2A 20 49 4E 55 54    RAIT  * ..* INUT
01F9B0:  49 4C 45 20 2D 20 44 41 4E 53 20 4C 27 45 4E 52    ILE - DANS L'ENR
01F9C0:  45 47 49 53 54 52 45 4D 45 4E 54 20 44 27 55 4E    EGISTREMENT D'UN
01F9D0:  45 20 50 49 45 43 45 2C 20 20 4E 4F 55 53 20 20    E PIECE,  NOUS  
01F9E0:  55 54 49 4C 49 53 45 52 4F 4E 53 20 20 2A 20 0D    UTILISERONS  * .
01F9F0:  0A 2A 20 53 49 4D 55 4C 54 41 4E 45 4D 45 4E 54    .* SIMULTANEMENT
01FA00:  45 54 52 55 49 52 41 20 44 45 46 49 4E 49 54 49    ETRUIRA DEFINITI
01FA10:  56 45 4D 45 4E 54 20 4C 45 53 20 45 4E 52 45 47    VEMENT LES ENREG
01FA20:  49 53 54 52 45 2D 0D 0A 2A 20 4D 45 4E 54 53 20    ISTRE-..* MENTS 
01FA30:  50 52 45 43 45 44 45 4D 4D 45 4E 54 20 4D 41 52    PRECEDEMMENT MAR
01FA40:  51 55 45 53 20 28 20 44 45 4C 45 54 45 29 2E 0D    QUES ( DELETE)..
01FA50:  0A 49 46 20 45 46 46 41 43 45 4D 45 4E 54 20 3D    .IF EFFACEMENT =
01FA60:  20 22 4F 55 49 22 0D 0A 40 20 32 32 2C 30 20 53     "OUI"..@ 22,0 S
01FA70:  41 59 20 22 50 72 69 73 65 20 65 6E 20 63 6F 6D    AY "Prise en com
01FA80:  70 74 65 20 64 65 73 20 6D 6F 64 69 66 69 63 61    pte des modifica
01FA90:  74 69 6F 6E 73 20 65 6E 20 63 6F 75 72 73 2E 22    tions en cours."
01FAA0:  0D 0A 40 20 32 33 2C 30 20 53 41 59 20 22 56 65    ..@ 23,0 SAY "Ve
01FAB0:  75 69 6C 6C 65 7A 20 70 61 74 69 65 6E 74 65 72    uillez patienter
01FAC0:  20 71 75 65 6C 71 75 65 73 20 69 6E 73 74 61 6E     quelques instan
01FAD0:  74 73 20 2E 2E 2E 2E 2E 2E 22 0D 0A 50 41 43 4B    ts ......"..PACK
01FAE0:  0D 0A 45 4E 44 49 46 0D 0A 53 45 54 20 45 58 41    ..ENDIF..SET EXA
01FAF0:  43 54 20 4F 46 46 0D 0A 52 45 54 55 52 4E 0D 0A    CT OFF..RETURN..
01FB00:  45 4C 53 45 0D 0A 2A 20 52 45 43 48 45 52 43 48    ELSE..* RECHERCH
01FB10:  45 20 44 45 20 4C 27 45 58 49 53 54 45 4E 43 45    E DE L'EXISTENCE
01FB20:  20 44 55 20 4E 55 4D 45 52 4F 20 44 45 20 52 45     DU NUMERO DE RE
01FB30:  46 45 52 45 4E 43 45 20 53 41 49 53 49 45 20 44    FERENCE SAISIE D
01FB40:  41 4E 53 20 4C 45 20 46 49 43 48 49 45 52 0D 0A    ANS LE FICHIER..
01FB50:  2A 20 44 45 53 20 50 49 45 43 45 53 20 44 45 54    * DES PIECES DET
01FB60:  41 43 48 45 45 53 0D 0A 20 20 46 49 4E C4 20 26    ACHEES..  FIN. &
01FB70:  4D 50 49 45 43 45 0D 0A 20 20 49 46 20 23 20 3D    MPIECE..  IF # =
01FB80:  20 30 20 2E 4F 52 2E 20 2A 20 0D 0A 20 20 40 20     0 .OR. * ..  @ 
01FB90:  32 32 2C 30 20 53 41 59 20 27 4C 61 20 70 69 65    22,0 SAY 'La pie
01FBA0:  63 65 20 27 0D 0A 20 20 40 20 32 32 2C 39 20 53    ce '..  @ 22,9 S
01FBB0:  41 59 20 4D 50 49 45 43 45 0D 0A 20 20 40 20 32    AY MPIECE..  @ 2
01FBC0:  32 2C 32 31 20 53 41 59 20 27 20 6E 65 20 66 69    2,21 SAY ' ne fi
01FBD0:  67 75 72 65 20 70 61 73 20 64 61 6E 73 20 6C 65    gure pas dans le
01FBE0:  20 66 69 63 68 69 65 72 2C 20 56 41 4C 49 44 45     fichier, VALIDE
01FBF0:  5A 27 0D 0A 20 20 53 45 54 20 43 4F 4E 53 4F 4C    Z'..  SET CONSOL
01FC00:  20 44 45 55 58 20 42 41 53 45 53 20 44 45 20 44     DEUX BASES DE D
01FC10:  4F 4E 4E 45 45 53 20 3A 20 31 2E 20 42 41 53 45    ONNEES : 1. BASE
01FC20:  20 53 54 4F 43 4B 20 20 20 20 20 20 20 20 20 20     STOCK          
01FC30:  20 20 20 20 2A 20 0D 0A 2A 20 20 20 20 20 20 20        * ..*       
01FC40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FC50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FC60:  32 2E 20 42 41 53 45 20 44 41 20 20 20 20 20 20    2. BASE DA      
01FC70:  20 20 20 20 20 20 20 20 20 20 20 2A 20 0D 0A 2A               * ..*
01FC80:  20 43 45 20 51 55 49 20 4E 4F 55 53 20 50 45 52     CE QUI NOUS PER
01FC90:  4D 45 54 54 52 41 20 50 41 52 20 4C 45 20 42 49    METTRA PAR LE BI
01FCA0:  41 49 53 20 44 45 20 4C 41 20 42 41 53 45 20 3A    AIS DE LA BASE :
01FCB0:  20 22 44 41 22 20 44 27 41 46 46 49 43 48 45 52     "DA" D'AFFICHER
01FCC0:  20 20 2A 20 0D 0A 2A 20 4C 45 53 20 20 52 45 4E      * ..* LES  REN
01FCD0:  53 45 49 47 4E 45 4D 45 4E 54 53 20 20 43 4F 4D    SEIGNEMENTS  COM
01FCE0:  50 4C 45 4D 45 4E 54 41 49 52 45 53 20 20 44 45    PLEMENTAIRES  DE
01FCF0:  20 20 4C 41 20 20 50 49 45 43 45 20 45 4E 20 43      LA  PIECE EN C
01FD00:  4F 55 52 53 20 44 45 20 20 2A 20 0D 0A 2A 20 4D    OURS DE  * ..* M
01FD10:  4F 44 49 46 49 43 41 54 49 4F 4E 2E 20 20 20 20    ODIFICATION.    
01FD20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FD30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FD40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FD50:  2A 20 0D 0A 2A 20 64 42 41 53 45 20 49 49 20 50    * ..* dBASE II P
01FD60:  45 52 4D 45 54 20 44 45 20 47 45 52 45 52 20 53    ERMET DE GERER S
01FD70:  49 4D 55 4C 54 41 4E 45 4D 45 4E 45 4E 54 20 44    IMULTANEMENENT D
01FD80:  45 55 58 20 42 41 53 45 53 20 44 45 20 44 4F 4E    EUX BASES DE DON
01FD90:  4E 45 45 53 2E 20 20 2A 20 0D 0A 2A 20 41 50 52    NEES.  * ..* APR
01FDA0:  45 53 20 4C 27 41 46 46 45 43 54 41 54 49 4F 4E    ES L'AFFECTATION
01FDB0:  20 44 45 20 4C 41 20 42 41 53 45 20 50 52 49 4D     DE LA BASE PRIM
01FDC0:  41 49 52 45 20 45 54 20 44 45 20 4C 41 20 42 41    AIRE ET DE LA BA
01FDD0:  53 45 20 53 45 43 4F 4E 44 41 49 52 45 20 2A 0D    SE SECONDAIRE *.
01FDE0:  0A 2A 20 49 4C 20 53 55 46 46 49 52 41 20 44 45    .* IL SUFFIRA DE
01FDF0:  20 53 45 4C 45 43 54 49 4F 4E 4E 45 52 20 4C 41     SELECTIONNER LA
01FE00:  45 20 4F 46 46 0D 0A 20 20 57 41 49 54 0D 0A 20    E OFF..  WAIT.. 
01FE10:  20 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 4E 0D     SET CONSOLE ON.
01FE20:  0A 20 20 40 20 32 32 2C 30 20 53 41 59 20 27 20    .  @ 22,0 SAY ' 
01FE30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FE40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FE50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FE60:  20 20 20 20 20 20 20 20 20 20 20 20 27 20 0D 0A                ' ..
01FE70:  20 20 45 4C 53 45 0D 0A 0D 0A 2A 20 53 45 4C 45      ELSE....* SELE
01FE80:  43 54 49 4F 4E 20 44 45 20 4C 41 20 42 41 53 45    CTION DE LA BASE
01FE90:  20 50 52 49 4D 41 49 52 45 20 2D 3E 20 44 41 0D     PRIMAIRE -> DA.
01FEA0:  0A 20 20 53 45 4C 45 43 54 20 50 52 49 4D 41 52    .  SELECT PRIMAR
01FEB0:  59 0D 0A 20 20 53 54 4F 52 45 20 53 2E 44 41 3A    Y..  STORE S.DA:
01FEC0:  4E 55 4D 20 54 4F 20 4D 44 41 3A 4E 55 4D 0D 0A    NUM TO MDA:NUM..
01FED0:  20 20 46 49 4E 44 20 26 4D 44 41 3A 4E 55 4D 0D      FIND &MDA:NUM.
01FEE0:  0A 09 49 46 20 23 20 3D 20 30 0D 0A 09 40 20 31    ..IF # = 0...@ 1
01FEF0:  34 2C 33 36 20 53 41 59 20 22 20 20 2F 20 20 2F    4,36 SAY "  /  /
01FF00:  22 0D 0A 09 40 20 31 34 2C 37 31 20 53 41 59 20    "...@ 14,71 SAY 
01FF10:  22 20 20 2F 20 20 2F 22 20 0D 0A 09 45 4C 53 45    "  /  /" ...ELSE
01FF20:  0D 0A 09 40 20 31 34 2C 31 33 20 53 41 59 20 50    ...@ 14,13 SAY P
01FF30:  2E 44 41 3A 4E 55 4D 20 20 20 20 20 20 20 20 20    .DA:NUM         
01FF40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FF50:  20 20 0D 0A 20 20 20 20 20 20 20 20 40 20 31 34      ..        @ 14
01FF60:  2C 33 36 20 53 41 59 20 44 41 3A 44 41 54 45 20    ,36 SAY DA:DATE 
01FF70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FF80:  20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20             ..     
01FF90:  20 20 20 40 20 31 34 2C 35 33 20 53 41 59 20 43       @ 14,53 SAY C
01FFA0:  4D 44 3A 4E 55 4D 20 20 20 20 20 20 20 20 20 20    MD:NUM          
01FFB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FFC0:  0D 0A 20 20 20 20 20 20 20 20 40 20 31 34 2C 37    ..        @ 14,7
01FFD0:  31 20 53 41 59 20 43 4D 44 3A 44 41 54 45 20 20    1 SAY CMD:DATE  
01FFE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
01FFF0:  20 20 20 20 20 20 20 0D 0A 20 20 20 20 20 20 20           ..       
020000:  20 42 41 53 45 20 43 4F 4E 43 45 52 4E 45 45 20     BASE CONCERNEE 
020010:  28 20 53 45 4C 45 43 54 20 50 52 49 4D 41 52 59    ( SELECT PRIMARY
020020:  20 4F 55 20 2A 0D 0A 2A 20 53 45 4C 45 43 54 20     OU *..* SELECT 
020030:  53 45 43 4F 4E 44 41 52 59 20 29 20 20 50 4F 55    SECONDARY )  POU
020040:  52 20 20 45 46 46 45 43 54 55 45 52 20 20 55 4E    R  EFFECTUER  UN
020050:  20 20 51 55 45 4C 43 4F 4E 51 55 45 20 20 54 52      QUELCONQUE  TR
020060:  41 49 54 45 4D 45 4E 54 2E 20 2A 0D 0A 2A 20 4C    AITEMENT. *..* L
020070:  27 55 54 49 4C 49 53 41 54 49 4F 4E 20 44 45 20    'UTILISATION DE 
020080:  43 45 54 54 45 20 46 4F 4E 43 54 49 4F 4E 20 50    CETTE FONCTION P
020090:  45 52 4D 45 54 20 20 44 45 20 20 52 45 53 45 52    ERMET  DE  RESER
0200A0:  56 45 52 20 45 4E 20 20 4D 45 4D 4F 49 52 45 20    VER EN  MEMOIRE 
0200B0:  2A 0D 0A 2A 20 43 45 4E 54 52 41 4C 45 20 55 4E    *..* CENTRALE UN
0200C0:  20 45 4D 50 4C 41 43 45 4D 45 4E 54 20 41 20 43     EMPLACEMENT A C
0200D0:  48 41 43 55 4E 45 20 44 45 53 20 42 41 53 45 53    HACUNE DES BASES
0200E0:  2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
0200F0:  20 20 20 20 20 20 2A 0D 0A 2A 2A 2A 2A 2A 2A 2A          *..*******
020100:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
020110:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
020120:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
020130:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 0D    *************...
020140:  0A 53 45 54 20 45 58 41 43 54 20 4F 4E 0D 0A 2A    .SET EXACT ON..*
020150:  20 44 45 46 49 4E 49 54 49 4F 4E 20 44 45 20 4C     DEFINITION DE L
020160:  41 20 42 41 53 45 20 50 52 49 4D 41 49 52 45 0D    A BASE PRIMAIRE.
020170:  0A 53 45 4C 45 43 54 20 50 52 49 4D 41 52 59 0D    .SELECT PRIMARY.
020180:  0A 55 53 45 20 44 41 20 49 4E 44 45 58 20 44 41    .USE DA INDEX DA
020190:  0D 0A 0D 0A 2A 20 44 45 46 49 4E 49 54 49 4F 4E    ....* DEFINITION
0201A0:  20 44 45 20 4C 41 20 42 41 53 45 20 53 45 43 4F     DE LA BASE SECO
0201B0:  4E 44 41 49 52 45 0D 0A 53 45 4C 45 43 54 20 53    NDAIRE..SELECT S
0201C0:  45 43 4F 4E 44 41 52 59 0D 0A 55 53 45 20 53 54    ECONDARY..USE ST
0201D0:  4F 43 4B 20 49 4E 44 45 58 20 50 49 45 43 45 0D    OCK INDEX PIECE.
0201E0:  0A 0D 0A 53 54 4F 52 45 20 22 4E 4F 4E 22 20 54    ...STORE "NON" T
0201F0:  4F 20 45 46 46 41 43 45 4D 45 4E 54 0D 0A 53 54    O EFFACEMENT..ST
020200:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
020210:  1B 00 00 00 02 09 50 E5 1B 00 C1 02 00 00 00 02    ......P.........
020220:  1B 00 C6 02 00 00 00 02 1B 00 C2 02 00 00 00 02    ................
020230:  1B 00 C7 02 00 00 00 02 1B 00 C3 02 00 00 00 02    ................
020240:  1B 00 C8 02 00 00 00 02 1B 00 C4 02 00 00 00 02    ................
020250:  1B 00 C9 02 00 00 00 02 1B 00 C5 02 00 00 00 02    ................
020260:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
020270:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
020280:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
020290:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0202F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
020300:  20 40 20 31 36 2C 32 30 20 53 41 59 20 50 2E 51     @ 16,20 SAY P.Q
020310:  54 45 3A 43 4D 44 20 20 20 20 20 20 20 20 20 20    TE:CMD          
020320:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020330:  0D 0A 09 45 4E 44 49 46 0D 0A 20 20 40 20 31 36    ...ENDIF..  @ 16
020340:  2C 35 31 20 53 41 59 20 53 2E 51 54 45 3A 52 45    ,51 SAY S.QTE:RE
020350:  53 54 45 20 20 20 20 20 20 20 20 20 20 20 20 20    STE             
020360:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 40               ..  @
020370:  20 32 30 2C 33 39 20 53 41 59 20 53 2E 51 54 45     20,39 SAY S.QTE
020380:  3A 53 54 4F 43 4B 0D 0A 20 20 53 54 4F 52 45 20    :STOCK..  STORE 
020390:  53 2E 41 54 45 4C 49 45 52 20 54 4F 20 4D 41 54    S.ATELIER TO MAT
0203A0:  45 4C 49 45 52 0D 0A 20 20 53 54 4F 52 45 20 53    ELIER..  STORE S
0203B0:  2E 53 45 43 54 49 4F 4E 20 54 4F 20 4D 53 45 43    .SECTION TO MSEC
0203C0:  54 49 4F 4E 0D 0A 20 20 53 54 4F 52 45 20 53 2E    TION..  STORE S.
0203D0:  4D 41 43 48 49 4E 45 20 54 4F 20 4D 4D 41 43 48    MACHINE TO MMACH
0203E0:  49 4E 45 0D 0A 20 20 53 54 4F 52 45 20 53 2E 4C    INE..  STORE S.L
0203F0:  49 42 45 4C 4C 45 20 54 4F 20 4D 4C 49 42 45 4C    IBELLE TO MLIBEL
020400:  4C 45 0D 0A 20 20 53 54 4F 52 45 20 53 2E 4D 49    LE..  STORE S.MI
020410:  4E 49 3A 53 54 4F 43 4B 20 54 4F 20 4D 4D 49 4E    NI:STOCK TO MMIN
020420:  49 3A 53 54 4F 43 0D 0A 20 20 53 54 4F 52 45 20    I:STOC..  STORE 
020430:  53 2E 50 52 49 58 3A 55 48 54 20 54 4F 20 4D 50    S.PRIX:UHT TO MP
020440:  52 49 58 3A 55 48 54 0D 0A 20 20 40 20 36 2C 31    RIX:UHT..  @ 6,1
020450:  33 20 47 45 54 20 4D 41 54 45 4C 49 45 52 20 20    3 GET MATELIER  
020460:  20 20 0D 0A 20 20 40 20 36 2C 33 31 20 47 45 54      ..  @ 6,31 GET
020470:  20 4D 53 45 43 54 49 4F 4E 20 20 20 20 20 20 20     MSECTION       
020480:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020490:  20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20                ..  
0204A0:  40 20 36 2C 34 37 20 47 45 54 20 4D 4D 41 43 48    @ 6,47 GET MMACH
0204B0:  49 4E 45 20 20 20 20 20 20 20 20 20 20 20 20 20    INE             
0204C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0204D0:  20 20 20 20 20 20 0D 0A 20 20 40 20 38 2C 31 37          ..  @ 8,17
0204E0:  20 47 45 54 20 4D 4C 49 42 45 4C 4C 45 20 20 20     GET MLIBELLE   
0204F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020500:  00 00 01 00 02 00 09 0B 2E 00 6E 75 6D 65 72 6F    ..........numero
020510:  00 63 72 65 2C 37 2C 32 29 2B 24 28 64 61 74 65    .cre,7,2)+$(date
020520:  3A 63 72 65 2C 34 2C 32 29 2B 24 28 64 61 74 65    :cre,4,2)+$(date
020530:  3A 63 72 65 2C 31 2C 32 29 00 74 20 74 68 65 20    :cre,1,2).t the 
020540:  68 69 72 65 20 64 61 74 65 20 66 6F 72 20 76 61    hire date for va
020550:  6C 69 64 69 74 79 0D 0A 20 20 20 20 20 20 53 54    lidity..      ST
020560:  4F 52 45 20 68 69 72 65 64 61 74 65 20 54 00 00    ORE hiredate T..
020570:  00 01 00 38 33 30 36 32 39 00 00 02 00 38 33 30    ...830629....830
020580:  37 33 31 00 00 03 00 38 33 30 38 32 30 00 00 04    731....830820...
020590:  00 38 33 30 38 32 30 00 00 05 00 38 33 30 39 30    .830820....83090
0205A0:  33 00 00 06 00 38 33 30 39 30 33 00 00 07 00 38    3....830903....8
0205B0:  33 30 39 30 33 00 00 08 00 38 33 30 39 30 37 00    30903....830907.
0205C0:  00 09 00 38 33 30 39 31 35 00 00 03 00 38 34 30    ...830915....840
0205D0:  31 30 31 00 00 0A 00 38 33 30 38 31 35 00 00 0C    101....830815...
0205E0:  00 38 33 30 38 31 35 00 00 0C 00 38 33 30 38 31    .830815....83081
0205F0:  35 00 00 0E 00 38 33 30 38 31 35 00 00 0F 00 38    5....830815....8
020600:  33 30 38 31 35 00 00 0F 00 38 33 30 38 31 35 00    30815....830815.
020610:  00 11 00 38 33 30 38 31 35 00 00 12 00 38 33 30    ...830815....830
020620:  38 31 35 00 00 20 20 20 20 20 20 2D 20 20 20 20    815..      -    
020630:  32 33 32 2D 33 32 33 32 20 31 32 2F 33 31 2F 38    232-3232 12/31/8
020640:  30 20 20 2F 20 20 2F 20 20 66 6F 74 31 32 33 34    0  /  /  fot1234
020650:  2E 30 30 30 31 32 33 34 2E 30 30 30 62 61 6C 20    .0001234.000bal 
020660:  40 20 31 34 2C 31 30 20 53 41 59 20 22 48 69 72    @ 14,10 SAY "Hir
020670:  65 20 64 61 74 65 22 0D 0A 20 20 20 20 20 20 20    e date"..       
020680:  20 20 20 40 20 31 34 2C 32 38 20 47 45 54 20 4D       @ 14,28 GET M
020690:  65 61 3A 64 61 74 65 20 50 49 43 54 55 52 45 20    ea:date PICTURE 
0206A0:  27 39 39 2F 39 39 2F 39 39 27 0D 0A 20 20 20 20    '99/99/99'..    
0206B0:  20 20 20 20 20 20 52 45 41 44 0D 0A 20 20 20 20          READ..    
0206C0:  20 20 20 20 20 20 53 54 4F 52 45 20 54 20 54 4F          STORE T TO
0206D0:  20 4D 65 61 3A 6E 6F 64 61 74 65 0D 0A 20 20 20     Mea:nodate..   
0206E0:  20 20 20 20 20 45 4E 44 49 46 0D 0A 20 20 20 20         ENDIF..    
0206F0:  20 20 45 4E 44 44 4F 0D 0A 20 20 20 20 20 20 53      ENDDO..      S
020700:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020710:  0D 0A 20 20 40 20 32 30 2C 33 20 20 47 45 54 20    ..  @ 20,3  GET 
020720:  4D 4D 49 4E 49 3A 53 54 4F 43 20 20 20 20 20 20    MMINI:STOC      
020730:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020740:  20 20 20 20 20 20 20 20 20 0D 0A 20 20 40 20 32             ..  @ 2
020750:  30 2C 34 38 20 47 45 54 20 4D 50 52 49 58 3A 55    0,48 GET MPRIX:U
020760:  48 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20    HT              
020770:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020780:  20 20 20 0D 0A 20 20 52 45 41 44 0D 0A 2A 20 43       ..  READ..* C
020790:  41 4C 43 55 4C 20 44 55 20 4D 4F 4E 54 41 4E 54    ALCUL DU MONTANT
0207A0:  20 54 4F 54 41 4C 20 44 55 20 53 54 4F 43 4B 20     TOTAL DU STOCK 
0207B0:  50 4F 55 52 20 43 45 54 54 45 20 50 49 45 43 45    POUR CETTE PIECE
0207C0:  0D 0A 20 20 53 54 4F 52 45 20 4D 50 52 49 58 3A    ..  STORE MPRIX:
0207D0:  55 48 54 20 2A 20 51 54 45 3A 53 54 4F 43 4B 20    UHT * QTE:STOCK 
0207E0:  54 4F 20 4D 50 52 49 58 3A 54 48 54 0D 0A 20 20    TO MPRIX:THT..  
0207F0:  40 20 32 30 2C 36 37 20 53 41 59 20 4D 50 52 49    @ 20,67 SAY MPRI
020800:  58 3A 54 48 54 0D 0A 20 20 53 45 4C 45 43 54 20    X:THT..  SELECT 
020810:  53 45 43 4F 4E 44 41 52 59 0D 0A 2A 20 53 49 20    SECONDARY..* SI 
020820:  41 55 43 55 4E 20 50 41 52 41 4D 45 54 52 45 20    AUCUN PARAMETRE 
020830:  4E 27 41 20 43 48 41 4E 47 45 20 2D 2D 3E 20 50    N'A CHANGE --> P
020840:  52 4F 50 4F 53 49 54 49 4F 4E 20 45 46 46 41 43    ROPOSITION EFFAC
020850:  45 4D 45 4E 54 0D 0A 20 20 20 20 20 49 46 20 4D    EMENT..     IF M
020860:  41 54 45 4C 49 45 52 3D 41 54 45 4C 49 45 52 20    ATELIER=ATELIER 
020870:  2E 41 4E 44 2E 20 53 45 43 54 49 4F 4E 3D 4D 53    .AND. SECTION=MS
020880:  45 43 54 49 4F 4E 20 2E 41 4E 44 2E 20 4D 41 43    ECTION .AND. MAC
020890:  48 49 4E 45 3D 4D 4D 41 43 48 49 4E 45 20 3B 0D    HINE=MMACHINE ;.
0208A0:  0A 20 20 20 20 20 2E 41 4E 44 2E 20 4C 49 42 45    .     .AND. LIBE
0208B0:  4C 4C 45 3D 4D 4C 49 42 45 4C 4C 45 20 2E 41 4E    LLE=MLIBELLE .AN
0208C0:  44 2E 20 4D 49 4E 49 3A 53 54 4F 43 4B 3D 4D 4D    D. MINI:STOCK=MM
0208D0:  49 4E 49 3A 53 54 4F 43 20 2E 41 4E 44 2E 20 3B    INI:STOC .AND. ;
0208E0:  0D 0A 20 20 20 20 20 50 52 49 58 3A 55 48 54 3D    ..     PRIX:UHT=
0208F0:  4D 50 52 49 58 3A 55 48 54 0D 0A 20 20 20 20 20    MPRIX:UHT..     
020900:  00 00 00 01 00 31 32 33 34 35 36 37 00 00 02 00    .....1234567....
020910:  31 33 36 32 30 36 32 00 00 03 00 31 33 36 32 30    1362062....13620
020920:  36 33 00 00 04 00 31 33 36 32 30 36 34 00 00 05    63....1362064...
020930:  00 31 33 36 32 30 36 35 00 00 06 00 31 33 36 32    .1362065....1362
020940:  30 36 36 00 00 07 00 31 33 36 32 30 36 37 00 00    066....1362067..
020950:  08 00 31 33 36 32 30 36 38 00 00 09 00 31 33 36    ..1362068....136
020960:  32 30 36 39 00 00 0A 00 31 33 36 32 30 37 30 00    2069....1362070.
020970:  00 0B 00 31 33 36 32 30 37 31 00 00 0C 00 31 33    ...1362071....13
020980:  36 32 30 37 32 00 00 10 00 31 33 36 32 30 37 33    62072....1362073
020990:  00 00 11 00 31 33 36 32 30 37 34 00 00 12 00 31    ....1362074....1
0209A0:  33 36 32 30 37 35 00 00 13 00 31 33 36 32 30 37    362075....136207
0209B0:  36 00 00 14 00 31 33 36 32 30 37 37 00 00 15 00    6....1362077....
0209C0:  31 33 36 32 30 37 38 00 00 16 00 31 33 36 32 30    1362078....13620
0209D0:  37 39 00 00 17 00 31 33 36 32 30 38 30 00 00 18    79....1362080...
0209E0:  00 31 33 36 32 30 38 31 00 00 19 00 31 33 36 32    .1362081....1362
0209F0:  30 38 32 00 00 1A 00 31 33 36 32 30 38 33 00 00    082....1362083..
020A00:  21 00 31 33 36 32 30 38 34 00 00 22 00 31 33 36    !.1362084..".136
020A10:  32 30 38 35 00 00 23 00 31 33 36 32 30 38 36 00    2085..#.1362086.
020A20:  00 0D 00 39 39 39 39 39 39 39 00 00 0E 00 39 39    ...9999999....99
020A30:  39 39 39 39 39 00 00 0F 00 39 39 39 39 39 39 39    99999....9999999
020A40:  00 00 1B 00 39 39 39 39 39 39 39 00 00 1C 00 39    ....9999999....9
020A50:  39 39 39 39 39 39 00 00 1D 00 39 39 39 39 39 39    999999....999999
020A60:  39 00 00 1E 00 39 39 39 39 39 39 39 00 00 1F 00    9....9999999....
020A70:  39 39 39 39 39 39 39 00 00 20 00 39 39 39 39 39    9999999.. .99999
020A80:  39 39 00 00 24 00 39 39 39 39 39 39 39 00 00 20    99..$.9999999.. 
020A90:  20 53 45 54 20 63 6F 6C 6F 6E 20 4F 46 46 0D 0A     SET colon OFF..
020AA0:  20 20 20 20 20 20 40 20 32 32 2C 30 20 53 41 59          @ 22,0 SAY
020AB0:  20 22 49 73 20 74 68 65 20 65 6D 70 6C 6F 79 65     "Is the employe
020AC0:  65 20 64 61 74 61 20 63 6F 72 72 65 63 74 20 28    e data correct (
020AD0:  59 2F 4E 29 3F 20 22 20 47 45 54 20 4D 65 61 3A    Y/N)? " GET Mea:
020AE0:  6F 6B 0D 0A 20 20 20 20 20 20 52 45 41 44 0D 0A    ok..      READ..
020AF0:  20 20 20 20 20 20 53 45 54 20 63 6F 6C 6F 6E 20          SET colon 
020B00:  40 20 32 32 2C 30 20 53 41 59 20 22 56 6F 75 6C    @ 22,0 SAY "Voul
020B10:  65 7A 2D 76 6F 75 73 20 6C 27 65 66 66 61 63 65    ez-vous l'efface
020B20:  72 20 3F 20 22 20 47 45 54 20 52 45 50 4F 4E 53    r ? " GET REPONS
020B30:  45 0D 0A 20 20 20 20 20 52 45 41 44 0D 0A 20 20    E..     READ..  
020B40:  20 20 20 40 20 32 32 2C 30 20 53 41 59 20 22 20       @ 22,0 SAY " 
020B50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020B60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020B70:  20 20 22 0D 0A 09 49 46 20 52 45 50 4F 4E 53 45      "...IF REPONSE
020B80:  20 3D 20 22 4F 22 0D 0A 09 44 45 4C 45 54 45 0D     = "O"...DELETE.
020B90:  0A 09 53 54 4F 52 45 20 22 4F 55 49 22 20 54 4F    ..STORE "OUI" TO
020BA0:  20 45 46 46 41 43 45 4D 45 4E 54 0D 0A 09 45 4E     EFFACEMENT...EN
020BB0:  44 49 46 0D 0A 20 20 20 20 20 45 4C 53 45 0D 0A    DIF..     ELSE..
020BC0:  2A 20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54    * ENREGISTREMENT
020BD0:  20 44 45 53 20 49 4E 46 4F 52 4D 41 54 49 4F 4E     DES INFORMATION
020BE0:  53 20 4D 4F 44 49 46 49 45 45 53 0D 0A 20 20 20    S MODIFIEES..   
020BF0:  20 20 52 45 50 4C 41 43 45 20 41 54 45 4C 49 45      REPLACE ATELIE
020C00:  52 20 57 49 54 48 20 4D 41 54 45 4C 49 45 52 20    R WITH MATELIER 
020C10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020C20:  20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20 52            ..     R
020C30:  45 50 4C 41 43 45 20 53 45 43 54 49 4F 4E 20 57    EPLACE SECTION W
020C40:  49 54 48 20 4D 53 45 43 54 49 4F 4E 20 20 20 20    ITH MSECTION    
020C50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020C60:  20 20 20 20 20 0D 0A 20 20 20 20 20 52 45 50 4C         ..     REPL
020C70:  41 43 45 20 4D 41 43 48 49 4E 45 20 57 49 54 48    ACE MACHINE WITH
020C80:  20 4D 4D 41 43 48 49 4E 45 20 20 20 20 20 20 20     MMACHINE       
020C90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020CA0:  20 20 0D 0A 20 20 20 20 20 52 45 50 4C 41 43 45      ..     REPLACE
020CB0:  20 4C 49 42 45 4C 4C 45 20 57 49 54 48 20 4D 4C     LIBELLE WITH ML
020CC0:  49 42 45 4C 4C 45 20 20 20 20 20 20 20 20 20 20    IBELLE          
020CD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D                   .
020CE0:  0A 20 20 20 20 20 52 45 50 4C 41 43 45 20 50 49    .     REPLACE PI
020CF0:  45 43 45 20 57 49 54 48 20 4D 50 49 45 43 45 20    ECE WITH MPIECE 
020D00:  00 00 01 00 02 00 0E 10 1F 00 50 49 45 43 45 00    ..........PIECE.
020D10:  00 4D 45 52 4F 20 44 45 20 4C 41 20 44 45 4D 41    .MERO DE LA DEMA
020D20:  4E 44 45 20 44 27 41 43 48 41 54 0D 0A 40 20 35    NDE D'ACHAT..@ 5
020D30:  2C 31 30 20 47 45 54 20 4D 44 41 3A 4E 55 4D 0D    ,10 GET MDA:NUM.
020D40:  0A 52 45 41 44 0D 0A 2A 20 53 49 20 41 55 43 55    .READ..* SI AUCU
020D50:  4E 20 4E 55 4D 45 52 4F 20 4E 27 45 53 54 20 53    N NUMERO N'EST S
020D60:  41 49 53 49 45 20 2D 3E 20 52 45 54 4F 55 80 00    AISIE -> RETOU..
020D70:  80 00 80 00 80 00 80 00 80 00 80 00 80 00 80 00    ................
020D80:  80 00 80 00 80 00 80 00 80 00 80 00 80 00 80 00    ................
020D90:  80 00 80 00 80 00 80 00 80 00 80 00 00 BB BB BB    ................
020DA0:  BB BB BB BB BB BB BB BB BB BB FB BB BB BB BB BB    ................
020DB0:  BB BB BB BB BB BB BB BB FB BB BB BB BB BB FB BB    ................
020DC0:  FB BB FB BB FB BB FB BB FB BB FB BB FB BB FB BB    ................
020DD0:  FB BB FB BB BB BB FB BB BB BB BB 09 00 00 08 00    ................
020DE0:  31 32 33 31 32 33 31 32 33 33 32 31 00 00 01 00    123123123321....
020DF0:  31 32 33 34 35 36 37 38 39 31 32 33 00 00 02 00    123456789123....
020E00:  31 32 33 34 35 36 37 38 39 31 32 34 00 00 03 00    123456789124....
020E10:  31 32 33 34 35 36 37 38 39 31 32 35 00 00 04 00    123456789125....
020E20:  31 32 33 34 35 36 37 38 39 31 32 36 00 00 05 00    123456789126....
020E30:  31 32 33 34 35 36 37 38 39 31 32 37 00 00 06 00    123456789127....
020E40:  31 32 33 34 35 36 37 38 39 31 32 39 00 00 09 00    123456789129....
020E50:  31 32 33 34 35 36 37 38 39 31 33 32 00 00 07 00    123456789132....
020E60:  31 32 33 34 35 36 37 38 39 31 34 37 00 00 32 31    123456789147..21
020E70:  32 35 36 20 20 20 00 00 08 00 35 34 35 35 34 35    256   ....545545
020E80:  20 20 20 20 00 00 05 00 35 35 33 32 36 35 32 20        ....5532652 
020E90:  20 20 00 00 03 00 35 35 34 33 32 35 31 20 20 20      ....5543251   
020EA0:  00 00 06 00 35 36 34 32 33 35 31 20 20 20 00 00    ....5642351   ..
020EB0:  01 00 35 36 38 35 32 33 31 20 20 20 00 00 0B 00    ..5685231   ....
020EC0:  37 38 35 34 36 39 20 20 20 20 00 00 12 00 39 38    785469    ....98
020ED0:  37 36 35 34 36 35 34 20 00 00 20 20 00 00 0A 00    7654654 ..  ....
020EE0:  33 34 35 36 37 38 39 31 32 33 34 35 00 00 10 00    345678912345....
020EF0:  34 35 36 31 32 33 31 32 33 31 32 33 00 00 0D 00    456123123123....
020F00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020F10:  20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20                ..  
020F20:  20 20 20 52 45 50 4C 41 43 45 20 50 52 49 58 3A       REPLACE PRIX:
020F30:  55 48 54 20 57 49 54 48 20 4D 50 52 49 58 3A 55    UHT WITH MPRIX:U
020F40:  48 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20    HT              
020F50:  20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20             ..     
020F60:  52 45 50 4C 41 43 45 20 4D 49 4E 49 3A 53 54 4F    REPLACE MINI:STO
020F70:  43 4B 20 57 49 54 48 20 4D 4D 49 4E 49 3A 53 54    CK WITH MMINI:ST
020F80:  4F 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20    OC              
020F90:  20 20 20 20 20 0D 0A 20 20 20 20 20 45 4E 44 49         ..     ENDI
020FA0:  46 0D 0A 20 20 45 4E 44 49 46 20 20 20 20 20 20    F..  ENDIF      
020FB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020FC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
020FD0:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 45 4E 44               ..END
020FE0:  49 46 0D 0A 45 4E 44 44 4F 20 4D 4F 44 49 53 54    IF..ENDDO MODIST
020FF0:  4F 43 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    OC..............
021000:  58 3A 54 48 54 0D 0A 20 20 53 45 4C 45 43 54 20    X:THT..  SELECT 
021010:  53 45 43 4F 4E 44 41 52 59 0D 0A 2A 20 53 49 20    SECONDARY..* SI 
021020:  41 55 43 55 4E 20 50 41 52 41 4D 45 54 52 45 20    AUCUN PARAMETRE 
021030:  4E 27 41 20 43 48 41 4E 47 45 20 2D 2D 3E 20 50    N'A CHANGE --> P
021040:  52 4F 50 4F 53 49 54 49 4F 4E 20 45 46 46 41 43    ROPOSITION EFFAC
021050:  45 4D 45 4E 54 0D 0A 20 20 20 20 20 49 46 20 4D    EMENT..     IF M
021060:  41 54 45 4C 49 45 52 3D 41 54 45 4C 49 45 52 20    ATELIER=ATELIER 
021070:  2E 41 4E 44 2E 20 53 45 43 54 49 4F 4E 3D 4D 53    .AND. SECTION=MS
021080:  45 43 54 49 4F 4E 20 2E 41 4E 44 2E 20 4D 41 43    ECTION .AND. MAC
021090:  48 49 4E 45 3D 4D 4D 41 43 48 49 4E 45 20 3B 0D    HINE=MMACHINE ;.
0210A0:  0A 20 20 20 20 20 2E 41 4E 44 2E 20 4C 49 42 45    .     .AND. LIBE
0210B0:  4C 4C 45 3D 4D 4C 49 42 45 4C 4C 45 20 2E 41 4E    LLE=MLIBELLE .AN
0210C0:  44 2E 20 4D 49 4E 49 3A 53 54 4F 43 4B 3D 4D 4D    D. MINI:STOCK=MM
0210D0:  49 4E 49 3A 53 54 4F 43 20 2E 41 4E 44 2E 20 3B    INI:STOC .AND. ;
0210E0:  0D 0A 20 20 20 20 20 50 52 49 58 3A 55 48 54 3D    ..     PRIX:UHT=
0210F0:  4D 50 52 49 58 3A 55 48 54 0D 0A 20 20 20 20 20    MPRIX:UHT..     
021100:  08 00 00 01 00 31 32 33 34 35 36 37 38 39 31 32    .....12345678912
021110:  33 00 00 02 00 31 32 33 34 35 36 37 38 39 31 32    3....12345678912
021120:  34 00 00 03 00 31 32 33 34 35 36 37 38 39 31 32    4....12345678912
021130:  35 00 00 04 00 31 32 33 34 35 36 37 38 39 31 32    5....12345678912
021140:  36 00 00 05 00 31 32 33 34 35 36 37 38 39 31 32    6....12345678912
021150:  37 00 00 06 00 31 32 33 34 35 36 37 38 39 31 32    7....12345678912
021160:  39 00 00 07 00 31 32 33 34 35 36 37 38 39 31 34    9....12345678914
021170:  37 00 00 08 00 31 32 35 20 20 20 20 20 20 20 20    7....125        
021180:  20 00 00 07 00 31 32 33 34 35 36 37 38 39 31 34     ....12345678914
021190:  37 00 00 32 31 32 35 36 20 20 20 00 00 08 00 35    7..21256   ....5
0211A0:  34 35 35 34 35 20 20 20 20 00 00 05 00 35 35 33    45545    ....553
0211B0:  32 36 35 32 20 20 20 00 00 03 00 35 35 34 33 32    2652   ....55432
0211C0:  35 31 20 20 20 00 00 06 00 35 36 34 32 33 35 31    51   ....5642351
0211D0:  20 20 20 00 00 01 00 35 36 38 35 32 33 31 20 20       ....5685231  
0211E0:  20 00 00 0B 00 37 38 35 34 36 39 20 20 20 20 00     ....785469    .
0211F0:  00 12 00 39 38 37 36 35 34 36 35 34 20 00 00 20    ...987654654 .. 
021200:  20 00 00 0A 00 33 34 35 36 37 38 39 31 32 33 34     ....34567891234
021210:  35 00 00 10 00 34 35 36 31 32 33 31 32 33 31 32    5....45612312312
021220:  33 00 00 0D 00 34 35 36 34 33 34 35 32 33 39 38    3....45643452398
021230:  34 00 00 0E 00 34 35 36 34 35 36 20 20 20 20 20    4....456456     
021240:  20 00 00 0B 00 37 38 39 34 35 36 31 32 33 34 35     ....78945612345
021250:  36 00 00 16 00 39 38 37 39 38 37 36 35 34 36 35    6....98798765465
021260:  34 00 00 24 00 31 32 35 34 20 20 20 20 20 20 20    4..$.1254       
021270:  20 00 00 2D 00 31 32 35 34 32 33 20 20 20 20 20     ..-.125423     
021280:  20 00 00 34 00 31 32 35 34 33 20 20 20 20 20 20     ..4.12543      
021290:  20 00 00 33 00 31 32 35 34 38 35 35 20 20 20 20     ..3.1254855    
0212A0:  20 00 00 2C 00 31 38 30 31 38 33 20 20 20 20 20     ..,.180183     
0212B0:  20 00 00 2A 00 32 31 20 20 20 20 20 20 20 20 20     ..*.21         
0212C0:  20 00 00 29 00 32 31 30 31 38 33 20 20 20 20 20     ..).210183     
0212D0:  20 00 00 2F 00 32 31 35 34 20 20 20 20 20 20 20     ../.2154       
0212E0:  20 00 00 09 00 32 32 32 32 32 32 32 32 32 32 32     ....22222222222
0212F0:  32 00 00 07 00 32 33 34 35 36 37 38 39 31 32 33    2....23456789123
021300:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021310:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021320:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021330:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021340:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021350:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021360:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021370:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021380:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021390:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0213A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0213B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0213C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0213D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0213E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0213F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0214A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0214B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0214C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0214D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0214E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0214F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
021500:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
021510:  1C 00 00 00 02 09 50 E5 1C 00 C1 02 00 00 00 02    ......P.........
021520:  1C 00 C6 02 00 00 00 02 1C 00 C2 02 00 00 00 02    ................
021530:  1C 00 C7 02 00 00 00 02 1C 00 C3 02 00 00 00 02    ................
021540:  1C 00 C8 02 00 00 00 02 1C 00 C4 02 00 00 00 02    ................
021550:  1C 00 C9 02 00 00 00 02 1C 00 C5 02 00 00 00 02    ................
021560:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021570:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021580:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021590:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0215F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
021600:  11 00 00 31 00 32 33 34 35 36 37 38 5C 20 20 20    ...1.2345678\   
021610:  20 00 00 34 00 32 33 35 20 20 20 20 20 20 20 20     ..4.235        
021620:  20 00 00 3D 00 32 35 31 32 20 20 20 20 20 20 20     ..=.2512       
021630:  20 00 00 36 00 32 35 33 20 20 20 20 20 20 20 20     ..6.253        
021640:  20 00 00 2C 00 32 35 33 31 20 20 20 20 20 20 20     ..,.2531       
021650:  20 00 00 3C 00 32 35 34 35 34 35 34 35 32 34 31     ..<.25454545241
021660:  4B 00 00 1E 00 32 35 34 36 20 20 20 20 20 20 20    K....2546       
021670:  20 00 00 2D 00 33 32 33 32 33 32 20 20 20 20 20     ..-.323232     
021680:  20 00 00 0A 00 33 34 35 36 37 38 39 31 32 33 34     ....34567891234
021690:  35 00 00 0F 00 34 35 36 31 32 33 20 20 20 20 20    5....456123     
0216A0:  20 00 00 13 00 34 35 36 31 32 33 31 32 33 31 32     ....45612312312
0216B0:  33 00 00 22 00 34 35 36 33 32 31 31 20 20 20 20    3..".4563211    
0216C0:  20 00 00 10 00 34 35 36 34 33 34 35 32 33 39 38     ....45643452398
0216D0:  34 00 00 11 00 34 35 36 34 35 36 20 20 20 20 20    4....456456     
0216E0:  20 00 00 0B 00 34 35 36 37 38 39 31 32 33 34 35     ....45678912345
0216F0:  36 00 00 32 00 35 32 31 20 20 20 20 20 20 20 20    6..2.521        
021700:  20 00 00 33 00 35 32 33 20 20 20 20 20 20 20 20     ..3.523        
021710:  20 00 00 3F 00 35 34 35 34 20 20 20 20 20 20 20     ..?.5454       
021720:  20 00 00 41 00 35 34 36 35 34 33 32 31 20 20 20     ..A.54654321   
021730:  20 00 00 43 00 35 37 34 35 34 35 34 35 32 31 20     ..C.5745454521 
021740:  20 00 00 1B 00 35 39 37 38 38 38 38 38 20 20 20     ....59788888   
021750:  20 00 00 40 00 36 35 34 36 34 33 36 34 20 20 20     ..@.65464364   
021760:  20 00 00 2E 00 36 35 34 36 35 34 2D 35 36 34 20     ....654654-564 
021770:  20 00 00 42 00 36 35 35 34 35 34 33 32 35 34 31     ..B.65545432541
021780:  20 00 00 0D 00 37 38 39 34 35 36 31 32 33 34 35     ....78945612345
021790:  36 00 00 1D 00 39 39 39 39 39 39 39 39 39 39 39    6....99999999999
0217A0:  39 00 00 17 00 42 41 54 4F 4E 20 20 20 20 20 20    9....BATON      
0217B0:  20 00 00 22 00 43 4C 4F 56 49 53 20 20 20 20 20     ..".CLOVIS     
0217C0:  20 00 00 1F 00 45 52 20 20 20 20 20 20 20 20 20     ....ER         
0217D0:  20 00 00 1A 00 46 52 49 45 4E 20 20 20 20 20 20     ....FRIEN      
0217E0:  20 00 00 1E 00 4D 41 43 48 49 4E 45 20 20 20 20     ....MACHINE    
0217F0:  20 00 00 18 00 56 49 53 20 30 34 20 53 49 20 20     ....VIS 04 SI  
021800:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021810:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021820:  20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20               ;..  
021830:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021840:  20 20 20 20 20 20 20 20 49 22 0D 0A 40 20 20 37            I"..@  7
021850:  2C 20 30 20 53 41 59 20 22 49 20 20 20 20 20 20    , 0 SAY "I      
021860:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021870:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021880:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D                  ;.
021890:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
0218A0:  20 20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40               I"..@
0218B0:  20 20 38 2C 20 30 20 53 41 59 20 22 49 20 20 20      8, 0 SAY "I   
0218C0:  4C 49 53 54 45 20 44 45 53 20 43 4F 4D 4D 41 4E    LISTE DES COMMAN
0218D0:  44 45 53 20 41 56 45 43 20 55 4E 20 44 45 4C 41    DES AVEC UN DELA
0218E0:  49 20 44 45 20 4C 49 56 52 41 49 53 4F 4E 20 4E    I DE LIVRAISON N
0218F0:  4F 4E 3B 0D 0A 20 52 45 53 50 45 43 54 45 20 2D    ON;.. RESPECTE -
021900:  2D 3E 20 31 20 20 20 20 20 20 20 20 20 20 49 22    -> 1          I"
021910:  0D 0A 40 20 20 39 2C 20 30 20 53 41 59 20 22 49    ..@  9, 0 SAY "I
021920:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021930:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021940:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021950:  20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20        ;..         
021960:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021970:  20 49 22 0D 0A 40 20 31 30 2C 20 30 20 53 41 59     I"..@ 10, 0 SAY
021980:  20 22 49 20 20 20 4C 49 53 54 45 20 44 45 53 20     "I   LISTE DES 
021990:  44 45 4D 41 4E 44 45 53 20 44 27 41 43 48 41 54    DEMANDES D'ACHAT
0219A0:  20 53 45 4C 4F 4E 20 4C 45 20 4E 4F 4D 20 44 45     SELON LE NOM DE
0219B0:  20 4C 27 45 4D 45 54 3B 0D 0A 54 45 55 52 20 20     L'EMET;..TEUR  
0219C0:  20 20 20 20 20 2D 2D 3E 20 32 20 20 20 20 20 20         --> 2      
0219D0:  20 20 20 20 49 22 0D 0A 40 20 31 31 2C 20 30 20        I"..@ 11, 0 
0219E0:  53 41 59 20 22 49 20 20 20 20 20 20 20 20 20 20    SAY "I          
0219F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021A00:  03 01 00 02 00 31 32 33 34 35 36 37 38 39 31 32    .....12345678912
021A10:  32 04 00 07 00 32 33 34 35 36 37 38 39 31 32 33    2....23456789123
021A20:  34 02 00 37 00 35 32 33 20 20 20 20 20 20 20 20    4..7.523        
021A30:  20 05 00 10 00 34 35 36 31 32 33 20 20 20 20 20     ....456123     
021A40:  20 00 00 14 00 34 35 36 31 32 33 31 32 33 31 32     ....45612312312
021A50:  33 00 00 11 00 34 35 36 34 33 34 35 32 33 39 38    3....45643452398
021A60:  34 00 00 12 00 34 35 36 34 35 36 20 20 20 20 20    4....456456     
021A70:  20 00 00 0C 00 34 35 36 37 38 39 31 32 33 34 35     ....45678912345
021A80:  36 00 00 1B 00 35 39 37 38 38 38 38 38 20 20 20    6....59788888   
021A90:  20 00 00 0D 00 37 38 39 34 35 36 31 32 33 34 35     ....78945612345
021AA0:  36 00 00 1D 00 39 39 39 39 39 39 39 39 39 39 39    6....99999999999
021AB0:  39 00 00 17 00 42 41 54 4F 4E 20 20 20 20 20 20    9....BATON      
021AC0:  20 00 00 1F 00 45 52 20 20 20 20 20 20 20 20 20     ....ER         
021AD0:  20 00 00 1A 00 46 52 49 45 4E 20 20 20 20 20 20     ....FRIEN      
021AE0:  20 00 00 1E 00 4D 41 43 48 49 4E 45 20 20 20 20     ....MACHINE    
021AF0:  20 00 00 18 00 56 49 53 20 30 34 20 53 49 20 20     ....VIS 04 SI  
021B00:  20 00 00 20 00 32 35 34 36 20 20 20 20 20 20 20     .. .2546       
021B10:  20 00 00 0A 00 33 34 35 36 37 38 39 31 32 33 34     ....34567891234
021B20:  35 00 00 1C 00 34 20 20 20 20 20 20 20 20 20 20    5....4          
021B30:  20 00 00 10 00 34 35 36 31 32 33 20 20 20 20 20     ....456123     
021B40:  20 00 00 14 00 34 35 36 31 32 33 31 32 33 31 32     ....45612312312
021B50:  33 00 00 11 00 34 35 36 34 33 34 35 32 33 39 38    3....45643452398
021B60:  34 00 00 12 00 34 35 36 34 35 36 20 20 20 20 20    4....456456     
021B70:  20 00 00 0C 00 34 35 36 37 38 39 31 32 33 34 35     ....45678912345
021B80:  36 00 00 1B 00 35 39 37 38 38 38 38 38 20 20 20    6....59788888   
021B90:  20 00 00 0D 00 37 38 39 34 35 36 31 32 33 34 35     ....78945612345
021BA0:  36 00 00 1D 00 39 39 39 39 39 39 39 39 39 39 39    6....99999999999
021BB0:  39 00 00 17 00 42 41 54 4F 4E 20 20 20 20 20 20    9....BATON      
021BC0:  20 00 00 1F 00 45 52 20 20 20 20 20 20 20 20 20     ....ER         
021BD0:  20 00 00 1A 00 46 52 49 45 4E 20 20 20 20 20 20     ....FRIEN      
021BE0:  20 00 00 1E 00 4D 41 43 48 49 4E 45 20 20 20 20     ....MACHINE    
021BF0:  20 00 00 18 00 56 49 53 20 30 34 20 53 49 20 20     ....VIS 04 SI  
021C00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021C10:  20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20              ;..   
021C20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021C30:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 32 2C           I"..@ 12,
021C40:  20 30 20 53 41 59 20 22 49 20 20 20 4C 49 53 54     0 SAY "I   LIST
021C50:  45 53 20 44 45 53 20 44 45 4D 41 4E 44 45 53 20    ES DES DEMANDES 
021C60:  44 27 41 43 48 41 54 20 44 41 4E 53 20 55 4E 45    D'ACHAT DANS UNE
021C70:  20 50 45 52 49 4F 44 45 20 44 4F 4E 4E 3B 0D 0A     PERIODE DONN;..
021C80:  45 45 20 20 20 20 20 20 20 20 20 2D 2D 3E 20 33    EE         --> 3
021C90:  20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20              I"..@ 
021CA0:  31 33 2C 20 30 20 53 41 59 20 22 49 20 20 20 20    13, 0 SAY "I    
021CB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021CC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021CD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021CE0:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    ;..             
021CF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 49 22 0D                 I".
021D00:  0A 40 20 31 34 2C 20 30 20 53 41 59 20 22 49 20    .@ 14, 0 SAY "I 
021D10:  20 20 46 49 4E 20 44 45 20 54 52 41 49 54 45 4D      FIN DE TRAITEM
021D20:  45 4E 54 20 20 20 20 20 20 20 20 20 20 20 20 20    ENT             
021D30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021D40:  20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20       ;..          
021D50:  20 2D 2D 3E 20 46 20 20 20 20 20 20 20 20 20 20     --> F          
021D60:  49 22 0D 0A 40 20 31 35 2C 20 30 20 53 41 59 20    I"..@ 15, 0 SAY 
021D70:  22 49 20 20 20 20 20 20 20 20 20 20 20 20 20 20    "I              
021D80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021D90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021DA0:  20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20          ;..       
021DB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021DC0:  20 20 20 49 22 0D 0A 40 20 31 36 2C 20 30 20 53       I"..@ 16, 0 S
021DD0:  41 59 20 22 49 20 20 20 20 20 20 20 20 20 20 20    AY "I           
021DE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021DF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
021E00:  0F 00 00 01 00 31 32 33 34 35 36 37 38 39 31 32    .....12345678912
021E10:  33 00 00 03 00 31 32 33 34 35 36 37 38 39 31 32    3....12345678912
021E20:  34 00 00 04 00 31 32 33 34 35 36 37 38 39 31 32    4....12345678912
021E30:  35 00 00 05 00 31 32 33 34 35 36 37 38 39 31 32    5....12345678912
021E40:  36 00 00 06 00 31 32 33 34 35 36 37 38 39 31 32    6....12345678912
021E50:  37 00 00 08 00 31 32 35 33 35 34 20 20 20 20 20    7....125354     
021E60:  20 00 00 21 00 31 32 35 34 20 20 20 20 20 20 20     ..!.1254       
021E70:  20 00 00 29 00 31 32 35 34 32 33 20 20 20 20 20     ..).125423     
021E80:  20 00 00 30 00 31 32 35 34 33 20 20 20 20 20 20     ..0.12543      
021E90:  20 00 00 2F 00 31 32 35 34 38 35 35 20 20 20 20     ../.1254855    
021EA0:  20 00 00 28 00 31 38 30 31 38 33 20 20 20 20 20     ..(.180183     
021EB0:  20 00 00 26 00 32 31 30 31 38 33 20 20 20 20 20     ..&.210183     
021EC0:  20 00 00 2B 00 32 31 35 34 20 20 20 20 20 20 20     ..+.2154       
021ED0:  20 00 00 09 00 32 32 32 32 32 32 32 32 32 32 32     ....22222222222
021EE0:  32 00 00 07 00 32 33 34 35 36 37 38 39 31 32 33    2....23456789123
021EF0:  34 00 00 07 00 32 33 34 35 36 37 38 39 31 32 33    4....23456789123
021F00:  34 00 00 07 00 32 33 34 35 36 37 38 39 31 32 33    4....23456789123
021F10:  34 00 00 07 00 32 33 34 35 36 37 38 39 31 32 33    4....23456789123
021F20:  34 00 00 04 00 31 32 33 34 35 36 37 38 39 31 32    4....12345678912
021F30:  35 00 00 05 00 31 32 33 34 35 36 37 38 39 31 32    5....12345678912
021F40:  36 00 00 06 00 31 32 33 34 35 36 37 38 39 31 32    6....12345678912
021F50:  37 00 00 08 00 31 32 35 33 35 34 20 20 20 20 20    7....125354     
021F60:  20 00 00 24 00 31 32 35 34 20 20 20 20 20 20 20     ..$.1254       
021F70:  20 00 00 2D 00 31 32 35 34 32 33 20 20 20 20 20     ..-.125423     
021F80:  20 00 00 34 00 31 32 35 34 33 20 20 20 20 20 20     ..4.12543      
021F90:  20 00 00 33 00 31 32 35 34 38 35 35 20 20 20 20     ..3.1254855    
021FA0:  20 00 00 2C 00 31 38 30 31 38 33 20 20 20 20 20     ..,.180183     
021FB0:  20 00 00 2A 00 32 31 20 20 20 20 20 20 20 20 20     ..*.21         
021FC0:  20 00 00 29 00 32 31 30 31 38 33 20 20 20 20 20     ..).210183     
021FD0:  20 00 00 2F 00 32 31 35 34 20 20 20 20 20 20 20     ../.2154       
021FE0:  20 00 00 09 00 32 32 32 32 32 32 32 32 32 32 32     ....22222222222
021FF0:  32 00 00 07 00 32 33 34 35 36 37 38 39 31 32 33    2....23456789123
022000:  20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20 20             ;..    
022010:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022020:  20 20 20 20 20 20 49 22 0D 0A 40 20 31 37 2C 20          I"..@ 17, 
022030:  30 20 53 41 59 20 22 49 20 20 20 20 20 20 20 20    0 SAY "I        
022040:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022050:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022060:  20 20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20                ;.. 
022070:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022080:  20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20 31             I"..@ 1
022090:  38 2C 20 30 20 53 41 59 20 22 49 20 20 20 20 20    8, 0 SAY "I     
0220A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0220B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0220C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B                   ;
0220D0:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
0220E0:  20 20 20 20 20 20 20 20 20 20 20 20 49 22 0D 0A                I"..
0220F0:  40 20 31 39 2C 20 30 20 53 41 59 20 22 2B 2D 2D    @ 19, 0 SAY "+--
022100:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
022110:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
022120:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
022130:  2D 2D 3B 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    --;..-----------
022140:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B    ---------------+
022150:  22 0D 0A 40 20 32 30 2C 35 39 20 53 41 59 20 22    "..@ 20,59 SAY "
022160:  49 20 52 45 50 4F 4E 53 45 22 0D 0A 40 20 32 30    I REPONSE"..@ 20
022170:  2C 36 39 20 47 45 54 20 52 45 50 4F 4E 53 45 35    ,69 GET REPONSE5
022180:  0D 0A 40 20 32 30 2C 37 39 20 53 41 59 20 22 49    ..@ 20,79 SAY "I
022190:  22 0D 0A 40 20 32 31 2C 35 39 20 53 41 59 20 22    "..@ 21,59 SAY "
0221A0:  2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    +---------------
0221B0:  2D 2D 2D 2D 2B 22 0D 0A 52 45 41 44 0D 0A 49 46    ----+"..READ..IF
0221C0:  20 21 28 52 45 50 4F 4E 53 45 35 29 23 22 46 22     !(REPONSE5)#"F"
0221D0:  20 2E 41 4E 44 2E 20 52 45 50 4F 4E 53 45 35 23     .AND. REPONSE5#
0221E0:  22 31 22 20 2E 41 4E 44 2E 20 52 45 50 4F 4E 53    "1" .AND. REPONS
0221F0:  45 35 23 22 32 22 20 2E 41 4E 44 2E 20 52 45 50    E5#"2" .AND. REP
022200:  10 00 00 37 00 35 34 35 34 20 20 20 20 20 20 20    ...7.5454       
022210:  20 00 00 39 00 35 34 36 35 34 33 32 31 20 20 20     ..9.54654321   
022220:  20 00 00 3B 00 35 37 34 35 34 35 34 35 32 31 20     ..;.5745454521 
022230:  20 00 00 1A 00 35 39 37 38 38 38 38 38 20 20 20     ....59788888   
022240:  20 00 00 38 00 36 35 34 36 34 33 36 34 20 20 20     ..8.65464364   
022250:  20 00 00 2A 00 36 35 34 36 35 34 2D 35 36 34 20     ..*.654654-564 
022260:  20 00 00 3A 00 36 35 35 34 35 34 33 32 35 34 31     ..:.65545432541
022270:  20 00 00 0C 00 37 38 39 34 35 36 31 32 33 34 35     ....78945612345
022280:  36 00 00 3E 00 39 38 37 39 38 37 36 35 34 36 35    6..>.98798765465
022290:  34 00 00 1B 00 39 39 39 39 39 39 39 39 39 39 39    4....99999999999
0222A0:  39 00 00 16 00 42 41 54 4F 4E 20 20 20 20 20 20    9....BATON      
0222B0:  20 00 00 1F 00 43 4C 4F 56 49 53 20 20 20 20 20     ....CLOVIS     
0222C0:  20 00 00 1D 00 45 52 20 20 20 20 20 20 20 20 20     ....ER         
0222D0:  20 00 00 19 00 46 52 49 45 4E 20 20 20 20 20 20     ....FRIEN      
0222E0:  20 00 00 1C 00 4D 41 43 48 49 4E 45 20 20 20 20     ....MACHINE    
0222F0:  20 00 00 17 00 56 49 53 20 30 34 20 53 49 20 20     ....VIS 04 SI  
022300:  20 00 00 21 00 35 32 35 32 20 20 20 20 20 20 20     ..!.5252       
022310:  20 00 00 3F 00 35 34 35 34 20 20 20 20 20 20 20     ..?.5454       
022320:  20 00 00 41 00 35 34 36 35 34 33 32 31 20 20 20     ..A.54654321   
022330:  20 00 00 43 00 35 37 34 35 34 35 34 35 32 31 20     ..C.5745454521 
022340:  20 00 00 1B 00 35 39 37 38 38 38 38 38 20 20 20     ....59788888   
022350:  20 00 00 40 00 36 35 34 36 34 33 36 34 20 20 20     ..@.65464364   
022360:  20 00 00 2E 00 36 35 34 36 35 34 2D 35 36 34 20     ....654654-564 
022370:  20 00 00 42 00 36 35 35 34 35 34 33 32 35 34 31     ..B.65545432541
022380:  20 00 00 0D 00 37 38 39 34 35 36 31 32 33 34 35     ....78945612345
022390:  36 00 00 1D 00 39 39 39 39 39 39 39 39 39 39 39    6....99999999999
0223A0:  39 00 00 17 00 42 41 54 4F 4E 20 20 20 20 20 20    9....BATON      
0223B0:  20 00 00 22 00 43 4C 4F 56 49 53 20 20 20 20 20     ..".CLOVIS     
0223C0:  20 00 00 1F 00 45 52 20 20 20 20 20 20 20 20 20     ....ER         
0223D0:  20 00 00 1A 00 46 52 49 45 4E 20 20 20 20 20 20     ....FRIEN      
0223E0:  20 00 00 1E 00 4D 41 43 48 49 4E 45 20 20 20 20     ....MACHINE    
0223F0:  20 00 00 18 00 56 49 53 20 30 34 20 53 49 20 20     ....VIS 04 SI  
022400:  4F 4E 53 45 35 23 22 33 22 0D 0A 40 20 32 32 2C    ONSE5#"3"..@ 22,
022410:  30 20 53 41 59 20 22 41 55 43 55 4E 20 54 52 41    0 SAY "AUCUN TRA
022420:  49 54 45 4D 45 4E 54 20 4E 45 20 43 4F 52 52 45    ITEMENT NE CORRE
022430:  53 50 4F 4E 44 20 41 20 56 4F 54 52 45 20 53 45    SPOND A VOTRE SE
022440:  4C 45 43 54 49 4F 4E 22 0D 0A 45 4C 53 45 0D 0A    LECTION"..ELSE..
022450:  20 49 46 20 21 28 52 45 50 4F 4E 53 45 35 29 20     IF !(REPONSE5) 
022460:  3D 20 22 46 22 0D 0A 20 52 45 4C 45 41 53 45 20    = "F".. RELEASE 
022470:  52 45 50 4F 4E 53 45 35 2C 43 4F 4E 54 52 45 50    REPONSE5,CONTREP
022480:  4F 52 54 2C 49 4D 50 52 49 4D 41 4E 54 45 0D 0A    ORT,IMPRIMANTE..
022490:  20 52 45 54 55 52 4E 0D 0A 20 45 4C 53 45 0D 0A     RETURN.. ELSE..
0224A0:  20 40 20 32 32 2C 30 20 53 41 59 20 22 44 65 73     @ 22,0 SAY "Des
0224B0:  69 72 65 7A 2D 76 6F 75 73 20 75 6E 65 20 73 6F    irez-vous une so
0224C0:  72 74 69 65 20 73 75 72 20 69 6D 70 72 69 6D 61    rtie sur imprima
0224D0:  6E 74 65 20 28 4F 2F 4E 29 20 3F 20 22 20 47 45    nte (O/N) ? " GE
0224E0:  54 20 49 4D 50 52 49 4D 41 4E 54 45 0D 0A 20 52    T IMPRIMANTE.. R
0224F0:  45 41 44 0D 0A 20 20 20 49 46 20 52 45 50 4F 4E    EAD..   IF REPON
022500:  53 45 35 20 3D 20 22 31 22 0D 0A 20 20 20 45 52    SE5 = "1"..   ER
022510:  41 53 45 0D 0A 20 20 20 20 20 20 20 20 49 46 20    ASE..        IF 
022520:  21 28 49 4D 50 52 49 4D 41 4E 54 45 29 20 3D 20    !(IMPRIMANTE) = 
022530:  22 4F 22 0D 0A 09 52 45 50 4F 52 54 20 46 4F 52    "O"...REPORT FOR
022540:  4D 20 53 45 4C 45 43 54 44 41 20 46 4F 52 20 44    M SELECTDA FOR D
022550:  45 4C 41 49 20 3C 20 53 45 4D 41 49 4E 45 20 2E    ELAI < SEMAINE .
022560:  41 4E 44 2E 20 24 28 44 41 54 45 2C 37 2C 32 29    AND. $(DATE,7,2)
022570:  3D 3B 0D 0A 20 20 20 20 20 20 20 20 24 28 44 41    =;..        $(DA
022580:  3A 44 41 54 45 2C 37 2C 32 29 20 54 4F 20 50 52    :DATE,7,2) TO PR
022590:  49 4E 54 0D 0A 09 45 4C 53 45 0D 0A 09 52 45 50    INT...ELSE...REP
0225A0:  4F 52 54 20 46 4F 52 4D 20 53 45 4C 45 43 54 44    ORT FORM SELECTD
0225B0:  41 20 46 4F 52 20 44 45 4C 41 49 20 3C 20 53 45    A FOR DELAI < SE
0225C0:  4D 41 49 4E 45 20 2E 41 4E 44 2E 20 24 28 44 41    MAINE .AND. $(DA
0225D0:  54 45 2C 37 2C 32 29 3D 3B 0D 0A 20 20 20 20 20    TE,7,2)=;..     
0225E0:  20 20 20 24 28 44 41 3A 44 41 54 45 2C 37 2C 32       $(DA:DATE,7,2
0225F0:  29 20 0D 0A 09 45 4E 44 49 46 0D 0A 20 20 20 45    ) ...ENDIF..   E
022600:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
022610:  2A 2A 2A 2A 20 47 45 4E 45 52 41 54 49 4F 4E 20    **** GENERATION 
022620:  44 27 45 54 41 54 28 53 29 20 2A 2A 2A 2A 2A 2A    D'ETAT(S) ******
022630:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
022640:  0D 0A 0D 0A 55 53 45 20 44 41 20 49 4E 44 45 58    ....USE DA INDEX
022650:  20 44 41 0D 0A 53 54 4F 52 45 20 22 4F 22 20 54     DA..STORE "O" T
022660:  4F 20 43 4F 4E 54 52 45 50 4F 52 54 0D 0A 44 4F    O CONTREPORT..DO
022670:  20 57 48 49 4C 45 20 43 4F 4E 54 52 45 50 4F 52     WHILE CONTREPOR
022680:  54 20 3D 20 22 4F 22 0D 0A 53 54 4F 52 45 20 22    T = "O"..STORE "
022690:  4E 22 20 54 4F 20 49 4D 50 52 49 4D 41 4E 54 45    N" TO IMPRIMANTE
0226A0:  0D 0A 53 54 4F 52 45 20 22 46 22 20 54 4F 20 52    ..STORE "F" TO R
0226B0:  45 50 4F 4E 53 45 35 0D 0A 45 52 41 53 45 0D 0A    EPONSE5..ERASE..
0226C0:  40 20 20 33 2C 20 30 20 53 41 59 20 22 2B 2D 2D    @  3, 0 SAY "+--
0226D0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0226E0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0226F0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
022700:  2D 2D 3B 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    --;..-----------
022710:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B    ---------------+
022720:  22 0D 0A 40 20 20 34 2C 20 30 20 53 41 59 20 22    "..@  4, 0 SAY "
022730:  49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    I               
022740:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022750:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022760:  20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20         ;..        
022770:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022780:  20 20 49 22 0D 0A 40 20 20 35 2C 20 30 20 53 41      I"..@  5, 0 SA
022790:  59 20 22 49 20 20 20 20 20 20 20 20 20 20 20 20    Y "I            
0227A0:  20 20 20 20 20 20 20 47 45 4E 45 52 41 54 49 4F           GENERATIO
0227B0:  4E 20 44 27 45 54 41 54 20 53 55 49 56 41 4E 54    N D'ETAT SUIVANT
0227C0:  20 56 4F 54 52 45 20 3B 0D 0A 43 48 4F 49 58 20     VOTRE ;..CHOIX 
0227D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0227E0:  20 20 20 20 20 49 22 0D 0A 40 20 20 36 2C 20 30         I"..@  6, 0
0227F0:  20 53 41 59 20 22 49 20 20 20 20 20 20 20 20 20     SAY "I         
022800:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
022810:  1D 00 00 00 02 09 50 E5 1D 00 C1 02 00 00 00 02    ......P.........
022820:  1D 00 C6 02 00 00 00 02 1D 00 C2 02 00 00 00 02    ................
022830:  1D 00 C7 02 00 00 00 02 1D 00 C3 02 00 00 00 02    ................
022840:  1D 00 C8 02 00 00 00 02 1D 00 C4 02 00 00 00 02    ................
022850:  1D 00 C9 02 00 00 00 02 1D 00 C5 02 00 00 00 02    ................
022860:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022870:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022880:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022890:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0228F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
022900:  4C 53 45 09 0D 0A 20 20 20 20 20 20 20 20 49 46    LSE...        IF
022910:  20 52 45 50 4F 4E 53 45 35 20 3D 20 22 32 22 20     REPONSE5 = "2" 
022920:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022930:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022940:  20 20 20 20 20 0D 0A 09 45 52 41 53 45 0D 0A 20         ...ERASE.. 
022950:  20 20 20 20 20 20 20 40 20 34 2C 30 20 53 41 59           @ 4,0 SAY
022960:  20 22 20 22 20 20 20 20 20 20 20 20 20 20 20 20     " "            
022970:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022980:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A                  ..
022990:  20 20 20 20 20 20 20 20 41 43 43 45 50 54 20 22            ACCEPT "
0229A0:  44 6F 6E 6E 65 7A 20 6C 65 20 6E 6F 6D 20 64 65    Donnez le nom de
0229B0:  20 6C 27 65 6D 65 74 74 65 75 72 20 22 20 54 4F     l'emetteur " TO
0229C0:  20 50 41 52 41 4D 45 54 52 45 20 20 20 0D 0A 20     PARAMETRE   .. 
0229D0:  20 20 20 20 20 20 20 45 52 41 53 45 20 20 20 20           ERASE    
0229E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0229F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022A00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A                  ..
022A10:  09 09 49 46 20 21 28 49 4D 50 52 49 4D 41 4E 54    ..IF !(IMPRIMANT
022A20:  45 29 20 3D 20 22 4F 22 0D 0A 09 09 52 45 50 4F    E) = "O"....REPO
022A30:  52 54 20 46 4F 52 4D 20 45 4D 45 54 44 41 20 46    RT FORM EMETDA F
022A40:  4F 52 20 50 41 52 41 4D 45 54 52 45 20 24 20 45    OR PARAMETRE $ E
022A50:  4D 45 54 54 45 55 52 20 54 4F 20 50 52 49 4E 54    METTEUR TO PRINT
022A60:  0D 0A 09 09 52 45 4C 45 41 53 45 20 50 41 52 41    ....RELEASE PARA
022A70:  4D 45 54 52 45 0D 0A 09 09 45 4C 53 45 0D 0A 09    METRE....ELSE...
022A80:  09 52 45 50 4F 52 54 20 46 4F 52 4D 20 45 4D 45    .REPORT FORM EME
022A90:  54 44 41 20 46 4F 52 20 50 41 52 41 4D 45 54 52    TDA FOR PARAMETR
022AA0:  45 20 24 20 45 4D 45 54 54 45 55 52 0D 0A 09 09    E $ EMETTEUR....
022AB0:  52 45 4C 45 41 53 45 20 50 41 52 41 4D 45 54 52    RELEASE PARAMETR
022AC0:  45 0D 0A 09 09 45 4E 44 49 46 0D 0A 09 45 4C 53    E....ENDIF...ELS
022AD0:  45 0D 0A 09 09 20 20 20 49 46 20 52 45 50 4F 4E    E....   IF REPON
022AE0:  53 45 35 20 3D 20 22 33 22 0D 0A 09 09 20 20 20    SE5 = "3"....   
022AF0:  45 52 41 53 45 0D 0A 09 09 20 20 20 53 54 4F 52    ERASE....   STOR
022B00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022B10:  20 20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20                ;.. 
022B20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022B30:  20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20 31             I"..@ 1
022B40:  31 2C 20 30 20 53 41 59 20 22 49 20 20 4C 49 53    1, 0 SAY "I  LIS
022B50:  54 45 20 44 45 53 20 50 49 45 43 45 53 20 53 45    TE DES PIECES SE
022B60:  4C 4F 4E 20 55 4E 45 20 50 4C 41 47 45 20 44 45    LON UNE PLAGE DE
022B70:  20 50 52 49 58 20 20 20 20 20 20 20 20 20 20 3B     PRIX          ;
022B80:  0D 0A 20 20 2D 2D 3E 20 33 20 20 20 20 20 20 20    ..  --> 3       
022B90:  20 20 20 20 20 20 20 20 20 20 20 20 49 22 0D 0A                I"..
022BA0:  40 20 31 32 2C 20 30 20 53 41 59 20 22 49 20 20    @ 12, 0 SAY "I  
022BB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022BC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022BD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022BE0:  20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20      ;..           
022BF0:  52 45 50 4F 4E 53 45 20 20 20 20 20 20 20 20 49    REPONSE        I
022C00:  22 0D 0A 40 20 31 33 2C 20 30 20 53 41 59 20 22    "..@ 13, 0 SAY "
022C10:  49 20 20 46 49 4E 20 44 45 20 54 52 41 49 54 45    I  FIN DE TRAITE
022C20:  4D 45 4E 54 20 20 20 20 20 20 20 20 20 20 20 20    MENT            
022C30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022C40:  20 20 20 20 20 3B 0D 0A 20 20 2D 2D 3E 20 46 20         ;..  --> F 
022C50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022C60:  20 20 49 22 0D 0A 40 20 31 34 2C 20 30 20 53 41      I"..@ 14, 0 SA
022C70:  59 20 22 49 20 20 20 20 20 20 20 20 20 20 20 20    Y "I            
022C80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022C90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022CA0:  20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20            ;..     
022CB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022CC0:  20 20 20 20 20 49 22 0D 0A 40 20 31 35 2C 20 30         I"..@ 15, 0
022CD0:  20 53 41 59 20 22 49 20 20 20 20 20 20 20 20 20     SAY "I         
022CE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022CF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022D00:  45 20 22 20 20 20 20 20 22 20 54 4F 20 50 45 52    E "     " TO PER
022D10:  49 4F 44 45 0D 0A 09 09 20 20 20 40 20 31 2C 30    IODE....   @ 1,0
022D20:  20 53 41 59 20 22 44 6F 6E 6E 65 7A 20 6C 61 20     SAY "Donnez la 
022D30:  70 65 72 69 6F 64 65 20 27 4D 4D 2F 41 41 27 20    periode 'MM/AA' 
022D40:  22 20 47 45 54 20 50 45 52 49 4F 44 45 20 50 49    " GET PERIODE PI
022D50:  43 54 55 52 45 20 22 39 39 2F 39 39 22 0D 0A 09    CTURE "99/99"...
022D60:  09 20 20 20 52 45 41 44 0D 0A 09 09 20 20 20 53    .   READ....   S
022D70:  54 4F 52 45 20 22 46 4F 52 20 24 28 44 41 3A 44    TORE "FOR $(DA:D
022D80:  41 54 45 2C 34 2C 35 29 20 3D 20 50 45 52 49 4F    ATE,4,5) = PERIO
022D90:  44 45 22 20 54 4F 20 43 4F 4E 44 49 54 49 4F 4E    DE" TO CONDITION
022DA0:  0D 0A 09 09 09 45 52 41 53 45 0D 0A 09 09 09 49    .....ERASE.....I
022DB0:  46 20 21 28 49 4D 50 52 49 4D 41 4E 54 45 29 20    F !(IMPRIMANTE) 
022DC0:  3D 20 22 4F 22 0D 0A 09 09 09 52 45 50 4F 52 54    = "O".....REPORT
022DD0:  20 46 4F 52 4D 20 44 41 44 41 54 45 20 26 43 4F     FORM DADATE &CO
022DE0:  4E 44 49 54 49 4F 4E 20 54 4F 20 50 52 49 4E 54    NDITION TO PRINT
022DF0:  0D 0A 09 09 09 52 45 4C 45 41 53 45 20 43 4F 4E    .....RELEASE CON
022E00:  44 49 54 49 4F 4E 2C 44 41 54 45 31 2C 44 41 54    DITION,DATE1,DAT
022E10:  45 32 0D 0A 09 09 09 45 4C 53 45 20 0D 0A 09 09    E2.....ELSE ....
022E20:  09 52 45 50 4F 52 54 20 46 4F 52 4D 20 44 41 44    .REPORT FORM DAD
022E30:  41 54 45 20 26 43 4F 4E 44 49 54 49 4F 4E 0D 0A    ATE &CONDITION..
022E40:  09 09 09 52 45 4C 45 41 53 45 20 43 4F 4E 44 49    ...RELEASE CONDI
022E50:  54 49 4F 4E 2C 50 45 52 49 4F 44 45 0D 0A 09 09    TION,PERIODE....
022E60:  09 45 4E 44 49 46 0D 0A 09 09 20 20 20 45 4C 53    .ENDIF....   ELS
022E70:  45 0D 0A 09 09 20 20 20 45 4E 44 49 46 20 33 0D    E....   ENDIF 3.
022E80:  0A 09 45 4E 44 49 46 20 32 0D 0A 20 20 20 45 4E    ..ENDIF 2..   EN
022E90:  44 49 46 20 31 0D 0A 20 45 4E 44 49 46 20 46 0D    DIF 1.. ENDIF F.
022EA0:  0A 45 4E 44 49 46 0D 0A 3F 20 22 56 61 6C 69 64    .ENDIF..? "Valid
022EB0:  65 7A 22 0D 0A 53 45 54 20 43 4F 4E 53 4F 4C 45    ez"..SET CONSOLE
022EC0:  20 4F 46 46 0D 0A 57 41 49 54 0D 0A 53 45 54 20     OFF..WAIT..SET 
022ED0:  43 4F 4E 53 4F 4C 45 20 4F 4E 0D 0A 40 20 32 32    CONSOLE ON..@ 22
022EE0:  2C 30 20 53 41 59 20 22 20 20 20 20 20 20 20 20    ,0 SAY "        
022EF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022F00:  20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20               ;..  
022F10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022F20:  20 20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 36            I"..@ 16
022F30:  2C 20 30 20 53 41 59 20 22 49 20 20 20 20 20 20    , 0 SAY "I      
022F40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022F50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022F60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D                  ;.
022F70:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
022F80:  20 20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40               I"..@
022F90:  20 31 37 2C 20 30 20 53 41 59 20 22 49 20 20 20     17, 0 SAY "I   
022FA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022FB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022FC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
022FD0:  20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20     ;..            
022FE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 22                  I"
022FF0:  0D 0A 40 20 31 38 2C 20 30 20 53 41 59 20 22 49    ..@ 18, 0 SAY "I
023000:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023010:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023020:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023030:  20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20        ;..         
023040:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023050:  20 49 22 0D 0A 40 20 31 39 2C 20 30 20 53 41 59     I"..@ 19, 0 SAY
023060:  20 22 49 20 20 20 20 20 20 20 20 20 20 20 20 20     "I             
023070:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023080:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023090:  20 20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20           ;..      
0230A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0230B0:  20 20 20 20 49 22 0D 0A 40 20 32 30 2C 20 30 20        I"..@ 20, 0 
0230C0:  53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    SAY "+----------
0230D0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0230E0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0230F0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 3B 0D 0A 2D 2D 2D    ----------;..---
023100:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023110:  20 20 20 20 20 20 20 20 22 0D 0A 45 4E 44 44 4F            "..ENDDO
023120:  20 47 45 4E 45 52 41 54 49 4F 4E 20 44 27 45 54     GENERATION D'ET
023130:  41 54 28 53 29 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A    AT(S)...........
023140:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
023150:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
023160:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
023170:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
023180:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A                  ..
023190:  20 20 20 20 20 20 20 20 41 43 43 45 50 54 20 22            ACCEPT "
0231A0:  44 6F 6E 6E 65 7A 20 6C 65 20 6E 6F 6D 20 64 65    Donnez le nom de
0231B0:  20 6C 27 65 6D 65 74 74 65 75 72 20 22 20 54 4F     l'emetteur " TO
0231C0:  20 50 41 52 41 4D 45 54 52 45 20 20 20 0D 0A 20     PARAMETRE   .. 
0231D0:  20 20 20 20 20 20 20 45 52 41 53 45 20 20 20 20           ERASE    
0231E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0231F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023200:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A                  ..
023210:  09 09 49 46 20 21 28 49 4D 50 52 49 4D 41 4E 54    ..IF !(IMPRIMANT
023220:  45 29 20 3D 20 22 4F 22 0D 0A 09 09 52 45 50 4F    E) = "O"....REPO
023230:  52 54 20 46 4F 52 4D 20 45 4D 45 54 44 41 20 46    RT FORM EMETDA F
023240:  4F 52 20 50 41 52 41 4D 45 54 52 45 20 24 20 45    OR PARAMETRE $ E
023250:  4D 45 54 54 45 55 52 20 54 4F 20 50 52 49 4E 54    METTEUR TO PRINT
023260:  0D 0A 09 09 52 45 4C 45 41 53 45 20 50 41 52 41    ....RELEASE PARA
023270:  4D 45 54 52 45 0D 0A 09 09 45 4C 53 45 0D 0A 09    METRE....ELSE...
023280:  09 52 45 50 4F 52 54 20 46 4F 52 4D 20 45 4D 45    .REPORT FORM EME
023290:  54 44 41 20 46 4F 52 20 50 41 52 41 4D 45 54 52    TDA FOR PARAMETR
0232A0:  45 20 24 20 45 4D 45 54 54 45 55 52 0D 0A 09 09    E $ EMETTEUR....
0232B0:  52 45 4C 45 41 53 45 20 50 41 52 41 4D 45 54 52    RELEASE PARAMETR
0232C0:  45 0D 0A 09 09 45 4E 44 49 46 0D 0A 09 45 4C 53    E....ENDIF...ELS
0232D0:  45 0D 0A 09 09 20 20 20 49 46 20 52 45 50 4F 4E    E....   IF REPON
0232E0:  53 45 35 20 3D 20 22 33 22 0D 0A 09 09 20 20 20    SE5 = "3"....   
0232F0:  45 52 41 53 45 0D 0A 09 09 20 20 20 53 54 4F 52    ERASE....   STOR
023300:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
023310:  2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 31 32 2C    -------+"..@ 12,
023320:  37 32 20 47 45 54 20 52 45 50 4F 4E 53 45 34 0D    72 GET REPONSE4.
023330:  0A 52 45 41 44 0D 0A 2A 20 53 49 20 4C 41 20 53    .READ..* SI LA S
023340:  45 4C 45 43 54 49 4F 4E 20 45 53 54 20 44 49 46    ELECTION EST DIF
023350:  46 45 52 45 4E 54 45 20 44 45 20 22 31 22 2C 20    FERENTE DE "1", 
023360:  22 32 22 20 4F 55 20 22 33 22 20 2D 3E 20 41 46    "2" OU "3" -> AF
023370:  46 49 43 48 41 47 45 20 44 27 55 4E 0D 0A 2A 20    FICHAGE D'UN..* 
023380:  4D 45 53 53 41 47 45 20 44 27 45 52 52 45 55 52    MESSAGE D'ERREUR
023390:  2E 0D 0A 49 46 20 21 28 52 45 50 4F 4E 53 45 34    ...IF !(REPONSE4
0233A0:  29 23 22 46 22 20 2E 41 4E 44 2E 20 52 45 50 4F    )#"F" .AND. REPO
0233B0:  4E 53 45 34 23 22 31 22 20 2E 41 4E 44 2E 20 52    NSE4#"1" .AND. R
0233C0:  45 50 4F 4E 53 45 34 23 22 32 22 20 2E 41 4E 44    EPONSE4#"2" .AND
0233D0:  2E 20 52 45 50 4F 4E 53 45 34 23 22 33 22 0D 0A    . REPONSE4#"3"..
0233E0:  40 20 32 32 2C 30 20 53 41 59 20 22 41 75 63 75    @ 22,0 SAY "Aucu
0233F0:  6E 20 74 72 61 69 74 65 6D 65 6E 74 20 6E 65 20    n traitement ne 
023400:  63 6F 72 72 65 73 70 6F 6E 64 20 61 20 76 6F 74    correspond a vot
023410:  72 65 20 73 65 6C 65 63 74 69 6F 6E 22 0D 0A 45    re selection"..E
023420:  4C 53 45 0D 0A 20 49 46 20 21 28 52 45 50 4F 4E    LSE.. IF !(REPON
023430:  53 45 34 29 3D 22 46 22 0D 0A 20 52 45 4C 45 41    SE4)="F".. RELEA
023440:  53 45 20 52 45 50 4F 4E 53 45 34 2C 43 4F 4E 54    SE REPONSE4,CONT
023450:  52 45 50 4F 52 54 2C 49 4D 50 52 49 4D 41 4E 54    REPORT,IMPRIMANT
023460:  45 2C 50 41 52 41 4D 45 54 52 45 0D 0A 20 52 45    E,PARAMETRE.. RE
023470:  54 55 52 4E 0D 0A 20 45 4C 53 45 0D 0A 20 40 20    TURN.. ELSE.. @ 
023480:  32 32 2C 30 20 53 41 59 20 22 44 65 73 69 72 65    22,0 SAY "Desire
023490:  7A 2D 76 6F 75 73 20 75 6E 65 20 73 6F 72 74 69    z-vous une sorti
0234A0:  65 20 73 75 72 20 69 6D 70 72 69 6D 61 6E 74 65    e sur imprimante
0234B0:  20 28 4F 2F 4E 29 20 3F 20 22 20 47 45 54 20 49     (O/N) ? " GET I
0234C0:  4D 50 52 49 4D 41 4E 54 45 0D 0A 20 52 45 41 44    MPRIMANTE.. READ
0234D0:  0D 0A 20 45 52 41 53 45 0D 0A 0D 0A 2A 20 53 49    .. ERASE....* SI
0234E0:  20 4C 41 20 53 45 4C 45 43 54 49 4F 4E 20 45 53     LA SELECTION ES
0234F0:  54 20 3A 20 22 31 22 20 20 2D 2D 3E 20 20 49 4D    T : "1"  -->  IM
023500:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 47 45 4E 45 52    ********** GENER
023510:  41 54 49 4F 4E 20 44 27 45 54 41 54 20 50 4F 55    ATION D'ETAT POU
023520:  52 20 4C 45 20 46 49 43 48 49 45 52 20 53 54 4F    R LE FICHIER STO
023530:  43 4B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    CK *************
023540:  0D 0A 2A 20 43 45 20 46 49 43 48 49 45 52 20 44    ..* CE FICHIER D
023550:  45 20 43 4F 4D 4D 41 4E 44 45 20 56 4F 55 53 20    E COMMANDE VOUS 
023560:  50 45 52 4D 45 54 54 52 41 20 44 27 49 4D 50 52    PERMETTRA D'IMPR
023570:  49 4D 45 52 20 53 55 52 20 4C 27 45 43 52 41 4E    IMER SUR L'ECRAN
023580:  20 2A 0D 0A 2A 20 28 20 45 54 20 45 56 45 4E 54     *..* ( ET EVENT
023590:  55 45 4C 4C 45 4D 45 4E 54 20 53 55 52 20 4C 27    UELLEMENT SUR L'
0235A0:  49 4D 50 52 49 4D 41 4E 54 45 20 29 2C 20 4C 45    IMPRIMANTE ), LE
0235B0:  53 20 20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E    S  ENREGISTREMEN
0235C0:  54 53 20 2A 0D 0A 2A 20 43 4F 52 52 45 53 50 4F    TS *..* CORRESPO
0235D0:  4E 44 41 4E 54 53 20 41 20 56 4F 54 52 45 20 53    NDANTS A VOTRE S
0235E0:  45 4C 45 43 54 49 4F 4E 2E 20 20 20 20 20 20 20    ELECTION.       
0235F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023600:  20 20 20 20 20 2A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A         *..********
023610:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
023620:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
023630:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
023640:  2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 0D 0A 55 53 45 20    ********....USE 
023650:  53 54 4F 43 4B 20 49 4E 44 45 58 20 50 49 45 43    STOCK INDEX PIEC
023660:  45 0D 0A 53 54 4F 52 45 20 27 4F 27 20 54 4F 20    E..STORE 'O' TO 
023670:  43 4F 4E 54 52 45 50 4F 52 54 0D 0A 44 4F 20 57    CONTREPORT..DO W
023680:  48 49 4C 45 20 43 4F 4E 54 52 45 50 4F 52 54 20    HILE CONTREPORT 
023690:  3D 20 27 4F 27 0D 0A 53 54 4F 52 45 20 22 46 22    = 'O'..STORE "F"
0236A0:  20 54 4F 20 52 45 50 4F 4E 53 45 34 0D 0A 53 54     TO REPONSE4..ST
0236B0:  4F 52 45 20 22 4E 22 20 54 4F 20 49 4D 50 52 49    ORE "N" TO IMPRI
0236C0:  4D 41 4E 54 45 0D 0A 45 52 41 53 45 0D 0A 40 20    MANTE..ERASE..@ 
0236D0:  20 33 2C 32 37 20 53 41 59 20 22 53 4F 52 54 49     3,27 SAY "SORTI
0236E0:  45 20 44 27 45 54 41 54 22 0D 0A 40 20 20 35 2C    E D'ETAT"..@  5,
0236F0:  20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D     0 SAY "+-------
023700:  50 52 45 53 53 49 4F 4E 20 20 44 45 20 54 4F 55    PRESSION  DE TOU
023710:  53 20 4C 45 53 20 20 45 4E 52 45 47 49 53 54 52    S LES  ENREGISTR
023720:  45 4D 45 4E 54 53 0D 0A 2A 20 50 4F 55 52 20 4C    EMENTS..* POUR L
023730:  45 53 51 55 45 4C 53 20 4C 41 20 53 4F 4D 4D 45    ESQUELS LA SOMME
023740:  20 44 45 20 4C 41 20 51 55 41 4E 54 49 54 45 20     DE LA QUANTITE 
023750:  45 4E 20 53 54 4F 43 4B 20 45 54 20 43 45 4C 4C    EN STOCK ET CELL
023760:  45 20 52 45 53 54 41 4E 54 20 41 20 4C 49 56 52    E RESTANT A LIVR
023770:  45 52 0D 0A 2A 20 45 53 54 20 49 4E 46 45 52 49    ER..* EST INFERI
023780:  45 55 52 45 20 41 20 4C 41 20 51 55 41 4E 54 49    EURE A LA QUANTI
023790:  54 45 20 4D 49 4E 49 4D 55 4D 2E 0D 0A 0D 0A 20    TE MINIMUM..... 
0237A0:  20 49 46 20 52 45 50 4F 4E 53 45 34 20 3D 20 22     IF REPONSE4 = "
0237B0:  31 22 0D 0A 20 20 20 20 20 49 46 20 21 28 49 4D    1"..     IF !(IM
0237C0:  50 52 49 4D 41 4E 54 45 29 20 3D 20 22 4F 22 0D    PRIMANTE) = "O".
0237D0:  0A 20 20 20 20 20 52 45 50 4F 52 54 20 46 4F 52    .     REPORT FOR
0237E0:  4D 20 45 54 41 54 4D 49 4E 49 20 46 4F 52 20 51    M ETATMINI FOR Q
0237F0:  54 45 3A 53 54 4F 43 4B 20 2B 20 51 54 45 3A 52    TE:STOCK + QTE:R
023800:  45 53 54 45 20 3C 20 4D 49 4E 49 3A 53 54 4F 43    ESTE < MINI:STOC
023810:  4B 20 54 4F 20 50 52 49 4E 54 0D 0A 20 20 20 20    K TO PRINT..    
023820:  20 45 4C 53 45 0D 0A 20 20 20 20 20 52 45 50 4F     ELSE..     REPO
023830:  52 54 20 46 4F 52 4D 20 45 54 41 54 4D 49 4E 49    RT FORM ETATMINI
023840:  20 46 4F 52 20 51 54 45 3A 53 54 4F 43 4B 20 2B     FOR QTE:STOCK +
023850:  20 51 54 45 3A 52 45 53 54 45 20 3C 20 4D 49 4E     QTE:RESTE < MIN
023860:  49 3A 53 54 4F 43 4B 0D 0A 20 20 20 20 20 45 4E    I:STOCK..     EN
023870:  44 49 46 0D 0A 20 20 45 4C 53 45 0D 0A 0D 0A 2A    DIF..  ELSE....*
023880:  20 53 49 20 4C 41 20 53 45 4C 45 43 54 49 4F 4E     SI LA SELECTION
023890:  20 45 53 54 20 3A 20 22 32 22 20 2D 3E 20 53 41     EST : "2" -> SA
0238A0:  49 53 49 45 20 44 55 20 4C 49 42 45 4C 4C 45 20    ISIE DU LIBELLE 
0238B0:  52 45 43 48 45 52 43 48 45 2C 20 45 54 20 20 20    RECHERCHE, ET   
0238C0:  49 4D 50 52 45 53 53 49 4F 4E 0D 0A 2A 20 44 45    IMPRESSION..* DE
0238D0:  20 54 4F 55 53 20 4C 45 53 20 45 4E 52 45 47 49     TOUS LES ENREGI
0238E0:  53 54 52 45 4D 45 4E 54 53 20 44 4F 4E 54 20 4C    STREMENTS DONT L
0238F0:  41 20 5A 4F 4E 45 20 4C 49 42 45 4C 4C 45 20 43    A ZONE LIBELLE C
023900:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
023910:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
023920:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 3B 0D 0A    -------------;..
023930:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
023940:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20    ----------+"..@ 
023950:  20 36 2C 20 30 20 53 41 59 20 22 49 20 20 20 20     6, 0 SAY "I    
023960:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023970:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023980:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023990:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    ;..             
0239A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 49 22 0D                 I".
0239B0:  0A 40 20 20 37 2C 20 30 20 53 41 59 20 22 49 20    .@  7, 0 SAY "I 
0239C0:  20 4C 49 53 54 45 20 44 45 53 20 43 4F 4D 4D 41     LISTE DES COMMA
0239D0:  4E 44 45 53 20 50 4F 55 52 20 52 45 41 43 54 55    NDES POUR REACTU
0239E0:  41 4C 49 53 45 52 20 4C 45 20 53 54 4F 43 4B 20    ALISER LE STOCK 
0239F0:  20 20 20 3B 0D 0A 20 20 2D 2D 3E 20 31 20 20 20       ;..  --> 1   
023A00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023A10:  49 22 0D 0A 40 20 20 38 2C 20 30 20 53 41 59 20    I"..@  8, 0 SAY 
023A20:  22 49 20 20 20 20 20 20 20 20 20 20 20 20 20 20    "I              
023A30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023A40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023A50:  20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20          ;..       
023A60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023A70:  20 20 20 49 22 0D 0A 40 20 20 39 2C 20 30 20 53       I"..@  9, 0 S
023A80:  41 59 20 22 49 20 20 4C 49 53 54 45 20 44 45 53    AY "I  LISTE DES
023A90:  20 50 49 45 43 45 53 20 53 45 4C 4F 4E 20 4C 45     PIECES SELON LE
023AA0:  20 4C 49 42 45 4C 4C 45 20 44 45 20 56 4F 54 52     LIBELLE DE VOTR
023AB0:  45 20 43 48 4F 49 58 20 20 3B 0D 0A 20 20 2D 2D    E CHOIX  ;..  --
023AC0:  3E 20 32 20 20 20 20 20 20 20 20 20 20 20 20 20    > 2             
023AD0:  20 20 20 20 20 20 49 22 0D 0A 40 20 31 30 2C 20          I"..@ 10, 
023AE0:  30 20 53 41 59 20 22 49 20 20 20 20 20 20 20 20    0 SAY "I        
023AF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
023B00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
023B10:  1E 00 00 00 02 09 50 E5 1E 00 C1 02 00 00 00 02    ......P.........
023B20:  1E 00 C6 02 00 00 00 02 1E 00 C2 02 00 00 00 02    ................
023B30:  1E 00 C7 02 00 00 00 02 1E 00 C3 02 00 00 00 02    ................
023B40:  1E 00 C8 02 00 00 00 02 1E 00 C4 02 00 00 00 02    ................
023B50:  1E 00 C9 02 00 00 00 02 1E 00 C5 02 00 00 00 02    ................
023B60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023B70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023B80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023B90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023BF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
023C00:  4F 4E 54 49 45 4E 54 20 54 4F 55 54 45 20 4F 55    ONTIENT TOUTE OU
023C10:  20 50 41 52 54 49 45 0D 0A 2A 20 44 55 20 50 41     PARTIE..* DU PA
023C20:  52 41 4D 45 54 52 45 20 52 45 43 48 45 52 43 48    RAMETRE RECHERCH
023C30:  45 2E 0D 0A 0D 0A 20 20 20 20 20 49 46 20 52 45    E.....     IF RE
023C40:  50 4F 4E 53 45 34 20 3D 20 22 32 22 0D 0A 20 20    PONSE4 = "2"..  
023C50:  20 20 20 40 20 34 2C 30 20 53 41 59 20 22 20 22       @ 4,0 SAY " "
023C60:  0D 0A 20 20 20 20 20 41 43 43 45 50 54 20 22 44    ..     ACCEPT "D
023C70:  6F 6E 6E 65 7A 20 6C 65 20 70 61 72 61 6D 65 74    onnez le paramet
023C80:  72 65 20 72 65 63 68 65 72 63 68 65 20 22 20 54    re recherche " T
023C90:  4F 20 50 41 52 41 4D 45 54 52 45 0D 0A 20 20 20    O PARAMETRE..   
023CA0:  20 20 45 52 41 53 45 0D 0A 20 20 20 20 20 53 54      ERASE..     ST
023CB0:  4F 52 45 20 21 28 50 41 52 41 4D 45 54 52 45 29    ORE !(PARAMETRE)
023CC0:  20 54 4F 20 50 41 52 41 4D 45 54 52 45 0D 0A 20     TO PARAMETRE.. 
023CD0:  20 20 20 20 09 49 46 20 21 28 49 4D 50 52 49 4D        .IF !(IMPRIM
023CE0:  41 4E 54 45 29 20 3D 20 22 4F 22 0D 0A 20 20 20    ANTE) = "O"..   
023CF0:  20 20 09 52 45 50 4F 52 54 20 46 4F 52 4D 20 53      .REPORT FORM S
023D00:  45 4C 45 53 54 4F 43 20 46 4F 52 20 22 26 50 41    ELESTOC FOR "&PA
023D10:  52 41 4D 45 54 52 45 22 20 24 20 4C 49 42 45 4C    RAMETRE" $ LIBEL
023D20:  4C 45 20 54 4F 20 50 52 49 4E 54 0D 0A 20 20 20    LE TO PRINT..   
023D30:  20 20 09 45 4C 53 45 0D 0A 20 20 20 20 20 09 52      .ELSE..     .R
023D40:  45 50 4F 52 54 20 46 4F 52 4D 20 53 45 4C 45 53    EPORT FORM SELES
023D50:  54 4F 43 20 46 4F 52 20 22 26 50 41 52 41 4D 45    TOC FOR "&PARAME
023D60:  54 52 45 22 20 24 20 4C 49 42 45 4C 4C 45 0D 0A    TRE" $ LIBELLE..
023D70:  09 45 4E 44 49 46 0D 0A 09 45 4C 53 45 0D 0A 0D    .ENDIF...ELSE...
023D80:  0A 2A 20 53 49 20 4C 41 20 53 45 4C 45 43 54 49    .* SI LA SELECTI
023D90:  4F 4E 20 45 53 54 20 3A 20 22 33 22 20 2D 3E 20    ON EST : "3" -> 
023DA0:  53 41 49 53 49 45 20 44 45 20 4C 41 20 50 4C 41    SAISIE DE LA PLA
023DB0:  47 45 20 44 45 20 50 52 49 58 20 50 55 49 53 0D    GE DE PRIX PUIS.
023DC0:  0A 2A 20 49 4D 50 52 45 53 53 49 4F 4E 20 44 45    .* IMPRESSION DE
023DD0:  20 54 4F 55 53 20 4C 45 53 20 45 4E 52 45 47 49     TOUS LES ENREGI
023DE0:  53 54 52 45 4D 45 4E 54 53 20 44 4F 4E 54 20 4C    STREMENTS DONT L
023DF0:  45 20 50 52 49 58 20 55 4E 49 54 41 49 52 45 0D    E PRIX UNITAIRE.
023E00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023E10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023E20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023E30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023E40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023E50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023E60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023E70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023E80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023E90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023EA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023EB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023EC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023ED0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023EE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023EF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023F00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023F10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023F20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023F30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023F40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023F50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023F60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023F70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023F80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023F90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023FA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023FB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023FC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023FD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023FE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
023FF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024000:  0A 2A 20 45 53 54 20 43 4F 4D 50 52 49 53 20 45    .* EST COMPRIS E
024010:  4E 54 52 45 20 43 45 53 20 44 45 55 58 20 45 58    NTRE CES DEUX EX
024020:  54 52 45 4D 45 53 2E 0D 0A 0D 0A 09 20 20 49 46    TREMES......  IF
024030:  20 52 45 50 4F 4E 53 45 34 20 3D 20 22 33 22 0D     REPONSE4 = "3".
024040:  0A 20 20 20 20 20 20 20 20 20 20 53 54 4F 52 45    .          STORE
024050:  20 30 2E 30 30 20 54 4F 20 50 52 49 58 31 0D 0A     0.00 TO PRIX1..
024060:  20 20 20 20 20 20 20 20 20 20 53 54 4F 52 45 20              STORE 
024070:  30 2E 30 30 20 54 4F 20 50 52 49 58 32 0D 0A 20    0.00 TO PRIX2.. 
024080:  20 20 20 20 20 20 20 20 20 40 20 31 2C 30 20 53             @ 1,0 S
024090:  41 59 20 22 44 6F 6E 6E 65 7A 20 6C 65 20 70 72    AY "Donnez le pr
0240A0:  69 78 20 6D 69 6E 69 6D 75 6D 20 22 20 47 45 54    ix minimum " GET
0240B0:  20 50 52 49 58 31 0D 0A 20 20 20 20 20 20 20 20     PRIX1..        
0240C0:  20 20 40 20 32 2C 30 20 53 41 59 20 22 44 6F 6E      @ 2,0 SAY "Don
0240D0:  6E 65 7A 20 6C 65 20 70 72 69 78 20 6D 61 78 69    nez le prix maxi
0240E0:  6D 75 6D 20 22 20 47 45 54 20 50 52 49 58 32 0D    mum " GET PRIX2.
0240F0:  0A 09 20 20 52 45 41 44 0D 0A 09 20 20 45 52 41    ..  READ...  ERA
024100:  53 45 0D 0A 20 20 20 20 20 20 20 20 20 20 53 54    SE..          ST
024110:  4F 52 45 20 22 46 4F 52 20 50 52 49 58 3A 55 48    ORE "FOR PRIX:UH
024120:  54 3E 3D 50 52 49 58 31 20 2E 41 4E 44 2E 20 50    T>=PRIX1 .AND. P
024130:  52 49 58 3A 55 48 54 3C 3D 50 52 49 58 32 22 20    RIX:UHT<=PRIX2" 
024140:  54 4F 20 43 4F 4E 44 49 54 49 4F 4E 0D 0A 20 09    TO CONDITION.. .
024150:  20 20 20 20 20 49 46 20 21 28 49 4D 50 52 49 4D         IF !(IMPRIM
024160:  41 4E 54 45 29 20 3D 20 22 4F 22 0D 0A 09 20 20    ANTE) = "O"...  
024170:  20 20 20 52 45 50 4F 52 54 20 46 4F 52 4D 20 53       REPORT FORM S
024180:  45 4C 45 53 54 4F 43 20 26 43 4F 4E 44 49 54 49    ELESTOC &CONDITI
024190:  4F 4E 20 54 4F 20 50 52 49 4E 54 0D 0A 09 20 20    ON TO PRINT...  
0241A0:  20 20 20 52 45 4C 45 41 53 45 20 43 4F 4E 44 49       RELEASE CONDI
0241B0:  54 49 4F 4E 2C 50 52 49 58 31 2C 50 52 49 58 32    TION,PRIX1,PRIX2
0241C0:  0D 0A 09 20 20 20 20 20 45 4C 53 45 0D 0A 09 20    ...     ELSE... 
0241D0:  20 20 20 20 52 45 50 4F 52 54 20 46 4F 52 4D 20        REPORT FORM 
0241E0:  53 45 4C 45 53 54 4F 43 20 26 43 4F 4E 44 49 54    SELESTOC &CONDIT
0241F0:  49 4F 4E 0D 0A 09 20 20 20 20 20 52 45 4C 45 41    ION...     RELEA
024200:  57 3D 37 31 2C 4D 3D 30 0D 0A 59 0D 0A 45 54 41    W=71,M=0..Y..ETA
024210:  54 20 44 55 20 53 54 4F 43 4B 20 53 45 4C 4F 4E    T DU STOCK SELON
024220:  20 56 4F 54 52 45 20 53 45 4C 45 43 54 49 4F 4E     VOTRE SELECTION
024230:  20 0D 0A 4E 0D 0A 59 0D 0A 4E 0D 0A 31 35 2C 50     ..N..Y..N..15,P
024240:  49 45 43 45 0D 0A 3C 52 45 46 45 52 45 4E 43 45    IECE..<REFERENCE
024250:  3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F    ;_______________
024260:  0D 0A 32 30 2C 4C 49 42 45 4C 4C 45 0D 0A 3C 44    ..20,LIBELLE..<D
024270:  45 53 49 47 4E 41 54 49 4F 4E 3B 5F 5F 5F 5F 5F    ESIGNATION;_____
024280:  5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 0D    _______________.
024290:  0A 36 2C 51 54 45 3A 53 54 4F 43 4B 0D 0A 3E 53    .6,QTE:STOCK..>S
0242A0:  54 4F 43 4B 3B 5F 5F 5F 5F 5F 5F 0D 0A 4E 0D 0A    TOCK;______..N..
0242B0:  39 2C 50 52 49 58 3A 55 48 54 0D 0A 3E 50 52 49    9,PRIX:UHT..>PRI
0242C0:  58 20 55 48 54 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 0D    X UHT;_________.
0242D0:  0A 4E 0D 0A 31 32 2C 51 54 45 3A 53 54 4F 43 4B    .N..12,QTE:STOCK
0242E0:  20 2A 20 50 52 49 58 3A 55 48 54 0D 0A 3E 50 52     * PRIX:UHT..>PR
0242F0:  49 58 20 54 48 54 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F    IX THT;_________
024300:  5F 5F 5F 0D 0A 59 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A    ___..Y..........
024310:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024320:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024330:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024340:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024350:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024360:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024370:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024380:  0A 2A 20 53 49 20 4C 41 20 53 45 4C 45 43 54 49    .* SI LA SELECTI
024390:  4F 4E 20 45 53 54 20 3A 20 22 33 22 20 2D 3E 20    ON EST : "3" -> 
0243A0:  53 41 49 53 49 45 20 44 45 20 4C 41 20 50 4C 41    SAISIE DE LA PLA
0243B0:  47 45 20 44 45 20 50 52 49 58 20 50 55 49 53 0D    GE DE PRIX PUIS.
0243C0:  0A 2A 20 49 4D 50 52 45 53 53 49 4F 4E 20 44 45    .* IMPRESSION DE
0243D0:  20 54 4F 55 53 20 4C 45 53 20 45 4E 52 45 47 49     TOUS LES ENREGI
0243E0:  53 54 52 45 4D 45 4E 54 53 20 44 4F 4E 54 20 4C    STREMENTS DONT L
0243F0:  45 20 50 52 49 58 20 55 4E 49 54 41 49 52 45 0D    E PRIX UNITAIRE.
024400:  53 45 20 43 4F 4E 44 49 54 49 4F 4E 2C 50 52 49    SE CONDITION,PRI
024410:  58 31 2C 50 52 49 58 32 0D 0A 09 20 20 20 20 20    X1,PRIX2...     
024420:  45 4E 44 49 46 0D 0A 20 20 20 20 20 20 20 20 20    ENDIF..         
024430:  20 45 4E 44 49 46 20 33 0D 0A 20 20 20 20 20 45     ENDIF 3..     E
024440:  4E 44 49 46 20 32 0D 0A 20 20 45 4E 44 49 46 20    NDIF 2..  ENDIF 
024450:  31 0D 0A 20 45 4E 44 49 46 20 46 0D 0A 45 4E 44    1.. ENDIF F..END
024460:  49 46 0D 0A 3F 20 22 56 61 6C 69 64 65 7A 22 0D    IF..? "Validez".
024470:  0A 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 46 46    .SET CONSOLE OFF
024480:  0D 0A 57 41 49 54 0D 0A 53 45 54 20 43 4F 4E 53    ..WAIT..SET CONS
024490:  4F 4C 45 20 4F 4E 0D 0A 40 20 32 32 2C 30 20 53    OLE ON..@ 22,0 S
0244A0:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
0244B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0244C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0244D0:  20 20 20 20 20 22 0D 0A 45 4E 44 44 4F 0D 0A 1A         "..ENDDO...
0244E0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
0244F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024500:  45 4C 45 53 54 4F 43 20 46 4F 52 20 22 26 50 41    ELESTOC FOR "&PA
024510:  52 41 4D 45 54 52 45 22 20 24 20 4C 49 42 45 4C    RAMETRE" $ LIBEL
024520:  4C 45 20 54 4F 20 50 52 49 4E 54 0D 0A 20 20 20    LE TO PRINT..   
024530:  20 20 09 45 4C 53 45 0D 0A 20 20 20 20 20 09 52      .ELSE..     .R
024540:  45 50 4F 52 54 20 46 4F 52 4D 20 53 45 4C 45 53    EPORT FORM SELES
024550:  54 4F 43 20 46 4F 52 20 22 26 50 41 52 41 4D 45    TOC FOR "&PARAME
024560:  54 52 45 22 20 24 20 4C 49 42 45 4C 4C 45 0D 0A    TRE" $ LIBELLE..
024570:  09 45 4E 44 49 46 0D 0A 09 45 4C 53 45 0D 0A 0D    .ENDIF...ELSE...
024580:  0A 2A 20 53 49 20 4C 41 20 53 45 4C 45 43 54 49    .* SI LA SELECTI
024590:  4F 4E 20 45 53 54 20 3A 20 22 33 22 20 2D 3E 20    ON EST : "3" -> 
0245A0:  53 41 49 53 49 45 20 44 45 20 4C 41 20 50 4C 41    SAISIE DE LA PLA
0245B0:  47 45 20 44 45 20 50 52 49 58 20 50 55 49 53 0D    GE DE PRIX PUIS.
0245C0:  0A 2A 20 49 4D 50 52 45 53 53 49 4F 4E 20 44 45    .* IMPRESSION DE
0245D0:  20 54 4F 55 53 20 4C 45 53 20 45 4E 52 45 47 49     TOUS LES ENREGI
0245E0:  53 54 52 45 4D 45 4E 54 53 20 44 4F 4E 54 20 4C    STREMENTS DONT L
0245F0:  45 20 50 52 49 58 20 55 4E 49 54 41 49 52 45 0D    E PRIX UNITAIRE.
024600:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024610:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024620:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024630:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024640:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024650:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024660:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024670:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024680:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024690:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0246A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0246B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0246C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0246D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0246E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0246F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0247A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0247B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0247C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0247D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0247E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0247F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024800:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024810:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024820:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024830:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024840:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024850:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024860:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024870:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024880:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024890:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0248A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0248B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0248C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0248D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0248E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0248F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024900:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024910:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024920:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024930:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024940:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024950:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024960:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024970:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024980:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024990:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0249A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0249B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0249C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0249D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0249E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
0249F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
024A00:  02 08 00 00 00 00 75 00 41 54 45 4C 49 45 52 00    ......u.ATELIER.
024A10:  00 00 00 43 05 AA 76 00 53 45 43 54 49 4F 4E 00    ...C..v.SECTION.
024A20:  00 00 00 43 05 AF 76 00 4D 41 43 48 49 4E 45 00    ...C..v.MACHINE.
024A30:  00 00 00 43 19 B4 76 00 4C 49 42 45 4C 4C 45 00    ...C..v.LIBELLE.
024A40:  00 00 00 43 23 CD 76 00 50 49 45 43 45 00 00 00    ...C#.v.PIECE...
024A50:  00 00 00 43 0C F0 76 00 44 41 3A 4E 55 4D 00 00    ...C..v.DA:NUM..
024A60:  00 00 00 43 0A FC 76 00 51 54 45 3A 52 45 53 54    ...C..v.QTE:REST
024A70:  45 00 00 4E 05 06 77 00 51 54 45 3A 53 54 4F 43    E..N..w.QTE:STOC
024A80:  4B 00 00 4E 06 0B 77 00 50 52 49 58 3A 55 48 54    K..N..w.PRIX:UHT
024A90:  00 00 00 4E 09 11 77 02 4D 49 4E 49 3A 53 54 4F    ...N..w.MINI:STO
024AA0:  43 4B 00 4E 04 1A 77 00 0D 00 00 00 00 00 00 00    CK.N..w.........
024AB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024AC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024AD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024AE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024AF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024B00:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024B10:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024B20:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024B30:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024B40:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024B50:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024B60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024B70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024B80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024B90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024BA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024BB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024BC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024BD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024BE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024BF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024C00:  57 3D 37 30 2C 4D 3D 30 0D 0A 59 0D 0A 4C 49 53    W=70,M=0..Y..LIS
024C10:  54 45 20 44 45 53 20 43 4F 4D 4D 41 4E 44 45 53    TE DES COMMANDES
024C20:  20 41 56 45 43 20 44 45 53 20 44 45 4C 41 49 53     AVEC DES DELAIS
024C30:  20 44 45 20 4C 49 56 52 41 49 53 4F 4E 20 4E 4F     DE LIVRAISON NO
024C40:  4E 20 52 45 53 50 45 43 54 45 53 0D 0A 4E 0D 0A    N RESPECTES..N..
024C50:  59 0D 0A 4E 0D 0A 31 32 2C 44 41 3A 4E 55 4D 0D    Y..N..12,DA:NUM.
024C60:  0A 3C 4E 55 4D 45 52 4F 20 44 41 3B 5F 5F 5F 5F    .<NUMERO DA;____
024C70:  5F 5F 5F 5F 5F 5F 5F 5F 0D 0A 31 34 2C 43 4D 44    ________..14,CMD
024C80:  3A 4E 55 4D 0D 0A 3C 4E 55 4D 45 52 4F 20 43 44    :NUM..<NUMERO CD
024C90:  45 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F    E;______________
024CA0:  0D 0A 31 35 2C 45 4D 45 54 54 45 55 52 0D 0A 3C    ..15,EMETTEUR..<
024CB0:  45 4D 45 54 54 45 55 52 3B 5F 5F 5F 5F 5F 5F 5F    EMETTEUR;_______
024CC0:  5F 5F 5F 5F 5F 5F 5F 5F 0D 0A 31 35 2C 46 4F 55    ________..15,FOU
024CD0:  52 4E 49 0D 0A 3C 46 4F 55 52 4E 49 53 53 45 55    RNI..<FOURNISSEU
024CE0:  52 3B 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F    R;______________
024CF0:  5F 0D 0A 31 32 2C 44 45 4C 41 49 0D 0A 3E 4E 2E    _..12,DELAI..>N.
024D00:  20 53 45 4D 41 49 4E 45 3B 5F 5F 5F 5F 5F 5F 5F     SEMAINE;_______
024D10:  5F 5F 5F 5F 5F 0D 0A 4E 0D 0A 1A 1A 1A 1A 1A 1A    _____..N........
024D20:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024D30:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024D40:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024D50:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024D60:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024D70:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
024D80:  0A 2A 20 53 49 20 4C 41 20 53 45 4C 45 43 54 49    .* SI LA SELECTI
024D90:  4F 4E 20 45 53 54 20 3A 20 22 33 22 20 2D 3E 20    ON EST : "3" -> 
024DA0:  53 41 49 53 49 45 20 44 45 20 4C 41 20 50 4C 41    SAISIE DE LA PLA
024DB0:  47 45 20 44 45 20 50 52 49 58 20 50 55 49 53 0D    GE DE PRIX PUIS.
024DC0:  0A 2A 20 49 4D 50 52 45 53 53 49 4F 4E 20 44 45    .* IMPRESSION DE
024DD0:  20 54 4F 55 53 20 4C 45 53 20 45 4E 52 45 47 49     TOUS LES ENREGI
024DE0:  53 54 52 45 4D 45 4E 54 53 20 44 4F 4E 54 20 4C    STREMENTS DONT L
024DF0:  45 20 50 52 49 58 20 55 4E 49 54 41 49 52 45 0D    E PRIX UNITAIRE.
024E00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
024E10:  1F 00 00 00 02 09 50 E5 1F 00 C1 02 00 00 00 02    ......P.........
024E20:  1F 00 C6 02 00 00 00 02 1F 00 C2 02 00 00 00 02    ................
024E30:  1F 00 C7 02 00 00 00 02 1F 00 C3 02 00 00 00 02    ................
024E40:  1F 00 C8 02 00 00 00 02 1F 00 C4 02 00 00 00 02    ................
024E50:  1F 00 C9 02 00 00 00 02 1F 00 C5 02 00 00 00 02    ................
024E60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024E70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024E80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024E90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024EA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024EB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024EC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024ED0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024EE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024EF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
024F00:  00 00 00 00 00 00 00 00 00 20 42 44 31 32 33 30    ......... BD1230
024F10:  31 32 33 34 50 45 52 43 45 55 53 45 20 4E 2E 31    1234PERCEUSE N.1
024F20:  35 34 31 20 20 20 20 20 20 20 20 20 20 46 4F 52    541          FOR
024F30:  45 54 20 44 49 41 4D 45 54 52 45 20 32 2E 35 20    ET DIAMETRE 2.5 
024F40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
024F50:  31 32 33 34 35 36 37 38 39 31 32 33 39 38 37 36    1234567891239876
024F60:  35 34 33 32 31 39 20 20 20 20 34 20 20 20 20 32    543219    4    2
024F70:  30 20 20 20 20 20 32 2E 35 30 20 20 35 30 20 42    0     2.50  50 B
024F80:  44 31 34 37 30 32 35 38 39 50 45 52 43 45 55 53    D14702589PERCEUS
024F90:  45 20 4E 2E 31 32 35 33 20 20 20 20 20 20 20 20    E N.1253        
024FA0:  20 20 46 4F 52 45 54 20 44 49 41 4D 45 54 52 45      FORET DIAMETRE
024FB0:  20 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20     5              
024FC0:  20 20 20 20 20 31 32 33 34 35 36 37 38 39 31 32         12345678912
024FD0:  34 39 38 37 36 35 34 33 32 31 38 20 20 20 20 34    49876543218    4
024FE0:  20 20 20 20 32 36 20 20 20 20 20 32 2E 37 35 20        26     2.75 
024FF0:  20 32 35 20 42 44 35 32 33 30 32 31 35 38 50 45     25 BD52302158PE
025000:  52 43 45 55 53 45 20 4E 2E 31 34 32 38 20 20 20    RCEUSE N.1428   
025010:  20 20 20 20 20 20 20 46 4F 52 45 54 20 44 49 41           FORET DIA
025020:  4D 45 54 52 45 20 31 30 20 20 20 20 20 20 20 20    METRE 10        
025030:  20 20 20 20 20 20 20 20 20 20 31 32 33 34 35 36              123456
025040:  37 38 39 31 32 35 39 38 37 36 35 34 33 32 31 37    7891259876543217
025050:  20 20 20 20 34 20 20 20 20 39 38 20 20 20 20 20        4    98     
025060:  37 2E 35 30 20 31 30 30 20 42 44 31 32 37 30 32    7.50 100 BD12702
025070:  38 34 35 50 45 52 43 45 55 53 45 20 4E 2E 31 34    845PERCEUSE N.14
025080:  33 39 20 20 20 20 20 20 20 20 20 20 46 4F 52 45    39          FORE
025090:  54 20 44 49 41 4D 45 54 52 45 20 31 30 2E 35 20    T DIAMETRE 10.5 
0250A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31                   1
0250B0:  32 33 34 35 36 37 38 39 31 32 36 20 20 20 20 20    23456789126     
0250C0:  20 20 20 20 20 20 20 20 20 30 20 20 20 20 32 30             0    20
0250D0:  20 20 20 20 20 35 2E 32 35 20 20 32 35 20 42 44         5.25  25 BD
0250E0:  31 35 38 30 31 32 35 34 50 45 52 43 45 55 53 45    15801254PERCEUSE
0250F0:  20 4E 2E 31 34 32 35 20 20 20 20 20 20 20 20 20     N.1425         
025100:  20 20 35 35 20 20 20 20 20 31 20 20 20 20 20 33      55     1     3
025110:  2E 30 30 20 31 30 30 1A 20 20 20 20 20 32 46 20    .00 100.     2F 
025120:  20 20 4D 4F 54 45 55 52 20 20 20 20 20 20 20 20      MOTEUR        
025130:  20 20 20 20 20 20 20 20 20 20 20 35 38 39 36 32               58962
025140:  2E 32 33 32 32 31 20 20 20 20 20 20 20 20 20 20    .23221          
025150:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 49                  VI
025160:  53 20 30 34 20 53 49 20 20 20 31 32 2E 32 20 20    S 04 SI   12.2  
025170:  20 20 20 20 20 20 20 32 38 20 20 20 31 32 33 20           28   123 
025180:  20 20 20 34 32 2E 36 35 20 20 31 32 2A 42 44 31       42.65  12*BD1
025190:  35 34 30 32 31 34 35 31 32 35 39 36 20 20 20 20    540214512596    
0251A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0251B0:  2E 2E 44 46 47 20 20 20 20 20 20 20 20 20 20 20    ..DFG           
0251C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0251D0:  20 20 20 20 4D 49 43 52 46 4F 20 20 20 20 20 46        MICRFO     F
0251E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 20                 0  
0251F0:  20 20 20 30 20 20 20 20 20 30 2E 30 30 20 20 20       0     0.00   
025200:  30 2A 54 4F 55 52 20 32 20 20 20 20 20 46 52 41    0*TOUR 2     FRA
025210:  49 53 45 55 53 45 20 20 20 20 20 20 20 20 20 20    ISEUSE          
025220:  20 20 20 20 20 20 20 50 41 52 49 53 20 20 20 20           PARIS    
025230:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025240:  20 20 20 20 20 20 20 20 46 52 49 45 4E 20 20 20            FRIEN   
025250:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025260:  20 20 30 20 20 20 20 20 30 20 20 20 20 20 30 2E      0     0     0.
025270:  30 30 20 20 20 30 2A 31 32 30 20 20 34 35 36 20    00   0*120  456 
025280:  20 44 53 59 54 54 52 54 55 59 54 20 20 20 20 20     DSYTTRTUYT     
025290:  20 20 20 20 20 20 20 20 20 20 45 54 41 55 20 4C              ETAU L
0252A0:  49 4D 45 55 52 20 20 20 20 20 20 20 20 20 20 20    IMEUR           
0252B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 35 39 37                 597
0252C0:  38 38 38 38 38 20 20 20 20 30 30 30 30 30 30 30    88888    0000000
0252D0:  30 30 30 20 20 20 20 30 20 20 20 20 20 30 20 20    000    0     0  
0252E0:  20 20 20 30 2E 30 30 20 20 20 30 2A 20 20 20 20       0.00   0*    
0252F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025300:  20 46 4F 52 45 54 20 44 49 41 4D 45 54 52 45 20     FORET DIAMETRE 
025310:  31 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20    15              
025320:  20 20 20 20 31 32 33 34 35 36 37 38 39 31 32 37        123456789127
025330:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20                  0 
025340:  20 20 20 35 38 20 20 20 20 20 38 2E 35 30 20 20       58     8.50  
025350:  35 34 20 42 44 31 33 36 30 32 31 33 35 50 45 52    54 BD13602135PER
025360:  43 45 55 53 45 20 31 35 32 34 20 20 20 20 20 20    CEUSE 1524      
025370:  20 20 20 20 20 20 46 4F 52 45 54 20 44 49 41 4D          FORET DIAM
025380:  45 54 52 45 20 31 30 2E 32 35 20 20 20 20 20 20    ETRE 10.25      
025390:  20 20 20 20 20 20 20 20 20 31 32 33 34 35 36 37             1234567
0253A0:  38 39 31 32 39 39 38 37 36 35 34 33 32 31 36 20    891299876543216 
0253B0:  20 20 20 35 20 20 20 20 35 31 20 20 20 20 20 32       5    51     2
0253C0:  2E 30 30 20 31 30 30 20 42 44 31 35 37 30 32 31    .00 100 BD157021
0253D0:  34 37 50 45 52 43 45 55 53 45 20 4E 2E 31 35 34    47PERCEUSE N.154
0253E0:  33 20 20 20 20 20 20 20 20 20 20 46 52 41 49 53    3          FRAIS
0253F0:  45 20 44 49 41 4D 45 54 52 45 20 35 30 20 20 20    E DIAMETRE 50   
025400:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 32                  12
025410:  33 34 35 36 37 38 39 31 34 37 31 32 33 34 35 36    3456789147123456
025420:  37 38 39 31 20 20 20 20 30 20 20 20 20 32 33 20    7891    0    23 
025430:  20 20 20 36 30 2E 30 30 20 20 32 34 20 20 20 20       60.00  24    
025440:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025450:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025460:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025470:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025480:  20 20 20 31 32 35 20 20 20 20 20 20 20 20 20 20       125          
025490:  20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 20                 0  
0254A0:  20 20 20 30 20 20 20 20 20 30 2E 30 30 20 20 20       0     0.00   
0254B0:  30 1A 62 64 31 32 35 30 32 31 33 37 70 65 72 63    0.bd12502137perc
0254C0:  65 75 73 65 20 20 20 20 20 20 20 20 20 20 20 20    euse            
0254D0:  20 20 20 20 20 46 4F 52 45 54 20 44 49 41 4D 45         FORET DIAME
0254E0:  54 52 45 20 32 35 20 20 20 20 20 20 20 20 20 20    TRE 25          
0254F0:  20 20 20 20 20 20 20 20 31 32 33 34 35 36 37 38            12345678
025500:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025510:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025520:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025530:  20 20 39 39 39 39 39 39 39 39 39 39 39 39 20 20      999999999999  
025540:  20 20 20 20 20 20 20 20 20 20 20 20 30 20 20 20                0   
025550:  20 20 30 20 20 20 20 20 30 2E 30 30 20 20 20 30      0     0.00   0
025560:  2A 31 32 20 20 20 32 20 20 20 20 54 45 52 46 54    *12   2    TERFT
025570:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025580:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025590:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0255A0:  20 20 20 20 20 20 20 4D 41 43 48 49 4E 45 20 20           MACHINE  
0255B0:  20 20 20 52 51 45 20 20 20 20 20 20 20 20 20 20       RQE          
0255C0:  20 30 20 20 20 20 20 30 20 20 20 20 20 30 2E 30     0     0     0.0
0255D0:  30 20 20 20 30 2A 49 55 54 59 20 20 20 20 20 20    0   0*IUTY      
0255E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0255F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025600:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025610:  20 20 20 20 20 20 20 20 20 20 20 20 45 52 20 20                ER  
025620:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025630:  20 20 20 20 20 20 30 20 20 20 20 20 30 20 20 20          0     0   
025640:  20 20 30 2E 30 30 20 20 20 30 2A 33 20 20 20 20      0.00   0*3    
025650:  35 38 20 20 20 38 20 20 20 20 20 20 20 20 20 20    58   8          
025660:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 49                  DI
025670:  53 51 55 45 20 44 49 41 4D 45 54 52 45 20 31 35    SQUE DIAMETRE 15
025680:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025690:  20 32 35 34 36 20 20 20 20 20 20 20 20 32 33 34     2546        234
0256A0:  35 20 20 20 20 20 20 20 20 20 20 34 20 20 20 20    5          4    
0256B0:  33 32 20 20 20 32 33 34 2E 30 30 20 20 20 37 2A    32   234.00   7*
0256C0:  31 34 32 33 20 30 32 35 34 31 4C 49 56 52 45 20    1423 02541LIVRE 
0256D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0256E0:  20 20 20 43 48 41 50 49 54 52 45 31 20 20 20 20       CHAPITRE1    
0256F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025700:  39 31 33 32 20 20 20 20 20 20 20 20 20 20 20 20    9132            
025710:  20 20 32 20 20 20 20 32 35 20 20 20 20 31 35 2E      2    25    15.
025720:  32 35 20 20 35 30 1A 20 20 20 20 20 20 20 20 20    25  50.         
025730:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025740:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025750:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025760:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025770:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025780:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025790:  20 20 20 30 2E 30 30 20 20 20 20 1A 42 44 31 35       0.00    .BD15
0257A0:  34 30 34 32 35 38 52 45 43 54 49 46 49 45 55 53    404258RECTIFIEUS
0257B0:  45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44    E              D
0257C0:  49 53 51 55 45 20 41 42 52 41 53 49 46 20 44 49    ISQUE ABRASIF DI
0257D0:  41 4D 45 54 52 45 20 36 30 30 20 20 20 20 20 20    AMETRE 600      
0257E0:  20 20 37 38 39 34 35 36 31 32 33 34 35 36 31 32      78945612345612
0257F0:  33 31 32 33 20 20 20 20 20 20 20 33 35 20 20 20    3123       35   
025800:  31 30 30 20 20 20 37 30 30 2E 30 30 20 31 35 30    100   700.00 150
025810:  2A 42 44 31 35 34 30 32 31 35 34 52 45 43 54 49    *BD15402154RECTI
025820:  46 49 45 55 53 45 20 20 20 20 20 20 20 20 20 20    FIEUSE          
025830:  20 20 20 20 44 49 53 51 55 45 20 44 49 41 4D 45        DISQUE DIAME
025840:  54 52 45 20 35 34 30 20 20 20 20 20 20 20 20 20    TRE 540         
025850:  20 20 20 20 20 20 20 31 32 33 31 32 33 31 32 33           123123123
025860:  31 32 33 31 32 35 33 36 35 20 20 20 20 20 20 20    123125365       
025870:  20 35 20 20 20 20 34 35 20 20 20 34 35 32 2E 32     5    45   452.2
025880:  35 20 20 35 34 2A 42 44 31 34 35 30 31 32 35 34    5  54*BD14501254
025890:  46 52 41 49 53 45 55 53 45 20 20 20 20 20 20 20    FRAISEUSE       
0258A0:  20 20 20 20 20 20 20 20 20 46 52 41 49 53 45 20             FRAISE 
0258B0:  44 49 41 4D 45 54 52 45 20 35 30 20 20 20 20 20    DIAMETRE 50     
0258C0:  20 20 20 20 20 20 20 20 20 20 20 20 34 35 36 34                4564
0258D0:  33 34 35 32 33 39 38 34 37 38 35 34 36 39 20 20    34523984785469  
0258E0:  20 20 20 20 20 31 36 20 20 20 20 31 30 20 20 20         16    10   
0258F0:  31 35 32 2E 30 30 20 20 32 30 2A 42 44 31 34 32    152.00  20*BD142
025900:  20 20 20 20 20 20 43 4C 4F 56 49 53 20 20 20 20          CLOVIS    
025910:  20 20 31 32 20 20 20 20 20 20 20 20 20 20 20 20      12            
025920:  36 20 20 20 20 20 36 20 20 20 31 35 30 2E 30 30    6     6   150.00
025930:  20 20 31 35 20 42 44 31 32 35 30 32 31 35 33 50      15 BD12502153P
025940:  45 52 43 45 55 53 45 20 20 20 20 20 20 20 20 20    ERCEUSE         
025950:  20 20 20 20 20 20 20 20 46 4F 52 45 54 20 44 49            FORET DI
025960:  41 4D 45 54 52 45 20 31 35 20 20 20 20 20 20 20    AMETRE 15       
025970:  20 20 20 20 20 20 20 20 20 20 20 31 32 33 34 35               12345
025980:  36 37 38 39 31 32 20 31 32 33 20 20 20 20 20 20    678912 123      
025990:  20 20 20 20 31 30 20 20 20 20 33 35 20 20 20 20        10    35    
0259A0:  31 35 2E 30 30 20 20 35 30 20 42 44 31 35 34 30    15.00  50 BD1540
0259B0:  32 31 34 35 50 45 52 43 45 55 53 45 20 20 20 20    2145PERCEUSE    
0259C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 46 4F 52                 FOR
0259D0:  45 54 20 44 49 41 4D 45 54 52 45 20 31 35 20 20    ET DIAMETRE 15  
0259E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0259F0:  31 32 35 34 20 20 20 20 20 20 20 20 31 32 33 34    1254        1234
025A00:  35 32 20 20 20 20 20 20 20 32 30 20 20 20 20 35    52       20    5
025A10:  31 20 20 20 20 20 31 2E 37 35 20 20 37 38 2A 42    1     1.75  78*B
025A20:  44 31 35 33 30 32 31 34 35 50 45 52 43 45 55 53    D15302145PERCEUS
025A30:  45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    E               
025A40:  20 20 4D 41 4E 44 52 49 4E 20 20 20 20 20 20 20      MANDRIN       
025A50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025A60:  20 20 20 20 20 34 35 36 33 32 31 31 20 20 20 20         4563211    
025A70:  20 34 35 36 33 32 31 31 20 20 20 20 20 20 20 33     4563211       3
025A80:  20 20 20 20 20 38 20 20 20 34 35 30 2E 30 30 20         8   450.00 
025A90:  20 31 32 2A 42 44 31 34 32 30 32 31 31 35 52 45     12*BD14202115RE
025AA0:  43 54 49 46 49 45 55 53 45 20 20 20 20 20 20 20    CTIFIEUSE       
025AB0:  20 20 20 20 20 20 20 44 49 53 51 55 45 20 20 20           DISQUE   
025AC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025AD0:  20 20 20 20 20 20 20 20 20 20 31 32 33 32 33 31              123231
025AE0:  20 20 20 20 20 20 39 38 37 36 35 34 20 20 20 20          987654    
025AF0:  20 20 20 20 37 20 20 20 20 34 30 20 20 20 33 32        7    40   32
025B00:  30 32 31 34 35 52 45 43 54 49 46 49 45 55 53 45    02145RECTIFIEUSE
025B10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 49                  DI
025B20:  53 51 55 45 20 41 42 52 41 53 49 46 20 20 20 20    SQUE ABRASIF    
025B30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025B40:  20 34 35 36 34 35 36 20 20 20 20 20 20 31 32 33     456456      123
025B50:  34 35 36 20 20 20 20 20 20 20 20 34 20 20 20 20    456        4    
025B60:  31 30 20 20 20 33 30 30 2E 30 30 20 20 31 35 2A    10   300.00  15*
025B70:  42 44 31 34 35 30 35 34 32 33 50 45 52 43 45 55    BD14505423PERCEU
025B80:  53 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20    SE              
025B90:  20 20 20 46 4F 52 45 54 20 44 49 41 4D 45 54 52       FORET DIAMETR
025BA0:  45 4D 44 45 4C 41 49 29 3D 44 45 4C 41 49 00 20    EMDELAI)=DELAI. 
025BB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025BC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025BD0:  30 20 20 20 20 20 30 20 20 20 20 20 30 2E 30 30    0     0     0.00
025BE0:  20 20 20 30 2A 42 44 31 34 37 30 34 32 35 38 52       0*BD14704258R
025BF0:  45 43 54 49 46 49 45 55 53 45 20 20 20 20 20 20    ECTIFIEUSE      
025C00:  20 20 20 20 20 20 20 20 44 49 53 51 55 45 20 41            DISQUE A
025C10:  42 52 41 53 49 46 20 20 20 20 20 20 20 20 20 20    BRASIF          
025C20:  20 20 20 20 20 20 20 20 20 20 20 34 35 36 31 32               45612
025C30:  33 31 32 33 31 32 33 34 35 36 31 32 33 31 32 33    3123123456123123
025C40:  32 20 20 20 35 30 20 20 20 20 37 35 20 20 20 35    2   50    75   5
025C50:  30 30 2E 30 30 20 31 35 30 2A 42 44 31 32 35 30    00.00 150*BD1250
025C60:  32 31 35 33 50 45 52 43 45 55 53 45 20 20 20 20    2153PERCEUSE    
025C70:  20 20 20 20 20 20 20 20 20 20 20 20 20 46 4F 52                 FOR
025C80:  45 54 20 44 49 41 4D 45 54 52 45 20 31 35 20 20    ET DIAMETRE 15  
025C90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025CA0:  31 32 33 34 35 36 37 38 39 31 32 20 31 32 33 20    12345678912 123 
025CB0:  20 20 20 20 20 20 20 20 20 31 30 20 20 20 20 33             10    3
025CC0:  35 20 20 20 20 31 35 2E 30 30 20 20 35 30 2A 42    5    15.00  50*B
025CD0:  44 31 35 34 30 32 31 34 35 50 45 52 43 45 55 53    D15402145PERCEUS
025CE0:  45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    E               
025CF0:  20 20 46 4F 52 45 54 20 44 49 41 4D 45 54 52 45      FORET DIAMETRE
025D00:  35 2E 30 30 20 20 35 30 20 42 44 31 32 35 30 31    5.00  50 BD12501
025D10:  32 35 34 50 45 52 43 45 55 53 45 20 20 20 20 20    254PERCEUSE     
025D20:  20 20 20 20 20 20 20 20 20 20 20 20 46 4F 52 45                FORE
025D30:  54 20 44 49 41 4D 45 54 52 45 20 31 30 2E 35 30    T DIAMETRE 10.50
025D40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31                   1
025D50:  31 30 31 38 33 20 20 20 20 20 20 20 20 20 20 20    10183           
025D60:  20 20 20 20 20 20 20 20 20 32 20 20 20 20 34 30             2    40
025D70:  20 20 20 20 20 32 2E 35 33 20 20 35 30 2A 67 66         2.53  50*gf
025D80:  66 66 66 66 66 66 66 66 66 66 66 66 66 66 66 66    ffffffffffffffff
025D90:  66 66 66 66 66 66 66 66 66 66 66 66 66 66 66 66    ffffffffffffffff
025DA0:  20 66 66 66 66 66 66 66 66 66 66 66 66 66 66 66     fffffffffffffff
025DB0:  66 66 66 66 66 66 66 66 66 66 66 20 20 20 20 20    fffffffffff     
025DC0:  20 20 20 20 31 32 30 31 38 33 20 20 20 20 20 20        120183      
025DD0:  31 32 33 34 35 36 33 20 20 20 20 20 20 20 32 20    1234563       2 
025DE0:  20 20 20 33 35 20 20 20 20 20 33 2E 35 30 20 20       35     3.50  
025DF0:  35 30 20 42 44 31 32 35 30 32 36 35 32 50 45 52    50 BD12502652PER
025E00:  43 45 55 53 45 20 20 20 20 20 20 20 20 20 20 20    CEUSE           
025E10:  20 20 20 20 20 20 46 4F 52 45 54 20 44 49 41 4D          FORET DIAM
025E20:  45 54 52 45 20 31 32 20 20 20 20 20 20 20 20 20    ETRE 12         
025E30:  20 20 20 20 20 20 20 20 20 32 31 30 31 38 33 20             210183 
025E40:  20 20 20 20 20 33 32 31 33 32 31 34 20 20 20 20         3213214    
025E50:  20 20 20 37 20 20 20 20 35 30 20 20 20 20 20 33       7    50     3
025E60:  2E 31 30 20 20 35 30 2A 20 20 20 20 20 20 20 20    .10  50*        
025E70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025E80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025E90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025EA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 31                  01
025EB0:  31 32 35 37 38 39 35 38 37 30 20 20 20 20 20 20    1257895870      
025EC0:  20 20 20 20 20 20 20 20 30 20 20 20 20 20 30 20            0     0 
025ED0:  20 20 20 20 30 2E 30 30 20 20 20 30 2A 42 44 20        0.00   0*BD 
025EE0:  20 20 30 32 31 34 35 50 45 52 43 45 55 53 45 20      02145PERCEUSE 
025EF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025F00:  20 31 35 20 20 20 20 20 20 20 20 20 20 20 20 20     15             
025F10:  20 20 20 20 20 31 32 35 34 20 20 20 20 20 20 20         1254       
025F20:  20 31 32 33 34 35 32 20 20 20 20 20 20 20 32 30     123452       20
025F30:  20 20 20 20 35 31 20 20 20 20 20 31 2E 37 35 20        51     1.75 
025F40:  20 37 38 2A 42 44 31 32 35 30 31 32 35 34 50 45     78*BD12501254PE
025F50:  52 43 45 55 53 45 20 20 20 20 20 20 20 20 20 20    RCEUSE          
025F60:  20 20 20 20 20 20 20 46 4F 52 45 54 20 44 49 41           FORET DIA
025F70:  4D 45 54 52 45 20 31 30 2E 35 30 20 20 20 20 20    METRE 10.50     
025F80:  20 20 20 20 20 20 20 20 20 20 31 31 30 31 38 33              110183
025F90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
025FA0:  20 20 20 20 32 20 20 20 20 34 30 20 20 20 20 20        2    40     
025FB0:  32 2E 35 33 20 20 35 30 2A 42 44 31 32 35 30 32    2.53  50*BD12502
025FC0:  36 35 32 50 45 52 43 45 55 53 45 20 20 20 20 20    652PERCEUSE     
025FD0:  20 20 20 20 20 20 20 20 20 20 20 20 46 4F 52 45                FORE
025FE0:  54 20 44 49 41 4D 45 54 52 45 20 31 32 20 20 20    T DIAMETRE 12   
025FF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32                   2
026000:  31 30 31 38 33 20 20 20 20 20 20 33 32 31 33 32    10183      32132
026010:  31 34 20 20 20 20 20 20 20 37 20 20 20 20 35 30    14       7    50
026020:  20 20 20 20 20 33 2E 31 30 20 20 35 30 2A 42 44         3.10  50*BD
026030:  31 32 38 30 33 32 35 33 52 45 43 54 49 46 49 45    12803253RECTIFIE
026040:  55 53 45 20 20 20 20 20 20 20 20 20 20 20 20 20    USE             
026050:  20 44 49 53 51 55 45 20 44 49 41 4D 45 54 52 45     DISQUE DIAMETRE
026060:  20 31 35 20 20 20 20 20 20 20 20 20 20 20 20 20     15             
026070:  20 20 20 20 32 35 33 20 20 20 20 20 20 20 20 20        253         
026080:  32 31 34 35 20 20 20 20 20 20 20 20 20 20 32 20    2145          2 
026090:  20 20 20 20 35 20 20 20 32 35 31 2E 32 35 20 20        5   251.25  
0260A0:  31 35 2A 42 44 31 35 33 30 32 31 34 35 50 45 52    15*BD15302145PER
0260B0:  43 45 55 53 45 20 20 20 20 20 20 20 20 20 20 20    CEUSE           
0260C0:  20 20 20 20 20 20 46 4F 52 45 54 20 44 49 41 4D          FORET DIAM
0260D0:  45 54 52 45 20 31 35 20 20 20 20 20 20 20 20 20    ETRE 15         
0260E0:  20 20 20 20 20 20 20 20 20 39 38 37 39 38 37 36             9879876
0260F0:  35 34 36 35 34 39 38 37 36 35 34 36 35 34 20 20    54654987654654  
026100:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
026110:  20 00 00 00 02 09 50 E5 20 00 C1 02 00 00 00 02     .....P. .......
026120:  20 00 C6 02 00 00 00 02 20 00 C2 02 00 00 00 02     ....... .......
026130:  20 00 C7 02 00 00 00 02 20 00 C3 02 00 00 00 02     ....... .......
026140:  20 00 C8 02 00 00 00 02 20 00 C4 02 00 00 00 02     ....... .......
026150:  20 00 C9 02 00 00 00 02 20 00 C5 02 00 00 00 02     ....... .......
026160:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
026170:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
026180:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
026190:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0261F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
026200:  46 52 41 49 53 45 20 44 49 41 4D 45 54 52 45 20    FRAISE DIAMETRE 
026210:  33 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20    30              
026220:  20 20 20 31 38 30 31 38 33 20 20 20 20 20 20 31       180183      1
026230:  32 35 34 20 20 20 20 20 20 20 20 20 20 37 20 20    254          7  
026240:  20 20 33 35 20 20 20 20 32 35 2E 30 30 20 20 35      35    25.00  5
026250:  30 2A 31 32 33 34 35 36 20 20 20 20 20 20 20 20    0*123456        
026260:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026270:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026280:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026290:  20 20 20 20 20 20 20 20 31 32 35 34 32 33 20 20            125423  
0262A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0262B0:  20 20 30 20 20 20 20 20 30 20 20 20 20 20 30 2E      0     0     0.
0262C0:  30 30 20 20 20 30 2A 20 20 20 20 20 20 20 20 20    00   0*         
0262D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0262E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0262F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026300:  20 20 20 20 20 20 20 20 20 20 20 20 20 36 35 34                 654
026310:  36 35 34 2D 35 36 34 20 20 20 20 20 20 20 20 20    654-564         
026320:  20 20 20 20 20 20 20 30 20 20 20 20 20 30 20 20           0     0  
026330:  20 20 20 30 2E 30 30 20 20 20 30 2A 20 20 20 20       0.00   0*    
026340:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026350:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026360:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026370:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026380:  20 20 32 31 35 34 20 20 20 20 20 20 20 20 20 20      2154          
026390:  20 20 20 20 20 20 20 20 20 20 20 20 30 20 20 20                0   
0263A0:  20 20 30 20 20 20 20 20 30 2E 30 30 20 20 20 30      0     0.00   0
0263B0:  2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    *               
0263C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0263D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0263E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0263F0:  20 20 20 20 20 20 20 32 35 33 31 20 20 20 20 20           2531     
026400:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 4F                  FO
026410:  52 45 54 20 44 49 41 4D 45 54 52 45 20 31 35 20    RET DIAMETRE 15 
026420:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026430:  20 39 38 37 39 38 37 36 35 34 36 35 34 39 38 37     987987654654987
026440:  36 35 34 36 35 34 20 20 20 20 35 35 20 20 20 20    654654    55    
026450:  20 31 20 20 20 20 20 33 2E 30 30 20 31 30 30 1A     1     3.00 100.
026460:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026470:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026480:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026490:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0264A0:  20 20 20 20 20 20 32 35 34 35 34 35 34 35 32 34          2545454524
0264B0:  31 4B 20 20 20 20 20 20 20 20 20 20 20 20 20 20    1K              
0264C0:  30 20 20 20 20 20 30 20 20 20 20 20 30 2E 30 30    0     0     0.00
0264D0:  20 20 20 30 1A 46 46 52 52 52 52 52 52 52 52 52       0.FFRRRRRRRRR
0264E0:  52 52 52 52 52 52 52 52 52 52 52 52 52 52 52 52    RRRRRRRRRRRRRRRR
0264F0:  52 52 52 52 52 52 52 20 52 52 52 52 52 52 52 51    RRRRRRR RRRRRRRQ
026500:  51 51 57 57 57 57 57 57 57 57 57 57 57 57 51 20    QQWWWWWWWWWWWWQ 
026510:  20 20 20 20 20 20 20 20 20 20 20 35 37 34 35 34               57454
026520:  35 34 35 32 31 20 20 20 20 20 20 20 20 20 20 20    54521           
026530:  20 20 20 20 20 30 20 20 20 20 20 30 20 20 20 20         0     0    
026540:  20 30 2E 30 30 20 20 20 30 20 20 20 20 20 20 20     0.00   0       
026550:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026560:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026570:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026580:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026590:  32 35 34 35 34 35 34 35 32 34 31 4B 20 20 20 20    25454545241K    
0265A0:  20 20 20 20 20 20 20 20 20 20 30 20 20 20 20 20              0     
0265B0:  30 20 20 20 20 20 30 2E 30 30 20 20 20 30 1A 46    0     0.00   0.F
0265C0:  46 52 52 52 52 52 52 52 52 52 52 52 52 52 52 52    FRRRRRRRRRRRRRRR
0265D0:  52 52 52 52 52 52 52 52 52 52 52 52 52 52 52 52    RRRRRRRRRRRRRRRR
0265E0:  52 20 52 52 52 52 52 52 52 51 51 51 57 57 57 57    R RRRRRRRQQQWWWW
0265F0:  57 57 57 57 57 57 57 57 51 20 20 20 20 20 20 20    WWWWWWWWQ       
026600:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026610:  20 30 20 20 20 20 20 30 20 20 20 20 20 30 2E 30     0     0     0.0
026620:  30 20 20 20 30 2A 6A 68 68 68 20 20 20 20 20 20    0   0*jhhh      
026630:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026640:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026650:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026660:  20 20 20 20 20 20 20 20 20 20 20 20 33 32 33 32                3232
026670:  33 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20    32              
026680:  20 20 20 20 20 20 30 20 20 20 20 20 30 20 20 20          0     0   
026690:  20 20 30 2E 30 30 20 20 20 30 2A 20 20 20 20 20      0.00   0*     
0266A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0266B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0266C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0266D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0266E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0266F0:  20 20 20 20 20 20 20 20 20 20 20 30 20 20 20 20               0    
026700:  20 30 20 20 20 20 20 30 2E 30 30 20 20 20 30 2A     0     0.00   0*
026710:  41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41    AAAAAAAAAAAAAAAA
026720:  41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41    AAAAAAAAAAAAAAAA
026730:  41 41 20 41 41 41 41 41 41 41 41 41 41 41 41 41    AA AAAAAAAAAAAAA
026740:  41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41    AAAAAAAAAAAAAAAA
026750:  41 20 20 20 20 20 31 32 35 34 38 35 35 20 20 20    A     1254855   
026760:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026770:  30 20 20 20 20 31 30 20 20 20 20 20 32 2E 35 30    0    10     2.50
026780:  20 20 35 30 2A 61 61 61 61 61 61 61 61 61 61 61      50*aaaaaaaaaaa
026790:  61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61    aaaaaaaaaaaaaaaa
0267A0:  61 61 61 61 61 61 61 20 61 61 61 61 61 61 61 61    aaaaaaa aaaaaaaa
0267B0:  61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61    aaaaaaaaaaaaaaaa
0267C0:  61 61 61 61 61 61 61 61 61 61 20 31 32 35 34 33    aaaaaaaaaa 12543
0267D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0267E0:  20 20 20 20 20 30 20 20 20 20 20 30 20 20 20 20         0     0    
0267F0:  20 30 2E 30 30 20 20 20 30 2A 20 20 20 20 20 20     0.00   0*      
026800:  20 20 20 20 20 35 37 34 35 34 35 34 35 32 31 20         5745454521 
026810:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30                   0
026820:  20 20 20 20 20 30 20 20 20 20 20 30 2E 30 30 20         0     0.00 
026830:  20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20      0             
026840:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026850:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026860:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026870:  20 20 20 20 20 20 20 20 20 20 32 35 34 35 34 35              254545
026880:  34 35 32 34 31 4B 20 20 20 20 20 20 20 20 20 20    45241K          
026890:  20 20 20 20 30 20 20 20 20 20 30 20 20 20 20 20        0     0     
0268A0:  30 2E 30 30 20 20 20 30 1A 20 20 20 20 20 20 20    0.00   0.       
0268B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0268C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0268D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0268E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32                   2
0268F0:  35 34 35 34 35 34 35 32 34 31 4B 20 20 20 20 20    5454545241K     
026900:  20 20 20 20 20 20 20 20 20 30 20 20 20 20 20 30             0     0
026910:  20 20 20 20 20 30 2E 30 30 20 20 20 30 1A 33 20         0.00   0.3 
026920:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026930:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026940:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20                  0 
026950:  20 20 20 30 20 20 20 20 31 32 20 20 20 20 31 32       0    12    12
026960:  2E 35 33 20 20 35 30 20 42 44 31 32 33 30 32 31    .53  50 BD123021
026970:  34 35 50 45 52 43 45 55 53 45 20 20 20 20 20 20    45PERCEUSE      
026980:  20 20 20 20 20 20 20 20 20 20 20 4D 41 4E 44 52               MANDR
026990:  49 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 20    IN              
0269A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 33                  23
0269B0:  35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    5               
0269C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0269D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0269E0:  30 20 20 20 20 32 20 20 20 20 31 35 20 20 20 31    0    2    15   1
0269F0:  35 30 2E 32 35 20 20 32 31 20 20 20 20 20 20 20    50.25  21       
026A00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026A10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026A20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026A30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026A40:  32 33 34 35 36 37 38 5C 20 20 20 20 20 20 20 20    2345678\        
026A50:  20 20 20 20 20 20 20 20 20 20 30 20 20 20 20 20              0     
026A60:  30 20 20 20 20 20 30 2E 30 30 20 20 20 30 2A 20    0     0.00   0* 
026A70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026A80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026A90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026AA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026AB0:  20 20 20 20 20 35 32 31 20 20 20 20 20 20 20 20         521        
026AC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30                   0
026AD0:  20 20 20 20 20 30 20 20 20 20 20 30 2E 30 30 20         0     0.00 
026AE0:  20 20 30 2A 42 44 31 32 35 30 32 33 35 36 50 45      0*BD12502356PE
026AF0:  52 43 45 55 53 45 20 20 20 20 20 20 20 20 20 20    RCEUSE          
026B00:  20 20 20 20 20 20 20 46 4F 52 45 54 20 44 49 41           FORET DIA
026B10:  4D 45 54 52 45 20 31 35 32 20 20 20 20 20 20 20    METRE 152       
026B20:  20 20 20 20 20 20 20 20 20 20 35 32 33 20 20 20              523   
026B30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026B40:  20 20 20 20 30 20 20 20 20 31 32 20 20 20 20 31        0    12    1
026B50:  32 2E 35 33 20 20 35 30 2A 42 44 31 32 33 30 32    2.53  50*BD12302
026B60:  31 34 35 50 45 52 43 45 55 53 45 20 20 20 20 20    145PERCEUSE     
026B70:  20 20 20 20 20 20 20 20 20 20 20 20 4D 41 4E 44                MAND
026B80:  52 49 4E 20 20 20 20 20 20 20 20 20 20 20 20 20    RIN             
026B90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32                   2
026BA0:  33 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20    35              
026BB0:  20 20 20 20 20 20 20 20 20 32 20 20 20 20 31 35             2    15
026BC0:  20 20 20 31 35 30 2E 32 35 20 20 32 31 2A 20 20       150.25  21*  
026BD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026BE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026BF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026C00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026C10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026C20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026C30:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026C40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026C50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026C60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026C70:  20 20 30 20 20 20 20 30 20 20 20 20 20 30 20 20      0    0     0  
026C80:  20 20 20 30 2E 30 30 20 20 20 30 20 42 44 31 32       0.00   0 BD12
026C90:  38 30 33 32 35 33 52 45 43 54 49 46 49 45 55 53    803253RECTIFIEUS
026CA0:  45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44    E              D
026CB0:  49 53 51 55 45 20 44 49 41 4D 45 54 52 45 20 31    ISQUE DIAMETRE 1
026CC0:  35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    5               
026CD0:  20 20 32 35 33 20 20 20 20 20 20 20 20 20 32 31      253         21
026CE0:  34 35 20 20 20 20 20 20 32 32 2F 30 31 2F 20 20    45      22/01/  
026CF0:  20 20 20 20 20 20 20 20 20 20 20 20 2F 20 20 2F                /  /
026D00:  20 20 20 20 30 20 20 20 20 32 20 20 20 20 20 35        0    2     5
026D10:  20 20 20 32 35 31 2E 32 35 20 20 31 35 20 20 20       251.25  15   
026D20:  20 20 20 20 20 20 20 20 41 41 41 41 41 41 41 41            AAAAAAAA
026D30:  41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41    AAAAAAAAAAAAAAAA
026D40:  20 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41     AAAAAAAAAAAAAAA
026D50:  41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41    AAAAAAAAAAAAAAAA
026D60:  41 41 41 20 31 31 20 20 20 20 20 20 20 20 20 20    AAA 11          
026D70:  31 31 32 20 20 20 20 20 20 20 20 20 2F 20 20 2F    112         /  /
026D80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026D90:  20 20 20 20 20 20 30 20 20 20 20 30 20 20 20 20          0    0    
026DA0:  20 30 20 20 20 20 20 30 2E 30 30 20 20 20 30 1A     0     0.00   0.
026DB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 2F 20 20                 /  
026DC0:  2F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2F    /              /
026DD0:  20 20 2F 20 20 20 20 30 20 20 20 20 30 20 20 20      /    0    0   
026DE0:  20 20 30 20 20 20 20 20 30 2E 30 30 20 20 20 20      0     0.00    
026DF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20                  0 
026E00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026E10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026E20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 20                  0 
026E30:  20 20 20 20 30 20 20 20 20 20 30 2E 30 30 20 20        0     0.00  
026E40:  20 30 20 42 44 31 32 38 30 33 32 35 33 52 45 43     0 BD12803253REC
026E50:  54 49 46 49 45 55 53 45 20 20 20 20 20 20 20 20    TIFIEUSE        
026E60:  20 20 20 20 20 20 44 49 53 51 55 45 20 44 49 41          DISQUE DIA
026E70:  4D 45 54 52 45 20 31 35 20 20 20 20 20 20 20 20    METRE 15        
026E80:  20 20 20 20 20 20 20 20 20 32 35 33 20 20 20 20             253    
026E90:  20 20 20 20 20 32 31 34 35 20 20 20 20 20 20 20         2145       
026EA0:  20 20 20 32 20 20 20 20 20 35 20 20 20 32 35 31       2     5   251
026EB0:  2E 32 35 20 20 31 35 2A 44 44 44 44 44 44 44 44    .25  15*DDDDDDDD
026EC0:  44 44 44 44 44 44 44 44 44 44 44 44 44 44 44 44    DDDDDDDDDDDDDDDD
026ED0:  44 44 44 44 44 44 44 44 44 44 20 44 44 44 44 44    DDDDDDDDDD DDDDD
026EE0:  44 44 44 44 44 44 44 44 44 44 44 44 44 44 44 44    DDDDDDDDDDDDDDDD
026EF0:  44 44 44 44 44 44 44 44 44 44 20 20 20 20 35 34    DDDDDDDDDD    54
026F00:  35 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20    54              
026F10:  20 20 20 20 20 20 20 20 30 20 20 20 20 20 30 20            0     0 
026F20:  20 20 20 20 30 2E 30 30 20 20 20 30 2A 44 44 44        0.00   0*DDD
026F30:  44 44 44 44 44 44 44 44 44 44 44 44 44 44 44 44    DDDDDDDDDDDDDDDD
026F40:  44 44 44 44 44 44 44 44 44 44 44 44 44 44 44 20    DDDDDDDDDDDDDDD 
026F50:  44 44 44 44 44 44 44 44 20 20 20 20 20 20 20 20    DDDDDDDD        
026F60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
026F70:  20 20 20 36 35 34 36 34 33 36 34 20 20 20 20 20       65464364     
026F80:  20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 20                 0  
026F90:  20 20 20 30 20 20 20 20 20 30 2E 30 30 20 20 20       0     0.00   
026FA0:  30 2A 20 20 20 20 20 46 46 46 46 46 46 46 46 46    0*     FFFFFFFFF
026FB0:  46 46 46 46 46 46 46 46 46 46 46 46 46 46 46 46    FFFFFFFFFFFFFFFF
026FC0:  46 46 46 46 20 46 46 46 46 46 46 46 46 46 46 46    FFFF FFFFFFFFFFF
026FD0:  46 46 46 46 46 46 46 46 46 46 46 20 20 20 20 20    FFFFFFFFFFF     
026FE0:  20 20 20 20 20 20 20 20 35 34 36 35 34 33 32 31            54654321
026FF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027000:  42 44 31 32 35 30 32 33 35 36 50 45 52 43 45 55    BD12502356PERCEU
027010:  53 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20    SE              
027020:  20 20 20 46 4F 52 45 54 20 44 49 41 4D 45 54 52       FORET DIAMETR
027030:  45 20 31 35 32 20 20 20 20 20 20 20 20 20 20 20    E 152           
027040:  20 20 20 20 20 20 35 32 33 20 20 20 20 20 20 20          523       
027050:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027060:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027070:  20 20 20 20 20 20 20 20 20 20 20 20 20 30 20 20                 0  
027080:  20 20 31 32 20 20 20 20 31 32 2E 35 33 20 20 20      12    12.53   
027090:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 35 30                  50
0270A0:  20 42 44 31 32 33 30 32 31 34 35 50 45 52 43 45     BD12302145PERCE
0270B0:  55 53 45 20 20 20 20 20 20 20 20 20 20 20 20 20    USE             
0270C0:  20 20 20 20 4D 41 4E 44 52 49 4E 20 20 20 20 20        MANDRIN     
0270D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0270E0:  20 20 20 20 20 20 20 32 33 35 20 20 20 20 20 20           235      
0270F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027100:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027110:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 20                  2 
027120:  20 20 20 31 35 20 20 20 31 35 30 2E 32 35 20 20       15   150.25  
027130:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32                   2
027140:  31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    1               
027150:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027160:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027170:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027180:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027190:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0271A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0271B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0271C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0271D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0271E0:  20 20 20 42 44 31 32 38 30 33 32 35 33 52 45 43       BD12803253REC
0271F0:  54 49 46 49 45 55 53 45 20 20 20 20 20 20 20 20    TIFIEUSE        
027200:  20 20 30 20 20 20 20 20 30 20 20 20 20 20 30 2E      0     0     0.
027210:  30 30 20 20 20 30 2A 46 46 46 46 46 46 46 46 46    00   0*FFFFFFFFF
027220:  46 46 46 46 46 46 46 46 46 46 46 46 46 46 46 46    FFFFFFFFFFFFFFFF
027230:  46 46 46 46 46 46 46 46 46 20 46 46 46 46 46 46    FFFFFFFFF FFFFFF
027240:  46 46 46 46 46 46 46 46 46 46 46 46 46 20 20 20    FFFFFFFFFFFFF   
027250:  20 20 20 20 20 20 20 20 20 20 20 20 20 36 35 35                 655
027260:  34 35 34 33 32 35 34 31 20 20 20 20 20 20 20 20    45432541        
027270:  20 20 20 20 20 20 20 30 20 20 20 20 20 30 20 20           0     0  
027280:  20 20 20 30 2E 30 30 20 20 20 30 2A 46 46 52 52       0.00   0*FFRR
027290:  52 52 52 52 52 52 52 52 52 52 52 52 52 52 52 52    RRRRRRRRRRRRRRRR
0272A0:  52 52 52 52 52 52 52 52 52 52 52 52 52 52 20 52    RRRRRRRRRRRRRR R
0272B0:  52 52 52 52 52 52 51 51 51 57 57 57 57 57 57 57    RRRRRRQQQWWWWWWW
0272C0:  57 57 57 57 57 51 20 20 20 20 20 20 20 20 20 20    WWWWWQ          
0272D0:  20 20 35 37 34 35 34 35 34 35 32 31 20 20 20 20      5745454521    
0272E0:  20 20 20 20 20 20 20 20 20 20 20 20 30 20 20 20                0   
0272F0:  20 20 30 20 20 20 20 20 30 2E 30 30 20 20 20 30      0     0.00   0
027300:  2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    *               
027310:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027320:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027330:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027340:  20 20 20 20 20 20 20 32 35 34 35 34 35 34 35 32           254545452
027350:  34 31 4B 20 20 20 20 20 20 20 20 20 20 20 20 20    41K             
027360:  20 30 20 20 20 20 20 30 20 20 20 20 20 30 2E 30     0     0     0.0
027370:  30 20 20 20 30 2A 31 31 31 31 31 31 31 31 31 31    0   0*1111111111
027380:  31 31 31 31 31 31 31 31 31 31 31 31 31 31 31 31    1111111111111111
027390:  31 31 31 31 31 31 31 31 20 31 31 31 31 31 31 20    11111111 111111 
0273A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0273B0:  20 20 20 20 20 20 20 20 20 20 20 20 32 35 31 32                2512
0273C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0273D0:  20 20 20 20 20 20 30 20 20 20 20 20 30 20 20 20          0     0   
0273E0:  20 20 30 2E 30 30 20 20 20 30 20 42 44 31 35 33      0.00   0 BD153
0273F0:  30 32 31 34 35 50 45 52 43 45 55 53 45 20 20 20    02145PERCEUSE   
027400:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
027410:  21 00 00 00 02 09 50 E5 21 00 C1 02 00 00 00 02    !.....P.!.......
027420:  21 00 C6 02 00 00 00 02 21 00 C2 02 00 00 00 02    !.......!.......
027430:  21 00 C7 02 00 00 00 02 21 00 C3 02 00 00 00 02    !.......!.......
027440:  21 00 C8 02 00 00 00 02 21 00 C4 02 00 00 00 02    !.......!.......
027450:  21 00 C9 02 00 00 00 02 21 00 C5 02 00 00 00 02    !.......!.......
027460:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
027470:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
027480:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
027490:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0274F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
027500:  20 20 20 20 20 20 44 49 53 51 55 45 20 44 49 41          DISQUE DIA
027510:  4D 45 54 52 45 20 31 35 20 20 20 20 20 20 20 20    METRE 15        
027520:  20 20 20 20 20 20 20 20 20 32 35 33 20 20 20 20             253    
027530:  20 20 20 20 20 32 31 34 35 20 20 20 20 20 20 32         2145      2
027540:  32 2F 30 31 2F 20 20 20 20 20 20 20 20 20 20 20    2/01/           
027550:  20 20 20 2F 20 20 2F 20 20 20 20 30 20 20 20 20       /  /    0    
027560:  32 20 20 20 20 20 35 20 20 20 32 35 31 2E 32 35    2     5   251.25
027570:  20 20 20 20 20 20 20 20 31 32 35 36 2E 32 35 20            1256.25 
027580:  20 31 35 20 20 20 20 20 20 20 20 20 20 20 41 41     15           AA
027590:  41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41    AAAAAAAAAAAAAAAA
0275A0:  41 41 41 41 41 41 20 41 41 41 41 41 41 41 41 41    AAAAAA AAAAAAAAA
0275B0:  41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41    AAAAAAAAAAAAAAAA
0275C0:  41 41 41 41 41 41 41 41 41 20 31 31 20 20 20 20    AAAAAAAAA 11    
0275D0:  20 20 20 20 20 20 31 31 32 20 20 20 20 20 20 20          112       
0275E0:  20 20 2F 20 20 2F 20 20 20 20 20 20 20 20 20 20      /  /          
0275F0:  20 20 20 20 20 20 20 20 20 20 20 20 30 20 20 20                0   
027600:  20 30 20 20 20 20 20 30 20 20 20 20 20 30 2E 30     0     0     0.0
027610:  30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    0               
027620:  20 20 20 30 1A 31 32 33 34 35 36 37 38 39 31 32       0.12345678912
027630:  36 00 00 06 00 31 32 33 34 35 36 37 38 39 31 32    6....12345678912
027640:  37 00 00 08 00 31 32 35 33 35 34 20 20 20 20 20    7....125354     
027650:  20 00 00 24 00 31 32 35 34 20 20 20 20 20 20 20     ..$.1254       
027660:  20 00 00 2D 00 31 32 35 34 32 33 20 20 20 20 20     ..-.125423     
027670:  20 00 00 34 00 31 32 35 34 33 20 20 20 20 20 20     ..4.12543      
027680:  20 00 00 33 00 31 32 35 34 38 35 35 20 20 20 20     ..3.1254855    
027690:  20 00 00 2C 00 31 38 30 31 38 33 20 20 20 20 20     ..,.180183     
0276A0:  20 00 00 20 00 32 20 20 20 20 20 20 20 20 20 20     .. .2          
0276B0:  20 00 00 2A 00 32 31 20 20 20 20 20 20 20 20 20     ..*.21         
0276C0:  20 00 00 29 00 32 31 30 31 38 33 20 20 20 20 20     ..).210183     
0276D0:  20 00 00 2F 00 32 31 35 34 20 20 20 20 20 20 20     ../.2154       
0276E0:  20 00 00 09 00 32 32 32 32 32 32 32 32 32 32 32     ....22222222222
0276F0:  32 00 00 18 00 56 49 53 20 30 34 20 53 49 20 20    2....VIS 04 SI  
027700:  20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20              I"..@ 
027710:  32 31 2C 20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D    21, 0 SAY "+----
027720:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027730:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 2D 2D    -------------+--
027740:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D    ----------+-----
027750:  2D 2D 2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D    -------+--------
027760:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 1A 1A    ----------+"....
027770:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
027780:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027790:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0277A0:  2D 2D 2D 2D 2D 2D 2D 2B 20 20 49 22 0D 0A 40 20    -------+  I"..@ 
0277B0:  31 32 2C 20 30 20 53 41 59 20 22 49 20 20 20 20    12, 0 SAY "I    
0277C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0277D0:  20 20 20 44 45 52 4E 49 45 52 45 20 43 4F 4D 4D       DERNIERE COMM
0277E0:  41 4E 44 45 20 20 20 20 20 20 20 20 20 20 20 20    ANDE            
0277F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027800:  20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20              I"..@ 
027810:  31 33 2C 20 30 20 53 41 59 20 22 49 20 20 2B 2D    13, 0 SAY "I  +-
027820:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027830:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027840:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027850:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027860:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20    ----------+"..@ 
027870:  31 34 2C 20 30 20 53 41 59 20 22 49 20 20 49 20    14, 0 SAY "I  I 
027880:  4E 6F 20 44 2E 41 2E 20 20 20 20 20 20 20 20 20    No D.A.         
027890:  20 20 20 20 20 64 61 74 65 20 44 2E 41 2E 20 20         date D.A.  
0278A0:  20 20 20 20 20 20 20 20 20 4E 6F 20 43 64 65 20             No Cde 
0278B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64                   d
0278C0:  75 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20    u         I"..@ 
0278D0:  31 35 2C 20 30 20 53 41 59 20 22 49 20 20 49 20    15, 0 SAY "I  I 
0278E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0278F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027900:  2A 20 53 54 4F 43 4B 53 43 52 2E 43 4D 44 0D 0A    * STOCKSCR.CMD..
027910:  45 52 41 53 45 0D 0A 40 20 20 30 2C 20 30 20 53    ERASE..@  0, 0 S
027920:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
027930:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027940:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027950:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 2B 2D                  +-
027960:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027970:  2D 2D 2D 2B 22 0D 0A 40 20 20 31 2C 20 30 20 53    ---+"..@  1, 0 S
027980:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
027990:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0279A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0279B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 20                  I 
0279C0:  4D 6F 64 65 20 20 20 20 20 20 20 20 20 20 20 20    Mode            
0279D0:  20 20 20 49 22 0D 0A 40 20 20 31 2C 36 35 20 53       I"..@  1,65 S
0279E0:  41 59 20 4D 4F 44 45 53 54 4F 43 4B 0D 0A 40 20    AY MODESTOCK..@ 
0279F0:  20 32 2C 20 30 20 53 41 59 20 22 2B 2D 2D 2D 2D     2, 0 SAY "+----
027A00:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027A10:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027A20:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027A30:  2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    -----+----------
027A40:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20    ----------+"..@ 
027A50:  20 33 2C 20 30 20 53 41 59 20 22 49 20 20 20 20     3, 0 SAY "I    
027A60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027A70:  20 20 20 20 20 20 47 45 53 54 49 4F 4E 20 44 55          GESTION DU
027A80:  20 53 54 4F 43 4B 20 44 45 20 50 49 45 43 45 53     STOCK DE PIECES
027A90:  20 44 45 54 41 43 48 45 45 53 20 20 20 20 20 20     DETACHEES      
027AA0:  20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20              I"..@ 
027AB0:  20 34 2C 20 30 20 53 41 59 20 22 49 20 20 20 20     4, 0 SAY "I    
027AC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027AD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027AE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027AF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027B00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027B10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027B20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027B30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027B40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027B50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027B60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027B70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027B80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027B90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027BA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027BB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027BC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027BD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027BE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027BF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027C00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027C10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027C20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027C30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027C40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027C50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027C60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027C70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027C80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027C90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027CA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027CB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027CC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027CD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027CE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027CF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
027D00:  20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20              I"..@ 
027D10:  20 35 2C 20 30 20 53 41 59 20 22 49 20 20 2B 2D     5, 0 SAY "I  +-
027D20:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027D30:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027D40:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027D50:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
027D60:  2D 2D 2D 2D 2D 2D 2D 2B 20 20 49 22 0D 0A 40 20    -------+  I"..@ 
027D70:  20 36 2C 20 30 20 53 41 59 20 22 49 20 20 49 20     6, 0 SAY "I  I 
027D80:  41 54 45 4C 49 45 52 20 20 20 20 20 20 20 20 20    ATELIER         
027D90:  20 20 53 45 43 54 49 4F 4E 20 20 20 20 20 20 20      SECTION       
027DA0:  20 20 4D 41 43 48 49 4E 45 20 20 20 20 20 20 20      MACHINE       
027DB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027DC0:  20 20 20 20 20 20 20 49 20 20 49 22 0D 0A 40 20           I  I"..@ 
027DD0:  20 37 2C 20 30 20 53 41 59 20 22 49 20 20 49 20     7, 0 SAY "I  I 
027DE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027DF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027E00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027E10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027E20:  20 20 20 20 20 20 20 49 20 20 49 22 0D 0A 40 20           I  I"..@ 
027E30:  20 38 2C 20 30 20 53 41 59 20 22 49 20 20 49 20     8, 0 SAY "I  I 
027E40:  44 45 53 49 47 4E 41 54 49 4F 4E 20 20 20 20 20    DESIGNATION     
027E50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027E60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027E70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027E80:  20 20 20 20 20 20 20 49 20 20 49 22 0D 0A 40 20           I  I"..@ 
027E90:  20 39 2C 20 30 20 53 41 59 20 22 49 20 20 49 20     9, 0 SAY "I  I 
027EA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027EB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027EC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027ED0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
027EE0:  20 20 20 20 20 20 20 49 20 20 49 22 0D 0A 40 20           I  I"..@ 
027EF0:  31 30 2C 20 30 20 53 41 59 20 22 49 20 20 49 20    10, 0 SAY "I  I 
027F00:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
027F10:  2A 2A 2A 2A 20 54 52 41 49 54 45 4D 45 4E 54 20    **** TRAITEMENT 
027F20:  44 45 53 20 44 45 4D 41 4E 44 45 53 20 44 27 41    DES DEMANDES D'A
027F30:  43 48 41 54 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    CHAT ***********
027F40:  2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 2A 20 43 65 20    *********..* Ce 
027F50:  66 69 63 68 69 65 72 20 64 65 20 63 6F 6D 6D 61    fichier de comma
027F60:  6E 64 65 20 76 6F 75 73 20 70 72 6F 70 6F 73 65    nde vous propose
027F70:  20 64 69 66 66 65 72 65 6E 74 65 73 20 6F 70 74     differentes opt
027F80:  69 6F 6E 73 20 64 65 20 74 72 61 69 74 65 6D 65    ions de traiteme
027F90:  6E 74 20 2A 0D 0A 2A 20 61 75 20 73 65 69 6E 20    nt *..* au sein 
027FA0:  20 64 75 20 66 69 63 68 69 65 72 20 20 64 65 73     du fichier  des
027FB0:  20 64 65 6D 61 6E 64 65 73 20 64 27 61 63 68 61     demandes d'acha
027FC0:  74 2E 20 20 53 65 6C 6F 6E 20 20 76 6F 74 72 65    t.  Selon  votre
027FD0:  20 73 65 6C 65 63 74 69 6F 6E 20 69 6C 20 2A 0D     selection il *.
027FE0:  0A 2A 20 6C 61 6E 63 65 72 61 20 6C 65 20 74 72    .* lancera le tr
027FF0:  61 69 74 65 6D 65 6E 74 20 63 6F 72 72 65 73 70    aitement corresp
028000:  6F 6E 64 61 6E 74 2E 20 4C 61 20 72 65 70 6F 6E    ondant. La repon
028010:  73 65 20 64 65 20 64 65 66 61 75 74 20 3A 20 22    se de defaut : "
028020:  46 22 20 20 76 6F 75 73 20 2A 0D 0A 2A 20 70 65    F"  vous *..* pe
028030:  72 6D 65 74 74 72 61 20 64 65 20 72 65 76 65 6E    rmettra de reven
028040:  69 72 20 61 75 20 6D 65 6E 75 20 70 72 69 6E 63    ir au menu princ
028050:  69 70 61 6C 20 3A 20 4D 45 4E 55 32 20 20 20 20    ipal : MENU2    
028060:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028070:  20 20 20 20 2A 0D 0A 2A 20 43 6F 6D 6D 65 20 70        *..* Comme p
028080:  6F 75 72 20 6C 65 20 66 69 63 68 69 65 72 20 64    our le fichier d
028090:  65 20 63 6F 6D 6D 61 6E 64 65 20 3A 20 54 52 41    e commande : TRA
0280A0:  53 54 4F 43 4B 2C 20 20 6C 61 20 20 6D 65 6D 65    STOCK,  la  meme
0280B0:  20 20 70 72 65 73 65 6E 74 61 74 69 6F 6E 20 2A      presentation *
0280C0:  0D 0A 2A 20 64 27 65 63 72 61 6E 20 64 27 75 6E    ..* d'ecran d'un
0280D0:  65 20 64 65 6D 61 6E 64 65 20 64 27 61 63 68 61    e demande d'acha
0280E0:  74 20 73 65 72 61 20 75 74 69 6C 69 73 65 65 20    t sera utilisee 
0280F0:  70 6F 75 72 20 6C 65 73 20 64 69 66 66 65 72 65    pour les differe
028100:  50 49 45 43 45 20 20 20 20 20 20 20 20 20 20 20    PIECE           
028110:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028120:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028130:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028140:  20 20 20 20 20 20 20 49 20 20 49 22 0D 0A 40 20           I  I"..@ 
028150:  31 31 2C 20 30 20 53 41 59 20 22 49 20 20 2B 2D    11, 0 SAY "I  +-
028160:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
028170:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
028180:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
028190:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0281A0:  2D 2D 2D 2D 2D 2D 2D 2B 20 20 49 22 0D 0A 40 20    -------+  I"..@ 
0281B0:  31 32 2C 20 30 20 53 41 59 20 22 49 20 20 20 20    12, 0 SAY "I    
0281C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0281D0:  20 20 20 44 45 52 4E 49 45 52 45 20 43 4F 4D 4D       DERNIERE COMM
0281E0:  41 4E 44 45 20 20 20 20 20 20 20 20 20 20 20 20    ANDE            
0281F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028200:  20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20              I"..@ 
028210:  31 33 2C 20 30 20 53 41 59 20 22 49 20 20 2B 2D    13, 0 SAY "I  +-
028220:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
028230:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
028240:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
028250:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
028260:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20    ----------+"..@ 
028270:  31 34 2C 20 30 20 53 41 59 20 22 49 20 20 49 20    14, 0 SAY "I  I 
028280:  4E 6F 20 44 2E 41 2E 20 20 20 20 20 20 20 20 20    No D.A.         
028290:  20 20 20 20 20 64 61 74 65 20 44 2E 41 2E 20 20         date D.A.  
0282A0:  20 20 20 20 20 20 20 20 20 4E 6F 20 43 64 65 20             No Cde 
0282B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64                   d
0282C0:  75 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20    u         I"..@ 
0282D0:  31 35 2C 20 30 20 53 41 59 20 22 49 20 20 49 20    15, 0 SAY "I  I 
0282E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0282F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028300:  6E 74 65 73 20 20 6F 70 2D 20 2A 0D 0A 2A 20 74    ntes  op- *..* t
028310:  69 6F 6E 73 20 28 20 31 2C 20 32 2C 20 33 20 6F    ions ( 1, 2, 3 o
028320:  75 20 34 20 29 2C 20 65 6E 20 70 72 65 63 69 73    u 4 ), en precis
028330:  61 6E 74 20 65 6E 20 68 61 75 74 20 65 74 20 61    ant en haut et a
028340:  20 64 72 6F 69 74 65 20 20 64 65 20 20 6C 27 65     droite  de  l'e
028350:  63 72 61 6E 20 2A 0D 0A 2A 20 6C 65 20 6D 6F 64    cran *..* le mod
028360:  65 20 65 6E 20 63 6F 75 72 73 2E 20 20 20 20 20    e en cours.     
028370:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028380:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028390:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0283A0:  2A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    *..*************
0283B0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
0283C0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
0283D0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
0283E0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 0D 0A    ************....
0283F0:  53 54 4F 52 45 20 27 4F 27 20 54 4F 20 43 4F 4E    STORE 'O' TO CON
028400:  54 44 41 0D 0A 44 4F 20 57 48 49 4C 45 20 43 4F    TDA..DO WHILE CO
028410:  4E 54 44 41 20 3D 20 27 4F 27 0D 0A 45 52 41 53    NTDA = 'O'..ERAS
028420:  45 0D 0A 53 54 4F 52 45 20 27 46 27 20 54 4F 20    E..STORE 'F' TO 
028430:  52 45 50 4F 4E 53 45 33 0D 0A 40 20 20 31 2C 32    REPONSE3..@  1,2
028440:  37 20 53 41 59 20 22 54 52 41 49 54 45 4D 45 4E    7 SAY "TRAITEMEN
028450:  54 20 44 45 53 20 44 45 4D 41 4E 44 45 53 20 44    T DES DEMANDES D
028460:  27 41 43 48 41 54 22 0D 0A 40 20 20 35 2C 20 30    'ACHAT"..@  5, 0
028470:  20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D     SAY "+---------
028480:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
028490:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0284A0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0284B0:  2D 2D 2D 2D 3B 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----;..---------
0284C0:  2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 20 36    --------+"..@  6
0284D0:  2C 20 30 20 53 41 59 20 22 49 20 20 20 20 20 20    , 0 SAY "I      
0284E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0284F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028500:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028510:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028520:  20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20              I"..@ 
028530:  31 36 2C 20 30 20 53 41 59 20 22 49 20 20 49 20    16, 0 SAY "I  I 
028540:  51 74 65 20 63 6F 6D 6D 61 6E 64 65 65 20 20 20    Qte commandee   
028550:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65                  re
028560:  73 74 65 20 61 20 6C 69 76 72 65 72 20 20 20 20    ste a livrer    
028570:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028580:  20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20              I"..@ 
028590:  31 37 2C 20 30 20 53 41 59 20 22 49 20 20 2B 2D    17, 0 SAY "I  +-
0285A0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0285B0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0285C0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0285D0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0285E0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20    ----------+"..@ 
0285F0:  31 38 2C 20 30 20 53 41 59 20 22 49 20 20 20 20    18, 0 SAY "I    
028600:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028610:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028620:  51 75 61 6E 74 69 74 65 20 20 20 20 20 20 70 72    Quantite      pr
028630:  69 78 20 55 48 54 20 20 20 20 20 20 70 72 69 78    ix UHT      prix
028640:  20 74 6F 74 61 6C 20 20 20 20 49 22 0D 0A 40 20     total    I"..@ 
028650:  31 39 2C 20 30 20 53 41 59 20 22 49 20 20 51 74    19, 0 SAY "I  Qt
028660:  65 20 4D 49 4E 49 20 20 20 20 20 20 20 20 20 20    e MINI          
028670:  20 20 20 20 20 20 20 20 20 20 20 20 20 2B 2D 2D                 +--
028680:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D    ----------+-----
028690:  2D 2D 2D 2D 2D 2D 2D 2B 2D 2D 2D 2D 2D 2D 2D 2D    -------+--------
0286A0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20    ----------+"..@ 
0286B0:  32 30 2C 20 30 20 53 41 59 20 22 49 20 20 20 20    20, 0 SAY "I    
0286C0:  20 20 20 20 20 20 20 20 20 20 20 45 54 41 54 20               ETAT 
0286D0:  44 55 20 53 54 4F 43 4B 20 3D 3E 20 20 49 20 20    DU STOCK =>  I  
0286E0:  20 20 20 20 20 20 20 20 20 20 49 20 20 20 20 20              I     
0286F0:  20 20 20 20 20 20 20 49 20 20 20 20 20 20 20 20           I        
028700:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
028710:  22 00 00 00 02 09 50 E5 22 00 C1 02 00 00 00 02    ".....P.".......
028720:  22 00 C6 02 00 00 00 02 22 00 C2 02 00 00 00 02    ".......".......
028730:  22 00 C7 02 00 00 00 02 22 00 C3 02 00 00 00 02    ".......".......
028740:  22 00 C8 02 00 00 00 02 22 00 C4 02 00 00 00 02    ".......".......
028750:  22 00 C9 02 00 00 00 02 22 00 C5 02 00 00 00 02    ".......".......
028760:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
028770:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
028780:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
028790:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
0287F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
028800:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028810:  20 20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20           ;..      
028820:  20 20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40               I"..@
028830:  20 20 37 2C 20 30 20 53 41 59 20 22 49 20 20 20      7, 0 SAY "I   
028840:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028850:  20 20 20 20 20 20 20 53 45 4C 45 43 54 49 4F 4E           SELECTION
028860:  4E 45 5A 20 56 4F 54 52 45 20 4F 50 54 49 4F 4E    NEZ VOTRE OPTION
028870:  20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20              ;..   
028880:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 22                  I"
028890:  0D 0A 40 20 20 38 2C 20 30 20 53 41 59 20 22 49    ..@  8, 0 SAY "I
0288A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0288B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0288C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0288D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A                 ;..
0288E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0288F0:  20 49 22 0D 0A 40 20 20 39 2C 20 30 20 53 41 59     I"..@  9, 0 SAY
028900:  20 22 49 20 20 20 20 20 20 20 20 20 20 20 20 20     "I             
028910:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028920:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028930:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028940:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    ;..             
028950:  20 20 20 20 49 22 0D 0A 40 20 31 30 2C 20 30 20        I"..@ 10, 0 
028960:  53 41 59 20 22 49 20 20 41 4A 4F 55 54 20 44 45    SAY "I  AJOUT DE
028970:  20 4E 4F 55 56 45 41 55 58 20 45 4E 52 45 47 49     NOUVEAUX ENREGI
028980:  53 54 52 45 4D 45 4E 54 53 20 2D 3E 20 31 20 20    STREMENTS -> 1  
028990:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0289A0:  20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20       ;..          
0289B0:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 31 2C           I"..@ 11,
0289C0:  20 30 20 53 41 59 20 22 49 20 20 20 20 20 20 20     0 SAY "I       
0289D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0289E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0289F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028A00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028A10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028A20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028A30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028A40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028A50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028A60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028A70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028A80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028A90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028AA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028AB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028AC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028AD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028AE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028AF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028B00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028B10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028B20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028B30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028B40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028B50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028B60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028B70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028B80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028B90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028BA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028BB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028BC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028BD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028BE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028BF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
028C00:  20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20          ;..       
028C10:  20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20              I"..@ 
028C20:  31 32 2C 20 30 20 53 41 59 20 22 49 20 20 4D 4F    12, 0 SAY "I  MO
028C30:  44 49 46 49 43 41 54 49 4F 4E 20 44 27 45 4E 52    DIFICATION D'ENR
028C40:  45 47 49 53 54 52 45 4D 45 4E 54 53 20 20 20 20    EGISTREMENTS    
028C50:  2D 3E 20 32 20 20 20 20 20 20 20 20 20 20 20 20    -> 2            
028C60:  20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20 20             ;..    
028C70:  20 20 20 20 20 20 20 20 20 20 20 20 20 49 22 0D                 I".
028C80:  0A 40 20 31 33 2C 20 30 20 53 41 59 20 22 49 20    .@ 13, 0 SAY "I 
028C90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028CA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028CB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028CC0:  20 20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20                ;.. 
028CD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028CE0:  49 22 0D 0A 40 20 31 34 2C 20 30 20 53 41 59 20    I"..@ 14, 0 SAY 
028CF0:  22 49 20 20 53 41 49 53 49 45 20 4E 55 4D 45 52    "I  SAISIE NUMER
028D00:  4F 20 44 45 20 43 4F 4D 4D 41 4E 44 45 20 20 20    O DE COMMANDE   
028D10:  20 20 20 20 20 20 2D 3E 20 33 20 20 20 20 20 20          -> 3      
028D20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B                   ;
028D30:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
028D40:  20 20 20 49 22 0D 0A 40 20 31 35 2C 20 30 20 53       I"..@ 15, 0 S
028D50:  41 59 20 22 49 20 20 20 20 20 20 20 20 20 20 20    AY "I           
028D60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028D70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028D80:  20 20 20 20 20 20 20 20 52 45 50 4F 4E 53 45 20            REPONSE 
028D90:  20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20      ;..           
028DA0:  20 20 20 20 20 20 49 22 0D 0A 40 20 31 36 2C 20          I"..@ 16, 
028DB0:  30 20 53 41 59 20 22 49 20 20 56 49 53 55 41 4C    0 SAY "I  VISUAL
028DC0:  49 53 41 54 49 4F 4E 20 44 27 45 4E 52 45 47 49    ISATION D'ENREGI
028DD0:  53 54 52 45 4D 45 4E 54 53 20 20 20 2D 3E 20 34    STREMENTS   -> 4
028DE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028DF0:  20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20         ;..        
028E00:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
028E10:  2A 2A 2A 2A 20 54 52 41 49 54 45 4D 45 4E 54 20    **** TRAITEMENT 
028E20:  44 45 53 20 50 49 45 43 45 53 20 44 45 54 41 43    DES PIECES DETAC
028E30:  48 45 45 53 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    HEES ***********
028E40:  2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A 2A 20 43 65 20    *********..* Ce 
028E50:  66 69 63 68 69 65 72 20 64 65 20 63 6F 6D 6D 61    fichier de comma
028E60:  6E 64 65 20 76 6F 75 73 20 70 72 6F 70 6F 73 65    nde vous propose
028E70:  20 64 69 66 66 65 72 65 6E 74 65 73 20 6F 70 74     differentes opt
028E80:  69 6F 6E 73 20 64 65 20 74 72 61 69 74 65 6D 65    ions de traiteme
028E90:  6E 74 20 2A 0D 0A 2A 20 61 75 20 73 65 69 6E 20    nt *..* au sein 
028EA0:  20 64 75 20 66 69 63 68 69 65 72 20 20 64 65 73     du fichier  des
028EB0:  20 70 69 65 63 65 73 20 20 64 65 74 61 63 68 65     pieces  detache
028EC0:  65 73 2E 20 20 53 65 6C 6F 6E 20 76 6F 74 72 65    es.  Selon votre
028ED0:  20 73 65 6C 65 63 74 69 6F 6E 20 69 6C 20 2A 0D     selection il *.
028EE0:  0A 2A 20 6C 61 6E 63 65 72 61 20 6C 65 20 74 72    .* lancera le tr
028EF0:  61 69 74 65 6D 65 6E 74 20 63 6F 72 72 65 73 70    aitement corresp
028F00:  6F 6E 64 61 6E 74 2E 20 4C 61 20 72 65 70 6F 6E    ondant. La repon
028F10:  73 65 20 64 65 20 64 65 66 61 75 74 20 3A 20 22    se de defaut : "
028F20:  46 22 20 20 76 6F 75 73 20 2A 0D 0A 2A 20 70 65    F"  vous *..* pe
028F30:  72 6D 65 74 74 72 61 20 64 65 20 72 65 76 65 6E    rmettra de reven
028F40:  69 72 20 61 75 20 6D 65 6E 75 20 70 72 69 6E 63    ir au menu princ
028F50:  69 70 61 6C 20 3A 20 4D 45 4E 55 32 20 20 20 20    ipal : MENU2    
028F60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
028F70:  20 20 20 20 2A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A        *..*********
028F80:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
028F90:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
028FA0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
028FB0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
028FC0:  0D 0A 0D 0A 53 54 4F 52 45 20 27 4F 27 20 54 4F    ....STORE 'O' TO
028FD0:  20 43 4F 4E 54 53 54 4F 43 4B 0D 0A 44 4F 20 57     CONTSTOCK..DO W
028FE0:  48 49 4C 45 20 43 4F 4E 54 53 54 4F 43 4B 20 3D    HILE CONTSTOCK =
028FF0:  20 27 4F 27 0D 0A 0D 0A 2A 20 45 66 66 61 63 65     'O'....* Efface
029000:  20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20 31             I"..@ 1
029010:  37 2C 20 30 20 53 41 59 20 22 49 20 20 20 20 20    7, 0 SAY "I     
029020:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029030:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029040:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029050:  20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20            ;..     
029060:  20 20 20 20 20 20 20 20 20 20 20 20 49 22 0D 0A                I"..
029070:  40 20 31 38 2C 20 30 20 53 41 59 20 22 49 20 20    @ 18, 0 SAY "I  
029080:  53 4F 52 54 49 45 20 44 27 45 54 41 54 20 53 55    SORTIE D'ETAT SU
029090:  49 56 41 4E 54 20 53 45 4C 45 43 54 49 4F 4E 20    IVANT SELECTION 
0290A0:  20 20 2D 3E 20 35 20 20 20 20 20 20 20 20 20 20      -> 5          
0290B0:  20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20               ;..  
0290C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49                   I
0290D0:  22 0D 0A 40 20 31 39 2C 20 30 20 53 41 59 20 22    "..@ 19, 0 SAY "
0290E0:  49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    I               
0290F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029100:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029110:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D                  ;.
029120:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
029130:  20 20 49 22 0D 0A 40 20 32 30 2C 20 30 20 53 41      I"..@ 20, 0 SA
029140:  59 20 22 49 20 20 52 45 54 4F 55 52 20 41 55 20    Y "I  RETOUR AU 
029150:  4D 45 4E 55 20 49 4E 49 54 49 41 4C 20 20 20 20    MENU INITIAL    
029160:  20 20 20 20 20 20 20 20 2D 3E 20 46 20 20 20 20            -> F    
029170:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029180:  20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20     ;..            
029190:  20 20 20 20 20 49 22 0D 0A 40 20 32 31 2C 20 30         I"..@ 21, 0
0291A0:  20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D     SAY "+---------
0291B0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0291C0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0291D0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0291E0:  2D 2D 2D 2D 3B 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----;..---------
0291F0:  2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 31 35    --------+"..@ 15
029200:  6D 65 6E 74 20 64 65 20 6C 27 65 63 72 61 6E 20    ment de l'ecran 
029210:  65 74 20 61 66 66 69 63 68 61 67 65 20 64 65 73    et affichage des
029220:  20 64 69 66 66 65 72 65 6E 74 73 20 6F 70 74 69     differents opti
029230:  6F 6E 73 0D 0A 45 52 41 53 45 0D 0A 53 54 4F 52    ons..ERASE..STOR
029240:  45 20 27 46 27 20 54 4F 20 52 45 50 4F 4E 53 45    E 'F' TO REPONSE
029250:  33 0D 0A 40 20 20 31 2C 32 37 20 53 41 59 20 22    3..@  1,27 SAY "
029260:  54 52 41 49 54 45 4D 45 4E 54 20 44 45 53 20 50    TRAITEMENT DES P
029270:  49 45 43 45 53 20 44 45 54 41 43 48 45 45 53 22    IECES DETACHEES"
029280:  0D 0A 40 20 20 35 2C 20 30 20 53 41 59 20 22 2B    ..@  5, 0 SAY "+
029290:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0292A0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0292B0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0292C0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 3B 0D 0A    -------------;..
0292D0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0292E0:  2D 2B 22 0D 0A 40 20 20 36 2C 20 30 20 53 41 59    -+"..@  6, 0 SAY
0292F0:  20 22 49 20 20 20 20 20 20 20 20 20 20 20 20 20     "I             
029300:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029310:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029320:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029330:  3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20    ;..             
029340:  20 20 20 20 49 22 0D 0A 40 20 20 37 2C 20 30 20        I"..@  7, 0 
029350:  53 41 59 20 22 49 20 20 20 20 20 20 20 20 20 20    SAY "I          
029360:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029370:  53 45 4C 45 43 54 49 4F 4E 4E 45 5A 20 56 4F 54    SELECTIONNEZ VOT
029380:  52 45 20 4F 50 54 49 4F 4E 20 20 20 20 20 20 20    RE OPTION       
029390:  20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20       ;..          
0293A0:  20 20 20 20 20 20 20 49 22 0D 0A 40 20 20 38 2C           I"..@  8,
0293B0:  20 30 20 53 41 59 20 22 49 20 20 20 20 20 20 20     0 SAY "I       
0293C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0293D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0293E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0293F0:  20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20          ;..       
029400:  2C 36 30 20 47 45 54 20 52 45 50 4F 4E 53 45 33    ,60 GET REPONSE3
029410:  0D 0A 52 45 41 44 0D 0A 49 46 20 21 28 52 45 50    ..READ..IF !(REP
029420:  4F 4E 53 45 33 29 20 3D 20 27 46 27 0D 0A 52 45    ONSE3) = 'F'..RE
029430:  4C 45 41 53 45 20 43 4F 4E 54 44 41 2C 52 45 50    LEASE CONTDA,REP
029440:  4F 4E 53 45 33 2C 4D 4F 44 45 44 41 0D 0A 52 45    ONSE3,MODEDA..RE
029450:  54 55 52 4E 0D 0A 45 4C 53 45 0D 0A 20 49 46 20    TURN..ELSE.. IF 
029460:  52 45 50 4F 4E 53 45 33 20 3D 20 27 31 27 0D 0A    REPONSE3 = '1'..
029470:  20 53 54 4F 52 45 20 27 41 4A 4F 55 54 27 20 54     STORE 'AJOUT' T
029480:  4F 20 4D 4F 44 45 44 41 0D 0A 20 44 4F 20 44 41    O MODEDA.. DO DA
029490:  53 43 52 0D 0A 20 44 4F 20 41 4A 44 41 0D 0A 20    SCR.. DO AJDA.. 
0294A0:  55 53 45 0D 0A 20 45 4C 53 45 0D 0A 20 20 20 49    USE.. ELSE..   I
0294B0:  46 20 52 45 50 4F 4E 53 45 33 20 3D 20 27 32 27    F REPONSE3 = '2'
0294C0:  0D 0A 20 20 20 53 54 4F 52 45 20 27 4D 4F 44 49    ..   STORE 'MODI
0294D0:  46 49 43 41 54 49 4F 4E 27 20 54 4F 20 4D 4F 44    FICATION' TO MOD
0294E0:  45 44 41 0D 0A 20 20 20 44 4F 20 44 41 53 43 52    EDA..   DO DASCR
0294F0:  0D 0A 20 20 20 44 4F 20 4D 4F 44 49 46 44 41 0D    ..   DO MODIFDA.
029500:  0A 20 20 20 55 53 45 0D 0A 20 20 20 45 4C 53 45    .   USE..   ELSE
029510:  0D 0A 20 20 20 20 20 49 46 20 52 45 50 4F 4E 53    ..     IF REPONS
029520:  45 33 20 3D 20 22 33 22 0D 0A 20 20 20 20 20 53    E3 = "3"..     S
029530:  54 4F 52 45 20 22 53 41 49 53 49 45 20 43 44 45    TORE "SAISIE CDE
029540:  22 20 54 4F 20 4D 4F 44 45 44 41 0D 0A 20 20 20    " TO MODEDA..   
029550:  20 20 44 4F 20 44 41 53 43 52 0D 0A 20 20 20 20      DO DASCR..    
029560:  20 44 4F 20 43 44 45 44 41 0D 0A 20 20 20 20 20     DO CDEDA..     
029570:  55 53 45 0D 0A 20 20 20 20 20 45 4C 53 45 0D 0A    USE..     ELSE..
029580:  20 20 20 20 20 20 20 49 46 20 52 45 50 4F 4E 53           IF REPONS
029590:  45 33 20 3D 20 22 34 22 0D 0A 20 20 20 20 20 20    E3 = "4"..      
0295A0:  20 53 54 4F 52 45 20 22 56 49 53 55 41 4C 49 53     STORE "VISUALIS
0295B0:  41 54 49 4F 4E 22 20 54 4F 20 4D 4F 44 45 44 41    ATION" TO MODEDA
0295C0:  0D 0A 20 20 20 20 20 20 20 44 4F 20 44 41 53 43    ..       DO DASC
0295D0:  52 0D 0A 20 20 20 20 20 20 20 44 4F 20 56 49 53    R..       DO VIS
0295E0:  44 41 0D 0A 20 20 20 20 20 20 20 55 53 45 0D 0A    DA..       USE..
0295F0:  20 20 20 20 20 20 20 45 4C 53 45 0D 0A 20 20 20           ELSE..   
029600:  20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20              I"..@ 
029610:  20 39 2C 20 30 20 53 41 59 20 22 49 20 20 20 20     9, 0 SAY "I    
029620:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029630:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029640:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029650:  20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20 20             ;..    
029660:  20 20 20 20 20 20 20 20 20 20 20 20 20 49 22 0D                 I".
029670:  0A 40 20 31 30 2C 20 30 20 53 41 59 20 22 49 20    .@ 10, 0 SAY "I 
029680:  20 41 4A 4F 55 54 20 44 45 20 4E 4F 55 56 45 41     AJOUT DE NOUVEA
029690:  55 58 20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E    UX ENREGISTREMEN
0296A0:  54 53 20 2D 3E 20 31 20 20 20 20 20 20 20 20 20    TS -> 1         
0296B0:  20 20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20                ;.. 
0296C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0296D0:  49 22 0D 0A 40 20 31 31 2C 20 30 20 53 41 59 20    I"..@ 11, 0 SAY 
0296E0:  22 49 20 20 20 20 20 20 20 20 20 20 20 20 20 20    "I              
0296F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029700:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029710:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B                   ;
029720:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
029730:  20 20 20 49 22 0D 0A 40 20 31 32 2C 20 30 20 53       I"..@ 12, 0 S
029740:  41 59 20 22 49 20 20 4D 4F 44 49 46 49 43 41 54    AY "I  MODIFICAT
029750:  49 4F 4E 20 44 27 45 4E 52 45 47 49 53 54 52 45    ION D'ENREGISTRE
029760:  4D 45 4E 54 53 20 20 20 20 2D 3E 20 32 20 20 20    MENTS    -> 2   
029770:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029780:  20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20      ;..           
029790:  20 20 20 20 20 20 49 22 0D 0A 40 20 31 33 2C 20          I"..@ 13, 
0297A0:  30 20 53 41 59 20 22 49 20 20 20 20 20 20 20 20    0 SAY "I        
0297B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0297C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0297D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
0297E0:  20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20         ;..        
0297F0:  20 20 20 20 20 20 20 20 20 49 22 0D 0A 40 20 31             I"..@ 1
029800:  20 20 20 20 20 20 49 46 20 52 45 50 4F 4E 53 45          IF REPONSE
029810:  33 20 3D 20 22 35 22 0D 0A 09 20 44 4F 20 52 45    3 = "5"... DO RE
029820:  44 41 0D 0A 09 20 55 53 45 20 0D 0A 09 20 45 4C    DA... USE ... EL
029830:  53 45 0D 0A 09 20 20 20 40 20 32 32 2C 30 20 53    SE...   @ 22,0 S
029840:  41 59 20 27 41 55 43 55 4E 20 54 52 41 49 54 45    AY 'AUCUN TRAITE
029850:  4D 45 4E 54 20 4E 45 20 43 4F 52 52 45 53 50 4F    MENT NE CORRESPO
029860:  4E 44 20 41 20 56 4F 54 52 45 20 53 45 4C 45 43    ND A VOTRE SELEC
029870:  54 49 4F 4E 2C 20 3B 0D 0A 56 41 4C 49 44 45 5A    TION, ;..VALIDEZ
029880:  27 0D 0A 20 20 20 20 20 20 20 20 20 20 20 53 45    '..           SE
029890:  54 20 43 4F 4E 53 4F 4C 45 20 4F 46 46 0D 0A 09    T CONSOLE OFF...
0298A0:  20 20 20 57 41 49 54 0D 0A 20 20 20 20 20 20 20       WAIT..       
0298B0:  20 20 20 20 53 45 54 20 43 4F 4E 53 4F 4C 45 20        SET CONSOLE 
0298C0:  4F 4E 0D 0A 09 20 45 4E 44 49 46 20 35 0D 0A 20    ON... ENDIF 5.. 
0298D0:  20 20 20 20 20 20 45 4E 44 49 46 20 34 0D 0A 20          ENDIF 4.. 
0298E0:  20 20 20 20 45 4E 44 49 46 20 33 0D 0A 20 20 20        ENDIF 3..   
0298F0:  45 4E 44 49 46 20 32 0D 0A 20 45 4E 44 49 46 20    ENDIF 2.. ENDIF 
029900:  31 0D 0A 45 4E 44 49 46 20 46 0D 0A 45 4E 44 44    1..ENDIF F..ENDD
029910:  4F 20 43 4F 4E 54 44 41 0D 0A 1A 1A 1A 1A 1A 1A    O CONTDA........
029920:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
029930:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
029940:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
029950:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
029960:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
029970:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
029980:  20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20     ;..            
029990:  20 20 20 20 20 49 22 0D 0A 40 20 32 31 2C 20 30         I"..@ 21, 0
0299A0:  20 53 41 59 20 22 2B 2D 2D 2D 2D 2D 2D 2D 2D 2D     SAY "+---------
0299B0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0299C0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0299D0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
0299E0:  2D 2D 2D 2D 3B 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----;..---------
0299F0:  2D 2D 2D 2D 2D 2D 2D 2D 2B 22 0D 0A 40 20 31 35    --------+"..@ 15
029A00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
029A10:  23 00 00 00 02 09 50 E5 23 00 C1 02 00 00 00 02    #.....P.#.......
029A20:  23 00 C6 02 00 00 00 02 23 00 C2 02 00 00 00 02    #.......#.......
029A30:  23 00 C7 02 00 00 00 02 23 00 C3 02 00 00 00 02    #.......#.......
029A40:  23 00 C8 02 00 00 00 02 23 00 C4 02 00 00 00 02    #.......#.......
029A50:  23 00 C9 02 00 00 00 02 23 00 C5 02 00 00 00 02    #.......#.......
029A60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029A70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029A80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029A90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029AF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
029B00:  34 2C 20 30 20 53 41 59 20 22 49 20 20 45 4E 54    4, 0 SAY "I  ENT
029B10:  52 45 45 2F 53 4F 52 54 49 45 20 44 45 20 50 49    REE/SORTIE DE PI
029B20:  45 43 45 20 44 55 20 53 54 4F 43 4B 20 20 20 2D    ECE DU STOCK   -
029B30:  3E 20 33 20 20 20 20 20 20 20 20 20 20 20 20 20    > 3             
029B40:  20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20            ;..     
029B50:  20 20 20 20 20 20 20 20 20 20 20 20 49 22 0D 0A                I"..
029B60:  40 20 31 35 2C 20 30 20 53 41 59 20 22 49 20 20    @ 15, 0 SAY "I  
029B70:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029B80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029B90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029BA0:  20 52 45 50 4F 4E 53 45 20 20 20 3B 0D 0A 20 20     REPONSE   ;..  
029BB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49                   I
029BC0:  22 0D 0A 40 20 31 36 2C 20 30 20 53 41 59 20 22    "..@ 16, 0 SAY "
029BD0:  49 20 20 56 49 53 55 41 4C 49 53 41 54 49 4F 4E    I  VISUALISATION
029BE0:  20 44 27 45 4E 52 45 47 49 53 54 52 45 4D 45 4E     D'ENREGISTREMEN
029BF0:  54 53 20 20 20 2D 3E 20 34 20 20 20 20 20 20 20    TS   -> 4       
029C00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D                  ;.
029C10:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
029C20:  20 20 49 22 0D 0A 40 20 31 37 2C 20 30 20 53 41      I"..@ 17, 0 SA
029C30:  59 20 22 49 20 20 20 20 20 20 20 20 20 20 20 20    Y "I            
029C40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029C50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029C60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029C70:  20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20     ;..            
029C80:  20 20 20 20 20 49 22 0D 0A 40 20 31 38 2C 20 30         I"..@ 18, 0
029C90:  20 53 41 59 20 22 49 20 20 53 4F 52 54 49 45 20     SAY "I  SORTIE 
029CA0:  44 27 45 54 41 54 20 53 55 49 56 41 4E 54 20 53    D'ETAT SUIVANT S
029CB0:  45 4C 45 43 54 49 4F 4E 20 20 20 2D 3E 20 35 20    ELECTION   -> 5 
029CC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029CD0:  20 20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20        ;..         
029CE0:  20 20 20 20 20 20 20 20 49 22 0D 0A 40 20 31 39            I"..@ 19
029CF0:  2C 20 30 20 53 41 59 20 22 49 20 20 20 20 20 20    , 0 SAY "I      
029D00:  20 0D 0A 20 20 20 49 46 20 52 45 50 4F 4E 53 45     ..   IF REPONSE
029D10:  33 20 3D 20 27 32 27 0D 0A 20 20 20 53 54 4F 52    3 = '2'..   STOR
029D20:  45 20 22 4D 4F 44 49 46 49 43 41 54 49 4F 4E 22    E "MODIFICATION"
029D30:  20 54 4F 20 4D 4F 44 45 53 54 4F 43 4B 0D 0A 20     TO MODESTOCK.. 
029D40:  20 20 44 4F 20 53 54 4F 43 4B 53 43 52 0D 0A 0D      DO STOCKSCR...
029D50:  0A 2A 20 45 78 65 63 75 74 69 6F 6E 20 64 75 20    .* Execution du 
029D60:  66 69 63 68 69 65 72 20 64 65 20 63 6F 6D 6D 61    fichier de comma
029D70:  6E 64 65 20 70 65 72 6D 65 74 74 61 6E 74 20 6C    nde permettant l
029D80:  61 20 6D 6F 64 69 66 69 63 61 74 69 6F 6E 0D 0A    a modification..
029D90:  2A 20 64 27 75 6E 20 65 6E 72 65 67 69 73 74 72    * d'un enregistr
029DA0:  65 6D 65 6E 74 2E 0D 0A 20 20 20 44 4F 20 4D 4F    ement...   DO MO
029DB0:  44 49 53 54 4F 43 0D 0A 20 20 20 55 53 45 0D 0A    DISTOC..   USE..
029DC0:  20 20 20 45 4C 53 45 0D 0A 20 20 20 20 20 49 46       ELSE..     IF
029DD0:  20 52 45 50 4F 4E 53 45 33 20 3D 20 27 33 27 0D     REPONSE3 = '3'.
029DE0:  0A 20 20 20 20 20 53 54 4F 52 45 20 22 45 4E 54    .     STORE "ENT
029DF0:  2F 53 4F 52 20 50 49 45 43 45 22 20 54 4F 20 4D    /SOR PIECE" TO M
029E00:  4F 44 45 53 54 4F 43 4B 0D 0A 20 20 20 20 20 44    ODESTOCK..     D
029E10:  4F 20 53 54 4F 43 4B 53 43 52 0D 0A 0D 0A 2A 20    O STOCKSCR....* 
029E20:  45 78 65 63 75 74 69 6F 6E 20 64 75 20 66 69 63    Execution du fic
029E30:  68 69 65 72 20 64 65 20 63 6F 6D 6D 61 6E 64 65    hier de commande
029E40:  20 70 65 72 6D 65 74 74 61 6E 74 20 6C 27 65 6E     permettant l'en
029E50:  74 72 65 65 20 6F 75 20 6C 61 0D 0A 2A 20 73 6F    tree ou la..* so
029E60:  72 74 69 65 20 64 65 20 70 69 65 63 65 28 73 29    rtie de piece(s)
029E70:  20 64 75 20 73 74 6F 63 6B 2E 0D 0A 20 20 20 20     du stock...    
029E80:  20 44 4F 20 45 4E 54 53 4F 52 54 0D 0A 20 20 20     DO ENTSORT..   
029E90:  20 20 55 53 45 0D 0A 20 20 20 20 20 45 4C 53 45      USE..     ELSE
029EA0:  0D 0A 20 20 20 20 20 20 20 49 46 20 52 45 50 4F    ..       IF REPO
029EB0:  4E 53 45 33 20 3D 20 22 34 22 0D 0A 20 20 20 20    NSE3 = "4"..    
029EC0:  20 20 20 53 54 4F 52 45 20 22 56 49 53 55 41 4C       STORE "VISUAL
029ED0:  49 53 41 54 49 4F 4E 22 20 54 4F 20 4D 4F 44 45    ISATION" TO MODE
029EE0:  53 54 4F 43 4B 0D 0A 20 20 20 20 20 20 20 44 4F    STOCK..       DO
029EF0:  20 53 54 4F 43 4B 53 43 52 0D 0A 0D 0A 2A 20 45     STOCKSCR....* E
029F00:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029F10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029F20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
029F30:  20 20 20 20 20 20 20 3B 0D 0A 20 20 20 20 20 20           ;..      
029F40:  20 20 20 20 20 20 20 20 20 20 20 49 22 0D 0A 40               I"..@
029F50:  20 32 30 2C 20 30 20 53 41 59 20 22 49 20 20 52     20, 0 SAY "I  R
029F60:  45 54 4F 55 52 20 41 55 20 4D 45 4E 55 20 49 4E    ETOUR AU MENU IN
029F70:  49 54 49 41 4C 20 20 20 20 20 20 20 20 20 20 20    ITIAL           
029F80:  20 2D 3E 20 46 20 20 20 20 20 20 20 20 20 20 20     -> F           
029F90:  20 20 20 20 20 20 20 20 20 20 3B 0D 0A 20 20 20              ;..   
029FA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 22                  I"
029FB0:  0D 0A 40 20 32 31 2C 20 30 20 53 41 59 20 22 2B    ..@ 21, 0 SAY "+
029FC0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
029FD0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
029FE0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
029FF0:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 3B 0D 0A    -------------;..
02A000:  2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D    ----------------
02A010:  2D 2B 22 0D 0A 40 20 31 35 2C 36 30 20 47 45 54    -+"..@ 15,60 GET
02A020:  20 52 45 50 4F 4E 53 45 33 0D 0A 0D 0A 2A 20 53     REPONSE3....* S
02A030:  61 69 73 69 65 20 64 65 20 6C 61 20 72 65 70 6F    aisie de la repo
02A040:  6E 73 65 0D 0A 52 45 41 44 0D 0A 0D 0A 2A 20 53    nse..READ....* S
02A050:  69 20 6C 61 20 72 65 70 6F 6E 73 65 20 65 73 74    i la reponse est
02A060:  20 3A 20 22 66 22 20 6F 75 20 22 46 22 20 2D 2D     : "f" ou "F" --
02A070:  3E 20 72 65 74 6F 75 72 20 61 75 20 6D 65 6E 75    > retour au menu
02A080:  20 70 72 69 6E 63 69 70 61 6C 20 28 4D 45 4E 55     principal (MENU
02A090:  32 29 0D 0A 49 46 20 21 28 52 45 50 4F 4E 53 45    2)..IF !(REPONSE
02A0A0:  33 29 20 3D 20 27 46 27 0D 0A 52 45 4C 45 41 53    3) = 'F'..RELEAS
02A0B0:  45 20 43 4F 4E 54 53 54 4F 43 4B 2C 52 45 50 4F    E CONTSTOCK,REPO
02A0C0:  4E 53 45 33 2C 52 45 50 4F 4E 53 45 34 2C 4D 4F    NSE3,REPONSE4,MO
02A0D0:  44 45 53 54 4F 43 4B 2C 49 4D 50 52 49 4D 41 4E    DESTOCK,IMPRIMAN
02A0E0:  54 45 0D 0A 52 45 54 55 52 4E 0D 0A 0D 0A 2A 20    TE..RETURN....* 
02A0F0:  53 69 20 6C 61 20 72 65 70 6F 6E 73 65 20 65 73    Si la reponse es
02A100:  78 65 63 75 74 69 6F 6E 20 64 75 20 66 69 63 68    xecution du fich
02A110:  69 65 72 20 64 65 20 63 6F 6D 6D 61 6E 64 65 20    ier de commande 
02A120:  70 65 72 6D 65 74 74 61 6E 74 20 6C 61 20 63 6F    permettant la co
02A130:  6E 73 75 6C 74 61 74 69 6F 6E 0D 0A 2A 20 64 65    nsultation..* de
02A140:  20 70 69 65 63 65 28 73 29 2E 0D 0A 20 20 20 20     piece(s)...    
02A150:  20 20 20 44 4F 20 56 49 53 54 4F 43 4B 0D 0A 20       DO VISTOCK.. 
02A160:  20 20 20 20 20 20 55 53 45 0D 0A 20 20 20 20 20          USE..     
02A170:  20 20 45 4C 53 45 0D 0A 20 20 20 20 20 20 20 20      ELSE..        
02A180:  20 49 46 20 52 45 50 4F 4E 53 45 33 20 3D 20 22     IF REPONSE3 = "
02A190:  35 22 0D 0A 0D 0A 2A 20 45 78 65 63 75 74 69 6F    5"....* Executio
02A1A0:  6E 20 64 75 20 66 69 63 68 69 65 72 20 64 65 20    n du fichier de 
02A1B0:  63 6F 6D 6D 61 6E 64 65 20 70 65 72 6D 65 74 74    commande permett
02A1C0:  61 6E 74 20 6C 61 20 67 65 6E 65 72 61 74 69 6F    ant la generatio
02A1D0:  6E 0D 0A 2A 20 64 65 20 72 61 70 70 6F 72 74 28    n..* de rapport(
02A1E0:  73 29 2E 0D 0A 09 20 44 4F 20 52 45 53 54 4F 43    s).... DO RESTOC
02A1F0:  4B 0D 0A 09 20 55 53 45 0D 0A 09 20 45 4C 53 45    K... USE... ELSE
02A200:  0D 0A 0D 0A 2A 20 53 69 20 6C 61 20 73 65 6C 65    ....* Si la sele
02A210:  63 74 69 6F 6E 20 6E 65 20 63 6F 72 72 65 73 70    ction ne corresp
02A220:  6F 6E 64 20 61 20 61 75 63 75 6E 65 20 64 65 73    ond a aucune des
02A230:  20 6F 70 74 69 6F 6E 73 20 70 72 6F 70 6F 73 65     options propose
02A240:  65 73 2C 0D 0A 2A 20 6C 65 20 6D 65 73 73 61 67    es,..* le messag
02A250:  65 20 73 75 69 76 61 6E 74 20 73 65 72 61 20 61    e suivant sera a
02A260:  66 66 69 63 68 65 2E 0D 0A 20 20 20 20 20 09 20    ffiche...     . 
02A270:  20 20 40 20 32 32 2C 30 20 53 41 59 20 27 41 55      @ 22,0 SAY 'AU
02A280:  43 55 4E 20 54 52 41 49 54 45 4D 45 4E 54 20 4E    CUN TRAITEMENT N
02A290:  45 20 43 4F 52 52 45 53 50 4F 4E 44 20 41 20 56    E CORRESPOND A V
02A2A0:  4F 54 52 45 20 53 45 4C 45 43 54 49 4F 4E 2C 20    OTRE SELECTION, 
02A2B0:  3B 0D 0A 56 41 4C 49 44 45 5A 27 20 0D 0A 09 20    ;..VALIDEZ' ... 
02A2C0:  20 20 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 46      SET CONSOLE OF
02A2D0:  46 0D 0A 20 20 20 20 20 09 20 20 20 57 41 49 54    F..     .   WAIT
02A2E0:  0D 0A 09 20 20 20 53 45 54 20 43 4F 4E 53 4F 4C    ...   SET CONSOL
02A2F0:  45 20 4F 4E 0D 0A 09 20 45 4E 44 49 46 20 35 0D    E ON... ENDIF 5.
02A300:  74 20 64 69 66 66 65 72 65 6E 74 65 20 64 65 20    t differente de 
02A310:  22 66 22 20 6F 75 20 64 65 20 22 46 22 2C 20 6E    "f" ou de "F", n
02A320:  6F 75 73 20 6C 61 6E 63 65 72 6F 6E 73 0D 0A 2A    ous lancerons..*
02A330:  20 6C 65 20 74 72 61 69 74 65 6D 65 6E 74 20 63     le traitement c
02A340:  6F 72 72 65 73 70 6F 6E 64 61 6E 74 0D 0A 0D 0A    orrespondant....
02A350:  45 4C 53 45 0D 0A 0D 0A 20 49 46 20 52 45 50 4F    ELSE.... IF REPO
02A360:  4E 53 45 33 20 3D 20 27 31 27 20 20 20 20 20 20    NSE3 = '1'      
02A370:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02A380:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02A390:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02A3A0:  0D 0A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ....************
02A3B0:  2A 20 43 52 45 41 54 49 4F 4E 20 44 27 55 4E 20    * CREATION D'UN 
02A3C0:  4E 4F 55 56 45 4C 20 45 4E 52 45 47 49 53 54 52    NOUVEL ENREGISTR
02A3D0:  45 4D 45 4E 54 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    EMENT **********
02A3E0:  2A 2A 2A 0D 0A 2A 20 4C 65 20 74 72 61 69 74 65    ***..* Le traite
02A3F0:  6D 65 6E 74 20 63 6F 72 72 65 73 70 6F 6E 64 61    ment corresponda
02A400:  6E 74 20 61 20 63 65 74 74 65 20 6F 70 74 69 6F    nt a cette optio
02A410:  6E 20 65 73 74 20 6C 61 20 20 63 72 65 61 74 69    n est la  creati
02A420:  6F 6E 20 2A 0D 0A 2A 20 64 27 75 6E 20 6E 6F 75    on *..* d'un nou
02A430:  76 65 6C 20 65 6E 72 65 67 69 73 74 72 65 6D 65    vel enregistreme
02A440:  6E 74 2E 20 4C 65 20 66 69 63 68 69 65 72 20 64    nt. Le fichier d
02A450:  65 20 63 6F 6D 6D 61 6E 64 65 20 53 54 4F 43 4B    e commande STOCK
02A460:  53 43 52 20 2A 0D 0A 2A 20 70 65 72 6D 65 74 20    SCR *..* permet 
02A470:  6C 27 61 66 66 69 63 68 61 67 65 20 64 65 20 6C    l'affichage de l
02A480:  61 20 70 72 65 73 65 6E 74 61 74 69 6F 6E 20 64    a presentation d
02A490:  27 75 6E 20 20 65 6E 72 65 67 69 73 74 72 65 6D    'un  enregistrem
02A4A0:  65 6E 74 2E 20 2A 0D 0A 2A 20 43 65 20 66 69 63    ent. *..* Ce fic
02A4B0:  68 69 65 72 20 28 20 53 54 4F 43 4B 53 43 52 20    hier ( STOCKSCR 
02A4C0:  29 2C 20 73 65 72 61 20 75 74 69 6C 69 73 65 20    ), sera utilise 
02A4D0:  70 6F 75 72 20 74 6F 75 73 20 6C 65 73 20 74 72    pour tous les tr
02A4E0:  61 69 74 65 2D 20 2A 0D 0A 2A 20 6D 65 6E 74 73    aite- *..* ments
02A4F0:  20 71 75 69 20 6E 65 63 65 73 73 69 74 65 6E 74     qui necessitent
02A500:  0A 20 20 20 20 20 20 20 45 4E 44 49 46 20 34 0D    .       ENDIF 4.
02A510:  0A 20 20 20 20 20 45 4E 44 49 46 20 33 0D 0A 20    .     ENDIF 3.. 
02A520:  20 20 45 4E 44 49 46 20 32 0D 0A 20 45 4E 44 49      ENDIF 2.. ENDI
02A530:  46 20 31 0D 0A 45 4E 44 49 46 20 46 0D 0A 53 54    F 1..ENDIF F..ST
02A540:  4F 52 45 20 27 4F 27 20 54 4F 20 43 4F 4E 54 53    ORE 'O' TO CONTS
02A550:  54 4F 43 4B 0D 0A 45 4E 44 44 4F 20 54 52 41 53    TOCK..ENDDO TRAS
02A560:  54 4F 43 4B 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    TOCK............
02A570:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02A580:  61 20 6D 6F 64 69 66 69 63 61 74 69 6F 6E 0D 0A    a modification..
02A590:  2A 20 64 27 75 6E 20 65 6E 72 65 67 69 73 74 72    * d'un enregistr
02A5A0:  65 6D 65 6E 74 2E 0D 0A 20 20 20 44 4F 20 4D 4F    ement...   DO MO
02A5B0:  44 49 53 54 4F 43 0D 0A 20 20 20 55 53 45 0D 0A    DISTOC..   USE..
02A5C0:  20 20 20 45 4C 53 45 0D 0A 20 20 20 20 20 49 46       ELSE..     IF
02A5D0:  20 52 45 50 4F 4E 53 45 33 20 3D 20 27 33 27 0D     REPONSE3 = '3'.
02A5E0:  0A 20 20 20 20 20 53 54 4F 52 45 20 22 45 4E 54    .     STORE "ENT
02A5F0:  2F 53 4F 52 20 50 49 45 43 45 22 20 54 4F 20 4D    /SOR PIECE" TO M
02A600:  4F 44 45 53 54 4F 43 4B 0D 0A 20 20 20 20 20 44    ODESTOCK..     D
02A610:  4F 20 53 54 4F 43 4B 53 43 52 0D 0A 0D 0A 2A 20    O STOCKSCR....* 
02A620:  45 78 65 63 75 74 69 6F 6E 20 64 75 20 66 69 63    Execution du fic
02A630:  68 69 65 72 20 64 65 20 63 6F 6D 6D 61 6E 64 65    hier de commande
02A640:  20 70 65 72 6D 65 74 74 61 6E 74 20 6C 27 65 6E     permettant l'en
02A650:  74 72 65 65 20 6F 75 20 6C 61 0D 0A 2A 20 73 6F    tree ou la..* so
02A660:  72 74 69 65 20 64 65 20 70 69 65 63 65 28 73 29    rtie de piece(s)
02A670:  20 64 75 20 73 74 6F 63 6B 2E 0D 0A 20 20 20 20     du stock...    
02A680:  20 44 4F 20 45 4E 54 53 4F 52 54 0D 0A 20 20 20     DO ENTSORT..   
02A690:  20 20 55 53 45 0D 0A 20 20 20 20 20 45 4C 53 45      USE..     ELSE
02A6A0:  0D 0A 20 20 20 20 20 20 20 49 46 20 52 45 50 4F    ..       IF REPO
02A6B0:  4E 53 45 33 20 3D 20 22 34 22 0D 0A 20 20 20 20    NSE3 = "4"..    
02A6C0:  20 20 20 53 54 4F 52 45 20 22 56 49 53 55 41 4C       STORE "VISUAL
02A6D0:  49 53 41 54 49 4F 4E 22 20 54 4F 20 4D 4F 44 45    ISATION" TO MODE
02A6E0:  53 54 4F 43 4B 0D 0A 20 20 20 20 20 20 20 44 4F    STOCK..       DO
02A6F0:  20 53 54 4F 43 4B 53 43 52 0D 0A 0D 0A 2A 20 45     STOCKSCR....* E
02A700:  20 6C 27 61 66 66 69 63 68 61 67 65 20 64 65 20     l'affichage de 
02A710:  6C 61 20 20 70 72 65 73 65 6E 74 61 74 69 6F 6E    la  presentation
02A720:  20 20 64 27 75 6E 20 2A 0D 0A 2A 20 65 6E 72 65      d'un *..* enre
02A730:  67 69 73 74 72 65 6D 65 6E 74 2E 20 50 6F 75 72    gistrement. Pour
02A740:  20 65 76 69 74 65 72 20 74 6F 75 74 65 20 61 6D     eviter toute am
02A750:  62 69 67 75 69 74 65 2C 20 20 6F 6E 20 20 61 66    biguite,  on  af
02A760:  66 69 63 68 65 72 61 20 2A 0D 0A 2A 20 6C 65 20    fichera *..* le 
02A770:  6D 6F 64 65 20 65 6E 20 63 6F 75 72 73 20 65 6E    mode en cours en
02A780:  20 68 61 75 74 20 61 20 64 72 6F 69 74 65 20 64     haut a droite d
02A790:  65 20 6C 27 65 63 72 61 6E 2E 20 50 6F 75 72 20    e l'ecran. Pour 
02A7A0:  20 6F 62 74 65 6E 69 72 20 2A 0D 0A 2A 20 63 65     obtenir *..* ce
02A7B0:  20 72 65 73 75 6C 74 61 74 2C 20 20 69 6C 20 20     resultat,  il  
02A7C0:  73 75 66 66 69 72 61 20 20 64 27 61 66 66 65 63    suffira  d'affec
02A7D0:  74 65 72 20 6C 65 20 6D 6F 64 65 20 65 6E 20 63    ter le mode en c
02A7E0:  6F 75 72 73 20 61 20 6C 61 20 2A 0D 0A 2A 20 76    ours a la *..* v
02A7F0:  61 72 69 61 62 6C 65 20 3A 20 4D 4F 44 45 53 54    ariable : MODEST
02A800:  4F 43 4B 2C 20 20 61 76 61 6E 74 20 64 27 65 78    OCK,  avant d'ex
02A810:  65 63 75 74 65 72 20 6C 65 20 66 69 63 68 69 65    ecuter le fichie
02A820:  72 20 64 65 20 20 63 6F 6D 2D 20 2A 0D 0A 2A 20    r de  com- *..* 
02A830:  6D 61 6E 64 65 20 53 54 4F 43 4B 53 43 52 2E 20    mande STOCKSCR. 
02A840:  4C 6F 72 73 20 64 65 20 73 6F 6E 20 65 78 65 63    Lors de son exec
02A850:  75 74 69 6F 6E 2C 20 69 66 20 61 66 66 69 63 68    ution, if affich
02A860:  65 72 61 20 6C 65 20 63 6F 6E 2D 20 2A 0D 0A 2A    era le con- *..*
02A870:  20 74 65 6E 75 20 64 65 20 6C 61 20 76 61 72 69     tenu de la vari
02A880:  61 62 6C 65 20 3A 20 20 4D 4F 44 45 53 54 4F 43    able :  MODESTOC
02A890:  4B 20 20 65 6E 20 20 68 61 75 74 20 65 74 20 61    K  en  haut et a
02A8A0:  20 20 64 72 6F 69 74 65 20 20 64 65 20 2A 0D 0A      droite  de *..
02A8B0:  2A 20 6C 27 65 63 72 61 6E 2E 20 20 20 20 20 20    * l'ecran.      
02A8C0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02A8D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02A8E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 0D                  *.
02A8F0:  0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    .***************
02A900:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A910:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A920:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A930:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A940:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A950:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A960:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A970:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A980:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A990:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A9A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A9B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A9C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A9D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A9E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02A9F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AA00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AA10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AA20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AA30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AA40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AA50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AA60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AA70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AA80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AA90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AAA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AAB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AAC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AAD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AAE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AAF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02AB00:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02AB10:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02AB20:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02AB30:  0D 0A 0D 0A 20 53 54 4F 52 45 20 27 41 4A 4F 55    .... STORE 'AJOU
02AB40:  54 27 20 54 4F 20 4D 4F 44 45 53 54 4F 43 4B 20    T' TO MODESTOCK 
02AB50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02AB60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02AB70:  20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 44                .. D
02AB80:  4F 20 53 54 4F 43 4B 53 43 52 20 20 20 20 20 20    O STOCKSCR      
02AB90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02ABA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02ABB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02ABC0:  20 20 20 20 20 20 0D 0A 0D 0A 2A 20 45 78 65 63          ....* Exec
02ABD0:  75 74 69 6F 6E 20 64 75 20 66 69 63 68 69 65 72    ution du fichier
02ABE0:  20 64 65 20 63 6F 6D 6D 61 6E 64 65 20 70 65 72     de commande per
02ABF0:  6D 65 74 74 61 6E 74 20 6C 61 20 63 72 65 61 74    mettant la creat
02AC00:  69 6F 6E 20 20 64 65 0D 0A 2A 20 6E 6F 75 76 65    ion  de..* nouve
02AC10:  61 75 78 20 65 6E 72 65 67 69 73 74 72 65 6D 65    aux enregistreme
02AC20:  6E 74 73 2E 0D 0A 20 44 4F 20 41 4A 53 54 4F 43    nts... DO AJSTOC
02AC30:  4B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    K               
02AC40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02AC50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02AC60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A                  ..
02AC70:  20 55 53 45 20 20 20 20 20 20 20 20 20 20 20 20     USE            
02AC80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02AC90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02ACA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02ACB0:  20 20 20 20 20 20 20 0D 0A 20 45 4C 53 45 20 20           .. ELSE  
02ACC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02ACD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02ACE0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02ACF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02AD00:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
02AD10:  24 00 00 00 02 09 50 E5 24 00 C1 02 00 00 00 02    $.....P.$.......
02AD20:  24 00 C6 02 00 00 00 02 24 00 C2 02 00 00 00 02    $.......$.......
02AD30:  24 00 C7 02 00 00 00 02 24 00 C3 02 00 00 00 02    $.......$.......
02AD40:  24 00 C8 02 00 00 00 02 24 00 C4 02 00 00 00 02    $.......$.......
02AD50:  24 00 C9 02 00 00 00 02 24 00 C5 02 00 00 00 02    $.......$.......
02AD60:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02AD70:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02AD80:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02AD90:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADA0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADB0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADC0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADD0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADE0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02ADF0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02AE00:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 56 49    ************* VI
02AE10:  53 55 41 4C 49 53 41 54 49 4F 4E 20 44 27 55 4E    SUALISATION D'UN
02AE20:  45 20 44 45 4D 41 4E 44 45 20 44 27 41 43 48 41    E DEMANDE D'ACHA
02AE30:  54 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D    T *************.
02AE40:  0A 0D 0A 53 45 54 20 45 58 41 43 54 20 4F 4E 0D    ...SET EXACT ON.
02AE50:  0A 53 54 4F 52 45 20 22 20 22 20 54 4F 20 56 41    .STORE " " TO VA
02AE60:  4C 49 44 45 5A 0D 0A 40 20 30 2C 30 20 53 41 59    LIDEZ..@ 0,0 SAY
02AE70:  20 22 46 49 4E 20 3D 20 56 41 4C 49 44 45 5A 22     "FIN = VALIDEZ"
02AE80:  0D 0A 53 45 4C 45 43 54 20 50 52 49 4D 41 52 59    ..SELECT PRIMARY
02AE90:  0D 0A 55 53 45 20 53 54 4F 43 4B 20 49 4E 44 45    ..USE STOCK INDE
02AEA0:  58 20 50 49 45 43 45 0D 0A 53 45 4C 45 43 54 20    X PIECE..SELECT 
02AEB0:  53 45 43 4F 4E 44 41 52 59 0D 0A 55 53 45 20 44    SECONDARY..USE D
02AEC0:  41 20 49 4E 44 45 58 20 44 41 0D 0A 53 54 4F 52    A INDEX DA..STOR
02AED0:  45 20 22 20 20 20 20 20 20 20 20 20 20 22 20 54    E "          " T
02AEE0:  4F 20 4D 44 41 3A 4E 55 4D 0D 0A 53 54 4F 52 45    O MDA:NUM..STORE
02AEF0:  20 22 4F 22 20 54 4F 20 43 4F 4E 54 56 49 53 55     "O" TO CONTVISU
02AF00:  0D 0A 44 4F 20 57 48 49 4C 45 20 43 4F 4E 54 56    ..DO WHILE CONTV
02AF10:  49 53 55 20 3D 20 22 4F 22 0D 0A 43 4C 45 41 52    ISU = "O"..CLEAR
02AF20:  20 47 45 54 53 0D 0A 40 20 35 2C 31 30 20 47 45     GETS..@ 5,10 GE
02AF30:  54 20 4D 44 41 3A 4E 55 4D 0D 0A 52 45 41 44 0D    T MDA:NUM..READ.
02AF40:  0A 09 49 46 20 4D 44 41 3A 4E 55 4D 20 3D 20 22    ..IF MDA:NUM = "
02AF50:  20 22 20 2E 4F 52 2E 20 4D 44 41 3A 4E 55 4D 20     " .OR. MDA:NUM 
02AF60:  3D 20 56 41 4C 49 44 45 5A 0D 0A 09 52 45 4C 45    = VALIDEZ...RELE
02AF70:  41 53 45 20 56 41 4C 49 44 45 5A 2C 43 4F 4E 54    ASE VALIDEZ,CONT
02AF80:  56 49 53 55 2C 4D 44 41 3A 4E 55 4D 2C 4D 50 49    VISU,MDA:NUM,MPI
02AF90:  45 43 45 0D 0A 09 53 45 54 20 45 58 41 43 54 20    ECE...SET EXACT 
02AFA0:  4F 46 46 0D 0A 09 52 45 54 55 52 4E 0D 0A 09 45    OFF...RETURN...E
02AFB0:  4C 53 45 0D 0A 09 53 54 4F 52 45 20 4D 44 41 3A    LSE...STORE MDA:
02AFC0:  4E 55 4D 20 54 4F 20 56 41 4C 49 44 45 5A 0D 0A    NUM TO VALIDEZ..
02AFD0:  09 53 45 4C 45 43 54 20 53 45 43 4F 4E 44 41 52    .SELECT SECONDAR
02AFE0:  59 0D 0A 09 46 49 4E 44 20 26 4D 44 41 3A 4E 55    Y...FIND &MDA:NU
02AFF0:  4D 0D 0A 09 09 49 46 20 23 20 3D 20 30 0D 0A 09    M....IF # = 0...
02B000:  2E 51 54 45 3A 43 4D 44 20 20 20 20 20 20 20 20    .QTE:CMD        
02B010:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B020:  20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20              ..    
02B030:  20 20 20 20 20 20 20 20 20 20 20 20 40 20 31 38                @ 18
02B040:  2C 31 35 20 53 41 59 20 53 2E 50 49 45 43 45 20    ,15 SAY S.PIECE 
02B050:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B060:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B070:  20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20      ..            
02B080:  20 20 20 20 40 20 31 38 2C 36 39 20 53 41 59 20        @ 18,69 SAY 
02B090:  53 2E 50 52 49 58 3A 55 48 54 20 20 20 20 20 20    S.PRIX:UHT      
02B0A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B0B0:  20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20              ..    
02B0C0:  20 20 20 20 20 20 20 20 20 20 20 20 40 20 32 30                @ 20
02B0D0:  2C 31 33 20 53 41 59 20 53 2E 49 4D 50 55 54 41    ,13 SAY S.IMPUTA
02B0E0:  54 49 4F 4E 20 20 20 20 20 20 20 20 20 20 20 20    TION            
02B0F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B100:  20 20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20       ..           
02B110:  20 20 20 20 20 40 20 32 30 2C 37 31 20 53 41 59         @ 20,71 SAY
02B120:  20 53 2E 44 45 4C 41 49 20 20 20 20 20 20 20 20     S.DELAI        
02B130:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B140:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 09 09 45               ....E
02B150:  4E 44 49 46 0D 0A 09 45 4E 44 49 46 0D 0A 45 4E    NDIF...ENDIF..EN
02B160:  44 44 4F 20 56 49 53 55 41 4C 49 53 41 54 49 4F    DDO VISUALISATIO
02B170:  4E 20 44 45 4D 41 4E 44 45 20 44 27 41 43 48 41    N DEMANDE D'ACHA
02B180:  54 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    T...............
02B190:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B1A0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B1B0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B1C0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B1D0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B1E0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B1F0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02B200:  09 40 20 35 2C 32 37 20 53 41 59 20 22 20 20 20    .@ 5,27 SAY "   
02B210:  20 20 20 20 20 22 0D 0A 20 20 20 20 20 20 20 20         "..        
02B220:  20 20 20 20 20 20 20 20 40 20 37 2C 31 31 20 53            @ 7,11 S
02B230:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
02B240:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22                   "
02B250:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
02B260:  20 20 40 20 39 2C 31 31 20 53 41 59 20 22 20 20      @ 9,11 SAY "  
02B270:  20 20 20 20 20 22 0D 0A 20 20 20 20 20 20 20 20         "..        
02B280:  20 20 20 20 20 20 20 20 40 20 35 2C 34 37 20 53            @ 5,47 S
02B290:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
02B2A0:  20 20 22 0D 0A 20 20 20 20 20 20 20 20 20 20 20      "..           
02B2B0:  20 20 20 20 20 40 20 35 2C 36 36 20 53 41 59 20         @ 5,66 SAY 
02B2C0:  22 20 20 20 20 20 20 20 20 20 20 22 0D 0A 20 20    "          "..  
02B2D0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 40 20                  @ 
02B2E0:  38 2C 34 35 20 53 41 59 20 22 20 20 20 20 20 20    8,45 SAY "      
02B2F0:  20 20 20 20 20 20 20 20 20 20 20 22 0D 0A 20 20               "..  
02B300:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 40 20                  @ 
02B310:  31 34 2C 32 20 53 41 59 20 22 20 20 20 20 20 20    14,2 SAY "      
02B320:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B330:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B340:  20 20 20 22 0D 0A 20 20 20 20 20 20 20 20 20 20       "..          
02B350:  20 20 20 20 20 20 40 20 31 34 2C 34 36 20 53 41          @ 14,46 SA
02B360:  59 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20    Y "             
02B370:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 0D                  ".
02B380:  0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    .               
02B390:  20 40 20 31 38 2C 31 20 53 41 59 20 22 20 20 20     @ 18,1 SAY "   
02B3A0:  20 20 20 20 22 0D 0A 20 20 20 20 20 20 20 20 20        "..         
02B3B0:  20 20 20 20 20 20 20 40 20 31 38 2C 31 34 20 53           @ 18,14 S
02B3C0:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
02B3D0:  20 20 22 0D 0A 20 20 20 20 20 20 20 20 20 20 20      "..           
02B3E0:  20 20 20 20 20 40 20 31 38 2C 33 31 20 53 41 59         @ 18,31 SAY
02B3F0:  20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20     "              
02B400:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 56    ************** V
02B410:  49 53 55 41 4C 49 53 41 54 49 4F 4E 20 44 27 45    ISUALISATION D'E
02B420:  4E 52 45 47 49 53 54 52 45 4D 45 4E 54 28 53 29    NREGISTREMENT(S)
02B430:  20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A     ***************
02B440:  0D 0A 2A 20 43 45 20 46 49 43 48 49 45 52 20 44    ..* CE FICHIER D
02B450:  45 20 43 4F 4D 4D 41 4E 44 45 20 50 45 52 4D 45    E COMMANDE PERME
02B460:  54 20 44 45 20 43 4F 4E 53 55 4C 54 45 52 20 55    T DE CONSULTER U
02B470:  4E 20 45 4E 52 45 47 49 53 54 52 45 4D 45 4E 54    N ENREGISTREMENT
02B480:  20 2A 0D 0A 2A 20 53 45 4C 4F 4E 20 53 4F 4E 20     *..* SELON SON 
02B490:  4E 55 4D 45 52 4F 20 44 45 20 52 45 46 45 52 45    NUMERO DE REFERE
02B4A0:  4E 43 45 2E 20 20 20 20 20 20 20 20 20 20 20 20    NCE.            
02B4B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B4C0:  20 20 20 2A 0D 0A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A       *..**********
02B4D0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02B4E0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02B4F0:  2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A    ****************
02B500:  2A 2A 2A 2A 2A 2A 0D 0A 0D 0A 53 45 54 20 45 58    ******....SET EX
02B510:  41 43 54 20 4F 4E 0D 0A 40 20 30 2C 30 20 53 41    ACT ON..@ 0,0 SA
02B520:  59 20 20 22 46 49 4E 20 3D 20 56 41 4C 49 44 45    Y  "FIN = VALIDE
02B530:  5A 22 0D 0A 53 54 4F 52 45 20 22 20 22 20 54 4F    Z"..STORE " " TO
02B540:  20 56 41 4C 49 44 45 5A 0D 0A 53 45 4C 45 43 54     VALIDEZ..SELECT
02B550:  20 50 52 49 4D 41 52 59 0D 0A 55 53 45 20 44 41     PRIMARY..USE DA
02B560:  20 49 4E 44 45 58 20 44 41 0D 0A 53 45 4C 45 43     INDEX DA..SELEC
02B570:  54 20 53 45 43 4F 4E 44 41 52 59 0D 0A 55 53 45    T SECONDARY..USE
02B580:  20 53 54 4F 43 4B 20 49 4E 44 45 58 20 50 49 45     STOCK INDEX PIE
02B590:  43 45 0D 0A 53 54 4F 52 45 20 22 20 20 20 20 20    CE..STORE "     
02B5A0:  20 20 20 20 20 20 20 22 20 54 4F 20 4D 50 49 45           " TO MPIE
02B5B0:  43 45 0D 0A 53 54 4F 52 45 20 22 4F 22 20 54 4F    CE..STORE "O" TO
02B5C0:  20 43 4F 4E 54 56 49 53 55 0D 0A 44 4F 20 57 48     CONTVISU..DO WH
02B5D0:  49 4C 45 20 43 4F 4E 54 56 49 53 55 20 3D 20 22    ILE CONTVISU = "
02B5E0:  4F 22 0D 0A 43 4C 45 41 52 20 47 45 54 53 0D 0A    O"..CLEAR GETS..
02B5F0:  40 20 31 30 2C 31 31 20 47 45 54 20 4D 50 49 45    @ 10,11 GET MPIE
02B600:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B610:  20 20 20 20 22 0D 0A 20 20 20 20 20 20 20 20 20        "..         
02B620:  20 20 20 20 20 20 20 40 20 31 38 2C 36 37 20 53           @ 18,67 S
02B630:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 22    AY "           "
02B640:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
02B650:  20 20 40 20 32 30 2C 31 33 20 53 41 59 20 22 20      @ 20,13 SAY " 
02B660:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B670:  20 20 20 20 20 20 20 20 20 20 22 0D 0A 09 09 40              "....@
02B680:  20 32 30 2C 37 31 20 53 41 59 20 22 20 20 20 20     20,71 SAY "    
02B690:  22 0D 0A 09 09 40 20 32 32 2C 30 20 53 41 59 20    "....@ 22,0 SAY 
02B6A0:  22 43 45 54 54 45 20 44 45 4D 41 4E 44 45 20 44    "CETTE DEMANDE D
02B6B0:  27 41 43 48 41 54 20 4E 45 20 46 49 47 55 52 45    'ACHAT NE FIGURE
02B6C0:  20 50 41 53 20 44 41 4E 53 20 4C 45 20 3B 0D 0A     PAS DANS LE ;..
02B6D0:  46 49 43 48 49 45 52 2C 20 56 61 6C 69 64 65 7A    FICHIER, Validez
02B6E0:  22 0D 0A 09 09 53 45 54 20 43 4F 4E 53 4F 4C 45    "....SET CONSOLE
02B6F0:  20 4F 46 46 0D 0A 09 09 57 41 49 54 0D 0A 09 09     OFF....WAIT....
02B700:  53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 4E 0D 0A    SET CONSOLE ON..
02B710:  09 09 40 20 32 32 2C 30 20 53 41 59 20 22 20 20    ..@ 22,0 SAY "  
02B720:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B730:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B740:  20 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D 0A                 ;..
02B750:  20 20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A                 "..
02B760:  09 09 53 54 4F 52 45 20 22 20 20 20 20 20 20 20    ..STORE "       
02B770:  20 20 20 22 20 54 4F 20 4D 44 41 3A 4E 55 4D 0D       " TO MDA:NUM.
02B780:  0A 09 09 45 4C 53 45 0D 0A 09 09 53 45 4C 45 43    ...ELSE....SELEC
02B790:  54 20 50 52 49 4D 41 52 59 0D 0A 09 09 53 54 4F    T PRIMARY....STO
02B7A0:  52 45 20 53 2E 50 49 45 43 45 20 54 4F 20 4D 50    RE S.PIECE TO MP
02B7B0:  49 45 43 45 0D 0A 09 09 46 49 4E 44 20 26 4D 50    IECE....FIND &MP
02B7C0:  49 45 43 45 0D 0A 09 09 20 20 20 20 49 46 20 23    IECE....    IF #
02B7D0:  20 3D 20 30 0D 0A 09 09 20 20 20 20 40 20 31 34     = 0....    @ 14
02B7E0:  2C 34 36 20 53 41 59 20 22 20 20 20 20 20 20 20    ,46 SAY "       
02B7F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B800:  43 45 0D 0A 52 45 41 44 0D 0A 0D 0A 2A 20 53 49    CE..READ....* SI
02B810:  20 41 55 43 55 4E 20 4E 55 4D 45 52 4F 20 44 45     AUCUN NUMERO DE
02B820:  20 52 45 46 45 52 45 4E 43 45 20 4E 27 45 53 54     REFERENCE N'EST
02B830:  20 53 41 49 53 49 20 4F 55 20 53 49 20 49 4C 20     SAISI OU SI IL 
02B840:  45 53 54 20 49 44 45 4E 54 49 51 55 45 0D 0A 2A    EST IDENTIQUE..*
02B850:  20 41 55 20 50 52 45 43 45 44 45 4E 54 20 2D 3E     AU PRECEDENT ->
02B860:  20 52 45 54 4F 55 52 20 41 55 20 4D 45 4E 55 20     RETOUR AU MENU 
02B870:  54 52 41 49 54 45 4D 45 4E 54 20 50 49 45 43 45    TRAITEMENT PIECE
02B880:  53 20 44 45 54 41 43 48 45 45 53 2E 0D 0A 0D 0A    S DETACHEES.....
02B890:  49 46 20 4D 50 49 45 43 45 20 3D 20 22 20 22 20    IF MPIECE = " " 
02B8A0:  2E 4F 52 2E 20 56 41 4C 49 44 45 5A 20 3D 20 4D    .OR. VALIDEZ = M
02B8B0:  50 49 45 43 45 0D 0A 52 45 4C 45 41 53 45 20 56    PIECE..RELEASE V
02B8C0:  41 4C 49 44 45 5A 2C 43 4F 4E 54 56 49 53 55 2C    ALIDEZ,CONTVISU,
02B8D0:  4D 50 49 45 43 45 2C 4D 44 41 3A 4E 55 4D 2C 43    MPIECE,MDA:NUM,C
02B8E0:  4F 4C 4F 4E 4E 45 2C 51 55 41 4E 54 49 54 45 2C    OLONNE,QUANTITE,
02B8F0:  50 52 49 58 3A 54 48 54 0D 0A 53 45 54 20 45 58    PRIX:THT..SET EX
02B900:  41 43 54 20 4F 46 46 0D 0A 52 45 54 55 52 4E 0D    ACT OFF..RETURN.
02B910:  0A 45 4C 53 45 0D 0A 0D 0A 2A 20 45 46 46 41 43    .ELSE....* EFFAC
02B920:  45 4D 45 4E 54 20 44 45 20 4C 41 20 32 32 65 6D    EMENT DE LA 22em
02B930:  65 20 4C 49 47 4E 45 20 53 55 52 20 4C 41 51 55    e LIGNE SUR LAQU
02B940:  45 4C 4C 45 20 53 55 42 53 49 53 54 45 20 50 45    ELLE SUBSISTE PE
02B950:  55 54 20 45 54 52 45 0D 0A 2A 20 55 4E 20 4D 45    UT ETRE..* UN ME
02B960:  53 53 41 47 45 20 44 27 41 56 45 52 54 49 53 53    SSAGE D'AVERTISS
02B970:  45 4D 45 4E 54 2E 0D 0A 40 20 32 32 2C 30 20 53    EMENT...@ 22,0 S
02B980:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
02B990:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B9A0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02B9B0:  20 20 20 3B 0D 0A 20 20 20 20 20 20 20 20 20 20       ;..          
02B9C0:  20 20 20 20 20 20 20 20 20 20 20 22 0D 0A 53 54               "..ST
02B9D0:  4F 52 45 20 4D 50 49 45 43 45 20 54 4F 20 56 41    ORE MPIECE TO VA
02B9E0:  4C 49 44 45 5A 0D 0A 53 45 4C 45 43 54 20 53 45    LIDEZ..SELECT SE
02B9F0:  43 4F 4E 44 41 52 59 0D 0A 46 49 4E 44 20 26 4D    CONDARY..FIND &M
02BA00:  20 22 0D 0A 09 09 20 20 20 20 40 20 31 38 2C 33     "....    @ 18,3
02BA10:  31 20 53 41 59 20 22 20 20 20 20 20 20 20 20 20    1 SAY "         
02BA20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BA30:  20 20 20 20 20 20 20 20 20 22 0D 0A 09 09 20 20             "....  
02BA40:  20 20 40 20 32 32 2C 30 20 20 53 41 59 20 22 4C      @ 22,0  SAY "L
02BA50:  61 20 70 69 65 63 65 22 0D 0A 09 09 20 20 20 20    a piece"....    
02BA60:  40 20 32 32 2C 39 20 53 41 59 20 4D 50 49 45 43    @ 22,9 SAY MPIEC
02BA70:  45 0D 0A 09 09 20 20 20 20 40 20 32 32 2C 32 32    E....    @ 22,22
02BA80:  20 53 41 59 20 22 6E 65 20 66 69 67 75 72 65 20     SAY "ne figure 
02BA90:  70 6C 75 73 20 64 61 6E 73 20 6C 65 20 66 69 63    plus dans le fic
02BAA0:  68 69 65 72 20 73 74 6F 63 6B 2C 20 3B 0D 0A 56    hier stock, ;..V
02BAB0:  61 6C 69 64 65 7A 22 0D 0A 09 09 20 20 20 20 53    alidez"....    S
02BAC0:  45 54 20 43 4F 4E 53 4F 4C 45 20 4F 46 46 0D 0A    ET CONSOLE OFF..
02BAD0:  09 09 20 20 20 20 57 41 49 54 0D 0A 09 09 20 20    ..    WAIT....  
02BAE0:  20 20 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 4E      SET CONSOLE ON
02BAF0:  0D 0A 09 09 20 20 20 20 40 20 32 32 2C 30 20 53    ....    @ 22,0 S
02BB00:  41 59 20 22 20 20 20 20 20 20 20 20 20 20 20 20    AY "            
02BB10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BB20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B                   ;
02BB30:  0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20    ..              
02BB40:  20 20 20 20 20 20 20 20 20 20 22 0D 0A 09 09 20              ".... 
02BB50:  20 20 20 45 4C 53 45 0D 0A 20 20 20 20 20 20 20       ELSE..       
02BB60:  20 20 20 20 20 20 20 20 20 20 20 20 20 40 20 31                 @ 1
02BB70:  34 2C 34 36 20 53 41 59 20 4D 41 43 48 49 4E 45    4,46 SAY MACHINE
02BB80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BB90:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BBA0:  20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20     ..             
02BBB0:  20 20 20 20 20 20 20 40 20 31 38 2C 33 31 20 53           @ 18,31 S
02BBC0:  41 59 20 4C 49 42 45 4C 4C 45 20 20 20 20 20 20    AY LIBELLE      
02BBD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BBE0:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 09 09 20               .... 
02BBF0:  20 20 20 45 4E 44 49 46 0D 0A 09 09 40 20 35 2C       ENDIF....@ 5,
02BC00:  50 49 45 43 45 0D 0A 0D 0A 2A 20 53 49 20 4C 45    PIECE....* SI LE
02BC10:  20 4E 55 4D 45 52 4F 20 44 45 20 52 45 46 45 52     NUMERO DE REFER
02BC20:  45 4E 43 45 20 53 41 49 53 49 20 20 4E 27 45 58    ENCE SAISI  N'EX
02BC30:  49 53 54 45 20 20 50 41 53 20 2D 2D 3E 20 20 45    ISTE  PAS -->  E
02BC40:  46 46 41 43 45 4D 45 4E 54 0D 0A 2A 20 44 45 53    FFACEMENT..* DES
02BC50:  20 44 49 46 46 45 52 45 4E 54 45 20 5A 4F 4E 45     DIFFERENTE ZONE
02BC60:  20 44 45 20 56 49 53 55 41 4C 49 53 41 54 49 4F     DE VISUALISATIO
02BC70:  4E 20 45 54 20 41 46 46 49 43 48 41 47 45 20 44    N ET AFFICHAGE D
02BC80:  27 55 4E 20 4D 45 53 53 41 47 45 0D 0A 2A 20 44    'UN MESSAGE..* D
02BC90:  27 45 52 52 45 55 52 2E 0D 0A 20 20 20 20 20 49    'ERREUR...     I
02BCA0:  46 20 23 20 3D 20 30 0D 0A 20 20 20 20 20 40 20    F # = 0..     @ 
02BCB0:  36 2C 31 33 20 53 41 59 20 22 20 20 20 20 20 22    6,13 SAY "     "
02BCC0:  0D 0A 20 20 20 20 20 40 20 36 2C 33 31 20 53 41    ..     @ 6,31 SA
02BCD0:  59 20 22 20 20 20 20 20 22 0D 0A 20 20 20 20 20    Y "     "..     
02BCE0:  40 20 36 2C 34 37 20 53 41 59 20 22 20 20 20 20    @ 6,47 SAY "    
02BCF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BD00:  20 20 20 20 20 22 0D 0A 20 20 20 20 20 40 20 38         "..     @ 8
02BD10:  2C 31 37 20 53 41 59 20 22 20 20 20 20 20 20 20    ,17 SAY "       
02BD20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BD30:  20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0A 20                ".. 
02BD40:  20 20 20 20 40 20 31 34 2C 31 33 20 53 41 59 20        @ 14,13 SAY 
02BD50:  22 20 20 20 20 20 20 20 20 20 20 22 0D 0A 20 20    "          "..  
02BD60:  20 20 20 40 20 31 34 2C 33 36 20 53 41 59 20 22       @ 14,36 SAY "
02BD70:  20 20 20 20 20 20 20 20 22 0D 0A 20 20 20 20 20            "..     
02BD80:  40 20 31 34 2C 35 33 20 53 41 59 20 22 20 20 20    @ 14,53 SAY "   
02BD90:  20 20 20 20 20 20 20 20 20 22 0D 0A 20 20 20 20             "..    
02BDA0:  20 40 20 31 34 2C 37 31 20 53 41 59 20 22 20 20     @ 14,71 SAY "  
02BDB0:  20 20 20 20 20 20 22 0D 0A 20 20 20 20 20 40 20          "..     @ 
02BDC0:  31 36 2C 32 30 20 53 41 59 20 22 20 20 20 20 20    16,20 SAY "     
02BDD0:  20 20 20 20 20 22 0D 0A 20 20 20 20 20 40 20 31         "..     @ 1
02BDE0:  36 2C 35 31 20 53 41 59 20 22 20 20 20 20 20 20    6,51 SAY "      
02BDF0:  20 20 20 20 22 0D 0A 20 20 20 20 20 40 20 32 30        "..     @ 20
02BE00:  32 37 20 53 41 59 20 53 2E 44 41 3A 44 41 54 45    27 SAY S.DA:DATE
02BE10:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BE20:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BE30:  20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20      ..            
02BE40:  20 20 20 20 40 20 37 2C 31 31 20 53 41 59 20 53        @ 7,11 SAY S
02BE50:  2E 45 4D 45 54 54 45 55 52 20 20 20 20 20 20 20    .EMETTEUR       
02BE60:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BE70:  20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20              ..    
02BE80:  20 20 20 20 20 20 20 20 20 20 20 20 40 20 39 2C                @ 9,
02BE90:  31 31 20 53 41 59 20 53 2E 53 45 43 54 49 4F 4E    11 SAY S.SECTION
02BEA0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BEB0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BEC0:  20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20      ..            
02BED0:  20 20 20 20 40 20 35 2C 34 37 20 53 41 59 20 53        @ 5,47 SAY S
02BEE0:  2E 43 4D 44 3A 4E 55 4D 20 20 20 20 20 20 20 20    .CMD:NUM        
02BEF0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BF00:  20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20              ..    
02BF10:  20 20 20 20 20 20 20 20 20 20 20 20 40 20 35 2C                @ 5,
02BF20:  36 36 20 53 41 59 20 53 2E 43 4D 44 3A 44 41 54    66 SAY S.CMD:DAT
02BF30:  45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    E               
02BF40:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BF50:  20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20      ..            
02BF60:  20 20 20 20 40 20 38 2C 34 35 20 53 41 59 20 53        @ 8,45 SAY S
02BF70:  2E 54 59 50 45 20 20 20 20 20 20 20 20 20 20 20    .TYPE           
02BF80:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BF90:  20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20              ..    
02BFA0:  20 20 20 20 20 20 20 20 20 20 20 20 40 20 31 34                @ 14
02BFB0:  2C 32 20 53 41 59 20 53 2E 46 4F 55 52 4E 49 20    ,2 SAY S.FOURNI 
02BFC0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BFD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02BFE0:  20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20      ..            
02BFF0:  20 20 20 20 40 20 31 38 2C 31 20 53 41 59 20 53        @ 18,1 SAY S
02C000:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
02C010:  25 00 00 00 02 09 46 E5 25 00 C1 02 00 00 00 02    %.....F.%.......
02C020:  25 00 C6 02 00 00 00 02 25 00 C2 02 00 00 00 02    %.......%.......
02C030:  25 00 C7 02 00 00 00 02 25 00 C3 02 00 00 00 02    %.......%.......
02C040:  25 00 C8 02 00 00 00 02 25 00 C4 02 00 00 00 02    %.......%.......
02C050:  25 00 C9 02 00 00 00 02 25 00 C5 02 00 00 00 02    %.......%.......
02C060:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C070:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C080:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C090:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C0F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02C100:  2C 33 20 20 53 41 59 20 22 20 20 20 20 20 20 20    ,3  SAY "       
02C110:  20 20 20 22 0D 0A 20 20 20 20 20 40 20 32 30 2C       "..     @ 20,
02C120:  33 35 20 53 41 59 20 22 20 20 20 20 20 20 20 20    35 SAY "        
02C130:  20 20 22 0D 0A 20 20 20 20 20 40 20 32 30 2C 34      "..     @ 20,4
02C140:  38 20 53 41 59 20 22 20 20 20 20 20 20 20 20 20    8 SAY "         
02C150:  20 20 20 22 0D 0A 20 20 20 20 20 40 20 32 30 2C       "..     @ 20,
02C160:  36 34 20 53 41 59 20 22 20 20 20 20 20 20 20 20    64 SAY "        
02C170:  20 20 22 0D 0A 20 20 20 20 20 40 20 32 32 2C 30      "..     @ 22,0
02C180:  20 53 41 59 20 20 22 43 45 54 54 45 20 50 49 45     SAY  "CETTE PIE
02C190:  43 45 20 4E 45 20 46 49 47 55 52 45 20 50 41 53    CE NE FIGURE PAS
02C1A0:  20 44 41 4E 53 20 4C 45 20 46 49 43 48 49 45 52     DANS LE FICHIER
02C1B0:  2C 20 56 61 6C 69 64 65 7A 22 0D 0A 20 20 20 20    , Validez"..    
02C1C0:  20 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 46 46     SET CONSOLE OFF
02C1D0:  0D 0A 20 20 20 20 20 57 41 49 54 0D 0A 20 20 20    ..     WAIT..   
02C1E0:  20 20 53 45 54 20 43 4F 4E 53 4F 4C 45 20 4F 4E      SET CONSOLE ON
02C1F0:  0D 0A 20 20 20 20 20 40 20 32 32 2C 30 20 53 41    ..     @ 22,0 SA
02C200:  59 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20    Y "             
02C210:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C220:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C230:  20 20 20 20 20 20 20 22 0D 0A 0D 0A 0D 0A 2A 20           "......* 
02C240:  53 49 20 4C 45 20 4E 55 4D 45 52 4F 20 44 45 20    SI LE NUMERO DE 
02C250:  52 45 46 45 52 45 4E 43 45 20 53 41 49 53 49 20    REFERENCE SAISI 
02C260:  45 58 49 53 54 45 20 2D 2D 3E 20 52 45 43 48 45    EXISTE --> RECHE
02C270:  52 43 48 45 20 44 45 53 20 52 45 4E 53 45 49 2D    RCHE DES RENSEI-
02C280:  0D 0A 2A 20 47 4E 45 4D 45 4E 54 53 20 43 4F 4D    ..* GNEMENTS COM
02C290:  50 4C 45 4D 45 4E 54 41 49 52 45 53 20 41 55 20    PLEMENTAIRES AU 
02C2A0:  4E 55 4D 45 52 4F 20 44 45 20 4C 41 20 44 45 4D    NUMERO DE LA DEM
02C2B0:  41 4E 44 45 20 44 27 41 43 48 41 54 2E 0D 0A 0D    ANDE D'ACHAT....
02C2C0:  0A 20 20 20 20 20 45 4C 53 45 0D 0A 20 20 20 20    .     ELSE..    
02C2D0:  20 53 45 4C 45 43 54 20 50 52 49 4D 41 52 59 0D     SELECT PRIMARY.
02C2E0:  0A 20 20 20 20 20 53 54 4F 52 45 20 53 2E 44 41    .     STORE S.DA
02C2F0:  3A 4E 55 4D 20 54 4F 20 4D 44 41 3A 4E 55 4D 0D    :NUM TO MDA:NUM.
02C300:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C310:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C320:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C330:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C340:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C350:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C360:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C370:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C380:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C390:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C3A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C3B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C3C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C3D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C3E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C3F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C4A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C4B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C4C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C4D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C4E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C4F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C500:  0A 20 20 20 20 20 46 49 4E 44 20 26 4D 44 41 3A    .     FIND &MDA:
02C510:  4E 55 4D 0D 0A 0D 0A 2A 20 53 49 20 4C 45 20 4E    NUM....* SI LE N
02C520:  55 4D 45 52 4F 20 44 45 20 4C 41 20 44 45 4D 41    UMERO DE LA DEMA
02C530:  4E 44 45 20 44 27 41 43 48 41 54 20 4E 27 45 58    NDE D'ACHAT N'EX
02C540:  49 53 54 45 20 50 4C 55 53 20 2D 2D 3E 20 41 46    ISTE PLUS --> AF
02C550:  46 49 43 48 41 47 45 0D 0A 2A 20 44 45 53 20 44    FICHAGE..* DES D
02C560:  41 54 45 53 20 53 4F 55 53 20 4C 41 20 46 4F 52    ATES SOUS LA FOR
02C570:  4D 45 20 22 20 20 2F 20 20 2F 20 20 22 0D 0A 09    ME "  /  /  "...
02C580:  49 46 20 23 20 3D 20 30 0D 0A 09 40 20 31 34 2C    IF # = 0...@ 14,
02C590:  33 36 20 53 41 59 20 22 20 20 2F 20 20 2F 20 20    36 SAY "  /  /  
02C5A0:  22 0D 0A 09 40 20 31 34 2C 37 31 20 53 41 59 20    "...@ 14,71 SAY 
02C5B0:  22 20 20 2F 20 20 2F 20 20 22 20 0D 0A 0D 0A 2A    "  /  /  " ....*
02C5C0:  20 53 49 20 4C 41 20 44 45 4D 41 4E 44 45 20 44     SI LA DEMANDE D
02C5D0:  27 41 43 48 41 54 20 45 58 49 53 54 45 20 2D 2D    'ACHAT EXISTE --
02C5E0:  3E 20 41 46 46 49 43 48 41 47 45 20 44 45 53 20    > AFFICHAGE DES 
02C5F0:  44 49 46 46 45 52 45 4E 54 53 0D 0A 2A 20 52 45    DIFFERENTS..* RE
02C600:  4E 53 45 49 47 4E 45 4D 45 4E 54 53 20 43 4F 4D    NSEIGNEMENTS COM
02C610:  50 4C 45 4D 45 4E 54 41 49 52 45 53 2E 0D 0A 09    PLEMENTAIRES....
02C620:  45 4C 53 45 0D 0A 20 20 20 20 20 20 20 20 40 20    ELSE..        @ 
02C630:  31 34 2C 33 36 20 53 41 59 20 44 41 3A 44 41 54    14,36 SAY DA:DAT
02C640:  45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    E               
02C650:  20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20               ..   
02C660:  20 20 20 20 20 40 20 31 34 2C 35 33 20 53 41 59         @ 14,53 SAY
02C670:  20 43 4D 44 3A 4E 55 4D 20 20 20 20 20 20 20 20     CMD:NUM        
02C680:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C690:  20 20 0D 0A 20 20 20 20 20 20 20 20 40 20 31 34      ..        @ 14
02C6A0:  2C 37 31 20 53 41 59 20 43 4D 44 3A 44 41 54 45    ,71 SAY CMD:DATE
02C6B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C6C0:  20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 20             ..     
02C6D0:  20 20 20 40 20 31 36 2C 32 30 20 53 41 59 20 51       @ 16,20 SAY Q
02C6E0:  54 45 3A 43 4D 44 20 20 20 20 20 20 20 20 20 20    TE:CMD          
02C6F0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C7A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C7B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C7C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C7D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C7E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C7F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C800:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C810:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C820:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C830:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C840:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C850:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C860:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C870:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C880:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C890:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C8A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C8B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C8C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C8D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C8E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C8F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02C900:  0D 0A 09 45 4E 44 49 46 0D 0A 0D 0A 2A 20 41 46    ...ENDIF....* AF
02C910:  46 49 43 48 41 47 45 20 44 45 53 20 43 41 52 41    FICHAGE DES CARA
02C920:  43 54 45 52 49 53 54 49 51 55 45 53 20 44 45 20    CTERISTIQUES DE 
02C930:  4C 27 41 52 54 49 43 4C 45 0D 0A 20 20 20 20 20    L'ARTICLE..     
02C940:  40 20 36 2C 31 33 20 53 41 59 20 53 2E 41 54 45    @ 6,13 SAY S.ATE
02C950:  4C 49 45 52 0D 0A 20 20 20 20 20 40 20 36 2C 33    LIER..     @ 6,3
02C960:  31 20 53 41 59 20 53 2E 53 45 43 54 49 4F 4E 20    1 SAY S.SECTION 
02C970:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C980:  20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20              ..    
02C990:  20 40 20 36 2C 34 37 20 53 41 59 20 53 2E 4D 41     @ 6,47 SAY S.MA
02C9A0:  43 48 49 4E 45 20 20 20 20 20 20 20 20 20 20 20    CHINE           
02C9B0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C9C0:  0D 0A 20 20 20 20 20 40 20 38 2C 31 37 20 53 41    ..     @ 8,17 SA
02C9D0:  59 20 53 2E 4C 49 42 45 4C 4C 45 20 20 20 20 20    Y S.LIBELLE     
02C9E0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02C9F0:  20 20 20 20 20 20 0D 0A 20 20 20 20 20 40 20 31          ..     @ 1
02CA00:  34 2C 31 33 20 53 41 59 20 53 2E 44 41 3A 4E 55    4,13 SAY S.DA:NU
02CA10:  4D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    M               
02CA20:  20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20                ..  
02CA30:  20 20 20 40 20 31 36 2C 35 31 20 53 41 59 20 53       @ 16,51 SAY S
02CA40:  2E 51 54 45 3A 52 45 53 54 45 20 20 20 20 20 20    .QTE:RESTE      
02CA50:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02CA60:  20 20 0D 0A 20 20 20 20 20 40 20 32 30 2C 33 20      ..     @ 20,3 
02CA70:  20 53 41 59 20 53 2E 4D 49 4E 49 3A 53 54 4F 43     SAY S.MINI:STOC
02CA80:  4B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20    K               
02CA90:  20 20 20 20 20 20 20 20 0D 0A 0D 0A 2A 20 41 46            ....* AF
02CAA0:  46 49 43 48 41 47 45 20 44 27 55 4E 20 4D 45 53    FICHAGE D'UN MES
02CAB0:  53 41 47 45 20 44 27 41 56 45 52 54 49 53 53 45    SAGE D'AVERTISSE
02CAC0:  4D 45 4E 54 20 4C 4F 52 53 51 55 45 20 4C 41 20    MENT LORSQUE LA 
02CAD0:  51 55 41 4E 54 49 54 45 0D 0A 2A 20 45 4E 20 53    QUANTITE..* EN S
02CAE0:  54 4F 43 4B 20 45 53 54 20 49 4E 46 45 52 49 45    TOCK EST INFERIE
02CAF0:  55 52 45 20 41 20 4C 41 20 51 55 41 4E 54 49 54    URE A LA QUANTIT
02CB00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CB10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CB20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CB30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CB40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CB50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CB60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CB70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CB80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CB90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CBA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CBB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CBC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CBD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CBE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CBF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CC00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CC10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CC20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CC30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CC40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CC50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CC60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CC70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CC80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CC90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CCA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CCB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CCC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CCD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CCE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CCF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CD00:  45 20 4D 49 4E 49 4D 55 4D 2E 0D 0A 0D 0A 09 49    E MINIMUM......I
02CD10:  46 20 53 2E 51 54 45 3A 53 54 4F 43 4B 20 3C 20    F S.QTE:STOCK < 
02CD20:  4D 49 4E 49 3A 53 54 4F 43 4B 0D 0A 09 40 20 32    MINI:STOCK...@ 2
02CD30:  32 2C 30 20 53 41 59 20 22 41 54 54 45 4E 54 49    2,0 SAY "ATTENTI
02CD40:  4F 4E 2C 20 4C 61 20 71 75 61 6E 74 69 74 65 20    ON, La quantite 
02CD50:  65 6E 20 73 74 6F 63 6B 20 65 73 74 20 69 6E 66    en stock est inf
02CD60:  65 72 69 65 75 72 65 20 3B 0D 0A 61 20 6C 61 20    erieure ;..a la 
02CD70:  71 75 61 6E 74 69 74 65 20 6D 69 6E 69 6D 75 6D    quantite minimum
02CD80:  22 0D 0A 0D 0A 09 45 4C 53 45 0D 0A 09 45 4E 44    ".....ELSE...END
02CD90:  49 46 0D 0A 20 20 20 20 20 40 20 32 30 2C 33 35    IF..     @ 20,35
02CDA0:  20 53 41 59 20 22 20 20 20 20 20 20 20 20 20 20     SAY "          
02CDB0:  22 0D 0A 20 20 20 20 20 40 20 32 30 2C 33 35 20    "..     @ 20,35 
02CDC0:  53 41 59 20 53 2E 51 54 45 3A 53 54 4F 43 4B 20    SAY S.QTE:STOCK 
02CDD0:  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                    
02CDE0:  20 20 20 20 20 20 20 0D 0A 20 20 20 20 20 40 20           ..     @ 
02CDF0:  32 30 2C 35 31 20 53 41 59 20 53 2E 50 52 49 58    20,51 SAY S.PRIX
02CE00:  3A 55 48 54 20 20 20 20 20 20 20 20 20 20 20 20    :UHT            
02CE10:  20 20 20 20 20 20 20 20 20 20 20 20 20 0D 0A 20                 .. 
02CE20:  20 20 20 20 53 54 4F 52 45 20 53 2E 50 52 49 58        STORE S.PRIX
02CE30:  3A 55 48 54 20 2A 20 53 2E 51 54 45 3A 53 54 4F    :UHT * S.QTE:STO
02CE40:  43 4B 20 54 4F 20 50 52 49 58 3A 54 48 54 0D 0A    CK TO PRIX:THT..
02CE50:  20 20 20 20 20 40 20 32 30 2C 36 34 20 53 41 59         @ 20,64 SAY
02CE60:  20 50 52 49 58 3A 54 48 54 0D 0A 20 20 20 20 20     PRIX:THT..     
02CE70:  45 4E 44 49 46 0D 0A 45 4E 44 49 46 0D 0A 45 4E    ENDIF..ENDIF..EN
02CE80:  44 44 4F 20 56 49 53 54 4F 43 4B 0D 0A 1A 1A 1A    DDO VISTOCK.....
02CE90:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02CEA0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02CEB0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02CEC0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02CED0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02CEE0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02CEF0:  1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A    ................
02CF00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CF10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CF20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CF30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CF40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CF50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CF60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CF70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CF80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CF90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CFA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CFB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CFC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CFD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CFE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02CFF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D000:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D010:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D020:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D030:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D040:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D050:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D060:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D070:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D080:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D090:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D0A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D0B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D0C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D0D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D0E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D0F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D100:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D110:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D120:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D130:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D140:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D150:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D160:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D170:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D180:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D190:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D1A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D1B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D1C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D1D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D1E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D1F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D200:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D210:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D220:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D230:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D240:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D250:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D260:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D270:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D280:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D290:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D2A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D2B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D2C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D2D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D2E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D2F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D300:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
02D310:  26 00 00 00 02 09 50 E5 26 00 C1 02 00 00 00 02    &.....P.&.......
02D320:  26 00 C6 02 00 00 00 02 26 00 C2 02 00 00 00 02    &.......&.......
02D330:  26 00 C7 02 00 00 00 02 26 00 C3 02 00 00 00 02    &.......&.......
02D340:  26 00 C8 02 00 00 00 02 26 00 C4 02 00 00 00 02    &.......&.......
02D350:  26 00 C9 02 00 00 00 02 26 00 C5 02 00 00 00 02    &.......&.......
02D360:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D370:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D380:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D390:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D3F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02D400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D4A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D4B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D4C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D4D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D4E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D4F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D500:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D510:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D520:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D530:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D540:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D550:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D560:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D570:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D580:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D590:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D5A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D5B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D5C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D5D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D5E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D5F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D600:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D610:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D620:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D630:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D640:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D650:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D660:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D670:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D680:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D690:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D6A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D6B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D6C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D6D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D6E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D6F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D7A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D7B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D7C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D7D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D7E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D7F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D800:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D810:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D820:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D830:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D840:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D850:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D860:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D870:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D880:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D890:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D8A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D8B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D8C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D8D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D8E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D8F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D900:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D910:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D920:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D930:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D940:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D950:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D960:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D970:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D980:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D990:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D9A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D9B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D9C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D9D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D9E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02D9F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DA00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DA10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DA20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DA30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DA40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DA50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DA60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DA70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DA80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DA90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DAA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DAB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DAC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DAD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DAE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DAF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DB00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DB10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DB20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DB30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DB40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DB50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DB60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DB70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DB80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DB90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DBA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DBB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DBC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DBD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DBE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DBF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DC00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DC10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DC20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DC30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DC40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DC50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DC60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DC70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DC80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DC90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DCA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DCB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DCC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DCD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DCE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DCF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DD00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DD10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DD20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DD30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DD40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DD50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DD60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DD70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DD80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DD90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DDA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DDB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DDC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DDD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DDE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DDF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DE00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DE10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DE20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DE30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DE40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DE50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DE60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DE70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DE80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DE90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DEA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DEB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DEC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DED0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DEE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DEF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DF00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DF10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DF20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DF30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DF40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DF50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DF60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DF70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DF80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DF90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DFA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DFB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DFC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DFD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DFE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02DFF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E000:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E010:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E020:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E030:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E040:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E050:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E060:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E070:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E080:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E090:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E0A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E0B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E0C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E0D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E0E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E0F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E100:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E110:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E120:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E130:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E140:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E150:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E160:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E170:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E180:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E190:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E1A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E1B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E1C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E1D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E1E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E1F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E200:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E210:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E220:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E230:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E240:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E250:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E260:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E270:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E280:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E290:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E2A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E2B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E2C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E2D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E2E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E2F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E300:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E310:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E320:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E330:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E340:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E350:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E360:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E370:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E380:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E390:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E3A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E3B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E3C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E3D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E3E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E3F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E4A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E4B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E4C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E4D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E4E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E4F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E500:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E510:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E520:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E530:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E540:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E550:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E560:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E570:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E580:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E590:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E5A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E5B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E5C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E5D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E5E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E5F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E600:  54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 01 00 00    Track-Info......
02E610:  27 00 00 00 02 09 50 E5 27 00 C1 02 00 00 00 02    '.....P.'.......
02E620:  27 00 C6 02 00 00 00 02 27 00 C2 02 00 00 00 02    '.......'.......
02E630:  27 00 C7 02 00 00 00 02 27 00 C3 02 00 00 00 02    '.......'.......
02E640:  27 00 C8 02 00 00 00 02 27 00 C4 02 00 00 00 02    '.......'.......
02E650:  27 00 C9 02 00 00 00 02 27 00 C5 02 00 00 00 02    '.......'.......
02E660:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E670:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E680:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E690:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6A0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6B0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6C0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6D0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6E0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E6F0:  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00    ................
02E700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E7F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E800:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E810:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E820:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E830:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E840:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E850:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E860:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E870:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E880:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E890:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E8F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E900:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E910:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E920:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E930:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E940:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E950:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E960:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E970:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E980:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E990:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E9A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E9B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E9C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E9D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E9E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02E9F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EA00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EA10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EA20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EA30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EA40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EA50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EA60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EA70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EA80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EA90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EAA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EAB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EAC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EAD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EAE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EAF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EB90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EBF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EC90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ECF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ED00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ED10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ED20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ED30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ED40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ED50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ED60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ED70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ED80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02ED90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EDA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EDB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EDC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EDD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EDE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EDF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EE00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EE10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EE20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EE30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EE40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EE50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EE60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EE70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EE80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EE90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EEA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EEB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EEC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EED0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EEE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EEF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EF00:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EF10:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EF20:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EF30:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EF40:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EF50:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EF60:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EF70:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EF80:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EF90:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EFA0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EFB0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EFC0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EFD0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EFE0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02EFF0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F000:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F010:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F020:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F030:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F040:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F050:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F060:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F070:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F080:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F090:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F0A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F0B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F0C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F0D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F0E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F0F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F100:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F110:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F120:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F130:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F140:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F150:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F160:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F170:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F180:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F190:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F1A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F1B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F1C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F1D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F1E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F1F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F200:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F210:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F220:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F230:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F240:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F250:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F260:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F270:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F280:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F290:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F2A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F2B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F2C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F2D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F2E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F2F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F300:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F310:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F320:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F330:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F340:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F350:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F360:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F370:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F380:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F390:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F3F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F400:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F410:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F420:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F430:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F440:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F450:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F460:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F470:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F480:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F490:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F4F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F500:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F510:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F520:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F530:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F540:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F550:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F560:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F570:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F580:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F590:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F5F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F600:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F610:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F620:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F630:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F640:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F650:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F660:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F670:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F680:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F690:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F6F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F700:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F710:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F720:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F730:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F740:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F750:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F760:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F770:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F780:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F790:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F7F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F800:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F810:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F820:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F830:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F840:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F850:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F860:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F870:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F880:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F890:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8A0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8B0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8C0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8D0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8E0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F8F0:  E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5    ................
02F900:  4F 66 66 73 65 74 2D 49 6E 66 6F 0D 0A 00 00 88    Offset-Info.....
02F910:  18 AB 00 30 03 B6 05 39 08 C6 0A 4D 0D CE 0F 51    ...0...9...M...Q
02F920:  12 D9 14 8C 18 AA 00 30 03 B8 05 3E 08 CA 0A 51    .......0...>...Q
02F930:  0D D6 0F 59 12 DE 14 8E 18 A9 00 30 03 B9 05 40    ...Y.......0...@
02F940:  08 CE 0A 56 0D D8 0F 5E 12 E3 14 91 18 AA 00 2F    ...V...^......./
02F950:  03 B6 05 3B 08 C9 0A 53 0D DA 0F 5F 12 E5 14 8C    ...;...S..._....
02F960:  18 A9 00 2D 03 B3 05 37 08 C4 0A 4F 0D D8 0F 5E    ...-...7...O...^
02F970:  12 E3 14 8A 18 AB 00 30 03 B6 05 38 08 C1 0A 49    .......0...8...I
02F980:  0D D1 0F 59 12 E0 14 86 18 A9 00 2D 03 B4 05 35    ...Y.......-...5
02F990:  08 BE 0A 45 0D CD 0F 56 12 DD 14 83 18 AD 00 31    ...E...V.......1
02F9A0:  03 B7 05 3A 08 C3 0A 48 0D CF 0F 54 12 DB 14 81    ...:...H...T....
02F9B0:  18 AC 00 33 03 B9 05 3A 08 C1 0A 46 0D CD 0F 53    ...3...:...F...S
02F9C0:  12 D9 14 7D 18 AA 00 33 03 BA 05 3C 08 C2 0A 46    ...}...3...<...F
02F9D0:  0D CC 0F 53 12 D9 14 7F 18 AB 00 32 03 B9 05 3C    ...S.......2...<
02F9E0:  08 C5 0A 4A 0D D0 0F 56 12 DC 14 83 18 AC 00 35    ...J...V.......5
02F9F0:  03 BE 05 42 08 CB 0A 51 0D D6 0F 5A 12 E0 14 87    ...B...Q...Z....
02FA00:  18 A9 00 2F 03 B5 05 39 08 C1 0A 48 0D CF 0F 59    .../...9...H...Y
02FA10:  12 E2 14 85 18 A8 00 2D 03 B1 05 34 08 BF 0A 45    .......-...4...E
02FA20:  0D C9 0F 51 12 DA 14 7E 18 A8 00 2D 03 B2 05 36    ...Q...~...-...6
02FA30:  08 BF 0A 42 0D C5 0F 4A 12 D2 14 79 18 A9 00 2D    ...B...J...y...-
02FA40:  03 B0 05 32 08 BB 0A 3D 0D BE 0F 43 12 CA 14 75    ...2...=...C...u
02FA50:  18 A6 00 2C 03 B3 05 36 08 BE 0A 40 0D C1 0F 43    ...,...6...@...C
02FA60:  12 CA 14 7B 18 A6 00 2B 03 B0 05 34 08 BD 0A 40    ...{...+...4...@
02FA70:  0D C0 0F 44 12 CC 14 76 18 A5 00 2A 03 AE 05 30    ...D...v...*...0
02FA80:  08 B8 0A 3A 0D BA 0F 3C 12 C5 14 6F 18 A5 00 2A    ...:...<...o...*
02FA90:  03 B0 05 33 08 BA 0A 3D 0D BE 0F 3D 12 C4 14 72    ...3...=...=...r
02FAA0:  18 A6 00 2C 03 B2 05 38 08 BF 0A 41 0D C0 0F 41    ...,...8...A...A
02FAB0:  12 C9 14 73 18 A7 00 2E 03 B5 05 39 08 C2 0A 47    ...s.......9...G
02FAC0:  0D C5 0F 45 12 CD 14 7B 18 A6 00 2F 03 B6 05 3B    ...E...{.../...;
02FAD0:  08 C4 0A 48 0D C9 0F 4C 12 D4 14 7F 18 A6 00 2D    ...H...L.......-
02FAE0:  03 B6 05 3C 08 C8 0A 4E 0D CF 0F 52 12 DB 14 82    ...<...N...R....
02FAF0:  18 A6 00 2D 03 B4 05 39 08 C5 0A 4C 0D CE 0F 52    ...-...9...L...R
02FB00:  12 DB 14 80 18 A6 00 2B 03 B0 05 32 08 BD 0A 48    .......+...2...H
02FB10:  0D CA 0F 50 12 DA 14 7D 18 A5 00 2A 03 AF 05 31    ...P...}...*...1
02FB20:  08 BC 0A 43 0D C6 0F 4C 12 D6 14 7A 18 A7 00 2C    ...C...L...z...,
02FB30:  03 B0 05 30 08 BA 0A 3F 0D C1 0F 46 12 D1 14 74    ...0...?...F...t
02FB40:  18 A6 00 2A 03 AE 05 2E 08 BA 0A 3E 0D C0 0F 44    ...*.......>...D
02FB50:  12 CB 14 71 18 A1 00 28 03 AB 05 2C 08 B6 0A 3C    ...q...(...,...<
02FB60:  0D BD 0F 41 12 C5 14 6F 18 A4 00 2B 03 B0 05 32    ...A...o...+...2
02FB70:  08 BE 0A 43 0D C2 0F 46 12 C8 14 73 18 A7 00 2D    ...C...F...s...-
02FB80:  03 B2 05 34 08 C1 0A 47 0D C6 0F 48 12 CB 14 76    ...4...G...H...v
02FB90:  18 A7 00 2C 03 B2 05 34 08 C1 0A 4A 0D CC 0F 4F    ...,...4...J...O
02FBA0:  12 CF 14 78 18 A7 00 2E 03 B5 05 39 08 C5 0A 4D    ...x.......9...M
02FBB0:  0D CD 0F 51 12 D1 14 7B 18 A5 00 28 03 AC 05 31    ...Q...{...(...1
02FBC0:  08 BD 0A 47 0D C8 0F 4C 12 CF 14 76 18 A5 00 27    ...G...L...v...'
02FBD0:  03 A9 05 2B 08 B9 0A 45 0D C8 0F 4D 12 CF 14 76    ...+...E...M...v
02FBE0:  18 A6 00 29 03 AB 05 2C 08 B7 0A 42 0D C4 0F 46    ...)...,...B...F
02FBF0:  12 CB 14 6E 18 A4 00 26 03 A9 05 2A 08 B3 0A 3C    ...n...&...*...<
02FC00:  0D BC 0F 3F 12 C6 14 6C 18 A5 00 26 03 A7 05 28    ...?...l...&...(
02FC10:  08 B0 0A 39 0D BA 0F 3B 12 C0 14 6A 18 A4 00 28    ...9...;...j...(
02FC20:  03 AB 05 2B 08 B3 0A 3D 0D BB 0F 3B 12 C0 14 35    ...+...=...;...5
02FC30:  0C 35 0C                                           .5.
RESULT OF SEARCH :
PRO=8   CHEA=0   COD=0   MUSI=0   COP=10   GRA=0   WRIT=0   198=4   199=0   STARTER=0   KBI=0   CAAV=0   L.TOURNIER=0  
EXTENDED CPC DSK File    SAMdisk120417*  P           AJDA    CMD&AJSTOCK CMD CDE
DA   CMD CHEQUE  MEMCHQMENU CMDCREA-CREFMTCREDIT  CMDCREDIT  DBFDA      DBFLDA  
    NDX !DADATE  FRM"DASCR   CMD#$%DATE-CRENDX&DATE-DEBNDX'SE SECONDAIRE  SELECT
 SECONDARY  USE DA INDEX DA  STORE 'O' TO CONTAJ  DO WHILE CONTAJ  'O'  CLEAR GE
TS  SELECT SECONDARY  STORE '          ' TO MDANUM  STORE '              ' TO MP
IECE  * EFFACEMENT DES DIFFERENTES ZONES DE SAISIE A L'ECRAN   5,27 SAY  '      
    '    7,11 SAY  '                           '   8,45 SAY  '                 '
    9,11 SAY  '        '    14,2 SAY '                                          
'   14,46 SAY '                         '   18,1 SAY  '            '    18,14 SA
YDBASEOVRCOM()*+,-./01234567DBASEOVRCOM89ABCDEFGDBASEOVRCOMHIJKLMNODEBIT   CMD7P
QRSTUVDEBIT   DBFWEFFA-CREFMTXEMETDA  FRMYENTSORT CMD3ZETAT    CMD/abcdefETATMIN
IFRMgINITIAL CMDhijkMENU2   CMDlmnMODI-CREFMToMODIFDA CMD/pqrstuMODISTOCCMD*vwxy
zNUMERO  NDX '              '    18,31 SAY '                                  ' 
   18,67 SAY '            '    20,13 SAY '                           '    20,71 
SAY '     '   22,0 SAY '                                                        
               '  * SAISIE DU NUMERO DE LA DEMANDE D'ACHAT   5,10 GET MDANUM  RE
AD  * SI AUCUN NUMERO N'EST SAISIE - RETOUR AU MENU TRAITEMENT DES D.A.  IF MDAN
UM  ' '  SET EXACT OFF  RELEASE MDANUM,MDADATE,MTYPE,MEMETTEUR,MSECTION,MFOURNI,
MPIECE  RELEASE MQTECMD,MIMPUTPIECE   NDXREDA    CMDRESTOCK CMD"SELECTDAFRMSELES
TOCFRMSTOCK   DBFPSTOCKSCRCMDTRADA   CMDTRASTOCKCMD)VISDA   CMD£VISTOCK CMDATIO,
MDELAI,MPRIXUHT  RETURN  ELSE  * RECHERCHE L'EXISTENCE DE LA DEMANDE D'ACHAT SAI
SIE DANS LA BASE SECONDAIRE  * BASE SECONDAIRE  BASE DA  SELECT SECONDARY  FIND 
&MDANUM  IF #  0   22,0 SAY 'La D.A. '   22,9 SAY MDANUM   22,21 SAY ' est deja 
enregistree, VALIDEZ'  SET CONSOLE OFF  WAIT  SET CONSOLE ON          ELSE      
                                  * SI LA DEMANDE D'ACHAT N'EXISTE PAS DEJA - SA
ISIE DE LA REFERENCE  * DE LA PIECE A COMMANDER   STORE '            ' TO MPIECE
           18,14 GET MPIECE                          READ  * RECHERCHE L'EXISTEN
CE DE LA REFERENCE SAISIE DANS LA BASE PRIMAIRE  * BASE PRIMAIRE  BASE STOCK  SE
LECT PRIMARY  FIND &MPIECE  IF #  0   22,0 SAY "La piece "   22, 9 SAY MPIECE   
22,21 SAY " n'a pas ete enregistree, enregistrez la,   S.V.P."  SET CONSOLE OFF 
 WAIT  SET CONSOLE ON  ELSE  * SI CETTE REFERENCE EXISTE - SAISIE DES AUTRES PAR
AMETRES  STORE '        ' TO MDADATE  STORE '               ' TO MTYPE  STORE ' 
        ************* CREATION DE NOUVEAUX ENREGISTREMENTS **************  * CE 
FICHIER DE COMMANDE VOUS PERMETTRA DE CREER DE NOUVELLE(S) *  * DEMANDE(S) D'ACH
AT - DANS LA MESURE  OU  ELLE(S) N'EXISTE(NT) *  * PAS - ET DE METTRE A JOUR  SI
MULTANEMENT  L'ENREGISTREMENT DE *  * LA PIECE CONCERNEE DANS LE FICHIER STOCK. 
                    *  *********************************************************
********    SET EXACT ON  * DEFINITION DE LA BASE PRIMAIRE  SELECT PRIMARY  USE 
STOCK INDEX PIECE  * DEFINITION DE LA BA  P                ' TO MEMETTEUR  STORE
 '     ' TO MSECTION  STORE '                                        ' TO MFOURN
I  STORE 0 TO MQTECMD  STORE '                         ' TO MIMPUTATIO  STORE '0
0' TO MDELAI          STORE PRIXUHT TO MPRIXUHT                   5,27 GET MDADA
TE PICTURE "99/99/99"                   7,11 GET MEMETTEUR                      
     9,11 GET MSECTION                            8,45 GET MTYPE                
               14,2 GET MFOURNI                       ***************** CREATION
 DE NOUVEAUX ENREGISTREMENTS *****************  * OUVERTURE DE LA BASE DE DONNEE
S DES PIECES EN STOCK. NOUS  UTILISONS *  * UN FICHIER INDEX  "PIECE". CE FICHIE
R CONTIENT TOUS LES NUMEROS  DE *  * REFERENCE ORGANISES DANS L'ORDRE CROISSANT 
AINSI QUE LA POSITION  DE *  * L'ENREGISTREMENT CORRESPONDANT DANS LE FICHIER PR
INCIPAL. CE FICHIER *  * SERA MIS A JOUR AUTOMATIQUEMENT LORS DE L'AJOUT DE NOUV
EAUX ENREGIS- *  * TREMENTS.                                                    
           14,46 SAY MACHINE                           18,1 GET MQTECMD         
                   18,31 SAY LIBELLE                           18,67 GET MPRIXUH
T                          20,13 GET MIMPUTATIO                         20,72 GE
T MDELAI PICTURE "99"                  READ                                     
              * MISE A JOUR DE LA REFERENCE CONCERNEE DANS LA BASE PRIMAIRE  * B
ASE PRIMAIRE  BASE DU STOCK DES PIECES DETACHEES                  REPLACE DANUM 
WITH MDANUM                  *  ************************************************
************************    SET EXACT ON  USE STOCK INDEX PIECE  STORE 'O' TO CO
NTAJ  DO WHILE CONTAJ  'O'  STORE '            ' TO MPIECE  * EFFACEMENT DES DIF
FERENTES ZONES DE SAISIE A L'ECRAN   6,13 SAY  '       '    6,31 SAY  '       ' 
   6,47 SAY  '                          '    8,17 SAY  '                        
            '    16,50 SAY '             '   20,3  SAY '            '    20,35 S
AY '            '    20,48 SAY '            '                                REP
LACE QTECMD WITH MQTECMD                          REPLACE QTERESTE WITH P.QTERES
TE + MQTECMD                   REPLACE PRIXUHT WITH MPRIXUHT                    
    * ENREGISTREMENT DE LA DEMANDE D'ACHAT DANS LA BASE SECONDAIRE  * BASE SECON
DAIRE  BASE DES DEMANDES D'ACHAT  SELECT SECONDARY  APPEND BLANK                
  REPLACE DANUM WITH MDANUM                                            REPLACE D
ADATE WITH MDADATE                                          RE 20,61 SAY '      
           '   * SAISIE DU NUMERO DE REFERENCE   10,11 GET MPIECE  READ  CLEAR G
ETS  * SI AUCUN NUMERO DE REFERENCE N'EST SAISIE,  FIN DE SAISIE  IF MPIECE  ' '
  RELEASE MPIECE,MATELIER,MSECTION,MMACHINE,MLIBELLE  RELEASE MQTERESTE,MQTESTOC
K,MPRIXUHT,MPRIXTHT  SET EXACT OFF  RETURN  ELSE  * RECHERCHE DE L'EXISTENCE DU 
NUMERO DE REFERENCE SAISIE DANS LE FICHIER    FIND &MPIECE  * SI CETTE REFERENCE
 EXISTE LA VARIABLE INTERNE  '#', CONTENANT LE NUMERO  * DE L'ENREGISTREMENT EN 
COURPLACE EMETTEUR WITH MEMETTEUR                                        REPLACE
 SECTION WITH MSECTION                                          REPLACE TYPE WIT
H MTYPE                                                REPLACE FOURNI WITH MFOUR
NI                                            REPLACE QTECMD WITH MQTECMD       
                                   REPLACE PIECE WITH MPIECE                    
                          REPLACE PRIXUHT WITH MPRIXUHT                         
               REPLACE IMPUTATIOS SERA DIFFERENTE DE ZERO    IF #  0     22,0 SA
Y 'La piece '     22,9 SAY MPIECE     22,21 SAY ' est deja enregistree, VALIDEZ'
    SET CONSOLE OFF    WAIT    SET CONSOLE ON     22,0 SAY '                    
                                         '     ELSE  * SI CETTE REFERENCE N'EXIS
TE PAS -- SAISIE DES DIFFERENTS PARAMETRES    STORE '     ' TO MATELIER         
                               STORE '     ' TO MSECTION                        
                STORE '                        ' TO MMACHIN WITH MIMPUTATIO     
                                REPLACE DELAI WITH VAL(MDELAI)  REPLACE CMDDATE 
WITH "  /  /  "          ENDIF                                                  
ENDIF  ENDIF                  ENDDO AJDA   SECONDAIRE  * BASE SECONDAIRE  BASE D
ES DEMANDES D'ACHAT  SELECT SECONDARY  APPEND BLANK                  REPLACE DAN
UM WITH MDANUM                                            REPLACE DADATE WITH MD
ADATE                                          RE  PNE                     STORE
 '                                  ' TO MLIBELLE           STORE 0 TO MQTERESTE
      STORE 0 TO MQTESTOCK      STORE 0.00 TO MPRIXUHT    STORE 0 TO MMINISTOC  
     6,13 GET MATELIER         6,31 GET MSECTION                                
        6,47 GET MMACHINE                                        8,17 GET MLIBEL
LE                                        16,51 GET MQTERESTE                   
                  20,3  GET MMINISTOC                                   ,11 SAY 
'                           '    9,11 SAY '       '    5,47 SAY '              '
    5,66 SAY '          '    8,45 SAY '                 '    14,2 SAY '         
                                 '    14,46 SAY '                           '   
 18,1 SAY '            '    18,14 SAY '              '    18,31 SAY '           
                        '   18,67 SAY '            '    20,13 SAY '             
              '    20,71 SAY '    '   STORE '          ' TO MDANUM   5,10 GET MD
ANUM  REA 20,35 GET MQTESTOCK                                     20,48 GET MPRI
XUHT                                     READ    CLEAR GETS                     
                               * CALCUL DU MONTANT TOTAL DU STOCK POUR CETTE PIE
CE    STORE MPRIXUHT * MQTESTOCK TO MPRIXTHT     20,67 SAY MPRIXTHT  * ENREGISTR
EMENT DES INFORMATIONS SAISIES    APPEND BLANK     REPLACE ATELIER WITH MATELIER
                             REPLACE SECTION WITH MSECTION                      
       REPLACE MACHINE WITH MMACD  IF MDANUM  ' '  SET EXACT OFF  RELEASE MDANUM
,MCMDNUM,MCMDDATE,CONTCDE  RETURN  ELSE  FIND &MDANUM  IF #  0   22,0 SAY 'La D.
A. '   22,9 SAY MDANUM   22,21 SAY " n'a pas ete enregistree, VALIDEZ"  SET CONS
OLE OFF  WAIT  SET CONSOLE ON  ELSE                                             
      STORE "            " TO MCMDNUM                                   STORE " 
       " TO MCMDDATE                                                5,27 SAY DAD
ATE                                   HINE                             REPLACE L
IBELLE WITH MLIBELLE                             REPLACE PIECE WITH MPIECE      
                           REPLACE QTERESTE WITH MQTERESTE                      
   REPLACE QTESTOCK WITH MQTESTOCK                         REPLACE PRIXUHT WITH 
MPRIXUHT                           REPLACE MINISTOCK WITH MMINISTOC             
          ENDIF                                                   ENDIF  ENDDO A
JSTOCK                         7,11 SAY EMETTEUR                                
                         9,11 SAY SECTION                                       
                   8,45 SAY TYPE                                                
             14,2 SAY FOURNI                                                    
       14,46 SAY MACHINE                                                        
 18,1 SAY QTECMD                                                  18,16 SAY PIEC
E           18,31 SAY LIBELLE                                                   
      18,69 SAY PRIXUHT                                                        2
0,13 SAY IMPUTATION                                                      20,71 S
AY DELAI                                                  IF CMDNUM # " "   5,47
 SAY CMDNUM    5,66 SAY CMDDATE   22,0 SAY "Il existe deja un numero de commande
 pour   la demande d'achat "   22,62 SAY DANUM  SET CONSOLE OFF  WAIT  SET CONSO
LE ON   22,0 SAY '            ******************* SAISIE DE NUMERO(S) DE COMMAND
E *****************  * CE FICHIER VOUS PERMETTRA DE SAISIR LE NUMERO DE COMMANDE
 RELATIF *  * A UNE DEMANDE D'ACHAT                                             
*  *********************************************************************    SET 
EXACT ON  SELECT PRIMARY  USE STOCK INDEX PIECE  SELECT SECONDARY  USE DA INDEX 
DA  STORE 'O' TO CONTCDE  DO WHILE CONTCDE  'O'  CLEAR GETS  SELECT SECONDARY   
5,27 SAY '          '                                     7  P                  
                                                '  ELSE  SELECT PRIMARY  STORE S
.PIECE TO RECHERCHE  FIND &RECHERCHE  IF #  0   22,0 SAY "La piece"   22,9 SAY S
.PIECE   22,20 SAY "ne figure plus dans le fichier,   enregistrez la,"   22,68 S
AY "Validez"  SET CONSOLE OFF  WAIT  SET CONSOLE ON   22,0 SAY "                
                                                               "  ELSE          
            5,47 GET MCMDNUM                set talk off  restore from cheque  d
o while t  erase     5,0 say "                   GESTION DE COMPTE BANCAIRE"   7
,0 say "        dernier cheque emis            Solde              F"   $,30 say 
chqder   $,49 say chqsolde   9,0  say"        (D)ebit"     11,0 say"        (C)r
edit"     13,0 say"        (G)eneration d'etat"     15,0 say"        (R)etour au
 syteme"  wait to reponse  do case  case !(reponse)"D"  do debit  case !(reponse
)"C"  do credit  case !(reponse)"G"  do etat  case !(reponse)                   
                           5,66 GET MCMDDATE PICTURE "99/99/99"                 
         READ                                                    SELECT SECONDAR
Y                          REPLACE CMDNUM WITH MCMDNUM                          
                         REPLACE CMDDATE WITH MCMDDATE                         E
NDIF  ENDIF  ENDIF  ENDIF                  ENDDO SAISIE NUMERO DE COMMANDE  "R" 
 save to cheque all like chq*  release all  quit  otherwise   chr(7)   "votre se
lection doit etre D, C, G ou R"  store 0 to tempo  do while tempo#50  store temp
o+1 to tempo  enddo tempo  release tempo  endcase  enddo cheque    enregistrez l
a,"   22,68 SAY "Validez"  SET CONSOLE OFF  WAIT  SET CONSOLE ON   22,0 SAY "   
                                                                            "  E
LSE                      5,47 GET MCMDNUM                 2,0 say "             
     CREATION D'UN NOUVEAU CREDIT"   4,0 say "date  " get datecre picture "99/99
/99"   $,20 say "crediteur  " get crediteur   7,0 say "commentaire  " get comcre
   7,50 say "montant             F"   7,60 get montcre   15,0 say "champ        
  suivant    X   precedent E"   16,0 say "caractere      suivant    D   preceden
t S"   17,0 say "fin creation   return pour la date"  (O/N)  "  set console off 
 wait to eff  set console on        if !(eff)"O"        storCHQDERd0000000CHQSOL
DE dFEES '               21,10 SAY 'LAST 12 DEPOSITS LISTED HERE '              
USE DEPOSITS              GO BOTTOM              SKIP -11              LIST OFF 
NEXT 12 DATE,'$',STR(AMT,8,2),PAIDFROM          ENDCASE          RELEASE BANKBAL
, OUTSTAND          USE                     '          ready to return to main m
enu '          WAIT         * NO VARIABLES PASSED BACK TO CHXMENU.CMD      *  - 
non-valid entry to the menu and ring bell      OTHERWISE           Pdo while t  
use credit  go bottom  store # to enrgder  set index to date-cre  erase   2,0 sa
y "                       *** C R E D I T ***"   5,0 say "        (C)reation"   
7,0 say "        (M)odification et consultation"   9,0 say "        (E)ffacement
"   11,0 say "        (R)etour au menu initial"  wait to rep  do case  *creation
  case !(rep)"C"  set format to crea-cre  appe  set format to  set index to  go 
bottom  store # to dernier  if enrgder0  sum montcre to vircre  store chqsolde+v
ircre tstore 0 to tempo  do while tempo#50  store tempo+1 to tempo  enddo tempo 
 release tempo  endif      case !(rep)"R"  release rep  use  return  otherwise  
 chr(7)   "votre selection doit etre C, M, E ou R"  store 0 to tempo  do while t
empo#50  store tempo+1 to tempo  enddo tempo  release tempo  endcase  enddo cred
itnt ou (F)in "  set console off  wait to oui  set console on      if !(oui)"E" 
  20,0 say "Voulez-vous vraiment l'effacer (O/N)  "  set console off  wait to ef
f  set console on        if !(eo chqsolde  else  go enrgder  if dernier # enrgde
r  skip  store str(dernier-enrgder,5) to nombre  sum montcre next &nombre to vir
cre  store vircre+chqsolde to chqsolde  endif  endif  release dernier,nombre,vir
cre  set index to date-cre    *modification  case !(rep)"M"  store "        " to
 daterec   18,0 say "Donnez la date de recherche " get daterec picture "99/99/99
"  read  store $(daterec,7,2)+$(daterec,4,2)+$(daterec,1,2) to daterec  find &da
terec  if ##0  set format to modi-cre  edit EDATECRECpCREDITEURCpCOMCRECpMONTCRE
N p #  set format to  else   19,0 say "aucun credit n'a ete effectue a cette dat
e"  store 0 to tempo  do while tempo#50  store tempo+1 to tempo  enddo tempo  re
lease tempo  release daterec  endif    *effacement  case !(rep)"E"  store "     
   " to daterec   18,0 say "Donnez la date de recherche " get daterec picture "9
9/99/99"  read  store $(daterec,7,2)+$(daterec,4,2)+$(daterec,1,2) to daterec  f
ind &daterec  if ##0  store 0 to montdet  set format to effa-cre  store "S" to o
ui   store "N" to modif d0000000CHQSOLDE dFEES '               21,10 SAY 'LAST 1
2 DEPOSITS LISTED HERE '              USE DEPOSITS              GO BOTTOM       
       SKIP -11              LIST OFF NEXT 12 DATE,'$',STR(AMT,8,2),PAIDFROM    
      ENDCASE          RELEASE BANKBAL, OUTSTAND          USE                   
  '          ready to return to main menu '          WAIT         * NO VARIABLES
 PASSED BACK TO CHXMENU.CMD      *  - non-valid entry to the menu and ring bell 
     OTHERWISE           do while !(oui)#"F"   store "S" to oui  read  if *   20
,0 say "cet enregistrement a ete repere pour effacement.   Rappel (O/N) "  set c
onsole off  wait to rappel  set console on   20,0   if !(rappel)"O"   recall   s
tore montdet-montcre to montdet   endif  endif   17,0 say "(E)ffacement , (S)uiv
ant, (P)recedent ou (F)in "  set console off  wait to oui  set console on      i
f !(oui)"E" .and. .not. *   20,0 say "Voulez-vous vraiment l'effacer (O/N)  "  s
et console off  wait to eff  set console onDANUMC rDADATECrCMDNUMCrCMDDATECrTYPE
CrEMETTEURCrSECTIONCsFOURNIC(sPIECECsQTECMDNIsIMPUTATIONCNsDELAINgsPRIXUHTNis   
      if !(eff)"O"        store "O" to modif        store montdet+montcre to mon
tdet        delete        skip        endif      release eff      endif    if !(
oui)"S"    skip    endif    if !(oui)"P"    skip -1    endif   enddo oui  set fo
rmat to    if modif"O"    erase         "prise en compte des modification ..."  
  store chqsolde-montdet to chqsolde    release montdet    set index to date-cre
    pack    endif  release modif  else   19,0 say "aucun credit n'a ete effectue
 a cette date"    H 987654321923/02/83              /  /  REGULARISATION DUPONT 
                  02145MECANOUTIL                              123456789123   10
ATELIER 2451             15     2.50 987654321822/02/83              /  /  MAINT
ENANCE    DURAND                   02145MECANOUTIL                              
123456789124    5ATELIER 2143             20     2.75 987654321715/02/83        
      /  /  REGULARISATION DURAND                   02143MECANOUTIL             
                 123456789125    4ATELIER       02145                           
             1254                                             1.75*3213214      
                                                                 02652          
                              210183                                           3
.10*2145                                                                        
  03253                                        253                              
              251.25*987654654                                            L(MDEL
AI)DELAI 15     7.50 987654321614/02/83              /  /  MAINTENANCE    DURAND
                   02147SCOPEX                                  123456789129    
5ATELIER 124              20     2.00987654321614/02/83              /  /  MAINT
ENANCE    DURAND                   02147SCOPEX                                  
123456789129    5ATELIER 124              20     2.00123123123323/03/83         
     /  /  REGULARISATION DUPOND                   02145SCOPEX                  
                123123                         02145                            
            987987654654                                     3.00               
                                                               01254            
                            110183                                           2.5
3 3213214                                                                       
02652                                        210183                             
              3.10 2145                              L(MDELAI)DELAIER           
       10    10.00*1245        /  /                                             
                                                              123123123321   20 
                         0    10.00*TEST      23/03/83              /  /  TEST  
         ROCHEREAU                01234LCE                                     1
23123123123   10ATELIER SAV              26     5.00123123                      
                                                  04258                         
                                              03253                             
           253                                            251.25 987654654      
                                                               02145            
                            987987654654                                     3.0
0123       161282                      REGULARISATION MARTIN                   0
2145FREIN                                   12345678912     525424              
      45    15.00*123452    23128             789456123456                      
             700.00*125365                                                      
                  02154                                        123123123123     
                              452.25*785469                                     
                                   01254                                        
456434523984                                   152.00*123456      /  /          
      /  /                                          02145        2  123456      
010183  REGULARISATION MASSIOU                  02145FACOM                      
             1254           153254534                  52     1.75*4563211   030
183  123456      010283  REGU           DURAND                   02145DUPONT    
                              4563211         2622515                   10   450
.00*987654    030183                                     DUPONT                 
  21054DURAND                                  123231          5561561          
          5   325                                456456          0              
            0   300.00*4561231232                                               
                     04258                                        456123123123  
                                 500.00*123                                     
                                      02153                                     
   12345678912                                     15.00*123452                 
                                                   H.00*1234563   110183        
                             durand                   nbvnbvcbbvnvnbnm          
                   120183          5jhmgjhj                  45     3.50*3213214
   120183                      REGULARISATION DURAND                   02145DUPO
ND                                  210183          5JHGJHG                   12
     3.10*156321    180183  525636      200183                 DURAND           
        02156FACOM                                   180183          5ATELIER 15
4                                                123456          0              
            0     3.00*17        22/22/22                                   2   
                                                                  123456        
  0                          0     5.00*18          /  /                        
                                                                                
   123456          0                          0     6.00*654655    25/01/8369358
2      29/01/83MAINTENANCE    ROCHER           12    16.50*2145      22/01/     
           /  /                                                                 
                      253             0                          0   251.25*22  
        /  /                /  /                                                
                                       123456          0                        
  0     3.00*2541      22/01/                                                   
                                                        123456      MDELAI)DELAI
     02135FACOM                                   456123          2ATELIER 125  
            10   525.25*147258    21/01/83258741      29/01/83MAINTENANCE    ROC
HEREAU                02563SCOPEX                                  123456       
   1ATELIER 124              12   245.25*1         26/01/83              /  /   
              ROCHEREAU                02536SCOPEX                              
    123456         20                         10   300.00*2         25/01/83    
          /  /        0                          2     3.00*2563        /  /    
                                                                                
                       123456          0                          0     3.00*258
3      22/01/                                                                   
                                        123456          0                       
   0     3.00*2587      22/22/                                                  
                                                               ROCHEREAU        
                                                     5252           15          
               12   250.00*1254      25/01/835241        25/01/83               
uyggyugvy                     hgyugbu                                 180183    
     10                         20    25.00*987654654 16/02/83123456      20/02/
83REGULARISATION DUPONT                   02145FACOM                            
       987987654654   50ATELIER 125              20     3.00*123457    21/02/83 
         123456          0                          0     3.00*25          /  / 
                                                                                
                          11              0                          0     0.00*
25412       /  /                                                                
                                           11              0                    
      0     0.00*112         /  /                                               
                                                   NMI            UHNUHN        
           IUJNI                                        123456         25       
                  15   300.00.000 SAY "La piece "   22, 9 SAY MPIECE   22,21 SAY
 " n'a pas ete enregistree, enregistree la, S.V.P."  WAIT  STORE '              
 ' TO MPIECE   18,14 SAY MPIECE  ELSE  STORE '        ' TO MDADATE  STORE '     
          ' TO MTYPE  STORE '                         ' TO MEMETTEUR  STORE '   
  ' TO MSECTION  STORE '                                       11              0
                          0     0.00*125       22/01/8325463521458525/01/83AAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
12              1                          2   450.00*14        25/01/83        
                                                                                
                 14              0                          0    25.00*26       
 22/55/6625                                                            GW50,M2  
Y  ETAT DES DEMANDES D'ACHAT EMISES DANS UNE PERIODE DONNEE  N  Y  N  10,DANUM  
NUMERO  11,DADATE  DATE EMIS.  6,QTECMD  QTE.  N  10,PRIXUHT  PRIX UHT  N  12,QT
ECMD * PRIXUHT  PRIX THT  Y  62531    532652    543251    545545    545546    64
2351    654321    685231    785469    987$DANUMMERO DE LA DEMANDE D'ACHAT   5,10
 GET MDANUM  READ  * SI AUCUN NUMERO N'EST SAISIE - RETOU98765432169876543217987
654321898765432199876543219TEST      TEST      TEST      3213214    456123123254
21256   545545    5532652   5543251   5642351   5685231   785469    987654654   
 345678912345456123123123 456434523984456456      789456123456987987654654$1254 
       -125423      412543       98765432169876543217987654321898765432197891251
2345678912612345678912712345678912912345678914712345678914721256   545545    553
2652   5543251   5642351   5685231   785469    987654654    34567891234545612312
3123 456434523984456456      789456123456987987654654$1254        -125423      4
12543       31254855     ,180183      *21          )210183      /2154        222
22222222223456789123ERASE    1, 0 SAY "                                         
                +---------------------+"    2, 0 SAY "                          
                               I Mode               I"    2,66 SAY MODEDA    3, 
0 SAY "+-------------------------------------+------------------+---------------
------+"    4, 0 SAY "I                                     I                   
                     I"    5, 0 SAY "I No D.A.             DATE            I No 
CDE               DATE              I"    6,421256    421423     425433    45213
5     452315    456123    456131    4563211   462531    532652    543251    5455
45    545546    642351    654321    ,654655    685231    785469    987654    198
7654654 421423     425433    452135     452315    456123    456131    4563211   
462531    532652    543251    545545    545546    642351    654321    685231    
785469    987 0 SAY "I                                     I                    
                    I"    7, 0 SAY "I Emetteur                            I     
                                   I"    8, 0 SAY "I                            
         I Type                                   I"    9, 0 SAY "I Service     
                        I                                        I"   10, 0 SAY 
"I                                     I                                        
I"   11, 0 SAY "+-----------------------3213214   421423     425433    452135   
  452315    456123    456131    4563211   462531    532652    543251    545545  
  545546    642351    654321    685231    785469    987654    3213214   421256  
  421423     425433    452135     452315    456123    456131    4563211   462531
    532652    543251    545545    545546    642351    654321    685231    785469
    987  G--------------+-----+----------------------------------+"   12, 0 SAY 
"I             FOURNISSEUR                   I           MACHINE                
I"   13, 0 SAY "+-------------------------------------------+-------------------
---------------+"   14, 0 SAY "I                                           I    
                              I"   15, 0 SAY "+------------+---------------+----
----------+---------------------+------------+"   16, 0 SAY "I  Qte Cde   I   Re
ference   I          Designation     8306298307318308208308208309038309038309038
30907830915840101 830815830815830815830815830815830815830815830815      -    232
-3232 12/31/80  /  /  fot1234.0001234.000bal  14,10 SAY "Hire date"             
14,28 GET Meadate PICTURE '99/99/99'            READ            STORE T TO Meano
date          ENDIF        ENDDO        SET colon OFF         22,0 SAY "Is the e
mployee data correct (Y/N) " GET Meaok        READ        SET colon           I 
Prix UHT   I"   17, 0 SAY "+------------+---------------+-----------------------
-------------+------------+"   18, 0 SAY "I            I               I        
                            I            I"   19, 0 SAY "+------------+---------
------+------------------------------------+------------+"   20, 0 SAY "I Imputa
tion                                             Delai semaine         I"   21, 
0 SAY "+------------------------------------------------------------------------
------+"  RETUR 2$(datedeb,7,2)+$(datedeb,4,2)+$(datedeb,1,2) mcomdeb  store mon
tdeb to mmontdeb  else  append83062983073183082083082083090383090383090383090783
0915840101 830815830815830815830815830815830815830815830815      -    232-3232 1
2/31/80  /  /  fot1234.0001234.000bal  14,10 SAY "Hire date"             14,28 G
ET Meadate PICTURE '99/99/99'            READ            STORE T TO Meanodate   
       ENDIF        ENDDO        SNMACHINE                I"   13, 0 SAY "+-----
--------------------------------------+----------------------------------+"   14
, 0 SAY "I                                           I                          
        I"   15, 0 SAY "+------------+---------------+--------------+-----------
----------+------------+"   16, 0 SAY "I  Qte Cde   I   Reference   I          D
esignation     123456713620621362063136206413620651362066136206713620681362069 1
36207013620711362072136207313620741362075136207613620771362078136207913620801362
08113620821362083!1362084"1362085#1362086 99999999999999999999999999999999999999
999999999999999999 9999999$9999999  SET colon OFF         22,0 SAY "Is the emplo
yee data correct (Y/N) " GET Meaok        READ        SET colon  Mb o y!7#fo!0I!
0IW2*7*9Iw**#w **#IdBASE II COPYRIGHT (C) 1982 BY RATLIFF SOFTWARE PRODUCTION, I
NCORPORATED (RSP, INC.) 2705 RIDGEPINE DR, LA CRESCENTA, CA 91214  ***  dBASE II
 LCE Ver 2.  *** CE FICHIER EST DEJA OUVERT ACCES IMPOSSIBLE *** 2$(datecre,7,2)
+$(datecre,4,2)+$(datecre,1,2)t the hire date for validity        STORE hiredate
 T$136206113620621362063136206413620651362066136206713620681362069 1362070136207
11362072136207313620741362075136207613620771362078136207913620801362081136208213
62083!1362084"1362085#1362086 99999999999999999999999999999999999999999999999999
999999 9999999$9999999  S  G  *** CE FICHIER N'EXISTE PAS ***  *** ERREUR INTERN
E  CONTACTEZ VOTRE FOURNISSEUR ***  *** FICHIER EN COURS D'UTILISATION ***  *** 
FIN DE FICHIER INATTENDUE ***  *** ENREGISTREMENT NON SITUE ***  *** TROP DE FIC
HIERS SONT OUVERTS ***  *** DEPASSEMENT DE LA CAPACITE DU DISQUE ***  *** DEPASS
EMENT DU NOMBRE MAXIMUM DE FICHIERS SUR DISQUE ***  ORIGINE DE L'ERREUR    *** D
ESIREZ-VOUS CORRIGER ET RECOMMENCER (Y/N)    *** LE FICHIER A ETE EFFACE  ***  *
** NUMERO D'ENREGISTREMENT INCORRECT ***  *** ERREUR DE SYNTAXE  VEUILLEZ  CORRI
GER ***  *** FICHIER VIDE  INSERTION IMPOSSIBLE ***  *** FIN DE FICHIER ***  ***
 FIN DE LOCALISATION ***  *** CE FICHIER EXISTE DEJA ***  *** ENREGISTREMENT NON
 TROUVE ***  *** DEPASSEMENT DU NOMBRE MAXIMUM DE VARIABLES MEMOIRE ***  *** DEP
ASSEMENT DE LA PLACE ALLOUEE AUX VARIABLES MEMOIRE ***  *** NOM DE VARIABLE INCO
RRECTE ***  *** TROP DE CARACTERES ***  *** AUCUNE BASE N'EST UTILISEE, DONNEZ S
ON NOM    *** CE N'EST PAS UNE BASE DE DONNEE DE DBASEII ***  *** LA MACRO-INSTR
UCTION N'EXISTE PAS ***  COMPACTAGE TERMINE   ENREGISTREMENT(S)  TRANSFERE(S)  E
NREGISTREMENT(S) RESTITUE(S)   COLONNE LONGUEUR,CONTENU  DESIREZ-VOUS UN DOUBLE 
INTERLIGNE (Y/N)   REMPLACEMENT(S)   DONNEZ LE NOM DU FICHIER DE GENERATION D'ET
AT    *** DEPASSEMENT DU NOMBRE MAXIMUM D'UTILISATEURS ***  *** ERREUR SYSTEME D
'ENTREE/SORTIE *** ENREGISTREMENT(S)  AJOUTE(S)   *** ABANDON DU TRAITEMENT EN C
OURS ***  *** DEFINITION INCORRECTE DU NOM DU CHAMP ***  *** DEFINITION INCORREC
TE DU TYPE DE CHAMP ***  *** DEFINITION INCORRECTE DU NOMBRE DE DECIMALE(S) *** 
 *** DEFINITION INCORRECTE DE LA DIMENSION DU CHAMP ***  DONNEZ LE TITRE    *** 
AUCUN ENREGISTREMENT NE CORRESPOND A VOTRE SELECTION ***  *** PHRASE INCOMPLETE 
 "WITH" MANQUANT ***  DONNEZ LE CHAMP DE SOUS-TOTAL    DESIREZ-VOUS DES SOUS-TOT
AUX DANS VOTRE RAPPORT (Y/N)    DESIREZ-VOUS UN ENTETE (Y/N)    DONNEZ L'ENTETE 
   *** TRI TERMINE ***  *** VOULEZ-VOUS EFFACER LE FICHIER EXISTANT (Y/N)    ***
 CETTE COMMANDE NE PEUT ETRE UTILISEE ***  ** COMPTEUR    DONNEZ LA STRUCTURE DE
 L'ENREGISTREMENT SELON LE FORMAT    CHAMP    NOM,TYPE,DIMENSION,DECIMALE(S)  **
* VOULEZ-COMMENCER LA SAISIE (Y/N)    *** LA MACRO-INSTRUCTION N'EST PAS UNE CHA
INE DE CARACTERES * ENREGISTREMENT(S) TRANSFERE(S)   *** PHRASE INCOMPLETE  "TO"
 MANQUANT ***  ** SOUS-TOTAL **  *** INEXISTANCE DE L'EXPRESSION A TOTALISER    
*** EXPRESSION NON NUMERIQUE ***  *** ERREUR  TOTALISATION DE PLUS DE 5 CHAMPS  
***  *** ERREUR DE SYNTAXE ***  DESIREZ-VOUS DES TOTAUX (Y/N)    *** ENREGISTREM
ENT EN COURS D'UTILISATION. VEUILLEZ PATIENTER  *** NOM DE FICHIER INCORRECT ***
  *** CE FICHIER DE COMMANDE N'EST PAS SUR L'UNITE ACTIVE ***  *** DEPASSEMENT D
U NOMBRE MAXIMUM D'IMBRICATIONS *** ENREGISTREMENT(S) EFFACE(S)   *** FIN DU TRA
ITEMENT dBASE II version L.C.E ***  *** TROP DE COMMANDES 'RETURN' RENCONTREES *
**  **ENTREZ NUM. ENRE.  CHAMP(NUM. OU NOM)  NOUVELLE VALEUR **  *** TYPE DE DON
NEES INCORRECTE ***   H           DESIREZ-VOUS UNIQUEMENT UN RESUME DU RAPPORT (
Y/N)    *** FICHIER INDEX NON TROUVE ***  *** LA VARIABLE EST INCORRECTE ***  **
 ORIGINE ET DESTINATION DES TYPES DE DONNEES DIFFERENTES **  *** PHRASE INCOMPLE
TE  "ON" MANQUANT ***  *** DEPASSEMENT CAPACITE D'UN CHAMP NUMERIQUE  ** ERREUR 
DE SYNTAXE DANS LA SPECIFICATION DU FORMAT **  *** PHRASE INCOMPLETE  "FIELD" MA
NQUANT *** ENREGISTREMENTS INDEXES   *** LA DIMENSION DE L'ENREGISTREMENT DEPASS
E 1000 CARACTERES  *** DIVISION PAR ZERO IMPOSSIBLE ***  *** DEPASSEMENT CHAINE 
DE CARACTERES ***  LES FIC. OVERLAY (.OVR) NE SE TROUVENT PAS SUR L'UNITE ACTIVE
  DONNEZ LE NUMERO DE L'ENREGISTREMENT    *** L'ENREGISTREMENT N'EST PAS INDEXE 
***  *** L' INDEX NE CORRESPOND PAS A LA BASE DE DONNEES ***  *** LE FICHIER NE 
PEUT ETRE OUVERT ***  *** LE FICHIER DE FORMAT NE PEUT ETRE OUVERT ***  ** COORD
    *** DESIREZ-VOUS CORRIGER ET RECOMMENCER (Y/N)    REMPLACER    PAR          
*** DESIREZ-VOUS D'AUTRES CORRECTIONS (Y/N/)    *** DONNEZ LE NOM DU FICHIER  1o
D2DE"EpDDDhEYDEEh2lY2UdpB8YDaElUDED/D9pVc9E#E/wE6.5699s9EE*EtD Fc9EA7E!4Ec9E7EE2
tDEc9E7EF2tDE2EGs9F!F#F!6!6#*.DFx8!*FC7H##6N#x898AH2U Fi9 F9s9UDGc9F7F9s97F!4E%G
UD Gc9F7F9i9.s9E2UDEc9  ** TOTAL **  *** ENREGISTREMENT    *** ENREGISTREMENT NO
N TROUVE *** PAGE N.    ETAPE SUIVANTE -- YOUI  NCMDE CLAVIER  ESCANNULATION    
-   CHAMP   NOM         TYP   DIM    DECIMALE(S)  STRUCTURE DU FICHIER          
   G7Gc9G7E2UDEc96G7E!5Ec9GnDGYDgGh2lY2UYDGlU9s9G2.G962H)Qi96QoPEOPLLPOPY-SVpVV)
IFHHMLLLLLLLMMMRdPPPQPQQQRERMRYRaRPRRSSSbTTTTTVcV VVVXY"Z*ZUZZZhZZ!&8H59c9gHpDD6
JH 7vH O!6+##y66/#665)E! E6s96Hi9#H96DM,s97'R#9s9*)s97H!E*,I  OPTIONS  MMARGE GA
UCHE, LLIGNES/PAGE, WLARGEUR DE PAGE   ENTREZ LE TITRE POUR LES SOUS-TOTAUX    E
NTREZ LE SOUS-TITRE POUR LES SOUS-TOTAUX    CHANGEMENT DE PAGE APRES LES SOUS-TO
TAUX (Y/N)    *** PHRASE INCOMPLETE  "FOR" MANQUANT ***  *** COMMANDE 'JOIN' NE 
PEUT GENERER PLUS DE 65 534 ENREG. ***  *** PHRASE INCOMPLETE  "FROM" MANQUANT *
**  *** LES CLES N'ONT PAS LA MEME DIMENSION ***'7,I..&C!a,.,*,'7,E£IDIh2lY2U*DM
M/I0xiI6IQ/I6oI*+6lUE*DM*!rE22DII!"!"s9$Ii9,.I+26HLs9$Ji9 .J+222!"s97J92s961#Ns#
FrxZJ2y2N2xJ2ynJA2C2xJ2L2!x66s97J9s96i9x 7#9!6622s987&K9s9HL*HL"JR9s9&Ka7HL9s  B
ASE DE DONNEES PRIMAIRE EN COURS D'UTILISATION  BASE DE DONNEES SECONDAIRE EN CO
URS D'UTILISATION  NOMBRE D'ENREGISTREMENTS           * LA BASE DE DONNEES N'UTI
LISE PAS DE FICHIER INDEX *  * AU MAXIMUM 7 FICH. INDEX PEUVENT ETRE OUVERTS SIM
ULTANEMENT  LA COMMANDE "MODIFY" DETRUIRA TOUTES VOS DONNEES (Y/N)    * ENTREZ L
A DATE SOUS LA FORME SUIVANTE (SINON RETURN)    DATE DE LA DERNIERE MISE A JOUR 
   H96i9x 79!"662! !NLOK.OK#AK"!cK.cK#UK"*+K$K*K#K9K,kKK-K kK+$K*K #wkKkK kKKwjK
6 kK**ALK#KAL#K9KwKAL#L9L#K60#K!ALX$LLw#L9.L#6L6Lw#L6 #L!"VE) !Es9rL* 6!E*RDpD2U
DE)!Es9LE%D'#.E%D'#.LD'&E% )2A2LD2VD.E87L7E)!E)!Ec9Us9*Uc9(U"c9y69s97U9*N##XUC+X
UL*jUS*61#665"26UUU7T9UU!&Ux'UUU! &.U!&G+UUDEi656pEAB!E!Es975V9s9/V!E )Es9E*FV7c
9*SVy*96E5Vs9jVq.EDE'E%a'o/DVVV2D!D62D2tDE2D2D2tDE-pE!Es9i7V.E7.Es92.V9nXwE!E%s9
&7BM9''9Ma'DE2pEpa'E)*2MDE+pE%s9!&MW*,Mx'MMMr.G+MMiD656!"!"s97M)!E9J7tO+7O7O)22%
!"s9N%s9NZ7)N29N75N9*2yDkN62#6xfNyaN6gN6oNp4oN6.###6#65"6NNyDNN"* N*6)#662##N###
FNNCN6#6#6Nq#p#6Np#q#q4#6#65"*"N*&E,2.9nXUEs97XW9LD8W'&E%a'2LDs9E'+'2LDa'EnXaWLD
2VDEnXlEs97W9!A6c9A 72EX+"RDErDW'E%2rDa'XWq7W17W'+WY'2rDa'E2DE2DEX2ZDEX72ND9i972
OD9i972PDEX+2aEX#c9EZEs979s9s97XZ77)s9Y-Xi9X+Xi97uY+EyY$X,"Z"X"zX*'YXY#'Y,6Ex'hO
E*+"+O!"epE6DO,5665bOyDbO)DM#,hO! G+EOE!E9!E9!Es97P7Oc9'Os9B+ODO!D6'w2D!D46/a'E)
O*pLDTP9.NP2D9s9,P73P9s97P!4Pc9DP7P!5PET/E)pE2UDE)!E2tD2E2UDE2DE/EhGDPl0lEE)$Qs9
6PPi9x 7Oc9y 'PDEEc9!PDY'YXY,Y$MY,"!Y"z Y*'Y YY&A#'&Y,'YY7,TYDEap,56EG+ED!E"s97Z
9*#N#Fs9r**6/#6""c9*96Y**6)#6"YDZ**60#6"*65D6! EH!EZs97E9(6DOZ9pV-Z9-Z!EE!Ea'E%D
'#s9E'Z+ZD'-,s9ED79s9ZE'Z+Z'#6ZZ Zt#"C!Za',(QEpEs)ws97)Q9s9YQ78Q,E7YQ$PQ*,'EA#'E
+Q*,6HT'QE3!E.s9E2tD2E)s9Q!EC!aEH59c9QpDD6Q/R6/#6++6),RDR60#6656! EHE4p6Q)!E !E!
""M!!E)c9uR#jR!9%%c9!&R)"vDx'RG+RRDE6pEDE7pEDEap,56E!9%%*vD)R!E!E!Ep7oD7Mp6c996M
 26(5a'2oD9s9LDtD2!5t0p!D6%XDpB8DEp!x5Ep!x598pB8D19ESTOREY-SELSEoPENDDOPENDIFEDO
ONOTEELOOPPRELEASEVRETURNpVSELECTV)IACCEPTFHAPPENDHCALLLCANCELLCHANGELCLEARLCOPY
LCOUNTLCREATEMDELETEMDISPLAYMCONTINUEREDITdPEJECTPERASEPGOTOQGOQHELPQIFQFINDPIND
EXQINPUTQINSERTRLISTMRLO+"6+*w#"6ESE!"s9SDS6GSi9*yDxS62#6xsSynS6tS6Sp4S6.###6#65
"6SGS! E6EE%#.E%#,pLD'&E%s9'!E2s9SQ72ErD3T'-a'rD93Ts9T*Ti9£I*DM*!rTEE'E,E.E!E)% 
2MDEpE)!Ec9(6Es9',s979s9',E)2,U%!"!"s9UQ7T92T%  IADYRLOCATEaRUNLOCKZMODIFYRPACKR
POKESQUITSREADSRECALLbTREINDEXTREMARKTRENAMETREPLACETREPORTVRESETcVRESTORE VSAVE
VSETVSKIPXSORTYSUM"ZTEXT*ZUSEhZWAITZCASELENDCASEPOTHERWISELBROWSEMLJOINERTOTALUZ
UPDATEZALLANDBLANKBOTTOMDOELSEENDTEXTFIELDSFILEFILESSCREENGETGETSIFINDEXMEMORYNO
UPDATEOFFONPICTUREPRIMARYPRINTRECORDSAYSECONDARYSTATUSSTRUCTURETOTOPUSINGWHILEWI
THENDDOENDIFCASEENDCASEOTHERWISEBELLQDCARRYTDCOLONWDCONFIRMXDDEBUGY7LLzLc9Vx89!V
7L*W66L"W*V"VKE%*V6 !.,V'-.&D'-,UpJpJpJpJypJE%'2pUpUpUpUypU(pU)!"V,U"V"V2Vs97M2V
M.pVU&MZp+Mp97MUc9 U79*,6Ns9M*V"V'*VDN"VrDMGRGMGMNxMxMM*V*V9UMGMNxMxMxM$MZ"MM*V+
"VMM$*N!MMxDDELETEDDECHOnDEJECTzDESCAPEpDEXACTqDINTENSITYuDLINKAGExDRAWyDSTEPDSC
REENTALKDALTERNATEWCALLWCONSOLE WDATEXDEFAULTXFORMATWHEADINGpWINDEXIXMARGIN9XPRI
NTgWV5QAQBQCQDQEQALLWCONSOLE WDATEEHILN)2V2V2V%s9zE%Us9zEV7OE9"V'H2VEV7cE92VEeV7
U92V2VE*,"VE'7,EVF!"W!d"VC!VG*V9'A+H'2Va'.VF!9V'%H"W*W FNN*V6M"VuM*V M*V"VuM7,M*
V#"VM.!c9N,Mi9,NN0N79MzM!M+))))M M"VNc9*Mc9("VM9c9Ni976Mc9*VOMN*VOUM.MpU)2V2Vs9$
OOV7O2V9NVV7U2V9N$E,V6O#"W"W,)DMz,O*W,VcO..iOQU8z,*W#"W,.iO*,#.,&,*W'U5p,UNO#yON
#6T 6x82#F#6NM3p7"VV#QF#F#6c9'FF"%FOi9qF,F,F,Fi9F,FqFi9FqF,FF#F#6Nc9d29M3c9,Fy,F
i9F,wFi9F*W"WE#V'%Hx'EHa'.a*W#"W*V#"V*V+"VEDE*W656p!d"VEQGC!a*V#"VF&*,'7,HA+H'2V
z,H!u%!"V!"W G"V(G"VNG*V6-#*V6*V665"VG*VNG*V6)#*V66#61#*V665"VG*V6)#*V661#*V665"
VG*W"WLG.C!*DMV'z,H2V#6"VzC1PP!oV(69 QOc9*VOPQ!62VVGq8!"VP!V(6!x5PPP!V(6!x5!8Q2V
QP!6!V(6!x5P2VQPV QVGPw#PQ6 #PQ*V6(656*VV5#P7pQP"V,-QTD0Q.Q2V2V"VrDfQGRCRCR.,#*V
9UVCRGOV2VxQxQ*V6Q"V2VfQxQ*V Q*V"V2VfQVQ.76!V(6,#566*V6 , G6 ! x'GHa'.a*W#"W*V#"
V*V+"VGDG*W656p!d"VGE%DtH*W656pa'&*,'7,*V.,Up2oDUp2oDU)%2Vs9I%Us9IxV7HWp2oDU2V9!
"W6s9*Ip2oDUc9(IRp2oDU*W6"W69s9,Hi9HVOIWp2oDU!&x'III6ap,566!"W*W6"WzIOII.G+IUIUE
%D'#D's9Ip9U'+2Vs9IV7UbK#p$p6!"W!"W*569Oc9Q!RxCR,R*VOQ*V"V Q.7'-rD9Rs9PRi9R*WDM*
V!VrPRa'2V2VDRR!"V!"Vs9$Ri9,.R+U2W6,Us9$Ri9 .R+U2W22!"Vs9V7S92Vs9UV61#Ns#Frx6S2K
Vy2NVN2JVTS2NVyJSA2KVC2JVTS2KVL2JV!x66s9V7S9s96Ui9x 7U#9!6622Vs9V7 T9s9,U*,U"VSR
p2oDU9s9 TV7,U9s96Ui9x 7U9!"W#"W66*W+))))"WW!KB6r69c9Kbk66 c9*,Lc9'L*Wc9,vJ6oJ#a
JyLLL9!i92VCJNJLLKi9i97LLzLLVNK9c9K,Li97L9c9L*W66L"WI *W+L!.,.&E%%pB8UA+-&,.QPK&
.E%U9s9'L+L-8"V6!"W*V7,TL K#9c9* c9 Ki9 Kc9CKNKLL1Li9Vx89!V   H         V662V! V
!JVNT3T.3T#%T"W!GT.GT#9T"W*W+T$T*T#T9T,OTT-T OT+$T*T #wOTOT OT£TwNT6 OT*W*W%UT#T
%U#T9TwT%U#T9T#T60#T!%UXUUw#T9U#U6Uw#T6 #T!"VVp2oDU"V!V+656!"V*VN!T6eUy2V*VOU!V 
 6*VVU#UV*VDM!Vr*VVg"V*V"V OU2oDU2oDU!ETTTPRbrpbsV++"sV6L4L66*wV*L#L6#"wVK*wV6!B
L'YL020V.V.VL#wLy2.V#rL.VLO6ZD22YVs9MU7M9s9HT2i9Li9LnU7HT9s9HT!V 6Vc9M M.M*KMaBM
i9(M6#LMi9.Mi9VM M*MaxMi9cM6#Mi92YVL6YVM!sU(6!"V8M6T!V8M6T!V"V6 NM!U(6*VYVNd,FV7
c9SBEFOREBLANKCHANGE DELIMITEDTO     FIELDFROMGETPICTURERECORD SAYSDFRECORD # TO
       USINGE!Es9V.E7.Es92TO     FIELDFR$E8JKL'OOPQQRYSS%2V2V2V2ZV2V2V8!"qVs9F%H
Ts9FU7E"aV9'#J2VLEbU7E2V9!6 "sVs9*£E*Jc9(ER*J*sVx8!6 "sV*qV6-#6665"qV9s9,LEi9EU7
F2V9s8"V6 OM!V"V6*V YVN8"V2h!,6,r62NNog56r66/56/566NNp6NN!U+66N,.5,"VNr6x6N6NOO7
O!2iV!"jVO"QV6 ,6!iV4(55)56NO#2TVzO2fV2UVO#2UV###2TV2fV!PV fV*jV6#"jV 4O6pr6iV6!
4U+6*jV56!FU+6T2V2Vs9PiU7P9'2V9YU7LE2V9LEV7)F2ZV9LE*U7HT2ZV2V9s9U7LE9s9HT2OVi9LE
V(J*aV9ZVsFuF'+'2MDZVF!6#w#w#+++++x8VI.VIa'!u%!&!"sVI!d"oV,Ix'PIIPI*sV#"sV*oV+"o
V GD G*sV656'p!d"oVV-HVGG*DM! 6! 1H!"lV!"wV*lV5H#6##"lVNG#F#6*wVyG6,#OV,Gw#q8x6+
 GG#OV,Gw#"wVH+ G+G#"wVH#F#6*wVyG6,#OV,Gq8x6"wVH# GHG+OXSTU7HT92VOVHTV.P )yVz,P!
UPcP#Ny2nVkP#F###N2nVkP2nV!yVr*"WVnVOVz,*WV 6nVO!Vx8.PE%a'T2V2Vs9QU7P9'Q+Q'2MD"g
V2VP&U7HT9s9HTnU7HT9s9HT"sVi9 QQ2VPVQ*gVdQV8Q*sVTdQ.!F#N#6xXQQQQ.*gV"gV Q&E%2MDa
'THST(ST2Vc9nU7Q2Vc9RU7HT9s9HT"qV"gV*gVQ*qVVQTQQTQy**gV"gV QT%2G"wVH60#"wVUG*wV6
 #6 #6DMMD%PIZVLH*DMMD'.a'PIVmH*6 #6 MD*DM%PI!"wV"qV*qV 9INH#F#6*wVyH6,#OV,Hw#q8
x6+ HH#OV,Hw#"wV+I+ H+H#"wV+I#F#6*wVyH6,#OV,Iq8x6"wV+I# I$III"wV+I60#"wV*qV"qVH*
wV6 #6 #6DMMD%G+IFI!UA8."gV!"sV*gV I  I #I##cT###cT*gV"gV.*sV#"sVIDI*sV656'pMD'&
VIVJZVJ-V%HTs9RU7HT9s9HTr*"sV2Vi9R -RR*,bR!&bRx'YRbRG+bRORDsR"pi56VTi4*sV 64Tgpa
''%rp*,56wp+++++6/56/56.RppRqpfp S6yB6r6 ,x65u6#B6u6###Fx6x4SB6x6R6pr6r6x6)56Tep
mSpDDs9SU7HT9s9HT*Sy*r* 66# S w5 5TTs9'+T2MDMD% TT2eV TT"cVT*cVw#"cV*sV!6#6.E%2M
Da'T(*JHpa'2oDT)%!"lVA2V2vV2uV2V2yV!yV"qVs9%HTs9FKU7JuV2uVK*lVHT2V"lV#6xK!V4r*! 
66*lV6)#66#6/#665"lV*qV60#665"qVc9FK,Ji9J92vV!yV"qVs9FK*Ky**qVK#6"qVbk 6s9*c96.K
# %K9s9,Ji9JVK!&tKx'kKtKkK! G+tKVKDK!yV6 A2VvVT!yV5T#6y*KJ*JK*JL*Jc9U7HT9s96HT6i
9HTKi9s9K,HTi9s9K"sV!"wV*  G!eV5SSE%2MDa'TXST!G'T05T O)))) Ta'2oDTp2oD!E&odT TT/
ogTzT T*TT6TT#TTTTPRbrpbd,ADDITIVEALLDELIMITED VARIABLES        OCTETS    EXCEPT
EXTENDEDFIELDSFROMLIKENOMS FICHIERS    ENREG.    MIS A JOUR RienONSTRUCTURETOFIL
E UNAVAILABLEWITHFIELDNAMEC FIELDTYPECFIELDLENNFIELDDEC3QIp*9Q6+#"9QHM  I1I*9Q 2
QI*9Q#c9GIOITIi9TIi92Q 7HOM*9Qqy6#62#q#Qw#OQw#Qw#65"9QxJYQJ3QINpHMMs9YJ*AQ6/#6QQ
I6)#662#6OQw#Qw#6)#6*0N"WQ!"0N!p!q6)#66#6/#6JQJ*AQ6)#6*0N"LQ!"0N!p!q6)#66#6/#665
"5Q*WQ*ZQ6)#662#6KQOQw#6#65"ZQJQJ*LQ*SQ6)#662#6KQGOQw#6#6#6/#665"SQ2KQPQ2PQOQQ2Q
HOQKQ2KQQ2QPQ2PQH3QJsD'&sD'E%2sDa'DQl!N  AASDF           DBF$$$     SUB')FO.E5NT
YPECFIELDLENNFIELDDECOMGETPICTURERECORD SAYSDFRECORD # TO       USINGE!Es9V.E7.E
s92TO     FIELDFREEEs9G2G2Gs9EG7SE9s9"GGc9E+"G#O#F2GEG7G#9s9'uE(p!G2GEGTGGHG+'#*
G*G'a'F&G$&G$"G*GE2G"DE6!G(6G%#EF*G#"GE#"C!&G"Q!&JQK!QR5"K#K#N#F!N4r*"EQ6/#6656)
#*EQ66xRK6#65!S60#*EQ665tKx'KLG+LLeK!Q EzDK60K6022Q4QK6Mcp*Q#"Q56r6!A+6MNDK6/5OD
6/5PD66MNQK!jT 6M!sU MJQ+LM*56!Y !S cL2QKMOQKx'cLLQQM!Z 7QcLMG+LLcLx'cLJQ+L!R +L
M2Q+LMOQK6M*56!Y !S +LMYQL$R5LMpM!$R !N*Ly*!N5AL6A6CQl)!"G"G*,!d"G!.,*G,7,qF*G#"
GF*G,.*G*G#"GDF*G+"GF6*G+56p!d"GF*G,&,DF9p*G+"G.,DF*G56p$&GE!'GC!!"G!d"G*G#"G*G+
"GFDF*G656xp!d"G7,FDG*G656xpa'2oD&Gp2oD!ETTTPRbrpbd,ONMISE A JOUR DE L'INDEX TOP
Rbrpbd,M3QM4pHJQIS51MMIpM!IS !Q RQDM22Q63QgM9c9sD'E%a'MsD9c9wi9pM9c93QsD6QOy6 M!
E2oDMTTTPRbrpbd,AAFORMPLAINPRINTTO2N9*rYyDkN6xYxfNyaN6YoNp4oN6.Y#65"6YyDNY"* Y6)
#662#YN###FNNY6#6#6NYNp#q#q4#Y"*"Y*&E)28Q2QQ22Q2JQ24Q!rY 62Q2Q92QP2GQh2CQ2DQ%s9E
%Ms9EN7eE9'28QE-N7E9s9M'N7M92DQE!N7M924QE8QEp9c9MM'23Q+E+23Q'2sD2NQ3QEhpHMMs9eF 
eFMFi9Mi972Q2Q9WFLFi9Mi972Q9WFWeFi9Mi972GQ9WFc9,eFi9E3QqFEpHMMs9YF2NQ3QFFp!jT6+H
MlTc9FFFi9Fi92Q 7F2kTOM!lTy662#q#Qw#QGGQw#p#6527Q3QFpHMsYEx'hOE*Y+O!"YEYDO,56Y5b
OyY)DM#Y! G+YE!EYE9!Ys97Y7Oc9Ys9B+ZDO!DZ2D!D46/Z)O*pZTP9.Z2D9 Z,P73P&Z97P!,ZPc9D
P2ZP!5P8ZE)pEZE)!EDZtD2E2JZ2DEPZEhGDVZl0lZE)$QbZ6PPihZ 7Oc9y nZPDtZEc9!Pz9Y G27Q
M2YQ3Q GNpHMs9YBG2YQ!Nr*"AQ2KQMYQXH3QXGDpHMs9YjG2JQMJQXH3QGCpHMQG3QM4pGM3QGPpHMs
9YG2QQM2RQ3QGkpHMs9YG2RQM3QGip!Y6+HM HHY 7HYc9 H(H-Hi9-Hi92Q 7GO2YM!Yy662#q#Qw#q
#Qw#653QdHp!Z"5Q65!$R"ZQ65!sU"9Q65!IS"SQ652PQ3QH6PQB6r6HMs9J72OQ9,Mi9*5QMs9MQQH6
2#N#FxHw#OQw#Qw#65"5QH"5Q#6M  FZEpEZ)ws97Z9s9YQZE)$QbZ6PPihZ 7Oc9y nZPDtZEc9!Pz'
THST(ST2Vc9nU7Q2Vc9RU7HT9s9HT"qV"gV*gVQ*qVVQTQQTQy**gV"gV QT%2s9N7EnN74N9THupB8,
N,N)!Q  6!5Q w E8!"O!O"O!"O*O E*O 6E#EN###N*O"O*O"OdE!O"O!"OvN!Or*O"O!"N*NDM*O"O
!Or*O"O F*N$"NUE&odN NN/ogNz!E2oD,NCOMMANDNOM       TYP DIM  DECABANDON MODIF.  
(Y/N)    CREATION BUFFER PLEIN. Y  SAUVEGARDE, N  ABANDON STRUCTURE$$$BAKx6N6NOO
7CHAMP 01  CQCHAMP 02  C6QCHAMP 03  COQCHAMP 04  ChQCHAMP 05  CQCHAMP 06  CQCHAM
P 07  CQCHAMP 08  CQCHAMP 09  CQCHAMP 10  CQCHAMP 11  CRCHAMP 12  C0RCHAMP 13  C
IRCHAMP 14  CbRCHAMENGx2NGjF,NFNN!Q8F3F"N!$T6YFDMT!#T+xOF*N 6+6Ex G2NxF*O"OO6F!O
"O2NEN2NE*O"OP6F GN2NENN!QFF"N!$T6FDM*N!8!$T 6+6E!6!"N!"O!O"O*O H 69s9G*Oc9* ,Hc
9 iG6bG#TGy,H,H9!s9CGNGL4HGi9s97DHDHzDH9s9G7H9s9H*N66LH"N*O"O*O"P 15  CRCHAMP 16
  CRCHAMP 17  CRCHAMP 18  CRCHAMP 19  CRCHAMP 20  CRCHAMP 21  CSCHAMP 22  C*SCHA
MP 23  CCSCHAMP 24  CSCHAMP 25  CuSCHAMP 26  CSCHAMP 27  CSCHAMP 28  CSCHAMP 29 
 CSCHAMP 30  CSCHAMP 31  CTCHAMP 32  C$T ELD 25  CuSFIELD 26  CSFIELD 27  CSFIEL
D 28  CSFIELD 29  CSFIELD 30  CSFIEL'THST(ST2Vc9nU7Q2Vc9RU7HT9s9HT"qV"gV*gVQ*qVV
QTQQTQy**gV"gV QT%2O%G*O6 !8!.,.&-,,NpMpMpMpMypM2 Os9iHp9,N'KA+H!£N(62NH'2NNM+'2
OWD2N2WDT2OTHU2OO2O!(OOw#6!,O6 #6 #"N"N"N"N#"N2O*N!6DM*N6M!"O!"O*N"N*NKkIO I# I#
y"N&o6!O66!OrObIU!I!O"O*NK"NOGN!OrGJI!N(6B8KIIOLjL*N*N6DM*N+T8#"N*N6 #6 vMI*N##*
N6DM*N*N##8")2IJ2J2JJ!"FJ2CJs9E'J7GE9s9*I(I"FJ9E*J7UEE9E4J7jEE9 2IJ2J2JJEJ7I9'I2
CJE*FJICJI*+6)EExEE2QJ*FJLxI2mJ2J2JCFIJ2IJ2JJJ2JJ#2nJ2J2J#62qJ2J2J6"VJnJGqJOmJN9
FxAO!Jr*"J"J,&'2XJ+'2BJ.!"NJ2aJ2RJ*,F&2XJH2RJBJ'&&*NJ.,.-+'2XJ2aJQJ*NJ6"NJHaJH2a
JRJF*NJ&QJo6F2QJ2PJ2SJ)DM!"TJBJ'N*NI6 #6 #6#"NIx2KxJOLjL*N*N6kIK"N!O5OLJ5kI2O*N"
N*N*N6JK"NO2OGOJx2Ox J*N"NIxJOLjL*NKJ6 #6 #6++##"NJ6 #6 #6#"NvM!O4OJ4UkI2O*N"NIj
LOK2O*NK%K##%K"NO2OK*N"N2OIjLNHK*N"NM5K*N*N6DMO'.&E%NK'E%NM'OM,NM,NM,OM,KNK'E%O'
E%'a'N2WD,N+ K++ K# #h'.7#"OOx8OO !,XJ',RJ)Gz,G G*NJ#"NJ/Gz,pI*VJ*TJ6"TJi!PJ4QJG
H*"J!rJ"J*FJ"ZJRJGQJ*NJ6pIOH"NJ"LJGPJ2QJHOHXJ'RJG7,OHG*NJ#"NJG7,pIJJ2J!YJ GBJ'.*
FJ 6EIHBJ'*VJ*6)DM.*JEI8*!QJOx8y!66QJOH*"J*FJ"ZJRJG*LJ+"LJGBJ')DM!"TJQJ*TJ6"TJ*V
J6.cHRJF&FBJ'E%XJ'E%a'-*Jy*DI!H(6ITRI TERMINE  QJOH HIJ2JQJGyHI!rJ"J!bJ"ZJ!666 O
LFL"O*N+6M*OIL ILL #L7y!"OOG!Or*N LL#qLOO!6 L+L Ly2O2OL*N*N6"OLy*N6*ODM*N8O*N"NL
*N+6*ODM*N+8#"N*NOOx8vM*Ox8NM*N6-MMMT"NN'z,xZMAM"N2 O*N+6 #6 #6#"N2 O*N6*N*N66M*
NO'.*NT*N6DM8*N"N*N"N*N"N*O"O*N 7#"N!N(6B8K5Kep  F66"J"oJ!YJ ,I*J6*oJ67ISJ7IIIHx
aJ"JSJcI!J cI2aJ!J 2SJpD/pIpIRpIHpI(pI2oDI2oDI!ETTTPRbrpdXd,AAONASCENDINGDESCEND
INGTOOLJ5kI2O*N"))5NCOPYRIGHT  NO(C) 1982   Jx2RSP, INC   NI))J5)J/5AONASCENDING
DESCENDINGTOOLJ5kI2O*N"))5NCOPYRIGHT  NO(C) 1982   Jx*H665"H*H"H*H"HE."H*H F'xF*
H*H8*H6-#*H6*H665"H*H"H6F*H"H+F!"H!dH"H*ZH9s9*"bHc9(G"H*H8*H6-#*H6*H665"H*H"H*bH
9s9,Fi9F*H6 !u% 2VH'.a'.,.,!".! G!dH VH'*DM.a'*#"G.G+mG*G,.G+G*GVH'&-.E%a'G(pGHp
GlpGmpGpGa'2oDGa'2oDG!ETTTPRbrpb'wE2G6!I(6'%.+Epp0Eqp6$wE"I!'I(666*IwE#"I'%x6-nI
z,!J+66GEa'.'E2G6!II(6'%.EppEqp6$E"I!'I(666*IE#"I'%x6-nIz,!J+66E.6GF666eplG6!G(6
ND6/5OD6/5PD6!H(6ZD55LDeF!G(6LD%6!(H(6VDGx6!5H+6QDG!BH(6TDGx6!OH+6WDG!iH(6XDGx6!
H+6YG!vH(6YDGx6!H+6DG!H(6nDGx6!H+6zDG!H(6pDGx6!H+d,FIELDSFORTO2oDG!ETTTPRbrpb- D
ELETE    - ECHO      - EJECT     - ESCAPE    - EXACT     - INTENSITY - LINKAGE  
 - PRINT     - RAW       - STEP    )%2H2H2Hs9E%pHs9EHDEH7DE9'4H2HEHyEH7yE2H9"Hs9
*H9s9,Ei9EHpHH7pH2H9s9DH"I*DH2Hc9(DH"H9EHLH+E'2Hz,E+'2H8.a'!6qDG!H(6uDGx6!H+6xDG
!H(6hGx6!H+6yDG!H(6DGx6!I+6DGlGeG!GhG!G+6a'!ETTTPRbrpbd,OFF ON  FICHIER ALTERNAN
T  - DATE DU JOUR       - UNITE DE DEFAUT    - ALTERNATE - BELL      - CARRY    
 - COLON     - CONSOLE   - CONFIRM   - DEBUG     - DELETE    - ECHO      - EJECT
     - ESCAPE    - EXACT     - INTENSITY - LINKAGE   - PRINT     - RAW       - S
TEP    u%!"I65HxF*H9s9*"Hc9(TH!NdF*I6)#6"Ic9'TH*I6)#66#61#665"I*H9s9,Fi9F!"I*I F
NF*I(TH*I6)#6*I6)#66#61#665"I*I"IFHG*I#"I"H*H!NF*I6)#6"IHO*I'DH*I6)#6p#65"I*I#"I
"I!"I*I G(PG*I6-#6*I665"I*I"I*G!&*DM! 6,*Gx'GG+GsGG*I !"HGHG*H G! GH'*DM.a'*H#"H
*I G+GGx'GG*H"H'*DM  - TALK      - BASE ACTIVE       -  INDEX           EXPRESSI
ON CLEBASE INACTIVE       - TOyIKIKI7-!!K6!!Ky6672KI2KO-!!K6!KI#I!!KK66*KDM!K!Jr
*KKo"KKo&))))KJ2Fs9EF 7o&6!iF9ZD2F2ZD'+2FF2ZDU2FEF9Ec9*BE#F7BE2F6EF9Ec9*iEEEF9Ec
9wF7Ec9rF7BE*E9(6F2FE6epE6U2FEpDFE!F(6F'E%a'E!.H'&-.E%a'DH*H656'pH(pHRpHpHHpHRpH
H'E%a'2oDHa'2oDH!ETTTPRbrpbd,FIELDSONTODH!E)2I2I2I2I2Is9+FIEI7E9s9'H2IEIkEI7kE9s
9"I*H2I92IEIEI7E9s9I"Is9*H92Is9,Ei9EI FI7 F9s9I"Is9*H92Is9,Ei9Es9£I7E9s9*H9s9EzG
G"8z  "7"8y28  28DBASEMSG*END*EXITAUCUN TEXTE D'AIDE    HELPGG"8z  "7"8y28  28DB
ASEMSG*END*EXITNO ).).2YH2XH2WHs9EYHBESH7BE9s9'G2YHEXHiEOH7iE9s9G2XHEWHGHH7G92WH
s9G"ZHs9*G9s9,Ei9EYHGXHG+'2VHa'.WHF"H!"H!dH"H*H  F*H8*H6-#*H6  F,Ei9EIII7I92I$HE
IHIH+H'2Iz,!u%IF*I(HF#6"I*IIO'HN#6"IxH2IF*IIO'H2I#6"I!"I"IIBG*I"I*I9s9"I(H"I*I*"
I*I'H*I6)#66)#*I66#61#*I6"I*I9s9,9Gi9"IF*I65#"IIG*I"I*I9s9"I(H"I*I*"I9s9£I7G9s9"
I*"I*I'H*I6-#6*I6"I*I9s9,Gi9"IOG*I65IJHa'!&HI'*DMz,*I*IIO7H# 00000C   NI))J5)J/5
KJ6 #6 #6++##"NJ6 #6                                       FIELDSRECORD ,NM,NM,O
M,KNK'E%O'E%'a'N2WD,N+ K++ K# #h'.7#"OOx8OO !GKOK2KHHmF$%H!HH'+H7,HH*K#"KKGKOK2K
HHmF*K"K2 KEK0HsHKH2K!K4HI HK2KKH2K*K"K2 KELJTOHKHKH7/o&THy2K7HNy2K#6!Kx8K66*KDM
!H'HIH*I IH*I a'.I'*DMz,HGa'G+HGI'*DMz,a'*II 'HIH*I IH*I .I'*DMz,HHI'E%a'I(pHpIn
pHTpHRpIopHspHSpHI'E%a'2oDII'E%2oDI!ETTTPRbrpbd,ADDFROMONRANDOMREPLACEWITHPRbrpb
d,,UJ2K! L"Ks9rEJ7J92Ks9*EpGJc9(LERpGJ*K8!"K6 9s9,rEi9)E%!&,"K"K2 KWD2 K2WD2K2K2
K2K2K!"K*K'I"K2K2K*K EHE!K4*K"KEUOKGK2K#F*KKg."K!K4$F!#F'E7,E!"KI"K2K*K SFbISF!K
4*K"K3F KOKG!yjFOxgF"K*KKJJ!Jr*K'I"K2K*K FIF!K4*K"KFK!KF2KKG2Kx2K2KI"K2K*K GHG!K
4*K"do while t  use debit  set index to numero,date-deb  erase   2,0 say "      
                  *** D E B I T ***"   5,0 say "        (C)reation"   7,0 say " 
       (M)odification et consultation"   9,0 say "        (E)ffacement"   11,0 s
ay "        (R)etour au menu initial"  wait to rep  do case  *creation  case !(r
ep)"C"  erase   2,0 say "                     TRAITEMENT DES CHEQUES            
    CREATION"   5,0 say "Numero           du            d'un montant de"   8,0 s
ay "a l'ordre de "  store "KFKGLJ2KKBG.$BG!2KBG,"K"K2 KKUHKG!K6#K/w$GZ"G"KKGKGK2
KGmF*K+"KGKGK2K£GmF*K6G"K2 KK2KE,,"K*K"K2 KE!K6#Kw$H!HH"KKHHKGKOK2KHHmF$%H!HH'+H
7,HH*K#"KKGKOK2KHHmF*K"K2 KEK0HsHKH2K!K4HI HK2KKH2K*K"K2 KELJTOHKHKH7/o&THy2K7HN
y2K#6!Kx8K66*KDM!N" to fin  do while fin # "O"  store "N" to continu  store "   
    " to mnumero  store "        " to mdatedeb  store "                    " to 
mdebiteur  store "                              " to mcomdeb  store 0.00 to mmon
tdeb   5,7 get mnumero picture "9999999"  read  if mnumero" "  store "O" to fin 
 else  if mnumero"9999999"  append blank  else  find &mnumero  if ##0   22,0 say
 chr(7)+"Ce cheque est deja enregistre"+chr(7)  store 0 to tempo  do while tempo
#50  store tempo+1 to tempo  enddo tempo  K!Jr*KKo"KTO"J-IKIK6I72K7BI2K*KDMJ!Jr*
KKo"KTOyIKIKI7-!!K6!!Ky6672KI2KO-!!K6!KI#I!!KK66*KDM!K!Jr*KKo"KKo&))))KJJ! L',J,
Jd,J ,J,J/og/Jz2oDLJOJ K2WD!E5NCOPYRIGHT  NO(C) 1982   Jx2RSP, INC   NI))J5)J/5K
J6 #6 #6++##"NJ6 #6                                       FIELDSRECORD   Freleas
e tempo   22,0  store "O" to continu  store datedeb to mdatedeb  store debiteur 
to mdebiteur  store comdeb to mcomdeb  store montdeb to mmontdeb  else  append b
lank  endif  endif   5,20 get mdatedeb picture "99/99/99"   5,47 get mmontdeb   
8,13 get mdebiteur   10,13 get mcomdeb  read  if mdatedeb#datedeb .or. mdebiteur
#debiteur .or. mcomdeb#comdeb   .or. mmontdeb#montdeb  if !(continu)"O"  store c
hqsolde-mmontdeb+montdeb to chqsolde  else  store chqsolde-mmontdeb to chqsol ge
t mcomdeb        read          if mdatedeb#datedeb .or. mdebiteur#debiteur .or. 
mcomdeb#comdeb   .or. mmontdeb#montdeb            if !(continu)"O"            st
ore chqsolde-mmontdeb to chqsolde            else            store chqsolde+mont
deb-mmontdeb to chqsolde            endif          replace numero with mnumero  
        replace datedeb with mdatedeb          replace debiteur with mdebiteur  
        replace comdeb with mcomdeb          replace montdeb with mmontdeb      
    stode  endif  replace numero with mnumero  replace datedeb with mdatedeb  re
place debiteur with mdebiteur  replace comdeb with mcomdeb  replace montdeb with
 mmontdeb  store mnumero to chqder  endif  endif   5,20 say "          "   5,47 
say "            "   8,13 say "                      "   10,13 say "            
                    "  clear gets  enddo  release fin,mnumero,mdatedeb,mdebiteur
,mcomdeb,mmontdeb,continu    *modification  case !(rep)"M"  erase   2,0 say "   
                  TRAITre mnumero to chqder          endif        clear gets    
     20,0 say "(S)uivant, (P)recedent, (N)ouveau numero " get recherche pict "!"
        read         20,0          if recherche"S"          skip + 1          en
dif          if recherche"P"          skip - 1          endif        store numer
o to mnumero        enddo recherche      endif     5,20 say "          "     5,4
7 say "            "     8,13 say "                      "     10,13 say "      
                          "    enddo  release EMENT DES CHEQUES                 
 MODIFICATION"   5,0 say "Numero           du            d'un montant de"   8,0 
say "a l'ordre de "  store "N" to fin    do while fin # "O"    store "S" to rech
erche    store "N" to continu    store "       " to mnumero    store "        " 
to mdatedeb    store "                    " to mdebiteur    store "             
                 " to mcomdeb    store 0.00 to mmontdeb     5,7 get mnumero pict
ure "9999999"    read      if mnumero" "      store "O" to fin      elfin,mnumer
o,mdatedeb,mdebiteur,mcomdeb,mmontdeb,continu,recherche    *effacement  case !(r
ep)"E"  store 0 to effacement  erase   2,0 say "                     TRAITEMENT 
DES CHEQUES                  EFFACEMENT"   5,0 say "Numero           du         
   d'un montant de"   8,0 say "a l'ordre de "  store "N" to fin  do while fin # 
"O"  store "S" to recherche  store "       " to mnumero   5,7 get mnumero pictur
e "9999999"  read  if mnumero" "  store "O" to fin  else  find &mnumero   if #0 
   22,0 sase      find &mnumero        if #0        * TEST POUR CREATION O/N    
     22,0 say chr(7)+"Ce cheque n'est pas enregistre"+chr(7)        store 0 to t
empo          do while tempo#50          store tempo+1 to tempo          enddo t
empo        release tempo         22,0         22,0 say "creation (O/N)  " get c
ontinu        read         22,0          if !(continu)"O"          append blank 
         else           5,20 say "          "           5,47 say "            " 
          8,13 say "            y chr(7)+"Ce cheque n'est pas enregistre"+chr(7)
   store 0 to tempo   do while tempo#50   store tempo+1 to tempo   enddo tempo  
 release tempo    22,0   else    do while !(recherche)#"N" .and. fin#"O"    stor
e "O" to efface    store "S" to recherche     5,7  get numero     5,20 get dated
eb      5,47 get montdeb     8,13 get debiteur     10,13 get comdeb    clear get
s    if * .and. .not. eof    store "N" to rappel     22,0 say "ce cheque vient d
'etre efface, rappel (O/N)  " get rappel     picture          "           10,13 
say "                                "          clear gets          loop        
  endif        endif              do while !(recherche)#"N" .and. fin#"O"       
 store "S" to recherche        store datedeb to mdatedeb        store debiteur t
o mdebiteur        store comdeb to mcomdeb        store montdeb to mmontdeb     
    5,7  get mnumero        clear gets         5,20 get mdatedeb picture "99/99/
99"         5,47 get mmontdeb         8,13 get mdebiteur         10,13  E "!"   
 read     22,0    clear gets     if !(rappel)"O"     recall     store effacement
-1 to effacement     store chqsolde-montdeb to chqsolde     endif    else     22
,0 say "voulez-vous vraiment l'effacer (O/N)  " get efface picture "!"    read  
   22,0      if !(efface)"O"           if .not. *           store chqsolde+montd
eb to chqsolde           store effacement+1 to effacement           delete      
     endif      endif    endif     22,0 say "(S)uivant, (P)recedent, (N)ouveau n
umero " get  2,0 say "                     EFFACEMENT D'UN CREDIT"   4,0 say "da
te  "    $,7 say datecre picture "99/99/99"   $,20 say "crediteur  "    $,32 say
 crediteur   7,0 say "commentaire  "    $,14 say comcre   7,50 say "montant     
        F"   7,60 say montcre using "******.99"  recherche   picture "!"    read
     22,0    if recherche"S"    skip + 1    endif    if recherche"P"    skip - 1
    endif    enddo recherche   endif   endif  clear gets   5,20 say "          "
   5,47 say "            "   8,13 say "                      "   10,13 say "    
                            "  enddo  if effacement # 0  erase   "prise en compt
e des modifications ..."  pack  set index to  go bottom     if ##0     store num
ero to chqder     else     store "0000000" to chqder     endif  set index to num
ero,date-deb  endif  release fin,mnumero,efface,effacement,recherche      case !
(rep)"R"  release rep  use  return  otherwise   chr(7)   "votre selection doit e
tre C, M, E ou R"  store 0 to tempo  do while tempo#50  store tempo+1 to tempo  
enddo tempo  release tempo  endcase  enddo debit  o effacement           delete 
          endif      endif    endif     22,0 say "(S)uivant, (P)recedent, (N)ouv
eau numero " get M0,W72  Y  LISTE NOMINATIVE DE DEMANDES D'ACHAT  N  Y  N  12,DA
NUM  NUMERO D.A.  9,DADATE  DATE  13,PIECE  REFERENCE  5,QTECMD  QTE  N  9,PRIXU
HT  PRIXUHT  N  11,PRIXUHT * QTECMD  PRIX THT  Y  12,EMETTEUR  EMETTEUR  LNUMERO
CpDATEDEBCpDEBITEURCpCOMDEBCpMONTDEBN p ero,date-deb  endif  release fin,mnumero
,efface,effacement,recherche      case !(rep)"R"  release rep  use  return  othe
rwise   chr(7)   "votre selection doit etre C, M, E ou R"  store 0 to tempo  do 
while tempo#50  store tempo+1 to tempo  enddo tempo  release tempo  endcase  end
do debit  append blank          else           5,20 say "          "           5
,47 say "            "           8,13 say "              F***************** ENTR
EE OU SORTIE DE PIECES DU STOCK ********************  * CE FICHIER PERMET DE PRE
NDRE EN COMPTE L'ENTREE OU LA SORTIE DE PIECES *  * DU STOCK, MAIS SANS CREER AU
CUN DOCUMENT.                              *  **********************************
****************************************    SET EXACT ON   0,0 SAY  "FIN  VALIDE
Z"  * DEFINITION DE LA BASE PRIMAIRE  SELECT PRIMARY  USE DA INDEX DA    * DEFIN
ITION DE LA BASE SECONDAIRE  SELECT SECONDARY  USE STOCK INDEX PIECE    STORE "O
" TO CON                 8,17 SAY S.LIBELLE                                   14
,13 SAY S.DANUM                                   16,51 SAY S.QTERESTE          
                      20,3  SAY S.MINISTOCK                               20,35 
SAY S.QTESTOCK                                20,51 SAY S.PRIXUHT               
                 STORE S.PRIXUHT * S.QTESTOCK TO PRIXTHT        20,67 SAY PRIXTH
T    * PRISE EN COMPTE DES ENTREES OU SORTIES DE PIECES DU STOCK TANT  * QUE LA 
FIN DE TRAITEMENT N'EST TENTSOR  DO WHILE CONTENTSOR  "O"  CLEAR GETS  SELECT SE
CONDARY  STORE "            " TO MPIECE   10,11 GET MPIECE  READ    * SI AUCUN N
UMERO DE REFERENCE N'EST SAISIE -- RETOUR AU MENU TRASTOCK  IF MPIECE  " "   REL
EASE CONTENTSOR  SET EXACT OFF  RETURN  ELSE  SELECT SECONDARY  FIND &MPIECE    
* SI LA REFERENCE SAISIE N'EXISTE PAS -- EFFACEMENT DE TOUTES LES ZONES  * DE MO
DIFICATIONS DE LA REFERENCE PRECEDENTE, ET AFFICHAGE D'UN MESSAGE  * D'ERREUR   
    IF #  0        6,13 SAY "     "        6,31 PAS DEMANDEE  STORE "O" TO CONTI
NU  DO WHILE CONTINU  "O"   STORE "    " TO QTE  STORE "F" TO REPONSE   22,0 SAY
 "Est-ce une Reception, une Sortie, la Fin traitement (R/S/F) "   GET REPONSE  R
EAD   22,0 SAY "                                                                
    "  SELECT SECONDARY  IF !(REPONSE)  "S"    ****************** SORTIE DE PIEC
E(S) DU STOCK ********************  * CETTE OPTION VOUS PERMETTRA DE DECREMENTER
 LA QUANTITE EN STOCK *  *************************************************SAY " 
    "        6,47 SAY "                         "        8,17 SAY "             
                      "        14,13 SAY "          "        14,36 SAY "        
"        14,53 SAY "            "        14,71 SAY "        "        16,20 SAY "
          "        16,51 SAY "          "        20,3  SAY "          "        2
0,35 SAY "          "        20,48 SAY "            "        20,64 SAY "        
     "        22,0 SAY  "CETTE PIECE NE FIGURE PAS DANS LE FICHIER, Validez"    
   SET CONSOL******************     22,0 SAY "Donnez la quantite a sortir du sto
ck " GET QTE PICTURE   "9999"  READ  STORE VAL(QTE) TO QUANTITE  * SI LA QUANTIT
E A DEDUIRE EST SUPERIEURE A CELLE EN STOCK  * UN MESSAGE D'ERREUR SERA AFFICHE,
 ET AUCUN TRAITEMENT NE  * SERA EFFECTUE.      IF QUANTITE  S.QTESTOCK       23,
0 SAY "Transaction impossible, Validez"      SET CONSOLE OFF      WAIT      SET 
CONSOLE ON       23,0 SAY "                                "    * SI LA QUANTITE
 A DEDUIRE EST INFERIEURE OU EGALE A CEE OFF       WAIT       SET CONSOLE ON    
    22,0 SAY "                                                    "           EL
SE  * SI LA REFERENCE SAISIE EXISTE -- RECHERCHE DE LA DEMANDE D'ACHAT  * CORRES
PONDANTE DANS LE FICHIER  DA ( BASE PRIMAIRE )       SELECT PRIMARY       STORE 
S.DANUM TO MDANUM       FIND &MDANUM    * SI LA DEMANDE D'ACHAT N'EXISTE PAS -- 
AFFICHAGE DES DATES SOUS  * LA FORME  "  /  /  "  IF #  0   14,36 SAY "  /  /  "
   14,71 SAY "  /  /  "    * SI LA DEMANDE D'ACHAT EXISTELLE  * EN STOCK -- MODI
FICATION DE LA QUANTITE EN STOCK,  PUIS  * AFFICHAGE DE LA  NOUVELLE  QUANTITE  
ET  DU  PRIX  TOTAL  * CORRESPONDANT      ELSE      REPLACE S.QTESTOCK WITH S.QT
ESTOCK - QUANTITE      STORE S.QTESTOCK * S.PRIXUHT TO PRIXTHT       20,67 SAY P
RIXTHT       20,35 SAY "        "       20,35 SAY S.QTESTOCK      ENDIF  ELSE   
   SELECT SECONDARY      IF !(REPONSE)  "R"    ********************** RECEPTION 
DE PIECE(S) ***********************  * CETTE OPTION VOUS PERMETTRA DE DECREME --
 AFFICHAGE DES RENSEIGNEMENTS  * COMPLEMENTAIRES CORRESPONDANT A CETTE DEMANDE D
'ACHAT.  ELSE           14,36 SAY DADATE                                     14,
53 SAY CMDNUM                                     14,71 SAY CMDDATE             
                       16,20 SAY QTECMD                            ENDIF    * AF
FICHAGE DES DIFFERENTES CARACTERISTIQUES DE LA PIECE        6,13 SAY S.ATELIER  
      6,31 SAY S.SECTION                                   6,47 SAY S.MACHINE   
                 PNTER LA QUANTITE RESTANT A *  * LIVRER ET INCREMENTER SIMULTAN
EMENT LA QUANTITE EN STOCK.        *  ******************************************
**************************         22,0 SAY "Donnez la quantite a entrer en stoc
k " GET QTE   PICTURE "9999"      READ  STORE VAL(QTE) TO QUANTITE    * SI LA QU
ANTITE SAISIE EST SUPERIEURE A CELLE RESTANT A LIVRER  * UN MESSAGE D'ERREUR SER
A AFFICHE, ET AUCUN TRAITEMENT NE SERA  * EFFECTUE.  IF QUANTITE  S.QTERESTE   2
3,0 SAY "Transaction impossible, Validez"  do while t  erase  store "     " to m
oismin  store "     " to moismax   2,0 say"           RELEVE(S) MENSUEL(S) DES D
EBITS ET CREDITS"   4,0 say "periode de debut de releve MM/AA " get moismin pict
ure "99/99"   6,0 say "periode de fin   de releve MM/AA " get moismax picture "9
9/99"  read  store $(moismin,4,2) + $(moismin,1,2) to moismin  store moismin to 
mini  store $(moismax,4,2) + $(moismax,1,2) to moismax  if moismin" " .and. mois
max" "  release moismin,moismax,mini  select primary  uSET CONSOLE OFF  WAIT  SE
T CONSOLE ON   23,0 SAY "                                "    * SI LA  QUANTITE 
A  DEDUIRE EST INFERIEURE OU EGALE A CELLE  * RESTANT A LIVRER -- MODIFICATION D
E LA QUANTITE EN STOCK,  * PUIS AFFICHAGE DE LA NOUVELLE QUANTITE EN STOCK ET DU
 PRIX  * TOTAL CORRESPONDANT  ELSE  REPLACE S.QTERESTE WITH S.QTERESTE - QUANTIT
E  REPLACE S.QTESTOCK WITH S.QTESTOCK + QUANTITE  STORE S.QTESTOCK * S.PRIXUHT T
O PRIXTHT   20,67 SAY PRIXTHT   20,35 SAY S.QTESTOCK   16,51 Sse  select seconda
ry  use  return  endif    if moismax  moismin   20,0 say "votre selection est in
coherente, edition du releve impossible .."  store 0 to tempo  do while tempo#50
  store tempo+1 to tempo  enddo tempo  release tempo  loop  endif    set exact o
ff  select primary  use credit index date-cre  select secondary  use debit index
 date-deb    * positionnement du pointeur d'enregistrement sur le premier debit 
  * et sur le premier credit dans la periode donnee  store "N" to fin1  store "N
" to fin2 AY "     "   16,51 SAY S.QTERESTE  ENDIF      ELSE    ****************
******** FIN DE TRAITEMENT ***********************  * CETTE OPTION TERMINE LA MO
DIFICATION ( RECEPTION OU SORTIE  DE *  * PIECE(S) DU STOCK ), ET VOUS PERMET DE
 PROCEDER A L'EVENTUELLE *  * MODIFICATION D'UNE AUTRE REFERENCE.               
             *  ****************************************************************
**    IF !(REPONSE)  "F"  STORE "N" TO CONTINU    * SI LA REPONSE EST DIFFERENTE
 DE  "R","S" OU "F" -- AFFICHAGE  do while (fin1"N" .or. fin2"N") .and. moisminm
oismax  select primary  if fin1"N"  find &moismin  if ##0  store "O" to fin1  en
dif  endif  select secondary  if fin2"N"  find &moismin  if ##0  store "O" to fi
n2  endif  endif  store $(moismin,3,2) to mois  store val(mois) to mois1  if moi
s112  store str(val(moismin)+1,4) to moismin  else  * janvier annee suivante  st
ore str(val(moismin)+89,4) to moismin  endif  enddo  release fin,mois,mois1  if 
fin1"N" .and. fin2"N"   20,0 say "aucun credit * D'UN MESSAGE D'ERREUR.  ELSE   
22,0 SAY "AUCUN TRAITEMENT NE CORRESPOND A VOTRE SELECTION   "  SET CONSOLE OFF 
 WAIT  SET CONSOLE ON  ENDIF FIN TRAITEMENT D'UNE PIECE      ENDIF RECEPTION  EN
DIF SORTIE  ENDDO CONTINU      ENDIF EXISTENCE D'UNE PIECE  ENDIF SAISIE NUMERO 
DE REFERENCE  ENDDO CONTENTSOR  ENDDO  S.QTESTOCK + QUANTITE  STORE S.QTESTOCK *
 S.PRIXUHT TO PRIXTHT   20,67 SAY PRIXTHT   20,35 SAY S.QTESTOCK   16,51 S ni de
bit n'a ete effectue dans cette periode"  store 0 to tempo  do while tempo#50  s
tore tempo+1 to tempo  enddo tempo  release tempo  loop  endif    * CALCUL DU SO
LDE ANTERIEURE A LA PERIODE DONNEE  select primary  store # to enrgprim  sum mon
tcre to totalcre for $(datecre,7,2)+$(datecre,4,2)mini  if enrgprim # 0  goto en
rgprim  endif  select secondary  store # to enrgseco  sum montdeb to totaldeb fo
r $(datedeb,7,2)+$(datedeb,4,2)mini  if enrgseco # 0  goto enrgseco  endif  rele
ase all li  Gke enrg*    store "N" to fin  store "N" to fin1  store "N" to fin2 
 store totalcre-totaldeb to solde  store 1 to ligne  store 1 to page  * entrez d
ans max le nombre de lignes par page diminue de 8  store 15 to max  erase   "   
                                                               page "  +str(page
,2)     "date      numero   libelle               credit      debit       solde"
   "           "     "********  *******  ancien sole,1,2)$(datedeb,7,2)+$(datede
b,4,2)+  $(datedeb,1,2)) .or. fin1"O")  if eof .or. #0 .or. $(datedeb,7,2)+$(dat
edeb,4,2)  moismax  store "O" to fin2  else  if lignemax  store 1 to ligne  stor
e page+1 to page   "                                         ----------  -------
---  ----------"   "SOUS-TOTAL                               "+str(totalcre,10,2
)+"  "+  str(totaldeb,10,2)+"  "+str(solde,10,2)  wait  erase   "               
                                                   page "  +strde          "+str
(totalcre,10,2)+"  "+  str(totaldeb,10,2)+"  "+str(solde,10,2)  do while fin"N" 
 if lignemax  store 1 to ligne  store page+1 to page   "                        
                 ----------  ----------  ----------"   "SOUS-TOTAL              
                 "+str(totalcre,10,2)+"  "+  str(totaldeb,10,2)+"  "+str(solde,1
0,2)  wait  erase   "                                                           
       page "  +str(page,2)     "date      numero   libelle               credit
 (page,2)     "date      numero   libelle               credit      debit       
solde"   "           "     "                   report                "+str(total
cre,10,2)+"  "+  str(totaldeb,10,2)+"  "+str(solde,10,2)  endif  store solde-mon
tdeb to solde   datedeb+"  "+numero+"  "+debiteur+"              "+str(montdeb,1
0,2)  +"  "+str(solde,10,2)  store ligne + 1 to ligne  store totaldeb+montdeb to
 totaldeb  skip  endif  enddo         debit       solde"   "           "     "  
                 report                "+str(totalcre,10,2)+"  "+  str(totaldeb,
10,2)+"  "+str(solde,10,2)  endif  select primary  store datecre to mdatecre  do
 while datecremdatecre .and. fin1"N" .and. (($(datecre,7,2)+  $(datecre,4,2)+$(d
atecre,1,2)$(datedeb,7,2)+$(datedeb,4,2)+  $(datedeb,1,2)) .or. fin2"O")  if eof
 .or. #0 .or. $(datecre,7,2)+$(datecre,4,2)  moismax if fin1"O" .and. fin2"O"  s
tore "O" to fin  endif  enddo   "                                         ------
----  ----------  ----------"   "TOTAL                                    "+str(
totalcre,10,2)+"  "+  str(totaldeb,10,2)+"  "+str(solde,10,2)  release totalcre,
totaldeb,solde,fin,fin1,fin2  wait  enddo  deb,10,2)+"  "+str(solde,10,2)  wait 
 erase   "                                                                  page
 "  +str store "O" to fin1  else  if lignemax  store 1 to ligne  store page+1 to
 page   "                                         ----------  ----------  ------
----"   "SOUS-TOTAL                               "+str(totalcre,10,2)+"  "+  st
r(totaldeb,10,2)+"  "+str(solde,10,2)  wait  erase   "                          
                                        page "  +str(page,2)     "date      nume
ro   libelle               credit      debit       solde"   "       M0,W71  Y  P
IECES NECESSITANT UNE COMMANDE DE REACTUALISATION   N  Y  N  12,PIECE  REFERENCE
  25,LIBELLE  DESIGNATION  8,QTESTOCK  STOCK  N  8,MINISTOCK  MINIMUM  N  7,QTER
ESTE  RESTE  N  10,(MINISTOCK-QTESTOCK-QTERESTE)*PRIXUHT  COUT CDE  Y  (montdeb,
10,2)  +"  "+str(solde,10,2)  store ligne + 1 to ligne  store totaldeb+montdeb t
o totaldeb  skip  endif  enddo        "     "                   report          
      "+str(totalcre,10,2)+"  "+  str(totaldeb,10,2)+"  "+str(solde,10,2)  endif
  store solde+montcre to solde   datecre+"           "+crediteur+"  "+str(montcr
e,10,2)  +"              "+str(solde,10,2)  store ligne + 1 to ligne  store tota
lcre+montcre to totalcre  skip  endif  enddo    select secondary  store datedeb 
to mdatedeb  do while datedebmdatedeb .and. fin2"N" .and. (($(datecre,7,2)+  $(d
atecre,4,2)+$(datecr  P SAY "                                        "  ELSE  * 
CALCUL DU NUMERO DE SEMAINE  STORE INT(((M-1)*30+J+6)/7) TO SEMAINE  * ANNULATIO
N DES VARIABLES MEMOIRE INUTILES  RELEASE J,M,AN,CONTDATE,BISSEXTILE,CALCUL  * A
FFICHAGE DU DEUXIEME MENU  DO MENU2  ENDIF  * FIN DU MENU INITIAL  ENDDO INITIAL
  amp.  Cet         ordre  logique  peut etre ascendant ou descendant.  Aucune  
modification         n'est  effectue sur le f******************** FICHIER DE COM
MANDE INITIAL ******************  * Ce fichier de commande est le premier a etre
 execute. Il permet *  * la saisie et le controle de  la date  du jour avant d'e
nchainer *  * le traitement sur le menu principal  MENU2                     *  
*******************************************************************    * SET TAL
K OFF INTERDIT DE RENVOYER VERS L'ECRAN LES DIFFERENTS  * MESSAGES GENERES PAR D
BASE II LORS D'UN TRAITEMENT  SET TALK OFF    * SET COLON OFF PERMET DE NE PicAS
 ENCADRER PAR  "", LES  * ZONES DE SAISIE ( INSTRUCTION "GET" )  SET COLON OFF  
* EFFACEMENT DE L'ECRAN    ERASE   10,25 SAY "Donnez la date "  * AFFECTATION DE
 LA VARIABLE  DATE  STORE "        " TO DATE  **********************************
**********************************  * Toutes les instructions situees entre DO W
HILE CONTDATE  "O" et *  * ENDDO seront executees tant que la variable CONTDATE 
 sera egale *  * a "O". Pour sortir d'une boucle de ce type il faut  soit  modi-
 *  * fier le contenu deRIFICATION DE LA DATE SAISIE  STORE VAL($(DATE,1,2)) TO 
J  STORE VAL($(DATE,4,2)) TO M  STORE VAL($(DATE,7,2)) TO AN  STORE INT(AN/4) TO
 CALCUL  IF (AN/4)-CALCUL0  STORE "OUI" TO BISSEXTILE  ELSE  STORE "NON" TO BISS
EXTILE  ENDIF  IF AN81 .OR. M1 .OR. M12 .OR. J1 .OR. J31 .OR. (( M4 .OR. M6 .OR.
  M9 .OR. M11) .AND. J30 ) .OR. ( M2 .AND. J29) .OR. (BISSEXTILE"NON"   .AND. M2
 .AND. J28)   22,0 SAY "Date incorrecte, appuyez sur une touche"  SET CONSOLE OF
F  WAIT  SET CONSOLE ON   22,0 S la variable  --  dans notre cas,  modifier le *
  * contenu de CONTDATE --,  soit  utiliser  une  commande de sortie *  * comme 
QUIT ou RETURN,  soit  lancer un nouveau  fichier de  com- *  * mande. Ce sera c
ette derniere possibilite que  nous  utiliserons *  * dans notre exemple  DO MEN
U2.                                   *  ***************************************
*****************************    STORE "O" TO CONTDATE  DO WHILE CONTDATE"O"  * 
SAISIE DE LA DATE   10,40 GET DATE PICTURE "99/99/99"  READ  * VERIFICATION DE L
A DATE SAISIE  STORE VAL($(DATE,1,2)) TO J  STORE VAL($(DATE,4,2)) TO M  STORE V
AL($(DATE,7,2)) TO AN  STORE INT(AN/4) TO CALCUL  IF (AN/4)-CALCUL0  STORE "OUI"
 TO BISSEXTILE  ELSE  STORE "NON" TO BISSEXTILE  ENDIF  IF AN  81 .OR. M1 .OR. M
12 .OR. J1 .OR. J31 .OR. (( M4 .OR. M6 .OR.  M9 .OR. M11) .AND. J30 ) .OR. ( M2 
.AND. J29) .OR. (BISSEXTILE"NON"   .AND. M2 .AND. J28)   22,0 SAY "Date incorrec
te, appuyez sur une touche"  SET CONSOLE OFF  WAIT  SET CONSOLE ON   22,0  P****
******************* MENU PRINCIPAL *********************************  * Ce menu 
est le menu principal de l'application. Il vous proposera un *  * choix de trois
 selections primaires. Selon votre reponse,  il execu- *  * tera le traitement c
orrespondant en enchainant des menus secondaires *  ****************************
********************************************  STORE 'O' TO CONTMENU2  DO WHILE C
ONTMENU2  'O'  STORE 'F' TO REPONSE2  * EFFACEMENT DE L'ECRAN, AFFICHAGE DU MENU
, SAISIE DE LA REPONSE  ERASE    6, 0 SAY "+------------------------------------
-------------------------  -----------------+"    7, 0 SAY "I                   
                                                             I"    8, 0 SAY "I  
               Quel traitement desirez-vous effectuer                        I" 
   9, 0 SAY "I                                                                  
              I"   10, 0 SAY "I Modification ou consultation des pieces detachee
s  1                    I"   11, 0 SAY " 2,0 say "                    MODIFICATI
ON D'UN CREDIT"   4,0 say "date  " get datecre picture "99/99/99"   $,20 say "cr
editeur  " get crediteur   7,0 say "commentaire  " get comcre   7,50 say "montan
t             F"   7,60 say montcre using "******.99"   15,0 say "enregistrement
    suivant    C   precedent R"   16,0 say "champ             suivant    X   pre
cedent E"   17,0 say "caractere         suivant    D   precedent S"   18,0 say "
fin modification             W "  I                                             
                                   I"   12, 0 SAY "I Modification ou consultatio
n des demandes d'achat  2                    I"   13, 0 SAY "I                  
                                                              I"   14, 0 SAY "I 
Fin de traitement                                  F                    I"   15,
 0 SAY "I                                                                       
         I"   16, 0 SAY "+------------------------------------------------------
-------  -----------------+"   17, 0 SAY "+----------------------+"   18, 0 SAY 
"I Reponse --          I"   19, 0 SAY "+----------------------+"   18,14 GET REP
ONSE2  READ  * FIN DU TRAITEMENT SI LA REPONSE EST  "F"  IF !(REPONSE2)  'F'  QU
IT  ELSE  * TRAITEMENT DU STOCK SI LA REPONSE EST  "1"  IF REPONSE2  '1'  DO TRA
STOCK  ELSE  * TRAITEMENT DES DEMANDES D'ACHAT SI LA REPONSE EST  "2"  IF REPONS
E2  '2'  DO TRADA  ELSE  * SI LA REPONSE EST DIFFEREN**************** MODIFICATI
ON DE DEMANDES D'ACHAT ***************    SET EXACT ON  * DEFINITION DE LA BASE 
PRIMAIRE  SELECT PRIMARY  USE STOCK INDEX PIECE  * DEFINITION DE LA BASE SECONDA
IRE  SELECT SECONDARY  USE DA INDEX DA  STORE "NON" TO EFFACEMENT  STORE 'O' TO 
CONTAJ  DO WHILE CONTAJ  'O'  CLEAR GETS  SELECT SECONDARY  STORE '          ' T
O MDANUM  * EFFACEMENT DES DIFFERENTES ZONES DE SAISIE A L'ECRAN   5,27 SAY  '  
        '    5,47 SAY "              "   5,66 SAY "          "   7,11 SAY  '   T
E DE "1", "2" OU "F" - MESSAGE D'ERREUR   22,0 SAY 'VOTRE SELECTION EST INVALIDE
, VALIDEZ'  * ARRET DE L'AFFICHAGE A L'ECRAN, POUR NE PAS AFFICHER LE MESSAGE  *
 D'ATTENTE  SET CONSOLE OFF  WAIT  * ANNULATION DE LA COMMANDE D'ARRET DE L'AFFI
CHAGE, APRES LA SAISIE  * D'UN CARACTERE  SET CONSOLE ON  ENDIF 2  ENDIF 1  ENDI
F F  ENDDO MENU2   15, 0 SAY "I                                                 
                               I"   16, 0 SAY "+----------------  H             
           '   8,45 SAY  '                 '    9,11 SAY  '        '    14,2 SAY
 '                                          '   14,46 SAY '                     
    '   18,1 SAY  '            '    18,14 SAY '              '    18,31 SAY '   
                               '    18,67 SAY '            '    20,13 SAY '     
                      '    20,71 SAY '     '   22,0 SAY '                       
                                                '   23,0 SAY '                  
       GET MPRIXUHT                          20,13 GET MIMPUTATIO               
          20,72 GET MDELAI PICTURE "99"                  READ                   
                                    * SI AUCUNE MODIFICATION N'A ETE EFFECTUEE -
 EFFACEMENT OUI/NON         IF MDADATES.DADATE .AND. MCMDNUMS.CMDNUM .AND.   MCM
DDATES.CMDDATE .AND. MEMETTEURS.EMETTEUR .AND. MSECTIONS.SECTION    .AND. MTYPES
.TYPE .AND. MFOURNIS.FOURNI .AND. MQTECMDS.QTECMD    .AND. MPRIXUHTS.PRIXUHT .AN
D. MIMPUT        '  * SAISIE DU NUMERO DE LA DEMANDE D'ACHAT   5,10 GET MDANUM  
READ  * SI AUCUN NUMERO N'EST SAISI - RETOUR AU MENU TRAITEMENT DES D.A.  IF MDA
NUM  ' '  SET EXACT OFF  IF EFFACEMENT"OUI"   22,0 SAY "Prise en compte des modi
fications en cours."   23,0 SAY "Veuillez patienter quelques instants ......"  P
ACK  ENDIF  RELEASE MDANUM,MDADATE,MTYPE,MEMETTEUR,MSECTION,MFOURNI,MPIECE  RELE
ASE MQTECMD,MIMPUTATIO,MDELAI,MPRIXUHT,EFFACEMENT  RELEASE MCMDNUM,MCMDDATE,REPO
NSE  RETURN  ELSE  * RECHERATIOS.IMPUTATION .AND.   VAL(MDELAI)DELAI      STORE 
"N" TO REPONSE       22,0 SAY "Voulez-vous l'effacer  (O/N) " GET REPONSE      R
EAD  IF REPONSE  "O"  IF QTERESTE-QTECMD  0   22,0 SAY "Toute ou partie de cette
   commande est livree"   23,0 SAY "Effacement impossible, Validez ."  SET CONSO
LE OFF  WAIT  SET CONSOLE ON   22,0 SAY "                                       
      "   23,0 SAY "                                  "  ELSE  SELECT SECONDCHE 
L'EXISTENCE DE LA DEMANDE D'ACHAT SAISIE DANS LA BASE SECONDAIRE  SELECT SECONDA
RY  FIND &MDANUM  IF #  0 .OR. *    22,0 SAY 'La D.A. '   22,9 SAY MDANUM   22,2
1 SAY 'ne figure pas dans le fichier, Validez'  SET CONSOLE OFF  WAIT  SET CONSO
LE ON          ELSE                                        * RECHERCHE L'EXISTEN
CE DE LA REFERENCE SAISIE DANS LA BASE PRIMAIRE  SELECT PRIMARY  STORE S.PIECE T
O MPIECE  FIND &MPIECE  IF #  0   18,14 SAY MPIECE   22,0 SAY "La piece "   22,A
RY  STORE "OUI" TO EFFACEMENT  DELETE  SELECT PRIMARY  REPLACE P.DANUM WITH "   
       "  REPLACE QTERESTE WITH QTERESTE - QTECMD  ENDIF  ENDIF      ELSE       
IF QTERESTE-QTECMD  0        22,0 SAY "Toute ou partie de cette commande est liv
ree"        23,0 SAY "Modification impossible, Validez ."       SET CONSOLE OFF 
      WAIT       SET CONSOLE ON        22,0 SAY "                               
              "        23,0 SAY "                       9 SAY MPIECE   22,21 SAY
 " ne figure plus dans le fichier"   23,0 SAY "Modification impossible"  SET CON
SOLE OFF  WAIT  SET CONSOLE ON  ELSE                   14,46 SAY P.MACHINE      
                     18,31 SAY P.LIBELLE          SELECT SECONDARY  STORE S.DADA
TE TO MDADATE  STORE S.CMDNUM TO MCMDNUM  STORE S.CMDDATE TO MCMDDATE  STORE S.T
YPE TO MTYPE  STORE S.EMETTEUR TO MEMETTEUR  STORE S.SECTION TO MSECTION  STORE 
S.FOURNI TO MFOURNI  STORE S.QTECMD TO MQTECM            "       ELSE    * MISE 
A JOUR DE LA REFERENCE CONCERNEE DANS LA BASE PRIMAIRE  * BASE PRIMAIRE  BASE DU
 STOCK DES PIECES DETACHEES      SELECT PRIMARY      REPLACE QTERESTE WITH P.QTE
RESTE + (MQTECMD - S.QTECMD)                      REPLACE QTECMD WITH MQTECMD   
                                           REPLACE PRIXUHT WITH MPRIXUHT        
                * ENREGISTREMENT DE LA DEMANDE D'ACHAT DANS LA BASE SECONDAIRE  
* BASE SECONDAIRE  BASE DES DEMANDES D'ACHAT      SELECT SED  STORE S.IMPUTATION
 TO MIMPUTATIO  STORE STR(S.DELAI,2) TO MDELAI          STORE S.PRIXUHT TO MPRIX
UHT                   5,27 GET MDADATE PICTURE "99/99/99"   5,47 GET MCMDNUM   5
,66 GET MCMDDATE PICTURE "99/99/99"                   7,11 GET MEMETTEUR        
                   9,11 GET MSECTION                            8,45 GET MTYPE  
                             14,2 GET MFOURNI                             18,1 G
ET MQTECMD            18,14 SAY MPIECE                   18,67  HCONDARY        
              REPLACE DADATE WITH MDADATE                              REPLACE C
MDNUM WITH MCMDNUM      REPLACE CMDDATE WITH MCMDDATE                      REPLA
CE EMETTEUR WITH MEMETTEUR                                            REPLACE SE
CTION WITH MSECTION                                              REPLACE TYPE WI
TH MTYPE                                                    REPLACE FOURNI WITH 
MFOURNI                                                REPLACE QTECMD WITH MQTEC
MD   ORE 'O' TO CONTMODIF  DO WHILE CONTMODIF  'O'    CLEAR GETS  * SELECTION DE
 LA BASE SECONDAIRE - STOCK  SELECT SECONDARY  STORE "N" TO REPONSE  STORE '    
        ' TO MPIECE  * EFFACEMENT DES DIFFERENTES ZONES DE SAISIE A L'ECRAN   6,
13 SAY  '       '    6,31 SAY  '       '    6,47 SAY  '                         
  '    8,17 SAY  '                                     '    14,13 SAY '         
 '                              14,36 SAY '  /  /  '                            
 14,53 SAY '            '                                             REPLACE PR
IXUHT WITH MPRIXUHT                                            REPLACE IMPUTATIO
N WITH MIMPUTATIO                                         REPLACE DELAI WITH VAL
(MDELAI)       ENDIF      ENDIF  ENDIF  ENDIF                                   
               ENDIF                  ENDDO MODIFDA    * ENREGISTREMENT DE LA DE
MANDE D'ACHAT DANS LA BASE SECONDAIRE  * BASE SECONDAIRE  BASE DES DEMANDES D'AC
HAT      SELECT SE 14,71 SAY '  /  /  '                            16,20 SAY '  
     '   16,51 SAY '          '                           20,3  SAY '           
 '    20,39 SAY '        '   20,48 SAY '            '    20,61 SAY '            
     '   * SAISIE DU NUMERO DE REFERENCE   10,11 GET MPIECE  READ  * SI AUCUN NU
MERO DE REFERENCE N'EST SAISIE,  FIN DE MODIFICATION  IF MPIECE  ' '  RELEASE MP
IECE,REPONSE    * SI UN EFFACEMENT A ETE EXECUTE LE CONTENU DE LA VARIABLE EFFAC
EMENT   * EST  "OUI". DANS CE CAS ON D**************** MODIFICATION(S) D'ENREGIS
TREMENT(S) ***************   * CE FICHIER DE COMMANDE VOUS  PERMETTRA  DE  MODIF
IER  CERTAINES  *   * DES RUBRIQUES CONSTITUANT UNE PIECE.                      
       *   * LES RUBRIQUES COMPLEMENTAIRES A UN NUMERO  DE  DEMANDE  D'ACHAT  * 
  * ( DATE DE LA DEMANDE D'ACHAT, DATE DE LA  COMMANDE,  NUMERO  DE  *   * LA CO
MMANDE, QUANTITE COMMANDEE ) NE FIGURANT PAS - CELA SERAIT  *   * INUTILE - DANS
 L'ENREGISTREMENT D'UNE PIECE,  NOUS  UTILISERONS  *   * SIMULTANEMENTETRUIRA DE
FINITIVEMENT LES ENREGISTRE-  * MENTS PRECEDEMMENT MARQUES ( DELETE).  IF EFFACE
MENT  "OUI"   22,0 SAY "Prise en compte des modifications en cours."   23,0 SAY 
"Veuillez patienter quelques instants ......"  PACK  ENDIF  SET EXACT OFF  RETUR
N  ELSE  * RECHERCHE DE L'EXISTENCE DU NUMERO DE REFERENCE SAISIE DANS LE FICHIE
R  * DES PIECES DETACHEES    FIN &MPIECE    IF #  0 .OR. *      22,0 SAY 'La pie
ce '     22,9 SAY MPIECE     22,21 SAY ' ne figure pas dans le fichier, VALIDEZ'
    SET CONSOL DEUX BASES DE DONNEES  1. BASE STOCK              *   *          
                             2. BASE DA                 *   * CE QUI NOUS PERMET
TRA PAR LE BIAIS DE LA BASE  "DA" D'AFFICHER  *   * LES  RENSEIGNEMENTS  COMPLEM
ENTAIRES  DE  LA  PIECE EN COURS DE  *   * MODIFICATION.                        
                            *   * dBASE II PERMET DE GERER SIMULTANEMENENT DEUX 
BASES DE DONNEES.  *   * APRES L'AFFECTATION DE LA BASE PRIMAIRE ET DE LA BASE S
ECONDAIRE *  * IL SUFFIRA DE SELECTIONNER LAE OFF    WAIT    SET CONSOLE ON     
22,0 SAY '                                                             '     ELS
E    * SELECTION DE LA BASE PRIMAIRE - DA    SELECT PRIMARY    STORE S.DANUM TO 
MDANUM    FIND &MDANUM  IF #  0   14,36 SAY "  /  /"   14,71 SAY "  /  /"   ELSE
   14,13 SAY P.DANUM                                      14,36 SAY DADATE      
                               14,53 SAY CMDNUM                                 
    14,71 SAY CMDDATE                                   BASE CONCERNEE ( SELECT 
PRIMARY OU *  * SELECT SECONDARY )  POUR  EFFECTUER  UN  QUELCONQUE  TRAITEMENT.
 *  * L'UTILISATION DE CETTE FONCTION PERMET  DE  RESERVER EN  MEMOIRE *  * CENT
RALE UN EMPLACEMENT A CHACUNE DES BASES.                     *  ****************
****************************************************    SET EXACT ON  * DEFINITI
ON DE LA BASE PRIMAIRE  SELECT PRIMARY  USE DA INDEX DA    * DEFINITION DE LA BA
SE SECONDAIRE  SELECT SECONDARY  USE STOCK INDEX PIECE    STORE "NON" TO EFFACEM
ENT  ST  P  16,20 SAY P.QTECMD                            ENDIF     16,51 SAY S.
QTERESTE                             20,39 SAY S.QTESTOCK    STORE S.ATELIER TO 
MATELIER    STORE S.SECTION TO MSECTION    STORE S.MACHINE TO MMACHINE    STORE 
S.LIBELLE TO MLIBELLE    STORE S.MINISTOCK TO MMINISTOC    STORE S.PRIXUHT TO MP
RIXUHT     6,13 GET MATELIER         6,31 GET MSECTION                          
              6,47 GET MMACHINE                                        8,17 GET 
MLIBELLE                   .numerocre,7,2)+$(datecre,4,2)+$(datecre,1,2)t the hi
re date for validity        STORE hiredate T830629830731830820830820830903830903
830903830907830915840101 830815830815830815830815830815830815830815830815      -
    232-3232 12/31/80  /  /  fot1234.0001234.000bal  14,10 SAY "Hire date"      
       14,28 GET Meadate PICTURE '99/99/99'            READ            STORE T T
O Meanodate          ENDIF        ENDDO        S                     20,3  GET M
MINISTOC                                    20,48 GET MPRIXUHT                  
                   READ  * CALCUL DU MONTANT TOTAL DU STOCK POUR CETTE PIECE    
STORE MPRIXUHT * QTESTOCK TO MPRIXTHT     20,67 SAY MPRIXTHT    SELECT SECONDARY
  * SI AUCUN PARAMETRE N'A CHANGE -- PROPOSITION EFFACEMENT       IF MATELIERATE
LIER .AND. SECTIONMSECTION .AND. MACHINEMMACHINE        .AND. LIBELLEMLIBELLE .A
ND. MINISTOCKMMINISTOC .AND.        PRIXUHTMPRIXUHT       1234567136206213620631
36206413620651362066136206713620681362069 13620701362071136207213620731362074136
207513620761362077136207813620791362080136208113620821362083!1362084"1362085#136
2086 99999999999999999999999999999999999999999999999999999999 9999999$9999999  S
ET colon OFF         22,0 SAY "Is the employee data correct (Y/N) " GET Meaok   
     READ        SET colon  22,0 SAY "Voulez-vous l'effacer  " GET REPONSE      
 READ        22,0 SAY "                                   "  IF REPONSE  "O"  DE
LETE  STORE "OUI" TO EFFACEMENT  ENDIF       ELSE  * ENREGISTREMENT DES INFORMAT
IONS MODIFIEES       REPLACE ATELIER WITH MATELIER                              
  REPLACE SECTION WITH MSECTION                                REPLACE MACHINE W
ITH MMACHINE                                REPLACE LIBELLE WITH MLIBELLE       
                         REPLACE PIECE WITH MPIECE PIECEMERO DE LA DEMANDE D'ACH
AT   5,10 GET MDANUM  READ  * SI AUCUN NUMERO N'EST SAISIE - RETOU12312312332112
34567891231234567891241234567891251234567891261234567891271234567891291234567891
3212345678914721256   545545    5532652   5543251   5642351   5685231   785469  
  987654654    345678912345456123123123                                    REPLA
CE PRIXUHT WITH MPRIXUHT                              REPLACE MINISTOCK WITH MMI
NISTOC                          ENDIF    ENDIF                                  
                 ENDIF  ENDDO MODISTOC  XTHT    SELECT SECONDARY  * SI AUCUN PAR
AMETRE N'A CHANGE -- PROPOSITION EFFACEMENT       IF MATELIERATELIER .AND. SECTI
ONMSECTION .AND. MACHINEMMACHINE        .AND. LIBELLEMLIBELLE .AND. MINISTOCKMMI
NISTOC .AND.        PRIXUHTMPRIXUHT       12345678912312345678912412345678912512
3456789126123456789127123456789129123456789147125         12345678914721256   54
5545    5532652   5543251   5642351   5685231   785469    987654654    345678912
345456123123123 456434523984456456      789456123456987987654654$1254        -12
5423      412543       31254855     ,180183      *21          )210183      /2154
        22222222222223456789123  P12345678    4235         2512        6253     
    ,2531        25454545241K2546        -323232       345678912345456123      4
56123123123"4563211     456434523984456456      4567891234562521         3523   
      5454        A54654321    C5745454521  59788888    65464364    .654654-564 
 B65545432541  789456123456999999999999BATON       "CLOVIS      ER          FRIE
N       MACHINE     VIS 04 SI                                                   
                      I"    7, 0 SAY "I                                         
                                       I"    8, 0 SAY "I   LISTE DES COMMANDES A
VEC UN DELAI DE LIVRAISON NON   RESPECTE -- 1          I"    9, 0 SAY "I        
                                                                        I"   10,
 0 SAY "I   LISTE DES DEMANDES D'ACHAT SELON LE NOM DE L'EMET  TEUR       -- 2  
        I"   11, 0 SAY "I                          1234567891222345678912347523 
        456123      456123123123456434523984456456      45678912345659788888    
 789456123456999999999999BATON       ER          FRIEN       MACHINE     VIS 04 
SI    2546         3456789123454           456123      4561231231234564345239844
56456      45678912345659788888     789456123456999999999999BATON       ER      
    FRIEN       MACHINE     VIS 04 SI                                           
             I"   12, 0 SAY "I   LISTES DES DEMANDES D'ACHAT DANS UNE PERIODE DO
NN  EE         -- 3          I"   13, 0 SAY "I                                  
                                              I"   14, 0 SAY "I   FIN DE TRAITEM
ENT                                             -- F          I"   15, 0 SAY "I 
                                                                               I
"   16, 0 SAY "I                                           123456789123123456789
124123456789125123456789126123456789127125354      !1254        )125423      012
543       /1254855     (180183      &210183      +2154        222222222222234567
89123423456789123423456789123423456789123412345678912512345678912612345678912712
5354      $1254        -125423      412543       31254855     ,180183      *21  
        )210183      /2154        22222222222223456789123                       
              I"   17, 0 SAY "I                                                 
                               I"   18, 0 SAY "I                                
                                                I"   19, 0 SAY "+---------------
-------------------------------------  --------------------------+"   20,59 SAY 
"I REPONSE"   20,69 GET REPONSE5   20,79 SAY "I"   21,59 SAY "+-----------------
--+"  READ  IF !(REPONSE5)#"F" .AND. REPONSE5#"1" .AND. REPONSE5#"2" .AND. REP75
454        954654321    5745454521  59788888    865464364    *654654-564  655454
32541 789456123456987987654654999999999999BATON       CLOVIS      ER          FR
IEN       MACHINE     VIS 04 SI   !5252        5454        A54654321    C5745454
521  59788888    65464364    .654654-564  B65545432541  789456123456999999999999
BATON       "CLOVIS      ER          FRIEN       MACHINE     VIS 04 SI  ONSE5#"3
"   22,0 SAY "AUCUN TRAITEMENT NE CORRESPOND A VOTRE SELECTION"  ELSE   IF !(REP
ONSE5)  "F"   RELEASE REPONSE5,CONTREPORT,IMPRIMANTE   RETURN   ELSE    22,0 SAY
 "Desirez-vous une sortie sur imprimante (O/N)  " GET IMPRIMANTE   READ     IF R
EPONSE5  "1"     ERASE          IF !(IMPRIMANTE)  "O"  REPORT FORM SELECTDA FOR 
DELAI  SEMAINE .AND. $(DATE,7,2)          $(DADATE,7,2) TO PRINT  ELSE  REPORT F
ORM SELECTDA FOR DELAI  SEMAINE .AND. $(DATE,7,2)          $(DADATE,7,2)   ENDIF
     E******************** GENERATION D'ETAT(S) **********************    USE DA
 INDEX DA  STORE "O" TO CONTREPORT  DO WHILE CONTREPORT  "O"  STORE "N" TO IMPRI
MANTE  STORE "F" TO REPONSE5  ERASE    3, 0 SAY "+------------------------------
----------------------  --------------------------+"    4, 0 SAY "I             
                                                                   I"    5, 0 SA
Y "I                   GENERATION D'ETAT SUIVANT VOTRE   CHOIX                  
    I"    6, 0 SAY "I           PLSE          IF REPONSE5  "2"                  
                      ERASE           4,0 SAY " "                               
                     ACCEPT "Donnez le nom de l'emetteur " TO PARAMETRE         
    ERASE                                                    IF !(IMPRIMANTE)  "
O"  REPORT FORM EMETDA FOR PARAMETRE $ EMETTEUR TO PRINT  RELEASE PARAMETRE  ELS
E  REPORT FORM EMETDA FOR PARAMETRE $ EMETTEUR  RELEASE PARAMETRE  ENDIF  ELSE  
   IF REPONSE5  "3"     ERASE     STOR                                          
              I"   11, 0 SAY "I  LISTE DES PIECES SELON UNE PLAGE DE PRIX       
       -- 3                   I"   12, 0 SAY "I                                 
                                REPONSE        I"   13, 0 SAY "I  FIN DE TRAITEM
ENT                                     -- F                   I"   14, 0 SAY "I
                                                                                
I"   15, 0 SAY "I                                         E "     " TO PERIODE  
    1,0 SAY "Donnez la periode 'MM/AA' " GET PERIODE PICTURE "99/99"     READ   
  STORE "FOR $(DADATE,4,5)  PERIODE" TO CONDITION  ERASE  IF !(IMPRIMANTE)  "O" 
 REPORT FORM DADATE &CONDITION TO PRINT  RELEASE CONDITION,DATE1,DATE2  ELSE   R
EPORT FORM DADATE &CONDITION  RELEASE CONDITION,PERIODE  ENDIF     ELSE     ENDI
F 3  ENDIF 2     ENDIF 1   ENDIF F  ENDIF   "Validez"  SET CONSOLE OFF  WAIT  SE
T CONSOLE ON   22,0 SAY "                                                       
        I"   16, 0 SAY "I                                                       
                         I"   17, 0 SAY "I                                      
                                          I"   18, 0 SAY "I                     
                                                           I"   19, 0 SAY "I    
                                                                            I"  
 20, 0 SAY "+----------------------------------------------------  ---          
              "  ENDDO GENERATION D'ETAT(S)                          ACCEPT "Don
nez le nom de l'emetteur " TO PARAMETRE             ERASE                       
                             IF !(IMPRIMANTE)  "O"  REPORT FORM EMETDA FOR PARAM
ETRE $ EMETTEUR TO PRINT  RELEASE PARAMETRE  ELSE  REPORT FORM EMETDA FOR PARAME
TRE $ EMETTEUR  RELEASE PARAMETRE  ENDIF  ELSE     IF REPONSE5  "3"     ERASE   
  STOR-----------------------+"   12,72 GET REPONSE4  READ  * SI LA SELECTION ES
T DIFFERENTE DE "1", "2" OU "3" - AFFICHAGE D'UN  * MESSAGE D'ERREUR.  IF !(REPO
NSE4)#"F" .AND. REPONSE4#"1" .AND. REPONSE4#"2" .AND. REPONSE4#"3"   22,0 SAY "A
ucun traitement ne correspond a votre selection"  ELSE   IF !(REPONSE4)"F"   REL
EASE REPONSE4,CONTREPORT,IMPRIMANTE,PARAMETRE   RETURN   ELSE    22,0 SAY "Desir
ez-vous une sortie sur imprimante (O/N)  " GET IMPRIMANTE   READ   ERASE    * SI
 LA SELECTION EST  "1"  --  IM********** GENERATION D'ETAT POUR LE FICHIER STOCK
 *************  * CE FICHIER DE COMMANDE VOUS PERMETTRA D'IMPRIMER SUR L'ECRAN *
  * ( ET EVENTUELLEMENT SUR L'IMPRIMANTE ), LES  ENREGISTREMENTS *  * CORRESPOND
ANTS A VOTRE SELECTION.                            *  **************************
**************************************    USE STOCK INDEX PIECE  STORE 'O' TO CO
NTREPORT  DO WHILE CONTREPORT  'O'  STORE "F" TO REPONSE4  STORE "N" TO IMPRIMAN
TE  ERASE    3,27 SAY "SORTIE D'ETAT"    5, 0 SAY "+-------PRESSION  DE TOUS LES
  ENREGISTREMENTS  * POUR LESQUELS LA SOMME DE LA QUANTITE EN STOCK ET CELLE RES
TANT A LIVRER  * EST INFERIEURE A LA QUANTITE MINIMUM.      IF REPONSE4  "1"    
   IF !(IMPRIMANTE)  "O"       REPORT FORM ETATMINI FOR QTESTOCK + QTERESTE  MIN
ISTOCK TO PRINT       ELSE       REPORT FORM ETATMINI FOR QTESTOCK + QTERESTE  M
INISTOCK       ENDIF    ELSE    * SI LA SELECTION EST  "2" - SAISIE DU LIBELLE R
ECHERCHE, ET   IMPRESSION  * DE TOUS LES ENREGISTREMENTS DONT LA ZONE LIBELLE C-
--------------------------------------------  --------------------------+"    6,
 0 SAY "I                                                                       
         I"    7, 0 SAY "I  LISTE DES COMMANDES POUR REACTUALISER LE STOCK      
  -- 1                   I"    8, 0 SAY "I                                      
                                          I"    9, 0 SAY "I  LISTE DES PIECES SE
LON LE LIBELLE DE VOTRE CHOIX      -- 2                   I"   10, 0 SAY "I     
                     PONTIENT TOUTE OU PARTIE  * DU PARAMETRE RECHERCHE.        
 IF REPONSE4  "2"        4,0 SAY " "       ACCEPT "Donnez le parametre recherche
 " TO PARAMETRE       ERASE       STORE !(PARAMETRE) TO PARAMETRE       IF !(IMP
RIMANTE)  "O"       REPORT FORM SELESTOC FOR "&PARAMETRE" $ LIBELLE TO PRINT    
   ELSE       REPORT FORM SELESTOC FOR "&PARAMETRE" $ LIBELLE  ENDIF  ELSE    * 
SI LA SELECTION EST  "3" - SAISIE DE LA PLAGE DE PRIX PUIS  * IMPRESSION DE TOUS
 LES ENREGISTREMENTS DONT LE PRIX UNITAIRE  * EST COMPRIS ENTRE CES DEUX EXTREME
S.      IF REPONSE4  "3"            STORE 0.00 TO PRIX1            STORE 0.00 TO
 PRIX2             1,0 SAY "Donnez le prix minimum " GET PRIX1             2,0 S
AY "Donnez le prix maximum " GET PRIX2    READ    ERASE            STORE "FOR PR
IXUHTPRIX1 .AND. PRIXUHTPRIX2" TO CONDITION        IF !(IMPRIMANTE)  "O"       R
EPORT FORM SELESTOC &CONDITION TO PRINT       RELEASE CONDITION,PRIX1,PRIX2     
  ELSE       REPORT FORM SELESTOC &CONDITION       RELEAW71,M0  Y  ETAT DU STOCK
 SELON VOTRE SELECTION   N  Y  N  15,PIECE  REFERENCE  20,LIBELLE  DESIGNATION  
6,QTESTOCK  STOCK  N  9,PRIXUHT  PRIX UHT  N  12,QTESTOCK * PRIXUHT  PRIX THT  Y
   * SI LA SELECTION EST  "3" - SAISIE DE LA PLAGE DE PRIX PUIS  * IMPRESSION DE
 TOUS LES ENREGISTREMENTS DONT LE PRIX UNITAIRE SE CONDITION,PRIX1,PRIX2       E
NDIF            ENDIF 3       ENDIF 2    ENDIF 1   ENDIF F  ENDIF   "Validez"  S
ET CONSOLE OFF  WAIT  SET CONSOLE ON   22,0 SAY "                               
                  "  ENDDO  ELESTOC FOR "&PARAMETRE" $ LIBELLE TO PRINT       EL
SE       REPORT FORM SELESTOC FOR "&PARAMETRE" $ LIBELLE  ENDIF  ELSE    * SI LA
 SELECTION EST  "3" - SAISIE DE LA PLAGE DE PRIX PUIS  * IMPRESSION DE TOUS LES 
ENREGISTREMENTS DONT LE PRIX UNITAIRE uATELIERCvSECTIONCvMACHINECvLIBELLEC#vPIEC
ECvDANUMC vQTERESTENwQTESTOCKNwPRIXUHTNwMINISTOCKNw W70,M0  Y  LISTE DES COMMAND
ES AVEC DES DELAIS DE LIVRAISON NON RESPECTES  N  Y  N  12,DANUM  NUMERO DA  14,
CMDNUM  NUMERO CDE  15,EMETTEUR  EMETTEUR  15,FOURNI  FOURNISSEUR  12,DELAI  N. 
SEMAINE  N   * SI LA SELECTION EST  "3" - SAISIE DE LA PLAGE DE PRIX PUIS  * IMP
RESSION DE TOUS LES ENREGISTREMENTS DONT LE PRIX UNITAIRE   P BD12301234PERCEUSE
 N.1541          FORET DIAMETRE 2.5                 1234567891239876543219    4 
   20     2.50  50 BD14702589PERCEUSE N.1253          FORET DIAMETRE 5          
         1234567891249876543218    4    26     2.75  25 BD52302158PERCEUSE N.142
8          FORET DIAMETRE 10                  1234567891259876543217    4    98 
    7.50 100 BD12702845PERCEUSE N.1439          FORET DIAMETRE 10.5             
   123456789126              0    20     5.25  25 BD15801254PERCEUSE N.1425     
      55     1     3.00 100     2F   MOTEUR                   58962.23221       
                 VIS 04 SI   12.2         28   123    42.65  12*BD1540214512596 
                   ..DFG                               MICRFO     F             
0     0     0.00   0*TOUR 2     FRAISEUSE                 PARIS                 
           FRIEN                     0     0     0.00   0*120  456  DSYTTRTUYT  
             ETAU LIMEUR                        59788888    0000000000    0     
0     0.00   0*                     FORET DIAMETRE 15                  123456789
127              0    58     8.50  54 BD13602135PERCEUSE 1524            FORET D
IAMETRE 10.25               1234567891299876543216    5    51     2.00 100 BD157
02147PERCEUSE N.1543          FRAISE DIAMETRE 50                 123456789147123
4567891    0    23    60.00  24                                                 
                      125                       0     0     0.00   0bd12502137pe
rceuse                 FORET DIAMETRE 25                  12345678              
                                    999999999999              0     0     0.00  
 0*12   2    TERFT                                                       MACHINE
     RQE           0     0     0.00   0*IUTY                                    
                              ER                        0     0     0.00   0*3  
  58   8                        DISQUE DIAMETRE 15                 2546        2
345          4    32   234.00   7*1423 02541LIVRE                    CHAPITRE1  
                  9132              2    25    15.25  50                        
                                                                                
    0.00    BD15404258RECTIFIEUSE              DISQUE ABRASIF DIAMETRE 600      
  789456123456123123       35   100   700.00 150*BD15402154RECTIFIEUSE          
    DISQUE DIAMETRE 540                123123123123125365        5    45   452.2
5  54*BD14501254FRAISEUSE                FRAISE DIAMETRE 50                 4564
34523984785469       16    10   152.00  20*BD142      CLOVIS      12            
6     6   150.00  15 BD12502153PERCEUSE                 FORET DIAMETRE 15       
           12345678912 123          10    35    15.00  50 BD15402145PERCEUSE    
             FORET DIAMETRE 15                  1254        123452       20    5
1     1.75  78*BD15302145PERCEUSE                 MANDRIN                       
     4563211     4563211       3     8   450.00  12*BD14202115RECTIFIEUSE       
       DISQUE                             123231      987654        7    40   32
02145RECTIFIEUSE              DISQUE ABRASIF                     456456      123
456        4    10   300.00  15*BD14505423PERCEUSE                 FORET DIAMETR
EMDELAI)DELAI                                 0     0     0.00   0*BD14704258REC
TIFIEUSE              DISQUE ABRASIF                     4561231231234561231232 
  50    75   500.00 150*BD12502153PERCEUSE                 FORET DIAMETRE 15    
              12345678912 123          10    35    15.00  50*BD15402145PERCEUSE 
                FORET DIAMETRE5.00  50 BD12501254PERCEUSE                 FORET 
DIAMETRE 10.50               110183                    2    40     2.53  50*gfff
ffffffffffffffffffffffffffffff ffffffffffffffffffffffffff         120183      12
34563       2    35     3.50  50 BD12502652PERCEUSE                 FORET DIAMET
RE 12                  210183      3213214       7    50     3.10  50*          
                                                            011257895870        
      0     0     0.00   0*BD   02145PERCEUSE                  15               
   1254        123452       20    51     1.75  78*BD12501254PERCEUSE            
     FORET DIAMETRE 10.50               110183                    2    40     2.
53  50*BD12502652PERCEUSE                 FORET DIAMETRE 12                  210
183      3213214       7    50     3.10  50*BD12803253RECTIFIEUSE              D
ISQUE DIAMETRE 15                 253         2145          2     5   251.25  15
*BD15302145PERCEUSE                 FORET DIAMETRE 15                  987987654
654987654654     P         FRAISE DIAMETRE 30                 180183      1254  
        7    35    25.00  50*123456                                             
                   125423                    0     0     0.00   0*              
                                                        654654-564              
  0     0     0.00   0*                                                         
             2154                      0     0     0.00   0*                    
                                                  2531                   FORET D
IAMETRE 15                  987987654654987654654    55     1     3.00 100      
                                                                25454545241K    
          0     0     0.00   0FFRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR RRRRRRRQQQWWWWW
WWWWWWWQ            5745454521                0     0     0.00   0              
                                                         25454545241K           
   0     0     0.00   0FFRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR RRRRRRRQQQWWWWWWWWWWWW
Q                        0     0     0.00   0*jhhh                              
                                    323232                    0     0     0.00  
 0*                                                                             
                   0     0     0.00   0*AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAA
AAAAAAAAAAAAAAAAAAAAAAAAA     1254855                   0    10     2.50  50*aaa
aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa 12543        
             0     0     0.00   0*           5745454521                0     0  
   0.00   0                                                                     
  25454545241K              0     0     0.00   0                                
                                      25454545241K              0     0     0.00
   03                                               0    0    12    12.53  50 BD
12302145PERCEUSE                 MANDRIN                            235         
                                      0    2    15   150.25  21                 
                                                      2345678                  0
     0     0.00   0*                                                            
          521                       0     0     0.00   0*BD12502356PERCEUSE     
            FORET DIAMETRE 152                 523                       0    12
    12.53  50*BD12302145PERCEUSE                 MANDRIN                        
    235                       2    15   150.25  21*                             
                                                                                
                                                       0    0     0     0.00   0
 BD12803253RECTIFIEUSE              DISQUE DIAMETRE 15                 253      
   2145      22/01/              /  /    0    2     5   251.25  15           AAA
AAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 11          112        
 /  /                      0    0     0     0.00   0             /  /           
   /  /    0    0     0     0.00                  0                             
                  0     0     0.00   0 BD12803253RECTIFIEUSE              DISQUE
 DIAMETRE 15                 253         2145          2     5   251.25  15*DDDD
DDDDDDDDDDDDDDDDDDDDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD    5454          
            0     0     0.00   0*DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD DDDDDDDD    
                       65464364                  0     0     0.00   0*     FFFFF
FFFFFFFFFFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFF             54654321            
    BD12502356PERCEUSE                 FORET DIAMETRE 152                 523   
                                                 0    12    12.53               
  50 BD12302145PERCEUSE                 MANDRIN                            235  
                                                  2    15   150.25              
   21                                                                           
                                                                                
       BD12803253RECTIFIEUSE          0     0     0.00   0*FFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFF                65545432541               0    
 0     0.00   0*FFRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRR RRRRRRRQQQWWWWWWWWWWWWQ      
      5745454521                0     0     0.00   0*                           
                                           25454545241K              0     0    
 0.00   0*1111111111111111111111111111111111 111111                             
2512                      0     0     0.00   0 BD15302145PERCEUSE     !P!!!!!!!!
!      DISQUE DIAMETRE 15                 253         2145      22/01/          
    /  /    0    2     5   251.25        1256.25  15           AAAAAAAAAAAAAAAAA
AAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 11          112         /  /         
             0    0     0     0.00                  0123456789126123456789127125
354      $1254        -125423      412543       31254855     ,180183       2    
       *21          )210183      /2154        222222222222VIS 04 SI            I
"   21, 0 SAY "+---------------------------------+------------+------------+----
--------------+"  ---------------------------------------+  I"   12, 0 SAY "I   
                    DERNIERE COMMANDE                                      I"   
13, 0 SAY "I  +-----------------------------------------------------------------
----------+"   14, 0 SAY "I  I No D.A.              date D.A.           No Cde  
              du         I"   15, 0 SAY "I  I                                 * 
STOCKSCR.CMD  ERASE    0, 0 SAY "                                               
           +--------------------+"    1, 0 SAY "                                
                          I Mode               I"    1,65 SAY MODESTOCK    2, 0 
SAY "+---------------------------------------------------------+----------------
----+"    3, 0 SAY "I                          GESTION DU STOCK DE PIECES DETACH
EES                I"    4, 0 SAY "I                                            
                                  I"    5, 0 SAY "I  +--------------------------
----------------------------------------------+  I"    6, 0 SAY "I  I ATELIER   
        SECTION         MACHINE                              I  I"    7, 0 SAY "
I  I                                                                        I  I
"    8, 0 SAY "I  I DESIGNATION                                                 
           I  I"    9, 0 SAY "I  I                                              
                          I  I"   10, 0 SAY "I  I ******************** TRAITEMEN
T DES DEMANDES D'ACHAT ********************  * Ce fichier de commande vous propo
se differentes options de traitement *  * au sein  du fichier  des demandes d'ac
hat.  Selon  votre selection il *  * lancera le traitement correspondant. La rep
onse de defaut  "F"  vous *  * permettra de revenir au menu principal  MENU2    
                    *  * Comme pour le fichier de commande  TRASTOCK,  la  meme 
 presentation *  * d'ecran d'une demande d'achat sera utilisee pour les differeP
IECE                                                                  I  I"   11
, 0 SAY "I  +-------------------------------------------------------------------
-----+  I"   12, 0 SAY "I                       DERNIERE COMMANDE               
                       I"   13, 0 SAY "I  +-------------------------------------
--------------------------------------+"   14, 0 SAY "I  I No D.A.              
date D.A.           No Cde                du         I"   15, 0 SAY "I  I       
                          ntes  op- *  * tions ( 1, 2, 3 ou 4 ), en precisant en
 haut et a droite  de  l'ecran *  * le mode en cours.                           
                          *  ***************************************************
**********************    STORE 'O' TO CONTDA  DO WHILE CONTDA  'O'  ERASE  STOR
E 'F' TO REPONSE3    1,27 SAY "TRAITEMENT DES DEMANDES D'ACHAT"    5, 0 SAY "+--
-----------------------------------------------------------  -----------------+"
    6, 0 SAY "I                                                                 
               I"   16, 0 SAY "I  I Qte commandee                 reste a livrer
                              I"   17, 0 SAY "I  +------------------------------
---------------------------------------------+"   18, 0 SAY "I                  
                  Quantite      prix UHT      prix total    I"   19, 0 SAY "I  Q
te MINI                       +------------+------------+------------------+"   
20, 0 SAY "I               ETAT DU STOCK   I            I            I          
"P"""""""""                                          I"    7, 0 SAY "I          
                SELECTIONNEZ VOTRE OPTION                             I"    8, 0
 SAY "I                                                                         
       I"    9, 0 SAY "I                                                        
                        I"   10, 0 SAY "I  AJOUT DE NOUVEAUX ENREGISTREMENTS - 1
                                        I"   11, 0 SAY "I                       
                                                         I"   12, 0 SAY "I  MODI
FICATION D'ENREGISTREMENTS    - 2                                        I"   13
, 0 SAY "I                                                                      
          I"   14, 0 SAY "I  SAISIE NUMERO DE COMMANDE         - 3              
                          I"   15, 0 SAY "I                                     
              REPONSE                      I"   16, 0 SAY "I  VISUALISATION D'EN
REGISTREMENTS   - 4                               ******************** TRAITEMEN
T DES PIECES DETACHEES ********************  * Ce fichier de commande vous propo
se differentes options de traitement *  * au sein  du fichier  des pieces  detac
hees.  Selon votre selection il *  * lancera le traitement correspondant. La rep
onse de defaut  "F"  vous *  * permettra de revenir au menu principal  MENU2    
                    *  *********************************************************
****************    STORE 'O' TO CONTSTOCK  DO WHILE CONTSTOCK  'O'    * Efface 
        I"   17, 0 SAY "I                                                       
                         I"   18, 0 SAY "I  SORTIE D'ETAT SUIVANT SELECTION   - 
5                                        I"   19, 0 SAY "I                      
                                                          I"   20, 0 SAY "I  RET
OUR AU MENU INITIAL            - F                                        I"   2
1, 0 SAY "+-------------------------------------------------------------  ------
-----------+"   15ment de l'ecran et affichage des differents options  ERASE  ST
ORE 'F' TO REPONSE3    1,27 SAY "TRAITEMENT DES PIECES DETACHEES"    5, 0 SAY "+
-------------------------------------------------------------  -----------------
+"    6, 0 SAY "I                                                               
                 I"    7, 0 SAY "I                          SELECTIONNEZ VOTRE O
PTION                             I"    8, 0 SAY "I                             
                                         ,60 GET REPONSE3  READ  IF !(REPONSE3) 
 'F'  RELEASE CONTDA,REPONSE3,MODEDA  RETURN  ELSE   IF REPONSE3  '1'   STORE 'A
JOUT' TO MODEDA   DO DASCR   DO AJDA   USE   ELSE     IF REPONSE3  '2'     STORE
 'MODIFICATION' TO MODEDA     DO DASCR     DO MODIFDA     USE     ELSE       IF 
REPONSE3  "3"       STORE "SAISIE CDE" TO MODEDA       DO DASCR       DO CDEDA  
     USE       ELSE         IF REPONSE3  "4"         STORE "VISUALISATION" TO MO
DEDA         DO DASCR         DO VISDA         USE         ELSE               I"
    9, 0 SAY "I                                                                 
               I"   10, 0 SAY "I  AJOUT DE NOUVEAUX ENREGISTREMENTS - 1         
                               I"   11, 0 SAY "I                                
                                                I"   12, 0 SAY "I  MODIFICATION 
D'ENREGISTREMENTS    - 2                                        I"   13, 0 SAY "
I                                                                               
 I"   1      IF REPONSE3  "5"   DO REDA   USE    ELSE      22,0 SAY 'AUCUN TRAIT
EMENT NE CORRESPOND A VOTRE SELECTION,   VALIDEZ'             SET CONSOLE OFF   
  WAIT             SET CONSOLE ON   ENDIF 5         ENDIF 4       ENDIF 3     EN
DIF 2   ENDIF 1  ENDIF F  ENDDO CONTDA                      I"   21, 0 SAY "+---
----------------------------------------------------------  -----------------+" 
  15  #P#########4, 0 SAY "I  ENTREE/SORTIE DE PIECE DU STOCK   - 3             
                           I"   15, 0 SAY "I                                    
               REPONSE                      I"   16, 0 SAY "I  VISUALISATION D'E
NREGISTREMENTS   - 4                                        I"   17, 0 SAY "I   
                                                                             I" 
  18, 0 SAY "I  SORTIE D'ETAT SUIVANT SELECTION   - 5                           
             I"   19, 0 SAY "I            IF REPONSE3  '2'     STORE "MODIFICATI
ON" TO MODESTOCK     DO STOCKSCR    * Execution du fichier de commande permettan
t la modification  * d'un enregistrement.     DO MODISTOC     USE     ELSE      
 IF REPONSE3  '3'       STORE "ENT/SOR PIECE" TO MODESTOCK       DO STOCKSCR    
* Execution du fichier de commande permettant l'entree ou la  * sortie de piece(
s) du stock.       DO ENTSORT       USE       ELSE         IF REPONSE3  "4"     
    STORE "VISUALISATION" TO MODESTOCK         DO STOCKSCR    * E               
                                                           I"   20, 0 SAY "I  RE
TOUR AU MENU INITIAL            - F                                        I"   
21, 0 SAY "+-------------------------------------------------------------  -----
------------+"   15,60 GET REPONSE3    * Saisie de la reponse  READ    * Si la r
eponse est  "f" ou "F" -- retour au menu principal (MENU2)  IF !(REPONSE3)  'F' 
 RELEASE CONTSTOCK,REPONSE3,REPONSE4,MODESTOCK,IMPRIMANTE  RETURN    * Si la rep
onse esxecution du fichier de commande permettant la consultation  * de piece(s)
.         DO VISTOCK         USE         ELSE           IF REPONSE3  "5"    * Ex
ecution du fichier de commande permettant la generation  * de rapport(s).   DO R
ESTOCK   USE   ELSE    * Si la selection ne correspond a aucune des options prop
osees,  * le message suivant sera affiche.           22,0 SAY 'AUCUN TRAITEMENT 
NE CORRESPOND A VOTRE SELECTION,   VALIDEZ'      SET CONSOLE OFF          WAIT  
   SET CONSOLE ON   ENDIF 5 t differente de "f" ou de "F", nous lancerons  * le 
traitement correspondant    ELSE     IF REPONSE3  '1'                           
                               ************* CREATION D'UN NOUVEL ENREGISTREMENT
 *************  * Le traitement correspondant a cette option est la  creation * 
 * d'un nouvel enregistrement. Le fichier de commande STOCKSCR *  * permet l'aff
ichage de la presentation d'un  enregistrement. *  * Ce fichier ( STOCKSCR ), se
ra utilise pour tous les traite- *  * ments qui necessitent        ENDIF 4      
 ENDIF 3     ENDIF 2   ENDIF 1  ENDIF F  STORE 'O' TO CONTSTOCK  ENDDO TRASTOCK 
 a modification  * d'un enregistrement.     DO MODISTOC     USE     ELSE       I
F REPONSE3  '3'       STORE "ENT/SOR PIECE" TO MODESTOCK       DO STOCKSCR    * 
Execution du fichier de commande permettant l'entree ou la  * sortie de piece(s)
 du stock.       DO ENTSORT       USE       ELSE         IF REPONSE3  "4"       
  STORE "VISUALISATION" TO MODESTOCK         DO STOCKSCR    * E l'affichage de l
a  presentation  d'un *  * enregistrement. Pour eviter toute ambiguite,  on  aff
ichera *  * le mode en cours en haut a droite de l'ecran. Pour  obtenir *  * ce 
resultat,  il  suffira  d'affecter le mode en cours a la *  * variable  MODESTOC
K,  avant d'executer le fichier de  com- *  * mande STOCKSCR. Lors de son execut
ion, if affichera le con- *  * tenu de la variable   MODESTOCK  en  haut et a  d
roite  de *  * l'ecran.                                                    *  **
*************************************************************     STORE 'AJOUT' 
TO MODESTOCK                                                DO STOCKSCR         
                                                       * Execution du fichier de
 commande permettant la creation  de  * nouveaux enregistrements.   DO AJSTOCK  
                                                              USE               
                                                       ELSE                     
                                               $P$$$$$$$$$************* VISUALIS
ATION D'UNE DEMANDE D'ACHAT *************    SET EXACT ON  STORE " " TO VALIDEZ 
  0,0 SAY "FIN  VALIDEZ"  SELECT PRIMARY  USE STOCK INDEX PIECE  SELECT SECONDAR
Y  USE DA INDEX DA  STORE "          " TO MDANUM  STORE "O" TO CONTVISU  DO WHIL
E CONTVISU  "O"  CLEAR GETS   5,10 GET MDANUM  READ  IF MDANUM  " " .OR. MDANUM 
 VALIDEZ  RELEASE VALIDEZ,CONTVISU,MDANUM,MPIECE  SET EXACT OFF  RETURN  ELSE  S
TORE MDANUM TO VALIDEZ  SELECT SECONDARY  FIND &MDANUM  IF #  0  .QTECMD        
                                             18,15 SAY S.PIECE                  
                                    18,69 SAY S.PRIXUHT                         
                          20,13 SAY S.IMPUTATION                                
                  20,71 SAY S.DELAI                                     ENDIF  E
NDIF  ENDDO VISUALISATION DEMANDE D'ACHAT   5,27 SAY "        "                 
  7,11 SAY "                           "                   9,11 SAY "       "   
                5,47 SAY "              "                   5,66 SAY "          
"                   8,45 SAY "                 "                   14,2 SAY "   
                                      "                   14,46 SAY "           
                "                   18,1 SAY "       "                   18,14 S
AY "              "                   18,31 SAY "              ************** VI
SUALISATION D'ENREGISTREMENT(S) ***************  * CE FICHIER DE COMMANDE PERMET
 DE CONSULTER UN ENREGISTREMENT *  * SELON SON NUMERO DE REFERENCE.             
                  *  ***********************************************************
*****    SET EXACT ON   0,0 SAY  "FIN  VALIDEZ"  STORE " " TO VALIDEZ  SELECT PR
IMARY  USE DA INDEX DA  SELECT SECONDARY  USE STOCK INDEX PIECE  STORE "        
    " TO MPIECE  STORE "O" TO CONTVISU  DO WHILE CONTVISU  "O"  CLEAR GETS   10,
11 GET MPIE                    "                   18,67 SAY "           "      
             20,13 SAY "                           "   20,71 SAY "    "   22,0 S
AY "CETTE DEMANDE D'ACHAT NE FIGURE PAS DANS LE   FICHIER, Validez"  SET CONSOLE
 OFF  WAIT  SET CONSOLE ON   22,0 SAY "                                         
                     "  STORE "          " TO MDANUM  ELSE  SELECT PRIMARY  STOR
E S.PIECE TO MPIECE  FIND &MPIECE      IF #  0       14,46 SAY "                
       CE  READ    * SI AUCUN NUMERO DE REFERENCE N'EST SAISI OU SI IL EST IDENT
IQUE  * AU PRECEDENT - RETOUR AU MENU TRAITEMENT PIECES DETACHEES.    IF MPIECE 
 " " .OR. VALIDEZ  MPIECE  RELEASE VALIDEZ,CONTVISU,MPIECE,MDANUM,COLONNE,QUANTI
TE,PRIXTHT  SET EXACT OFF  RETURN  ELSE    * EFFACEMENT DE LA 22eme LIGNE SUR LA
QUELLE SUBSISTE PEUT ETRE  * UN MESSAGE D'AVERTISSEMENT.   22,0 SAY "           
                                                           "  STORE MPIECE TO VA
LIDEZ  SELECT SECONDARY  FIND &M "       18,31 SAY "                            
      "       22,0  SAY "La piece"       22,9 SAY MPIECE       22,22 SAY "ne fig
ure plus dans le fichier stock,   Validez"      SET CONSOLE OFF      WAIT      S
ET CONSOLE ON       22,0 SAY "                                                  
                   "      ELSE                       14,46 SAY MACHINE          
                                              18,31 SAY LIBELLE                 
                      ENDIF   5,PIECE    * SI LE NUMERO DE REFERENCE SAISI  N'EX
ISTE  PAS --  EFFACEMENT  * DES DIFFERENTE ZONE DE VISUALISATION ET AFFICHAGE D'
UN MESSAGE  * D'ERREUR.       IF #  0        6,13 SAY "     "        6,31 SAY " 
    "        6,47 SAY "                         "        8,17 SAY "             
                      "        14,13 SAY "          "        14,36 SAY "        
"        14,53 SAY "            "        14,71 SAY "        "        16,20 SAY "
          "        16,51 SAY "          "        2027 SAY S.DADATE              
                                       7,11 SAY S.EMETTEUR                      
                              9,11 SAY S.SECTION                                
                     5,47 SAY S.CMDNUM                                          
           5,66 SAY S.CMDDATE                                                   
 8,45 SAY S.TYPE                                                        14,2 SAY
 S.FOURNI                                                      18,1 SAY S  %F%%%
%%%%%%,3  SAY "          "        20,35 SAY "          "        20,48 SAY "     
       "        20,64 SAY "          "        22,0 SAY  "CETTE PIECE NE FIGURE P
AS DANS LE FICHIER, Validez"       SET CONSOLE OFF       WAIT       SET CONSOLE 
ON        22,0 SAY "                                                    "      *
 SI LE NUMERO DE REFERENCE SAISI EXISTE -- RECHERCHE DES RENSEI-  * GNEMENTS COM
PLEMENTAIRES AU NUMERO DE LA DEMANDE D'ACHAT.         ELSE       SELECT PRIMARY 
      STORE S.DANUM TO MDANUM       FIND &MDANUM    * SI LE NUMERO DE LA DEMANDE
 D'ACHAT N'EXISTE PLUS -- AFFICHAGE  * DES DATES SOUS LA FORME "  /  /  "  IF # 
 0   14,36 SAY "  /  /  "   14,71 SAY "  /  /  "     * SI LA DEMANDE D'ACHAT EXI
STE -- AFFICHAGE DES DIFFERENTS  * RENSEIGNEMENTS COMPLEMENTAIRES.  ELSE        
   14,36 SAY DADATE                                     14,53 SAY CMDNUM        
                             14,71 SAY CMDDATE                                  
  16,20 SAY QTECMD                            ENDIF    * AFFICHAGE DES CARACTERI
STIQUES DE L'ARTICLE        6,13 SAY S.ATELIER        6,31 SAY S.SECTION        
                           6,47 SAY S.MACHINE                                   
8,17 SAY S.LIBELLE                                   14,13 SAY S.DANUM          
                         16,51 SAY S.QTERESTE                                20,
3  SAY S.MINISTOCK                           * AFFICHAGE D'UN MESSAGE D'AVERTISS
EMENT LORSQUE LA QUANTITE  * EN STOCK EST INFERIEURE A LA QUANTITE MINIMUM.    I
F S.QTESTOCK  MINISTOCK   22,0 SAY "ATTENTION, La quantite en stock est inferieu
re   a la quantite minimum"    ELSE  ENDIF        20,35 SAY "          "        
20,35 SAY S.QTESTOCK                                20,51 SAY S.PRIXUHT         
                       STORE S.PRIXUHT * S.QTESTOCK TO PRIXTHT        20,64 SAY 
PRIXTHT       ENDIF  ENDIF  ENDDO VISTOCK    &P&&&&&&&&&  'P'''''''''  09 M Q0 Q
 Y0 V / S -7 O 08 I Y-5 E V1 H T3 F S3 F S2 J V5B Q Z/9 H Y-4 E Q-6 B Jy-2  Cu,6
  C+4  Dv*0  o*3  r,8 A As.9 G E/ H L- N R-9 L R+2 H P*1 C Lz,0  Ft*.  Dq(,  Ao+
2 C Fs-4 G Hv,4 J Ox.9 M Q(1 G Lv'+ E Mv), B Fn&*  l&( 9 j(+  55
Tous droits réservés. Reproduction sans autorisation interdite. © Kukulcan