@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREIE SEKT.! G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSBENUTZE MEM.SAV UM ZU LADEN!! D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSFEHLER-SAVE IN MEM.SAV AUF DISK TIPP Y FUE&}R DOS-START B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu } 3E:`}ABBUC e.V. DOS 2.5FarbeŠΠ㩠 . DISK INHALT . FORMAT 1040. ZUM BASIC *} . DUPLIZIER DISK. KOPIERE FILE . BINAER SAVE. LOESCHE FILE(S) . BINAER LOAD. NAME AENDERN . START AB ADRE+}S. SICHERE FILE . MEM.SAV ANLEG.. ENTSICHERE FILE . DUPLIZIER FILE. DOS NEU ANLEGEN . FORMAT 720SecL !N',}#"&))9(&*)/h)''-&؆莟R'S  v L/ˢ L }LEGE-->DOS 2.0s, TIPP Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!FALSCHE WAHLWAEHLE.} FUNKTION-->νś! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DISK INHALT-->AUSGABE,FILE NAME ?[# 0 0 &|D3" 1L!NICHT AUF DISK N !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TIPP "" ZUM LOESCHENWAS LOESCHEN ? 2}KOPIE-VON,NACH?WAHL NICHT ERLAUBT412 FREIE SEKT.! KOPIERE---D2:DISKKOPY.NEUl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!ABKUERZUNGEN SIN6}D JETZT NICHT ERLAUBT 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!NICHT LADBAR WELCHE DATEI LADEN ?) 0 ?}0#B 1L!SICHERE FILE NAME?) 0 0$B 1L!ENTSICHER FILE NAME?DUP DISK-QUELL,ZIEL STATION?TIPP "" FUER PROGRA@}MMGEBRAUCH :""LOESCHT MEM.SAV SPEICHERFE! +L1   `*  70 2 2A} 0.* 1 y0 0)LEGE DISK EIN ,TIPP "^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` DISK VOLL !!! LEGE QUELLDISK EIN,TIPP ΛLEGE ZIELDISK EIN ,TIPP E}`  `8 rL1`-* 1P* 1 y0Y`hhL!GEBE FILE NAME AN ? - 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`ZIEL KANNKEIN DOS.SYS J}SEIN!0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GEBE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`NUR 1 BUCHSTABE !! ,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} ZU LANG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!FEHLER- 140ɛ+,' 20*.. өr2 1``2ZU VIELE WERTE!FALSCHE HEXAQ}DEZIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1GEBE D1-->D8 ANuR} EZIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1GEBE D1-->D8 ANu?U (c)1986 ABBUC EV.BIBLIOTHEK W.B.  B JKIHiDiELV`L@T} @ BLV`Ll@h@l Li@ &` Fj`8冨凪` @EӅӥU} @`ʆǪƩ Ɛee` @ƦʆǢ &Ɛeǐ @ @L@ @'&&&8儨児V}祂*L@&&*ń8&&L@ .A`hihiHHȱȱLv@c !#3`W}Li@JJJJ`H v@h`Hȩh E@LA N@LA ?LA @LA @H8X}`HhHh 2BLA BHI V䅠LA LiB @LAԆ ؠPIPP`Y} BP @LA BLB BLB BLBH- B8塪墨hLB BLB BLB BȹP`Z}텠8堨塪 B芨Oȩ-`PP aBP棩 Ѥģ0-ģ6000:,80H [}& &ehe&eģ0ʥ 8堅塅`$ B&*i0:0i BƦ`¢ 护\}°ڱ%ȱ%E BL3D担CS %BL3DI BL3DH CL3D BL3D &B V ANLMȑ]}` MLN%B VLAS:DE:DH B DD A Bh)0IDDLA[\ZUVT` EDD^}` ELB ELgB ELB) ` ELB @` 0d i@ҥ `2)2_}ҩ`҅`0)9E`@0)ӈJJJJ)`Ѕ`ȱ`` Fȥ`Hh`}ƣĢ`ƥĤ`Ѣ F`ȱѢĦ`膡`a}`ťƤe8夰LF Ƥ8`ŦeѠe桊LF$b}c}d}e}((f}(LFIBIBI G`LVIj E8GGGG @GG BLI D:FONT.SEg}TI AQIPIPIQILI gBRILI B`GmPIGmQIRI FPIйQILI B`L JJJh}ȌJ0JuJL[JJȌJJDJDJJJLPJJJL4JJJLJ`LaJ ELxJ ҢJm B J`ULJi}JJJLJ D:TXT.000J mJ*(mJLJ D:TXT.001JȑȈ mJ*(mJLJ D:TXT.002Jȑ򈑮 mj}J*(mJL&K D:TXT.003Kȑ mJ*(mJLPK D:TXT.004KȑF mJ*(mJLzK D:TXT.005Kȑp k}mJ*(mJLK D:TXT.006Kȑ mJ*(mJLK D:TXT.007KȑĈ mJ*(mJLK D:TXT.008Kȑ l}mJ*(mJL"L D:TXT.009Lȑ mJ*(mJLLL D:TXT.010LȑBJ mJ*(mJȱH F`LLm}~L G~L J BH A G`LLHʩ MBH MBLHLLͬLLMLHI L MHLHʢI FIn}H FLMLLLLH)M)MͬLLdMLHI L^MHLHI FIH FLdMLLM`LiM D1H0Ho}HiHiGHiHiHi HiHi HieMeMLMHmeMHieMLM`LM p}fMGG .A FL;NN: %B ELTNABBUCNN %B ELpNSERVICE Ng %Bq} ELN N %B ELN N %B  EH %B  EH %B r}ELO N %B ELOO"AUSGABE: = SCREEN , = PRINTER O, %B BLaOK:O^ s}A@ gBMMIP MISLrO ELO$ O %B BM`LOOOISLOt}` ELP FUER GESAMMTAUSDRUCK O %B ELDP FUER TEILAUSDRUCK P+ %B BLVPK:PS Au}@ gBOOIS OICLgP ELP P %B ELP v}P %B BO`LPPPP#GICLQPP ELDQýũQ' %B BLVQK:QS w}A gBPPILQ BP`PP ELQ Q %B B`LQ ȢG !F$GGx}$GGLQG$ B`Q8GRRQLR8GQQQ$GQQI LRQGGRGRQLbRQmQ$GQGQy}L`<|fl0fF68of;`p88p`f<x<6>ffsccncc8pp8? }ww<~~~<x`x`~<~~< }0~0 ~ <~~<>fff;``|ff|ff:>|x|``lvff0 8flxl0 f }~~jc|fffc|v```>`<|0~0006ffn;ff<k>6f<x~ ~1~<~~< }~x|nf8x8f|`;ff>|v```>`<|0~0006ffn;ff<k>6f<x~ ~1~<~~< Artikel/Lagerverwaltungvon Michael PascherDas Programm "LAGERVERWALTUNG" ist ein Artikel- und Lagerverwaltungsprogramm. E}s ist in Turbo-Basic geschrieben und laeuft daher nur mit dem Turbo-Basic Interpreter.Dazu einfach die Vorderseite mit Basic} booten.Das Programm erlaubt die Verwaltung von maximal 1000 Artikeln pro Diskette. Vor der Verwendung des Programms sollten} Sie eine Datendiskette erzeugen. Nehmen Sie dazu eine leere Diskette und formatieren Sie sie unter DOS 2.5 mit doppelter Sch}reibdichte. Dann booten Sie die Vorderseite erneut.Das Programm meldet sich mit einem kurzen Text und fordert zur Eingabe de}s Datums auf. Geben Sie bitte Tag, Monat und Jahr bitte zweistellig ein. Mit oder den Cursortasten gelangen Sie von }einem Feld ins andere. Innerhalb eines Eingabefeldes koennen Sie die Cursortasten, die -, -, - und} -Taste verwenden. Mit beenden Sie die Eingabe. Alle Funktionen des Programms werden ueber das dann erscheinende} Menue aufgerufen: 1....Datendiskette anlegen 2....Artikel eingeben 3....Artikel anzeigen 4....Artikel a}endern 5....Artikel loeschen 6....Bestand ausgeben 7....Bestellisten ausgeben 8....Auslagern 9....Ei}nlagern 10...Belegung aktualisieren 11...Drucker ein/aus 12...EndeBeenden Sie das Programm immer!! mit der F}unktion 12, damit alle Dateien korrekt geschlossen werden. Sonst ist es moeglich, dass Sie Artikel, die Sie eingegeben haben }nicht mehr wiederfinden! Sollte durch einen Programmfehler o.ae. das Programm einmal vorzeitig beendet werden, sollten Sie na}ch Neustart des Programms die Funktion 10 aufrufen. Dadurch wird die Belegung der Diskette ueberprueft und aktualisiert. Sons}t wird die Funktion 10 nicht benoetigt.Wenn Sie eine neu formatierte Diskette verwenden, muessen Sie zuerst die Funktion 1 }aufrufen. Hierdurch werden alle Dateien auf der Diskette angelegt. Dafuer wird der gesamte freie Platz der Diskette benoetigt}. Das Anlegen der Dateien dauert ca. 10 Minuten, also Zeit fuer eine Tasse Kaffee! ( Alles andere geht aber schneller).Mit }der Funktion 2 geben Sie neue Artikel ein. Auf dem Bildschirm erscheint eine Eingabemaske, die Sie ausfuellen muessen. Die In}formationen zu einem Artikel bestehen aus:Artikelnummer 10-stelligArtikelgruppe 5-stelligArtikelbezeichnung 30-stelligP}reis 10-stellig2 Staffelpreise je 10-stelligUmsatz 10-stelligBestand 10-stelligSollbestand 10-stelligMinimalbestand 10-s}telligLieferantenkode 3-stelligDatum der letzten AuslagerungDie Laenge all dieser Datenfelder ergibt genau 125 Zeichen un}d soviel passen auch genau in einen Sektor (so ein Zufall!). Jeder Artikel wird also in einem eigenen Sektor abgelegt. Fuer a}lle, die die Informationen auf der Diskette mit eigenen Programmen bearbeiten wollen, ist der geaue Aufbau eines Sektors im A}nhang beschrieben.Achten Sie bei der Eingabe darauf, dass alle Felder ausgefuellt werden. Preise, Bestaende etc. koenen dab}ei ruhig linksbuendig stehen, nur die Artikelnummer sollten Sie vollstaendig eingeben. Andernfalls wird sie behandelt, als ob} alle unausgefuellten Stellen Nullen enthielten. 12________ wird also als 1200000000 gewertet. Die Artikelnummer ist das eige}ntliche Unterscheidungskriterium. Jede Artikelnummer darf nur einmal vorkommen. Obschon nur 1000 Artikel speicherbar sind, wu}rde eine 10-stellige Artikelnummer vorgesehen. Dami laesst sich eine bessere Klassifizierung der Artikel erreichen (Gruppenbi}ldung etc. )Nach Ausfuellen der Maske koennen Sie diese mit ablegen. Jeder Artikel wird sofort auf Diskette abgelegt. }Solange Sie deutlich weniger als 1000 Artikel gespeichert haben, geht das sehr schnell. Mit zunehmender Artikelzahl kann der }Zeitbedarf fuer das Ablegen allerdings steigen. Das Ablegen der Artikel erfolgt nach dem Prinzip der gestreuten Speicherung (} Hashing ). Aus der Artikelnummer wird dazu eine Zahl zwischen 1 und 1000 berechnet. Diese Zahl gibt den Sektor an, in den de}r Artikel abgelegt wird. Da die Artikelnummer aber mehr als 3-stellig ist, kann es passieren, dass mehrere Artikel in den gle}ichen Sektor abgelegt werden sollen. Tritt dieser Fall ein, so wird ab dem errechneten Sektor sequentiell nach einem leeren S}ektor weitergesucht. Das kann u.U. etwas dauern. Umgehen laesst sich das allerdings (wenn Sie absolut keine Zeit haben) indem} Sie nur die letzten 3 Stellen der Artikelnummer verwenden und alle anderen als 0 eingeben. Der Algorithmus zur Berechnung de}s Sektors laesst diese Stellen naemlich unveraendert.Nach Ablegen des Artikels erscheint wieder eine leere Maske und Sie koe}nnen den naechsten Artikel eingeben. Wollen Sie nichts mehr eingeben, druecksen Sie bei leerer Maske .Mit der Funktion} 3 koennen Sie sich einen Artikel anzeigen lassen. Geben Sie dazu nur die Artikelnummer ein.Die Funktion 4 entspricht der F}unktion 3, allerdings koennen Sie die Informationen in den Datenfeldern aendern. Nach Druck von wird der Artikel wieder} abgespeichert.Mit der Funktion 5 koennen Sie einen Artikel aus der Datei loeschen. Die Funktionen 3,4,5 werden beendet, }indem Sie bei der Frage nach der Artikelnummer eingeben.Die Funktion 6 listet alle Artikelnummern zusammen mit dem ak}tuellen Bestand. Die Ausgabe auf den Bildschirm stoppt nach jeweils 10 Artikeln. Druecken Sie irgendeine Taste um die naechst}en Artikel zu listen.Mit der Funktion 7 koennen Sie nach Lieferanten getrennt die Artikel ausgeben lassen, die nachbestellt} werden muessen. Die nachzubestellende Menge wird ebenfalls angegeben. Aufgrund der sehr unterschiedlichen Bestellformulare w}urde auf das automatische Schreiben von Bestellungen verzichtet ( das ersparte mir auch einige Arbeit ).Die Funktionen 8 un}d 9 erlauben das Ein- und Auslagern von Artikeln. Geben Sie neben der Artikelnummer die Menge an, die Sie entnehmen oder einl}agern wollen. Ist der Bestand kleiner als die Menge, die Sie entnehmen wollen, erhalten Sie eine entsprechende Meldung und di}e Auslagerung wird nicht durchgefuehrt. Sinkt beim Entnehmen der Restbestand unter den Mindestbestand erfolgt eine Aufforderu}ng zur Nachbestellung.Bei der Entnahme wird gleichzeitig der Umsatz um diese Menge erhoeht.Bleibt noch die Funktion 11. Da}mit kann die Ausgabe wahlweise auf Bildschirm oder Drucker gelenkt werden. Ist der Drucker aktiv erscheint am Ende der 2. Zei}le ein "*" im Titel.Das war in Kuerze die Bedienung des Systems. Erweiterungen und Ergaenzungen, vor allem aber Korrekturen} sofern noetig, stehen jedem frei. Fuer die Zusendung verbesserter oder erweiterter Versionen bin ich dankbar. Ansonsten viel} Erfolg mit dem Programm. Michael Pascher Erckensstr. 34 5100 AachenAnhang------Auf}bau eines Sektors:1. Byte $00 Sektor ist frei $01 Sektor ist belegt $80 Sektor ist frei, enthaelt } geloeschten Artikel2.-11. Byte Artikelnummer in ASCII12.-16. Byte Gruppennummer ASCII17.-46. Byte Bezeichnung ASCII47}.-56. Byte Preis ASCII57.-66. Byte Staffel 1 ASCII67.-76. Byte Staffel 2 ASCII77.-86. Byte Umsatz ASCII87.-96. Byte Besta}nd ASCII97.-106. Byte Sollbestand ASCII107.-116. Byte Minimalbestand ASCII117.-119. Byte Lieferantenkode ASCII120.-125. B}yte Datum ASCII126.-128. Byte Filenummer, Link BytezahlDateien auf der Datendiskette:DATEN.DAT enthaelt }die ArtikeldatenINDEX.DAT enthaelt die Nummern der Sektoren, die zum File DATEN.DAT gehoeren } (genauer den 1. Sektor und die Differenzen zu den nachfolgenden Sektoren)BELEGT.DAT enthaelt fue}r jeden Sektorvon DATEN.DAT ein Bit, das 1 ist, wenn der Sektor belegt ist.************************************************}***********************DAT ein Bit, das 1 ist, wenn der Sektor belegt ist.************************************************ fuer jeden Sektor von DATEN.DAT ein Bit, das 1 ist, wenn der Sektor be- legt ist.enthaeltuB%DOS SYSB*)DUP SYSB-SAUTORUN SYSB FONT SETB?TXT 000