Module gmDemographics
source code
Version:
$Revision: 1.40 $
Author:
R.Terry, SJ Tan
|
ID_PATIENT = wxNewId()
|
|
ID_PATIENTSLIST = wxNewId()
|
|
ID_ALL_MENU = wxNewId()
|
|
ID_ADDRESSLIST = wxNewId()
|
|
ID_NAMESLIST = wxNewId()
|
|
ID_CURRENTADDRESS = wxNewId()
|
|
gmSECTION_PATIENT = 5
|
|
ID_COMBOTITLE = wxNewId()
|
|
ID_COMBOSEX = wxNewId()
|
|
ID_COMBOMARITALSTATUS = wxNewId()
|
|
ID_COMBONOKRELATIONSHIP = wxNewId()
|
|
ID_TXTSURNAME = wxNewId()
|
|
ID_TXTFIRSTNAME = wxNewId()
|
|
ID_TXTSALUTATION = wxNewId()
|
|
ID_TXTSTREET = wxNewId()
|
|
ID_TXTSUBURB = wxNewId()
|
|
ID_TXTSTATE = wxNewId()
|
|
ID_TXTPOSTCODE = wxNewId()
|
|
ID_TXTBIRTHDATE = wxNewId()
|
|
ID_TXTCOUNTRYOFBIRTH = wxNewId()
|
|
ID_TXTOCCUPATION = wxNewId()
|
|
ID_TXTNOKADDRESS = wxNewId()
|
|
ID_TXTHOMEPHONE = wxNewId()
|
|
ID_TXTWORKPHONE = wxNewId()
|
|
ID_TXTFAX = wxNewId()
|
|
ID_TXTEMAIL = wxNewId()
|
|
ID_TXTINTERNET = wxNewId()
|
|
ID_TXTMOBILE = wxNewId()
|
|
ID_TXTMEMO = wxNewId()
|
|
ID_LISTADDRESSES = wxNewId()
|
|
ID_BUTTONBROWSENOK = wxNewId()
|
|
ID_BUTTONPHOTOAQUIRE = wxNewId()
|
|
ID_BUTTONPHOTOEXPORT = wxNewId()
|
|
ID_BUTTONPHOTOIMPORT = wxNewId()
|
|
ID_CHKBOXRESIDENCE = wxNewId()
|
|
ID_CHKBOXPOSTAL = wxNewId()
|
|
ID_CHKBOXPREFERREDALIAS = wxNewId()
|
|
ID_BUTTONFINDPATIENT = wxNewId()
|
|
ID_TXTPATIENTFIND = wxNewId()
|
|
ID_TXTPATIENTAGE = wxNewId()
|
|
ID_TXTPATIENTALLERGIES = wxNewId()
|
|
aliasdata = {1:("Peter Patient"), 2:("Bruce Dag"),}
|
|
namelistdata = ['Smith Adan 129 Box Hill Road BOX HILL etc.......
|
|
addressdata = ['129 Afred Street WARNERS BAY 2280', '99 Wolfe ...
|
Imports:
wxversion,
wx,
DateTime,
gmGuiBroker,
gmDispatcher,
gmPlugin,
gmSQLListControl,
ascii_lowercase,
upper,
punctuation,
letters,
atol_error,
lstrip,
uppercase,
ascii_letters,
atof,
replace,
capwords,
index_error,
expandtabs,
Template,
strip,
ascii_uppercase,
octdigits,
index,
ljust,
whitespace,
rindex,
find,
splitfields,
split,
rstrip,
translate,
maketrans,
count,
joinfields,
rjust,
printable,
lower,
swapcase,
atof_error,
atoi,
hexdigits,
Formatter,
atol,
rsplit,
digits,
lowercase,
join,
center,
rfind,
atoi_error,
capitalize,
zfill
namelistdata
- Value:
['Smith Adan 129 Box Hill Road BOX HILL etc....', 'Smith Jean 52 Where
Ever Street CANBERRA etc.....', 'Smith Michael 99 Longbeach Rd MANLYVA
LE etc........']
|
|
addressdata
- Value:
['129 Afred Street WARNERS BAY 2280', '99 Wolfe Street NEWCASTLE 2301'
]
|
|