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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: FBAAPRC

Package: Fee Basis

Routine: FBAAPRC


Information

FBAAPRC ;AISC/DMK-PRINT REPORT OF CONTACT ;08/02/88

Source Information

Source file <FBAAPRC.m>

Entry Points

Name Comments DBIA/ICR reference
RD
START
ALRT1
BOT
Q
DATE
NONE
SIGBLK(X) ;returns the signature block printed name if in 200

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,QQ,!,?40,L,"VA Office",?58,L,"SSN #",!
  • Line Location: START+5
Function Call: WRITE
  • Prompt: ?40,L,?58,L,!,?8,">> REPORT OF CONTACT <<",?40,L,$E(SITE,1,18),?58,L,?60,$P(^DPT(DFN,0),"^",9),!,?40,L,$E(SITE,19,30),?58,L,!,Q,!,?3," Name of Veteran",?34,L,"Telephone No. of Vet.",?58,L,"Date of Contact",!
  • Line Location: START+6
Function Call: WRITE
  • Prompt: ?34,L,?58,L,!,?3,$E(NAM,1,30),?34,L,TEL,?58,L,?61,DAT,!,Q,!,?3," Address of Veteran",?58,L,"Type of Contact",!,?3,J(1),?58,L,!,?3,J(4)
  • Line Location: START+7
Function Call: WRITE
  • Prompt: ",",STAT," ",J(6)
  • Line Location: START+7
Function Call: WRITE
  • Prompt: ?58,L,?63,FBCON,!,Q,!,?3," Person Contacted",?58,L,"Telephone Number of",!,?58,L," Person Contacted",!,?3,VEN,?58,L,?61,VENTEL,!,Q,!,?3,"Brief statement of information requested and given",!
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !
  • Line Location: BOT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: BOT+0
Function Call: WRITE
  • Prompt: Q,!,?6,"Division or Section",?40,L," Executed by(signature and title)",!,?10,"FEE BASIS",?40,L," ",$$SIGBLK^FBAAPRC(USR),!,QQ,!,"VA form 119"
  • Line Location: BOT+1
Function Call: WRITE
  • Prompt: !!,"There are no Reports of Contact on line for this patient.",!!
  • Line Location: NONE+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAAA - [#161] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call