IBDFDE1 ;ALB/AAS - AICS Data Entry, Final check; 2/24/96 [ 11/12/96 2:12 PM ]
Source file <IBDFDE1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FINAL | ; -- display everything selected and check okay
; -- input IBDSEL : ; $p1 := package interface ien (for input) ; $p2 := code to send (may be internal or external) ; $p3 := text to send ; $p4 := hdr to send (optional) ; $p5 := clinic lexicon pointer (optional) ; $p6 := qualifier (i.e. primary or secondary) ; $P7 := ; $p8 := ; $p9 := ; $p10 := external value of code (optional) |
|
FINALQ | ||
DEL | ; -- delete selected entry
|
|
DELQ | ||
LINE(CNT,IBD) | ; -- write one line of text
|
|
MODLIST(I) | ; -- list modifiers if in array
|
|
LEX(VAL) | ; -- get output of lexicon entry
|
|
MAKAPPT | ; -- ask make appointment stuff
|
|
MAKAPQ | ||
ERR | ; -- if processing of errors is on do display
; ask if want to re-edit |
|
DISP | ; -- display data based on pxca array
|
|
FNDAPPT | ; -- if form is not associated with an appointment see any in clinic
|
|
FNDQ |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|