HP 3000 Manuals

HP Transact Reference Manual

Intrinsics That Support Native Languages 

Transact passes the current native language to any subsystem (intrinsic)
it calls that accepts a language ID. If a user calls a subsystem through
the PROC verb, it is the user's responsibility to provide the language ID
if desired and accepted by the subsystem.

Examples: 

Here is an example of using NLUSERLANG JCW to invoke the French catalog
for Trancomp and Transact

       :SETJCW NLUSERLANG,7
       :RUN TRANCOMP.PUB.SYS
              or
       :RUN TRANSACT.PUB.SYS

Here is an example of using SET(LANGUAGE) to invoke the German catalog
from within a Transact program:

       SET(LANGUAGE) "GERMAN";
              or
       SET(LANGUAGE) "8",STATUS;
              or
              :
       DEFINE(ITEM) LANGUAGE X (20);
       LIST LANGUAGE;
       MOVE(LANGUAGE)="GERMAN";
       SET(LANGUAGE) LANGUAGE;
              :

To change language back to NATIVE-3000 or parent program language:

              :
       SET(LANGUAGE);
              or
       RESET(LANGUAGE);

MPE/iX 5.0 Documentation