home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p190 / 4.ddi / PRG / BW.PRG < prev    next >
Encoding:
Text File  |  1990-02-28  |  217 b   |  12 lines
  1. STOR KTYPE1 TO KTYPE
  2. STOR M1 TO M
  3. STOR BF1 TO BF
  4. STOR ALF1 TO ALF
  5. SET TALK OFF
  6. USE \HOUSEM\DBF\BW
  7. APPE BLANK
  8. REPL M1 WITH M,BF1 WITH BF,ALF1 WITH ALF,KTYPE1 WITH KTYPE
  9. USE \HOUSEM\DBF\OUTLF
  10. GOTO NR
  11. RETURN
  12.