Print Page as PDF
FBPAY67 for FBCS (DSS) ICR (5117)

FBPAY67 for FBCS (DSS)    ICR (5117)

Name Value
NUMBER 5117
IA # 5117
DATE CREATED 2008/02/07
CUSTODIAL PACKAGE FEE BASIS
USAGE Controlled Subscription
TYPE Routine
ROUTINE FBPAY67
NAME FBPAY67 for FBCS (DSS)
ORIGINAL NUMBER 5115
GENERAL DESCRIPTION 
These components are part of the fee basis payment
listing reports and were not designed to be called by other applications.
They may leak many variables.
STATUS Retired
KEYWORDS FBCS
DURATION Till Otherwise Agreed
ID FBPAY67
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
AN 
Get ancillary payment data for a specific veteran or
vendor for either the civil hospital or community nursing home fee program
using the "AN  x-ref in File 162
VARIABLES TYPE VARIABLES DESCRIPTION
FBVNAME Input 
Vendor Name (only needed when FBSORT = 0)
FBVID Input 
Vendor ID (only needed when FBSORT = 1)
FBVCHAIN Input 
(#10) CLINIC AFFILIATION, from file 161.2
FBDOB Input 
Patients date of birth
DFN Both 
Veteran IEN (only needed when FBSORT = 1)
FBPAT Output 
PATIENT NAME
FBPNAME Input 
Veteran Name (only needed when FBSORT = 1)
FBPID Input 
Patient SSN (example XXX-XX-1234, only needed when
FBSORT = 1)
FBPI Input 
Fee Program, value = 6 for civil hospital or 7 for
community nursing home
FBBDATE Input 
Beginning date in FileMan internal format
FBEDATE Input 
Ending date in FileMan internal format
FBSORT Input 
Value is 0 or 1, payment listing for vendor (=0) or
veteran (=1)
FBVI Input 
Vendor IEN (only needed when FBSORT = 0)
TMP($J,FB, Output 
Global of ancillary payment data that meets the input
criterion

Format

^TMP($J,"FB",FBPI_"O",FBVEN,FBPAT,(9999999.9999-FBDT1),L,M) =
$G(FBR)_$$DATX^FBAAUTL(FBDT1)_U_FBAACPTC_FBCP_$S($G(FBMODLE)]"":"-"_FBMODL
E,1:"")_U_ A1_U_A2_U_T_U_FBBN_U_FBIN_U_D2_U_FBSC_U_FBPDX_U_FBOB


^TMP($J,"FB",FBPI_"O",FBVEN,FBPAT,(9999999.9999-FBDT1),L,M,"FBCK") =
"^"_FBCK_"^"_FBCKDT_"^"_FBCANDT_"^"_FBCANR_"^"_FBCAN_"^"_FBDIS_"^"_FBCKINT


^TMP($J,"FB",FBPI_"O",FBVEN,FBPAT,(9999999.9999-FBDT1),L,M,"FBADJ") =
TAMT_U_FBUNITS_U_FBADJLR_U_FBADJLA_U_FBRRMKL_U_FBCSID_U_FBFPPSC_U_FBFPPSL_
U_FBAARCE
OTH 
Get ancillary payment data for a specific vendor and
veteran during a specified period and fee program
VARIABLES TYPE VARIABLES DESCRIPTION
FBPI Input 
IEN of Fee Program
DFN Input 
Patient IEN
FBVI Input 
Vendor IEN
FBDT1 Output 
Date of service
FBBDATE Input 
Beginning Date in FileMan internal format
FBEDATE Input 
Ending Date in FileMan internal format
FBPAT Input 
Veteran Name : Veteran ID (used for sorting)
FBVEN Input 
Vendor Name ; Vendor ID (used for sorting)
TMP($J,FB Output 
Global of ancillary payment data that meets the input
criterion. Same output as AN component
ANC 
Get ancillary payment data for a specific vendor and
veteran during a specified period and fee program
VARIABLES TYPE VARIABLES DESCRIPTION
FBM Input 
Date
FBI Input 
IEN to file 162.5
FBIEN Input 
Either a pointer to the VETERAN or the VENDOR
FBIN(5) Input 
ASSOCIATED 7078/583
TMP($J,FB Output 
Global of ancillary payment data
SUBSCRIBING PACKAGE FEE BASIS CLAIMS SYSTEM
DATE ACTIVATED 2009/06/11