World of Shareware - Software Farm 2

home *** CD-ROM | disk | FTP | other *** search

/ World of Shareware - Software Farm 2 / wosw_2.zip / wosw_2 / DESKTOP / TABS_V21.ZIP / GSFBKPB1.FRB (.txt) < prev next >

Wrap

FrontRunner Binary Module | 1991-05-31 | 19KB | 513 lines

Number of Pages in Book SET COLOR TO &COLOR2 TEMPINDEX MDESTIN PRN LPT1 LPT2 FILE MCATFILTER MSORTPOSTOTAL MPRINTPOSTOTAL Please select <S>ettings first to setup the destination, categories, fields and SORT ORDER. Number of Pages in Book MPAGENO MORDER MNUMLINES MPRINT MCVR1 MCVR2 MCVR3 MCVR4 MCVR5 MCVR6 BUFLEN D@)F3 MCVR1 D@)F3 MCVR2 D@)F3 MCVR3 D@)F3 MCVR4 D@)F3 MCVR5 D@)F3 MCVR6 BUFLEN MANSWER USE &DATAFILE INDEX &TEMPINDEX MPRTFILTER SET FILTER TO &mPRTFILTER .AND. (' '+RIGHT('0'+LTRIM(STR(CATEG,2)),2))$mCATFILTER CATEG @II)+d MCATFILTER Page Number -> MPAGENO FNAME )D)+)( LNAME )D)+)( CONAME )D)+)( ADDL1 )D)+)( ADDL2 )D)+)( )D)+)( STATE )D)+)( )D)+)( PHONE1 ( ) - PHONE2 ( ) - NOTE1 )D)+)( NOTE2 )D)+)( NOTE3 )D)+)( BDATE / / MISCDATE / / MISCCHAR )D)+)( NUMINT NUMREAL CATEG MNUMLINES PAGENO MPAGENO ORDER MORDER MNUMLINES MNUMLINES MORDER MORDER MNUMLINES MPAGENO MPAGENO MORDER PAGENO MPAGENO ORDER MORDER MNUMLINES MORDER MNUMLINES PAGENO MPAGENO ORDER MORDER MPAGENO MPAGENO MORDER MNUMLINES PAGENO ORDER Print Book? SET COLOR TO &COLOR6 <P>rint Book, or <Q>uit ? MPRINT MPRINT MPRINT Please enter any text you desire printed on the cover of the book. It will appear exactly as entered (i.e. lines are not automatically centered). MCORRECT MCORRECT MCVR1 MCVR2 MCVR3 MCVR4 MCVR5 MCVR6 Above information correct (Y/N) ? MCORRECT MCORRECT MDESTIN Please make sure the Printer is ON, and it is in the CONDENSED MODE! Press any key to begin printing. MCOVERYET Print Book? Number of Pages in Book Number of Pages in Book MPRINT Printing Book Final Book Setup USE &DATAFILE INDEX &TEMPINDEX MPRTFILTER SET FILTER TO &mPRTFILTER .AND. (' '+RIGHT('0'+LTRIM(STR(CATEG,2)),2))$mCATFILTER CATEG @II)+d MCATFILTER INDEX ON STR(PAGENO,4,0)+STR(ORDER,2,0) TO &TEMPINDEX PAGENO MHIGHPAGE MDESTIN MOUTFILE Replace ? SET COLOR TO &COLOR3 File already exists. <A>dd to the bottom, <R>eplace, or <Q>uit ? MANSWER MANSWER Replace ? Printing Book MANSWER MANSWER MOUTFILE Locating the end of file. BUFLEN MOUTFILE MDESTIN MANSWER MDESTIN USE &DATAFILE INDEX &TEMPINDEX MPRTFILTER SET FILTER TO &mPRTFILTER .AND. (' '+RIGHT('0'+LTRIM(STR(CATEG,2)),2))$mCATFILTER CATEG @II)+d MCATFILTER MLEFTPG MLEFTORD MHIGHPAGE MRIGHTPG MRIGHTORD MTOTALPAGE Printing Pages and MTOTALPAGE MHIGHPAGE MLEFTPG MLEFTORD FNAME )D)+)( LNAME )D)+)( TITLE TITLE FNAME )D)+d LNAME )D)+d3 CONAME )D)+)( CONAME )D)+d3 PHONE1 ( ) - PHONE2 ( ) - A@I@d PHONE1 PHONE2 PHONE1 ( ) - A@I@d PHONE1 PHONE2 ( ) - =@I@d PHONE2 ?()+d A@I@d PHONE2 PHONE1 ( ) - PHONE2 ( ) - A@I@d PHONE1 ?()+d =@I@d PHONE2 ?()+d A@I@d PHONE2 PHONE1 ( ) - A@I@d PHONE1 PHONE2 ( ) - ?()+d =@I@d PHONE2 ?()+d A@I@d PHONE2 ADDL1 )D)+)( ADDL1 )D)+d3 ADDL2 )D)+)( ADDL2 )D)+d3 )D)+)( STATE )D)+)( )D)+)( )D)+d STATE )D)+d ZIP_EXT NOTE1 )D)+)( NOTE1 )D)+d3 NOTE2 )D)+)( NOTE2 )D)+d3 NOTE3 )D)+)( NOTE3 )D)+d3 BDATE / / MISCDATE / / MISCCHAR )D)+)( NUMINT NUMREAL CATEG BDATE / / BDATE @)Fi MISCDATE / / MISCDATE @)Fi MISCCHAR )D)+)( MISCCHAR NUMINT NUMINT NUMREAL NUMREAL $@)Fi CATEG CATEG MLEFTORD MLEFTORD MLEFTPG MLEFTPG MLEFTORD MTOTALPAGE MTOTALPAGE MHIGHPAGE MLEFTPG MRIGHTPG MRIGHTORD FNAME )D)+)( LNAME )D)+)( TITLE TITLE FNAME )D)+d LNAME )D)+d3 CONAME )D)+)( CONAME )D)+d3 PHONE1 ( ) - PHONE2 ( ) - A@I@d PHONE1 PHONE2 PHONE1 ( ) - A@I@d PHONE1 PHONE2 ( ) - =@I@d PHONE2 @()+d A@I@d PHONE2 PHONE1 ( ) - PHONE2 ( ) - A@I@d PHONE1 @()+d =@I@d PHONE2 @()+d A@I@d PHONE2 PHONE1 ( ) - A@I@d PHONE1 PHONE2 ( ) - @()+d =@I@d PHONE2 @()+d A@I@d PHONE2 ADDL1 )D)+)( ADDL1 )D)+d3 ADDL2 )D)+)( ADDL2 )D)+d3 )D)+)( STATE )D)+)( )D)+)( )D)+d STATE )D)+d ZIP_EXT NOTE1 )D)+)( NOTE1 )D)+d3 NOTE2 )D)+)( NOTE2 )D)+d3 NOTE3 )D)+)( NOTE3 )D)+d3 BDATE / / MISCDATE / / MISCCHAR )D)+)( NUMINT NUMREAL CATEG BDATE / / BDATE @)Fi MISCDATE / / MISCDATE @)Fi MISCCHAR )D)+)( MISCCHAR NUMINT NUMINT NUMREAL NUMREAL $@)Fi CATEG CATEG MRIGHTORD MRIGHTORD MRIGHTPG MRIGHTPG MRIGHTORD MTOTALPAGE MTOTALPAGE MCOVERYET MCOVERYET @[@I@ Z@)Fd Z@)Fd Z@)Fd Z@)Fd Z@)Fd J@)Fd J@)Fd J@)Fd J@)Fd J@)Fd J@)Fd J@)Fd J@)Fd Z@)Fd Z@)Fd Z@)Fd . The Address Book Solution MCVR1 G@)Fd G@I'd . (C) GSF Software & Solutions, 1989 MCVR2 G@)Fd G@I'd . Suite #391 MCVR3 G@)Fd G@I'd . 3380 Sheridan Drive MCVR4 G@)Fd G@I'd . Amherst, NY 14226 MCVR5 G@)Fd G@I'd . (716) 283-3804 MCVR6 G@)Fd G@I'd Z@)Fd Z@)Fd Z@)Fd J@)Fd J@)Fd J@)Fd J@)Fd J@)Fd J@)Fd J@)Fd J@)Fd Z@)Fd Z@)Fd Z@)Fd Z@)Fd Z@)Fd @[@I@ MLEFTPG MRIGHTPG @[@I@ I@)Fd I@I'd I@)Fd I@I'd MLEFTPG iI)+d I@)Fd 9@)Fd MRIGHTPG iI)+d @[@I@ Printing Book MCVR1 MCVR2 MCVR3 MCVR4 MCVR5 MCVR6