GMPLSAVE ; ISL/MKB,KER,JER,TC,PWC -- Save Problem List data ; April 09, 2019
Source file <GMPLSAVE.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Save Changes made to Existing Problem
|
|
NOTES | ; Save Changes to Notes
|
|
EXIT | ; Quit Saving Changes
|
|
REFORM | ; Audit Entry that has been Reformulated
|
|
REACTV | ; Audit Entry that has been Reactivated
|
|
NEW | ; Save Collected Values in new Problem Entry
; Output DA (left defined) |
|
NEWPROB(ICD,DFN) | ; Creates New Problem Entry in file #9000011
|
|
NEWNOTE | ; Creates New Note Entries for Problem
; Requires GMPIFN Pointer to Problem ; GMPROV Current Provider ; GMPVAMC Facility |
|
NN1 | ; Get New Note
|
|
NNQ | ; Quit Getting New Notes
|
|
NEXTNMBR(DFN,VAMC) | ; Returns Next Available Problem Number
|
|
NTRTBULL(GMPY,GMPTERM,GMPSCT,GMPSRCH) | ; Send NTRT Request bulletin to NTRT mailgroup
|
|
COEXPRS(GMPDA,GMPICD) | ; File multiple ICDs
|
|
SPRCICD(GMPICD) | ; Is ICD string sparce (i.e., called from SDS API w/order > 2)?
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^AUPNPROB - [#9000011] | Classic Fileman Calls |