@element= ( $id,$Record_Lock,$Record_Change_Date,$Purchase_PO,$Project_Group, $Project_Name,$Project_Active,$Project_Vendor,$Project_Prime,$Project_Status, $Site_ID,$Site_Name,$Site_Division,$Site_Country,$Site_AP_Count, $Survey_Data_Date,$Survey_First_Date,$Survey_Last_Date,$Survey_Count, $Survey_Status,$Survey_Status_Manual,$Survey_GT_Three,$Map_Approved_Date,$Map_Architecht, $Cutover_Approved_Date,$Survey_Approved_Date,$Map_Billed_Month,$Cutover_Billed_Month,$Survey_Billed_Month) foreach $Field_Name(@element) { $X1=$X."px"; $Y=$Y."px"; $Z1=$Z."px"; print <$DB_Column_Name

ENDHTML $X=$X+30; }