[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Phpgroupware-cvs] property/inc/export/Agresso, 1.11
From: |
nomail |
Subject: |
[Phpgroupware-cvs] property/inc/export/Agresso, 1.11 |
Date: |
Thu, 7 Oct 2004 15:03:31 +0200 |
Update of /property/inc/export
Modified Files:
Branch:
Agresso
date: 2004/10/07 13:03:31; author: sigurdne; state: Exp; lines: +14 -7
Log Message:
no message
=====================================================================
Index: property/inc/export/Agresso
diff -u property/inc/export/Agresso:1.10 property/inc/export/Agresso:1.11
--- property/inc/export/Agresso:1.10 Fri Oct 1 11:51:05 2004
+++ property/inc/export/Agresso Thu Oct 7 13:03:31 2004
@@ -5,6 +5,7 @@
//var $fil_katalog='c:/temp'; //On windows use
"//computername/share/filename" or "\\\\computername\share\filename" to check
files on network shares.
var $old_files_deleted;
+ var $debug;
function export_conv()
{
@@ -227,6 +228,7 @@
// $download = 'on';
// $download = False;
$pre_transfer=True;
+ $this->debug=True;
//Generer batch ID
$batchid = $this->soXport->next_batchid();
@@ -504,10 +506,9 @@
$Buntnr =
sprintf("%-12s",date("md",time()) . 'F' .
substr($oRsBilag[$k]['bilagsnr'],-6));// verdi: MMDDFL, type: c12, plass: 1 - 12
$Forsystem = 'BI';// verdi: BI, type: c2,
plass: 13 - 14
- $Bilagsart = sprintf("%2s",'');// verdi: ,
type: c2, plass: 15 - 16
$Transtype = 'GL';// verdi: GL, type: c2,
plass: 17 - 18
- $Firmakode = sprintf("%-2s",'');// verdi:
Firmakode, type: c2, plass: 19 - 20
+ $Firmakode = sprintf("%-2s",'BB');//
verdi: Firmakode, type: c2, plass: 19 - 20
$Valuteringsdato=
date(Ymd,strtotime($oRsBilag[$k]['fakturadato']));// verdi: Dato, type: date,
plass: 251 - 258
$Bilagsdato =
date(Ymd,strtotime($oRsBilag[$k]['fakturadato'])) ;// verdi: Dato, type: date,
plass: 259 - 266
@@ -517,10 +518,12 @@
if($pre_transfer)
{
+ $Bilagsart = sprintf("%2s",'');//
verdi: , type: c2, plass: 15 - 16
$Forfall = '20991231';// verdi:
Forfallsdato , type: date, plass: 298 - 305
}
else
{
+ $Bilagsart =
sprintf("%2s",'FD');// verdi: , type: c2, plass: 15 - 16
$Forfall =
date(Ymd,strtotime($oRsBilag[$k]['forfallsdato']));// verdi: Forfallsdato ,
type: date, plass: 298 - 305
}
@@ -616,7 +619,11 @@
$actual_cost_field='act_vendor_cost';
}
$operator='+';
-
$this->correct_actual_cost($oRsUnderbilag[$i]['pmwrkord_code'],$Belop,$actual_cost_field,$operator);
+
+ if(!$this->debug)
+ {
+
$this->correct_actual_cost($oRsUnderbilag[$i]['pmwrkord_code'],$Belop,$actual_cost_field,$operator);
+ }
}
}
else
@@ -632,7 +639,7 @@
$Konto =
sprintf("%-8s",$oRsOverfBilag['fakturanr']);// verdi: Art, type: c8, plass: 21
- 28
- $Dim_1 =
sprintf("%-8s",$Att_ansvarlig);// verdi: Ansvarssted, type: c8, plass: 29 - 36
+ $Dim_1 = sprintf("%-8s",'');//
verdi: Ansvarssted, type: c8, plass: 29 - 36
$Dim_2 =
sprintf("%-8s",$oRsOverfBilag['kostra_id']);// verdi: Tjeneste, type: c8,
plass: 37 - 44
$Dim_3 =
sprintf("%-8s",substr($oRsOverfBilag['dima'],0,6));// verdi: Objekt, type: c8,
plass: 45 - 52
$Dim_4 = sprintf("%-8s",'');//
verdi: Ressurs, type: c8, plass: 53 - 60
@@ -656,7 +663,7 @@
$Ordrenummer =
sprintf("%09s",$oRsOverfBilag['pmwrkord_code']);// verdi: Infodoc ordrenr,
type: i4, plass: 342 - 350
//Kopier verdier
- if ($download=='on' && !$pre_transfer)
+ if ($download=='on' && !$pre_transfer
&& !$this->debug)
{
$this->soXport->add_OverfBilag($oRsOverfBilag);
}
@@ -718,7 +725,7 @@
}
//Slett post i fm_ecobilag
- if ($download=='on' && !$pre_transfer)
+ if ($download=='on' && !$pre_transfer
&& !$this->debug)
{
$this->soXport->delete_from_fm_ecobilag($oRsUnderbilag[$i]['id']);
//Logg transaksjon
@@ -845,4 +852,4 @@
}
}
}
-?>
\ No newline at end of file
+?>
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Phpgroupware-cvs] property/inc/export/Agresso, 1.11,
nomail <=