- Timestamp:
- Dec 4, 2009, 8:26:01 PM (14 years ago)
- Location:
- FOIAVistA/tag/r
- Files:
-
- 1 edited
- 1 copied
Legend:
- Unmodified
- Added
- Removed
-
FOIAVistA/tag/r/INTEGRATED_BILLING-IB-PRQ--IBD--IBQ--PRQS/IBJPS2.m
r628 r636 1 1 IBJPS2 ;ALB/MAF,ARH - IBSP IB SITE PARAMETER BUILD (cont) ;22-DEC-1995 2 ;;2.0;INTEGRATED BILLING;**39,52,115,143,51,137,161,155,320,348,349 ,377**;21-MAR-94;Build 232 ;;2.0;INTEGRATED BILLING;**39,52,115,143,51,137,161,155,320,348,349**;21-MAR-94;Build 46 3 3 ;;Per VHA Directive 2004-038, this routine should not be modified. 4 4 ; … … 47 47 D LEFT(2) 48 48 S IBLN=$$SET("Federal Tax #",$P(IBPD1,U,5),IBLN,IBLR,IBSEL) 49 ; 50 D RIGHT(3,"","") 51 S IBLN=$$SET("Remark on Each Bill",$P(IBPD1,U,4),IBLN,IBLR,IBSEL) 49 52 ; 50 53 D RIGHT(3,1,1) ; - Remittance/Agent Cashier Address
Note:
See TracChangeset
for help on using the changeset viewer.