Revision d629acd8
Von Sven Schöling vor etwa 18 Jahren hinzugefügt
| bin/mozilla/pe.pl | ||
|---|---|---|
|
|
||
|
# construct callback
|
||
|
$form->{callback} =
|
||
|
"$form->{script}?action=add&type=$form->{type}&path=$form->{path}&login=$form->{login}&password=$form->{password}"
|
||
|
"$form->{script}?action=add&type=$form->{type}&login=$form->{login}&password=$form->{password}"
|
||
|
unless $form->{callback};
|
||
|
|
||
|
call_sub("form_$form->{type}_header");
|
||
| ... | ... | |
|
|
||
|
<input type=hidden name=nextsub value=$report>
|
||
|
|
||
|
<input type=hidden name=path value=$form->{path}>
|
||
|
<input type=hidden name=login value=$form->{login}>
|
||
|
<input type=hidden name=password value=$form->{password}>
|
||
|
|
||
| ... | ... | |
|
PE->projects(\%myconfig, \%$form);
|
||
|
|
||
|
$callback =
|
||
|
"$form->{script}?action=project_report&type=$form->{type}&path=$form->{path}&login=$form->{login}&password=$form->{password}&status=$form->{status}&active=" .
|
||
|
"$form->{script}?action=project_report&type=$form->{type}&login=$form->{login}&password=$form->{password}&status=$form->{status}&active=" .
|
||
|
E($form->{active});
|
||
|
$href = $callback;
|
||
|
|
||
| ... | ... | |
|
|;
|
||
|
|
||
|
$column_data{projectnumber} =
|
||
|
qq|<td><a href=$form->{script}?action=edit&type=$form->{type}&status=$form->{status}&id=$ref->{id}&path=$form->{path}&login=$form->{login}&password=$form->{password}&callback=$callback>$ref->{projectnumber}</td>|;
|
||
|
qq|<td><a href=$form->{script}?action=edit&type=$form->{type}&status=$form->{status}&id=$ref->{id}&login=$form->{login}&password=$form->{password}&callback=$callback>$ref->{projectnumber}</td>|;
|
||
|
$column_data{description} = qq|<td>$ref->{description} </td>|;
|
||
|
$column_data{active} =
|
||
|
qq|<td>| .
|
||
| ... | ... | |
|
|
||
|
<input type=hidden name=type value=$form->{type}>
|
||
|
|
||
|
<input type=hidden name=path value=$form->{path}>
|
||
|
<input type=hidden name=login value=$form->{login}>
|
||
|
<input type=hidden name=password value=$form->{password}>
|
||
|
|
||
| ... | ... | |
|
|
||
|
<input name=callback type=hidden value="$form->{callback}">
|
||
|
|
||
|
<input type=hidden name=path value=$form->{path}>
|
||
|
<input type=hidden name=login value=$form->{login}>
|
||
|
<input type=hidden name=password value=$form->{password}>
|
||
|
|
||
| ... | ... | |
|
PE->partsgroups(\%myconfig, \%$form);
|
||
|
|
||
|
$callback =
|
||
|
"$form->{script}?action=partsgroup_report&type=$form->{type}&path=$form->{path}&login=$form->{login}&password=$form->{password}&status=$form->{status}";
|
||
|
"$form->{script}?action=partsgroup_report&type=$form->{type}&login=$form->{login}&password=$form->{password}&status=$form->{status}";
|
||
|
|
||
|
if ($form->{status} eq 'all') {
|
||
|
$option = $locale->text('All');
|
||
| ... | ... | |
|
|;
|
||
|
|
||
|
$column_data{partsgroup} =
|
||
|
qq|<td><a href=$form->{script}?action=edit&type=$form->{type}&status=$form->{status}&id=$ref->{id}&path=$form->{path}&login=$form->{login}&password=$form->{password}&callback=$callback>$ref->{partsgroup}</td>|;
|
||
|
qq|<td><a href=$form->{script}?action=edit&type=$form->{type}&status=$form->{status}&id=$ref->{id}&login=$form->{login}&password=$form->{password}&callback=$callback>$ref->{partsgroup}</td>|;
|
||
|
map { print "$column_data{$_}\n" } @column_index;
|
||
|
|
||
|
print "
|
||
| ... | ... | |
|
|
||
|
<input type=hidden name=type value=$form->{type}>
|
||
|
|
||
|
<input type=hidden name=path value=$form->{path}>
|
||
|
<input type=hidden name=login value=$form->{login}>
|
||
|
<input type=hidden name=password value=$form->{password}>
|
||
|
|
||
| ... | ... | |
|
|
||
|
<input name=callback type=hidden value="$form->{callback}">
|
||
|
|
||
|
<input type=hidden name=path value=$form->{path}>
|
||
|
<input type=hidden name=login value=$form->{login}>
|
||
|
<input type=hidden name=password value=$form->{password}>
|
||
|
|
||
| ... | ... | |
|
PE->pricegroups(\%myconfig, \%$form);
|
||
|
|
||
|
$callback =
|
||
|
"$form->{script}?action=pricegroup_report&type=$form->{type}&path=$form->{path}&login=$form->{login}&password=$form->{password}&status=$form->{status}";
|
||
|
"$form->{script}?action=pricegroup_report&type=$form->{type}&login=$form->{login}&password=$form->{password}&status=$form->{status}";
|
||
|
|
||
|
if ($form->{status} eq 'all') {
|
||
|
$option = $locale->text('All');
|
||
| ... | ... | |
|
<tr valign=top class=listrow$i>
|
||
|
|;
|
||
|
$column_data{pricegroup} =
|
||
|
qq|<td><a href=$form->{script}?action=edit&type=$form->{type}&status=$form->{status}&id=$ref->{id}&path=$form->{path}&login=$form->{login}&password=$form->{password}&callback=$callback>$ref->{pricegroup}</td>|;
|
||
|
qq|<td><a href=$form->{script}?action=edit&type=$form->{type}&status=$form->{status}&id=$ref->{id}&login=$form->{login}&password=$form->{password}&callback=$callback>$ref->{pricegroup}</td>|;
|
||
|
|
||
|
map { print "$column_data{$_}\n" } @column_index;
|
||
|
|
||
| ... | ... | |
|
|
||
|
<input type=hidden name=type value=$form->{type}>
|
||
|
|
||
|
<input type=hidden name=path value=$form->{path}>
|
||
|
<input type=hidden name=login value=$form->{login}>
|
||
|
<input type=hidden name=password value=$form->{password}>
|
||
|
|
||
| ... | ... | |
|
|
||
|
<input name=callback type=hidden value="$form->{callback}">
|
||
|
|
||
|
<input type=hidden name=path value=$form->{path}>
|
||
|
<input type=hidden name=login value=$form->{login}>
|
||
|
<input type=hidden name=password value=$form->{password}>
|
||
|
|
||
Auch abrufbar als: Unified diff
$form->{path} entfernt und hardcodiert auf bin/mozilla gesetzt.
Vorlagen sind nicht betroffen, aber locales.pl schon.