Check out the programming guide starting on page 124
In my example below I am looking up data from another database in the same application. I am checking to see if the elements that the retrieved data will be placed is empty if it is I transfer the data if not I check with the user first. The part you are interested in is the Xlookup. The @fn refers to the actual application you are in use this instead of typing the complete path and file name.
I hope this starts you in the correct direction.
var vAddevinspri as string vAddevinspri = EVInscoNamePrimary + EVInscoStreetPrimary +EVInscoCityPrimary + EVInscoStatePrimary + EVInscozipPrimary + EVInscophonePrimary + EVInscoKeyPrimary + EVInscogrpPrimary + EVInscoplanPrimary
if vAddevinspri <> "" then { if @AskUser("There is existing data in the Primary Ins ", "do you want to replace","existing Insurance data with Default Insurance") { Xlookup(@fn, patientid, "patientid", "InscoNamePrimary", EVInscoNamePrimary) Xlookup(@fn, patientid, "patientid", "InscoStreetPrimary", EVInscoStreetPrimary) Xlookup(@fn, patientid, "patientid", "InscoCityPrimary", EVInscoCityPrimary) Xlookup(@fn, patientid, "patientid", "InscoStatePrimary", EVInscoStatePrimary) Xlookup(@fn, patientid, "patientid", "InscozipPrimary", EVInscozipPrimary) Xlookup(@fn, patientid, "patientid", "InscophonePrimary", EVInscophonePrimary) Xlookup(@fn, patientid, "patientid", "InscoKeyPrimary", EVInscoKeyPrimary) Xlookup(@fn, patientid, "patientid", "InscogrpPrimary", EVInscogrpPrimary) Xlookup(@fn, patientid, "patientid", "InscoplanPrimary", EVInscoplanPrimary)
} } else { Xlookup(@fn, patientid, "patientid", "InscoNamePrimary", EVInscoNamePrimary) Xlookup(@fn, patientid, "patientid", "InscoStreetPrimary", EVInscoStreetPrimary) Xlookup(@fn, patientid, "patientid", "InscoCityPrimary", EVInscoCityPrimary) Xlookup(@fn, patientid, "patientid", "InscoStatePrimary", EVInscoStatePrimary) Xlookup(@fn, patientid, "patientid", "InscozipPrimary", EVInscozipPrimary) Xlookup(@fn, patientid, "patientid", "InscophonePrimary", EVInscophonePrimary) Xlookup(@fn, patientid, "patientid", "InscoKeyPrimary", EVInscoKeyPrimary) Xlookup(@fn, patientid, "patientid", "InscogrpPrimary", EVInscogrpPrimary) Xlookup(@fn, patientid, "patientid", "InscoplanPrimary", EVInscoplanPrimary)
}
|