MCH3601-Pointer not set for location referenced.

I had a program someone else modified.  Now they are getting 
an error.  Forego the comments to kill the person or have them 
deal with it, please.

Anyways it is getting an MCH3601.  I took a D to it, and to the 
program which called it.

Bombing program = PCGETSTS
...  from compile listing
 51 D XferError       PR                                       
 52 D  XferErrDesc                        like(spoolrcd) CONST 
...
763 C     *ENTRY        PLIST                                      
764 C                   PARM                    REMOTE           10
...
765  *                                                 
766 C                   eval      SetupStatus=Setup    
767 C                   If        SetupStatus=true     
768 C                   callp     CopyError(VerifyCopy)
769 C                   callp     XferError(VerifyXfer)
...
946 P XferError       B                                                      
947 D XferError       PI                                                     
948 D  XferMessage                        like(spoolrcd) CONST               
949 D Message         S                   like(fpcgetsts)                    
950                                                                          
951 C                   if        XferMessage<>'Send completed successfully.'
952 C                   eval      message='File was not successfully ' +     
953 C                                     'sent from mixer ' +               
954 C                                     %trimr(REMOTE) +                   
955 C                                     ' to 400. '                        
956 C                   callp     sendmessage(message)                       
957 C                   EndIf                                                
...
PROGRAM DUMP LISTING
ILE RPG/400 FORMATTED DUMP                           
Program Status Area:                                 
Procedure Name . . . . . . . . . . . . :   PCGETSTS  
Program Name . . . . . . . . . . . . . :   PCGETSTS  
   Library . . . . . . . . . . . . . . :   PVCBPCS   
Module Name. . . . . . . . . . . . . . :   PCGETSTS  
Program Status . . . . . . . . . . . . :   00202     
             The call to  ended in error (C G D F).  
Previous Status  . . . . . . . . . . . :   00000     
Statement in Error . . . . . . . . . . :   00000769  
RPG Routine  . . . . . . . . . . . . . :   XFERERRO  
Number of Parameters . . . . . . . . . :   000       
Message Type . . . . . . . . . . . . . :   MCH       
Additional Message Info  . . . . . . . :   3601      
Message Data . . . . . . . . . . . . . :             
             Pointer not set for location referenced.
...
NAME                  ATTRIBUTES           VALUE               
_QRNL_PRMCPY_REMOTE   POINTER              SPP:*NULL           
_QRNL_PSTR_REMOTE     POINTER              SPP:E460A3A465002120
...
REMOTE                CHAR(10)             NOT ADDRESSABLE


CALLING PROGRAM PCGET2
...
 PGM (                                                                + 
       &REMOTE          /* Name of remote PC.                      */ + 
     )                                                                  
...
     DCL  &REMOTE      *CHAR  10  /* Remote system name               */
...
 /* PM001*/   CALL       PGM(PCGETSTS) PARM(&REMOTE)                    
                                                                        
 END:                                                                   
                                                                        
              ENDPGM                                                    

DUMP OF CALLING PROGRAM PCGET2
...
150049      CEE9901             30        ESC     Application error.  MCH 
QLEAWI           0000        PCGET2           01A8
                                                  3601 unmonitored by PCG       
                                            
                                                  ETSTS at statement 0000       
                                            
                                                  000952, instruction X'0       
                                            
                                                  000'.                         
                                            
...
 &REMOTE            *CHAR                10        'PVC2      '                 
  D7E5C3F2404040404040
...
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---