-v processing

Dennis Malen dmalen at malen.com
Tue Jun 9 20:24:46 PDT 2009


The following now works:

14  -------- - - - - - - -
nextsel~ If: ww="" and 3 lt dt
       Then: lookup -  k=dt   i=B -ng
 15  -------   -   -   -   -   -   -   -   -   -   -   -   -   -
       ~ If: ww=""    'and 3 lt dt
       Then: msgbox "See1:"<cn;   goto chckcn
 16  -------   -   -   -   -   -   -   -   -   -   -   -   -   -
chckcn2~ If: 3 ge dt and 3 le dy
       Then: select

 50  -------   -   -   -   -   -   -   -
chckcn ~ If:
       Then: lookup clx  k=8    i=A -nx
 51  -------   -   -   -   -   -   -   -
       ~ If:
       Then: msgbox "See2:"<clx(38)<cn
 52  -------   -   -   -   -   -   -   -
       ~ If: clx(38) ne cn
       Then: msgbox "See3:"<clx(38)<cn;end
 53  -------   -   -   -   -   -   -   -
       ~ If:
       Then: ww(1,*,g)="y";goto chckcn2

Comments:

1. I don't know why I need "and 3 lt dt" on line 14. That is the only way it 
works.

2. Also the menu line for the report does not have to identify "In". Works 
the same with or without it.

3. The concept of what was done above is that we did not allow the program 
to go to the "select" line until the record was also equal to the value of 
cn.

4. We overlooked the fact that line 15 should not have included "and 3 lt 
dt".

5. I also needed a conditional subroutine that checked for the value of cn 
before the first record was allowed to go to line 16. After we found the 
first record that possessed the value of cn, we would then populate the 
value of ww (line 53) so that the program would not revisit this subroutine.

Dennis Malen
516.479.5912 



More information about the Filepro-list mailing list