1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| Quintiq file version 2.0
| #parent: #root
| Method SynchronizeURL (JSON jsondata, String urlprefix)
| {
| TextBody:
| [*
| url := guard( jsondata.Get( 'url' ).GetString(), '' );
| separatorpos := url.FindString( ':', 0 );
| if( separatorpos >= 0 )
| {
| url := urlprefix + url.RestString( separatorpos + 1 );
| }
| this.URL( url );
| *]
| InterfaceProperties { Accessibility: 'Module' }
| }
|
|
