<% =SYS(3101,1256) olddate=SET("Date") oldmark=SET("Mark") crlf=CHR(13)+CHR(10) SET PROCEDURE TO [d:\shahprjs\recruiting\oep\json_new] ADDITIVE *oJSON=NEWOBJECT('json','json.prg') SET DATe YMD SET MARK TO [-] SET CENTURY ON therecord=VAL(TRANSFORM(NVL(orequest.querystring('record'),0))) tsql=[SELECT * FROM (']+dbclocation+[details') WHERE recno()=]+allt(transform(therecord))+[ INTO CURSOR xdetails] &tsql thereffid=allt(xdetails.reffid) tsql=[SELECT * FROM (']+dbclocation+[fileref') WHERE allt(reffid)==']+thereffid+[' INTO CURSOR xfileref] &tsql LEMBASSY=ICASE(embassy='ISL','210',embassy='210','210','231') LVISANUMBER=Alltrim(visaid) LSPONSORID=Alltrim(sponid) LSPONname=json_encode(Alltrim(chrtran(sponname,'-',' '))) select [xdetails] *RETURN xdetails.nationalit *RETURN [File: ]+TRANSFORM(therecord) IF NOT EMPTY(photoname) AND FILE(ADDBS(oprop.appstartpath)+'photos\'+ALLTRIM(photoname)+[.jpeg]) imagefilepath='photos/'+ALLTRIM(photoname)+[.jpeg] else imagefilepath='' endif SELECT code as c_code, name FROM (ADDBS(oprop.appstartpath)+[countries]) ORDER BY name INTO CURSOR xcursor *place of issue of passport passportissue=[
] *nationality nationality=[
] STRTOFILE(nationality,'d:\temp\tmp.txt') pnationality=[
] SELECT distinct city FROM (addbs(oprop.appstartpath)+'pakcities') ORDER BY city INTO CURSOR cities thecities=[
] THEDOMICILE=[
] SELECT number, english,val(number) as vnum FROM (addbs(oprop.appstartpath)+'visatypes') ORDER BY vnum INTO CURSOR vtypes thevtypes=[
] select [xdetails] %>
Given Name:
Surname:
Last Name:
Other Name:
Birth Date:
Birth Place:
Marital Status:
Qualification:
Issued From:
Religion:
Sect:
Present Nationality: <>
Prvous Nationality: <>
City: <>
Domicile: <>
Home Address:
NIC:
Phone:
Work Address:
Passport:
Passport issue:
Passport Expiry:
Place of Issue: <>
Purpose of visit: <>
E Number:
E Number Date:
REG NUMBER AT OEP:
Next of kin:
NIC of Next of Kin:
Age of next of kin:
Age of next of kin:
Relation with applicant:
Witness:
Witness NIC:
Insurrance Place
Insurance date:
Insurance Number:
Medical Center:
Medical Code:
Medical Date: