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: DVBHQUP

Package: HINQ

Routine: DVBHQUP


Information

DVBHQUP ;ALB/JLU This routine is used for the upload option. ; 3/9/06 4:16pm

Source Information

Source file <DVBHQUP.m>

Entry Points

Name Comments DBIA/ICR reference
A
B
B1
KA1
KA
P
L
C ;SETS UPDATED? FIELD, RUNS INCONSIS. CHECKER.
FILE
PT
PT1
S
S1
T
AU ;ENTRY POINT FOR DISPLAY OF AUDIT.
AU1
P1
RP
RP1
CT
CT1
LSTR ;lists the SC disabilities in the ReviewPatient vs. HINQ data
LOOP ;
LIST ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: B+0
Function Call: READ
  • Formatting: !
  • Prompt: "Do you want to examine the Suspense file by 'P'atient or 'A'll P// "
  • Variable: K1
  • Timeout: DTIME
  • Line Location: B1+0
Function Call: WRITE
  • Prompt: !!,*7,?15,"Answer with capital A or P <RET> also for P",!!
  • Line Location: B1+2
Function Call: WRITE
  • Prompt: !!,"No patients to be updated."
  • Line Location: L+1
Function Call: READ
  • Prompt: "Do you want a print out of a (S)ingle patient or (A)ll of the patients? S// "
  • Variable: DVBJA
  • Timeout: DTIME
  • Line Location: PT1+0
Function Call: WRITE
  • Prompt: !!,*7,?15,"Answer with a capital A or S or <RET> for S",!!
  • Line Location: PT1+1
Function Call: WRITE
  • Prompt: !!,?6,"Select one of the following:",!!,?11,"1 Updated",!,?11,"2 NOT Updated",!,?11,"3 Both",!,"How would you like your print sorted? Updated//"
  • Line Location: T+1
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: T+2
Function Call: WRITE
  • Prompt: !!,*7,"Answer with a code from the list."
  • Line Location: T+4
Function Call: WRITE
  • Prompt: !!,?6,"Select one of the following:",!!,?11,"1 Patient",!,?11,"2 User",!,?11,"3 Date/Time",!,"By which would you like the sort to begin? : Patient//"
  • Line Location: AU1+0
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: AU1+1
Function Call: WRITE
  • Prompt: !!,*7,"Answer with a code from the above list."
  • Line Location: AU1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+0
Function Call: WRITE
  • Prompt: !,"There are no patients at this time for this print."
  • Line Location: CT+1
Function Call: WRITE
  • Prompt: !,"A YES answer will continue on with the report, answer with Y or N"
  • Line Location: CT1+0
Function Call: WRITE
  • Prompt: "-Comb. SC%: "_+DVBDIQ(2,DFN_",",.302,"E")_" "
  • Line Location: LSTR+6
Function Call: WRITE
  • Prompt: "Eff. Date Comb. Eval.: "_DVBDIQ(2,DFN_",",.3014,"E")
  • Line Location: LSTR+7
Function Call: WRITE
  • Prompt: !,$E(DVBDIQ(2.04,LP,.01,"E"),1,40),?42,DVBDIQ(2.04,LP,2,"E")
  • Line Location: LSTR+12
Function Call: WRITE
  • Prompt: ?50,$G(DVBDIQ(2.04,LP,4,"I")),?55,$G(DVBDIQ(2.04,LP,5,"E"))
  • Line Location: LSTR+13
Function Call: WRITE
  • Prompt: ?68,$G(DVBDIQ(2.04,LP,6,"E"))
  • Line Location: LSTR+14
Function Call: WRITE
  • Prompt: !?36,$P(DVBARR("DILIST",DVBCT,0),U,2),?68,$P(DVBARR("DILIST",DVBCT,0),U,4),?74,$P(DVBARR("DILIST",DVBCT,0),U,5)
  • Line Location: LOOP+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls,  GETS^DIQ
2.04 LIST^DIC
^DVB(395.5 - [#395.5] Classic Fileman Calls
^DVB(395.7 - [#395.7] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call