How can I dump the value from Query to textbox

See more:

VB

Oracle

I have a picklist (popup) where
I have a select statement where i get DEPARTMENT from the query
I have 1 textbox with id as DEPARTMENT, and another textbox with id as OLD_DEPARTMENT
I want to dump the value DEPARTMENT in both Textbox, Is this possible?

function EMP_NO_POP_onclick() {
popuptype = "popuptype=employee_grade_change_pop&"

search_string = "search_string=&"
a_pass_val = "a_pass_val=deptchange_form&"
a_ret_val = "a_ret_val=PR_EMPLOYEE_MASTER_ID&a_ret_val=EMP_NO&a_ret_val=EMPLOYEE_NAME&a_ret_val=ADDRESS&a_ret_val=TELEPHONE&a_ret_val=EMAIL&a_ret_val=GRADE&a_ret_val=DESIGNATION&a_ret_val=CATEGORY&a_ret_val=DEPARTMENT&a_ret_val=SUBDEPARTMENT&&a_ret_val=PR_GRADE_MASTER_ID&a_ret_val=PR_GRADE_MASTER_ID&a_ret_val=PR_DESIG_MASTER_ID&a_ret_val=PR_CATEGORY_MASTER_ID&a_ret_val=DEPARTMENT_MASTER_ID&a_ret_val=SUBDEPARTMENT_MASTER_ID&a_ret_val=LOCATION_MASTER_ID&a_ret_val=OLD_BA_COST_CODE_MST_ID&a_ret_val=OLD_COST_CODE&a_ret_val=OLD_PR_BUSINES_FUNC_MASTER_ID&a_ret_val=OLD_BUSINESS_FUNCTION_NAME&a_ret_val=OLD_PR_JOB_FUNCTION_MASTER_ID&a_ret_val=OLD_JOB_FUNCTION_NAME&a_ret_val=OLD_PR_PRODUCT_MASTER_ID&a_ret_val=OLD_PRODUCT_NAME"

window.open('Popups/HRemployee_popup.aspx?' + popuptype + search_string + a_pass_val + a_ret_val, 'empnamepop', 'scrollbars=yes,width=650,height=363,top=0,left=140')
}

QUERY :

MySql = " SELECT " & _
" PR_EMPLOYEE_MASTER.ID AS ID, " & _
" PR_EMPLOYEE_MASTER.EMP_NO AS EMP_NO, " & _
" FN_UD_CONCAT(PR_EMPLOYEE_MASTER.FIRST_NAME, PR_EMPLOYEE_MASTER.MIDDLE_NAME, PR_EMPLOYEE_MASTER.LAST_NAME, '') AS EMPLOYEE_NAME, " & _
" FN_UD_CONCAT(PR_EMPLOYEE_ADDRESS.ADDRESS1, PR_EMPLOYEE_ADDRESS.ADDRESS2, PR_EMPLOYEE_ADDRESS.ADDRESS3, '') AS ADDRESS, " & _
" FN_UD_CONCAT(PR_EMPLOYEE_MASTER.COUNTRY_CODE, PR_EMPLOYEE_MASTER.MOBILE_NO, '', '') AS TELEPHONE, " & _
" FN_UD_NVLC(PR_EMPLOYEE_ADDRESS.EMAIL, '') AS EMAIL, " & _
" PR_GRADE_MASTER.NAME AS GRADE, " & _
" PR_DESIG_MASTER.NAME AS DESIGNATION, " & _
" PR_CATEGORY_MASTER.NAME AS CATEGORY, " & _
" DEPARTMENT_MASTER.NAME AS DEPARTMENT, " & _
" SUBDEPARTMENT_MASTER.NAME AS SUB_DEPARTMENT, " & _
" LOCATION_MASTER.LOCATION_NAME AS LOCATION, " & _
" PR_GRADE_MASTER.ID AS GRADE_ID, " & _
" PR_DESIG_MASTER.ID AS DESIG_ID, " & _
" PR_CATEGORY_MASTER.ID AS CATE_ID, " & _
" DEPARTMENT_MASTER.ID AS DEPT_ID, " & _
" SUBDEPARTMENT_MASTER.ID AS SUBDETP_ID, " & _
" LOCATION_MASTER.ID AS LOCATION_ID " & _
" FROM " & _
" COMPANY_MASTER INNER JOIN PR_EMPLOYEE_MASTER ON " & _
" COMPANY_MASTER.ID = PR_EMPLOYEE_MASTER.COMPANY_MASTER_ID INNER JOIN PR_EMPLOYEE_ADDRESS ON " & _
" PR_EMPLOYEE_MASTER.ID = PR_EMPLOYEE_ADDRESS.PR_EMPLOYEE_MASTER_ID AND PR_EMPLOYEE_ADDRESS.TYPE='C' LEFT OUTER JOIN SUBDEPARTMENT_MASTER ON " & _
" PR_EMPLOYEE_MASTER.SUBDEPARTMENT_MASTER_ID = SUBDEPARTMENT_MASTER.ID LEFT OUTER JOIN DEPARTMENT_MASTER ON " & _
" PR_EMPLOYEE_MASTER.DEPARTMENT_MASTER_ID = DEPARTMENT_MASTER.ID LEFT OUTER JOIN LOCATION_MASTER ON " & _
" PR_EMPLOYEE_MASTER.EMP_LOCATION_MASTER_ID = LOCATION_MASTER.ID LEFT OUTER JOIN PR_DESIG_MASTER ON " & _
" PR_EMPLOYEE_MASTER.PR_DESIG_MASTER_ID = PR_DESIG_MASTER.ID LEFT OUTER JOIN PR_CATEGORY_MASTER ON " & _
" PR_EMPLOYEE_MASTER.PR_CATEGORY_MASTER_ID = PR_CATEGORY_MASTER.ID LEFT OUTER JOIN PR_GRADE_MASTER ON " & _
" PR_EMPLOYEE_MASTER.PR_GRADE_MASTER_ID = PR_GRADE_MASTER.ID " & _
" WHERE " & _
" PR_EMPLOYEE_MASTER.COMPANY_MASTER_ID = " & Trim(CompID) & _
" AND PR_EMPLOYEE_MASTER.ACTIVE='Y' " & _
" AND PR_EMPLOYEE_MASTER.EMP_APPROVED ='Y' " & _
" AND (PR_EMPLOYEE_MASTER.EMP_STATUS <> 'D' or PR_EMPLOYEE_MASTER.EMP_STATUS is null) " & _