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

Package: Automated Medical Information Exchange

Routine: DVBAB99


Information

DVBAB99 ;ALB/SPH - CAPRI CONVERSION OF VALM FOR SUPPORT GUI CALLS ;09/06/000

Source Information

Source file <DVBAB99.m>

Entry Points

Name Comments DBIA/ICR reference
EN(NAME,PARMS) ; -- main entry point
; input: NAME := free text name of list template or routine call
; PARMS := parameter list
ENQ
ASK ; -- event loop
ASKQ
COL ; -- set up column dd array
CAPTION() ; -- set up caption line of header
CHGCAP(FLD,LABEL) ; -- change label on caption
; input: FLD := name of field
; LABEL := text for column header
REFRESH ; -- refresh display
HDR ; -- prt/display header
TBAR ; -- print caption/top bar
LIST ; -- list items
LBAR ; -- print low bar
MSG() ;
CRT(DX,DY) ;
SHOW ; -- show items to user / main call back
WP1(VALMREF) ; -- quick setup
WP(VALMREF,VALMWPTL) ; -- quick entry to List Manager (c)
XQORM ; -- set XQOR init vars
KEYS ; -- set XQOR auto-protocols

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $E(VALM("TITLE"),1,30)
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: $J("",30-$L(VALM("TITLE")))
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: $J("",((VALMWD-80)/2)),$$LOWER^VALM1($$NOW^VALM1),$J("",10+((VALMWD-80)/2)),"Page: ",$J(VALMPGE,4)," of ",$J($$PAGE^VALM4(VALMCNT,VALM("LINES")),4)_$S($D(VALMORE):"+",1:" ")
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+3
Function Call: WRITE
  • Prompt: !,X
  • Line Location: LBAR+9
Function Call: WRITE
  • Prompt: !
  • Line Location: LBAR+10
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: CRT+1
Function Call: WRITE
  • Prompt: VALMCOFF
  • Line Location: SHOW+1
Function Call: WRITE
  • Prompt: VALMCON
  • Line Location: SHOW+14
Info |  Source |  Entry Points |  Interaction Calls