Dalla sua sintassi possiamo dire che è un linguaggio "moderno". Ricordate "moderno" va bene;)
substr
.and.
->
sono abbastanza moderno, in confronto con COBOL e la lingua di assemblaggio.
(Auto-> type = 'C') e (Auto-> CD_CODE <> '').. E (.. '|' + INVOICE-> TYPE + '|' $ '| AAA |' .) .e ('|' + SUBSTR (INVOICE-> TIPO, 1,2) + '|' $ '| 11 |')
Un codice pseudo sarebbe qualcosa come:
(if car type is 'C'
and
if car cd_code is not empty
and
if invoice type is 'AAA'
and
if invoice type first 2 letters are '11')
then return true
mia ipotesi sull'utilizzo di $ sarebbe:
= and <> are only when compare against a character
$ when compare array of character, i.e. strings.
(Non so quale sarebbe l'output, in quanto confronta l'intero tipo di fattura con AAA e anche con le prime due lettere come 11. Forse hai modificato il codice prima di inviarlo?)
Fortran 90 sarebbe una supposizione, ma anche dBASE III forse.
DBase link: http://lynnbob.com/bob/articles/DBASEIIIPlusLevel2.htm
collegamento Fortran: http://www.ews.uiuc.edu/~mrgates2/docs/fortran.html
Per DBASE per quanto riguarda i tubi ...
Se si passa parametri, devono essere delimitato da | | (tubi). I tubi, ||, sono richiesti anche se non vengono passati parametri. Se si passano i parametri, vengono delimitati all'interno di ||.
C'erano molte lingue indietro nei tempi passati con sintassi simile a quella. È FORTRANish, ma più probabilmente qualcos'altro. –
(Sembra un po 'database-ish, ma non COBOL e certamente non RPG. Potrebbe comunque essere un altro linguaggio di generazione di report.) –
Onestamente, dovresti probabilmente dare il dominio, il che potrebbe aiutare a indicare i significati degli operatori. Potrebbe essere qualsiasi cosa, da antica a Coq con operatori infissi personalizzati. –