$swip=_SWIP_Crystal(Xreppath|"invcstLA","S",0,1,"")
$swip=_SWIP_Crystal(Xreppath|"invcstLA","EP",0,1,$pdf_inv)
swip=_SWIP_Crystal(Xreppath|"invdepLC","S",0,1,$pdf_inv)
$swip=_SWIP_Crystal(Xreppath|"invdepLC","EP",0,1,$pdf_inv)
_SWIP_Crystal(Xreppath|"OC_depLC","EP",0,1,$pdf_OC)
_SWIP_Crystal(Xreppath|"crn_cust","S",0,1,"")
_SWIP_Crystal(Xreppath|"crn_offc","EP",0,1,$pdf_inv)