routine GetOpenFileNameA
   module=COMDLG32
   minarg=20
   maxarg=20
   stackpop=called
   returns=short
;

arg  1 num input  fdstart format=pib4. ; * DWORD         lStructSize;
arg  2 num input          format=pib4. ; * HWND          hwndOwner;
arg  3 num input          format=pib4. ; * HINSTANCE     hInstance;
arg  4 num input          format=pib4. ; * LPCSTR        lpstrFilter;
arg  5 num input          format=pib4. ; * LPSTR         lpstrCustomFilter;
arg  6 num input          format=pib4. ; * DWORD         nMaxCustFilter;
arg  7 num update         format=pib4. ; * DWORD         nFilterIndex;
arg  8 num input          format=pib4. ; * LPSTR         lpstrFile;
arg  9 num input          format=pib4. ; * DWORD         nMaxFile;
arg 10 num input          format=pib4. ; * LPSTR         lpstrFileTitle;
arg 11 num input          format=pib4. ; * DWORD         nMaxFileTitle;
arg 12 num input          format=pib4. ; * LPCSTR        lpstrInitialDir;
arg 13 num input          format=pib4. ; * LPCSTR        lpstrTitle;
arg 14 num input          format=pib4. ; * DWORD         Flags;
arg 15 num update         format=pib2. ; * WORD          nFileOffset;
arg 16 num update         format=pib2. ; * WORD          nFileExtension;
arg 17 num input          format=pib4. ; * LPCSTR        lpstrDefExt;
arg 18 num input          format=pib4. ; * LPARAM        lCustData;
arg 19 num input          format=pib4. ; * LPOFNHOOKPROC lpfnHook;
arg 20 num input          format=pib4. ; * LPCSTR        lpTemplateName;

* Routine definition constructed by Richard A. DeVenezia;
* http://www.devenezia.com;