GMRCITR ;SLC/JAK - IFC transactions ; 09/27/02 15:50
Source file <GMRCITR.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; -- main entry point for GMRC IF TRANSACTION
|
|
CON | ; ask for consult number or all
|
|
ASK | ; write prompt, do read
|
|
LKUP | ; use value of x for lookup
|
|
VIEW | ; ask for sort/view
|
|
BLD(GMRCDA) | ; get list of IF transactions for one or all consults
; Input: ; GMRCDA = ien of consult from file 123 |
|
DATA(GMRCS) | ; get data for IF transaction(s)
; Input: ; GMRCS = sort/view by selection ; Output: ; ^TMP("GMRCINC",$J array |
|
HDR | ; -- header code
|
|
LM | ; set caption line
|
|
SELECT | ; select a consult for detailed display of information
|
|
CKSEL(X) | ; check selection
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^GMR(123 - [#123] | Classic Fileman Calls |
^GMR(123.6 - [#123.6] | Classic Fileman Calls |
^HL(771.6 - [#771.6] | GET1^DIQ |