Utenti collegati: 25 
 
it.comp.as400
IBM AS/400

Indice messaggi | Invia un reply | Tutti i newsgroup | Cerca | Statistiche 



  Inviato da: Dr.UgoGagliardelli  Mostra tutti i messaggi di Dr.UgoGagliardelli
Titolo: Re: RPGLE & JAVA una consulenza
Newsgroup: it.comp.as400
Data: 13/10/2017
Ora: 08:09:17
Mostra headers
 
  Il 13.10.2017 07.46, RENEst ha scritto:<br /> &gt; Il 12/10/2017 15:16, Dr.UgoGagliardelli ha scritto:<br /> &gt;&gt; Il 11.10.2017 18.34, RENEst ha scritto:<br /> &gt;&gt;&gt;<br /> &gt;&gt;&gt; Il mio problema e' questo:<br /> &gt;&gt;&gt;<br /> &gt;&gt;&gt; in JAVA uso questa istruzione:<br /> &gt;&gt;&gt; font.setAlignment(Alignment.CENTER);<br /> &gt;&gt;&gt;<br /> &gt;&gt;&gt; Alignment &egrave; una classe &quot;enum&quot; coi valori .CENTER, .LEFT, ecc.<br /> &gt;&gt;&gt;<br /> &gt;&gt;&gt; come lo replico in RPGLE?<br /> &gt;&gt;&gt;<br /> &gt;&gt;&gt; D font&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; S&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; O&nbsp;&nbsp; Class(*JAVA:'x.Font')<br /> &gt;&gt;&gt; D setAlignment...<br /> &gt;&gt;&gt; D&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; PR&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; ExtProc(*JAVA:'x.Font'<br /> &gt;&gt;&gt; D&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; :'setAlignment')<br /> &gt;&gt;&gt; D align&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; O&nbsp;&nbsp; Class(*JAVA:'x.Alignment')<br /> &gt;&gt;&gt;<br /> &gt;&gt;&gt; ....<br /> &gt;&gt;&gt; callp font.setAlignment(????????)<br /> &gt;&gt;&gt;<br /> &gt;&gt;&gt; Come posso definire sta benedetta costante &quot;Alignment.CENTER&quot;?<br /> &gt;&gt; Cosa sia 'x.' non si sa, quindi non posso essere piu' preciso di tanto.<br /> &gt;&gt; Alignment.CENTER si definisce come una qualsiasi altra costante o <br /> &gt;&gt; procedura static. Tutte le enum hanno un metodo statico valueOf, quindi:<br /> &gt;&gt; Alignement c = Alignment.valueOf(&quot;CENTER&quot;); equivale a<br /> &gt;&gt; Alignement c = Alignment.CENTER<br /> &gt;&gt;<br /> &gt;&gt; in RPG la procedura valueOf sarebbe:<br /> &gt;&gt; D String&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; S&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; O&nbsp; CLASS(*JAVA:&rsquo;java.lang.String&rsquo;)<br /> &gt;&gt; D Alignement&nbsp; S&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; O&nbsp; CLASS(*JAVA:'x.Alignement')<br /> &gt;&gt; D valueOf&nbsp;&nbsp;&nbsp;&nbsp; PR&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; O&nbsp; ExtProc(*JAVA:'x.Alignement':valueOf)<br /> &gt;&gt; D&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; O&nbsp; LIKE(String)<br /> &gt;&gt; D&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; static<br /> &gt;&gt; D CENTERvalue S&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; O&nbsp; LIKE(String)<br /> &gt;&gt; D CENTER&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; S&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; O&nbsp; LIKE(Alignement)<br /> &gt;&gt; ...<br /> &gt;&gt; C&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; eval&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CENTERvalue = newString('CENTER')<br /> &gt;&gt; C&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; eval&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; CENTER = valueOf(CENTERvalue)<br /> &gt;&gt; C&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; callp&nbsp;&nbsp;&nbsp;&nbsp; setAlignement(CENTER)<br /> &gt;&gt;<br /> &gt; <br /> &gt; Grazie per la dritta, funziona alla grande.<br /> &gt; Una unica imprecisione.<br /> &gt; <br /> &gt; &nbsp;D valueOf&nbsp;&nbsp;&nbsp;&nbsp; PR&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; O&nbsp; ExtProc(*JAVA:'x.Alignement':valueOf)<br /> &gt; &nbsp;D&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Class(*JAVA:'x.Alignment')<br /> &gt; &nbsp;D&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; static<br /> &gt; &nbsp;D&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; O&nbsp; LIKE(String)<br /> &gt; <br /> &gt; Bisogna indicare anche il tipo oggetto di ritorno.<br /> <br /> Hai ragione l'ho dimenticato, ma nella mia ipotesi avrebbe dovuto essere:<br /> D valueOf PR O ExtProc(*JAVA:'x.Alignement':valueOf)<br /> D LIKE(Alignement) static<br /> D O LIKE(String)<br /> <br /> inoltre vedo anche di aver omesso il costruttore newString:<br /> <br /> D newString PR O EXTPROC(*JAVA: D &rsquo;java.lang.String&rsquo;:<br /> D *CONSTRUCTOR)<br /> D 65535A CONST VARYING  

Il thread:
da leggere RENEst 11/10 18:34
RPGLE & JAVA una consulenza
   da leggere Dr.UgoGagliardelli 12/10 15:16
Re: RPGLE & JAVA una consulenza
      da leggere RENEst 13/10 07:46
Re: RPGLE & JAVA una consulenza
         da leggere Dr.UgoGagliardelli 13/10 08:09
Re: RPGLE & JAVA una consulenza
 

Invia una risposta:

Nome:

Email:

Titolo:

Testo:


Attenzione: l'invio del messaggio richiede diversi secondi.
Non premere pi� volte il tasto "Invia".

 © Sergio Simonetti 2001 Che cos'è Links