**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:09 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ACCPCZ   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 3050 IF M9=8 THEN GOTO 3030 ELSE LET I3$=M2$(7,2)+M2$(1,2)+M2$(4,2)CR@1L_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:10 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APAD1   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 4555 IF P7$(7,2)+P7$(1,2)+P7$(4,2)>C$(7,2)+C$(1,2)+C$(4,2) THEN GOTO 4580CR@1+_____@1E_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:11 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APADU   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1560 LET K7$=G$+V$+J1$+J2$(1,2)+J2$(4,2)+J2$(7,2)+"1",T=T+GCR@1L_____

@1 2022 WRITE (10,KEY=C2$(7,2)+C2$(1,2)+K7$(1,LEN(K7$)-1)+STR(N1),DOM=2040)C2$(7,2CR@16_____@1k____
@1&)+C2$(1,2)+K7$(1,LEN(K7$)-1)+STR(N1),G$,V$,J1$,J2$,G1,W1$,STR(N1)CR@1&_CR

@1 2130 LET K7$=G$+V$+J1$+J2$(1,2)+J2$(4,2)+J2$(7,2)+"1"CR@1L_____

@1 3212 WRITE (10,KEY=C2$(7,2)+C2$(1,2)+K7$)C2$(7,2)+C2$(1,2)+K7$,G$,V$,J1$,J2$,G1CR@16_____@1L_____
@1&,W1$,"1"CR

@1 4020 WRITE (11,KEY=V$+C2$(7,2)+C2$(1,2)+J1$+J2$+STR(N1:"00"),DOM=4040)V$+C2$(7,CR@19_____@1l___
@1&2)+C2$(1,2)+J1$+J2$+STR(N1:"00"),V$,J1$,J2$,N1,W1$,J3$,P$,P8,P7,J4$,J0,P7CR@1&__CR
@1&$CR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:11 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APCA1   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1230 LET A8$=P4$(7,2)+P4$(1,2)+P4$(4,2)CR@10_____

@1 1237 IF P4=1 THEN PRINT (1)"H", ELSE IF A8$<C$(7,2)+C$(1,2)+C$(4,2) THEN PRINT CR@1N_____
@1&(1)"<", ELSE PRINT (1)"",CR

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:11 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APCAS   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 4050 IF M9=8 THEN GOTO 4080 ELSE LET A1$=M2$,A$=M2$(7,2)+M2$(1,2)+M2$(4,2)CR@1S_____

@1 4065 REM "IF A$<C$(7,2)+C$(1,2)+C$(4,2) THEN GOTO 4080 ELSE PRINT @(L1,L2),'CL'CR@12_____
@1&,@(L1),A1$"CR

@1 4150 IF M9=8 THEN GOTO 4080 ELSE LET A3$=M2$,A2$=M2$(7,2)+M2$(1,2)+M2$(4,2)CR@1T_____

@1 4250 IF M9=8 THEN GOTO 4280 ELSE LET A5$=M2$,A4$=M2$(7,2)+M2$(1,2)+M2$(4,2)CR@1T_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:12 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APCKP   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2100 LET N1=NUM(K2$(7,2)),M2=0,J6$=K2$(1,6)CR@13_____

@1 6550 IF Q5$(1,6)<=X1$ THEN LET Q9=Q9+NUM(Q5$(7,2))CR@1L_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:13 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APINQ   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1465 LET M=NUM(C$(1,2)),D=NUM(C$(4,2)),Y=NUM(C$(7,2))CR@1O_____

@1 1475 LET M=NUM(J2$(1,2)),D=NUM(J2$(4,2)),Y=NUM(J2$(7,2))CR@1R_____

@1 1485 LET A6=A4-A5,A7=(NUM(C$(7,2))-Y)*365,A6=A6+A7CR@1<_____

@1 1547 IF J2$(7,2)<>C$(7,2) THEN GOTO 1530CR@1+_____@14_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:14 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APP99   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2150 IF J5$(7,2)<>M2$(7,2) THEN GOTO 2120CR@1+_____@15_____

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:14 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APPA1   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2020 LET A1$=A1$(7,2)+A1$(3,1)+A1$(1,3)+A1$(4,2)CR@10_____

@1 2080 LET M4$=J3$(7,2)+J3$(3,1)+J3$(1,3)+J3$(4,2)CR@10_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:14 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APPAR   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1310 IF J3$(7,2)+J3$(1,2)+J3$(4,2)>=C$(7,2)+C$(1,2)+C$(4,2) THEN GOTO 5100CR@1+_____@1F_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:15 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APPMD   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2010 READ (2,KEY=X3$(7,2)+X3$(1,2),DOM=2011)CR@14_____

@1 2030 IF K2$(1,4)<>X3$(7,2)+X3$(1,2) THEN GOTO 6000CR@15_____

**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:15 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APPVM   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1035 IF M2$(1,2)<>J4$(1,2) OR M2$(7,2)<>J4$(5,2) THEN GOTO 1020CR@1A_____

@1 2025 IF M2$(1,2)<>J4$(1,2) OR M2$(7,2)<>J4$(5,2) THEN GOTO 2120CR@1A_____

@1 5050 IF M2$(1,2)<>J4$(1,2) OR M2$(7,2)<>J4$(5,2) THEN GOTO 5030CR@1A_____

**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:16 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APREG   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 3100 LET K4$=P$+V$+J1$+J2$(1,2)+J2$(4,2)+J2$(7,2)+"1",J$=K4$CR@1L_____

@1 4040 LET P$=E3$,J6=-J6,M1=-M1,K4$=P$+V$+J1$+J2$(1,2)+J2$(4,2)+J2$(7,2)+"1",J$=KCR@1a_____
@1&4$CR

@1 5140 WRITE (10,KEY=C2$(7,2)+C2$(1,2)+K4$(1,LEN(K4$)-1)+STR(N1),DOM=5160)C2$(7,2CR@16_____@1k____
@1&)+C2$(1,2)+K4$(1,LEN(K4$)-1)+STR(N1),P$,V$,J1$,J2$,J6,W1$,STR(N1)CR@1&_CR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:16 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APREU   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2210 LET K5$=P$+V$+J1$+J2$(1,2)+J2$(4,2)+J2$(7,2)+"1",T0=J6CR@1L_____

@1 2730 LET K5$=G$+V$+J1$+J2$(1,2)+J2$(4,2)+J2$(7,2)+"1",T0=-P8,J6=0CR@1L_____

**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:16 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APRI2   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 4160 IF J2$(7,2)+J2$(1,2)+J2$(4,2)>A3$(7,2)+A3$(1,2)+A3$(4,2) THEN GOTO 4190 ELCR@1+_____@1F_____
@1&SE GOSUB 8500CR

@1 4490 IF J3$(7,2)+J3$(1,2)+J3$(4,2)<A3$(7,2)+A3$(1,2)+A3$(4,2) THEN GOTO 4530CR@1+_____@1F_____

@1 4660 IF J3$(7,2)+J3$(1,2)+J3$(4,2)<A3$(7,2)+A3$(1,2)+A3$(4,2) OR J3$(7,2)+J3$(1CR@1+_____@1F_____@1d_____
@1&,2)+J3$(4,2)<J2$(7,2)+J2$(1,2)+J2$(4,2) THEN GOTO 4680 ELSE PRINT @(L1,L2CR@16_____
@1&),'CL',@(L1),J3$CR

@1 4860 IF J7$(7,2)+J7$(1,2)+J7$(4,2)<J3$(7,2)+J3$(1,2)+J3$(4,2) THEN GOTO 4900CR@1+_____@1F_____

@1 5060 IF J7$(7,2)+J7$(1,2)+J7$(4,2)<J3$(7,2)+J3$(1,2)+J3$(4,2) THEN GOTO 5080 ELCR@1+_____@1F_____
@1&SE PRINT @(L1,L2),'CL',@(L1),J7$CR

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:16 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APRI3   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 6710 WRITE (10,KEY=J$(1,6)+A2$(7,2)+A2$(1,2)+J$(7,20)+STR(N10:"00"),DOM=6740)J$CR@1>_____
@1&(1,6)+A2$(7,2)+A2$(1,2)+J$(7,20)+STR(N10:"00"),V$,J1$,J2$,N8,W1$,J3$,P$,JCR@1/_____
@1&6,J2,J4$,J0,J7$CR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:17 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: APWIP   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1232 IF (H2$(7,2)+H2$(1,2)<>M2$(7,2)+M2$(1,2)) AND O0$="COMPLETED JOB" THEN GOTCR@1,_____@1?_____
@1&O 1220CR

@1 1320 IF O0$="WORK IN PROCESS" AND NUM(J2$(7,2)+J2$(1,2))>NUM(M2$(7,2)+M2$(1,2))CR@1I_____@1`_____
@1& THEN GOTO 1270CR

@1 7560 IF NUM(J2$(7,2)+J2$(1,2))>NUM(M2$(7,2)+M2$(1,2)) THEN GOTO 1270 ELSE GOTO CR@1/_____@1F_____
@1&1400CR

@1 7660 IF NUM(J2$(7,2)+J2$(1,2))>NUM(M2$(7,2)+M2$(1,2)) THEN GOTO 1570 ELSE GOTO CR@1/_____@1F_____
@1&1650CR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:19 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARCUP   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2280 WRITE (8,KEY=B$+A1$(1,5)+A$+K7$(7,2)+K7$(1,2)+D$+J4$)B$+A1$(1,5)+A$+K7$(7,CR@1D_____@1l___
@1&2)+K7$(1,2)+D$+J4$,J4$,B$,M0,M1,M2,M3,L8,M$,A$,B1$,A1$,D$CR@1&__CR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:20 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARDOP0   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2080 LET M3=NUM(D1$(1,2))*30+NUM(D1$(4,2))+NUM(D1$(7,2))*360CR@1R_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:21 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARINQ   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1548 IF X4$(7,2)<>J5$(7,2) THEN GOTO 1530CR@1+_____@15_____

@1 2080 LET M3=NUM(D1$(1,2))*30+NUM(D1$(4,2))+NUM(D1$(7,2))*360CR@1R_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:22 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARIUP   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2810 LET K17$=J8$(2)+J5$(7,2)+J5$(1,2)+J5$(4,2)+STR(N:"0000"),TR$="WTHD"CR@18_____

@1 4042 IF NUM(J5$(7,2))<50 THEN LET BW$=BW$+"20" ELSE LET BW$=BW$+"19"CR@1/_____

@1 4044 LET BW$=BW$+J5$(7,2)+J5$(1,2)+J5$(4,2); REM "INV DATE YYYYMMDD"CR@14_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:23 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARPAA   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2080 LET M3=NUM(D1$(1,2))*30+NUM(D1$(4,2))+NUM(D1$(7,2))*360CR@1R_____

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:23 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARPAG   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2080 LET M3=NUM(D1$(1,2))*30+NUM(D1$(4,2))+NUM(D1$(7,2))*360CR@1R_____

**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:24 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARPASA1   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 0260 LET X$=DAY,X2=NUM(X$(7,2))CR@19_____

@1 1052 LET X2=NUM(X$(7,2))CR@12_____

@1 1063 IF X2<86 THEN GOTO 1062 ELSE IF X2>NUM(X$(7,2)) THEN GOTO 1070CR@1N_____

@1 2120 IF LEN(J5$)<>8 THEN GOTO 2060 ELSE LET N=NUM(J5$(7,2),ERR=2060)CR@1U_____

@1 2220 LET X2=NUM(X$(7,2))CR@12_____

@1 2250 IF X2<86 THEN GOTO 2240 ELSE IF X2>NUM(X$(7,2)) THEN GOTO 2280 ELSE IF T(XCR@1N_____
@1&2)=0 THEN GOTO 2240CR

@1 6110 LET X2=NUM(X$(7,2))CR@12_____

@1 6140 IF X2<86 THEN GOTO 6130 ELSE IF X2>NUM(X$(7,2)) THEN GOTO 6200 ELSE IF T1(CR@1N_____
@1&X2)=0 THEN GOTO 6130CR

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:24 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARPAVA   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2030 IF K2$(12,4)<>M2$(7,2)+M2$(1,2) THEN READ (2); GOTO 2020 ELSE READ (2,KEY=CR@16_____
@1&K2$)IOL=0980CR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 5:27 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARPCO   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2024 IF M2$(7,2)+M2$(1,2)<>J5$(7,2)+J5$(1,2) THEN READ (2); GOTO 2020CR@1+_____@1>_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 6:28 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARPPDA   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2080 LET M3=NUM(D1$(1,2))*30+NUM(D1$(4,2))+NUM(D1$(7,2))*360CR@1R_____

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 6:34 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARPS1   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2580 LET M3=NUM(D1$(1,2))*30+NUM(D1$(4,2))+NUM(D1$(7,2))*360CR@1R_____

**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 6:42 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARPSA   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2024 IF M2$(7,2)+M2$(1,2)<>J5$(7,2)+J5$(1,2) THEN READ (2); GOTO 2020 ELSE READCR@1+_____@1>_____
@1& (2)CR

@1 6260 IF M2$(7,2)+M2$(1,2)=J5$(7,2)+J5$(1,2) THEN REMOVE (2,KEY=K2$)CR@1+_____@1=_____

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 6:47 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARPSJ   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2035 IF M2$(7,2)+M2$(1,2)<>J5$(7,2)+J5$(1,2) THEN GOTO 2020 ELSE PRINT @(15,14)CR@1+_____@1>_____
@1&,'CL',@(15),"INVOICE # ",J4$CR

@1 6250 IF M2$(7,2)+M2$(1,2)=J5$(7,2)+J5$(1,2) THEN REMOVE (2,KEY=K2$)CR@1+_____@1=_____

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 6:51 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARPST   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1130 LET M2=M2+NUM(M1$(7,2))*360CR@16_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 7:13 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: ARUCO   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 6424 IF J5$(7,2)+J5$(1,2)<>L4$(7,2)+L4$(1,2) THEN READ (2); GOTO 6420CR@1+_____@1>_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 7:32 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: CINADJQ   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 4410 LET L1=38,L2=16,O0$=A$+DIV$+I$+M2$(7,2)+M2$(1,2)+M2$(4,2)CR@1G_____

@1 4720 LET K6$=A$+DIV$+I$+D1$(7,2)+D1$(1,2)+D1$(4,2)+STR(N:"0000")CR@1;_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 7:45 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: CINPLOWS   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2110 IF Y3$(1,2)+Y3$(7,2)<>D1$(1,2)+D1$(7,2) THEN LET PQ=PQ+Q,PV=PV+((Q/I7)*I6)CR@14_____@1G_____
@1& ELSE IF TR$="RECV" OR TR$="ADJQ" OR TR$="ADJCM" THEN LET RE=RE+Q,RV=RV+(CR
@1&(Q/I7)*I6) ELSE IF TR$="WTHD" THEN LET WD=WD+Q,WV=WV+((Q/I7)*I6)CR

**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 7:52 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: CINPREC   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1310 LET O$=M2$(7,2)+M2$(1,2)+"00"+A$CR@1/_____

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 7:56 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: CINPSHP   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 0630 REM K$=A$+DIV$+I$+M7$(1,20-LEN(I$))+D1$(7,2)+D1$(1,2)+D1$(4,2)+STR(N:"0000CR@1L_____
@1&")CR

@1 1640 IF K2$(LEN(A$)+24,2)<>M2$(7,2) OR K2$(LEN(A$)+24,4)>M2$(7,2)+M2$(1,2) THENCR@1>_____@1\_____
@1& READ (2); GOTO 1620CR

@1 2340 IF D1$(7,2)+D1$(1,2)<>M2$(7,2)+M2$(1,2) THEN GOTO 2020 ELSE LET TR=TR+TCR@1+_____@1>_____

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 8:04 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: CINPSTAT   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1340 IF CTL=4 THEN GOTO 6900 ELSE IF CTL=3 THEN GOTO 1200 ELSE IF CTL=2 THEN LECR
@1&T M2$=DAY,M2$=M2$(1,2)+M2$(4,2)+M2$(7,2); GOSUB 8140 ELSE IF NUM(M2$,ERR=CR@1I_____
@1&1390)=0 THEN GOTO 1390 ELSE GOSUB 8140CR

@1 2070 IF Y3$(7,2)+Y3$(1,2)<K3$(LEN(Y2$)+LEN(DIV$)+LEN(PRD$)+1,4) THEN READ (3,ENCR@1+_____
@1&D=6000); GOTO 2020; REM "GET NEXT RECORD"CR

@1 2120 REM IF Y3$(7,2)+Y3$(1,2)<D1$(7,2)+D1$(1,2) THEN GOTO 2020 ELSE IF Y3$(7,2)CR@1/_____@1A_____@1j_____
@1&+Y3$(1,2)>D1$(7,2)+D1$(1,2) THEN LET PQ=PQ+Q ELSE IF TR$="RECV" THEN LET CR@13_____
@1&RE=RE+Q ELSE IF TR$="WTHD" THEN LET WD=WD+Q ELSE IF TR$="ADJQ" OR TR$="ADCR
@1&JCM" THEN LET ADJ=ADJ+QCR

@1 2122 REM IF Y3$(7,2)+Y3$(1,2)<D1$(7,2)+D1$(1,2) THEN GOTO 2020 ELSE IF Y3$(7,2)CR@1/_____@1A_____@1j_____
@1&+Y3$(1,2)>D1$(7,2)+D1$(1,2) THEN LET PV=PV+((Q/I7)*I6),PQ=PQ+Q ELSE IF TRCR@13_____
@1&$="RECV" THEN LET RV=RV+((Q/I7)*I6),RE=RE+Q ELSE IF TR$="WTHD" THEN LET WCR
@1&V=WV+((Q/I7)*I6),WD=WD+Q ELSE IF TR$="ADJQ" OR TR$="ADJCM" THEN LET AV=AVCR
@1&+((Q/I7)*I6),ADJ=ADJ+QCR

@1 2124 IF Y3$(7,2)+Y3$(1,2)<D1$(7,2)+D1$(1,2) THEN GOTO 2020 ELSE IF Y3$(7,2)+Y3$CR@1+_____@1=_____@1f_____
@1&(1,2)>D1$(7,2)+D1$(1,2) THEN LET PV=PV+((Q/I7)*I6),PQ=PQ+Q ELSE IF TR$="RCR@1/_____
@1&ECV" THEN LET RE=RE+Q ELSE IF TR$="WTHD" THEN LET WD=WD+Q ELSE IF TR$="ADCR
@1&JQ" OR TR$="ADJCM" THEN LET ADJ=ADJ+QCR

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 8:09 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: CINPTRAN   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 0630 REM K$=A$+DIV$+I$+M7$(1,20-LEN(I$))+D1$(7,2)+D1$(1,2)+D1$(4,2)+STR(N:"0000CR@1L_____
@1&")CR

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 8:14 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: CINREC   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 0250 LET C9$="1",DA$=DAY,DA$=DA$(7,2)+DA$(1,2)+DA$(4,2)CR@1@_____

@1 4250 IF M9=8 THEN GOTO 4290 ELSE IF DA$<M2$(7,2)+M2$(1,2)+M2$(4,2) THEN GOTO 42CR@1K_____
@1&80 ELSE LET D1$=M2$CR

@1 6120 LET K$=A$+DIV$+I$+M7$(1,20-LEN(I$))+D1$(7,2)+D1$(1,2)+D1$(4,2)+STR(N:"0000CR@1L_____
@1&")CR

@1 6210 LET K$=D1$(7,2)+D1$(1,2)+D1$(4,2)+A$+DIV$+I$+STR(N:"0000")CR@1/_____

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 8:22 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: CINSHIP   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 0630 REM K$=A$+DIV$+I$+M7$(1,20-LEN(I$))+D1$(7,2)+D1$(1,2)+D1$(4,2)+STR(N:"0000CR@1L_____
@1&")CR

@1 4520 LET K5$=K4$(1,28)+D1$(7,2)+D1$(1,2)+D1$(4,2)+STR(N:"0000"),K$=K5$CR@1:_____

@1 4710 LET K4$=K3$+J5$(7,2)+J5$(1,2)+J5$(4,2)+"0000",D4$=J5$,N=0,P4$=D5$,I4=0,I5=CR@14_____
@1&0,D0$=D$,TR$="ADJCM",Q4=QCR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 8:47 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: COMTSR   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 0470 LET K3$=J4$(7,2)+J4$(1,2)+B1$(1,5)+B$+A1$(1,5)+A$+J$CR@10_____

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 8:48 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: COSCLR   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1030 IF D2$(7,2)+D2$(1,2)>"8701" THEN GOTO 1010CR@1+_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e10:10 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: CUSPURGE   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 0220 LET X1$=DAY,X1=NUM(X1$(7,2))-2,X1$=STR(X1:"00")+X1$(1,2),X1=NUM(X1$)CR@1;_____

@1 1370 IF NUM(D1$(7,2)+D1$(1,2))<X1 THEN GOTO 1320 ELSE LET FLAG1$="GOTONE"; GOTOCR@1/_____
@1& 1320CR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e11:28 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: FGIPST   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1252 IF LEN(G1$)<>8 THEN GOTO 1230 ELSE IF G1$(7,2)+G1$(1,2)<X3$(7,2)+X3$(1,2) CR@1N_____@1`_____
@1&THEN GOTO 1262 ELSE IF G1$(7,2)+G1$(1,2)>X3$(7,2)+X3$(1,2) THEN GOTO 1230CR@1@_____@1R_____

@1 1412 IF LEN(D10$)<>8 THEN GOTO 1413 ELSE IF D10$(7,2)+D10$(1,2)>X3$(7,2)+X3$(1,CR@1P_____@1c_____
@1&2) THEN GOTO 1320CR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e11:38 PMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/06/99LF------------------------------------------------------------------------------
@1 PROGRAM: FGISHP   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 6132 WRITE (6,KEY=D$+G1$(7,2)+G1$(1,2)+G1$(4,2)+STR(T:"0000"))D$+G1$(7,2)+G1$(1CR@18_____@1d_____
@1&,2)+G1$(4,2)+STR(T:"0000"),D$,T,G1,G3,G1$,G2$,G3$,G4,S1,S5$CR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e12:34 AMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/07/99LF------------------------------------------------------------------------------
@1 PROGRAM: GLPADT   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2010 READ (2,KEY=Y1$+Y3$(7,2)+Y3$(1,2),DOM=2011)CR@18_____

@1 2022 PRINT @(0,14),'CL',@(10),"SEARCHING FILE - NOW ON ACCOUNT ",K2$(1,6)," DATCR
@1&ED ",K2$(9,2),"/",K2$(7,2)CR@1;_____

@1 2040 IF K2$(7,4)>Y4$(7,2)+Y4$(1,2) THEN READ (2); GOTO 2020CR@14_____

@1 2050 IF K2$(7,4)<Y3$(7,2)+Y3$(1,2) THEN READ (2); GOTO 2020CR@14_____

@1 4122 IF M2$<>"" AND M2$(5,2)+M2$(1,2)<Y3$(7,2)+Y3$(1,2) THEN GOTO 4190CR@1I_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 1:29 AMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/07/99LF------------------------------------------------------------------------------
@1 PROGRAM: GLTRU   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 3632 WRITE (10,KEY=P5$+L4$(7,2)+L$+A2$+L3$)P5$+L4$(7,2)+L$+A2$+L3$,L$,A2$,P5$,LCR@1:_____@1R_____
@1&3$,L4$,P0,L0$CR

@1 5137 WRITE (10,KEY=B2$+L4$(7,2)+L$+A2$+L3$)B2$+L4$(7,2)+L$+A2$+L3$,L$,A2$,B2$,LCR@1:_____@1R_____
@1&3$,L4$,T(I8+I9),L0$CR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 2:01 AMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/07/99LF------------------------------------------------------------------------------
@1 PROGRAM: JOBDAC   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1350 IF M9=8 THEN GOTO 1390 ELSE LET Y1=NUM(M2$(7,2)+M2$(1,2)+M2$(4,2))CR@1O_____

@1 1450 IF M9=8 THEN GOTO 1490 ELSE LET Y2=NUM(M2$(7,2)+M2$(1,2)+M2$(4,2))CR@1O_____

@1 1720 IF Y1=0 THEN GOTO 1800 ELSE IF NUM(D4$(7,2)+D4$(1,2)+D4$(4,2))<Y1 OR NUM(DCR@1K_____
@1&4$(7,2)+D4$(1,2)+D4$(4,2))>Y2 THEN GOTO 1620CR@1(_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 2:45 AMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/07/99LF------------------------------------------------------------------------------
@1 PROGRAM: JOBHD1   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 6230 WRITE (7,KEY=D$+D4$(7,2)+D4$(1,2)+D4$(4,2)+STR(TIM:"00.0000"))D$+D4$(7,2)+CR@18_____@1i_____
@1&D4$(1,2)+D4$(4,2)+STR(TIM:"00.0000"),D$,D4$,STR(TIM:"00.0000"),"","","100CR
@1&00"CR

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 3:10 AMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/07/99LF------------------------------------------------------------------------------
@1 PROGRAM: JOBPAC   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2130 IF Y1=0 THEN GOTO 2131 ELSE IF NUM(D4$(7,2)+D4$(1,2)+D4$(4,2))<Y1 THEN GOTCR@1K_____
@1&O 2040 ELSE IF NUM(D4$(7,2)+D4$(1,2)+D4$(4,2))>Y2 THEN GOTO 2040CR@1<_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 3:30 AMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/07/99LF------------------------------------------------------------------------------
@1 PROGRAM: JOBPCCD   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 1350 IF M9=8 THEN GOTO 1390 ELSE LET Y1=NUM(M2$(7,2)+M2$(1,2)+M2$(4,2))CR@1O_____

@1 1450 IF M9=8 THEN GOTO 1490 ELSE LET Y2=NUM(M2$(7,2)+M2$(1,2)+M2$(4,2))CR@1O_____

@1 2130 IF Y1=0 THEN GOTO 2200 ELSE IF NUM(D4$(7,2)+D4$(1,2)+D4$(4,2))<Y1 THEN GOTCR@1K_____
@1&O 2040 ELSE IF NUM(D4$(7,2)+D4$(1,2)+D4$(4,2))>Y2 THEN GOTO 2040CR@1<_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 3:46 AMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/07/99LF------------------------------------------------------------------------------
@1 PROGRAM: JOBPLS   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 0230 LET DA$=DAY,DA$=DA$(7,2)+DA$(1,2)+DA$(4,2)CR@18_____

@1 1250 IF M9=9 THEN GOTO 1290 ELSE LET SD$=M2$(7,2)+M2$(1,2)+M2$(4,2)CR@1L_____

@1 2020 LET DD$=D6$(7,2)+D6$(1,2)+D6$(4,2)CR@10_____

**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 3:56 AMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/07/99LF------------------------------------------------------------------------------
@1 PROGRAM: JOBPUB   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 2088 LET Y1=NUM(Y1$(7,2)+Y1$(1,2)+Y1$(4,2)),Y2=NUM(Y2$(7,2)+Y2$(1,2)+Y2$(4,2)),CR@13_____@1V_____
@1&D=NUM(D4$(7,2)+D4$(1,2)+D4$(4,2))CR@1/_____

FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 4:02 AMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/07/99LF------------------------------------------------------------------------------
@1 PROGRAM: JOBREG   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 5042 IF Y=2 AND D4$(7,2)+D4$(1,2)<>X3$(7,2)+X3$(1,2) THEN GOTO 5020CR@13_____@1F_____

@1 6954 IF A1$="VOIDED NUMBER!" THEN REMOVE (3,KEY=K3$) ELSE IF D4$(7,2)+D4$(1,2)<CR@1`_____
@1&>X3$(7,2)+X3$(1,2) THEN GOTO 6940 ELSE REMOVE (3,KEY=K3$)CR@1*_____

@1 6962 REMOVE (3,KEY="*"+Z8$(1,2)+Z8$(4,2)+Z8$(7,2),DOM=6963)CR@1L_____

@1 6964 LET Z8$=DAY,Z8$="*"+Z8$(1,2)+"01"+Z8$(7,2)CR@1J_____

**** NO OCCURRENCES FOUND ****
FFEBS5B20@15COMPUTER PROGRAMS for BUSINESS, INC.@1e 4:12 AMLFPAGE: 1@11BASIC Program String Search & Replace Utility@1e06/07/99LF------------------------------------------------------------------------------
@1 PROGRAM: JOBTRK   SCOPE: ALL TEXT   SEARCH: '(7,2)'

@1 6110 LET D1$=DAY,T1$=STR(TIM:"00.0000"),K9$=D$+D1$(7,2)+D1$(1,2)+D1$(4,2)+T1$CR@1R_____

**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
**** NO OCCURRENCES FOUND ****
                                                                                                                                                    