HCAS#39538 show bedrijf scherm voor mobile toegevoegd, doorklikbaar vanuit contract.asp & order.asp
svn path=/Website/trunk/; revision=34018
This commit is contained in:
194
APPL/PDA/prs_show_bedrijf.asp
Normal file
194
APPL/PDA/prs_show_bedrijf.asp
Normal file
@@ -0,0 +1,194 @@
|
||||
<%@language = "javascript" %>
|
||||
<% /*
|
||||
$Revision$
|
||||
$Id$
|
||||
|
||||
File: prs_show_bedrijf.asp
|
||||
Description: Bekijk bedrijf (Mobile version)
|
||||
Parameters: bedrijf_key voor bestaand bedrijf
|
||||
Note:
|
||||
|
||||
*/ %>
|
||||
|
||||
<!-- #include file="../Shared/common.inc" -->
|
||||
<!-- #include file="../Shared/selector.inc" -->
|
||||
<!-- #include file="../Shared/get_objecten_sql.inc" -->
|
||||
<!-- #include file="./resultset_table.inc" -->
|
||||
<!-- #include file="./mobile.inc" -->
|
||||
<!-- #include file="./iface.inc" -->
|
||||
<!-- #include file="../prs/prs.inc" -->
|
||||
<!-- #include file="../prs/prs_flexkenmerk.inc" -->
|
||||
|
||||
<%
|
||||
FCLTHeader.Requires({plugins: ["suggest"]});
|
||||
|
||||
var bedrijf_key = getQParamInt("bedrijf_key");
|
||||
var qrc = getQParamInt("qrc", 0) != 0;
|
||||
|
||||
var sql = "SELECT prs_bedrijf_intern, prs_bedrijf_naam FROM prs_bedrijf WHERE prs_bedrijf_key = " + bedrijf_key;
|
||||
var oRs = Oracle.Execute(sql);
|
||||
var intern = oRs("prs_bedrijf_intern").Value == 1;
|
||||
oRs.Close();
|
||||
|
||||
var autfunction = "";
|
||||
if (intern)
|
||||
autfunction = "WEB_PRSMAN";
|
||||
else
|
||||
autfunction = "WEB_RELMAN";
|
||||
|
||||
var authparams = user.checkAutorisation(autfunction);
|
||||
|
||||
var bedrijf_info = prs.prs_bedrijfinfo(bedrijf_key);
|
||||
|
||||
%>
|
||||
<html>
|
||||
<head>
|
||||
<% FCLTMHeader.Generate({title: bedrijf_info.naam }); %>
|
||||
|
||||
<script type="text/javascript">
|
||||
|
||||
function prs_action_callback()
|
||||
{
|
||||
window.history.go(-1);
|
||||
}
|
||||
</script>
|
||||
</head>
|
||||
<body>
|
||||
<div>
|
||||
<%
|
||||
PAGE_START({id: "page-1-" + bedrijf_key});
|
||||
HEADER({title: (bedrijf_key > -1 ? bedrijf_info.naam : ""), back: !qrc, home: !qrc, datatheme: jQFrontEndTheme});
|
||||
CONTENT_START();
|
||||
|
||||
ROFIELD("fld", L("lcl_prs_companies_name"), bedrijf_info.naam);
|
||||
ROFIELD("fld", L("lcl_prs_companies_post_adres"), bedrijf_info.post_adres, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_post_postcode"), bedrijf_info.post_postcode, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_post_plaats"), bedrijf_info.post_plaats, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_post_land"), bedrijf_info.post_land, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_bezoek_adres"), bedrijf_info.bezoek_adres, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_bezoek_postcode"), bedrijf_info.bezoek_postcode, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_bezoek_plaats"), bedrijf_info.bezoek_plaats, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_bezoek_land"), bedrijf_info.bezoek_land, {suppressEmpty: true});
|
||||
|
||||
BLOCK_START({collapsed: true, title: L("lcl_prs_bedrijf_contactblock")});
|
||||
var counter = 1;
|
||||
ROFIELD("fld", L("lcl_prs_companies_telefoon"), bedrijf_info.telefoon, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_fax"), bedrijf_info.fax, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_telefoon2"), bedrijf_info.telefoon2, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_contact_person") + " " + counter++, bedrijf_info.contact_persoon, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_email"), bedrijf_info.email, { suppressEmpty: true, moreinfo: "mailto:" + bedrijf_info.email });
|
||||
ROFIELD("fld", L("lcl_prs_companies_contact_telefoon"), bedrijf_info.contact_telefoon, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_contact_fax"), bedrijf_info.contact_fax, {suppressEmpty: true});
|
||||
// Wil ik checken of dit relevant is?
|
||||
ROFIELD("fld", L("lcl_prs_companies_ingids"), (bedrijf_info.ingids == 1 ? L("lcl_Yes") : L("lcl_No")));
|
||||
|
||||
var sql = "SELECT cp.prs_contactpersoon_naam"
|
||||
+ " || NVL2 (cp.prs_contactpersoon_voorletters,"
|
||||
+ " ', ' || cp.prs_contactpersoon_voorletters,"
|
||||
+ " '')"
|
||||
+ " || NVL2 (cp.prs_contactpersoon_tussenv,"
|
||||
+ " ' ' || cp.prs_contactpersoon_tussenv,"
|
||||
+ " '')"
|
||||
+ " || NVL2 (cp.prs_contactpersoon_voornaam,"
|
||||
+ " ' (' || cp.prs_contactpersoon_voornaam || ')',"
|
||||
+ " '')"
|
||||
+ " prs_contactpersoon_naam,"
|
||||
+ " l.alg_locatie_omschrijving,"
|
||||
+ " cp.prs_contactpersoon_telefoon_1,"
|
||||
+ " cp.prs_contactpersoon_telefoon_2,"
|
||||
+ " cp.prs_contactpersoon_email"
|
||||
+ " FROM alg_locatie l,"
|
||||
+ " prs_contactpersoon cp,"
|
||||
+ " prs_contactpersoon_locatie n,"
|
||||
+ " prs_bedrijf b"
|
||||
+ " WHERE n.alg_locatie_key = l.alg_locatie_key(+)"
|
||||
+ " AND b.prs_bedrijf_key = cp.prs_bedrijf_key"
|
||||
+ " AND b.prs_bedrijf_verwijder IS NULL"
|
||||
+ " AND cp.prs_contactpersoon_key = n.prs_contactpersoon_key(+)"
|
||||
+ " AND cp.prs_contactpersoon_verwijder IS NULL"
|
||||
+ " AND b.prs_bedrijf_key = " + bedrijf_key
|
||||
+ " AND b.prs_bedrijf_intern IS NULL"
|
||||
+ " ORDER BY b.prs_bedrijf_naam_upper ASC,"
|
||||
+ " l.alg_locatie_upper ASC,"
|
||||
+ " cp.prs_contactpersoon_naam";
|
||||
|
||||
var oRs = Oracle.Execute(sql);
|
||||
while (!oRs.EoF)
|
||||
{
|
||||
ROFIELD("fld", L("lcl_contact_pers") + " " + counter++, oRs("prs_contactpersoon_naam").Value, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_location"), oRs("alg_locatie_omschrijving").Value, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_contact_tel1"), oRs("prs_contactpersoon_telefoon_1").Value, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_contact_tel2"), oRs("prs_contactpersoon_telefoon_2").Value, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_contact_email"), oRs("prs_contactpersoon_email").Value, {suppressEmpty: true});
|
||||
oRs.movenext();
|
||||
}
|
||||
BLOCK_END();
|
||||
|
||||
|
||||
BLOCK_START({collapsed: true, title: L("lcl_prs_bedrijf_relatieblock")});
|
||||
if (bedrijf_info.prs_relatietype_key) {
|
||||
var reltype_oms;
|
||||
asql = "SELECT prs_relatietype_omschrijving FROM prs_relatietype WHERE prs_relatietype_key = " + bedrijf_info.prs_relatietype_key;
|
||||
aoRs = Oracle.Execute(asql);
|
||||
if (!aoRs.eof)
|
||||
reltype_oms = aoRs(0).Value;
|
||||
ROFIELDTR("fld", L("lcl_prs_relatietype"), reltype_oms, {suppressEmpty: true});
|
||||
}
|
||||
ROFIELD("fld", L("lcl_prs_companies_leverancier_nr"), bedrijf_info.prs_leverancier_nr, {suppressEmpty: true});
|
||||
|
||||
var relation = "";
|
||||
if (bedrijf_info.leverancier == 1)
|
||||
relation = L("lcl_prs_companies_leverancier");
|
||||
if (bedrijf_info.uitvoerende == 1)
|
||||
relation += (relation == "" ? "" : "\n") + L("lcl_prs_companies_uitvoerende");
|
||||
if (bedrijf_info.contract == 1)
|
||||
relation += (relation == "" ? "" : "\n") + L("lcl_prs_companies_contract");
|
||||
if (bedrijf_info.huurder == 1)
|
||||
relation += (relation == "" ? "" : "\n") + L("lcl_prs_companies_huurder");
|
||||
|
||||
ROFIELD("fld", L("lcl_prs_type_relation"), relation, {multi: true, suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_overeenkomst_nr"), bedrijf_info.prs_overeenkomst_nr, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_overeenkomst_datum"), toDateString(bedrijf_info.prs_overeenkomst_datum), {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_uurloon"), bedrijf_info.uurloon, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_bes_limiet"), bedrijf_info.bes_limiet, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_bes_kosten"), bedrijf_info.bes_kosten, {suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_opmerking"), bedrijf_info.opmerking, {id: "bdr_opm", multi: true, suppressEmpty: true});
|
||||
ROFIELD("fld", L("lcl_prs_companies_opmerking2"), bedrijf_info.opmerking2, {id: "bdr_opm2", multi: true, suppressEmpty: true});
|
||||
if (bedrijf_info.mld_adres_key_lev) {
|
||||
var leveradres;
|
||||
asql = " SELECT mld_adres_naam FROM mld_adres WHERE mld_adres_key = " + bedrijf_info.mld_adres_key_lev;
|
||||
aoRs = Oracle.Execute(asql);
|
||||
if ( !aoRs.eof ) { leveradres = aoRs(0).Value; }
|
||||
ROFIELD("fld", L("lcl_prs_companies_adres_lev"), leveradres, {suppressEmpty: true});
|
||||
}
|
||||
if (bedrijf_info.mld_adres_key_fac) {
|
||||
var factuuradres;
|
||||
asql = " SELECT mld_adres_naam FROM mld_adres WHERE mld_adres_key = " + bedrijf_info.mld_adres_key_fac;
|
||||
aoRs = Oracle.Execute(asql);
|
||||
if ( !aoRs.eof ) { factuuradres = aoRs(0).Value; }
|
||||
ROFIELD("fld", L("lcl_prs_companies_adres_fac"), factuuradres, {suppressEmpty: true});
|
||||
}
|
||||
if (bedrijf_info.fin_btwtabel_key) {
|
||||
var btwtabel;
|
||||
asql = "SELECT fin_btwtabel_omschrijving FROM fin_btwtabel WHERE fin_btwtabel_key = " + bedrijf_info.fin_btwtabel_key;
|
||||
aoRs = Oracle.Execute(asql);
|
||||
if ( !aoRs.eof ) { btwtabel = aoRs(0).Value; }
|
||||
ROFIELD("fld", L("lcl_fin_btwtabel"), btwtabel, {suppressEmpty: true});
|
||||
}
|
||||
BLOCK_END();
|
||||
|
||||
BLOCK_START({collapsed: true, title: L("lcl_prs_bedrijf_flexblock")});
|
||||
generateFlexKenmerkCode ({ link_key: bedrijf_key,
|
||||
niveau: "B",
|
||||
reado: true,
|
||||
flexcolumns: S("prs_flexcolumns"),
|
||||
mobile: true
|
||||
});
|
||||
BLOCK_END();
|
||||
CONTENT_END();
|
||||
FOOTER();
|
||||
PAGE_END()
|
||||
%>
|
||||
</div>
|
||||
</body>
|
||||
</html>
|
||||
Reference in New Issue
Block a user