FDRMTEST [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: FDRMTEST)}}
====== FDRMTEST ======
(GIN Macro)

**Defined in:** [[george:source:OLPMACROS|OLPMACROS]]

**Used in:** [[george:source:CPOBJ6|CPOBJ6]], [[george:source:CROBJ6|CROBJ6]], [[george:source:FHOBJ860|FHOBJ860]], [[george:source:LPOBJ6|LPOBJ6]], [[george:source:SIMULPTR60|SIMULPTR60]], [[george:source:TPOBJ867|TPOBJ867]], [[george:source:TROBJ867|TROBJ867]]

<code - FDRMTEST.mac.txt>
 36B4 ...[??? FDRMTEST SECT FILE FGN 7 DOC   
 36KW    [   
 375G    [ FDRMTEST IS USED BY OFFLINE PERI SEGMENTS TO TEST IF DRM IS APPLICABLE
 37K6    [              %A=APPWAIT OR STEPWAIT   
 384Q    [              %B-LABEL TO JUMP TO IF NOT DRM OR NOT OPEN COMUNALLY 
 38JB    #MAC  FDRMTEST  
 3942          LDX   2  FX2  
 39HL          JNOTFDRM %B   
 3=3=          TOPFCA2  1
 3=GW          JBC      %B,1,BACOMM  
 3?2G          LDN   0  FCA%A
 3?G6          ORS   0  FGENERAL1(1) 
 3?^Q          ADX   1  FBACKPOINT(1)
 3#FB          LDX   1  BPTR(1)  
 3#^2          LDN   0  FCB%A
 3*DL          ORS   0  FINFC(1) 
 3*Y=    #NOR
</code>