Pointer to a structure

#pragma linkage (cpli,PLI)
#include <stdio.h>
main()
{
  struct date   {
    int day;
    int month;
    int year   } today;
  struct date *temp = &today;
  void cpli(struct date **);
  int i;
cpli (&temp);
}
 

CPLI: PROC (ARG);
    DCL ARG POINTER;
    DCL 1 TODAY BASED (ARG),
        2 DAY FIXED BIN(31),
        2 MONTH FIXED BIN(31),
        2 YEAR FIXED BIN(31);
⋮
END;