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

Package: Automated Information Collection System

Routine: IBDF4


Information

IBDF4 ;ALB/CJM - ENCOUNTER FORM - BUILD FORM(editing group's selections) ;11/16/92

Source Information

Source file <IBDF4.m>

Entry Points

Name Comments DBIA/ICR reference
SLCTNS ;
ONENTRY ;entry code for list manager
ONEXIT ;exit code for the list manager
IDXSLCTN ;build an array of selections in print order for the list processor
LMGRPHDR ;header for the screen
GRPNAME() ;the name of the selection group
DISPLAY(SLCTN,COUNT) ;returns a line to display to the list containing a selection - SLCTN is a ptr to the selection, COUNT is the number of the selection on the list
ADDSLCTN ;allows the user to add a selection to the selection group
ADDEXIT ;
ADDREC(QUIT,ORDER,SLCTN,IBDEXCOD,IBDALL) ;allows the user to number the selection, edit the editable subcolumns, then adds the record - sets QUIT=1 if user quits
NARR(IBDQUIT) ; -- edit provider narrative, but only for selections where the
; interface allows editing
TERM(IBDQUIT,IBDCODEX) ; -- map selection to clinical lexicon, but only for selections where
; the package interface allows editing
CODES ; -- allow selection of a second code to pass through for this entry
; -- only as if pi allows input of more than one code
NOGOOD ;
SEQUENCE ;allows the user to resequence all of the selections on the list
RESEQ
ORDER
ADDALREC(IBSEL) ;updates all forms with the same code

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,"Now for another SELECTION LIST entry!"
  • Line Location: ADDSLCTN+8
Function Call: WRITE
  • Prompt: !,"Unable to create a new selection record!"
  • Line Location: ADDREC+13
Function Call: WRITE
  • Prompt: !,"The package interface routine for selection is not properly defined"
  • Line Location: NOGOOD+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(357.3 - [#357.3] Classic Fileman Calls,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call