#!/usr/bin/perl

use strict;
use warnings;

use Ernad::Erimp;
use Ernad::Dates;
use Ernad::Membership;

my $impna=$ENV{'IMPNA'};

our $e=Ernad::Erimp->new({'impna'=>$impna});

## reads from kapro
my $member_doc=Ernad::Membership::form_membership_doc($e);

print($member_doc);