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