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 |  Interaction Calls
Print Page as PDF
Routine: FBUTL6

Package: Fee Basis

Routine: FBUTL6


Information

FBUTL6 ;WIOFO/SAB-FEE BASIS UTILITY ;8/10/2004

Source Information

Source file <FBUTL6.m>

Entry Points

Name Comments DBIA/ICR reference
PTFC(DFN,FBDT) ; Create Non-VA PTF Record
; Input
; DFN - IEN of entry in PATIENT (#2) file
; FBDT - Admission Date/Time, FileMan internal format, time optional
PTFD(DFN,FBDT) ; Delete Non-VA PTF Record
; Input
; DFN - IEN of entry in PATIENT (#2) file
; FBDT - Admission Date/Time, FileMan internal format, time optional

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!?5,$S($G(FBX)>0:"Non-VA PTF Record Created.",1:"Unable to create Non-VA PTF Record."),!
  • Line Location: PTFC+6
Function Call: WRITE
  • Prompt: $C(7),!?5,$S($G(FBX)=1:"Non-VA PTF Record Deleted.",1:"Unable to delete Non-VA PTF Record."),!
  • Line Location: PTFD+6
Info |  Source |  Entry Points |  Interaction Calls