Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: HBHCAPPT

Package: Hospital Based Home Care

Routine: HBHCAPPT


Information

HBHCAPPT ; LR VAMC(IRMS)/MJT-HBHC batch job to create ^HBHC(632) (visit) nodes from PCE module info => patient, appointment date/time, hospital location (clinic), prov, DX code(s), & CPT code(s), calls ^HBHCCAN, HBHCAPP1 ; Jul 2000

Source Information

Source file <HBHCAPPT.m>

Entry Points

Name Comments DBIA/ICR reference
SCAN ; Scan
EXIT ; Exit module
CB(HBHCOEP,HBHCSCE0,HBHCSTOP) ;
; Omit Child encounter, (child if Parent Encounter field contains data)
VERIFY ; Verify record doesn't already exist in ^HBHC(632) file
PROCESS ; Process provider, diagnosis (DX), & CPT code data
; Dx
SET ; Set node, call ^DIK to set cross-refs in ^HBHC(632) (visit) file
SETLOOP ; Set loop
CHECK ; Check to ensure provider only has 1 HBHC Provider Number (631.4) or if > 1, has others flagged as Inactive Provider Numbers
PROV ; Encounter provider & CPT code processing
SUB1 ; Subroutine 1 for encounter provider & CPT code processing
SUB2 ; Subroutine 2 for encounter provider & CPT code processing
SETCPT ; Set CPT multiple
SETMOD ; Set CPT Modifier multiple

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^HBHC(632 - [#632] Classic Fileman Calls
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call