@@ -77,8 +77,9 @@ public List<Item> list(SclType type) {
77
77
format (DECLARE_DB_VARIABLE , type ) +
78
78
"for $resource in db:open($db)\n " +
79
79
" let $id := $resource/scl:SCL/scl:Header/@id\n " +
80
+ " let $filename := $resource/scl:SCL/scl:Private[@type='compas_scl']/*:SclFilename\n " +
80
81
" group by $id\n " +
81
- " return '<Item><Id>' || $id || '</Id><Version>' || local:latest-version($db, $id)//scl:SCL/scl:Header/@version || '</Version></Item>'" ,
82
+ " return '<Item><Id>' || $id || '</Id><Filename>' || $filename || '</Filename>< Version>' || local:latest-version($db, $id)//scl:SCL/scl:Header/@version || '</Version></Item>'" ,
82
83
sclDataMarshaller ::unmarshal
83
84
);
84
85
}
@@ -90,13 +91,14 @@ public List<Item> listVersionsByUUID(SclType type, UUID id) {
90
91
format (DECLARE_ID_VARIABLE , id ) +
91
92
"for $resource in db:open($db, $id)\n " +
92
93
" let $id := $resource/scl:SCL/scl:Header/@id\n " +
94
+ " let $filename := $resource/scl:SCL/scl:Private[@type='compas_scl']/*:SclFilename\n " +
93
95
" let $version := $resource/scl:SCL/scl:Header/@version\n " +
94
96
" let $parts := tokenize($version, '\\ .')\n " +
95
97
" let $majorVersion := xs:int($parts[1])\n " +
96
98
" let $minorVersion := xs:int($parts[2])\n " +
97
99
" let $patchVersion := xs:int($parts[3])\n " +
98
100
" order by $majorVersion, $minorVersion, $patchVersion\n " +
99
- " return '<Item><Id>' || $id || '</Id><Version>' || $version || '</Version></Item>' " ,
101
+ " return '<Item><Id>' || $id || '</Id><Filename>' || $filename || '</Filename>< Version>' || $version || '</Version></Item>' " ,
100
102
sclDataMarshaller ::unmarshal
101
103
);
102
104
}
0 commit comments