SDAMOCC ;IOFIO BAYPINES/TEH - AM Mgt Reports ; 12/1/91
Source file <SDAMOCC.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; main entry point
|
|
EN1 | ||
ASKBDT | ;
|
|
ASKEDT | ;
|
|
ENQ | ||
INIT() | ; -- init vars
|
|
RANGE() | ; select date range
; input: none ; output: SDBEG := begin date ; SDEND := end date ; return: was selection made [ 1|yes 0|no] |
|
SELECT() | ; -- get selection criteria
; input: none ; output: SDSEL := criteria selected ; return: was selection made [ 1|yes 0|no] |
|
DIV() | ; -- get division data
; input: none ; output: VAUTD := divs selected (VAUTD=1 for all) ; return: was selection made [ 1|yes 0|no] |
|
CLINIC() | ; -- get clinic data
; input: VAUTD := divisions selected ; output: VAUTC := clinic selected (VAUTC=1 for all) ; return: was selection made [ 1|yes 0|no] |
|
CLINICQ | ||
STOP() | ; -- get stop code data
; output: VAUTC := stop codes selected (VAUTC=1 for all) ; return: was selection made [ 1|yes 0|no] |
|
STOPQ | ||
LINE(STR) | ; -- print line
; input: STR := text to insert ; output: none ; return: text to use |
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 |
|
FileNo | Call Tags |
---|---|
^DIC(40.7 - [#40.7] | Classic Fileman Calls |