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 |