Select the objects that you wish to see in the downloaded PDF
I $D(X) S DINUM=X Q
ENTER THE NAME OF THE FACILITY
NAME OF FACILITY
XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
9002075^B
1)= S ^ACHSVPMT("B",$E(X,1,30),DA)=""
2)= K ^ACHSVPMT("B",$E(X,1,30),DA)
ENTER VENDOR NAME