JENVNOT

(GIN Macro)

Defined in: MACROS SIB

Used in: BRADDATA867, BSQ867, CARTCONT867, CDUM866, CHARGESC867, CMEMILL866, DATUM, DUMMYA867, DUMMYB867, EMSENG864, ENGAGE867, FREEPER867, HLSREAD867, INCSTART865, IPBINB867, IPBSCAN867, LINECTRL864, LOADERDA867, LOADERFS867, LOADERFT867, LOADERI867, LOADERII867, LOADERMT867, MODE866, MOVCART867, OLMTB867, PARSORT867, PERFCHAP866, PERFLOGS866, PERION867, PMFSB84, PMJOBS866, PMLP866, PMWHATA866, PROPERTY867, RELPER867, SETLIST864, SETUPA867, SETUPB867, SHARE866, SHOWCOMM864, SPERION867, SWITCH867, TWINSET866, UNLOADMT867, VIPBFREE865, WHATPER867, WHATPERA867, WHATPERB867

JENVNOT.mac.txt
 2CBD ...[   
 2CBL ...[??? JENVNOT SECT COMM FGN 1 DOC
 2CBS ...[   
 2CC2 ...#MAC            JENVNOT 
 2CC8 ...[               ======= 
 2CCB ...[   
 2CCJ ...[ JUMP TO %A UNLESS IN ENVIRONMENT %B   
 2CCQ ...[   
 2CCY ...[ %A - LABEL TO GO TO IF FAILS  
 2CD6 ...[ %B - ENVIRONMENT - 1900, MEEP OR DME  
 2CD# ...[   
 2CDG ...#STR           1900,%B  
 2CDN ...#SKI
 2CDW ...(   
 2CF4 ...      JBS      %A,,CPEMU
 2CF= ...#EXI
 2CFD ...)   
 2CFL ...      JBC      %A,,CPEMU           [ EMULATION TYPE TO TEST 
 2CFS ...      LF       ,CPEMUENV,0  
 2CFT ...#STR   MEEP,%B  
 2CFW ...#STR
 2CFX ...(   
 2CFY ...      SBN   0   CPMEEP  
 2CF^ ...      BNZ   0   %A  
 2CG2 ...)   
 2CG3 ...#STR   DME,%B   
 2CG4 ...#STR
 2CG5 ...(   
 2CG6 ...      SBN   0   CPDME   
 2CG7 ...      BNG   0   %A  
 2CG8 ...)   
 2CG9 ...#STR   CME,%B   
 2CG= ...#STR
 2CG? ...(   
 2CG# ...      SBN   0   CPCME   
 2CG* ...      BNZ   0   %A  
 2CGB ...)   
 2CGC ...#NOR
  • Last modified: 17/01/2024 11:55
  • by 127.0.0.1