;ENTER
;       R5 POINTING TO THE ARGUMENT LIST BUILT BY FORTRAN
;EXIT
;       R5 POINTING TO THE 4TH ARGUMENT IN THE LIST
;       R4 CONTAINS THE NUMBER OF PARAMETERS
;       R0 CONTAINS THE ADDRESS OF THE FDB (1ST ARGUMENT)
;       R1 CONTAINS THE ADDRESS OF THE DATA BUFFER ( 2ND ARGUMENT)
;       R2 CONTAINS THE NUMBER OF BYTES ( 3RD ARGUMENT)
;
        .TITLE  PARM - LOAD THE PARAMETERS PASSED IN THE ARGUMENT LIST
        .IDENT  /V01/
        .PSECT
        .GLOBL  PARM
PARM:   MOV     (R5)+,R4        ;LOAD THE NUMBER OF PARAMETERS
        MOV     (R5)+,R0        ;LOAD FDB ADDRESS
        MOV     (R5)+,R1        ;LOAD ADDRESS OF DATA BUFFER
        MOV     @(R5)+,R2       ;LOAD NUMBER OF BYTES
        RTS     PC              ;EXIT
        .END