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

Package: HINQ

Routine: DVBHS2


Information

DVBHS2 ;ALB/JLU;This is the display for screen 2 ;10/7/91

Source Information

Source file <DVBHS2.m>

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,DVBON,"[1]",DVBOFF
  • Line Location: DVBHS2+15
Function Call: WRITE
  • Prompt: ?4,"Claim Num. :"
  • Line Location: DVBHS2+16
Function Call: WRITE
  • Prompt: ?19,DVBDIQ(2,DFN,.313,"E")
  • Line Location: DVBHS2+17
Function Call: WRITE
  • Prompt: ?49,DVBCN
  • Line Location: DVBHS2+18
Function Call: WRITE
  • Prompt: !,DVBON,"<2>",DVBOFF
  • Line Location: DVBHS2+20
Function Call: WRITE
  • Prompt: ?4,"Date of Birth:"
  • Line Location: DVBHS2+21
Function Call: WRITE
  • Prompt: ?19,DVBDIQ(2,DFN,.03,"E")
  • Line Location: DVBHS2+22
Function Call: WRITE
  • Prompt: ?49,M_" "_$S(+$E(DVBDOB,3,4)>0:$E(DVBDOB,3,4)_", ",1:" ")_$E(DVBDOB,5,8)
  • Line Location: DVBHS2+23
Function Call: WRITE
  • Prompt: !,DVBON,"<3>",DVBOFF
  • Line Location: DVBHS2+25
Function Call: WRITE
  • Prompt: ?4,"Sex:"
  • Line Location: DVBHS2+26
Function Call: WRITE
  • Prompt: ?19,DVBDIQ(2,DFN,.02,"E")
  • Line Location: DVBHS2+27
Function Call: WRITE
  • Prompt: ?49,$S($P(DVBVET,U,3)="M":"MALE",$P(DVBVET,U,3)="F":"FEMALE",1:"")
  • Line Location: DVBHS2+28
Function Call: WRITE
  • Prompt: ?49,$S($P(DVBBIR,U,25)="M":"MALE",$P(DVBBIR,U,25)="F":"FEMALE",1:"")
  • Line Location: DVBHS2+29
Function Call: WRITE
  • Prompt: !,DVBON,"[4]",DVBOFF
  • Line Location: DVBHS2+31
Function Call: WRITE
  • Prompt: ?4,"Date of Death:"
  • Line Location: DVBHS2+32
Function Call: WRITE
  • Prompt: ?19,DVBDIQ(2,DFN,.351,"E")
  • Line Location: DVBHS2+33
Function Call: WRITE
  • Prompt: ?49,M_" "_$E(M2,7,8)_", "_$E(M2,1,4)
  • Line Location: DVBHS2+34
Function Call: WRITE
  • Prompt: ?49,M_" "_$S(+$E(DVBP(6),3,4)>0:$E(DVBP(6),3,4)_", ",1:" ")_$E(DVBP(6),5,8)
  • Line Location: DVBHS2+35
Function Call: WRITE
  • Prompt: !,DVBON,"[5]",DVBOFF
  • Line Location: DVBHS2+37
Function Call: WRITE
  • Prompt: ?4,"Rated Incomp.:"
  • Line Location: DVBHS2+38
Function Call: WRITE
  • Prompt: ?19,DVBDIQ(2,DFN,.293,"E")
  • Line Location: DVBHS2+39
Function Call: WRITE
  • Prompt: ?49,$S("1"[DVBCI!(DVBCI="C"):"Competent, or not an issue",DVBCI="I"!(DVBCI=2):"Incompetent",1:DVBCI)
  • Line Location: DVBHS2+40
Function Call: WRITE
  • Prompt: !,DVBON,"[6]",DVBOFF
  • Line Location: DVBHS2+42
Function Call: WRITE
  • Prompt: ?4,"POW:"
  • Line Location: DVBHS2+43
Function Call: WRITE
  • Prompt: ?19,DVBDIQ(2,DFN,.525,"E")
  • Line Location: DVBHS2+44
Function Call: WRITE
  • Prompt: ?49
  • Line Location: DVBHS2+45
Function Call: WRITE
  • Prompt: !,DVBON,"[7]",DVBOFF
  • Line Location: DVBHS2+50
Function Call: WRITE
  • Prompt: ?4,"Folder Loc. :"
  • Line Location: DVBHS2+51
Function Call: WRITE
  • Prompt: ?19,DVBDIQ(2,DFN,.314,"E")
  • Line Location: DVBHS2+52
Function Call: WRITE
  • Prompt: ?49,DVBFL
  • Line Location: DVBHS2+53
Function Call: WRITE
  • Prompt: !,DVBON,"[8]",DVBOFF
  • Line Location: DVBHS2+55
Function Call: WRITE
  • Prompt: ?4,"Unemployable:"
  • Line Location: DVBHS2+56
Function Call: WRITE
  • Prompt: ?19,DVBDIQ(2,DFN,.305,"E")
  • Line Location: DVBHS2+57
Function Call: WRITE
  • Prompt: ?49,$S(DVBEI=1!(DVBEI="N"):"Employable",DVBEI=2!(DVBEI="Y"):"Unemployable",1:DVBEI)
  • Line Location: DVBHS2+58

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
Info |  Source |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call