home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / cobol / library / cwindow / fm01a1.cbl < prev    next >
Encoding:
Text File  |  1993-07-28  |  1.3 KB  |  21 lines
  1.            move "ππ·πππOπpπpππ Uπ░'π )π░µ a r t i c " to Dat(1).
  2.            move "l eπ µo v e r v i e w π░µπ )π░'π ╔a" to Dat(2).
  3.            move "rticleπ ≥▌π σpriceπ ∩▌π σorder numb" to Dat(3).
  4.            move "erπ -▌π ÷▌π ;▌π ÷▌π %π&÷π µ▌π σπ$Φ." to Dat(4).
  5.            move "π$σπ ∞▌π σπ°≈π ≥π&÷π µ▌π σπ$Φ.π$σπ " to Dat(5).
  6.            move "∞▌π σπ°≈π ≥π&÷π µ▌π σπ$Φ.π$σπ ∞▌π σ" to Dat(6).
  7.            move "π°≈π ≥π&÷π µ▌π σπ$Φ.π$σπ ∞▌π σπ°≈π " to Dat(7).
  8.            move "≥π&÷π µ▌π σπ$Φ.π$σπ ∞▌π σπ°≈π ≥π&÷π" to Dat(8).
  9.            move " µ▌π σπ$Φ.π$σπ ∞▌π σπ°≈π ≥π&÷π µ▌π " to Dat(9).
  10.            move "σπ$Φ.π$σπ ∞▌π σπ°≈π ≥π&÷π µ▌π σπ$Φ." to Dat(10).
  11.            move "π$σπ ∞▌π σπ°≈π ≥π&÷π µ▌π σπ$Φ.π$σπ " to Dat(11).
  12.            move "∞▌π σπ°≈π ≥π&÷π µ▌π σπ$Φ.π$σπ ∞▌π σ" to Dat(12).
  13.            move "π°≈π ╨π▄ π 1please chπoσse an artic" to Dat(13).
  14.            move "le π.µπ 3π▀ π Z∞Φ÷π≥ma∞δσΩna∞2≈πΩa" to Dat(14).
  15.            move "aφΦ÷π≥maφδσΩnaφ2≈πΩaaεΦ÷π≥maεδσΩn" to Dat(15).
  16.            move "aε2≈πΩaa∩Φ÷π≥ma∩δσΩna∩2≈πΩaa≡Φ÷π≥m" to Dat(16).
  17.            move "a≡δσΩna≡2≈πΩaa±Φ÷π≥ma±δσΩna±2≈πΩa" to Dat(17).
  18.            move "a≥Φ÷π≥ma≥δσΩna≥2≈πΩaa≤Φ÷π≥ma≤δσΩn" to Dat(18).
  19.            move "a≤2≈πΩaa⌠Φ÷π≥ma⌠δσΩna⌠2≈πΩaa⌡Φ÷π≥m" to Dat(19).
  20.            move "a⌡δσΩna⌡2≈πΩaaπππππππ" to Dat(20).
  21.