Parent Directory | Revision Log | Patch
revision 1.5 by dpavlin, Thu Feb 6 08:45:46 2003 UTC | revision 1.6 by dpavlin, Tue Feb 18 14:13:03 2003 UTC | |
---|---|---|
# | Line 97 if ($#data != $lines) { | Line 97 if ($#data != $lines) { |
97 | print OUT $first,@data; | print OUT $first,@data; |
98 | close(OUT); | close(OUT); |
99 | ||
100 | # cludge filename to nark.0004 | # cludge filename to medika |
101 | #rename "$outdir/$outfile", "$outdir/nark.0004"; | link("$outdir/$outfile","$outdir/medika"); |
102 | #$it->FILENAME("nark.0004"); | chmod 0664,"$outdir/medika"; |
103 | $it->FILENAME("medika"); | |
104 | ||
105 | # call SAP R/3 | # call SAP R/3 |
106 | $rfc->callrfc( $it ); | $rfc->callrfc( $it ); |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |