home *** CD-ROM | disk | FTP | other *** search
/ World of Shareware - Software Farm 2 / wosw_2.zip / wosw_2 / DESKTOP / TABS_V21.ZIP / GSFBKPM1.FRB (.txt) < prev    next >
FrontRunner Binary Module  |  1991-05-31  |  12KB  |  476 lines

  1. Print Merge
  2. SET COLOR TO &COLOR2
  3. PRINT MERGE
  4. MHELLO
  5. TEMPINDEX
  6. MDESTIN
  7. PRN LPT1 LPT2 FILE
  8. MCATFILTER
  9. MSORTPOSTOTAL
  10. Please select <S>ettings first to
  11. setup the destination, categories,
  12. fields and SORT ORDER.
  13. Print Merge
  14. MMERGECHR
  15. MPRLN
  16. MLINELEN
  17. MFLDTYPE
  18. MFIELDNO
  19. MCHAR
  20. BUFLEN
  21. MLINE
  22. MTOTALINES
  23. MRECS
  24. MPGLEN
  25. MINFILE
  26. MCONT
  27. MFIELD
  28. MLINE
  29. BUFLEN
  30. MMERGECHR
  31. MRECS
  32. MPGLEN
  33. C:\                                               
  34. MINFILE
  35. MANSWER
  36. MBLANK
  37. MCONT
  38. MCONT
  39. MDESTIN
  40. <P>rint to disk file-> 
  41. MOUTFILE
  42. or <C>ancel
  43. Please make sure the printer is on.
  44. <P>rint  or  <C>ancel
  45. Drive, Path & File name of the ASCII text file you wish to merge:
  46. MINFILE
  47. A:\XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
  48. MINFILE
  49. Reading text file ...
  50. MINFILE
  51. MCHAR
  52. MCHAR
  53. MCHAR
  54. MCHAR
  55. MLINE
  56. MCHAR
  57. MLINE
  58. MCHAR
  59. MCHAR
  60. MTOTALINES
  61. MCHAR
  62. MCHAR
  63. MCHAR
  64. MTOTALINES
  65. The Merge routine will usually handle a text file up to 176 lines,
  66. containing several thousand characters (3 to 4 typed pages).  The
  67. file you have requested is too large to Merge.  Please edit the 
  68. file, then try this <M>erge routine again.  Press any key to
  69. return to the main Print menu.
  70. Print Merge
  71. MMERGECHR
  72. MPRLN
  73. MLINELEN
  74. MFLDTYPE
  75. MFIELDNO
  76. MCHAR
  77. BUFLEN
  78. MLINE
  79. MTOTALINES
  80. MRECS
  81. MPGLEN
  82. MINFILE
  83. MCONT
  84. MFIELD
  85. MLINE
  86. MTOTALINES
  87. )D)+)(
  88. MTOTALINES
  89. MTOTALINES
  90. MLINE
  91. MTOTALINES
  92. MLINE
  93. MTOTALINES
  94. MLINE
  95. MTOTALINES
  96. MLINE
  97. MTOTALINES
  98.             Actual Page length - > 
  99. # of spaces to indent (if any) - > 
  100. MPGLEN
  101. MPGLEN
  102. MTOTALINES
  103. Above information correct <Y/N/Q> ?
  104. @\@A&
  105. Print Merge
  106. MMERGECHR
  107. MPRLN
  108. MLINELEN
  109. MFLDTYPE
  110. MFIELDNO
  111. MCHAR
  112. BUFLEN
  113. MLINE
  114. MTOTALINES
  115. MRECS
  116. MPGLEN
  117. MINFILE
  118. MCONT
  119. MFIELD
  120. MDESTIN
  121. MOUTFILE
  122. Replace ?
  123. SET COLOR TO &COLOR3
  124. File already exists.
  125. <A>dd to the bottom, <R>eplace, or <Q>uit ?
  126. MANSWER
  127. MANSWER
  128. Replace ?
  129. Print Merge
  130. MANSWER
  131. MANSWER
  132. MOUTFILE
  133.  Locating the end of file. 
  134. BUFLEN
  135. MOUTFILE
  136. MCONT
  137. MDESTIN
  138. MANSWER
  139. MDESTIN
  140. USE &DATAFILE INDEX &TEMPINDEX
  141. MPRTFILTER
  142. SET FILTER TO &mPRTFILTER .AND. (' '+RIGHT('0'+LTRIM(STR(CATEG,2)),2))$mCATFILTER
  143. CATEG
  144. @II)+d
  145. MCATFILTER
  146. Number of records output ->
  147. MTOTALINES
  148. MPGLEN
  149. MPGLEN
  150. MBLANK
  151. FNAME
  152. )D)+)(
  153. FNAME
  154. MFIELD
  155. LNAME
  156. )D)+)(
  157. LNAME
  158. MFIELD
  159. TITLE
  160. TITLE
  161. MFIELD
  162. CONAME
  163. )D)+)(
  164. CONAME
  165. MFIELD
  166. PHONE1
  167. (   )   -    
  168. PHONE1
  169. *@)Fd
  170. (   )   -    
  171. MFIELD
  172. PHONE2
  173. (   )   -    
  174. PHONE2
  175. *@)Fd
  176. (   )   -    
  177. MFIELD
  178. MFIELD
  179. ADDL1
  180. )D)+)(
  181. ADDL1
  182. MFIELD
  183. ADDL2
  184. )D)+)(
  185. ADDL2
  186. MFIELD
  187. )D)+)(
  188. MFIELD
  189. STATE
  190. STATE
  191. MFIELD
  192. MFIELD
  193. ZIP_EXT
  194. ZIP_EXT
  195. MFIELD
  196. NOTE1
  197. )D)+)(
  198. NOTE1
  199. MFIELD
  200. NOTE2
  201. )D)+)(
  202. NOTE2
  203. MFIELD
  204. NOTE3
  205. )D)+)(
  206. NOTE3
  207. MFIELD
  208. CATEG
  209. iI)+3
  210. MFIELD
  211. BDATE
  212. MFIELD
  213. MISCDATE
  214. MFIELD
  215. MISCCHAR
  216. )D)+)(
  217. MISCCHAR
  218. MFIELD
  219. NUMINT
  220. iI)+3
  221. MFIELD
  222. NUMREAL
  223. @iI)+3
  224. MFIELD
  225. UPDATED
  226. MFIELD
  227. MCATS
  228. CATEG
  229. @()D)+3
  230. MFIELD
  231. TITLE
  232. TITLE
  233. FNAME
  234. )D)+)(
  235. FNAME
  236. LNAME
  237. )D)+)(
  238. LNAME
  239. MFIELD
  240. TITLE
  241. TITLE
  242. LNAME
  243. )D)+)(
  244. LNAME
  245. MFIELD
  246. FNAME
  247. )D)+)(
  248. FNAME
  249. LNAME
  250. )D)+)(
  251. LNAME
  252. MFIELD
  253. ZIP_EXT
  254. ZIP_EXT
  255. MFIELD
  256. PHONE2
  257. (   )   -    
  258. PHONE2
  259. *@)Fd
  260. *@)Fi
  261. MFIELD
  262. MTOTALINES
  263. MLINE
  264. MPRLN
  265. MPRLN
  266. MPRLN
  267. MPRLN
  268. MFIELD
  269. MPRLN
  270. MPRLN
  271. MPRLN
  272. MPRLN
  273. MPRLN
  274. MFIELD
  275. MPRLN
  276. MPRLN
  277. MPRLN
  278. MPRLN
  279. MPRLN
  280. MFIELD
  281. MPRLN
  282. MPRLN
  283. MPRLN
  284. MPRLN
  285. MPRLN
  286. MFIELD
  287. MPRLN
  288. MPRLN
  289. MPRLN
  290. MPRLN
  291. MPRLN
  292. MFIELD
  293. MPRLN
  294. MPRLN
  295. MPRLN
  296. MPRLN
  297. MPRLN
  298. MFIELD
  299. MPRLN
  300. MPRLN
  301. MPRLN
  302. MPRLN
  303. MPRLN
  304. MFIELD
  305. MPRLN
  306. MPRLN
  307. MPRLN
  308. MPRLN
  309. MPRLN
  310. MFIELD
  311. MPRLN
  312. MPRLN
  313. MPRLN
  314. MPRLN
  315. MPRLN
  316. MFIELD
  317. MPRLN
  318. MPRLN
  319. MPRLN
  320. MPRLN
  321. MPRLN
  322. MFIELD
  323. MPRLN
  324. MPRLN
  325. MPRLN
  326. MPRLN
  327. MPRLN
  328. MFIELD
  329. MPRLN
  330. MPRLN
  331. MPRLN
  332. MPRLN
  333. MPRLN
  334. MFIELD
  335. MPRLN
  336. MPRLN
  337. MPRLN
  338. MPRLN
  339. MPRLN
  340. MFIELD
  341. MPRLN
  342. MPRLN
  343. MPRLN
  344. MPRLN
  345. MPRLN
  346. MFIELD
  347. MPRLN
  348. MPRLN
  349. MPRLN
  350. MPRLN
  351. MPRLN
  352. MFIELD
  353. MPRLN
  354. MPRLN
  355. MPRLN
  356. MPRLN
  357. MPRLN
  358. MFIELD
  359. MPRLN
  360. MPRLN
  361. MPRLN
  362. MPRLN
  363. MPRLN
  364. MFIELD
  365. MPRLN
  366. MPRLN
  367. MPRLN
  368. MPRLN
  369. MPRLN
  370. MFIELD
  371. MPRLN
  372. MPRLN
  373. MPRLN
  374. MPRLN
  375. MPRLN
  376. MFIELD
  377. MPRLN
  378. MPRLN
  379. MPRLN
  380. MPRLN
  381. MPRLN
  382. MFIELD
  383. MPRLN
  384. MPRLN
  385. MPRLN
  386. MPRLN
  387. MPRLN
  388. MFIELD
  389. MPRLN
  390. MPRLN
  391. MPRLN
  392. MPRLN
  393. MPRLN
  394. MFIELD
  395. MPRLN
  396. MPRLN
  397. MPRLN
  398. MPRLN
  399. MPRLN
  400. MFIELD
  401. MPRLN
  402. MPRLN
  403. MPRLN
  404. MPRLN
  405. MPRLN
  406. MFIELD
  407. MPRLN
  408. MPRLN
  409. MPRLN
  410. MPRLN
  411. MPRLN
  412. MFIELD
  413. MPRLN
  414. MPRLN
  415. MPRLN
  416. MPRLN
  417. MPRLN
  418. MFIELD
  419. MPRLN
  420. MPRLN
  421. MPRLN
  422. MPRLN
  423. MPRLN
  424. MFIELD
  425. MPRLN
  426. MPRLN
  427. MPRLN
  428. MPRLN
  429. MPRLN
  430. MFIELD
  431. MPRLN
  432. MPRLN
  433. MPRLN
  434. )D)+)(
  435. MLINE
  436. )D)+)(
  437. MBLANK
  438. MBLANK
  439. MPRLN
  440. )D)+)(
  441. MLINE
  442. )D)+)(
  443. MPRLN
  444. MLINE
  445. MPRLN
  446. )D)+)(
  447. MPRLN
  448. MBLANK
  449. MBLANK
  450. MBLANK
  451. MBLANK
  452. MBLANK
  453. MRECS
  454. MRECS
  455. MRECS
  456. MCONT
  457. File Does not Exist.  Press Q to <Q>uit, or any other key to
  458. re-enter the Drive, Path and File name.
  459. MCONT
  460. MCONT
  461. Print Merge
  462. MMERGECHR
  463. MPRLN
  464. MLINELEN
  465. MFLDTYPE
  466. MFIELDNO
  467. MCHAR
  468. BUFLEN
  469. MLINE
  470. MTOTALINES
  471. MRECS
  472. MPGLEN
  473. MINFILE
  474. MCONT
  475. MFIELD
  476.