9 use HTML
::Template
::Pro
;
15 my $dbh = C4
::Context
->dbh;
17 my $layout_id = $query->param('layout_id');
21 my ( $template, $loggedinuser, $cookie ) = get_template_and_user
(
23 template_name
=> "labels/label-edit-layout.tmpl",
27 flagsrequired
=> { catalogue
=> 1 },
32 my $layout = get_layout
($layout_id);
33 my @barcode_types = get_barcode_types
($layout_id);
34 my @printingtypes = get_printingtypes
($layout_id);
38 $layout_id = $layout->{'id'}; # has it changed since we set it above? --joe
39 my $layoutname = $layout->{'layoutname'};
40 my $guidebox = $layout->{'guidebox'};
41 my $startlabel = $layout->{'startlabel'};
43 my @title = build_text_dropbox
( $layout->{'title'} );
44 my @subtitle = build_text_dropbox
( $layout->{'subtitle'} );
45 my @author = build_text_dropbox
( $layout->{'author'} );
46 my @barcode = build_text_dropbox
( $layout->{'barcode'} );
47 my @isbn = build_text_dropbox
( $layout->{'isbn'} );
48 my @issn = build_text_dropbox
( $layout->{'issn'} );
49 my @itemtype = build_text_dropbox
( $layout->{'itemtype'} );
50 my @dewey = build_text_dropbox
( $layout->{'dewey'} );
51 my @class = build_text_dropbox
( $layout->{'class'} );
52 my @subclass = build_text_dropbox
( $layout->{'subclass'} );
53 my @itemcallnumber = build_text_dropbox
( $layout->{'itemcallnumber'} );
58 barcode_types
=> \
@barcode_types,
59 printingtypes
=> \
@printingtypes,
60 layoutname
=> $layoutname,
61 layout_id
=> $layout_id,
62 guidebox
=> $guidebox,
63 startlabel
=> $startlabel,
66 tx_subtitle
=> \
@subtitle,
67 tx_author
=> \
@author,
70 tx_itemtype
=> \
@itemtype,
72 tx_barcode
=> \
@barcode,
73 tx_classif
=> \
@class,
74 tx_subclass
=> \
@subclass,
75 tx_itemcallnumber
=> \
@itemcallnumber,
78 output_html_with_http_headers
$query, $cookie, $template->output;