-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