VIAR#39049 VIAR-domein ontmanteld (onderdeel geworden van GRKL-domein)

svn path=/Website/branches/v2017.1/; revision=35130
This commit is contained in:
Maarten van der Heide
2017-08-28 16:41:12 +00:00
parent 7d7ce37004
commit 2ca7e0ecc9
13 changed files with 0 additions and 2274 deletions

View File

@@ -1,23 +0,0 @@
REM GEN_EXPORT_NACHTWERK.BAT
REM
REM VIAR
REM
REM
REM Context : roep deze file aan indien nodig, of schedule deze
REM Verseist: de randvoorwaarde voor het gebruik van gen_export
REM
REM $Revision$
REM $Id$
REM
REM (c) 2005, Dijkoraad IT bv, +31 (53) 4800700, facilitorsupport@it.dijkoraad.nl
REM
REM ================================================== create exportfile
CALL ..\..\..\utils\gen_export\gen_export.bat NACHTWERK
REM ================================================== copy to final destination
REM COPY PSF*.csv q:\temp\
REM ================================================== cleanup

Binary file not shown.

View File

@@ -1,336 +0,0 @@
/*
* $Revision$
* $Modtime: 15-02-12 14:31 $
*
*
* basiskleuren: #ededed (donkerblauw)
* #DB9B00 (lichtblauw)
* #DB9B00 (accentoranje)
* #b4cfe0 (achtergrondblauw)
* ----
* #747476 (viareva-grijs)
*/
/* Titelbalk */
/*
@import url("jquery-ui-1.8.22.custom.css");
.tabclose, .tabcloseall {
color: #aadaf2;
}
.ui-layout-resizer, .uit-layout-toggler { display: none !important; }
.uit-layout-west { top: 75px !important; left: 0 !important; }
.ui-layout-center { top: 75px !important; left: 252px !important; }
*/
.ui-layout-resizer { /* all 'resizer-bars' */
background: #fff;
}
.ui-layout-toggler { /* all 'toggler-buttons' */
background: #aaa;
}
#headerblok {
background: url(banner.png) no-repeat;
background-position: 0px 0px;
}
/* Links & highlights */
#loggedinuser span:hover,
#headerhelp:hover,
#headerlogout:hover,
a.newstextFresh:hover,
a.newstext:hover,
#showbody input.details:hover,
span.ia:hover,
label.cadselect:hover,
#buttons ul li:hover,
table.filter td:hover p,
span.pscapt:hover,
#facforum #container a:hover {
text-decoration: none;
color: #DB9B00;
}
tr.flexcollapsable td:hover span,
.more:hover {
color: #DB9B00;
}
.ui-datepicker-calendar .ui-state-hover {
border: 1px solid #DB9B00;
}
/* "Demonstratie" */
div#headerprefix {
right: 33%;
}
/* Portal */
html, body, #editbody, #showbody, #listbody {
background-image: none;/*url(../Pictures/bodybgrnd.jpg);*/
background-color: #fff;
margin: 0;
padding: 0;
}
.ui-corner-all {
border-radius: 0;
}
#mynewsframe {
margin: 0;
padding: 0;
}
#facforum {
background-color: #fff;
border: 1px solid red;
}
#facforum a,
#facforum #container ,
#facforum h5 {
background: none;
}
#facforum #container {
border-bottom: 1px solid #DB9B00;
background-color: #fff;
}
#mywelcome,
#myactions,
#mymessages {
margin: 10px 4px 0px 4px;
padding: 0;
border-bottom: 1px solid #DB9B00;
}
#mywelcometitle {
background: url(images/viareva_light.png) #ffd700 repeat-x left top;
color: #747476;
padding: 3px 0;
}
#mywelcometitle strong {
color: #747476;
}
#mywelcomeinfo {
background: #747476;
color: #fff;
padding: 4px;
float: none;
font-style: normal;
}
#mywelcomeframe {
height: auto;
}
#nieuwsbody {
background-color: #fff;
margin: 0;
border: none;
width: 100%;
}
.nieuwstitel {
color: #DB9B00;
}
.nieuwstekst {
border-bottom: none;
}
.listbody table {
background-color: #fff;
}
#collapseblock table {
border: none;
width: 100%;
}
.fcltframe {
background: none;
background-color: #fff;
border: 0px solid #DB9B00;
border: none;
margin-bottom: 5px;
}
/* Titels */
.fcltframefooter,
.fcltframeheader,
#search div.fcltblockhead {
background: url(images/viareva_light.png) #ffd700 repeat-x left top;
background-color: #DB9B00;
padding: 3px 5px 2px 5px;
}
/* Tekst van titels (overzichten, mijn facilitor, etc */
.fcltframeheader,
#search div.fcltblockhead,
.fcltframeheader span,
#search div.fcltblockhead span,
#iframerextratitle {
color: #747476;
}
/* Kaders om invulvelden */
#showbody .fcltblock {
background-color: #fff;
}
#showbody .fcltblockhead {
background-color: #d4d4d4;
color: #747476;
padding: 3px 0 5px 5px;
}
body.modal .fcltblock,
#editbody .fcltblock {
background-color: #fff;
}
body.modal .fcltblockhead,
#editbody .fcltblockhead {
background-color: #b8b5b5;
color: #061664;
}
#showbody label,
#showbody input {
color: #222;
}
#showbody .details {
color: #22c;
}
/* Flexvelden type label */
td.flexlabel,
#showbody td.flexlabel label {
background-color: #DB9B00;
color: #fff;
}
/* Selectiescherm */
#search {
background-image: none;
/*background-color: #eff8ff;*/
margin-bottom: 2px;
}
#search div.fcltblock {
background-color: #fff;
}
#search div.fcltblockhead {
background-color: #061664;
color: #747476;
}
#search div.fcltblock label {
color: #000;
}
.rstable thead th {
background-color: #000;
}
/* Menu */
.ui-layout-content {
background-color: #fff;
}
div#ProfFAC,
div#PersFAC,
div#MgtFAC {
background-color: #fff;
}
div#ProfFAC .menukop {
color: #000;
}
div#ProfFAC ul li,
div#PersFAC ul li,
div#MgtFAC ul li {
background-color: #fff;
}
li.mk {
border-bottom: none;
margin-top: 1px;
}
span.menukop {
background-image: none ;
color: #DB9B00;
}
/* Portal (loketten) */
#portalbody {
background-color: #f8f8f8;
text-align: center;
}
#portalmenu h2 {
color: #DB9B00;
}
#portalmenu table {
margin: auto;
}
#portalmenu span.menuimg {
width: 200px;
margin-top: 10px;
}
#portalmenu span.menukop {
color: #DB9B00;
}
#portalmenu .more {
color: #DB9B00;
}
#portalmenu .more:hover {
color: #000;
}
#portalmenu a {
color: #000;
text-decoration: none;
}
#portalmenu a:hover {
color: #DB9B00;
}
/* Widgets */
div.widget,
div.widgettitle {
border: none;
}
/* Search */
table.filter th {
background-color: #DB9B00;
}
/* Kalender */
.ui-datepicker-header.ui-widget-header,
.ui-dialog-titlebar.ui-widget-header {
background: url(images/viareva_light.png) #ffd700 repeat-x left top;
color: #000;
}
.ui-datepicker-calendar th {
background: url(images/viareva_grijs.png) #ededed repeat-x left top;
color: #000;
}
/* Uren */
.modal th {
background: url(images/viareva_light.png) #ffd700 repeat-x left top;
color: #000;
}
/* API-portal */
#phonebookdetails a:link,
#phonebookdetails a:visited,
#filler a:link,
#filler a:visited {
color: #DB9B00;
font-weight: bold;
}
.api_demo #mywelcometitle {
background-color: #fee900;
}
#mywelcometitle a:link,
#mywelcometitle a:visited,
#mywelcometitle u li {
color: #000;
}
#phonebookdetails a:hover,
#filler ul li a:hover {
color: #000;
}
#mywelcometitle a:hover {
color: #fff;
}
#filler h1, #filler h2, #filler h3 {
color: #000;
}

Binary file not shown.

Before

Width:  |  Height:  |  Size: 10 KiB

View File

@@ -1,94 +0,0 @@
<?xml version="1.0"?>
<component>
<?component error="true" debug="true"?>
<registration
description="custfunctions"
progid="custfunction.wsc"
version="1.00"
classid="{4F51571C-1DFC-4769-B8DD-37B356378F12}"
>
</registration>
<public>
<!-- properties -->
<property name="Oracle">
<put/>
</property>
<property name="__Log">
<put/>
</property>
<property name="__DoLog">
<put/>
</property>
<property name="safe">
<put/>
</property>
<!-- methods -->
<method name="bes_punch_receive">
<PARAMETER name="RequestForm"/>
<PARAMETER name="bes_srtdeel_key"/>
<PARAMETER name="item"/>
</method>
</public>
<script language="javascript">
<![CDATA[
/*
$Revision$
$Id$
*/
function put_Oracle(newValue) {Oracle = newValue};
function put___Log(newValue) {__Log = newValue};
function put___DoLog(newValue) {__DoLog = newValue};
function put_safe(newValue) {safe = newValue};
var Oracle;
var __Log;
var __DoLog;
var safe;
bes_punch_receive =
function (RequestForm, bes_srtdeel_key, item, pResult)
{
var result = {orderurl: ""};
sql = "SELECT sd.prs_bedrijf_key FROM bes_srtdeel sd WHERE sd.bes_srtdeel_key = " + bes_srtdeel_key;
oRs = Oracle.Execute(sql);
bedr_key = oRs("prs_bedrijf_key").value;
function punchNVL(nm, n, def)
{
nm = nm.replace('#', n);
if (RequestForm(nm).Count() == 0)
return def;
if (RequestForm(nm) == "")
return def;
return RequestForm(nm)(1);
};
// Alleen voor leverancier Medeco uitvoeren (prs_bedrijf_key = 1230)
if (bedr_key == 1230)
{
// VIAR#30856
// Voor elk item de eenheid (die standaard uit NEW_ITEM_UNIT wordt ingelezen) bij Medeco uit CUST-field NEW_ITEM-CUST_FIELD5 te halen...
var artikel_eenheid = punchNVL("NEW_ITEM-CUST_FIELD5[#]", item, "Onbekend");
__Log('ARTIKEL EENHEID: CUST_FIELD5[' + item + ']= ' + artikel_eenheid);
if (artikel_eenheid != 'Onbekend')
{
sql = "UPDATE bes_srtdeel SET bes_srtdeel_eenheid = " + safe.quoted_sql(artikel_eenheid) + " WHERE bes_srtdeel_key = " + bes_srtdeel_key;
oRs = Oracle.Execute(sql);
}
}
return result;
}
]]>
</script>
</component>

Binary file not shown.

Before

Width:  |  Height:  |  Size: 144 B

Binary file not shown.

Before

Width:  |  Height:  |  Size: 179 B

View File

@@ -1,114 +0,0 @@
<%@language="VBScript"%>
<%
'*******************************************************************
'Script: VIAR.ASP
'
' $Revision$
' $Id$
'
'Doel: SSO bewerkstelligen voor ASP providers - deel 1 van 2
'Auteur: Thorwald Beeris
'*******************************************************************
'* declare *********************************************************
Dim strGUID, strCTID, strUserName, strKey, strASPUrl, strSharedKey
Dim strEncryptedCode, strControlEncryptedCode
'* variables *******************************************************
strASPUrl = "https://viar.facilitor.nl/?sso=1" 'HTTPS URL adres van ASP
strSharedKey = "QCqSdAali3yAHRSLaZTTXBfyOuqMjUwS" 'Sharedkey - Should be the same at target side
'*******************************************************************
response.Buffer=true
%>
<HTML>
<HEAD>
<SCRIPT LANGUAGE="JavaScript">
function fnSubmit() {
window.document.form.submit();
return;
}
</SCRIPT>
</HEAD>
<BODY LANGUAGE="javascript" onload="return fnSubmit()">
Een moment aub.
<form action='<%=strASPUrl%>' method="post" name="form" ID="Form1">
<input type="hidden" name="returnurl" value="<%="http://" & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("SCRIPT_NAME")%>" ID="Hidden1">
<%
'* request action = requestid ***************************************
strGUID = Request.form("guid")
strCTID = Request.form("ctid")
if strGUID = "" or strCTID = "" then
'* first flow: requestid ****************************************
%>
<input type="hidden" name="action" value="requestid" ID="Hidden2">
<input type="hidden" name="jumpTo" value="<%=Request.Querystring("jumpTo")%>" ID="jumpTo">
<%
else
'* second flow: create code *************************************
strUserName = Request.ServerVariables("LOGON_USER")
if strUserName = "" then
strUserName = Request.ServerVariables("REMOTE_USER")
if strUserName = "" then
strUserName = Request.ServerVariables("HTTP_USER")
if strUserName = "" then
strUserName = Request.ServerVariables("HTTP_LOGIN")
if strUserName = "" then
'Forse user to authenticate
response.Clear
response.Status = 401
response.Flush
response.End
end if
end if
end if
end if
' * Strip domain name
Do While instr(strUserName, "\")>0
strUserName = Mid(strUserName, instr(strUserName, "\") + 1)
Loop
'* crypt ********************************************************
'First coding phase
strKey = mid(strSharedKey & strGUID,1,Len(strUserName))
strEncryptedCode = EnCrypt(strUserName)
'Second coding phase
strKey = mid(strGUID,1,Len(strEncryptedCode))
strEncryptedCode = EnCrypt(strEncryptedCode)
'* crypt Controlkey *********************************************
'First coding phase
strKey = mid(strSharedKey & strCTID,1,Len(strCTID))
strControlEncryptedCode = EnCrypt("http://" & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("SCRIPT_NAME"))
'Second coding phase
strKey = mid(strCTID,1,Len(strControlEncryptedCode))
strControlEncryptedCode = EnCrypt(strControlEncryptedCode)
%>
<input type="hidden" name="action" value="processcode" ID="Hidden3">
<input type="hidden" name="code" value="<%=ConvertToAsc(strEncryptedCode)%>" ID="Hidden4">
<input type="hidden" name="ctcode" value="<%=ConvertToAsc(strControlEncryptedCode)%>" ID="Hidden5">
<input type="hidden" name="ltcode" value="<%=len(strUserName)%>" ID="Hidden6">
<%
end if
'* Functions ********************************************************
Function EnCrypt(strCryptThis)
Dim strChar, iKeyChar, iStringChar, i
for i = 1 to Len(strCryptThis)
iKeyChar = Asc(mid(strKey,i,1))
iStringChar = Asc(mid(strCryptThis,i,1))
iCryptChar = iKeyChar Xor iStringChar
strEncrypted = strEncrypted & Chr(iCryptChar)
next
EnCrypt = strEncrypted
End Function
Function ConvertToAsc(strAsc)
Dim iCount
Dim strTemp
ConvertToAsc = ""
for iCount = 1 to len(strAsc)
strTemp = (asc(mid(strAsc,iCount,1)))
ConvertToAsc = ConvertToAsc & len(strTemp) & strTemp
next
End Function
'*********************************************************************
%>
</form>
</BODY>
</HTML>

View File

@@ -1,4 +0,0 @@
@echo off
REM Moet gescheduled worden (normaliter 1 keer per uur) om door de applicatiebeheerder
REM ingeregelde notificaties te genereren.
cscript ..\..\..\utils\gen_notify\gen_notify.js ../oracle.udl VIAR

View File

@@ -1 +0,0 @@
call ..\..\..\utils\putOrders\putOrders.bat

Binary file not shown.

Before

Width:  |  Height:  |  Size: 5.4 KiB

File diff suppressed because it is too large Load Diff

View File

@@ -1,160 +0,0 @@
<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:output method="xml" indent="yes" encoding="UTF-8"/>
<xsl:variable name="Rev">
<xsl:value-of select="substring(translate('$Revision$', '$ ', ''), 10)"/>
</xsl:variable>
<xsl:decimal-format name="european" decimal-separator="." grouping-separator=","/>
<xsl:param name="mode"/>
<xsl:template match="bestelopdracht">
<!--Facilitor custom XSL template for cXML bestelopdracht-->
<xsl:element name="cXML">
<xsl:attribute name="version">1.2.016</xsl:attribute>
<xsl:attribute name="payloadID"><xsl:value-of select="key"/></xsl:attribute>
<xsl:attribute name="timestamp"><xsl:value-of select="datum/jaar"/>-<xsl:value-of select="datum/maand"/>-<xsl:value-of select="datum/dag"/>T<xsl:value-of select="datum/tijd"/>:00+01:00</xsl:attribute>
<xsl:attribute name="xml:lang">NL</xsl:attribute>
<Header>
<From>
<xsl:element name="Credential">
<xsl:attribute name="domain"><xsl:value-of select="/facilitor/header/custId"/></xsl:attribute>
<Identity>
<xsl:value-of select='bedrijf/overeenkomst_nr'/>
</Identity>
</xsl:element>
</From>
<To>
<xsl:element name="Credential">
<xsl:attribute name="domain"><xsl:value-of select="bedrijf/naam"/></xsl:attribute>
<Identity/>
</xsl:element>
</To>
<Sender>
<Credential domain="Facilitor">
<Identity/>
</Credential>
<UserAgent/>
</Sender>
</Header>
<Request>
<OrderRequest>
<xsl:element name="OrderRequestHeader">
<xsl:attribute name="orderID"><xsl:value-of select="id"/></xsl:attribute>
<xsl:attribute name="orderDate"><xsl:value-of select="datum/jaar"/>-<xsl:value-of select="datum/maand"/>-<xsl:value-of select="datum/dag"/></xsl:attribute>
<Total>
<Money currency="EUR">
<xsl:value-of select="format-number(sum(bestelopdrachtitem/totaal), '0.00', 'european')"/>
</Money>
</Total>
<ShipTo>
<xsl:element name="Address">
<xsl:choose>
<xsl:when test="voor/afdeling/naam3='TDM'">
<xsl:attribute name="addressID">14004413</xsl:attribute>
<Name xml:lang="NL">Facilitair</Name>
<PostalAddress>
<DeliverTo><xsl:value-of select="bestelling/aanvrager/naam_full"/></DeliverTo>
<Street><xsl:value-of select="bedrijf/factuuradres/post_adres"/></Street>
<City><xsl:value-of select="bedrijf/factuuradres/post_plaats"/></City>
<State></State>
<PostalCode><xsl:value-of select="bedrijf/factuuradres/post_postcode"/></PostalCode>
<Country isoCountryCode="NL"><xsl:apply-templates select="bedrijf/factuuradres/post_land"/></Country>
</PostalAddress>
</xsl:when>
<xsl:otherwise>
<xsl:attribute name="addressID">14000548</xsl:attribute>
<Name xml:lang="NL">Revalidatiegeneeskunde</Name>
<PostalAddress>
<DeliverTo><xsl:value-of select="bestelling/aanvrager/naam_full"/></DeliverTo>
<Street><xsl:value-of select="bedrijf/factuuradres/post_adres"/></Street>
<City><xsl:value-of select="bedrijf/factuuradres/post_plaats"/></City>
<State></State>
<PostalCode><xsl:value-of select="bedrijf/factuuradres/post_postcode"/></PostalCode>
<Country isoCountryCode="NL"><xsl:apply-templates select="bedrijf/factuuradres/post_land"/></Country>
</PostalAddress>
</xsl:otherwise>
</xsl:choose>
</xsl:element>
</ShipTo>
<BillTo>
<xsl:element name="Address">
<xsl:attribute name="addressID">10001947</xsl:attribute>
<Name xml:lang="NL">
<xsl:value-of select="bedrijf/factuuradres/naam"/>
</Name>
<PostalAddress>
<Street><xsl:value-of select="bedrijf/factuuradres/post_adres"/></Street>
<City><xsl:value-of select="bedrijf/factuuradres/post_plaats"/></City>
<State></State>
<PostalCode><xsl:value-of select="bedrijf/factuuradres/post_postcode"/></PostalCode>
<Country isoCountryCode="NL"><xsl:apply-templates select="bedrijf/factuuradres/post_land"/></Country>
</PostalAddress>
</xsl:element>
</BillTo>
<Contact>
<Name xml:lang="NL">
<xsl:value-of select="bestelling/aanvrager/naam_full"/>
</Name>
<Email>
<xsl:value-of select="bestelling/aanvrager/email"/>
</Email>
</Contact>
<Extrinsic name="Costcenter">
<xsl:value-of select="bestelling/kostenplaats/nr"/>
</Extrinsic>
</xsl:element>
<xsl:for-each select="bestelopdrachtitem">
<xsl:sort select="srtdeel/omschrijving"/>
<xsl:sort select="posnr"/>
<xsl:element name="ItemOut">
<xsl:attribute name="quantity"><xsl:value-of select="aantal"/></xsl:attribute>
<xsl:attribute name="lineNumber"><xsl:value-of select="posnr"/></xsl:attribute>
<xsl:attribute name="requestedDeliveryDate">
<xsl:value-of select="../bestelling/leverdatum/jaar"/>-<xsl:value-of select="../bestelling/leverdatum/maand"/>-<xsl:value-of select="../bestelling/leverdatum/dag"/>
</xsl:attribute>
<ItemID>
<SupplierPartID>
<xsl:value-of select="bestelitem/srtdeel/artikel_nummer"/>
</SupplierPartID>
</ItemID>
<ItemDetail>
<UnitPrice>
<Money currency="EUR">
<xsl:value-of select="format-number(prijs, '0.00', 'european')"/>
</Money>
</UnitPrice>
<Description xml:lang="NL">
<xsl:value-of select="bestelitem/srtdeel/omschrijving"/>
</Description>
<UnitOfMeasure>
<xsl:value-of select="bestelitem/srtdeel/eenheid"/>
</UnitOfMeasure>
<Classification domain=""/>
</ItemDetail>
</xsl:element>
</xsl:for-each>
</OrderRequest>
</Request>
</xsl:element>
</xsl:template>
<xsl:template match="facilitor">
<xsl:apply-templates select="bestelopdracht"/>
</xsl:template>
<xsl:template match="/">
<xsl:choose>
<xsl:when test="$mode='getExtension'">
<xsl:element name="format">
<xsl:element name="extension">xml</xsl:element>
</xsl:element>
</xsl:when>
<xsl:otherwise>
<xsl:apply-templates select="facilitor"/>
</xsl:otherwise>
</xsl:choose>
</xsl:template>
</xsl:stylesheet>