Parent Directory | Revision Log
r1670@llin: dpavlin | 2007-11-28 00:13:29 +0100 - WebPAC::Output::Excel
1 | dpavlin | 1068 | sub csv { to('csv',@_) } |
2 | |||
3 | dpavlin | 1065 | if ( rec('200','a') ) { |
4 | |||
5 | ## 022 | ||
6 | |||
7 | if ( ! rec('225','a') ) { | ||
8 | csv('A', | ||
9 | rec('11') | ||
10 | ); | ||
11 | } | ||
12 | |||
13 | csv('B', | ||
14 | join_with('', | ||
15 | uc( config() ), | ||
16 | ' P', | ||
17 | rec('000') | ||
18 | ) | ||
19 | ); | ||
20 | |||
21 | csv('C', | ||
22 | rec('101') | ||
23 | ); | ||
24 | |||
25 | |||
26 | csv('D', | ||
27 | rec('675','a') | ||
28 | ); | ||
29 | |||
30 | csv('E', | ||
31 | join_with(', ', | ||
32 | rec('700', 'a'), | ||
33 | rec('700', 'b') | ||
34 | ) | ||
35 | ); | ||
36 | |||
37 | csv('F', | ||
38 | rec('710','a') | ||
39 | ); | ||
40 | |||
41 | csv('G', | ||
42 | rec('710','c') | ||
43 | ); | ||
44 | |||
45 | csv('H', | ||
46 | lookup( | ||
47 | sub { rec('530','a') }, | ||
48 | 'nsk','bbaza', | ||
49 | sub { rec('011','a') }, | ||
50 | sub { rec('11') }, | ||
51 | ) | ||
52 | ); | ||
53 | |||
54 | csv('I', | ||
55 | rec('200','a') | ||
56 | ); | ||
57 | |||
58 | csv('J', | ||
59 | rec('200','d') | ||
60 | ); | ||
61 | |||
62 | csv('K', | ||
63 | rec('200','e') | ||
64 | ); | ||
65 | |||
66 | |||
67 | csv('L', | ||
68 | rec('532') | ||
69 | ); | ||
70 | |||
71 | |||
72 | csv('M', | ||
73 | join_with(' / ', | ||
74 | rec('205','a'), | ||
75 | rec('205','f') | ||
76 | ) | ||
77 | ); | ||
78 | |||
79 | csv('N', | ||
80 | rec('210','a') | ||
81 | ); | ||
82 | |||
83 | csv('O', | ||
84 | rec('210','c') | ||
85 | ); | ||
86 | |||
87 | csv('P', | ||
88 | rec('210','d') | ||
89 | ); | ||
90 | |||
91 | csv('R', | ||
92 | rec('215','d') | ||
93 | ); | ||
94 | |||
95 | csv('S', | ||
96 | rec('326') | ||
97 | ); | ||
98 | |||
99 | csv('T', | ||
100 | rec('207','a') | ||
101 | ); | ||
102 | |||
103 | csv('U', | ||
104 | rec('300') | ||
105 | ); | ||
106 | |||
107 | csv('V', | ||
108 | rec('610') | ||
109 | ); | ||
110 | |||
111 | csv('W', | ||
112 | join_with(', ', | ||
113 | rec('702','a'), | ||
114 | rec('702','b'), | ||
115 | ), | ||
116 | ); | ||
117 | |||
118 | |||
119 | csv('Z', | ||
120 | join_with(' ', | ||
121 | rec('990') | ||
122 | ) | ||
123 | ); | ||
124 | |||
125 | csv('X', | ||
126 | rec('991','a') | ||
127 | ); | ||
128 | |||
129 | csv('Y', | ||
130 | join_with(' ; ', | ||
131 | rec('992') | ||
132 | ) | ||
133 | ); | ||
134 | } |
ViewVC Help | |
Powered by ViewVC 1.1.26 |