$! This command procedure registers the example IPCP transport available
$! to use the PPPD facility.
$
$! Fill in the NODE and ADDRESS fields with something.  Not used by the
$! example code.  The NETWORK_TYPE and PPPD_CALLOUT are the important
$! fields to have filled in correctly.
$NODE    = F$GETSYI("SCSNODE")
$ADDRESS = "127.0.0.1"
$
$SET NETWORK "Example-IPCP"                       - !NAME OF SERVICE
    /MANUFACTURER="Digital Equipment Corporation" - !NAME OF PROVIDER
    /NODE="''node'"                               - !NODE NAME
    /ADDRESS="''address'"                         - !NODE ADDRESS
    /NETWORK_TYPE="TCPIP-DEMO"                    - !NETWORK TYPE
    /PPPD_CALLOUT="PPPD_CALLBACK"                   !NAME OF CALLOUT ROUTINE