Hi everyone
I have a script that runs after the first name (fn) middle name (mn) last name (ln) and suffix (s) are entered into a form. The purpose of the script is to see if the member_id is a duplicate of another menber_id and if so require a character to be placed in the delimiter field (de). This script has been working fine for years. (I think I wrote it in A5.4 maybe 3
When I open the member entry form and add a member everything works fine. For example in debug Joe E. Dunbar comes out ln=DUN fn=JO mn=E equals member code DUNJOE the script checks and the closest member-id DUNWIG they are not equal so the program accepts the new member_id.
The problem arises when the form is accessed from a field rule lookup popup on another form �donor entry�. When the lookup is popped up from the �deposit entry� form it works ok
When this happens I type in Joe E Dunbar but debug show ln=CAM fn=KE mn=C Equals CAMKEC the is the member code for record # 1 It is like the buffers aren�t being cleared before the add starts.
When the lookup is popped up from the �deposit entry� form it works ok
Does anyone have any bright ideas.
Here is a copy of the script. The created and updated dates aren�t correct .the script has been running ok for some years. The problem seems to have started when I changed the the order of the popup screens
'Date Created: 14-Nov-2004 05:36:36 PM
'Last Updated: 09-Dec-2004 07:06:16 PM
'Created By :
'Updated By :
debug(1)
ln=UPPER(alltrim(LEFT(MEMBASIC1-"LAST_NAME,3 )))
fn=upper(alltrim(LEFT(MEMBASIC1-"FIRST_NAME,2 )))
mn=upper(alltrim(LEFT(MEMBASIC1-"MIDDLE_NAM,1 )))
su=upper(alltrim(MEMBASIC1-"Sufix))
de=alltrim(a_field_value)
go=ln+fn+MN+SU+de
CK=lookupc("c",go,"MEMBER_ID","C:Progra~1\A5v4\Bethany\MEMBasic1.dbf","MEMBER_ID")
IF go=CK Then
Response=ui_msg_box("WARNING","MUST ADD A CHARACTER TO DELIN FIELD",48)
IF Response=1 THEN
A_CAN_DO="f"
else
A_CAN_DO="T"
end if
end if
Thanks
Ken
I have a script that runs after the first name (fn) middle name (mn) last name (ln) and suffix (s) are entered into a form. The purpose of the script is to see if the member_id is a duplicate of another menber_id and if so require a character to be placed in the delimiter field (de). This script has been working fine for years. (I think I wrote it in A5.4 maybe 3
When I open the member entry form and add a member everything works fine. For example in debug Joe E. Dunbar comes out ln=DUN fn=JO mn=E equals member code DUNJOE the script checks and the closest member-id DUNWIG they are not equal so the program accepts the new member_id.
The problem arises when the form is accessed from a field rule lookup popup on another form �donor entry�. When the lookup is popped up from the �deposit entry� form it works ok
When this happens I type in Joe E Dunbar but debug show ln=CAM fn=KE mn=C Equals CAMKEC the is the member code for record # 1 It is like the buffers aren�t being cleared before the add starts.
When the lookup is popped up from the �deposit entry� form it works ok
Does anyone have any bright ideas.
Here is a copy of the script. The created and updated dates aren�t correct .the script has been running ok for some years. The problem seems to have started when I changed the the order of the popup screens
'Date Created: 14-Nov-2004 05:36:36 PM
'Last Updated: 09-Dec-2004 07:06:16 PM
'Created By :
'Updated By :
debug(1)
ln=UPPER(alltrim(LEFT(MEMBASIC1-"LAST_NAME,3 )))
fn=upper(alltrim(LEFT(MEMBASIC1-"FIRST_NAME,2 )))
mn=upper(alltrim(LEFT(MEMBASIC1-"MIDDLE_NAM,1 )))
su=upper(alltrim(MEMBASIC1-"Sufix))
de=alltrim(a_field_value)
go=ln+fn+MN+SU+de
CK=lookupc("c",go,"MEMBER_ID","C:Progra~1\A5v4\Bethany\MEMBasic1.dbf","MEMBER_ID")
IF go=CK Then
Response=ui_msg_box("WARNING","MUST ADD A CHARACTER TO DELIN FIELD",48)
IF Response=1 THEN
A_CAN_DO="f"
else
A_CAN_DO="T"
end if
end if
Thanks
Ken